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