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