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