Version 0.1.12 from FTP
[asterisk/asterisk.git] / channels / chan_oss.c
1 /*
2  * Asterisk -- A telephony toolkit for Linux.
3  *
4  * Use /dev/dsp as a channel, and the console to command it :).
5  *
6  * The full-duplex "simulation" is pretty weak.  This is generally a 
7  * VERY BADLY WRITTEN DRIVER so please don't use it as a model for
8  * writing a driver.
9  * 
10  * Copyright (C) 1999, Mark Spencer
11  *
12  * Mark Spencer <markster@linux-support.net>
13  *
14  * This program is free software, distributed under the terms of
15  * the GNU General Public License
16  */
17
18 #include <asterisk/lock.h>
19 #include <asterisk/frame.h>
20 #include <asterisk/logger.h>
21 #include <asterisk/channel.h>
22 #include <asterisk/module.h>
23 #include <asterisk/channel_pvt.h>
24 #include <asterisk/options.h>
25 #include <asterisk/pbx.h>
26 #include <asterisk/config.h>
27 #include <asterisk/cli.h>
28 #include <unistd.h>
29 #include <fcntl.h>
30 #include <errno.h>
31 #include <sys/ioctl.h>
32 #include <sys/time.h>
33 #include <string.h>
34 #include <stdlib.h>
35 #include <stdio.h>
36 #include <linux/soundcard.h>
37 #include "busy.h"
38 #include "ringtone.h"
39 #include "ring10.h"
40 #include "answer.h"
41
42 /* Which device to use */
43 #define DEV_DSP "/dev/dsp"
44
45 /* Lets use 160 sample frames, just like GSM.  */
46 #define FRAME_SIZE 160
47
48 /* When you set the frame size, you have to come up with
49    the right buffer format as well. */
50 /* 5 64-byte frames = one frame */
51 #define BUFFER_FMT ((buffersize * 10) << 16) | (0x0006);
52
53 /* Don't switch between read/write modes faster than every 300 ms */
54 #define MIN_SWITCH_TIME 600
55
56 static struct timeval lasttime;
57
58 static int usecnt;
59 static int silencesuppression = 0;
60 static int silencethreshold = 1000;
61
62
63 static pthread_mutex_t usecnt_lock = AST_MUTEX_INITIALIZER;
64
65 static char *type = "Console";
66 static char *desc = "OSS Console Channel Driver";
67 static char *tdesc = "OSS Console Channel Driver";
68 static char *config = "oss.conf";
69
70 static char context[AST_MAX_EXTENSION] = "default";
71 static char language[MAX_LANGUAGE] = "";
72 static char exten[AST_MAX_EXTENSION] = "s";
73
74 int hookstate=0;
75
76 static short silence[FRAME_SIZE] = {0, };
77
78 struct sound {
79         int ind;
80         short *data;
81         int datalen;
82         int samplen;
83         int silencelen;
84         int repeat;
85 };
86
87 static struct sound sounds[] = {
88         { AST_CONTROL_RINGING, ringtone, sizeof(ringtone)/2, 16000, 32000, 1 },
89         { AST_CONTROL_BUSY, busy, sizeof(busy)/2, 4000, 4000, 1 },
90         { AST_CONTROL_CONGESTION, busy, sizeof(busy)/2, 2000, 2000, 1 },
91         { AST_CONTROL_RING, ring10, sizeof(ring10)/2, 16000, 32000, 1 },
92         { AST_CONTROL_ANSWER, answer, sizeof(answer)/2, 2200, 0, 0 },
93 };
94
95 /* Sound command pipe */
96 static int sndcmd[2];
97
98 static struct chan_oss_pvt {
99         /* We only have one OSS structure -- near sighted perhaps, but it
100            keeps this driver as simple as possible -- as it should be. */
101         struct ast_channel *owner;
102         char exten[AST_MAX_EXTENSION];
103         char context[AST_MAX_EXTENSION];
104 } oss;
105
106 static int time_has_passed()
107 {
108         struct timeval tv;
109         int ms;
110         gettimeofday(&tv, NULL);
111         ms = (tv.tv_sec - lasttime.tv_sec) * 1000 +
112                         (tv.tv_usec - lasttime.tv_usec) / 1000;
113         if (ms > MIN_SWITCH_TIME)
114                 return -1;
115         return 0;
116 }
117
118 /* Number of buffers...  Each is FRAMESIZE/8 ms long.  For example
119    with 160 sample frames, and a buffer size of 3, we have a 60ms buffer, 
120    usually plenty. */
121
122 pthread_t sthread;
123
124 #define MAX_BUFFER_SIZE 100
125 static int buffersize = 3;
126
127 static int full_duplex = 0;
128
129 /* Are we reading or writing (simulated full duplex) */
130 static int readmode = 1;
131
132 /* File descriptor for sound device */
133 static int sounddev = -1;
134
135 static int autoanswer = 1;
136  
137 static int calc_loudness(short *frame)
138 {
139         int sum = 0;
140         int x;
141         for (x=0;x<FRAME_SIZE;x++) {
142                 if (frame[x] < 0)
143                         sum -= frame[x];
144                 else
145                         sum += frame[x];
146         }
147         sum = sum/FRAME_SIZE;
148         return sum;
149 }
150
151 static int cursound = -1;
152 static int sampsent = 0;
153 static int silencelen=0;
154 static int offset=0;
155 static int nosound=0;
156
157 static int send_sound(void)
158 {
159         short myframe[FRAME_SIZE];
160         int total = FRAME_SIZE;
161         short *frame = NULL;
162         int amt=0;
163         int res;
164         int myoff;
165         audio_buf_info abi;
166         if (cursound > -1) {
167                 res = ioctl(sounddev, SNDCTL_DSP_GETOSPACE ,&abi);
168                 if (res) {
169                         ast_log(LOG_WARNING, "Unable to read output space\n");
170                         return -1;
171                 }
172                 /* Calculate how many samples we can send, max */
173                 if (total > (abi.fragments * abi.fragsize / 2)) 
174                         total = abi.fragments * abi.fragsize / 2;
175                 res = total;
176                 if (sampsent < sounds[cursound].samplen) {
177                         myoff=0;
178                         while(total) {
179                                 amt = total;
180                                 if (amt > (sounds[cursound].datalen - offset)) 
181                                         amt = sounds[cursound].datalen - offset;
182                                 memcpy(myframe + myoff, sounds[cursound].data + offset, amt * 2);
183                                 total -= amt;
184                                 offset += amt;
185                                 sampsent += amt;
186                                 myoff += amt;
187                                 if (offset >= sounds[cursound].datalen)
188                                         offset = 0;
189                         }
190                         /* Set it up for silence */
191                         if (sampsent >= sounds[cursound].samplen) 
192                                 silencelen = sounds[cursound].silencelen;
193                         frame = myframe;
194                 } else {
195                         if (silencelen > 0) {
196                                 frame = silence;
197                                 silencelen -= res;
198                         } else {
199                                 if (sounds[cursound].repeat) {
200                                         /* Start over */
201                                         sampsent = 0;
202                                         offset = 0;
203                                 } else {
204                                         cursound = -1;
205                                         nosound = 0;
206                                 }
207                         }
208                 }
209                 res = write(sounddev, frame, res * 2);
210                 if (res > 0)
211                         return 0;
212                 return res;
213         }
214         return 0;
215 }
216
217 static void *sound_thread(void *unused)
218 {
219         fd_set rfds;
220         fd_set wfds;
221         int max;
222         int res;
223         for(;;) {
224                 FD_ZERO(&rfds);
225                 FD_ZERO(&wfds);
226                 max = sndcmd[0];
227                 FD_SET(sndcmd[0], &rfds);
228                 if (cursound > -1) {
229                         FD_SET(sounddev, &wfds);
230                         if (sounddev > max)
231                                 max = sounddev;
232                 }
233                 res = select(max + 1, &rfds, &wfds, NULL, NULL);
234                 if (res < 1) {
235                         ast_log(LOG_WARNING, "select failed: %s\n", strerror(errno));
236                         continue;
237                 }
238                 if (FD_ISSET(sndcmd[0], &rfds)) {
239                         read(sndcmd[0], &cursound, sizeof(cursound));
240                         silencelen = 0;
241                         offset = 0;
242                         sampsent = 0;
243                 }
244                 if (FD_ISSET(sounddev, &wfds))
245                         if (send_sound())
246                                 ast_log(LOG_WARNING, "Failed to write sound\n");
247         }
248         /* Never reached */
249         return NULL;
250 }
251
252 #if 0
253 static int silence_suppress(short *buf)
254 {
255 #define SILBUF 3
256         int loudness;
257         static int silentframes = 0;
258         static char silbuf[FRAME_SIZE * 2 * SILBUF];
259         static int silbufcnt=0;
260         if (!silencesuppression)
261                 return 0;
262         loudness = calc_loudness((short *)(buf));
263         if (option_debug)
264                 ast_log(LOG_DEBUG, "loudness is %d\n", loudness);
265         if (loudness < silencethreshold) {
266                 silentframes++;
267                 silbufcnt++;
268                 /* Keep track of the last few bits of silence so we can play
269                    them as lead-in when the time is right */
270                 if (silbufcnt >= SILBUF) {
271                         /* Make way for more buffer */
272                         memmove(silbuf, silbuf + FRAME_SIZE * 2, FRAME_SIZE * 2 * (SILBUF - 1));
273                         silbufcnt--;
274                 }
275                 memcpy(silbuf + FRAME_SIZE * 2 * silbufcnt, buf, FRAME_SIZE * 2);
276                 if (silentframes > 10) {
277                         /* We've had plenty of silence, so compress it now */
278                         return 1;
279                 }
280         } else {
281                 silentframes=0;
282                 /* Write any buffered silence we have, it may have something
283                    important */
284                 if (silbufcnt) {
285                         write(sounddev, silbuf, silbufcnt * FRAME_SIZE);
286                         silbufcnt = 0;
287                 }
288         }
289         return 0;
290 }
291 #endif
292
293 static int setformat(void)
294 {
295         int fmt, desired, res, fd = sounddev;
296         static int warnedalready = 0;
297         static int warnedalready2 = 0;
298         fmt = AFMT_S16_LE;
299         res = ioctl(fd, SNDCTL_DSP_SETFMT, &fmt);
300         if (res < 0) {
301                 ast_log(LOG_WARNING, "Unable to set format to 16-bit signed\n");
302                 return -1;
303         }
304         res = ioctl(fd, SNDCTL_DSP_SETDUPLEX, 0);
305         if (res >= 0) {
306                 if (option_verbose > 1) 
307                         ast_verbose(VERBOSE_PREFIX_2 "Console is full duplex\n");
308                 full_duplex = -1;
309         }
310         fmt = 0;
311         res = ioctl(fd, SNDCTL_DSP_STEREO, &fmt);
312         if (res < 0) {
313                 ast_log(LOG_WARNING, "Failed to set audio device to mono\n");
314                 return -1;
315         }
316         /* 8000 Hz desired */
317         desired = 8000;
318         fmt = desired;
319         res = ioctl(fd, SNDCTL_DSP_SPEED, &fmt);
320         if (res < 0) {
321                 ast_log(LOG_WARNING, "Failed to set audio device to mono\n");
322                 return -1;
323         }
324         if (fmt != desired) {
325                 if (!warnedalready++)
326                         ast_log(LOG_WARNING, "Requested %d Hz, got %d Hz -- sound may be choppy\n", desired, fmt);
327         }
328 #if 1
329         fmt = BUFFER_FMT;
330         res = ioctl(fd, SNDCTL_DSP_SETFRAGMENT, &fmt);
331         if (res < 0) {
332                 if (!warnedalready2++)
333                         ast_log(LOG_WARNING, "Unable to set fragment size -- sound may be choppy\n");
334         }
335 #endif
336         return 0;
337 }
338
339 static int soundcard_setoutput(int force)
340 {
341         /* Make sure the soundcard is in output mode.  */
342         int fd = sounddev;
343         if (full_duplex || (!readmode && !force))
344                 return 0;
345         readmode = 0;
346         if (force || time_has_passed()) {
347                 ioctl(sounddev, SNDCTL_DSP_RESET);
348                 /* Keep the same fd reserved by closing the sound device and copying stdin at the same
349                    time. */
350                 /* dup2(0, sound); */ 
351                 close(sounddev);
352                 fd = open(DEV_DSP, O_WRONLY |O_NONBLOCK);
353                 if (fd < 0) {
354                         ast_log(LOG_WARNING, "Unable to re-open DSP device: %s\n", strerror(errno));
355                         return -1;
356                 }
357                 /* dup2 will close the original and make fd be sound */
358                 if (dup2(fd, sounddev) < 0) {
359                         ast_log(LOG_WARNING, "dup2() failed: %s\n", strerror(errno));
360                         return -1;
361                 }
362                 if (setformat()) {
363                         return -1;
364                 }
365                 return 0;
366         }
367         return 1;
368 }
369
370 static int soundcard_setinput(int force)
371 {
372         int fd = sounddev;
373         if (full_duplex || (readmode && !force))
374                 return 0;
375         readmode = -1;
376         if (force || time_has_passed()) {
377                 ioctl(sounddev, SNDCTL_DSP_RESET);
378                 close(sounddev);
379                 /* dup2(0, sound); */
380                 fd = open(DEV_DSP, O_RDONLY | O_NONBLOCK);
381                 if (fd < 0) {
382                         ast_log(LOG_WARNING, "Unable to re-open DSP device: %s\n", strerror(errno));
383                         return -1;
384                 }
385                 /* dup2 will close the original and make fd be sound */
386                 if (dup2(fd, sounddev) < 0) {
387                         ast_log(LOG_WARNING, "dup2() failed: %s\n", strerror(errno));
388                         return -1;
389                 }
390                 if (setformat()) {
391                         return -1;
392                 }
393                 return 0;
394         }
395         return 1;
396 }
397
398 static int soundcard_init()
399 {
400         /* Assume it's full duplex for starters */
401         int fd = open(DEV_DSP,  O_RDWR | O_NONBLOCK);
402         if (fd < 0) {
403                 ast_log(LOG_WARNING, "Unable to open %s: %s\n", DEV_DSP, strerror(errno));
404                 return fd;
405         }
406         gettimeofday(&lasttime, NULL);
407         sounddev = fd;
408         setformat();
409         if (!full_duplex) 
410                 soundcard_setinput(1);
411         return sounddev;
412 }
413
414 static int oss_digit(struct ast_channel *c, char digit)
415 {
416         ast_verbose( " << Console Received digit %c >> \n", digit);
417         return 0;
418 }
419
420 static int oss_text(struct ast_channel *c, char *text)
421 {
422         ast_verbose( " << Console Received text %s >> \n", text);
423         return 0;
424 }
425
426 static int oss_call(struct ast_channel *c, char *dest, int timeout)
427 {
428         int res = 3;
429         struct ast_frame f = { 0, };
430         ast_verbose( " << Call placed to '%s' on console >> \n", dest);
431         if (autoanswer) {
432                 ast_verbose( " << Auto-answered >> \n" );
433                 f.frametype = AST_FRAME_CONTROL;
434                 f.subclass = AST_CONTROL_ANSWER;
435                 ast_queue_frame(c, &f, 0);
436         } else {
437                 ast_verbose( " << Type 'answer' to answer, or use 'autoanswer' for future calls >> \n");
438                 f.frametype = AST_FRAME_CONTROL;
439                 f.subclass = AST_CONTROL_RINGING;
440                 ast_queue_frame(c, &f, 0);
441                 write(sndcmd[1], &res, sizeof(res));
442         }
443         return 0;
444 }
445
446 static void answer_sound(void)
447 {
448         int res;
449         nosound = 1;
450         res = 4;
451         write(sndcmd[1], &res, sizeof(res));
452         
453 }
454
455 static int oss_answer(struct ast_channel *c)
456 {
457         ast_verbose( " << Console call has been answered >> \n");
458         answer_sound();
459         c->state = AST_STATE_UP;
460         cursound = -1;
461         return 0;
462 }
463
464 static int oss_hangup(struct ast_channel *c)
465 {
466         int res = 0;
467         cursound = -1;
468         c->pvt->pvt = NULL;
469         oss.owner = NULL;
470         ast_verbose( " << Hangup on console >> \n");
471         ast_pthread_mutex_lock(&usecnt_lock);
472         usecnt--;
473         ast_pthread_mutex_unlock(&usecnt_lock);
474         if (hookstate) {
475                 if (autoanswer) {
476                         /* Assume auto-hangup too */
477                         hookstate = 0;
478                 } else {
479                         /* Make congestion noise */
480                         res = 2;
481                         write(sndcmd[1], &res, sizeof(res));
482                 }
483         }
484         return 0;
485 }
486
487 static int soundcard_writeframe(short *data)
488 {       
489         /* Write an exactly FRAME_SIZE sized of frame */
490         static int bufcnt = 0;
491         static short buffer[FRAME_SIZE * MAX_BUFFER_SIZE * 5];
492         struct audio_buf_info info;
493         int res;
494         int fd = sounddev;
495         static int warned=0;
496         if (ioctl(fd, SNDCTL_DSP_GETOSPACE, &info)) {
497                 if (!warned)
498                         ast_log(LOG_WARNING, "Error reading output space\n");
499                 bufcnt = buffersize;
500                 warned++;
501         }
502         if ((info.fragments >= buffersize * 5) && (bufcnt == buffersize)) {
503                 /* We've run out of stuff, buffer again */
504                 bufcnt = 0;
505         }
506         if (bufcnt == buffersize) {
507                 /* Write sample immediately */
508                 res = write(fd, ((void *)data), FRAME_SIZE * 2);
509         } else {
510                 /* Copy the data into our buffer */
511                 res = FRAME_SIZE * 2;
512                 memcpy(buffer + (bufcnt * FRAME_SIZE), data, FRAME_SIZE * 2);
513                 bufcnt++;
514                 if (bufcnt == buffersize) {
515                         res = write(fd, ((void *)buffer), FRAME_SIZE * 2 * buffersize);
516                 }
517         }
518         return res;
519 }
520
521
522 static int oss_write(struct ast_channel *chan, struct ast_frame *f)
523 {
524         int res;
525         static char sizbuf[8000];
526         static int sizpos = 0;
527         int len = sizpos;
528         int pos;
529         /* Immediately return if no sound is enabled */
530         if (nosound)
531                 return 0;
532         /* Stop any currently playing sound */
533         cursound = -1;
534         if (!full_duplex) {
535                 /* If we're half duplex, we have to switch to read mode
536                    to honor immediate needs if necessary */
537                 res = soundcard_setinput(1);
538                 if (res < 0) {
539                         ast_log(LOG_WARNING, "Unable to set device to input mode\n");
540                         return -1;
541                 }
542                 return 0;
543         }
544         res = soundcard_setoutput(0);
545         if (res < 0) {
546                 ast_log(LOG_WARNING, "Unable to set output device\n");
547                 return -1;
548         } else if (res > 0) {
549                 /* The device is still in read mode, and it's too soon to change it,
550                    so just pretend we wrote it */
551                 return 0;
552         }
553         /* We have to digest the frame in 160-byte portions */
554         if (f->datalen > sizeof(sizbuf) - sizpos) {
555                 ast_log(LOG_WARNING, "Frame too large\n");
556                 return -1;
557         }
558         memcpy(sizbuf + sizpos, f->data, f->datalen);
559         len += f->datalen;
560         pos = 0;
561         while(len - pos > FRAME_SIZE * 2) {
562                 soundcard_writeframe((short *)(sizbuf + pos));
563                 pos += FRAME_SIZE * 2;
564         }
565         if (len - pos) 
566                 memmove(sizbuf, sizbuf + pos, len - pos);
567         sizpos = len - pos;
568         return 0;
569 }
570
571 static struct ast_frame *oss_read(struct ast_channel *chan)
572 {
573         static struct ast_frame f;
574         static char buf[FRAME_SIZE * 2 + AST_FRIENDLY_OFFSET];
575         static int readpos = 0;
576         int res;
577         
578 #if 0
579         ast_log(LOG_DEBUG, "oss_read()\n");
580 #endif
581                 
582         f.frametype = AST_FRAME_NULL;
583         f.subclass = 0;
584         f.timelen = 0;
585         f.datalen = 0;
586         f.data = NULL;
587         f.offset = 0;
588         f.src = type;
589         f.mallocd = 0;
590         
591         res = soundcard_setinput(0);
592         if (res < 0) {
593                 ast_log(LOG_WARNING, "Unable to set input mode\n");
594                 return NULL;
595         }
596         if (res > 0) {
597                 /* Theoretically shouldn't happen, but anyway, return a NULL frame */
598                 return &f;
599         }
600         res = read(sounddev, buf + AST_FRIENDLY_OFFSET + readpos, FRAME_SIZE * 2 - readpos);
601         if (res < 0) {
602                 ast_log(LOG_WARNING, "Error reading from sound device (If you're running 'artsd' then kill it): %s\n", strerror(errno));
603 #if 0
604                 CRASH;
605 #endif          
606                 return NULL;
607         }
608         readpos += res;
609         
610         if (readpos >= FRAME_SIZE * 2) {
611                 /* A real frame */
612                 readpos = 0;
613                 if (chan->state != AST_STATE_UP) {
614                         /* Don't transmit unless it's up */
615                         return &f;
616                 }
617                 f.frametype = AST_FRAME_VOICE;
618                 f.subclass = AST_FORMAT_SLINEAR;
619                 f.timelen = FRAME_SIZE / 8;
620                 f.datalen = FRAME_SIZE * 2;
621                 f.data = buf + AST_FRIENDLY_OFFSET;
622                 f.offset = AST_FRIENDLY_OFFSET;
623                 f.src = type;
624                 f.mallocd = 0;
625 #if 0
626                 { static int fd = -1;
627                   if (fd < 0)
628                         fd = open("output.raw", O_RDWR | O_TRUNC | O_CREAT);
629                   write(fd, f.data, f.datalen);
630                 }
631 #endif          
632         }
633         return &f;
634 }
635
636 static int oss_fixup(struct ast_channel *oldchan, struct ast_channel *newchan)
637 {
638         struct chan_oss_pvt *p = newchan->pvt->pvt;
639         p->owner = newchan;
640         return 0;
641 }
642
643 static int oss_indicate(struct ast_channel *chan, int cond)
644 {
645         int res;
646         switch(cond) {
647         case AST_CONTROL_BUSY:
648                 res = 1;
649                 break;
650         case AST_CONTROL_CONGESTION:
651                 res = 2;
652                 break;
653         case AST_CONTROL_RINGING:
654                 res = 0;
655                 break;
656         default:
657                 ast_log(LOG_WARNING, "Don't know how to display condition %d on %s\n", cond, chan->name);
658                 return -1;
659         }
660         if (res > -1) {
661                 write(sndcmd[1], &res, sizeof(res));
662         }
663         return 0;       
664 }
665
666 static struct ast_channel *oss_new(struct chan_oss_pvt *p, int state)
667 {
668         struct ast_channel *tmp;
669         tmp = ast_channel_alloc(1);
670         if (tmp) {
671                 snprintf(tmp->name, sizeof(tmp->name), "OSS/%s", DEV_DSP + 5);
672                 tmp->type = type;
673                 tmp->fds[0] = sounddev;
674                 tmp->nativeformats = AST_FORMAT_SLINEAR;
675                 tmp->pvt->pvt = p;
676                 tmp->pvt->send_digit = oss_digit;
677                 tmp->pvt->send_text = oss_text;
678                 tmp->pvt->hangup = oss_hangup;
679                 tmp->pvt->answer = oss_answer;
680                 tmp->pvt->read = oss_read;
681                 tmp->pvt->call = oss_call;
682                 tmp->pvt->write = oss_write;
683                 tmp->pvt->indicate = oss_indicate;
684                 tmp->pvt->fixup = oss_fixup;
685                 if (strlen(p->context))
686                         strncpy(tmp->context, p->context, sizeof(tmp->context)-1);
687                 if (strlen(p->exten))
688                         strncpy(tmp->exten, p->exten, sizeof(tmp->exten)-1);
689                 if (strlen(language))
690                         strncpy(tmp->language, language, sizeof(tmp->language)-1);
691                 p->owner = tmp;
692                 tmp->state = state;
693                 ast_pthread_mutex_lock(&usecnt_lock);
694                 usecnt++;
695                 ast_pthread_mutex_unlock(&usecnt_lock);
696                 ast_update_use_count();
697                 if (state != AST_STATE_DOWN) {
698                         if (ast_pbx_start(tmp)) {
699                                 ast_log(LOG_WARNING, "Unable to start PBX on %s\n", tmp->name);
700                                 ast_hangup(tmp);
701                                 tmp = NULL;
702                         }
703                 }
704         }
705         return tmp;
706 }
707
708 static struct ast_channel *oss_request(char *type, int format, void *data)
709 {
710         int oldformat = format;
711         struct ast_channel *tmp;
712         format &= AST_FORMAT_SLINEAR;
713         if (!format) {
714                 ast_log(LOG_NOTICE, "Asked to get a channel of format '%d'\n", oldformat);
715                 return NULL;
716         }
717         if (oss.owner) {
718                 ast_log(LOG_NOTICE, "Already have a call on the OSS channel\n");
719                 return NULL;
720         }
721         tmp= oss_new(&oss, AST_STATE_DOWN);
722         if (!tmp) {
723                 ast_log(LOG_WARNING, "Unable to create new OSS channel\n");
724         }
725         return tmp;
726 }
727
728 static int console_autoanswer(int fd, int argc, char *argv[])
729 {
730         if ((argc != 1) && (argc != 2))
731                 return RESULT_SHOWUSAGE;
732         if (argc == 1) {
733                 ast_cli(fd, "Auto answer is %s.\n", autoanswer ? "on" : "off");
734                 return RESULT_SUCCESS;
735         } else {
736                 if (!strcasecmp(argv[1], "on"))
737                         autoanswer = -1;
738                 else if (!strcasecmp(argv[1], "off"))
739                         autoanswer = 0;
740                 else
741                         return RESULT_SHOWUSAGE;
742         }
743         return RESULT_SUCCESS;
744 }
745
746 static char *autoanswer_complete(char *line, char *word, int pos, int state)
747 {
748 #ifndef MIN
749 #define MIN(a,b) ((a) < (b) ? (a) : (b))
750 #endif
751         switch(state) {
752         case 0:
753                 if (strlen(word) && !strncasecmp(word, "on", MIN(strlen(word), 2)))
754                         return strdup("on");
755         case 1:
756                 if (strlen(word) && !strncasecmp(word, "off", MIN(strlen(word), 3)))
757                         return strdup("off");
758         default:
759                 return NULL;
760         }
761         return NULL;
762 }
763
764 static char autoanswer_usage[] =
765 "Usage: autoanswer [on|off]\n"
766 "       Enables or disables autoanswer feature.  If used without\n"
767 "       argument, displays the current on/off status of autoanswer.\n"
768 "       The default value of autoanswer is in 'oss.conf'.\n";
769
770 static int console_answer(int fd, int argc, char *argv[])
771 {
772         struct ast_frame f = { AST_FRAME_CONTROL, AST_CONTROL_ANSWER };
773         if (argc != 1)
774                 return RESULT_SHOWUSAGE;
775         if (!oss.owner) {
776                 ast_cli(fd, "No one is calling us\n");
777                 return RESULT_FAILURE;
778         }
779         hookstate = 1;
780         cursound = -1;
781         ast_queue_frame(oss.owner, &f, 1);
782         answer_sound();
783         return RESULT_SUCCESS;
784 }
785
786 static char sendtext_usage[] =
787 "Usage: send text <message>\n"
788 "       Sends a text message for display on the remote terminal.\n";
789
790 static int console_sendtext(int fd, int argc, char *argv[])
791 {
792         int tmparg = 1;
793         char text2send[256];
794         struct ast_frame f = { 0, };
795         if (argc < 1)
796                 return RESULT_SHOWUSAGE;
797         if (!oss.owner) {
798                 ast_cli(fd, "No one is calling us\n");
799                 return RESULT_FAILURE;
800         }
801         if (strlen(text2send))
802                 ast_cli(fd, "Warning: message already waiting to be sent, overwriting\n");
803         strcpy(text2send, "");
804         while(tmparg <= argc) {
805                 strncat(text2send, argv[tmparg++], sizeof(text2send) - strlen(text2send));
806                 strncat(text2send, " ", sizeof(text2send) - strlen(text2send));
807         }
808         if (strlen(text2send)) {
809                 f.frametype = AST_FRAME_TEXT;
810                 f.subclass = 0;
811                 f.data = text2send;
812                 f.datalen = strlen(text2send);
813                 ast_queue_frame(oss.owner, &f, 1);
814         }
815         return RESULT_SUCCESS;
816 }
817
818 static char answer_usage[] =
819 "Usage: answer\n"
820 "       Answers an incoming call on the console (OSS) channel.\n";
821
822 static int console_hangup(int fd, int argc, char *argv[])
823 {
824         if (argc != 1)
825                 return RESULT_SHOWUSAGE;
826         cursound = -1;
827         if (!oss.owner && !hookstate) {
828                 ast_cli(fd, "No call to hangup up\n");
829                 return RESULT_FAILURE;
830         }
831         hookstate = 0;
832         if (oss.owner) {
833                 ast_queue_hangup(oss.owner, 1);
834         }
835         return RESULT_SUCCESS;
836 }
837
838 static char hangup_usage[] =
839 "Usage: hangup\n"
840 "       Hangs up any call currently placed on the console.\n";
841
842
843 static int console_dial(int fd, int argc, char *argv[])
844 {
845         char tmp[256], *tmp2;
846         char *mye, *myc;
847         int x;
848         struct ast_frame f = { AST_FRAME_DTMF, 0 };
849         if ((argc != 1) && (argc != 2))
850                 return RESULT_SHOWUSAGE;
851         if (oss.owner) {
852                 if (argc == 2) {
853                         for (x=0;x<strlen(argv[1]);x++) {
854                                 f.subclass = argv[1][x];
855                                 ast_queue_frame(oss.owner, &f, 1);
856                         }
857                 } else {
858                         ast_cli(fd, "You're already in a call.  You can use this only to dial digits until you hangup\n");
859                         return RESULT_FAILURE;
860                 }
861                 return RESULT_SUCCESS;
862         }
863         mye = exten;
864         myc = context;
865         if (argc == 2) {
866                 strncpy(tmp, argv[1], sizeof(tmp)-1);
867                 strtok(tmp, "@");
868                 tmp2 = strtok(NULL, "@");
869                 if (strlen(tmp))
870                         mye = tmp;
871                 if (tmp2 && strlen(tmp2))
872                         myc = tmp2;
873         }
874         if (ast_exists_extension(NULL, myc, mye, 1, NULL)) {
875                 strncpy(oss.exten, mye, sizeof(oss.exten)-1);
876                 strncpy(oss.context, myc, sizeof(oss.context)-1);
877                 hookstate = 1;
878                 oss_new(&oss, AST_STATE_UP);
879         } else
880                 ast_cli(fd, "No such extension '%s' in context '%s'\n", mye, myc);
881         return RESULT_SUCCESS;
882 }
883
884 static char dial_usage[] =
885 "Usage: dial [extension[@context]]\n"
886 "       Dials a given extensison (";
887
888
889 static struct ast_cli_entry myclis[] = {
890         { { "answer", NULL }, console_answer, "Answer an incoming console call", answer_usage },
891         { { "hangup", NULL }, console_hangup, "Hangup a call on the console", hangup_usage },
892         { { "dial", NULL }, console_dial, "Dial an extension on the console", dial_usage },
893         { { "send text", NULL }, console_sendtext, "Send text to the remote device", sendtext_usage },
894         { { "autoanswer", NULL }, console_autoanswer, "Sets/displays autoanswer", autoanswer_usage, autoanswer_complete }
895 };
896
897 int load_module()
898 {
899         int res;
900         int x;
901         struct ast_config *cfg = ast_load(config);
902         struct ast_variable *v;
903         res = pipe(sndcmd);
904         if (res) {
905                 ast_log(LOG_ERROR, "Unable to create pipe\n");
906                 return -1;
907         }
908         res = soundcard_init();
909         if (res < 0) {
910                 if (option_verbose > 1) {
911                         ast_verbose(VERBOSE_PREFIX_2 "No sound card detected -- console channel will be unavailable\n");
912                         ast_verbose(VERBOSE_PREFIX_2 "Turn off OSS support by adding 'noload=chan_oss.so' in /etc/asterisk/modules.conf\n");
913                 }
914                 return 0;
915         }
916         if (!full_duplex)
917                 ast_log(LOG_WARNING, "XXX I don't work right with non-full duplex sound cards XXX\n");
918         res = ast_channel_register(type, tdesc, AST_FORMAT_SLINEAR, oss_request);
919         if (res < 0) {
920                 ast_log(LOG_ERROR, "Unable to register channel class '%s'\n", type);
921                 return -1;
922         }
923         for (x=0;x<sizeof(myclis)/sizeof(struct ast_cli_entry); x++)
924                 ast_cli_register(myclis + x);
925         if (cfg) {
926                 v = ast_variable_browse(cfg, "general");
927                 while(v) {
928                         if (!strcasecmp(v->name, "autoanswer"))
929                                 autoanswer = ast_true(v->value);
930                         else if (!strcasecmp(v->name, "silencesuppression"))
931                                 silencesuppression = ast_true(v->value);
932                         else if (!strcasecmp(v->name, "silencethreshold"))
933                                 silencethreshold = atoi(v->value);
934                         else if (!strcasecmp(v->name, "context"))
935                                 strncpy(context, v->value, sizeof(context)-1);
936                         else if (!strcasecmp(v->name, "language"))
937                                 strncpy(language, v->value, sizeof(language)-1);
938                         else if (!strcasecmp(v->name, "extension"))
939                                 strncpy(exten, v->value, sizeof(exten)-1);
940                         v=v->next;
941                 }
942                 ast_destroy(cfg);
943         }
944         pthread_create(&sthread, NULL, sound_thread, NULL);
945         return 0;
946 }
947
948
949
950 int unload_module()
951 {
952         int x;
953         for (x=0;x<sizeof(myclis)/sizeof(struct ast_cli_entry); x++)
954                 ast_cli_unregister(myclis + x);
955         close(sounddev);
956         if (sndcmd[0] > 0) {
957                 close(sndcmd[0]);
958                 close(sndcmd[1]);
959         }
960         if (oss.owner)
961                 ast_softhangup(oss.owner);
962         if (oss.owner)
963                 return -1;
964         return 0;
965 }
966
967 char *description()
968 {
969         return desc;
970 }
971
972 int usecount()
973 {
974         int res;
975         ast_pthread_mutex_lock(&usecnt_lock);
976         res = usecnt;
977         ast_pthread_mutex_unlock(&usecnt_lock);
978         return res;
979 }
980
981 char *key()
982 {
983         return ASTERISK_GPL_KEY;
984 }