Make --with-pjproject-bundled the default for Asterisk 15
[asterisk/asterisk.git] / channels / chan_alsa.c
1 /*
2  * Asterisk -- An open source telephony toolkit.
3  *
4  * Copyright (C) 1999 - 2005, Digium, Inc.
5  *
6  * By Matthew Fredrickson <creslin@digium.com>
7  *
8  * See http://www.asterisk.org for more information about
9  * the Asterisk project. Please do not directly contact
10  * any of the maintainers of this project for assistance;
11  * the project provides a web site, mailing lists and IRC
12  * channels for your use.
13  *
14  * This program is free software, distributed under the terms of
15  * the GNU General Public License Version 2. See the LICENSE file
16  * at the top of the source tree.
17  */
18
19 /*! \file 
20  * \brief ALSA sound card channel driver 
21  *
22  * \author Matthew Fredrickson <creslin@digium.com>
23  *
24  * \ingroup channel_drivers
25  */
26
27 /*! \li \ref chan_alsa.c uses the configuration file \ref alsa.conf
28  * \addtogroup configuration_file
29  */
30
31 /*! \page alsa.conf alsa.conf
32  * \verbinclude alsa.conf.sample
33  */
34
35 /*** MODULEINFO
36         <depend>alsa</depend>
37         <support_level>extended</support_level>
38  ***/
39
40 #include "asterisk.h"
41
42 #include <fcntl.h>
43 #include <sys/ioctl.h>
44 #include <sys/time.h>
45
46 #define ALSA_PCM_NEW_HW_PARAMS_API
47 #define ALSA_PCM_NEW_SW_PARAMS_API
48 #include <alsa/asoundlib.h>
49
50 #include "asterisk/frame.h"
51 #include "asterisk/channel.h"
52 #include "asterisk/module.h"
53 #include "asterisk/pbx.h"
54 #include "asterisk/config.h"
55 #include "asterisk/cli.h"
56 #include "asterisk/utils.h"
57 #include "asterisk/causes.h"
58 #include "asterisk/endian.h"
59 #include "asterisk/stringfields.h"
60 #include "asterisk/abstract_jb.h"
61 #include "asterisk/musiconhold.h"
62 #include "asterisk/poll-compat.h"
63 #include "asterisk/stasis_channels.h"
64 #include "asterisk/format_cache.h"
65
66 /*! Global jitterbuffer configuration - by default, jb is disabled
67  *  \note Values shown here match the defaults shown in alsa.conf.sample */
68 static struct ast_jb_conf default_jbconf = {
69         .flags = 0,
70         .max_size = 200,
71         .resync_threshold = 1000,
72         .impl = "fixed",
73         .target_extra = 40,
74 };
75 static struct ast_jb_conf global_jbconf;
76
77 #define DEBUG 0
78 /* Which device to use */
79 #define ALSA_INDEV "default"
80 #define ALSA_OUTDEV "default"
81 #define DESIRED_RATE 8000
82
83 /* Lets use 160 sample frames, just like GSM.  */
84 #define FRAME_SIZE 160
85 #define PERIOD_FRAMES 80                /* 80 Frames, at 2 bytes each */
86
87 /* When you set the frame size, you have to come up with
88    the right buffer format as well. */
89 /* 5 64-byte frames = one frame */
90 #define BUFFER_FMT ((buffersize * 10) << 16) | (0x0006);
91
92 /* Don't switch between read/write modes faster than every 300 ms */
93 #define MIN_SWITCH_TIME 600
94
95 #if __BYTE_ORDER == __LITTLE_ENDIAN
96 static snd_pcm_format_t format = SND_PCM_FORMAT_S16_LE;
97 #else
98 static snd_pcm_format_t format = SND_PCM_FORMAT_S16_BE;
99 #endif
100
101 static char indevname[50] = ALSA_INDEV;
102 static char outdevname[50] = ALSA_OUTDEV;
103
104 static int silencesuppression = 0;
105 static int silencethreshold = 1000;
106
107 AST_MUTEX_DEFINE_STATIC(alsalock);
108
109 static const char tdesc[] = "ALSA Console Channel Driver";
110 static const char config[] = "alsa.conf";
111
112 static char context[AST_MAX_CONTEXT] = "default";
113 static char language[MAX_LANGUAGE] = "";
114 static char exten[AST_MAX_EXTENSION] = "s";
115 static char mohinterpret[MAX_MUSICCLASS];
116
117 static int hookstate = 0;
118
119 static struct chan_alsa_pvt {
120         /* We only have one ALSA structure -- near sighted perhaps, but it
121            keeps this driver as simple as possible -- as it should be. */
122         struct ast_channel *owner;
123         char exten[AST_MAX_EXTENSION];
124         char context[AST_MAX_CONTEXT];
125         snd_pcm_t *icard, *ocard;
126
127 } alsa;
128
129 /* Number of buffers...  Each is FRAMESIZE/8 ms long.  For example
130    with 160 sample frames, and a buffer size of 3, we have a 60ms buffer, 
131    usually plenty. */
132
133 #define MAX_BUFFER_SIZE 100
134
135 /* File descriptors for sound device */
136 static int readdev = -1;
137 static int writedev = -1;
138
139 static int autoanswer = 1;
140 static int mute = 0;
141 static int noaudiocapture = 0;
142
143 static struct ast_channel *alsa_request(const char *type, struct ast_format_cap *cap, const struct ast_assigned_ids *assignedids, const struct ast_channel *requestor, const char *data, int *cause);
144 static int alsa_digit(struct ast_channel *c, char digit, unsigned int duration);
145 static int alsa_text(struct ast_channel *c, const char *text);
146 static int alsa_hangup(struct ast_channel *c);
147 static int alsa_answer(struct ast_channel *c);
148 static struct ast_frame *alsa_read(struct ast_channel *chan);
149 static int alsa_call(struct ast_channel *c, const char *dest, int timeout);
150 static int alsa_write(struct ast_channel *chan, struct ast_frame *f);
151 static int alsa_indicate(struct ast_channel *chan, int cond, const void *data, size_t datalen);
152 static int alsa_fixup(struct ast_channel *oldchan, struct ast_channel *newchan);
153
154 static struct ast_channel_tech alsa_tech = {
155         .type = "Console",
156         .description = tdesc,
157         .requester = alsa_request,
158         .send_digit_end = alsa_digit,
159         .send_text = alsa_text,
160         .hangup = alsa_hangup,
161         .answer = alsa_answer,
162         .read = alsa_read,
163         .call = alsa_call,
164         .write = alsa_write,
165         .indicate = alsa_indicate,
166         .fixup = alsa_fixup,
167 };
168
169 static snd_pcm_t *alsa_card_init(char *dev, snd_pcm_stream_t stream)
170 {
171         int err;
172         int direction;
173         snd_pcm_t *handle = NULL;
174         snd_pcm_hw_params_t *hwparams = NULL;
175         snd_pcm_sw_params_t *swparams = NULL;
176         struct pollfd pfd;
177         snd_pcm_uframes_t period_size = PERIOD_FRAMES * 4;
178         snd_pcm_uframes_t buffer_size = 0;
179         unsigned int rate = DESIRED_RATE;
180         snd_pcm_uframes_t start_threshold, stop_threshold;
181
182         err = snd_pcm_open(&handle, dev, stream, SND_PCM_NONBLOCK);
183         if (err < 0) {
184                 ast_log(LOG_ERROR, "snd_pcm_open failed: %s\n", snd_strerror(err));
185                 return NULL;
186         } else {
187                 ast_debug(1, "Opening device %s in %s mode\n", dev, (stream == SND_PCM_STREAM_CAPTURE) ? "read" : "write");
188         }
189
190         hwparams = ast_alloca(snd_pcm_hw_params_sizeof());
191         memset(hwparams, 0, snd_pcm_hw_params_sizeof());
192         snd_pcm_hw_params_any(handle, hwparams);
193
194         err = snd_pcm_hw_params_set_access(handle, hwparams, SND_PCM_ACCESS_RW_INTERLEAVED);
195         if (err < 0)
196                 ast_log(LOG_ERROR, "set_access failed: %s\n", snd_strerror(err));
197
198         err = snd_pcm_hw_params_set_format(handle, hwparams, format);
199         if (err < 0)
200                 ast_log(LOG_ERROR, "set_format failed: %s\n", snd_strerror(err));
201
202         err = snd_pcm_hw_params_set_channels(handle, hwparams, 1);
203         if (err < 0)
204                 ast_log(LOG_ERROR, "set_channels failed: %s\n", snd_strerror(err));
205
206         direction = 0;
207         err = snd_pcm_hw_params_set_rate_near(handle, hwparams, &rate, &direction);
208         if (rate != DESIRED_RATE)
209                 ast_log(LOG_WARNING, "Rate not correct, requested %d, got %u\n", DESIRED_RATE, rate);
210
211         direction = 0;
212         err = snd_pcm_hw_params_set_period_size_near(handle, hwparams, &period_size, &direction);
213         if (err < 0)
214                 ast_log(LOG_ERROR, "period_size(%lu frames) is bad: %s\n", period_size, snd_strerror(err));
215         else {
216                 ast_debug(1, "Period size is %d\n", err);
217         }
218
219         buffer_size = 4096 * 2;         /* period_size * 16; */
220         err = snd_pcm_hw_params_set_buffer_size_near(handle, hwparams, &buffer_size);
221         if (err < 0)
222                 ast_log(LOG_WARNING, "Problem setting buffer size of %lu: %s\n", buffer_size, snd_strerror(err));
223         else {
224                 ast_debug(1, "Buffer size is set to %d frames\n", err);
225         }
226
227         err = snd_pcm_hw_params(handle, hwparams);
228         if (err < 0)
229                 ast_log(LOG_ERROR, "Couldn't set the new hw params: %s\n", snd_strerror(err));
230
231         swparams = ast_alloca(snd_pcm_sw_params_sizeof());
232         memset(swparams, 0, snd_pcm_sw_params_sizeof());
233         snd_pcm_sw_params_current(handle, swparams);
234
235         if (stream == SND_PCM_STREAM_PLAYBACK)
236                 start_threshold = period_size;
237         else
238                 start_threshold = 1;
239
240         err = snd_pcm_sw_params_set_start_threshold(handle, swparams, start_threshold);
241         if (err < 0)
242                 ast_log(LOG_ERROR, "start threshold: %s\n", snd_strerror(err));
243
244         if (stream == SND_PCM_STREAM_PLAYBACK)
245                 stop_threshold = buffer_size;
246         else
247                 stop_threshold = buffer_size;
248
249         err = snd_pcm_sw_params_set_stop_threshold(handle, swparams, stop_threshold);
250         if (err < 0)
251                 ast_log(LOG_ERROR, "stop threshold: %s\n", snd_strerror(err));
252
253         err = snd_pcm_sw_params(handle, swparams);
254         if (err < 0)
255                 ast_log(LOG_ERROR, "sw_params: %s\n", snd_strerror(err));
256
257         err = snd_pcm_poll_descriptors_count(handle);
258         if (err <= 0)
259                 ast_log(LOG_ERROR, "Unable to get a poll descriptors count, error is %s\n", snd_strerror(err));
260         if (err != 1) {
261                 ast_debug(1, "Can't handle more than one device\n");
262         }
263
264         snd_pcm_poll_descriptors(handle, &pfd, err);
265         ast_debug(1, "Acquired fd %d from the poll descriptor\n", pfd.fd);
266
267         if (stream == SND_PCM_STREAM_CAPTURE)
268                 readdev = pfd.fd;
269         else
270                 writedev = pfd.fd;
271
272         return handle;
273 }
274
275 static int soundcard_init(void)
276 {
277         if (!noaudiocapture) {
278                 alsa.icard = alsa_card_init(indevname, SND_PCM_STREAM_CAPTURE);
279                 if (!alsa.icard) {
280                         ast_log(LOG_ERROR, "Problem opening alsa capture device\n");
281                         return -1;
282                 }
283         }
284
285         alsa.ocard = alsa_card_init(outdevname, SND_PCM_STREAM_PLAYBACK);
286
287         if (!alsa.ocard) {
288                 ast_log(LOG_ERROR, "Problem opening ALSA playback device\n");
289                 return -1;
290         }
291
292         return writedev;
293 }
294
295 static int alsa_digit(struct ast_channel *c, char digit, unsigned int duration)
296 {
297         ast_mutex_lock(&alsalock);
298         ast_verbose(" << Console Received digit %c of duration %u ms >> \n", 
299                 digit, duration);
300         ast_mutex_unlock(&alsalock);
301
302         return 0;
303 }
304
305 static int alsa_text(struct ast_channel *c, const char *text)
306 {
307         ast_mutex_lock(&alsalock);
308         ast_verbose(" << Console Received text %s >> \n", text);
309         ast_mutex_unlock(&alsalock);
310
311         return 0;
312 }
313
314 static void grab_owner(void)
315 {
316         while (alsa.owner && ast_channel_trylock(alsa.owner)) {
317                 DEADLOCK_AVOIDANCE(&alsalock);
318         }
319 }
320
321 static int alsa_call(struct ast_channel *c, const char *dest, int timeout)
322 {
323         struct ast_frame f = { AST_FRAME_CONTROL };
324
325         ast_mutex_lock(&alsalock);
326         ast_verbose(" << Call placed to '%s' on console >> \n", dest);
327         if (autoanswer) {
328                 ast_verbose(" << Auto-answered >> \n");
329                 if (mute) {
330                         ast_verbose( " << Muted >> \n" );
331                 }
332                 grab_owner();
333                 if (alsa.owner) {
334                         f.subclass.integer = AST_CONTROL_ANSWER;
335                         ast_queue_frame(alsa.owner, &f);
336                         ast_channel_unlock(alsa.owner);
337                 }
338         } else {
339                 ast_verbose(" << Type 'answer' to answer, or use 'autoanswer' for future calls >> \n");
340                 grab_owner();
341                 if (alsa.owner) {
342                         f.subclass.integer = AST_CONTROL_RINGING;
343                         ast_queue_frame(alsa.owner, &f);
344                         ast_channel_unlock(alsa.owner);
345                         ast_indicate(alsa.owner, AST_CONTROL_RINGING);
346                 }
347         }
348         if (!noaudiocapture) {
349                 snd_pcm_prepare(alsa.icard);
350                 snd_pcm_start(alsa.icard);
351         }
352         ast_mutex_unlock(&alsalock);
353
354         return 0;
355 }
356
357 static int alsa_answer(struct ast_channel *c)
358 {
359         ast_mutex_lock(&alsalock);
360         ast_verbose(" << Console call has been answered >> \n");
361         ast_setstate(c, AST_STATE_UP);
362         if (!noaudiocapture) {
363                 snd_pcm_prepare(alsa.icard);
364                 snd_pcm_start(alsa.icard);
365         }
366         ast_mutex_unlock(&alsalock);
367
368         return 0;
369 }
370
371 static int alsa_hangup(struct ast_channel *c)
372 {
373         ast_mutex_lock(&alsalock);
374         ast_channel_tech_pvt_set(c, NULL);
375         alsa.owner = NULL;
376         ast_verbose(" << Hangup on console >> \n");
377         ast_module_unref(ast_module_info->self);
378         hookstate = 0;
379         if (!noaudiocapture) {
380                 snd_pcm_drop(alsa.icard);
381         }
382         ast_mutex_unlock(&alsalock);
383
384         return 0;
385 }
386
387 static int alsa_write(struct ast_channel *chan, struct ast_frame *f)
388 {
389         static char sizbuf[8000];
390         static int sizpos = 0;
391         int len = sizpos;
392         int res = 0;
393         /* size_t frames = 0; */
394         snd_pcm_state_t state;
395
396         ast_mutex_lock(&alsalock);
397
398         /* We have to digest the frame in 160-byte portions */
399         if (f->datalen > sizeof(sizbuf) - sizpos) {
400                 ast_log(LOG_WARNING, "Frame too large\n");
401                 res = -1;
402         } else {
403                 memcpy(sizbuf + sizpos, f->data.ptr, f->datalen);
404                 len += f->datalen;
405                 state = snd_pcm_state(alsa.ocard);
406                 if (state == SND_PCM_STATE_XRUN)
407                         snd_pcm_prepare(alsa.ocard);
408                 while ((res = snd_pcm_writei(alsa.ocard, sizbuf, len / 2)) == -EAGAIN) {
409                         usleep(1);
410                 }
411                 if (res == -EPIPE) {
412 #if DEBUG
413                         ast_debug(1, "XRUN write\n");
414 #endif
415                         snd_pcm_prepare(alsa.ocard);
416                         while ((res = snd_pcm_writei(alsa.ocard, sizbuf, len / 2)) == -EAGAIN) {
417                                 usleep(1);
418                         }
419                         if (res != len / 2) {
420                                 ast_log(LOG_ERROR, "Write error: %s\n", snd_strerror(res));
421                                 res = -1;
422                         } else if (res < 0) {
423                                 ast_log(LOG_ERROR, "Write error %s\n", snd_strerror(res));
424                                 res = -1;
425                         }
426                 } else {
427                         if (res == -ESTRPIPE)
428                                 ast_log(LOG_ERROR, "You've got some big problems\n");
429                         else if (res < 0)
430                                 ast_log(LOG_NOTICE, "Error %d on write\n", res);
431                 }
432         }
433         ast_mutex_unlock(&alsalock);
434
435         return res >= 0 ? 0 : res;
436 }
437
438
439 static struct ast_frame *alsa_read(struct ast_channel *chan)
440 {
441         static struct ast_frame f;
442         static short __buf[FRAME_SIZE + AST_FRIENDLY_OFFSET / 2];
443         short *buf;
444         static int readpos = 0;
445         static int left = FRAME_SIZE;
446         snd_pcm_state_t state;
447         int r = 0;
448
449         ast_mutex_lock(&alsalock);
450         f.frametype = AST_FRAME_NULL;
451         f.subclass.integer = 0;
452         f.samples = 0;
453         f.datalen = 0;
454         f.data.ptr = NULL;
455         f.offset = 0;
456         f.src = "Console";
457         f.mallocd = 0;
458         f.delivery.tv_sec = 0;
459         f.delivery.tv_usec = 0;
460
461         if (noaudiocapture) {
462                 /* Return null frame to asterisk*/
463                 ast_mutex_unlock(&alsalock);
464                 return &f;
465         }
466
467         state = snd_pcm_state(alsa.icard);
468         if ((state != SND_PCM_STATE_PREPARED) && (state != SND_PCM_STATE_RUNNING)) {
469                 snd_pcm_prepare(alsa.icard);
470         }
471
472         buf = __buf + AST_FRIENDLY_OFFSET / 2;
473
474         r = snd_pcm_readi(alsa.icard, buf + readpos, left);
475         if (r == -EPIPE) {
476 #if DEBUG
477                 ast_log(LOG_ERROR, "XRUN read\n");
478 #endif
479                 snd_pcm_prepare(alsa.icard);
480         } else if (r == -ESTRPIPE) {
481                 ast_log(LOG_ERROR, "-ESTRPIPE\n");
482                 snd_pcm_prepare(alsa.icard);
483         } else if (r < 0) {
484                 ast_log(LOG_ERROR, "Read error: %s\n", snd_strerror(r));
485         }
486
487         /* Return NULL frame on error */
488         if (r < 0) {
489                 ast_mutex_unlock(&alsalock);
490                 return &f;
491         }
492
493         /* Update positions */
494         readpos += r;
495         left -= r;
496
497         if (readpos >= FRAME_SIZE) {
498                 /* A real frame */
499                 readpos = 0;
500                 left = FRAME_SIZE;
501                 if (ast_channel_state(chan) != AST_STATE_UP) {
502                         /* Don't transmit unless it's up */
503                         ast_mutex_unlock(&alsalock);
504                         return &f;
505                 }
506                 if (mute) {
507                         /* Don't transmit if muted */
508                         ast_mutex_unlock(&alsalock);
509                         return &f;
510                 }
511
512                 f.frametype = AST_FRAME_VOICE;
513                 f.subclass.format = ast_format_slin;
514                 f.samples = FRAME_SIZE;
515                 f.datalen = FRAME_SIZE * 2;
516                 f.data.ptr = buf;
517                 f.offset = AST_FRIENDLY_OFFSET;
518                 f.src = "Console";
519                 f.mallocd = 0;
520
521         }
522         ast_mutex_unlock(&alsalock);
523
524         return &f;
525 }
526
527 static int alsa_fixup(struct ast_channel *oldchan, struct ast_channel *newchan)
528 {
529         struct chan_alsa_pvt *p = ast_channel_tech_pvt(newchan);
530
531         ast_mutex_lock(&alsalock);
532         p->owner = newchan;
533         ast_mutex_unlock(&alsalock);
534
535         return 0;
536 }
537
538 static int alsa_indicate(struct ast_channel *chan, int cond, const void *data, size_t datalen)
539 {
540         int res = 0;
541
542         ast_mutex_lock(&alsalock);
543
544         switch (cond) {
545         case AST_CONTROL_BUSY:
546         case AST_CONTROL_CONGESTION:
547         case AST_CONTROL_RINGING:
548         case AST_CONTROL_INCOMPLETE:
549         case AST_CONTROL_PVT_CAUSE_CODE:
550         case -1:
551                 res = -1;  /* Ask for inband indications */
552                 break;
553         case AST_CONTROL_PROGRESS:
554         case AST_CONTROL_PROCEEDING:
555         case AST_CONTROL_VIDUPDATE:
556         case AST_CONTROL_SRCUPDATE:
557                 break;
558         case AST_CONTROL_HOLD:
559                 ast_verbose(" << Console Has Been Placed on Hold >> \n");
560                 ast_moh_start(chan, data, mohinterpret);
561                 break;
562         case AST_CONTROL_UNHOLD:
563                 ast_verbose(" << Console Has Been Retrieved from Hold >> \n");
564                 ast_moh_stop(chan);
565                 break;
566         default:
567                 ast_log(LOG_WARNING, "Don't know how to display condition %d on %s\n", cond, ast_channel_name(chan));
568                 res = -1;
569         }
570
571         ast_mutex_unlock(&alsalock);
572
573         return res;
574 }
575
576 static struct ast_channel *alsa_new(struct chan_alsa_pvt *p, int state, const struct ast_assigned_ids *assignedids, const struct ast_channel *requestor)
577 {
578         struct ast_channel *tmp = NULL;
579
580         if (!(tmp = ast_channel_alloc(1, state, 0, 0, "", p->exten, p->context, assignedids, requestor, 0, "ALSA/%s", indevname)))
581                 return NULL;
582
583         ast_channel_stage_snapshot(tmp);
584
585         ast_channel_tech_set(tmp, &alsa_tech);
586         ast_channel_set_fd(tmp, 0, readdev);
587         ast_channel_set_readformat(tmp, ast_format_slin);
588         ast_channel_set_writeformat(tmp, ast_format_slin);
589         ast_channel_nativeformats_set(tmp, alsa_tech.capabilities);
590
591         ast_channel_tech_pvt_set(tmp, p);
592         if (!ast_strlen_zero(p->context))
593                 ast_channel_context_set(tmp, p->context);
594         if (!ast_strlen_zero(p->exten))
595                 ast_channel_exten_set(tmp, p->exten);
596         if (!ast_strlen_zero(language))
597                 ast_channel_language_set(tmp, language);
598         p->owner = tmp;
599         ast_module_ref(ast_module_info->self);
600         ast_jb_configure(tmp, &global_jbconf);
601
602         ast_channel_stage_snapshot_done(tmp);
603         ast_channel_unlock(tmp);
604
605         if (state != AST_STATE_DOWN) {
606                 if (ast_pbx_start(tmp)) {
607                         ast_log(LOG_WARNING, "Unable to start PBX on %s\n", ast_channel_name(tmp));
608                         ast_hangup(tmp);
609                         tmp = NULL;
610                 }
611         }
612
613         return tmp;
614 }
615
616 static struct ast_channel *alsa_request(const char *type, struct ast_format_cap *cap, const struct ast_assigned_ids *assignedids, const struct ast_channel *requestor, const char *data, int *cause)
617 {
618         struct ast_channel *tmp = NULL;
619
620         if (ast_format_cap_iscompatible_format(cap, ast_format_slin) == AST_FORMAT_CMP_NOT_EQUAL) {
621                 struct ast_str *codec_buf = ast_str_alloca(AST_FORMAT_CAP_NAMES_LEN);
622                 ast_log(LOG_NOTICE, "Asked to get a channel of format '%s'\n", ast_format_cap_get_names(cap, &codec_buf));
623                 return NULL;
624         }
625
626         ast_mutex_lock(&alsalock);
627
628         if (alsa.owner) {
629                 ast_log(LOG_NOTICE, "Already have a call on the ALSA channel\n");
630                 *cause = AST_CAUSE_BUSY;
631         } else if (!(tmp = alsa_new(&alsa, AST_STATE_DOWN, assignedids, requestor))) {
632                 ast_log(LOG_WARNING, "Unable to create new ALSA channel\n");
633         }
634
635         ast_mutex_unlock(&alsalock);
636
637         return tmp;
638 }
639
640 static char *console_autoanswer(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a)
641 {
642         char *res = CLI_SUCCESS;
643
644         switch (cmd) {
645         case CLI_INIT:
646                 e->command = "console autoanswer [on|off]";
647                 e->usage =
648                         "Usage: console autoanswer [on|off]\n"
649                         "       Enables or disables autoanswer feature.  If used without\n"
650                         "       argument, displays the current on/off status of autoanswer.\n"
651                         "       The default value of autoanswer is in 'alsa.conf'.\n";
652                 return NULL;
653         case CLI_GENERATE:
654                 return NULL;
655         }
656
657         if ((a->argc != 2) && (a->argc != 3))
658                 return CLI_SHOWUSAGE;
659
660         ast_mutex_lock(&alsalock);
661         if (a->argc == 2) {
662                 ast_cli(a->fd, "Auto answer is %s.\n", autoanswer ? "on" : "off");
663         } else {
664                 if (!strcasecmp(a->argv[2], "on"))
665                         autoanswer = -1;
666                 else if (!strcasecmp(a->argv[2], "off"))
667                         autoanswer = 0;
668                 else
669                         res = CLI_SHOWUSAGE;
670         }
671         ast_mutex_unlock(&alsalock);
672
673         return res;
674 }
675
676 static char *console_answer(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a)
677 {
678         char *res = CLI_SUCCESS;
679
680         switch (cmd) {
681         case CLI_INIT:
682                 e->command = "console answer";
683                 e->usage =
684                         "Usage: console answer\n"
685                         "       Answers an incoming call on the console (ALSA) channel.\n";
686
687                 return NULL;
688         case CLI_GENERATE:
689                 return NULL; 
690         }
691
692         if (a->argc != 2)
693                 return CLI_SHOWUSAGE;
694
695         ast_mutex_lock(&alsalock);
696
697         if (!alsa.owner) {
698                 ast_cli(a->fd, "No one is calling us\n");
699                 res = CLI_FAILURE;
700         } else {
701                 if (mute) {
702                         ast_verbose( " << Muted >> \n" );
703                 }
704                 hookstate = 1;
705                 grab_owner();
706                 if (alsa.owner) {
707                         ast_queue_control(alsa.owner, AST_CONTROL_ANSWER);
708                         ast_channel_unlock(alsa.owner);
709                 }
710         }
711
712         if (!noaudiocapture) {
713                 snd_pcm_prepare(alsa.icard);
714                 snd_pcm_start(alsa.icard);
715         }
716
717         ast_mutex_unlock(&alsalock);
718
719         return res;
720 }
721
722 static char *console_sendtext(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a)
723 {
724         int tmparg = 3;
725         char *res = CLI_SUCCESS;
726
727         switch (cmd) {
728         case CLI_INIT:
729                 e->command = "console send text";
730                 e->usage =
731                         "Usage: console send text <message>\n"
732                         "       Sends a text message for display on the remote terminal.\n";
733                 return NULL;
734         case CLI_GENERATE:
735                 return NULL; 
736         }
737
738         if (a->argc < 3)
739                 return CLI_SHOWUSAGE;
740
741         ast_mutex_lock(&alsalock);
742
743         if (!alsa.owner) {
744                 ast_cli(a->fd, "No channel active\n");
745                 res = CLI_FAILURE;
746         } else {
747                 struct ast_frame f = { AST_FRAME_TEXT };
748                 char text2send[256] = "";
749
750                 while (tmparg < a->argc) {
751                         strncat(text2send, a->argv[tmparg++], sizeof(text2send) - strlen(text2send) - 1);
752                         strncat(text2send, " ", sizeof(text2send) - strlen(text2send) - 1);
753                 }
754
755                 text2send[strlen(text2send) - 1] = '\n';
756                 f.data.ptr = text2send;
757                 f.datalen = strlen(text2send) + 1;
758                 grab_owner();
759                 if (alsa.owner) {
760                         ast_queue_frame(alsa.owner, &f);
761                         ast_queue_control(alsa.owner, AST_CONTROL_ANSWER);
762                         ast_channel_unlock(alsa.owner);
763                 }
764         }
765
766         ast_mutex_unlock(&alsalock);
767
768         return res;
769 }
770
771 static char *console_hangup(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a)
772 {
773         char *res = CLI_SUCCESS;
774
775         switch (cmd) {
776         case CLI_INIT:
777                 e->command = "console hangup";
778                 e->usage =
779                         "Usage: console hangup\n"
780                         "       Hangs up any call currently placed on the console.\n";
781                 return NULL;
782         case CLI_GENERATE:
783                 return NULL; 
784         }
785  
786
787         if (a->argc != 2)
788                 return CLI_SHOWUSAGE;
789
790         ast_mutex_lock(&alsalock);
791
792         if (!alsa.owner && !hookstate) {
793                 ast_cli(a->fd, "No call to hangup\n");
794                 res = CLI_FAILURE;
795         } else {
796                 hookstate = 0;
797                 grab_owner();
798                 if (alsa.owner) {
799                         ast_queue_hangup_with_cause(alsa.owner, AST_CAUSE_NORMAL_CLEARING);
800                         ast_channel_unlock(alsa.owner);
801                 }
802         }
803
804         ast_mutex_unlock(&alsalock);
805
806         return res;
807 }
808
809 static char *console_dial(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a)
810 {
811         char tmp[256], *tmp2;
812         char *mye, *myc;
813         const char *d;
814         char *res = CLI_SUCCESS;
815
816         switch (cmd) {
817         case CLI_INIT:
818                 e->command = "console dial";
819                 e->usage =
820                         "Usage: console dial [extension[@context]]\n"
821                         "       Dials a given extension (and context if specified)\n";
822                 return NULL;
823         case CLI_GENERATE:
824                 return NULL;
825         }
826
827         if ((a->argc != 2) && (a->argc != 3))
828                 return CLI_SHOWUSAGE;
829
830         ast_mutex_lock(&alsalock);
831
832         if (alsa.owner) {
833                 if (a->argc == 3) {
834                         if (alsa.owner) {
835                                 for (d = a->argv[2]; *d; d++) {
836                                         struct ast_frame f = { .frametype = AST_FRAME_DTMF, .subclass.integer = *d };
837
838                                         ast_queue_frame(alsa.owner, &f);
839                                 }
840                         }
841                 } else {
842                         ast_cli(a->fd, "You're already in a call.  You can use this only to dial digits until you hangup\n");
843                         res = CLI_FAILURE;
844                 }
845         } else {
846                 mye = exten;
847                 myc = context;
848                 if (a->argc == 3) {
849                         char *stringp = NULL;
850
851                         ast_copy_string(tmp, a->argv[2], sizeof(tmp));
852                         stringp = tmp;
853                         strsep(&stringp, "@");
854                         tmp2 = strsep(&stringp, "@");
855                         if (!ast_strlen_zero(tmp))
856                                 mye = tmp;
857                         if (!ast_strlen_zero(tmp2))
858                                 myc = tmp2;
859                 }
860                 if (ast_exists_extension(NULL, myc, mye, 1, NULL)) {
861                         ast_copy_string(alsa.exten, mye, sizeof(alsa.exten));
862                         ast_copy_string(alsa.context, myc, sizeof(alsa.context));
863                         hookstate = 1;
864                         alsa_new(&alsa, AST_STATE_RINGING, NULL, NULL);
865                 } else
866                         ast_cli(a->fd, "No such extension '%s' in context '%s'\n", mye, myc);
867         }
868
869         ast_mutex_unlock(&alsalock);
870
871         return res;
872 }
873
874 static char *console_mute(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a)
875 {
876         int toggle = 0;
877         char *res = CLI_SUCCESS;
878
879         switch (cmd) {
880         case CLI_INIT:
881                 e->command = "console {mute|unmute} [toggle]";
882                 e->usage =
883                         "Usage: console {mute|unmute} [toggle]\n"
884                         "       Mute/unmute the microphone.\n";
885                 return NULL;
886         case CLI_GENERATE:
887                 return NULL;
888         }
889
890
891         if (a->argc > 3) {
892                 return CLI_SHOWUSAGE;
893         }
894
895         if (a->argc == 3) {
896                 if (strcasecmp(a->argv[2], "toggle"))
897                         return CLI_SHOWUSAGE;
898                 toggle = 1;
899         }
900
901         if (a->argc < 2) {
902                 return CLI_SHOWUSAGE;
903         }
904
905         if (!strcasecmp(a->argv[1], "mute")) {
906                 mute = toggle ? !mute : 1;
907         } else if (!strcasecmp(a->argv[1], "unmute")) {
908                 mute = toggle ? !mute : 0;
909         } else {
910                 return CLI_SHOWUSAGE;
911         }
912
913         ast_cli(a->fd, "Console mic is %s\n", mute ? "off" : "on");
914
915         return res;
916 }
917
918 static struct ast_cli_entry cli_alsa[] = {
919         AST_CLI_DEFINE(console_answer, "Answer an incoming console call"),
920         AST_CLI_DEFINE(console_hangup, "Hangup a call on the console"),
921         AST_CLI_DEFINE(console_dial, "Dial an extension on the console"),
922         AST_CLI_DEFINE(console_sendtext, "Send text to the remote device"),
923         AST_CLI_DEFINE(console_autoanswer, "Sets/displays autoanswer"),
924         AST_CLI_DEFINE(console_mute, "Disable/Enable mic input"),
925 };
926
927 static int unload_module(void)
928 {
929         ast_channel_unregister(&alsa_tech);
930         ast_cli_unregister_multiple(cli_alsa, ARRAY_LEN(cli_alsa));
931
932         if (alsa.icard)
933                 snd_pcm_close(alsa.icard);
934         if (alsa.ocard)
935                 snd_pcm_close(alsa.ocard);
936         if (alsa.owner)
937                 ast_softhangup(alsa.owner, AST_SOFTHANGUP_APPUNLOAD);
938         if (alsa.owner)
939                 return -1;
940
941         ao2_cleanup(alsa_tech.capabilities);
942         alsa_tech.capabilities = NULL;
943
944         return 0;
945 }
946
947 /*!
948  * \brief Load the module
949  *
950  * Module loading including tests for configuration or dependencies.
951  * This function can return AST_MODULE_LOAD_FAILURE, AST_MODULE_LOAD_DECLINE,
952  * or AST_MODULE_LOAD_SUCCESS. If a dependency or environment variable fails
953  * tests return AST_MODULE_LOAD_FAILURE. If the module can not load the 
954  * configuration file or other non-critical problem return 
955  * AST_MODULE_LOAD_DECLINE. On success return AST_MODULE_LOAD_SUCCESS.
956  */
957 static int load_module(void)
958 {
959         struct ast_config *cfg;
960         struct ast_variable *v;
961         struct ast_flags config_flags = { 0 };
962
963         if (!(alsa_tech.capabilities = ast_format_cap_alloc(AST_FORMAT_CAP_FLAG_DEFAULT))) {
964                 return AST_MODULE_LOAD_DECLINE;
965         }
966         ast_format_cap_append(alsa_tech.capabilities, ast_format_slin, 0);
967
968         /* Copy the default jb config over global_jbconf */
969         memcpy(&global_jbconf, &default_jbconf, sizeof(struct ast_jb_conf));
970
971         strcpy(mohinterpret, "default");
972
973         if (!(cfg = ast_config_load(config, config_flags))) {
974                 ast_log(LOG_ERROR, "Unable to read ALSA configuration file %s.  Aborting.\n", config);
975                 return AST_MODULE_LOAD_DECLINE;
976         } else if (cfg == CONFIG_STATUS_FILEINVALID) {
977                 ast_log(LOG_ERROR, "%s is in an invalid format.  Aborting.\n", config);
978                 return AST_MODULE_LOAD_DECLINE;
979         }
980
981         v = ast_variable_browse(cfg, "general");
982         for (; v; v = v->next) {
983                 /* handle jb conf */
984                 if (!ast_jb_read_conf(&global_jbconf, v->name, v->value)) {
985                         continue;
986                 }
987
988                 if (!strcasecmp(v->name, "autoanswer")) {
989                         autoanswer = ast_true(v->value);
990                 } else if (!strcasecmp(v->name, "mute")) {
991                         mute = ast_true(v->value);
992                 } else if (!strcasecmp(v->name, "noaudiocapture")) {
993                         noaudiocapture = ast_true(v->value);
994                 } else if (!strcasecmp(v->name, "silencesuppression")) {
995                         silencesuppression = ast_true(v->value);
996                 } else if (!strcasecmp(v->name, "silencethreshold")) {
997                         silencethreshold = atoi(v->value);
998                 } else if (!strcasecmp(v->name, "context")) {
999                         ast_copy_string(context, v->value, sizeof(context));
1000                 } else if (!strcasecmp(v->name, "language")) {
1001                         ast_copy_string(language, v->value, sizeof(language));
1002                 } else if (!strcasecmp(v->name, "extension")) {
1003                         ast_copy_string(exten, v->value, sizeof(exten));
1004                 } else if (!strcasecmp(v->name, "input_device")) {
1005                         ast_copy_string(indevname, v->value, sizeof(indevname));
1006                 } else if (!strcasecmp(v->name, "output_device")) {
1007                         ast_copy_string(outdevname, v->value, sizeof(outdevname));
1008                 } else if (!strcasecmp(v->name, "mohinterpret")) {
1009                         ast_copy_string(mohinterpret, v->value, sizeof(mohinterpret));
1010                 }
1011         }
1012         ast_config_destroy(cfg);
1013
1014         if (soundcard_init() < 0) {
1015                 ast_verb(2, "No sound card detected -- console channel will be unavailable\n");
1016                 ast_verb(2, "Turn off ALSA support by adding 'noload=chan_alsa.so' in /etc/asterisk/modules.conf\n");
1017                 unload_module();
1018
1019                 return AST_MODULE_LOAD_DECLINE;
1020         }
1021
1022         if (ast_channel_register(&alsa_tech)) {
1023                 ast_log(LOG_ERROR, "Unable to register channel class 'Console'\n");
1024                 unload_module();
1025
1026                 return AST_MODULE_LOAD_DECLINE;
1027         }
1028
1029         ast_cli_register_multiple(cli_alsa, ARRAY_LEN(cli_alsa));
1030
1031         return AST_MODULE_LOAD_SUCCESS;
1032 }
1033
1034 AST_MODULE_INFO(ASTERISK_GPL_KEY, AST_MODFLAG_LOAD_ORDER, "ALSA Console Channel Driver",
1035         .support_level = AST_MODULE_SUPPORT_EXTENDED,
1036         .load = load_module,
1037         .unload = unload_module,
1038         .load_pri = AST_MODPRI_CHANNEL_DRIVER,
1039 );