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                 if (frame)
 210                         res = write(sounddev, frame, res * 2);
 211                 if (res > 0)
 212                         return 0;
 213                 return res;
 214         }
 215         return 0;
 216 }
 217
 218 static void *sound_thread(void *unused)
 219 {
 220         fd_set rfds;
 221         fd_set wfds;
 222         int max;
 223         int res;
 224         for(;;) {
 225                 FD_ZERO(&rfds);
 226                 FD_ZERO(&wfds);
 227                 max = sndcmd[0];
 228                 FD_SET(sndcmd[0], &rfds);
 229                 if (cursound > -1) {
 230                         FD_SET(sounddev, &wfds);
 231                         if (sounddev > max)
 232                                 max = sounddev;
 233                 }
 234                 res = select(max + 1, &rfds, &wfds, NULL, NULL);
 235                 if (res < 1) {
 236                         ast_log(LOG_WARNING, "select failed: %s\n", strerror(errno));
 237                         continue;
 238                 }
 239                 if (FD_ISSET(sndcmd[0], &rfds)) {
 240                         read(sndcmd[0], &cursound, sizeof(cursound));
 241                         silencelen = 0;
 242                         offset = 0;
 243                         sampsent = 0;
 244                 }
 245                 if (FD_ISSET(sounddev, &wfds))
 246                         if (send_sound())
 247                                 ast_log(LOG_WARNING, "Failed to write sound\n");
 248         }
 249         /* Never reached */
 250         return NULL;
 251 }
 252
 253 #if 0
 254 static int silence_suppress(short *buf)
 255 {
 256 #define SILBUF 3
 257         int loudness;
 258         static int silentframes = 0;
 259         static char silbuf[FRAME_SIZE * 2 * SILBUF];
 260         static int silbufcnt=0;
 261         if (!silencesuppression)
 262                 return 0;
 263         loudness = calc_loudness((short *)(buf));
 264         if (option_debug)
 265                 ast_log(LOG_DEBUG, "loudness is %d\n", loudness);
 266         if (loudness < silencethreshold) {
 267                 silentframes++;
 268                 silbufcnt++;
 269                 /* Keep track of the last few bits of silence so we can play
 270                    them as lead-in when the time is right */
 271                 if (silbufcnt >= SILBUF) {
 272                         /* Make way for more buffer */
 273                         memmove(silbuf, silbuf + FRAME_SIZE * 2, FRAME_SIZE * 2 * (SILBUF - 1));
 274                         silbufcnt--;
 275                 }
 276                 memcpy(silbuf + FRAME_SIZE * 2 * silbufcnt, buf, FRAME_SIZE * 2);
 277                 if (silentframes > 10) {
 278                         /* We've had plenty of silence, so compress it now */
 279                         return 1;
 280                 }
 281         } else {
 282                 silentframes=0;
 283                 /* Write any buffered silence we have, it may have something
 284                    important */
 285                 if (silbufcnt) {
 286                         write(sounddev, silbuf, silbufcnt * FRAME_SIZE);
 287                         silbufcnt = 0;
 288                 }
 289         }
 290         return 0;
 291 }
 292 #endif
 293
 294 static int setformat(void)
 295 {
 296         int fmt, desired, res, fd = sounddev;
 297         static int warnedalready = 0;
 298         static int warnedalready2 = 0;
 299         fmt = AFMT_S16_LE;
 300         res = ioctl(fd, SNDCTL_DSP_SETFMT, &fmt);
 301         if (res < 0) {
 302                 ast_log(LOG_WARNING, "Unable to set format to 16-bit signed\n");
 303                 return -1;
 304         }
 305         res = ioctl(fd, SNDCTL_DSP_SETDUPLEX, 0);
 306         if (res >= 0) {
 307                 if (option_verbose > 1)
 308                         ast_verbose(VERBOSE_PREFIX_2 "Console is full duplex\n");
 309                 full_duplex = -1;
 310         }
 311         fmt = 0;
 312         res = ioctl(fd, SNDCTL_DSP_STEREO, &fmt);
 313         if (res < 0) {
 314                 ast_log(LOG_WARNING, "Failed to set audio device to mono\n");
 315                 return -1;
 316         }
 317         /* 8000 Hz desired */
 318         desired = 8000;
 319         fmt = desired;
 320         res = ioctl(fd, SNDCTL_DSP_SPEED, &fmt);
 321         if (res < 0) {
 322                 ast_log(LOG_WARNING, "Failed to set audio device to mono\n");
 323                 return -1;
 324         }
 325         if (fmt != desired) {
 326                 if (!warnedalready++)
 327                         ast_log(LOG_WARNING, "Requested %d Hz, got %d Hz -- sound may be choppy\n", desired, fmt);
 328         }
 329 #if 1
 330         fmt = BUFFER_FMT;
 331         res = ioctl(fd, SNDCTL_DSP_SETFRAGMENT, &fmt);
 332         if (res < 0) {
 333                 if (!warnedalready2++)
 334                         ast_log(LOG_WARNING, "Unable to set fragment size -- sound may be choppy\n");
 335         }
 336 #endif
 337         return 0;
 338 }
 339
 340 static int soundcard_setoutput(int force)
 341 {
 342         /* Make sure the soundcard is in output mode.  */
 343         int fd = sounddev;
 344         if (full_duplex || (!readmode && !force))
 345                 return 0;
 346         readmode = 0;
 347         if (force || time_has_passed()) {
 348                 ioctl(sounddev, SNDCTL_DSP_RESET);
 349                 /* Keep the same fd reserved by closing the sound device and copying stdin at the same
 350                    time. */
 351                 /* dup2(0, sound); */
 352                 close(sounddev);
 353                 fd = open(DEV_DSP, O_WRONLY |O_NONBLOCK);
 354                 if (fd < 0) {
 355                         ast_log(LOG_WARNING, "Unable to re-open DSP device: %s\n", strerror(errno));
 356                         return -1;
 357                 }
 358                 /* dup2 will close the original and make fd be sound */
 359                 if (dup2(fd, sounddev) < 0) {
 360                         ast_log(LOG_WARNING, "dup2() failed: %s\n", strerror(errno));
 361                         return -1;
 362                 }
 363                 if (setformat()) {
 364                         return -1;
 365                 }
 366                 return 0;
 367         }
 368         return 1;
 369 }
 370
 371 static int soundcard_setinput(int force)
 372 {
 373         int fd = sounddev;
 374         if (full_duplex || (readmode && !force))
 375                 return 0;
 376         readmode = -1;
 377         if (force || time_has_passed()) {
 378                 ioctl(sounddev, SNDCTL_DSP_RESET);
 379                 close(sounddev);
 380                 /* dup2(0, sound); */
 381                 fd = open(DEV_DSP, O_RDONLY | O_NONBLOCK);
 382                 if (fd < 0) {
 383                         ast_log(LOG_WARNING, "Unable to re-open DSP device: %s\n", strerror(errno));
 384                         return -1;
 385                 }
 386                 /* dup2 will close the original and make fd be sound */
 387                 if (dup2(fd, sounddev) < 0) {
 388                         ast_log(LOG_WARNING, "dup2() failed: %s\n", strerror(errno));
 389                         return -1;
 390                 }
 391                 if (setformat()) {
 392                         return -1;
 393                 }
 394                 return 0;
 395         }
 396         return 1;
 397 }
 398
 399 static int soundcard_init()
 400 {
 401         /* Assume it's full duplex for starters */
 402         int fd = open(DEV_DSP,  O_RDWR | O_NONBLOCK);
 403         if (fd < 0) {
 404                 ast_log(LOG_WARNING, "Unable to open %s: %s\n", DEV_DSP, strerror(errno));
 405                 return fd;
 406         }
 407         gettimeofday(&lasttime, NULL);
 408         sounddev = fd;
 409         setformat();
 410         if (!full_duplex)
 411                 soundcard_setinput(1);
 412         return sounddev;
 413 }
 414
 415 static int oss_digit(struct ast_channel *c, char digit)
 416 {
 417         ast_verbose( " << Console Received digit %c >> \n", digit);
 418         return 0;
 419 }
 420
 421 static int oss_text(struct ast_channel *c, char *text)
 422 {
 423         ast_verbose( " << Console Received text %s >> \n", text);
 424         return 0;
 425 }
 426
 427 static int oss_call(struct ast_channel *c, char *dest, int timeout)
 428 {
 429         int res = 3;
 430         struct ast_frame f = { 0, };
 431         ast_verbose( " << Call placed to '%s' on console >> \n", dest);
 432         if (autoanswer) {
 433                 ast_verbose( " << Auto-answered >> \n" );
 434                 f.frametype = AST_FRAME_CONTROL;
 435                 f.subclass = AST_CONTROL_ANSWER;
 436                 ast_queue_frame(c, &f, 0);
 437         } else {
 438                 nosound = 1;
 439                 ast_verbose( " << Type 'answer' to answer, or use 'autoanswer' for future calls >> \n");
 440                 f.frametype = AST_FRAME_CONTROL;
 441                 f.subclass = AST_CONTROL_RINGING;
 442                 ast_queue_frame(c, &f, 0);
 443                 write(sndcmd[1], &res, sizeof(res));
 444         }
 445         return 0;
 446 }
 447
 448 static void answer_sound(void)
 449 {
 450         int res;
 451         nosound = 1;
 452         res = 4;
 453         write(sndcmd[1], &res, sizeof(res));
 454
 455 }
 456
 457 static int oss_answer(struct ast_channel *c)
 458 {
 459         ast_verbose( " << Console call has been answered >> \n");
 460         answer_sound();
 461         ast_setstate(c, AST_STATE_UP);
 462         cursound = -1;
 463         return 0;
 464 }
 465
 466 static int oss_hangup(struct ast_channel *c)
 467 {
 468         int res = 0;
 469         cursound = -1;
 470         c->pvt->pvt = NULL;
 471         oss.owner = NULL;
 472         ast_verbose( " << Hangup on console >> \n");
 473         ast_pthread_mutex_lock(&usecnt_lock);
 474         usecnt--;
 475         ast_pthread_mutex_unlock(&usecnt_lock);
 476         if (hookstate) {
 477                 if (autoanswer) {
 478                         /* Assume auto-hangup too */
 479                         hookstate = 0;
 480                 } else {
 481                         /* Make congestion noise */
 482                         res = 2;
 483                         write(sndcmd[1], &res, sizeof(res));
 484                 }
 485         }
 486         return 0;
 487 }
 488
 489 static int soundcard_writeframe(short *data)
 490 {
 491         /* Write an exactly FRAME_SIZE sized of frame */
 492         static int bufcnt = 0;
 493         static short buffer[FRAME_SIZE * MAX_BUFFER_SIZE * 5];
 494         struct audio_buf_info info;
 495         int res;
 496         int fd = sounddev;
 497         static int warned=0;
 498         if (ioctl(fd, SNDCTL_DSP_GETOSPACE, &info)) {
 499                 if (!warned)
 500                         ast_log(LOG_WARNING, "Error reading output space\n");
 501                 bufcnt = buffersize;
 502                 warned++;
 503         }
 504         if ((info.fragments >= buffersize * 5) && (bufcnt == buffersize)) {
 505                 /* We've run out of stuff, buffer again */
 506                 bufcnt = 0;
 507         }
 508         if (bufcnt == buffersize) {
 509                 /* Write sample immediately */
 510                 res = write(fd, ((void *)data), FRAME_SIZE * 2);
 511         } else {
 512                 /* Copy the data into our buffer */
 513                 res = FRAME_SIZE * 2;
 514                 memcpy(buffer + (bufcnt * FRAME_SIZE), data, FRAME_SIZE * 2);
 515                 bufcnt++;
 516                 if (bufcnt == buffersize) {
 517                         res = write(fd, ((void *)buffer), FRAME_SIZE * 2 * buffersize);
 518                 }
 519         }
 520         return res;
 521 }
 522
 523
 524 static int oss_write(struct ast_channel *chan, struct ast_frame *f)
 525 {
 526         int res;
 527         static char sizbuf[8000];
 528         static int sizpos = 0;
 529         int len = sizpos;
 530         int pos;
 531         /* Immediately return if no sound is enabled */
 532         if (nosound)
 533                 return 0;
 534         /* Stop any currently playing sound */
 535         cursound = -1;
 536         if (!full_duplex) {
 537                 /* If we're half duplex, we have to switch to read mode
 538                    to honor immediate needs if necessary */
 539                 res = soundcard_setinput(1);
 540                 if (res < 0) {
 541                         ast_log(LOG_WARNING, "Unable to set device to input mode\n");
 542                         return -1;
 543                 }
 544                 return 0;
 545         }
 546         res = soundcard_setoutput(0);
 547         if (res < 0) {
 548                 ast_log(LOG_WARNING, "Unable to set output device\n");
 549                 return -1;
 550         } else if (res > 0) {
 551                 /* The device is still in read mode, and it's too soon to change it,
 552                    so just pretend we wrote it */
 553                 return 0;
 554         }
 555         /* We have to digest the frame in 160-byte portions */
 556         if (f->datalen > sizeof(sizbuf) - sizpos) {
 557                 ast_log(LOG_WARNING, "Frame too large\n");
 558                 return -1;
 559         }
 560         memcpy(sizbuf + sizpos, f->data, f->datalen);
 561         len += f->datalen;
 562         pos = 0;
 563         while(len - pos > FRAME_SIZE * 2) {
 564                 soundcard_writeframe((short *)(sizbuf + pos));
 565                 pos += FRAME_SIZE * 2;
 566         }
 567         if (len - pos)
 568                 memmove(sizbuf, sizbuf + pos, len - pos);
 569         sizpos = len - pos;
 570         return 0;
 571 }
 572
 573 static struct ast_frame *oss_read(struct ast_channel *chan)
 574 {
 575         static struct ast_frame f;
 576         static char buf[FRAME_SIZE * 2 + AST_FRIENDLY_OFFSET];
 577         static int readpos = 0;
 578         int res;
 579
 580 #if 0
 581         ast_log(LOG_DEBUG, "oss_read()\n");
 582 #endif
 583
 584         f.frametype = AST_FRAME_NULL;
 585         f.subclass = 0;
 586         f.timelen = 0;
 587         f.datalen = 0;
 588         f.data = NULL;
 589         f.offset = 0;
 590         f.src = type;
 591         f.mallocd = 0;
 592
 593         res = soundcard_setinput(0);
 594         if (res < 0) {
 595                 ast_log(LOG_WARNING, "Unable to set input mode\n");
 596                 return NULL;
 597         }
 598         if (res > 0) {
 599                 /* Theoretically shouldn't happen, but anyway, return a NULL frame */
 600                 return &f;
 601         }
 602         res = read(sounddev, buf + AST_FRIENDLY_OFFSET + readpos, FRAME_SIZE * 2 - readpos);
 603         if (res < 0) {
 604                 ast_log(LOG_WARNING, "Error reading from sound device (If you're running 'artsd' then kill it): %s\n", strerror(errno));
 605 #if 0
 606                 CRASH;
 607 #endif
 608                 return NULL;
 609         }
 610         readpos += res;
 611
 612         if (readpos >= FRAME_SIZE * 2) {
 613                 /* A real frame */
 614                 readpos = 0;
 615                 if (chan->_state != AST_STATE_UP) {
 616                         /* Don't transmit unless it's up */
 617                         return &f;
 618                 }
 619                 f.frametype = AST_FRAME_VOICE;
 620                 f.subclass = AST_FORMAT_SLINEAR;
 621                 f.timelen = FRAME_SIZE / 8;
 622                 f.datalen = FRAME_SIZE * 2;
 623                 f.data = buf + AST_FRIENDLY_OFFSET;
 624                 f.offset = AST_FRIENDLY_OFFSET;
 625                 f.src = type;
 626                 f.mallocd = 0;
 627 #if 0
 628                 { static int fd = -1;
 629                   if (fd < 0)
 630                         fd = open("output.raw", O_RDWR | O_TRUNC | O_CREAT);
 631                   write(fd, f.data, f.datalen);
 632                 }
 633 #endif
 634         }
 635         return &f;
 636 }
 637
 638 static int oss_fixup(struct ast_channel *oldchan, struct ast_channel *newchan)
 639 {
 640         struct chan_oss_pvt *p = newchan->pvt->pvt;
 641         p->owner = newchan;
 642         return 0;
 643 }
 644
 645 static int oss_indicate(struct ast_channel *chan, int cond)
 646 {
 647         int res;
 648         switch(cond) {
 649         case AST_CONTROL_BUSY:
 650                 res = 1;
 651                 break;
 652         case AST_CONTROL_CONGESTION:
 653                 res = 2;
 654                 break;
 655         case AST_CONTROL_RINGING:
 656                 res = 0;
 657                 break;
 658         default:
 659                 ast_log(LOG_WARNING, "Don't know how to display condition %d on %s\n", cond, chan->name);
 660                 return -1;
 661         }
 662         if (res > -1) {
 663                 write(sndcmd[1], &res, sizeof(res));
 664         }
 665         return 0;
 666 }
 667
 668 static struct ast_channel *oss_new(struct chan_oss_pvt *p, int state)
 669 {
 670         struct ast_channel *tmp;
 671         tmp = ast_channel_alloc(1);
 672         if (tmp) {
 673                 snprintf(tmp->name, sizeof(tmp->name), "OSS/%s", DEV_DSP + 5);
 674                 tmp->type = type;
 675                 tmp->fds[0] = sounddev;
 676                 tmp->nativeformats = AST_FORMAT_SLINEAR;
 677                 tmp->pvt->pvt = p;
 678                 tmp->pvt->send_digit = oss_digit;
 679                 tmp->pvt->send_text = oss_text;
 680                 tmp->pvt->hangup = oss_hangup;
 681                 tmp->pvt->answer = oss_answer;
 682                 tmp->pvt->read = oss_read;
 683                 tmp->pvt->call = oss_call;
 684                 tmp->pvt->write = oss_write;
 685                 tmp->pvt->indicate = oss_indicate;
 686                 tmp->pvt->fixup = oss_fixup;
 687                 if (strlen(p->context))
 688                         strncpy(tmp->context, p->context, sizeof(tmp->context)-1);
 689                 if (strlen(p->exten))
 690                         strncpy(tmp->exten, p->exten, sizeof(tmp->exten)-1);
 691                 if (strlen(language))
 692                         strncpy(tmp->language, language, sizeof(tmp->language)-1);
 693                 p->owner = tmp;
 694                 ast_setstate(tmp, state);
 695                 ast_pthread_mutex_lock(&usecnt_lock);
 696                 usecnt++;
 697                 ast_pthread_mutex_unlock(&usecnt_lock);
 698                 ast_update_use_count();
 699                 if (state != AST_STATE_DOWN) {
 700                         if (ast_pbx_start(tmp)) {
 701                                 ast_log(LOG_WARNING, "Unable to start PBX on %s\n", tmp->name);
 702                                 ast_hangup(tmp);
 703                                 tmp = NULL;
 704                         }
 705                 }
 706         }
 707         return tmp;
 708 }
 709
 710 static struct ast_channel *oss_request(char *type, int format, void *data)
 711 {
 712         int oldformat = format;
 713         struct ast_channel *tmp;
 714         format &= AST_FORMAT_SLINEAR;
 715         if (!format) {
 716                 ast_log(LOG_NOTICE, "Asked to get a channel of format '%d'\n", oldformat);
 717                 return NULL;
 718         }
 719         if (oss.owner) {
 720                 ast_log(LOG_NOTICE, "Already have a call on the OSS channel\n");
 721                 return NULL;
 722         }
 723         tmp= oss_new(&oss, AST_STATE_DOWN);
 724         if (!tmp) {
 725                 ast_log(LOG_WARNING, "Unable to create new OSS channel\n");
 726         }
 727         return tmp;
 728 }
 729
 730 static int console_autoanswer(int fd, int argc, char *argv[])
 731 {
 732         if ((argc != 1) && (argc != 2))
 733                 return RESULT_SHOWUSAGE;
 734         if (argc == 1) {
 735                 ast_cli(fd, "Auto answer is %s.\n", autoanswer ? "on" : "off");
 736                 return RESULT_SUCCESS;
 737         } else {
 738                 if (!strcasecmp(argv[1], "on"))
 739                         autoanswer = -1;
 740                 else if (!strcasecmp(argv[1], "off"))
 741                         autoanswer = 0;
 742                 else
 743                         return RESULT_SHOWUSAGE;
 744         }
 745         return RESULT_SUCCESS;
 746 }
 747
 748 static char *autoanswer_complete(char *line, char *word, int pos, int state)
 749 {
 750 #ifndef MIN
 751 #define MIN(a,b) ((a) < (b) ? (a) : (b))
 752 #endif
 753         switch(state) {
 754         case 0:
 755                 if (strlen(word) && !strncasecmp(word, "on", MIN(strlen(word), 2)))
 756                         return strdup("on");
 757         case 1:
 758                 if (strlen(word) && !strncasecmp(word, "off", MIN(strlen(word), 3)))
 759                         return strdup("off");
 760         default:
 761                 return NULL;
 762         }
 763         return NULL;
 764 }
 765
 766 static char autoanswer_usage[] =
 767 "Usage: autoanswer [on|off]\n"
 768 "       Enables or disables autoanswer feature.  If used without\n"
 769 "       argument, displays the current on/off status of autoanswer.\n"
 770 "       The default value of autoanswer is in 'oss.conf'.\n";
 771
 772 static int console_answer(int fd, int argc, char *argv[])
 773 {
 774         struct ast_frame f = { AST_FRAME_CONTROL, AST_CONTROL_ANSWER };
 775         if (argc != 1)
 776                 return RESULT_SHOWUSAGE;
 777         if (!oss.owner) {
 778                 ast_cli(fd, "No one is calling us\n");
 779                 return RESULT_FAILURE;
 780         }
 781         hookstate = 1;
 782         cursound = -1;
 783         ast_queue_frame(oss.owner, &f, 1);
 784         answer_sound();
 785         return RESULT_SUCCESS;
 786 }
 787
 788 static char sendtext_usage[] =
 789 "Usage: send text <message>\n"
 790 "       Sends a text message for display on the remote terminal.\n";
 791
 792 static int console_sendtext(int fd, int argc, char *argv[])
 793 {
 794         int tmparg = 1;
 795         char text2send[256];
 796         struct ast_frame f = { 0, };
 797         if (argc < 1)
 798                 return RESULT_SHOWUSAGE;
 799         if (!oss.owner) {
 800                 ast_cli(fd, "No one is calling us\n");
 801                 return RESULT_FAILURE;
 802         }
 803         if (strlen(text2send))
 804                 ast_cli(fd, "Warning: message already waiting to be sent, overwriting\n");
 805         strcpy(text2send, "");
 806         while(tmparg <= argc) {
 807                 strncat(text2send, argv[tmparg++], sizeof(text2send) - strlen(text2send));
 808                 strncat(text2send, " ", sizeof(text2send) - strlen(text2send));
 809         }
 810         if (strlen(text2send)) {
 811                 f.frametype = AST_FRAME_TEXT;
 812                 f.subclass = 0;
 813                 f.data = text2send;
 814                 f.datalen = strlen(text2send);
 815                 ast_queue_frame(oss.owner, &f, 1);
 816         }
 817         return RESULT_SUCCESS;
 818 }
 819
 820 static char answer_usage[] =
 821 "Usage: answer\n"
 822 "       Answers an incoming call on the console (OSS) channel.\n";
 823
 824 static int console_hangup(int fd, int argc, char *argv[])
 825 {
 826         if (argc != 1)
 827                 return RESULT_SHOWUSAGE;
 828         cursound = -1;
 829         if (!oss.owner && !hookstate) {
 830                 ast_cli(fd, "No call to hangup up\n");
 831                 return RESULT_FAILURE;
 832         }
 833         hookstate = 0;
 834         if (oss.owner) {
 835                 ast_queue_hangup(oss.owner, 1);
 836         }
 837         return RESULT_SUCCESS;
 838 }
 839
 840 static char hangup_usage[] =
 841 "Usage: hangup\n"
 842 "       Hangs up any call currently placed on the console.\n";
 843
 844
 845 static int console_dial(int fd, int argc, char *argv[])
 846 {
 847         char tmp[256], *tmp2;
 848         char *mye, *myc;
 849         int x;
 850         struct ast_frame f = { AST_FRAME_DTMF, 0 };
 851         if ((argc != 1) && (argc != 2))
 852                 return RESULT_SHOWUSAGE;
 853         if (oss.owner) {
 854                 if (argc == 2) {
 855                         for (x=0;x<strlen(argv[1]);x++) {
 856                                 f.subclass = argv[1][x];
 857                                 ast_queue_frame(oss.owner, &f, 1);
 858                         }
 859                 } else {
 860                         ast_cli(fd, "You're already in a call.  You can use this only to dial digits until you hangup\n");
 861                         return RESULT_FAILURE;
 862                 }
 863                 return RESULT_SUCCESS;
 864         }
 865         mye = exten;
 866         myc = context;
 867         if (argc == 2) {
 868                 strncpy(tmp, argv[1], sizeof(tmp)-1);
 869                 strtok(tmp, "@");
 870                 tmp2 = strtok(NULL, "@");
 871                 if (strlen(tmp))
 872                         mye = tmp;
 873                 if (tmp2 && strlen(tmp2))
 874                         myc = tmp2;
 875         }
 876         if (ast_exists_extension(NULL, myc, mye, 1, NULL)) {
 877                 strncpy(oss.exten, mye, sizeof(oss.exten)-1);
 878                 strncpy(oss.context, myc, sizeof(oss.context)-1);
 879                 hookstate = 1;
 880                 oss_new(&oss, AST_STATE_RINGING);
 881         } else
 882                 ast_cli(fd, "No such extension '%s' in context '%s'\n", mye, myc);
 883         return RESULT_SUCCESS;
 884 }
 885
 886 static char dial_usage[] =
 887 "Usage: dial [extension[@context]]\n"
 888 "       Dials a given extensison (";
 889
 890 static int console_transfer(int fd, int argc, char *argv[])
 891 {
 892         char tmp[256];
 893         char *context;
 894         if (argc != 2)
 895                 return RESULT_SHOWUSAGE;
 896         if (oss.owner && oss.owner->bridge) {
 897                 strncpy(tmp, argv[1], sizeof(tmp) - 1);
 898                 context = strchr(tmp, '@');
 899                 if (context) {
 900                         *context = '\0';
 901                         context++;
 902                 } else
 903                         context = oss.owner->context;
 904                 if (ast_exists_extension(oss.owner->bridge, context, tmp, 1, oss.owner->bridge->callerid)) {
 905                         ast_cli(fd, "Whee, transferring %s to %s@%s.\n",
 906                                         oss.owner->bridge->name, tmp, context);
 907                         if (ast_async_goto(oss.owner->bridge, context, tmp, 1, 1))
 908                                 ast_cli(fd, "Failed to transfer :(\n");
 909                 } else {
 910                         ast_cli(fd, "No such extension exists\n");
 911                 }
 912         } else {
 913                 ast_cli(fd, "There is no call to transfer\n");
 914         }
 915         return RESULT_SUCCESS;
 916 }
 917
 918 static char transfer_usage[] =
 919 "Usage: transfer <extension>[@context]\n"
 920 "       Transfers the currently connected call to the given extension (and\n"
 921 "context if specified)\n";
 922
 923 static struct ast_cli_entry myclis[] = {
 924         { { "answer", NULL }, console_answer, "Answer an incoming console call", answer_usage },
 925         { { "hangup", NULL }, console_hangup, "Hangup a call on the console", hangup_usage },
 926         { { "dial", NULL }, console_dial, "Dial an extension on the console", dial_usage },
 927         { { "transfer", NULL }, console_transfer, "Transfer a call to a different extension", transfer_usage },
 928         { { "send text", NULL }, console_sendtext, "Send text to the remote device", sendtext_usage },
 929         { { "autoanswer", NULL }, console_autoanswer, "Sets/displays autoanswer", autoanswer_usage, autoanswer_complete }
 930 };
 931
 932 int load_module()
 933 {
 934         int res;
 935         int x;
 936         struct ast_config *cfg = ast_load(config);
 937         struct ast_variable *v;
 938         res = pipe(sndcmd);
 939         if (res) {
 940                 ast_log(LOG_ERROR, "Unable to create pipe\n");
 941                 return -1;
 942         }
 943         res = soundcard_init();
 944         if (res < 0) {
 945                 if (option_verbose > 1) {
 946                         ast_verbose(VERBOSE_PREFIX_2 "No sound card detected -- console channel will be unavailable\n");
 947                         ast_verbose(VERBOSE_PREFIX_2 "Turn off OSS support by adding 'noload=chan_oss.so' in /etc/asterisk/modules.conf\n");
 948                 }
 949                 return 0;
 950         }
 951         if (!full_duplex)
 952                 ast_log(LOG_WARNING, "XXX I don't work right with non-full duplex sound cards XXX\n");
 953         res = ast_channel_register(type, tdesc, AST_FORMAT_SLINEAR, oss_request);
 954         if (res < 0) {
 955                 ast_log(LOG_ERROR, "Unable to register channel class '%s'\n", type);
 956                 return -1;
 957         }
 958         for (x=0;x<sizeof(myclis)/sizeof(struct ast_cli_entry); x++)
 959                 ast_cli_register(myclis + x);
 960         if (cfg) {
 961                 v = ast_variable_browse(cfg, "general");
 962                 while(v) {
 963                         if (!strcasecmp(v->name, "autoanswer"))
 964                                 autoanswer = ast_true(v->value);
 965                         else if (!strcasecmp(v->name, "silencesuppression"))
 966                                 silencesuppression = ast_true(v->value);
 967                         else if (!strcasecmp(v->name, "silencethreshold"))
 968                                 silencethreshold = atoi(v->value);
 969                         else if (!strcasecmp(v->name, "context"))
 970                                 strncpy(context, v->value, sizeof(context)-1);
 971                         else if (!strcasecmp(v->name, "language"))
 972                                 strncpy(language, v->value, sizeof(language)-1);
 973                         else if (!strcasecmp(v->name, "extension"))
 974                                 strncpy(exten, v->value, sizeof(exten)-1);
 975                         v=v->next;
 976                 }
 977                 ast_destroy(cfg);
 978         }
 979         pthread_create(&sthread, NULL, sound_thread, NULL);
 980         return 0;
 981 }
 982
 983
 984
 985 int unload_module()
 986 {
 987         int x;
 988         for (x=0;x<sizeof(myclis)/sizeof(struct ast_cli_entry); x++)
 989                 ast_cli_unregister(myclis + x);
 990         close(sounddev);
 991         if (sndcmd[0] > 0) {
 992                 close(sndcmd[0]);
 993                 close(sndcmd[1]);
 994         }
 995         if (oss.owner)
 996                 ast_softhangup(oss.owner, AST_SOFTHANGUP_APPUNLOAD);
 997         if (oss.owner)
 998                 return -1;
 999         return 0;
1000 }
1001
1002 char *description()
1003 {
1004         return desc;
1005 }
1006
1007 int usecount()
1008 {
1009         int res;
1010         ast_pthread_mutex_lock(&usecnt_lock);
1011         res = usecnt;
1012         ast_pthread_mutex_unlock(&usecnt_lock);
1013         return res;
1014 }
1015
1016 char *key()
1017 {
1018         return ASTERISK_GPL_KEY;
1019 }