Merged revisions 55954 via svnmerge from
[asterisk/asterisk.git] / channels / chan_alsa.c
old mode 100755 (executable)
new mode 100644 (file)
index 57d0fdb..1651b7d
@@ -1,23 +1,40 @@
 /*
- * Asterisk -- A telephony toolkit for Linux.
+ * Asterisk -- An open source telephony toolkit.
  *
- * Copyright (C) 2002, Linux Support Services
+ * Copyright (C) 1999 - 2005, Digium, Inc.
  *
- * By Matthew Fredrickson <creslin@linux-support.net>
+ * By Matthew Fredrickson <creslin@digium.com>
+ *
+ * See http://www.asterisk.org for more information about
+ * the Asterisk project. Please do not directly contact
+ * any of the maintainers of this project for assistance;
+ * the project provides a web site, mailing lists and IRC
+ * channels for your use.
  *
  * This program is free software, distributed under the terms of
- * the GNU General Public License
+ * the GNU General Public License Version 2. See the LICENSE file
+ * at the top of the source tree.
  */
 
-#include <asterisk/frame.h>
-#include <asterisk/logger.h>
-#include <asterisk/channel.h>
-#include <asterisk/module.h>
-#include <asterisk/channel_pvt.h>
-#include <asterisk/options.h>
-#include <asterisk/pbx.h>
-#include <asterisk/config.h>
-#include <asterisk/cli.h>
+/*! \file 
+ * \brief ALSA sound card channel driver 
+ *
+ * \author Matthew Fredrickson <creslin@digium.com>
+ *
+ * \par See also
+ * \arg Config_alsa
+ *
+ * \ingroup channel_drivers
+ */
+
+/*** MODULEINFO
+       <depend>asound</depend>
+ ***/
+
+#include "asterisk.h"
+
+ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
+
 #include <unistd.h>
 #include <fcntl.h>
 #include <errno.h>
 #define ALSA_PCM_NEW_SW_PARAMS_API
 #include <alsa/asoundlib.h>
 
+#include "asterisk/frame.h"
+#include "asterisk/logger.h"
+#include "asterisk/channel.h"
+#include "asterisk/module.h"
+#include "asterisk/options.h"
+#include "asterisk/pbx.h"
+#include "asterisk/config.h"
+#include "asterisk/cli.h"
+#include "asterisk/utils.h"
+#include "asterisk/causes.h"
+#include "asterisk/endian.h"
+#include "asterisk/stringfields.h"
+#include "asterisk/abstract_jb.h"
+#include "asterisk/musiconhold.h"
+
 #include "busy.h"
 #include "ringtone.h"
 #include "ring10.h"
 #include "answer.h"
 
+#ifdef ALSA_MONITOR
+#include "alsa-monitor.h"
+#endif
+
+/*! Global jitterbuffer configuration - by default, jb is disabled */
+static struct ast_jb_conf default_jbconf = {
+       .flags = 0,
+       .max_size = -1,
+       .resync_threshold = -1,
+       .impl = ""
+};
+static struct ast_jb_conf global_jbconf;
+
 #define DEBUG 0
 /* Which device to use */
-#define ALSA_INDEV "default"
-#define ALSA_OUTDEV "default"
+#define ALSA_INDEV "hw:0,0"
+#define ALSA_OUTDEV "hw:0,0"
 #define DESIRED_RATE 8000
 
 /* Lets use 160 sample frames, just like GSM.  */
-#define PERIOD_SIZE 160
-#define ALSA_MAX_BUF PERIOD_SIZE*4 + AST_FRIENDLY_OFFSET
+#define FRAME_SIZE 160
+#define PERIOD_FRAMES 80               /* 80 Frames, at 2 bytes each */
 
+/* When you set the frame size, you have to come up with
+   the right buffer format as well. */
+/* 5 64-byte frames = one frame */
+#define BUFFER_FMT ((buffersize * 10) << 16) | (0x0006);
+
+/* Don't switch between read/write modes faster than every 300 ms */
+#define MIN_SWITCH_TIME 600
+
+#if __BYTE_ORDER == __LITTLE_ENDIAN
 static snd_pcm_format_t format = SND_PCM_FORMAT_S16_LE;
+#else
+static snd_pcm_format_t format = SND_PCM_FORMAT_S16_BE;
+#endif
+
+/* static int block = O_NONBLOCK; */
 static char indevname[50] = ALSA_INDEV;
 static char outdevname[50] = ALSA_OUTDEV;
 
-static int usecnt;
-static int silencesuppression = 0;
-static int silencethreshold = 1000;
-
 #if 0
 static struct timeval lasttime;
 #endif
 
-static char digits[80] = "";
-static char text2send[80] = "";
+static int silencesuppression = 0;
+static int silencethreshold = 1000;
 
-static ast_mutex_t usecnt_lock = AST_MUTEX_INITIALIZER;
+AST_MUTEX_DEFINE_STATIC(alsalock);
 
-static char *type = "Console";
-static char *desc = "ALSA Console Channel Driver";
-static char *tdesc = "ALSA Console Channel Driver";
-static char *config = "alsa.conf";
+static const char tdesc[] = "ALSA Console Channel Driver";
+static const char config[] = "alsa.conf";
 
-static char context[AST_MAX_EXTENSION] = "default";
+static char context[AST_MAX_CONTEXT] = "default";
 static char language[MAX_LANGUAGE] = "";
 static char exten[AST_MAX_EXTENSION] = "s";
+static char mohinterpret[MAX_MUSICCLASS];
 
-/* Command pipe */
-static int cmd[2];
+static int hookstate = 0;
 
-int hookstate=0;
-
-static short silence[PERIOD_SIZE] = {0, };
+static short silence[FRAME_SIZE] = { 0, };
 
 struct sound {
        int ind;
@@ -89,231 +140,224 @@ struct sound {
 };
 
 static struct sound sounds[] = {
-       { AST_CONTROL_RINGING, ringtone, sizeof(ringtone)/2, 16000, 32000, 1 },
-       { AST_CONTROL_BUSY, busy, sizeof(busy)/2, 4000, 4000, 1 },
-       { AST_CONTROL_CONGESTION, busy, sizeof(busy)/2, 2000, 2000, 1 },
-       { AST_CONTROL_RING, ring10, sizeof(ring10)/2, 16000, 32000, 1 },
-       { AST_CONTROL_ANSWER, answer, sizeof(answer)/2, 2200, 0, 0 },
+       {AST_CONTROL_RINGING, ringtone, sizeof(ringtone) / 2, 16000, 32000, 1},
+       {AST_CONTROL_BUSY, busy, sizeof(busy) / 2, 4000, 4000, 1},
+       {AST_CONTROL_CONGESTION, busy, sizeof(busy) / 2, 2000, 2000, 1},
+       {AST_CONTROL_RING, ring10, sizeof(ring10) / 2, 16000, 32000, 1},
+       {AST_CONTROL_ANSWER, answer, sizeof(answer) / 2, 2200, 0, 0},
 };
 
 /* Sound command pipe */
 static int sndcmd[2];
 
-typedef struct chan_alsa_pvt chan_alsa_pvt_t;
-struct chan_alsa_pvt {
+static struct chan_alsa_pvt {
        /* We only have one ALSA structure -- near sighted perhaps, but it
           keeps this driver as simple as possible -- as it should be. */
        struct ast_channel *owner;
        char exten[AST_MAX_EXTENSION];
-       char context[AST_MAX_EXTENSION];
-       struct pollfd                *pfd;
-       unsigned int  playback_nfds;
-       unsigned int  capture_nfds;
-       snd_pcm_t *playback_handle;
-       snd_pcm_t *capture_handle;
-       snd_pcm_uframes_t capture_period_size;
-        snd_pcm_uframes_t capture_buffer_size;
-       
-       pthread_t sound_thread;
-       char buf[ALSA_MAX_BUF];          /* buffer for reading frames */
-       char *capture_buf;             /* malloc buffer for reading frames */
-       struct ast_frame fr;
-       int cursound;
-       int cursound_offset;
-       int nosound;
-};
+       char context[AST_MAX_CONTEXT];
+#if 0
+       snd_pcm_t *card;
+#endif
+       snd_pcm_t *icard, *ocard;
 
-static chan_alsa_pvt_t alsa;
+} alsa;
+
+/* Number of buffers...  Each is FRAMESIZE/8 ms long.  For example
+   with 160 sample frames, and a buffer size of 3, we have a 60ms buffer, 
+   usually plenty. */
+
+pthread_t sthread;
 
 #define MAX_BUFFER_SIZE 100
 
+/* File descriptors for sound device */
+static int readdev = -1;
+static int writedev = -1;
+
 static int autoanswer = 1;
 
-/* Send a announcement */
-static int send_sound(chan_alsa_pvt_t *driver)
+static int cursound = -1;
+static int sampsent = 0;
+static int silencelen = 0;
+static int offset = 0;
+static int nosound = 0;
+
+/* ZZ */
+static struct ast_channel *alsa_request(const char *type, int format, void *data, int *cause);
+static int alsa_digit(struct ast_channel *c, char digit, unsigned int duration);
+static int alsa_text(struct ast_channel *c, const char *text);
+static int alsa_hangup(struct ast_channel *c);
+static int alsa_answer(struct ast_channel *c);
+static struct ast_frame *alsa_read(struct ast_channel *chan);
+static int alsa_call(struct ast_channel *c, char *dest, int timeout);
+static int alsa_write(struct ast_channel *chan, struct ast_frame *f);
+static int alsa_indicate(struct ast_channel *chan, int cond, const void *data, size_t datalen);
+static int alsa_fixup(struct ast_channel *oldchan, struct ast_channel *newchan);
+
+static const struct ast_channel_tech alsa_tech = {
+       .type = "Console",
+       .description = tdesc,
+       .capabilities = AST_FORMAT_SLINEAR,
+       .requester = alsa_request,
+       .send_digit_end = alsa_digit,
+       .send_text = alsa_text,
+       .hangup = alsa_hangup,
+       .answer = alsa_answer,
+       .read = alsa_read,
+       .call = alsa_call,
+       .write = alsa_write,
+       .indicate = alsa_indicate,
+       .fixup = alsa_fixup,
+};
+
+static int send_sound(void)
 {
-       int res;
-       int frames;
-       int cursound=driver->cursound;
+       short myframe[FRAME_SIZE];
+       int total = FRAME_SIZE;
+       short *frame = NULL;
+       int amt = 0, res, myoff;
        snd_pcm_state_t state;
 
-       if (cursound > -1) {
-               driver->nosound=1;
-               state = snd_pcm_state(alsa.playback_handle);
-               if (state == SND_PCM_STATE_XRUN) {
-                       snd_pcm_prepare(alsa.playback_handle);
+       if (cursound == -1)
+               return 0;
+
+       res = total;
+       if (sampsent < sounds[cursound].samplen) {
+               myoff = 0;
+               while (total) {
+                       amt = total;
+                       if (amt > (sounds[cursound].datalen - offset))
+                               amt = sounds[cursound].datalen - offset;
+                       memcpy(myframe + myoff, sounds[cursound].data + offset, amt * 2);
+                       total -= amt;
+                       offset += amt;
+                       sampsent += amt;
+                       myoff += amt;
+                       if (offset >= sounds[cursound].datalen)
+                               offset = 0;
                }
-               frames = sounds[cursound].samplen - driver->cursound_offset;
-               if (frames >= PERIOD_SIZE)  {
-                       res = snd_pcm_writei(driver->playback_handle,sounds[cursound].data + (driver->cursound_offset*2), PERIOD_SIZE);
-                       driver->cursound_offset+=PERIOD_SIZE;
-               } else if (frames > 0) {
-                       res = snd_pcm_writei(driver->playback_handle,sounds[cursound].data + (driver->cursound_offset*2), frames);
-                       res = snd_pcm_writei(driver->playback_handle,silence, PERIOD_SIZE - frames);
-                       driver->cursound_offset+=PERIOD_SIZE;
+               /* Set it up for silence */
+               if (sampsent >= sounds[cursound].samplen)
+                       silencelen = sounds[cursound].silencelen;
+               frame = myframe;
+       } else {
+               if (silencelen > 0) {
+                       frame = silence;
+                       silencelen -= res;
+               } else {
+                       if (sounds[cursound].repeat) {
+                               /* Start over */
+                               sampsent = 0;
+                               offset = 0;
                        } else {
-                       res = snd_pcm_writei(driver->playback_handle,silence, PERIOD_SIZE);
-                       driver->cursound_offset+=PERIOD_SIZE;
-               }
-               if (driver->cursound_offset > ( sounds[cursound].samplen + sounds[cursound].silencelen ) ) {
-                               if (sounds[cursound].repeat) {
-                               driver->cursound_offset=0;
-                               } else {
-                               driver->cursound = -1;
-                               driver->nosound=0;
-                               }
+                               cursound = -1;
+                               nosound = 0;
                        }
-               }
                        return 0;
-}
-
-static int sound_capture(chan_alsa_pvt_t *driver)
-{
-       struct ast_frame *fr = &driver->fr;
-       char *readbuf = ((char *)driver->buf) + AST_FRIENDLY_OFFSET;
-       snd_pcm_sframes_t err;
-       snd_pcm_sframes_t avail;
-       snd_pcm_state_t alsa_state;
-       
-       /* Update positions */
-       while ((avail = snd_pcm_avail_update (driver->capture_handle)) >= PERIOD_SIZE) {
-       
-               /* capture samples from sound card */
-               err = snd_pcm_readi(driver->capture_handle, readbuf, PERIOD_SIZE);
-               if (err == -EPIPE) {
-                       ast_log(LOG_ERROR, "XRUN read avail=%ld\n", avail);
-                       snd_pcm_prepare(driver->capture_handle);
-                       alsa_state = snd_pcm_state(driver->capture_handle);
-                       if (alsa_state == SND_PCM_STATE_PREPARED) {
-                               snd_pcm_start(driver->capture_handle);
-               }
-                       continue;
-               } else if (err == -ESTRPIPE) {
-                       ast_log(LOG_ERROR, "-ESTRPIPE\n");
-                       snd_pcm_prepare(driver->capture_handle);
-                       alsa_state = snd_pcm_state(driver->capture_handle);
-                       if (alsa_state == SND_PCM_STATE_PREPARED) {
-                               snd_pcm_start(driver->capture_handle);
                }
-                       continue;
-               } else if (err < 0) {
-                       ast_log(LOG_ERROR, "Read error: %s\n", snd_strerror(err));
-                       return -1;
        }
 
-               /* Now send captures samples */
-               fr->frametype = AST_FRAME_VOICE;
-               fr->src = type;
-               fr->mallocd = 0;
-
-               fr->subclass = AST_FORMAT_SLINEAR;
-               fr->samples = PERIOD_SIZE;
-               fr->datalen = PERIOD_SIZE * 2 ; /* 16bit = X * 2 */
-               fr->data = readbuf;
-               fr->offset = AST_FRIENDLY_OFFSET;
+       if (res == 0 || !frame)
+               return 0;
 
-               if (driver->owner) ast_queue_frame(driver->owner, fr);
-       }
-       return 0; /* 0 = OK, !=0 -> Error */
+#ifdef ALSA_MONITOR
+       alsa_monitor_write((char *) frame, res * 2);
+#endif
+       state = snd_pcm_state(alsa.ocard);
+       if (state == SND_PCM_STATE_XRUN)
+               snd_pcm_prepare(alsa.ocard);
+       res = snd_pcm_writei(alsa.ocard, frame, res);
+       if (res > 0)
+               return 0;
+       return 0;
 }
 
-static void *sound_thread(void *pvt)
+static void *sound_thread(void *unused)
 {
-       chan_alsa_pvt_t *driver = (chan_alsa_pvt_t *)pvt;
-        unsigned int nfds;
-        unsigned int ci;
-       unsigned short revents;
-       snd_pcm_state_t alsa_state;
-       int res;
-       if (driver->playback_handle) {
-                driver->playback_nfds =
-                        snd_pcm_poll_descriptors_count (
-                                driver->playback_handle);
-        } else {
-                driver->playback_nfds = 0;
+       fd_set rfds;
+       fd_set wfds;
+       int max, res;
+
+       for (;;) {
+               FD_ZERO(&rfds);
+               FD_ZERO(&wfds);
+               max = sndcmd[0];
+               FD_SET(sndcmd[0], &rfds);
+               if (cursound > -1) {
+                       FD_SET(writedev, &wfds);
+                       if (writedev > max)
+                               max = writedev;
                }
-
-        if (driver->capture_handle) {
-                driver->capture_nfds =
-                        snd_pcm_poll_descriptors_count (driver->capture_handle);
-        } else {
-                driver->capture_nfds = 0;
+#ifdef ALSA_MONITOR
+               if (!alsa.owner) {
+                       FD_SET(readdev, &rfds);
+                       if (readdev > max)
+                               max = readdev;
                }
-
-        if (driver->pfd) {
-                free (driver->pfd);
-               }
-                       
-        driver->pfd = (struct pollfd *)
-                malloc (sizeof (struct pollfd) *
-                        (driver->playback_nfds + driver->capture_nfds + 2));
-
-        nfds = 0;
-        if (driver->playback_handle) {
-               snd_pcm_poll_descriptors (driver->playback_handle,
-                                          &driver->pfd[0],
-                                          driver->playback_nfds);
-                nfds += driver->playback_nfds;
-                       }
-        ci = nfds;
-
-        if (driver->capture_handle) {
-                snd_pcm_poll_descriptors (driver->capture_handle,
-                                          &driver->pfd[ci],
-                                          driver->capture_nfds);
-                nfds += driver->capture_nfds;
-               }               
-       
-       while (hookstate) {
-               /* When no doing announcements */
-               if (driver->cursound > -1) {
-                       res = poll(&driver->pfd[0], driver->playback_nfds, -1);
-               } else {
-                       res = poll(&driver->pfd[ci], driver->capture_nfds, -1);
-               }
-
-               /* When doing announcements */
-               if (driver->cursound > -1) {
-                       snd_pcm_poll_descriptors_revents(driver->playback_handle, &driver->pfd[0], driver->playback_nfds, &revents);
-                       if (revents & POLLOUT) {
-                               if (send_sound(driver)) {
-                               ast_log(LOG_WARNING, "Failed to write sound\n");
-       }
-                       }
-               } else {
-               snd_pcm_poll_descriptors_revents(driver->capture_handle, &driver->pfd[ci], driver->capture_nfds, &revents);
-               if (revents & POLLERR) {
-                       alsa_state = snd_pcm_state(driver->capture_handle);
-                       if (alsa_state == SND_PCM_STATE_XRUN) {
-                               snd_pcm_prepare(driver->capture_handle);
-                       }
-                       alsa_state = snd_pcm_state(driver->capture_handle);
-                       if (alsa_state == SND_PCM_STATE_PREPARED) {
-                               snd_pcm_start(driver->capture_handle);
-                       }
+#endif
+               res = ast_select(max + 1, &rfds, &wfds, NULL, NULL);
+               if (res < 1) {
+                       ast_log(LOG_WARNING, "select failed: %s\n", strerror(errno));
+                       continue;
                }
-               if (revents & POLLIN) {
-                       if (sound_capture(driver)) {
-                               ast_log(LOG_WARNING, "Failed to read sound\n");
+#ifdef ALSA_MONITOR
+               if (FD_ISSET(readdev, &rfds)) {
+                       /* Keep the pipe going with read audio */
+                       snd_pcm_state_t state;
+                       short buf[FRAME_SIZE];
+                       int r;
+
+                       state = snd_pcm_state(alsa.ocard);
+                       if (state == SND_PCM_STATE_XRUN) {
+                               snd_pcm_prepare(alsa.ocard);
                        }
+                       r = snd_pcm_readi(alsa.icard, buf, FRAME_SIZE);
+                       if (r == -EPIPE) {
+#if DEBUG
+                               ast_log(LOG_ERROR, "XRUN read\n");
+#endif
+                               snd_pcm_prepare(alsa.icard);
+                       } else if (r == -ESTRPIPE) {
+                               ast_log(LOG_ERROR, "-ESTRPIPE\n");
+                               snd_pcm_prepare(alsa.icard);
+                       } else if (r < 0) {
+                               ast_log(LOG_ERROR, "Read error: %s\n", snd_strerror(r));
+                       } else
+                               alsa_monitor_read((char *) buf, r * 2);
                }
+#endif
+               if (FD_ISSET(sndcmd[0], &rfds)) {
+                       read(sndcmd[0], &cursound, sizeof(cursound));
+                       silencelen = 0;
+                       offset = 0;
+                       sampsent = 0;
                }
+               if (FD_ISSET(writedev, &wfds))
+                       if (send_sound())
+                               ast_log(LOG_WARNING, "Failed to write sound\n");
        }
        /* Never reached */
        return NULL;
 }
 
-static snd_pcm_t *alsa_card_init(chan_alsa_pvt_t *driver, char *dev, snd_pcm_stream_t stream)
+static snd_pcm_t *alsa_card_init(char *dev, snd_pcm_stream_t stream)
 {
        int err;
        int direction;
        snd_pcm_t *handle = NULL;
        snd_pcm_hw_params_t *hwparams = NULL;
        snd_pcm_sw_params_t *swparams = NULL;
-       snd_pcm_uframes_t period_size = PERIOD_SIZE;
+       struct pollfd pfd;
+       snd_pcm_uframes_t period_size = PERIOD_FRAMES * 4;
+       /* int period_bytes = 0; */
        snd_pcm_uframes_t buffer_size = 0;
 
        unsigned int rate = DESIRED_RATE;
+#if 0
+       unsigned int per_min = 1;
+#endif
+       /* unsigned int per_max = 8; */
        snd_pcm_uframes_t start_threshold, stop_threshold;
 
        err = snd_pcm_open(&handle, dev, stream, O_NONBLOCK);
@@ -321,367 +365,343 @@ static snd_pcm_t *alsa_card_init(chan_alsa_pvt_t *driver, char *dev, snd_pcm_str
                ast_log(LOG_ERROR, "snd_pcm_open failed: %s\n", snd_strerror(err));
                return NULL;
        } else {
-               ast_log(LOG_DEBUG, "Opening device %s in %s mode\n", dev, (stream == SND_PCM_STREAM_CAPTURE) ? "read" : "write");
+               if (option_debug)
+                       ast_log(LOG_DEBUG, "Opening device %s in %s mode\n", dev, (stream == SND_PCM_STREAM_CAPTURE) ? "read" : "write");
        }
 
        snd_pcm_hw_params_alloca(&hwparams);
        snd_pcm_hw_params_any(handle, hwparams);
 
        err = snd_pcm_hw_params_set_access(handle, hwparams, SND_PCM_ACCESS_RW_INTERLEAVED);
-       if (err < 0) {
+       if (err < 0)
                ast_log(LOG_ERROR, "set_access failed: %s\n", snd_strerror(err));
-       }
 
        err = snd_pcm_hw_params_set_format(handle, hwparams, format);
-       if (err < 0) {
+       if (err < 0)
                ast_log(LOG_ERROR, "set_format failed: %s\n", snd_strerror(err));
-       }
 
        err = snd_pcm_hw_params_set_channels(handle, hwparams, 1);
-       if (err < 0) {
+       if (err < 0)
                ast_log(LOG_ERROR, "set_channels failed: %s\n", snd_strerror(err));
-       }
 
        direction = 0;
        err = snd_pcm_hw_params_set_rate_near(handle, hwparams, &rate, &direction);
-       
-       if (rate != DESIRED_RATE) {
+       if (rate != DESIRED_RATE)
                ast_log(LOG_WARNING, "Rate not correct, requested %d, got %d\n", DESIRED_RATE, rate);
-       }
 
        direction = 0;
-       buffer_size = 4096 * 2; /* period_size * 16; */
        err = snd_pcm_hw_params_set_period_size_near(handle, hwparams, &period_size, &direction);
-       if (err < 0) {
+       if (err < 0)
                ast_log(LOG_ERROR, "period_size(%ld frames) is bad: %s\n", period_size, snd_strerror(err));
-       } else {
-               ast_log(LOG_DEBUG, "Period size is %d\n", err);
+       else {
+               if (option_debug)
+                       ast_log(LOG_DEBUG, "Period size is %d\n", err);
        }
 
-       err = snd_pcm_hw_params_set_buffer_size_near(handle, hwparams, &buffer_size);   
-       if (err < 0) {
+       buffer_size = 4096 * 2;         /* period_size * 16; */
+       err = snd_pcm_hw_params_set_buffer_size_near(handle, hwparams, &buffer_size);
+       if (err < 0)
                ast_log(LOG_WARNING, "Problem setting buffer size of %ld: %s\n", buffer_size, snd_strerror(err));
-       } else {
-               ast_log(LOG_DEBUG, "Buffer size is set to %d frames\n", err);
+       else {
+               if (option_debug)
+                       ast_log(LOG_DEBUG, "Buffer size is set to %d frames\n", err);
        }
 
 #if 0
        direction = 0;
        err = snd_pcm_hw_params_set_periods_min(handle, hwparams, &per_min, &direction);
-       if (err < 0) {
+       if (err < 0)
                ast_log(LOG_ERROR, "periods_min: %s\n", snd_strerror(err));
-       }
 
        err = snd_pcm_hw_params_set_periods_max(handle, hwparams, &per_max, 0);
-       if (err < 0) {
+       if (err < 0)
                ast_log(LOG_ERROR, "periods_max: %s\n", snd_strerror(err));
-       }
 #endif
 
-       if (stream == SND_PCM_STREAM_CAPTURE) {
-               driver->capture_period_size=period_size;
-               driver->capture_buffer_size=buffer_size;
-       }
-
        err = snd_pcm_hw_params(handle, hwparams);
-       if (err < 0) {
+       if (err < 0)
                ast_log(LOG_ERROR, "Couldn't set the new hw params: %s\n", snd_strerror(err));
-               return NULL;
-       }
 
        snd_pcm_sw_params_alloca(&swparams);
        snd_pcm_sw_params_current(handle, swparams);
 
 #if 1
-       if (stream == SND_PCM_STREAM_PLAYBACK) {
-               start_threshold = period_size*3;
-       } else {
+       if (stream == SND_PCM_STREAM_PLAYBACK)
+               start_threshold = period_size;
+       else
                start_threshold = 1;
-       }
 
        err = snd_pcm_sw_params_set_start_threshold(handle, swparams, start_threshold);
-       if (err < 0) {
+       if (err < 0)
                ast_log(LOG_ERROR, "start threshold: %s\n", snd_strerror(err));
-       }
 #endif
 
 #if 1
-       if (stream == SND_PCM_STREAM_PLAYBACK) {
+       if (stream == SND_PCM_STREAM_PLAYBACK)
                stop_threshold = buffer_size;
-       } else {
-               stop_threshold = buffer_size+1;
-       }
+       else
+               stop_threshold = buffer_size;
+
        err = snd_pcm_sw_params_set_stop_threshold(handle, swparams, stop_threshold);
-       if (err < 0) {
+       if (err < 0)
                ast_log(LOG_ERROR, "stop threshold: %s\n", snd_strerror(err));
-       }
 #endif
 #if 0
-       err = snd_pcm_sw_params_set_xfer_align(handle, swparams, PERIOD_SIZE);
-       if (err < 0) {
+       err = snd_pcm_sw_params_set_xfer_align(handle, swparams, PERIOD_FRAMES);
+       if (err < 0)
                ast_log(LOG_ERROR, "Unable to set xfer alignment: %s\n", snd_strerror(err));
-       }
 #endif
 
 #if 0
        err = snd_pcm_sw_params_set_silence_threshold(handle, swparams, silencethreshold);
-       if (err < 0) {
+       if (err < 0)
                ast_log(LOG_ERROR, "Unable to set silence threshold: %s\n", snd_strerror(err));
-       }
 #endif
        err = snd_pcm_sw_params(handle, swparams);
-       if (err < 0) {
+       if (err < 0)
                ast_log(LOG_ERROR, "sw_params: %s\n", snd_strerror(err));
-       }
 
        err = snd_pcm_poll_descriptors_count(handle);
-       if (err <= 0) {
+       if (err <= 0)
                ast_log(LOG_ERROR, "Unable to get a poll descriptors count, error is %s\n", snd_strerror(err));
-       }
-
        if (err != 1) {
-               ast_log(LOG_DEBUG, "Can't handle more than one device\n");
+               if (option_debug)
+                       ast_log(LOG_DEBUG, "Can't handle more than one device\n");
        }
 
+       snd_pcm_poll_descriptors(handle, &pfd, err);
+       if (option_debug)
+               ast_log(LOG_DEBUG, "Acquired fd %d from the poll descriptor\n", pfd.fd);
+
+       if (stream == SND_PCM_STREAM_CAPTURE)
+               readdev = pfd.fd;
+       else
+               writedev = pfd.fd;
+
        return handle;
 }
 
 static int soundcard_init(void)
 {
-       alsa.capture_handle = alsa_card_init(&alsa, indevname, SND_PCM_STREAM_CAPTURE);
-       alsa.playback_handle = alsa_card_init(&alsa, outdevname, SND_PCM_STREAM_PLAYBACK);
-       if (!alsa.capture_buf) alsa.capture_buf=malloc(alsa.capture_buffer_size * 2);
+       alsa.icard = alsa_card_init(indevname, SND_PCM_STREAM_CAPTURE);
+       alsa.ocard = alsa_card_init(outdevname, SND_PCM_STREAM_PLAYBACK);
 
-       if (!alsa.capture_handle || !alsa.playback_handle) {
+       if (!alsa.icard || !alsa.ocard) {
                ast_log(LOG_ERROR, "Problem opening alsa I/O devices\n");
-               if (alsa.capture_buf) {
-                       free (alsa.capture_buf);
-                       alsa.capture_buf=0;
-               }
                return -1;
        }
 
-       return 0; /* Success */
+       return readdev;
 }
 
-static int alsa_digit(struct ast_channel *c, char digit)
+static int alsa_digit(struct ast_channel *c, char digit, unsigned int duration)
 {
-       ast_verbose( " << Console Received digit %c >> \n", digit);
+       ast_mutex_lock(&alsalock);
+       ast_verbose(" << Console Received digit %c of duration %u ms >> \n", 
+               digit, duration);
+       ast_mutex_unlock(&alsalock);
        return 0;
 }
 
-static int alsa_text(struct ast_channel *c, char *text)
+static int alsa_text(struct ast_channel *c, const char *text)
 {
-       ast_verbose( " << Console Received text %s >> \n", text);
+       ast_mutex_lock(&alsalock);
+       ast_verbose(" << Console Received text %s >> \n", text);
+       ast_mutex_unlock(&alsalock);
        return 0;
 }
 
+static void grab_owner(void)
+{
+       while (alsa.owner && ast_mutex_trylock(&alsa.owner->lock)) {
+               ast_mutex_unlock(&alsalock);
+               usleep(1);
+               ast_mutex_lock(&alsalock);
+       }
+}
+
 static int alsa_call(struct ast_channel *c, char *dest, int timeout)
 {
-       chan_alsa_pvt_t *driver = (chan_alsa_pvt_t *)c->pvt->pvt;
        int res = 3;
-        struct ast_frame f = { 0, };
-       ast_verbose( " << Call placed to '%s' on console >> \n", dest);
+       struct ast_frame f = { AST_FRAME_CONTROL };
+       ast_mutex_lock(&alsalock);
+       ast_verbose(" << Call placed to '%s' on console >> \n", dest);
        if (autoanswer) {
-               ast_verbose( " << Auto-answered >> \n" );
-                f.frametype = AST_FRAME_CONTROL;
-                f.subclass = AST_CONTROL_ANSWER;
-                ast_queue_frame(c, &f);
+               ast_verbose(" << Auto-answered >> \n");
+               grab_owner();
+               if (alsa.owner) {
+                       f.subclass = AST_CONTROL_ANSWER;
+                       ast_queue_frame(alsa.owner, &f);
+                       ast_mutex_unlock(&alsa.owner->lock);
+               }
        } else {
-                driver->nosound = 1;
-               ast_verbose( " << Type 'answer' to answer, or use 'autoanswer' for future calls >> \n");
-                f.frametype = AST_FRAME_CONTROL;
-                f.subclass = AST_CONTROL_RINGING;
-                ast_queue_frame(c, &f);
-               driver->cursound = res;
+               ast_verbose(" << Type 'answer' to answer, or use 'autoanswer' for future calls >> \n");
+               grab_owner();
+               if (alsa.owner) {
+                       f.subclass = AST_CONTROL_RINGING;
+                       ast_queue_frame(alsa.owner, &f);
+                       ast_mutex_unlock(&alsa.owner->lock);
+               }
+               write(sndcmd[1], &res, sizeof(res));
        }
+       snd_pcm_prepare(alsa.icard);
+       snd_pcm_start(alsa.icard);
+       ast_mutex_unlock(&alsalock);
        return 0;
 }
 
-static void answer_sound(chan_alsa_pvt_t *driver)
+static void answer_sound(void)
 {
        int res;
-       driver->nosound = 1;
-       driver->cursound = 4;
-       driver->cursound_offset = 0;
-       
+       nosound = 1;
+       res = 4;
+       write(sndcmd[1], &res, sizeof(res));
+
 }
 
 static int alsa_answer(struct ast_channel *c)
 {
-       chan_alsa_pvt_t *driver = (chan_alsa_pvt_t *)c->pvt->pvt;
-       ast_verbose( " << Console call has been answered >> \n");
-       answer_sound(driver);
+       ast_mutex_lock(&alsalock);
+       ast_verbose(" << Console call has been answered >> \n");
+       answer_sound();
        ast_setstate(c, AST_STATE_UP);
+       cursound = -1;
+       snd_pcm_prepare(alsa.icard);
+       snd_pcm_start(alsa.icard);
+       ast_mutex_unlock(&alsalock);
        return 0;
 }
 
-/* The new_channel is now freed. */
 static int alsa_hangup(struct ast_channel *c)
 {
        int res;
-       chan_alsa_pvt_t *driver = (chan_alsa_pvt_t *)c->pvt->pvt;
-       
-       driver->cursound = -1;
-       driver->nosound = 0;
-        if (hookstate) {
-                hookstate = 0;
-        }
-       pthread_join(driver->sound_thread, NULL);
-/*     snd_pcm_drain(driver->capture_handle); */
-       driver->owner = NULL;
-       c->pvt->pvt = NULL;
-       ast_verbose( " << Hangup on console >> \n");
-       ast_mutex_lock(&usecnt_lock);
-       usecnt--;
-       ast_mutex_unlock(&usecnt_lock);
+       ast_mutex_lock(&alsalock);
+       cursound = -1;
+       c->tech_pvt = NULL;
+       alsa.owner = NULL;
+       ast_verbose(" << Hangup on console >> \n");
+       ast_module_unref(ast_module_info->self);
+       if (hookstate) {
+               hookstate = 0;
+               if (!autoanswer) {
+                       /* Congestion noise */
+                       res = 2;
+                       write(sndcmd[1], &res, sizeof(res));
+               }
+       }
+       snd_pcm_drop(alsa.icard);
+       ast_mutex_unlock(&alsalock);
        return 0;
 }
 
 static int alsa_write(struct ast_channel *chan, struct ast_frame *f)
 {
-       chan_alsa_pvt_t *driver = (chan_alsa_pvt_t *)chan->pvt->pvt;
-       int res;
        static char sizbuf[8000];
        static int sizpos = 0;
        int len = sizpos;
        int pos;
+       int res = 0;
+       /* size_t frames = 0; */
        snd_pcm_state_t state;
-       snd_pcm_sframes_t delay = 0;
 
-       if (driver->nosound) {
-               return 0;
-       }
-       state = snd_pcm_state(driver->playback_handle);
-       if (state == SND_PCM_STATE_XRUN) {
-               snd_pcm_prepare(driver->playback_handle);
-       }
-       res = snd_pcm_delay( driver->playback_handle, &delay );
-       if (delay > 4 * PERIOD_SIZE) {
+       /* Immediately return if no sound is enabled */
+       if (nosound)
                return 0;
+
+       ast_mutex_lock(&alsalock);
+       /* Stop any currently playing sound */
+       if (cursound != -1) {
+               snd_pcm_drop(alsa.ocard);
+               snd_pcm_prepare(alsa.ocard);
+               cursound = -1;
        }
-       res = snd_pcm_writei(driver->playback_handle, f->data, f->samples);
-       if (res == -EPIPE) {
+
+
+       /* We have to digest the frame in 160-byte portions */
+       if (f->datalen > sizeof(sizbuf) - sizpos) {
+               ast_log(LOG_WARNING, "Frame too large\n");
+               res = -1;
+       } else {
+               memcpy(sizbuf + sizpos, f->data, f->datalen);
+               len += f->datalen;
+               pos = 0;
+#ifdef ALSA_MONITOR
+               alsa_monitor_write(sizbuf, len);
+#endif
+               state = snd_pcm_state(alsa.ocard);
+               if (state == SND_PCM_STATE_XRUN)
+                       snd_pcm_prepare(alsa.ocard);
+               res = snd_pcm_writei(alsa.ocard, sizbuf, len / 2);
+               if (res == -EPIPE) {
 #if DEBUG
-               ast_log(LOG_DEBUG, "XRUN write\n");
+                       if (option_debug)
+                               ast_log(LOG_DEBUG, "XRUN write\n");
 #endif
-               snd_pcm_prepare(driver->playback_handle);
-               res = snd_pcm_writei(driver->playback_handle, f->data, f->samples);
-               if (res != f->samples) {
-                       ast_log(LOG_ERROR, "Write error: %s\n", snd_strerror(res));
-                       return -1;
-               } else if (res < 0) {
-                       ast_log(LOG_ERROR, "Write error %s\n", snd_strerror(res));
-                       return -1;
-               }
-       } else {
-               if (res == -ESTRPIPE) {
-                       ast_log(LOG_ERROR, "You've got some big problems\n");
+                       snd_pcm_prepare(alsa.ocard);
+                       res = snd_pcm_writei(alsa.ocard, sizbuf, len / 2);
+                       if (res != len / 2) {
+                               ast_log(LOG_ERROR, "Write error: %s\n", snd_strerror(res));
+                               res = -1;
+                       } else if (res < 0) {
+                               ast_log(LOG_ERROR, "Write error %s\n", snd_strerror(res));
+                               res = -1;
+                       }
+               } else {
+                       if (res == -ESTRPIPE)
+                               ast_log(LOG_ERROR, "You've got some big problems\n");
+                       else if (res < 0)
+                               ast_log(LOG_NOTICE, "Error %d on write\n", res);
                }
        }
-
-       return 0;
+       ast_mutex_unlock(&alsalock);
+       if (res > 0)
+               res = 0;
+       return res;
 }
 
 
 static struct ast_frame *alsa_read(struct ast_channel *chan)
 {
        static struct ast_frame f;
-       static short __buf[PERIOD_SIZE + AST_FRIENDLY_OFFSET/2];
+       static short __buf[FRAME_SIZE + AST_FRIENDLY_OFFSET / 2];
        short *buf;
        static int readpos = 0;
-       static int left = PERIOD_SIZE;
-       int res;
-       int b;
-       int nonull=0;
+       static int left = FRAME_SIZE;
        snd_pcm_state_t state;
        int r = 0;
        int off = 0;
-       /* FIXME: This should never been called */
-        ast_log(LOG_WARNING, "ALSA_READ!!!!!\n");
-       return NULL;
-}
-#if 0
+
+       ast_mutex_lock(&alsalock);
        /* Acknowledge any pending cmd */
-       res = read(cmd[0], &b, sizeof(b));
-       if (res > 0)
-               nonull = 1;
-        ast_log(LOG_WARNING, "alsa: %s:%d\n", __FUNCTION__, __LINE__);
-       
        f.frametype = AST_FRAME_NULL;
        f.subclass = 0;
        f.samples = 0;
        f.datalen = 0;
        f.data = NULL;
        f.offset = 0;
-       f.src = type;
+       f.src = "Console";
        f.mallocd = 0;
-       
-       if (needringing) {
-               f.frametype = AST_FRAME_CONTROL;
-               f.subclass = AST_CONTROL_RINGING;
-               needringing = 0;
-               return &f;
-       }
-        ast_log(LOG_WARNING, "alsa: %s:%d\n", __FUNCTION__, __LINE__);
-       
-       if (needhangup) {
-               needhangup = 0;
-               return NULL;
-       }
-        ast_log(LOG_WARNING, "alsa: %s:%d\n", __FUNCTION__, __LINE__);
-       if (strlen(text2send)) {
-               f.frametype = AST_FRAME_TEXT;
-               f.subclass = 0;
-               f.data = text2send;
-               f.datalen = strlen(text2send);
-               strcpy(text2send,"");
-               return &f;
-       }
-        ast_log(LOG_WARNING, "alsa: %s:%d\n", __FUNCTION__, __LINE__);
-       if (strlen(digits)) {
-               f.frametype = AST_FRAME_DTMF;
-               f.subclass = digits[0];
-               for (res=0;res<strlen(digits);res++)
-                       digits[res] = digits[res + 1];
-               return &f;
-       }
-       
-        ast_log(LOG_WARNING, "alsa: %s:%d\n", __FUNCTION__, __LINE__);
-       if (needanswer) {
-               needanswer = 0;
-               f.frametype = AST_FRAME_CONTROL;
-               f.subclass = AST_CONTROL_ANSWER;
-               ast_setstate(chan, AST_STATE_UP);
-               return &f;
-       }
-       
-        ast_log(LOG_WARNING, "alsa: %s:%d\n", __FUNCTION__, __LINE__);
-       if (nonull)
-               return &f;
-               
-        ast_log(LOG_WARNING, "alsa: %s:%d\n", __FUNCTION__, __LINE__);
-       
-       state = snd_pcm_state(alsa.playback_handle);
-       if (state == SND_PCM_STATE_XRUN) {
-               snd_pcm_prepare(alsa.playback_handle);
+       f.delivery.tv_sec = 0;
+       f.delivery.tv_usec = 0;
+
+       state = snd_pcm_state(alsa.icard);
+       if ((state != SND_PCM_STATE_PREPARED) && (state != SND_PCM_STATE_RUNNING)) {
+               snd_pcm_prepare(alsa.icard);
        }
-        ast_log(LOG_WARNING, "alsa: %s:%d\n", __FUNCTION__, __LINE__);
 
-       buf = __buf + AST_FRIENDLY_OFFSET/2;
+       buf = __buf + AST_FRIENDLY_OFFSET / 2;
 
-       r = snd_pcm_readi(alsa.capture_handle, buf + readpos, left);
+       r = snd_pcm_readi(alsa.icard, buf + readpos, left);
        if (r == -EPIPE) {
 #if DEBUG
                ast_log(LOG_ERROR, "XRUN read\n");
 #endif
-               snd_pcm_prepare(alsa.capture_handle);
+               snd_pcm_prepare(alsa.icard);
        } else if (r == -ESTRPIPE) {
                ast_log(LOG_ERROR, "-ESTRPIPE\n");
-               snd_pcm_prepare(alsa.capture_handle);
+               snd_pcm_prepare(alsa.icard);
        } else if (r < 0) {
                ast_log(LOG_ERROR, "Read error: %s\n", snd_strerror(r));
-               return NULL;
        } else if (r >= 0) {
                off -= r;
        }
@@ -689,393 +709,457 @@ static struct ast_frame *alsa_read(struct ast_channel *chan)
        readpos += r;
        left -= r;
 
-       if (readpos >= PERIOD_SIZE) {
+       if (readpos >= FRAME_SIZE) {
                /* A real frame */
                readpos = 0;
-               left = PERIOD_SIZE;
+               left = FRAME_SIZE;
                if (chan->_state != AST_STATE_UP) {
                        /* Don't transmit unless it's up */
+                       ast_mutex_unlock(&alsalock);
                        return &f;
                }
                f.frametype = AST_FRAME_VOICE;
                f.subclass = AST_FORMAT_SLINEAR;
-               f.samples = PERIOD_SIZE;
-               f.datalen = PERIOD_SIZE * 2;
+               f.samples = FRAME_SIZE;
+               f.datalen = FRAME_SIZE * 2;
                f.data = buf;
                f.offset = AST_FRIENDLY_OFFSET;
-               f.src = type;
+               f.src = "Console";
                f.mallocd = 0;
+#ifdef ALSA_MONITOR
+               alsa_monitor_read((char *) buf, FRAME_SIZE * 2);
+#endif
 
-#if 0
-               { static int fd = -1;
-                 if (fd < 0)
-                       fd = open("output.raw", O_RDWR | O_TRUNC | O_CREAT);
-                 write(fd, f.data, f.datalen);
-               }
-#endif         
        }
+       ast_mutex_unlock(&alsalock);
        return &f;
 }
-#endif
 
 static int alsa_fixup(struct ast_channel *oldchan, struct ast_channel *newchan)
 {
-       struct chan_alsa_pvt *p = newchan->pvt->pvt;
+       struct chan_alsa_pvt *p = newchan->tech_pvt;
+       ast_mutex_lock(&alsalock);
        p->owner = newchan;
+       ast_mutex_unlock(&alsalock);
        return 0;
 }
 
-static int alsa_indicate(struct ast_channel *chan, int cond)
+static int alsa_indicate(struct ast_channel *chan, int cond, const void *data, size_t datalen)
 {
-       chan_alsa_pvt_t *driver = (chan_alsa_pvt_t *)chan->pvt->pvt;
-       int res;
-       switch(cond) {
-       case AST_CONTROL_BUSY:
-               res = 1;
-               break;
-       case AST_CONTROL_CONGESTION:
-               res = 2;
-               break;
-       case AST_CONTROL_RINGING:
-               res = 0;
-               break;
-       default:
-               ast_log(LOG_WARNING, "Don't know how to display condition %d on %s\n", cond, chan->name);
-               return -1;
-       }
-       if (res > -1) {
-               driver->cursound = res;
-               driver->cursound_offset = 0;
-               driver->nosound = 1;
+       int res = 0;
+
+       ast_mutex_lock(&alsalock);
+
+       switch (cond) {
+               case AST_CONTROL_BUSY:
+                       res = 1;
+                       break;
+               case AST_CONTROL_CONGESTION:
+                       res = 2;
+                       break;
+               case AST_CONTROL_RINGING:
+                       break;
+               case -1:
+                       res = -1;
+                       break;
+               case AST_CONTROL_VIDUPDATE:
+                       res = -1;
+                       break;
+               case AST_CONTROL_HOLD:
+                       ast_verbose(" << Console Has Been Placed on Hold >> \n");
+                       ast_moh_start(chan, data, mohinterpret);
+                       break;
+               case AST_CONTROL_UNHOLD:
+                       ast_verbose(" << Console Has Been Retrieved from Hold >> \n");
+                       ast_moh_stop(chan);
+                       break;
+               default:
+                       ast_log(LOG_WARNING, "Don't know how to display condition %d on %s\n", cond, chan->name);
+                       res = -1;
        }
-       return 0;       
+
+       if (res > -1)
+               write(sndcmd[1], &res, sizeof(res));
+
+       ast_mutex_unlock(&alsalock);
+
+       return res;
 }
 
-/* New channel is about to be used */
 static struct ast_channel *alsa_new(struct chan_alsa_pvt *p, int state)
 {
-       struct ast_channel *tmp;
-       snd_pcm_state_t alsa_state;
-       if (!p->capture_handle || !p->playback_handle) {
-               return 0;
-       }
-       tmp = ast_channel_alloc(1);
-       if (tmp) {
-               snprintf(tmp->name, sizeof(tmp->name), "ALSA/%s", indevname);
-               tmp->type = type;
-               tmp->nativeformats = AST_FORMAT_SLINEAR;
-               tmp->pvt->pvt = p;
-               tmp->pvt->send_digit = alsa_digit;
-               tmp->pvt->send_text = alsa_text;
-               tmp->pvt->hangup = alsa_hangup;
-               tmp->pvt->answer = alsa_answer;
-               tmp->pvt->read = alsa_read;
-               tmp->pvt->call = alsa_call;
-               tmp->pvt->write = alsa_write;
-               tmp->pvt->indicate = alsa_indicate;
-               tmp->pvt->fixup = alsa_fixup;
-               if (strlen(p->context))
-                       strncpy(tmp->context, p->context, sizeof(tmp->context)-1);
-               if (strlen(p->exten))
-                       strncpy(tmp->exten, p->exten, sizeof(tmp->exten)-1);
-               if (strlen(language))
-                       strncpy(tmp->language, language, sizeof(tmp->language)-1);
-               p->owner = tmp;
-               p->pfd = NULL;
-               ast_setstate(tmp, state);
-               ast_mutex_lock(&usecnt_lock);
-               usecnt++;
-               ast_mutex_unlock(&usecnt_lock);
-               ast_update_use_count();
-               if (state != AST_STATE_DOWN) {
-                       if (ast_pbx_start(tmp)) {
-                               ast_log(LOG_WARNING, "Unable to start PBX on %s\n", tmp->name);
-                               ast_hangup(tmp);
-                               tmp = NULL;
-                       }
-               }
-               pthread_create(&p->sound_thread, NULL, sound_thread, (void *) p);
-               alsa_state = snd_pcm_state(p->capture_handle);
-               if (alsa_state == SND_PCM_STATE_XRUN) {
-                       snd_pcm_prepare(p->capture_handle);
-               }
-               alsa_state = snd_pcm_state(p->capture_handle);
-               if (alsa_state == SND_PCM_STATE_PREPARED) {
-                       snd_pcm_start(p->capture_handle);
+       struct ast_channel *tmp = NULL;
+
+       if (!(tmp = ast_channel_alloc(1, state, 0, 0, "ALSA/%s", indevname)))
+               return NULL;
+
+       tmp->tech = &alsa_tech;
+       tmp->fds[0] = readdev;
+       tmp->nativeformats = AST_FORMAT_SLINEAR;
+       tmp->readformat = AST_FORMAT_SLINEAR;
+       tmp->writeformat = AST_FORMAT_SLINEAR;
+       tmp->tech_pvt = p;
+       if (!ast_strlen_zero(p->context))
+               ast_copy_string(tmp->context, p->context, sizeof(tmp->context));
+       if (!ast_strlen_zero(p->exten))
+               ast_copy_string(tmp->exten, p->exten, sizeof(tmp->exten));
+       if (!ast_strlen_zero(language))
+               ast_string_field_set(tmp, language, language);
+       p->owner = tmp;
+       ast_module_ref(ast_module_info->self);
+       ast_jb_configure(tmp, &global_jbconf);
+       if (state != AST_STATE_DOWN) {
+               if (ast_pbx_start(tmp)) {
+                       ast_log(LOG_WARNING, "Unable to start PBX on %s\n", tmp->name);
+                       ast_hangup(tmp);
+                       tmp = NULL;
                }
        }
+
        return tmp;
 }
 
-static struct ast_channel *alsa_request(char *type, int format, void *data)
+static struct ast_channel *alsa_request(const char *type, int format, void *data, int *cause)
 {
        int oldformat = format;
-       struct ast_channel *tmp;
+       struct ast_channel *tmp = NULL;
+
        format &= AST_FORMAT_SLINEAR;
        if (!format) {
                ast_log(LOG_NOTICE, "Asked to get a channel of format '%d'\n", oldformat);
                return NULL;
        }
+
+       ast_mutex_lock(&alsalock);
+
        if (alsa.owner) {
                ast_log(LOG_NOTICE, "Already have a call on the ALSA channel\n");
-               return NULL;
-       }
-       tmp= alsa_new(&alsa, AST_STATE_DOWN);
-       if (!tmp) {
+               *cause = AST_CAUSE_BUSY;
+       } else if (!(tmp = alsa_new(&alsa, AST_STATE_DOWN)))
                ast_log(LOG_WARNING, "Unable to create new ALSA channel\n");
-       }
+
+       ast_mutex_unlock(&alsalock);
+
        return tmp;
 }
 
 static int console_autoanswer(int fd, int argc, char *argv[])
 {
-       if ((argc != 1) && (argc != 2))
+       int res = RESULT_SUCCESS;;
+       if ((argc != 2) && (argc != 3))
                return RESULT_SHOWUSAGE;
-       if (argc == 1) {
+       ast_mutex_lock(&alsalock);
+       if (argc == 2) {
                ast_cli(fd, "Auto answer is %s.\n", autoanswer ? "on" : "off");
-               return RESULT_SUCCESS;
        } else {
-               if (!strcasecmp(argv[1], "on"))
+               if (!strcasecmp(argv[2], "on"))
                        autoanswer = -1;
-               else if (!strcasecmp(argv[1], "off"))
+               else if (!strcasecmp(argv[2], "off"))
                        autoanswer = 0;
                else
-                       return RESULT_SHOWUSAGE;
+                       res = RESULT_SHOWUSAGE;
        }
-       return RESULT_SUCCESS;
+       ast_mutex_unlock(&alsalock);
+       return res;
 }
 
-static char *autoanswer_complete(char *line, char *word, int pos, int state)
+static char *autoanswer_complete(const char *line, const char *word, int pos, int state)
 {
 #ifndef MIN
 #define MIN(a,b) ((a) < (b) ? (a) : (b))
 #endif
-       switch(state) {
-       case 0:
-               if (strlen(word) && !strncasecmp(word, "on", MIN(strlen(word), 2)))
-                       return strdup("on");
-       case 1:
-               if (strlen(word) && !strncasecmp(word, "off", MIN(strlen(word), 3)))
-                       return strdup("off");
-       default:
-               return NULL;
+       switch (state) {
+               case 0:
+                       if (!ast_strlen_zero(word) && !strncasecmp(word, "on", MIN(strlen(word), 2)))
+                               return ast_strdup("on");
+               case 1:
+                       if (!ast_strlen_zero(word) && !strncasecmp(word, "off", MIN(strlen(word), 3)))
+                               return ast_strdup("off");
+               default:
+                       return NULL;
        }
        return NULL;
 }
 
-static char autoanswer_usage[] =
-"Usage: autoanswer [on|off]\n"
-"       Enables or disables autoanswer feature.  If used without\n"
-"       argument, displays the current on/off status of autoanswer.\n"
-"       The default value of autoanswer is in 'alsa.conf'.\n";
+static const char autoanswer_usage[] =
+       "Usage: console autoanswer [on|off]\n"
+       "       Enables or disables autoanswer feature.  If used without\n"
+       "       argument, displays the current on/off status of autoanswer.\n"
+       "       The default value of autoanswer is in 'alsa.conf'.\n";
 
 static int console_answer(int fd, int argc, char *argv[])
 {
-        struct ast_frame f = { AST_FRAME_CONTROL, AST_CONTROL_ANSWER };
-       if (argc != 1)
+       int res = RESULT_SUCCESS;
+
+       if (argc != 2)
                return RESULT_SHOWUSAGE;
+
+       ast_mutex_lock(&alsalock);
+
        if (!alsa.owner) {
                ast_cli(fd, "No one is calling us\n");
-               return RESULT_FAILURE;
+               res = RESULT_FAILURE;
+       } else {
+               hookstate = 1;
+               cursound = -1;
+               grab_owner();
+               if (alsa.owner) {
+                       struct ast_frame f = { AST_FRAME_CONTROL, AST_CONTROL_ANSWER };
+                       ast_queue_frame(alsa.owner, &f);
+                       ast_mutex_unlock(&alsa.owner->lock);
+               }
+               answer_sound();
        }
-       hookstate = 1;
-       ast_queue_frame(alsa.owner, &f);
-       answer_sound(&alsa);
+
+       snd_pcm_prepare(alsa.icard);
+       snd_pcm_start(alsa.icard);
+
+       ast_mutex_unlock(&alsalock);
+
        return RESULT_SUCCESS;
 }
 
-static char sendtext_usage[] =
-"Usage: send text <message>\n"
-"       Sends a text message for display on the remote terminal.\n";
+static const char sendtext_usage[] =
+       "Usage: console send text <message>\n"
+       "       Sends a text message for display on the remote terminal.\n";
 
 static int console_sendtext(int fd, int argc, char *argv[])
 {
-       int tmparg = 2;
-       struct ast_frame f = { 0, };
-       if (argc < 2)
+       int tmparg = 3;
+       int res = RESULT_SUCCESS;
+
+       if (argc < 3)
                return RESULT_SHOWUSAGE;
+
+       ast_mutex_lock(&alsalock);
+
        if (!alsa.owner) {
                ast_cli(fd, "No one is calling us\n");
-               return RESULT_FAILURE;
-       }
-       if (strlen(text2send))
-               ast_cli(fd, "Warning: message already waiting to be sent, overwriting\n");
-       strcpy(text2send, "");
-       while(tmparg <= argc) {
-               strncat(text2send, argv[tmparg++], sizeof(text2send) - strlen(text2send));
-               strncat(text2send, " ", sizeof(text2send) - strlen(text2send));
+               res = RESULT_FAILURE;
+       } else {
+               struct ast_frame f = { AST_FRAME_TEXT, 0 };
+               char text2send[256] = "";
+               text2send[0] = '\0';
+               while (tmparg < argc) {
+                       strncat(text2send, argv[tmparg++], sizeof(text2send) - strlen(text2send) - 1);
+                       strncat(text2send, " ", sizeof(text2send) - strlen(text2send) - 1);
+               }
+               text2send[strlen(text2send) - 1] = '\n';
+               f.data = text2send;
+               f.datalen = strlen(text2send) + 1;
+               grab_owner();
+               if (alsa.owner) {
+                       ast_queue_frame(alsa.owner, &f);
+                       f.frametype = AST_FRAME_CONTROL;
+                       f.subclass = AST_CONTROL_ANSWER;
+                       f.data = NULL;
+                       f.datalen = 0;
+                       ast_queue_frame(alsa.owner, &f);
+                       ast_mutex_unlock(&alsa.owner->lock);
+               }
        }
-       if (strlen(text2send)) {
-                f.frametype = AST_FRAME_TEXT;
-                f.subclass = 0;
-                f.data = text2send;
-                f.datalen = strlen(text2send);
-                ast_queue_frame(alsa.owner, &f);
-        }
-       return RESULT_SUCCESS;
+
+       ast_mutex_unlock(&alsalock);
+
+       return res;
 }
 
-static char answer_usage[] =
-"Usage: answer\n"
-"       Answers an incoming call on the console (ALSA) channel.\n";
+static const char answer_usage[] =
+       "Usage: console answer\n"
+       "       Answers an incoming call on the console (ALSA) channel.\n";
 
 static int console_hangup(int fd, int argc, char *argv[])
 {
-       if (argc != 1)
+       int res = RESULT_SUCCESS;
+
+       if (argc != 2)
                return RESULT_SHOWUSAGE;
-       alsa.cursound = -1;
-       alsa.nosound = 0;
+
+       cursound = -1;
+
+       ast_mutex_lock(&alsalock);
+
        if (!alsa.owner && !hookstate) {
                ast_cli(fd, "No call to hangup up\n");
-               return RESULT_FAILURE;
-       }
-       hookstate = 0;
-       if (alsa.owner) {
-               ast_queue_hangup(alsa.owner);
+               res = RESULT_FAILURE;
+       } else {
+               hookstate = 0;
+               grab_owner();
+               if (alsa.owner) {
+                       ast_queue_hangup(alsa.owner);
+                       ast_mutex_unlock(&alsa.owner->lock);
+               }
        }
-       return RESULT_SUCCESS;
-}
 
-static char hangup_usage[] =
-"Usage: hangup\n"
-"       Hangs up any call currently placed on the console.\n";
+       ast_mutex_unlock(&alsalock);
 
+       return res;
+}
+
+static const char hangup_usage[] =
+       "Usage: console hangup\n"
+       "       Hangs up any call currently placed on the console.\n";
 
 static int console_dial(int fd, int argc, char *argv[])
 {
        char tmp[256], *tmp2;
        char *mye, *myc;
-       int b = 0;
-       int x;
-       struct ast_frame f = { AST_FRAME_DTMF, 0 };
-       if ((argc != 1) && (argc != 2))
+       char *d;
+       int res = RESULT_SUCCESS;
+
+       if ((argc != 2) && (argc != 3))
                return RESULT_SHOWUSAGE;
+
+       ast_mutex_lock(&alsalock);
+
        if (alsa.owner) {
-               if (argc == 2) {
-                       for (x=0;x<strlen(argv[1]);x++) {
-                                f.subclass = argv[1][x];
-                                ast_queue_frame(alsa.owner, &f);
-                        }
+               if (argc == 3) {
+                       d = argv[2];
+                       grab_owner();
+                       if (alsa.owner) {
+                               struct ast_frame f = { AST_FRAME_DTMF };
+                               while (*d) {
+                                       f.subclass = *d;
+                                       ast_queue_frame(alsa.owner, &f);
+                                       d++;
+                               }
+                               ast_mutex_unlock(&alsa.owner->lock);
+                       }
                } else {
                        ast_cli(fd, "You're already in a call.  You can use this only to dial digits until you hangup\n");
-                       return RESULT_FAILURE;
+                       res = RESULT_FAILURE;
                }
-               return RESULT_SUCCESS;
-       }
-       mye = exten;
-       myc = context;
-       if (argc == 2) {
-               char *stringp=NULL;
-               strncpy(tmp, argv[1], sizeof(tmp)-1);
-               stringp=tmp;
-               strsep(&stringp, "@");
-               tmp2 = strsep(&stringp, "@");
-               if (strlen(tmp))
-                       mye = tmp;
-               if (tmp2 && strlen(tmp2))
-                       myc = tmp2;
+       } else {
+               mye = exten;
+               myc = context;
+               if (argc == 3) {
+                       char *stringp = NULL;
+                       ast_copy_string(tmp, argv[2], sizeof(tmp));
+                       stringp = tmp;
+                       strsep(&stringp, "@");
+                       tmp2 = strsep(&stringp, "@");
+                       if (!ast_strlen_zero(tmp))
+                               mye = tmp;
+                       if (!ast_strlen_zero(tmp2))
+                               myc = tmp2;
+               }
+               if (ast_exists_extension(NULL, myc, mye, 1, NULL)) {
+                       ast_copy_string(alsa.exten, mye, sizeof(alsa.exten));
+                       ast_copy_string(alsa.context, myc, sizeof(alsa.context));
+                       hookstate = 1;
+                       alsa_new(&alsa, AST_STATE_RINGING);
+               } else
+                       ast_cli(fd, "No such extension '%s' in context '%s'\n", mye, myc);
        }
-       if (ast_exists_extension(NULL, myc, mye, 1, NULL)) {
-               strncpy(alsa.exten, mye, sizeof(alsa.exten)-1);
-               strncpy(alsa.context, myc, sizeof(alsa.context)-1);
-               hookstate = 1;
-               alsa_new(&alsa, AST_STATE_RINGING);
-       } else
-               ast_cli(fd, "No such extension '%s' in context '%s'\n", mye, myc);
-       return RESULT_SUCCESS;
+
+       ast_mutex_unlock(&alsalock);
+
+       return res;
 }
 
-static char dial_usage[] =
-"Usage: dial [extension[@context]]\n"
-"       Dials a given extensison (";
+static const char dial_usage[] =
+       "Usage: console dial [extension[@context]]\n"
+       "       Dials a given extension (and context if specified)\n";
+
+static struct ast_cli_entry cli_alsa[] = {
+       { { "console", "answer", NULL },
+       console_answer, "Answer an incoming console call",
+       answer_usage },
+
+       { { "console", "hangup", NULL },
+       console_hangup, "Hangup a call on the console",
+       hangup_usage },
 
+       { { "console", "dial", NULL },
+       console_dial, "Dial an extension on the console",
+       dial_usage },
 
-static struct ast_cli_entry myclis[] = {
-       { { "answer", NULL }, console_answer, "Answer an incoming console call", answer_usage },
-       { { "hangup", NULL }, console_hangup, "Hangup a call on the console", hangup_usage },
-       { { "dial", NULL }, console_dial, "Dial an extension on the console", dial_usage },
-       { { "send", "text", NULL }, console_sendtext, "Send text to the remote device", sendtext_usage },
-       { { "autoanswer", NULL }, console_autoanswer, "Sets/displays autoanswer", autoanswer_usage, autoanswer_complete }
+       { { "console", "send", "text", NULL },
+       console_sendtext, "Send text to the remote device",
+       sendtext_usage },
+
+       { { "console", "autoanswer", NULL },
+       console_autoanswer, "Sets/displays autoanswer",
+       autoanswer_usage, autoanswer_complete },
 };
 
-int load_module()
+static int load_module(void)
 {
-       int res;
-       int x;
-       int flags;
        struct ast_config *cfg;
        struct ast_variable *v;
-#if 0
-       res = pipe(cmd);
-       res = pipe(sndcmd);
-       
-       if (res) {
-               ast_log(LOG_ERROR, "Unable to create pipe\n");
-               return -1;
-       }
-       flags = fcntl(cmd[0], F_GETFL);
-       fcntl(cmd[0], F_SETFL, flags | O_NONBLOCK);
-       flags = fcntl(cmd[1], F_GETFL);
-       fcntl(cmd[1], F_SETFL, flags | O_NONBLOCK);
-#endif
-#if 0
-       if (!full_duplex)
-               ast_log(LOG_WARNING, "XXX I don't work right with non-full duplex sound cards XXX\n");
-#endif
-       res = ast_channel_register(type, tdesc, AST_FORMAT_SLINEAR, alsa_request);
-       if (res < 0) {
-               ast_log(LOG_ERROR, "Unable to register channel class '%s'\n", type);
-               return -1;
+
+       /* Copy the default jb config over global_jbconf */
+       memcpy(&global_jbconf, &default_jbconf, sizeof(struct ast_jb_conf));
+
+       strcpy(mohinterpret, "default");
+
+       if (!(cfg = ast_config_load(config)))
+               return AST_MODULE_LOAD_DECLINE;
+
+       v = ast_variable_browse(cfg, "general");
+       for (; v; v = v->next) {
+               /* handle jb conf */
+               if (!ast_jb_read_conf(&global_jbconf, v->name, v->value))
+                               continue;
+               
+               if (!strcasecmp(v->name, "autoanswer"))
+                       autoanswer = ast_true(v->value);
+               else if (!strcasecmp(v->name, "silencesuppression"))
+                       silencesuppression = ast_true(v->value);
+               else if (!strcasecmp(v->name, "silencethreshold"))
+                       silencethreshold = atoi(v->value);
+               else if (!strcasecmp(v->name, "context"))
+                       ast_copy_string(context, v->value, sizeof(context));
+               else if (!strcasecmp(v->name, "language"))
+                       ast_copy_string(language, v->value, sizeof(language));
+               else if (!strcasecmp(v->name, "extension"))
+                       ast_copy_string(exten, v->value, sizeof(exten));
+               else if (!strcasecmp(v->name, "input_device"))
+                       ast_copy_string(indevname, v->value, sizeof(indevname));
+               else if (!strcasecmp(v->name, "output_device"))
+                       ast_copy_string(outdevname, v->value, sizeof(outdevname));
+               else if (!strcasecmp(v->name, "mohinterpret"))
+                       ast_copy_string(mohinterpret, v->value, sizeof(mohinterpret));
        }
-       for (x=0;x<sizeof(myclis)/sizeof(struct ast_cli_entry); x++)
-               ast_cli_register(myclis + x);
-       if ((cfg = ast_load(config))) {
-               v = ast_variable_browse(cfg, "general");
-               while(v) {
-                       if (!strcasecmp(v->name, "autoanswer"))
-                               autoanswer = ast_true(v->value);
-                       else if (!strcasecmp(v->name, "silencesuppression"))
-                               silencesuppression = ast_true(v->value);
-                       else if (!strcasecmp(v->name, "silencethreshold"))
-                               silencethreshold = atoi(v->value);
-                       else if (!strcasecmp(v->name, "context"))
-                               strncpy(context, v->value, sizeof(context)-1);
-                       else if (!strcasecmp(v->name, "language"))
-                               strncpy(language, v->value, sizeof(language)-1);
-                       else if (!strcasecmp(v->name, "extension"))
-                               strncpy(exten, v->value, sizeof(exten)-1);
-                       else if (!strcasecmp(v->name, "input_device")) {
-                               strncpy(indevname, v->value, sizeof(indevname)-1);
-                       } else if (!strcasecmp(v->name, "output_device"))
-                               strncpy(outdevname, v->value, sizeof(outdevname)-1);
-                       v=v->next;
-               }
-               ast_destroy(cfg);
+       ast_config_destroy(cfg);
+
+       if (pipe(sndcmd)) {
+               ast_log(LOG_ERROR, "Unable to create pipe\n");
+               return AST_MODULE_LOAD_FAILURE;
        }
-       res = soundcard_init();
-       if (res < 0) {
-               close(cmd[1]);
-               close(cmd[0]);
+
+       if (soundcard_init() < 0) {
                if (option_verbose > 1) {
                        ast_verbose(VERBOSE_PREFIX_2 "No sound card detected -- console channel will be unavailable\n");
                        ast_verbose(VERBOSE_PREFIX_2 "Turn off ALSA support by adding 'noload=chan_alsa.so' in /etc/asterisk/modules.conf\n");
                }
-               return 0;
+               return AST_MODULE_LOAD_DECLINE;
        }
-       return 0;
-}
 
+       if (ast_channel_register(&alsa_tech)) {
+               ast_log(LOG_ERROR, "Unable to register channel class 'Console'\n");
+               return AST_MODULE_LOAD_FAILURE;
+       }
 
+       ast_cli_register_multiple(cli_alsa, sizeof(cli_alsa) / sizeof(struct ast_cli_entry));
 
-int unload_module()
+       ast_pthread_create_background(&sthread, NULL, sound_thread, NULL);
+#ifdef ALSA_MONITOR
+       if (alsa_monitor_start())
+               ast_log(LOG_ERROR, "Problem starting Monitoring\n");
+#endif
+       return AST_MODULE_LOAD_SUCCESS;
+}
+
+static int unload_module(void)
 {
-       int x;
-       for (x=0;x<sizeof(myclis)/sizeof(struct ast_cli_entry); x++)
-               ast_cli_unregister(myclis + x);
-       if (cmd[0] > 0) {
-               close(cmd[0]);
-               close(cmd[1]);
-       }
+       ast_channel_unregister(&alsa_tech);
+       ast_cli_unregister_multiple(cli_alsa, sizeof(cli_alsa) / sizeof(struct ast_cli_entry));
+
+       if (alsa.icard)
+               snd_pcm_close(alsa.icard);
+       if (alsa.ocard)
+               snd_pcm_close(alsa.ocard);
        if (sndcmd[0] > 0) {
                close(sndcmd[0]);
                close(sndcmd[1]);
@@ -1084,28 +1168,7 @@ int unload_module()
                ast_softhangup(alsa.owner, AST_SOFTHANGUP_APPUNLOAD);
        if (alsa.owner)
                return -1;
-       if (alsa.capture_buf) {
-               free (alsa.capture_buf);
-               alsa.capture_buf=0;
-       }
        return 0;
 }
 
-char *description()
-{
-       return desc;
-}
-
-int usecount()
-{
-       int res;
-       ast_mutex_lock(&usecnt_lock);
-       res = usecnt;
-       ast_mutex_unlock(&usecnt_lock);
-       return res;
-}
-
-char *key()
-{
-       return ASTERISK_GPL_KEY;
-}
+AST_MODULE_INFO_STANDARD(ASTERISK_GPL_KEY, "ALSA Console Channel Driver");