1068 lines
30 KiB
C
1068 lines
30 KiB
C
/* $Id$
|
|
*
|
|
* Author Andreas Eversberg (jolly@eversberg.eu)
|
|
* Based on source code structure by
|
|
* Karsten Keil (keil@isdn4linux.de)
|
|
*
|
|
* This file is (c) under GNU PUBLIC LICENSE
|
|
* For changes and modifications please read
|
|
* ../../../Documentation/isdn/mISDN.cert
|
|
*
|
|
* Thanks to Karsten Keil (great drivers)
|
|
* Cologne Chip (great chips)
|
|
*
|
|
* This module does:
|
|
* Real-time tone generation
|
|
* DTMF detection
|
|
* Real-time cross-connection and conferrence
|
|
* Compensate jitter due to system load and hardware fault.
|
|
* All features are done in kernel space and will be realized
|
|
* using hardware, if available and supported by chip set.
|
|
* Blowfish encryption/decryption
|
|
*/
|
|
|
|
/* STRUCTURE:
|
|
*
|
|
* The dsp module provides layer 2 for b-channels (64kbit). It provides
|
|
* transparent audio forwarding with special digital signal processing:
|
|
*
|
|
* - (1) generation of tones
|
|
* - (2) detection of dtmf tones
|
|
* - (3) crossconnecting and conferences
|
|
* - (4) echo generation for delay test
|
|
* - (5) volume control
|
|
* - (6) disable receive data
|
|
* - (7) echo cancelation
|
|
* - (8) encryption/decryption
|
|
*
|
|
* Look:
|
|
* TX RX
|
|
* ------upper layer------
|
|
* | ^
|
|
* | |(6)
|
|
* v |
|
|
* +-----+-------------+-----+
|
|
* |(3)(4) |
|
|
* | CMX |
|
|
* | |
|
|
* | +-------------+
|
|
* | | ^
|
|
* | | |
|
|
* |+---------+| +----+----+
|
|
* ||(1) || |(5) |
|
|
* || || | |
|
|
* || Tones || |RX Volume|
|
|
* || || | |
|
|
* || || | |
|
|
* |+----+----+| +----+----+
|
|
* +-----+-----+ ^
|
|
* | |
|
|
* v |
|
|
* +----+----+ +----+----+
|
|
* |(5) | |(2) |
|
|
* | | | |
|
|
* |TX Volume| | DTMF |
|
|
* | | | |
|
|
* | | | |
|
|
* +----+----+ +----+----+
|
|
* | ^
|
|
* | |
|
|
* v |
|
|
* +----+-------------+----+
|
|
* |(7) |
|
|
* | |
|
|
* | Echo Cancellation |
|
|
* | |
|
|
* | |
|
|
* +----+-------------+----+
|
|
* | ^
|
|
* | |
|
|
* v |
|
|
* +----+----+ +----+----+
|
|
* |(8) | |(8) |
|
|
* | | | |
|
|
* | Encrypt | | Decrypt |
|
|
* | | | |
|
|
* | | | |
|
|
* +----+----+ +----+----+
|
|
* | ^
|
|
* | |
|
|
* v |
|
|
* ------card layer------
|
|
* TX RX
|
|
*
|
|
* Above you can see the logical data flow. If software is used to do the
|
|
* process, it is actually the real data flow. If hardware is used, data
|
|
* may not flow, but hardware commands to the card, to provide the data flow
|
|
* as shown.
|
|
*
|
|
* NOTE: The channel must be activated in order to make dsp work, even if
|
|
* no data flow to the upper layer is intended. Activation can be done
|
|
* after and before controlling the setting using PH_CONTROL requests.
|
|
*
|
|
* DTMF: Will be detected by hardware if possible. It is done before CMX
|
|
* processing.
|
|
*
|
|
* Tones: Will be generated via software if endless looped audio fifos are
|
|
* not supported by hardware. Tones will override all data from CMX.
|
|
* It is not required to join a conference to use tones at any time.
|
|
*
|
|
* CMX: Is transparent when not used. When it is used, it will do
|
|
* crossconnections and conferences via software if not possible through
|
|
* hardware. If hardware capability is available, hardware is used.
|
|
*
|
|
* Echo: Is generated by CMX and is used to check performane of hard and
|
|
* software CMX.
|
|
*
|
|
* The CMX has special functions for conferences with one, two and more
|
|
* members. It will allow different types of data flow. Receive and transmit
|
|
* data to/form upper layer may be swithed on/off individually without loosing
|
|
* features of CMX, Tones and DTMF.
|
|
*
|
|
* Echo Cancellation: Sometimes we like to cancel echo from the interface.
|
|
* Note that a VoIP call may not have echo caused by the IP phone. The echo
|
|
* is generated by the telephone line connected to it. Because the delay
|
|
* is high, it becomes an echo. RESULT: Echo Cachelation is required if
|
|
* both echo AND delay is applied to an interface.
|
|
* Remember that software CMX always generates a more or less delay.
|
|
*
|
|
* If all used features can be realized in hardware, and if transmit and/or
|
|
* receive data ist disabled, the card may not send/receive any data at all.
|
|
* Not receiving is usefull if only announcements are played. Not sending is
|
|
* usefull if an answering machine records audio. Not sending and receiving is
|
|
* usefull during most states of the call. If supported by hardware, tones
|
|
* will be played without cpu load. Small PBXs and NT-Mode applications will
|
|
* not need expensive hardware when processing calls.
|
|
*
|
|
*
|
|
* LOCKING:
|
|
*
|
|
* When data is received from upper or lower layer (card), the complete dsp
|
|
* module is locked by a global lock. When data is ready to be transmitted
|
|
* to a different layer, the module is unlocked. It is not allowed to hold a
|
|
* lock outside own layer.
|
|
* Reasons: Multiple threads must not process cmx at the same time, if threads
|
|
* serve instances, that are connected in same conference.
|
|
* PH_CONTROL must not change any settings, join or split conference members
|
|
* during process of data.
|
|
*
|
|
*
|
|
* TRANSMISSION:
|
|
*
|
|
|
|
TBD
|
|
|
|
There are three things that need to receive data from card:
|
|
- software DTMF decoder
|
|
- software cmx (if conference exists)
|
|
- upper layer, if rx-data not disabled
|
|
|
|
Whenever dtmf decoder is turned on or off, software cmx changes, rx-data is disabled or enabled, or card becomes activated, then rx-data is disabled or enabled using a special command to the card.
|
|
|
|
There are three things that need to transmit data to card:
|
|
- software tone generation (part of cmx)
|
|
- software cmx
|
|
- upper layer, if tx-data is written to tx-buffer
|
|
|
|
|
|
|
|
|
|
*/
|
|
|
|
const char *dsp_revision = "$Revision$";
|
|
|
|
#include <linux/delay.h>
|
|
#include <linux/module.h>
|
|
#include <linux/vmalloc.h>
|
|
#include "core.h"
|
|
#include "layer1.h"
|
|
#include "helper.h"
|
|
#include "debug.h"
|
|
#include "dsp.h"
|
|
|
|
static char DSPName[] = "DSP";
|
|
mISDNobject_t dsp_obj;
|
|
|
|
static int debug = 0;
|
|
int dsp_debug;
|
|
static int options = 0;
|
|
int dsp_options;
|
|
static int poll = 0;
|
|
int dsp_poll, dsp_tics;
|
|
|
|
int dtmfthreshold=100L;
|
|
|
|
#ifdef MODULE
|
|
MODULE_AUTHOR("Andreas Eversberg");
|
|
#ifdef OLD_MODULE_PARAM
|
|
MODULE_PARM(debug, "1i");
|
|
MODULE_PARM(options, "1i");
|
|
MODULE_PARM(poll, "1i");
|
|
MODULE_PARM(dtmfthreshold, "1i");
|
|
#else
|
|
module_param(debug, uint, S_IRUGO | S_IWUSR);
|
|
module_param(options, uint, S_IRUGO | S_IWUSR);
|
|
module_param(poll, uint, S_IRUGO | S_IWUSR);
|
|
module_param(dtmfthreshold, uint, S_IRUGO | S_IWUSR);
|
|
#endif
|
|
#ifdef MODULE_LICENSE
|
|
MODULE_LICENSE("GPL");
|
|
#endif
|
|
#endif
|
|
|
|
|
|
/*
|
|
* special message process for DL_CONTROL | REQUEST
|
|
*/
|
|
static int
|
|
dsp_control_req(dsp_t *dsp, mISDN_head_t *hh, struct sk_buff *skb)
|
|
{
|
|
struct sk_buff *nskb;
|
|
int ret = 0;
|
|
int cont;
|
|
u8 *data;
|
|
int len;
|
|
|
|
if (skb->len < sizeof(int)) {
|
|
printk(KERN_ERR "%s: PH_CONTROL message too short\n", __FUNCTION__);
|
|
}
|
|
cont = *((int *)skb->data);
|
|
len = skb->len - sizeof(int);
|
|
data = skb->data + sizeof(int);
|
|
|
|
switch (cont) {
|
|
case DTMF_TONE_START: /* turn on DTMF */
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: start dtmf\n", __FUNCTION__);
|
|
#if 0
|
|
if (len == sizeof(int)) {
|
|
printk(KERN_NOTICE "changing DTMF Threshold to %d\n",*((int*)data));
|
|
dsp->dtmf.treshold=(*(int*)data)*10000;
|
|
}
|
|
#endif
|
|
|
|
dsp_dtmf_goertzel_init(dsp);
|
|
dsp->dtmf.software = 0;
|
|
dsp->dtmf.hardware = 0;
|
|
|
|
/* checking for hardware capability */
|
|
spin_lock(&dsp->feature_lock);
|
|
if (dsp->feature_state != FEAT_STATE_RECEIVED) {
|
|
dsp->queue_dtmf=1;
|
|
spin_unlock(&dsp->feature_lock);
|
|
break;
|
|
}
|
|
spin_unlock(&dsp->feature_lock);
|
|
if (dsp->features.hfc_dtmf) {
|
|
dsp->dtmf.hardware = 1;
|
|
} else {
|
|
dsp->dtmf.software = 1;
|
|
}
|
|
break;
|
|
case DTMF_TONE_STOP: /* turn off DTMF */
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: stop dtmf\n", __FUNCTION__);
|
|
dsp->queue_dtmf=0;
|
|
dsp->dtmf.hardware = 0;
|
|
dsp->dtmf.software = 0;
|
|
break;
|
|
case CMX_CONF_JOIN: /* join / update conference */
|
|
if (len != sizeof(int)) {
|
|
ret = -EINVAL;
|
|
break;
|
|
}
|
|
if (*((u32 *)data) == 0)
|
|
goto conf_split;
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: join conference %d\n", __FUNCTION__, *((u32 *)data));
|
|
ret = dsp_cmx_conf(dsp, *((u32 *)data));
|
|
if (dsp_debug & DEBUG_DSP_CMX)
|
|
dsp_cmx_debug(dsp);
|
|
break;
|
|
case CMX_CONF_SPLIT: /* remove from conference */
|
|
conf_split:
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: release conference\n", __FUNCTION__);
|
|
ret = dsp_cmx_conf(dsp, 0);
|
|
if (dsp_debug & DEBUG_DSP_CMX)
|
|
dsp_cmx_debug(dsp);
|
|
break;
|
|
case TONE_PATT_ON: /* play tone */
|
|
if (len != sizeof(int)) {
|
|
ret = -EINVAL;
|
|
break;
|
|
}
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: turn tone 0x%x on\n", __FUNCTION__, *((int *)skb->data));
|
|
ret = dsp_tone(dsp, *((int *)data));
|
|
if (!ret)
|
|
dsp_cmx_hardware(dsp->conf, dsp);
|
|
if (!dsp->tone.tone)
|
|
goto tone_off;
|
|
break;
|
|
case TONE_PATT_OFF: /* stop tone */
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: turn tone off\n", __FUNCTION__);
|
|
dsp_tone(dsp, 0);
|
|
dsp_cmx_hardware(dsp->conf, dsp);
|
|
/* reset tx buffers (user space data) */
|
|
tone_off:
|
|
dsp->tx_R = dsp->tx_W = 0;
|
|
break;
|
|
case VOL_CHANGE_TX: /* change volume */
|
|
if (len != sizeof(int)) {
|
|
ret = -EINVAL;
|
|
break;
|
|
}
|
|
dsp->tx_volume = *((int *)data);
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: change tx volume to %d\n", __FUNCTION__, dsp->tx_volume);
|
|
dsp_cmx_hardware(dsp->conf, dsp);
|
|
break;
|
|
case VOL_CHANGE_RX: /* change volume */
|
|
if (len != sizeof(int)) {
|
|
ret = -EINVAL;
|
|
break;
|
|
}
|
|
dsp->rx_volume = *((int *)data);
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: change rx volume to %d\n", __FUNCTION__, dsp->tx_volume);
|
|
dsp_cmx_hardware(dsp->conf, dsp);
|
|
break;
|
|
case CMX_ECHO_ON: /* enable echo */
|
|
dsp->echo = 1; /* soft echo */
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: enable cmx-echo\n", __FUNCTION__);
|
|
dsp_cmx_hardware(dsp->conf, dsp);
|
|
if (dsp_debug & DEBUG_DSP_CMX)
|
|
dsp_cmx_debug(dsp);
|
|
break;
|
|
case CMX_ECHO_OFF: /* disable echo */
|
|
dsp->echo = 0;
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: disable cmx-echo\n", __FUNCTION__);
|
|
dsp_cmx_hardware(dsp->conf, dsp);
|
|
if (dsp_debug & DEBUG_DSP_CMX)
|
|
dsp_cmx_debug(dsp);
|
|
break;
|
|
case CMX_RECEIVE_ON: /* enable receive to user space */
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: enable receive to user space\n", __FUNCTION__);
|
|
dsp->rx_disabled = 0;
|
|
dsp_cmx_hardware(dsp->conf, dsp);
|
|
break;
|
|
case CMX_RECEIVE_OFF: /* disable receive to user space */
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: disable receive to user space\n", __FUNCTION__);
|
|
dsp->rx_disabled = 1;
|
|
dsp_cmx_hardware(dsp->conf, dsp);
|
|
break;
|
|
case CMX_MIX_ON: /* enable mixing of transmit data with conference members */
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: enable mixing of tx-data with conf mebers\n", __FUNCTION__);
|
|
dsp->tx_mix = 1;
|
|
dsp_cmx_hardware(dsp->conf, dsp);
|
|
if (dsp_debug & DEBUG_DSP_CMX)
|
|
dsp_cmx_debug(dsp);
|
|
break;
|
|
case CMX_MIX_OFF: /* disable mixing of transmit data with conference members */
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: disable mixing of tx-data with conf mebers\n", __FUNCTION__);
|
|
dsp->tx_mix = 0;
|
|
dsp_cmx_hardware(dsp->conf, dsp);
|
|
if (dsp_debug & DEBUG_DSP_CMX)
|
|
dsp_cmx_debug(dsp);
|
|
break;
|
|
case ECHOCAN_ON: /* turn echo calcellation on */
|
|
if (len<4) {
|
|
ret = -EINVAL;
|
|
} else {
|
|
int ec_arr[2];
|
|
memcpy(&ec_arr,data,sizeof(ec_arr));
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: turn echo cancelation on (delay=%d attenuation-shift=%d\n",
|
|
__FUNCTION__, ec_arr[0], ec_arr[1]);
|
|
|
|
ret = dsp_cancel_init(dsp, ec_arr[0], ec_arr[1] ,1);
|
|
dsp_cmx_hardware(dsp->conf, dsp);
|
|
}
|
|
break;
|
|
case ECHOCAN_OFF: /* turn echo calcellation off */
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: turn echo cancelation off\n", __FUNCTION__);
|
|
|
|
ret = dsp_cancel_init(dsp, 0,0,-1);
|
|
dsp_cmx_hardware(dsp->conf, dsp);
|
|
break;
|
|
case BF_ENABLE_KEY: /* turn blowfish on */
|
|
if (len<4 || len>56) {
|
|
ret = -EINVAL;
|
|
break;
|
|
}
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: turn blowfish on (key not shown)\n", __FUNCTION__);
|
|
ret = dsp_bf_init(dsp, (u8*)data, len);
|
|
/* set new cont */
|
|
if (!ret)
|
|
cont = BF_ACCEPT;
|
|
else
|
|
cont = BF_REJECT;
|
|
/* send indication if it worked to set it */
|
|
nskb = create_link_skb(PH_CONTROL | INDICATION, 0, sizeof(int), &cont, 0);
|
|
if (mISDN_queue_up(&dsp->inst, 0, nskb))
|
|
dev_kfree_skb(nskb);
|
|
if (!ret)
|
|
dsp_cmx_hardware(dsp->conf, dsp);
|
|
break;
|
|
case BF_DISABLE: /* turn blowfish off */
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: turn blowfish off\n", __FUNCTION__);
|
|
dsp_bf_cleanup(dsp);
|
|
dsp_cmx_hardware(dsp->conf, dsp);
|
|
break;
|
|
default:
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: ctrl req %x unhandled\n", __FUNCTION__, cont);
|
|
ret = -EINVAL;
|
|
}
|
|
if (!ret)
|
|
dev_kfree_skb(skb);
|
|
return(ret);
|
|
}
|
|
|
|
|
|
/*
|
|
* messages from upper layers
|
|
*/
|
|
static int
|
|
dsp_from_up(mISDNinstance_t *inst, struct sk_buff *skb)
|
|
{
|
|
dsp_t *dsp;
|
|
mISDN_head_t *hh;
|
|
int ret = 0;
|
|
u_long flags;
|
|
|
|
if (!skb)
|
|
return(-EINVAL);
|
|
dsp = inst->privat;
|
|
if (!dsp) {
|
|
return(-EIO);
|
|
}
|
|
|
|
hh = mISDN_HEAD_P(skb);
|
|
switch(hh->prim) {
|
|
case DL_DATA | RESPONSE:
|
|
case PH_DATA | RESPONSE:
|
|
/* ignore response */
|
|
dev_kfree_skb(skb);
|
|
break;
|
|
case DL_DATA | REQUEST:
|
|
case PH_DATA | REQUEST:
|
|
if (skb->len < 1)
|
|
return(-EINVAL);
|
|
|
|
/* send data to tx-buffer (if no tone is played) */
|
|
spin_lock_irqsave(&dsp_obj.lock, flags);
|
|
if (!dsp->tone.tone)
|
|
dsp_cmx_transmit(dsp, skb);
|
|
spin_unlock_irqrestore(&dsp_obj.lock, flags);
|
|
|
|
dev_kfree_skb(skb);
|
|
break;
|
|
case PH_CONTROL | REQUEST:
|
|
|
|
spin_lock_irqsave(&dsp_obj.lock, flags);
|
|
ret = dsp_control_req(dsp, hh, skb);
|
|
spin_unlock_irqrestore(&dsp_obj.lock, flags);
|
|
|
|
break;
|
|
case DL_ESTABLISH | REQUEST:
|
|
case PH_ACTIVATE | REQUEST:
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: activating b_channel %s\n", __FUNCTION__, dsp->inst.name);
|
|
|
|
if (dsp->dtmf.hardware || dsp->dtmf.software)
|
|
dsp_dtmf_goertzel_init(dsp);
|
|
hh->prim = PH_ACTIVATE | REQUEST;
|
|
ret = mISDN_queue_down(&dsp->inst, 0, skb);
|
|
|
|
break;
|
|
case DL_RELEASE | REQUEST:
|
|
case PH_DEACTIVATE | REQUEST:
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: releasing b_channel %s\n", __FUNCTION__, dsp->inst.name);
|
|
|
|
dsp->tone.tone = dsp->tone.hardware = dsp->tone.software = 0;
|
|
if (timer_pending(&dsp->tone.tl))
|
|
del_timer(&dsp->tone.tl);
|
|
hh->prim = PH_DEACTIVATE | REQUEST;
|
|
ret = mISDN_queue_down(&dsp->inst, 0, skb);
|
|
|
|
break;
|
|
default:
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: msg %x unhandled %s\n", __FUNCTION__, hh->prim, dsp->inst.name);
|
|
ret = -EINVAL;
|
|
break;
|
|
}
|
|
return(ret);
|
|
}
|
|
|
|
|
|
/*
|
|
* messages from lower layers
|
|
*/
|
|
static int
|
|
dsp_from_down(mISDNinstance_t *inst, struct sk_buff *skb)
|
|
{
|
|
dsp_t *dsp;
|
|
mISDN_head_t *hh;
|
|
int ret = 0;
|
|
u8 *digits;
|
|
int cont;
|
|
struct sk_buff *nskb;
|
|
u_long flags;
|
|
|
|
if (!skb)
|
|
return(-EINVAL);
|
|
dsp = inst->privat;
|
|
if (!dsp)
|
|
return(-EIO);
|
|
|
|
hh = mISDN_HEAD_P(skb);
|
|
switch(hh->prim)
|
|
{
|
|
case PH_DATA | CONFIRM:
|
|
case DL_DATA | CONFIRM:
|
|
/* flush response, because no relation to upper layer */
|
|
dev_kfree_skb(skb);
|
|
break;
|
|
case PH_DATA | INDICATION:
|
|
case DL_DATA | INDICATION:
|
|
if (skb->len < 1)
|
|
return(-EINVAL);
|
|
|
|
|
|
|
|
/* decrypt if enabled */
|
|
if (dsp->bf_enable)
|
|
dsp_bf_decrypt(dsp, skb->data, skb->len);
|
|
/* if echo cancellation is enabled */
|
|
if (dsp->cancel_enable)
|
|
dsp_cancel_rx(dsp, skb->data, skb->len);
|
|
/* check if dtmf soft decoding is turned on */
|
|
if (dsp->dtmf.software) {
|
|
digits = dsp_dtmf_goertzel_decode(dsp, skb->data, skb->len, (dsp_options&DSP_OPT_ULAW)?1:0);
|
|
if (digits) while(*digits) {
|
|
if (dsp_debug & DEBUG_DSP_DTMF)
|
|
printk(KERN_DEBUG "%s: sending software decoded digit(%c) to upper layer %s\n", __FUNCTION__, *digits, dsp->inst.name);
|
|
cont = DTMF_TONE_VAL | *digits;
|
|
nskb = create_link_skb(PH_CONTROL | INDICATION, 0, sizeof(int), &cont, 0);
|
|
if (mISDN_queue_up(&dsp->inst, 0, nskb))
|
|
dev_kfree_skb(nskb);
|
|
digits++;
|
|
}
|
|
}
|
|
/* change volume if requested */
|
|
if (dsp->rx_volume)
|
|
dsp_change_volume(skb, dsp->rx_volume);
|
|
|
|
/* we need to process receive data if software */
|
|
spin_lock_irqsave(&dsp_obj.lock, flags);
|
|
if (dsp->pcm_slot_tx<0 && dsp->pcm_slot_rx<0) {
|
|
/* process data from card at cmx */
|
|
dsp_cmx_receive(dsp, skb);
|
|
}
|
|
spin_unlock_irqrestore(&dsp_obj.lock, flags);
|
|
|
|
if (dsp->rx_disabled) {
|
|
/* if receive is not allowed */
|
|
dev_kfree_skb(skb);
|
|
|
|
break;
|
|
}
|
|
hh->prim = DL_DATA | INDICATION;
|
|
ret = mISDN_queue_up(&dsp->inst, 0, skb);
|
|
|
|
break;
|
|
case PH_CONTROL | INDICATION:
|
|
|
|
if (dsp_debug & DEBUG_DSP_DTMFCOEFF)
|
|
printk(KERN_DEBUG "%s: PH_CONTROL received: %x (len %d) %s\n", __FUNCTION__, hh->dinfo, skb->len, dsp->inst.name);
|
|
switch (hh->dinfo) {
|
|
case HW_HFC_COEFF: /* getting coefficients */
|
|
if (!dsp->dtmf.hardware) {
|
|
if (dsp_debug & DEBUG_DSP_DTMFCOEFF)
|
|
printk(KERN_DEBUG "%s: ignoring DTMF coefficients from HFC\n", __FUNCTION__);
|
|
dev_kfree_skb(skb);
|
|
break;
|
|
}
|
|
digits = dsp_dtmf_goertzel_decode(dsp, skb->data, skb->len, 2);
|
|
if (digits) while(*digits) {
|
|
int k;
|
|
struct sk_buff *nskb;
|
|
if (dsp_debug & DEBUG_DSP_DTMF)
|
|
printk(KERN_DEBUG "%s: now sending software decoded digit(%c) to upper layer %s\n", __FUNCTION__, *digits, dsp->inst.name);
|
|
k = *digits | DTMF_TONE_VAL;
|
|
nskb = create_link_skb(PH_CONTROL | INDICATION, 0, sizeof(int), &k, 0);
|
|
if (mISDN_queue_up(&dsp->inst, 0, nskb))
|
|
dev_kfree_skb(nskb);
|
|
digits++;
|
|
}
|
|
dev_kfree_skb(skb);
|
|
break;
|
|
|
|
case VOL_CHANGE_TX: /* change volume */
|
|
if (skb->len != sizeof(int)) {
|
|
ret = -EINVAL;
|
|
break;
|
|
}
|
|
dsp->tx_volume = *((int *)skb->data);
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: change tx volume to %d\n", __FUNCTION__, dsp->tx_volume);
|
|
printk(KERN_DEBUG "%s: change tx volume to %d\n", __FUNCTION__, dsp->tx_volume);
|
|
dsp_cmx_hardware(dsp->conf, dsp);
|
|
break;
|
|
default:
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: ctrl ind %x unhandled %s\n", __FUNCTION__, hh->dinfo, dsp->inst.name);
|
|
ret = -EINVAL;
|
|
}
|
|
|
|
break;
|
|
case PH_ACTIVATE | CONFIRM:
|
|
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: b_channel is now active %s\n", __FUNCTION__, dsp->inst.name);
|
|
/* bchannel now active */
|
|
spin_lock_irqsave(&dsp_obj.lock, flags);
|
|
dsp->b_active = 1;
|
|
dsp->tx_W = dsp->tx_R = 0; /* clear TX buffer */
|
|
dsp->rx_W = dsp->rx_R = -1; /* reset RX buffer */
|
|
memset(dsp->rx_buff, 0, sizeof(dsp->rx_buff));
|
|
dsp_cmx_hardware(dsp->conf, dsp);
|
|
spin_unlock_irqrestore(&dsp_obj.lock, flags);
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: done with activation, sending confirm to user space. %s\n", __FUNCTION__, dsp->inst.name);
|
|
/* send activation to upper layer */
|
|
hh->prim = DL_ESTABLISH | CONFIRM;
|
|
ret = mISDN_queue_up(&dsp->inst, 0, skb);
|
|
|
|
break;
|
|
case PH_DEACTIVATE | CONFIRM:
|
|
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: b_channel is now inactive %s\n", __FUNCTION__, dsp->inst.name);
|
|
/* bchannel now inactive */
|
|
spin_lock_irqsave(&dsp_obj.lock, flags);
|
|
dsp->b_active = 0;
|
|
dsp_cmx_hardware(dsp->conf, dsp);
|
|
spin_unlock_irqrestore(&dsp_obj.lock, flags);
|
|
hh->prim = DL_RELEASE | CONFIRM;
|
|
ret = mISDN_queue_up(&dsp->inst, 0, skb);
|
|
|
|
break;
|
|
default:
|
|
if (dsp_debug & DEBUG_DSP_CORE)
|
|
printk(KERN_DEBUG "%s: msg %x unhandled %s\n", __FUNCTION__, hh->prim, dsp->inst.name);
|
|
ret = -EINVAL;
|
|
}
|
|
return(ret);
|
|
}
|
|
|
|
|
|
/*
|
|
* messages from queue
|
|
*/
|
|
static int
|
|
dsp_function(mISDNinstance_t *inst, struct sk_buff *skb)
|
|
{
|
|
mISDN_head_t *hh;
|
|
int ret = -EINVAL;
|
|
|
|
hh = mISDN_HEAD_P(skb);
|
|
switch (hh->addr & MSG_DIR_MASK) {
|
|
case FLG_MSG_DOWN:
|
|
ret = dsp_from_up(inst, skb);
|
|
break;
|
|
case FLG_MSG_UP:
|
|
ret = dsp_from_down(inst, skb);
|
|
break;
|
|
}
|
|
|
|
return(ret);
|
|
}
|
|
|
|
|
|
/*
|
|
* desroy DSP instances
|
|
*/
|
|
static void
|
|
release_dsp(dsp_t *dsp)
|
|
{
|
|
mISDNinstance_t *inst = &dsp->inst;
|
|
conference_t *conf;
|
|
u_long flags;
|
|
|
|
spin_lock_irqsave(&dsp_obj.lock, flags);
|
|
if (timer_pending(&dsp->feature_tl))
|
|
del_timer(&dsp->feature_tl);
|
|
if (timer_pending(&dsp->tone.tl))
|
|
del_timer(&dsp->tone.tl);
|
|
if (dsp_debug & DEBUG_DSP_MGR)
|
|
printk(KERN_DEBUG "%s: removing conferences %s\n", __FUNCTION__, dsp->inst.name);
|
|
conf = dsp->conf;
|
|
if (conf) {
|
|
dsp_cmx_del_conf_member(dsp);
|
|
if (!list_empty(&conf->mlist)) {
|
|
dsp_cmx_del_conf(conf);
|
|
}
|
|
}
|
|
|
|
if (dsp_debug & DEBUG_DSP_MGR)
|
|
printk(KERN_DEBUG "%s: remove & destroy object %s\n", __FUNCTION__, dsp->inst.name);
|
|
list_del(&dsp->list);
|
|
spin_unlock_irqrestore(&dsp_obj.lock, flags);
|
|
mISDN_ctrl(inst, MGR_UNREGLAYER | REQUEST, NULL);
|
|
vfree(dsp);
|
|
|
|
if (dsp_debug & DEBUG_DSP_MGR)
|
|
printk(KERN_DEBUG "%s: dsp instance released\n", __FUNCTION__);
|
|
}
|
|
|
|
|
|
/*
|
|
* ask for hardware features
|
|
*/
|
|
static void
|
|
dsp_feat(void *arg)
|
|
{
|
|
dsp_t *dsp = arg;
|
|
struct sk_buff *nskb;
|
|
void *feat;
|
|
|
|
|
|
switch (dsp->feature_state) {
|
|
case FEAT_STATE_INIT:
|
|
feat = &dsp->features;
|
|
nskb = create_link_skb(PH_CONTROL | REQUEST, HW_FEATURES, sizeof(feat), &feat, 0);
|
|
if (!nskb)
|
|
break;
|
|
if (mISDN_queue_down(&dsp->inst, 0, nskb)) {
|
|
dev_kfree_skb(nskb);
|
|
break;
|
|
}
|
|
if (dsp_debug & DEBUG_DSP_MGR)
|
|
printk(KERN_DEBUG "%s: features will be quered now for instance %s\n", __FUNCTION__, dsp->inst.name);
|
|
spin_lock(&dsp->feature_lock);
|
|
dsp->feature_state = FEAT_STATE_WAIT;
|
|
spin_unlock(&dsp->feature_lock);
|
|
init_timer(&dsp->feature_tl);
|
|
dsp->feature_tl.expires = jiffies + (HZ / 100);
|
|
add_timer(&dsp->feature_tl);
|
|
break;
|
|
case FEAT_STATE_WAIT:
|
|
if (dsp_debug & DEBUG_DSP_MGR)
|
|
printk(KERN_DEBUG "%s: features of %s are: hfc_id=%d hfc_dtmf=%d hfc_loops=%d hfc_echocanhw:%d pcm_id=%d pcm_slots=%d pcm_banks=%d\n",
|
|
__FUNCTION__, dsp->inst.name,
|
|
dsp->features.hfc_id,
|
|
dsp->features.hfc_dtmf,
|
|
dsp->features.hfc_loops,
|
|
dsp->features.hfc_echocanhw,
|
|
dsp->features.pcm_id,
|
|
dsp->features.pcm_slots,
|
|
dsp->features.pcm_banks);
|
|
|
|
spin_lock(&dsp->feature_lock);
|
|
dsp->feature_state = FEAT_STATE_RECEIVED;
|
|
spin_unlock(&dsp->feature_lock);
|
|
|
|
if (dsp->queue_conf_id) {
|
|
/* work on queued conf id*/
|
|
dsp_cmx_conf(dsp, dsp->queue_conf_id );
|
|
if (dsp_debug & DEBUG_DSP_CMX)
|
|
dsp_cmx_debug(dsp);
|
|
}
|
|
|
|
if (dsp->queue_dtmf) {
|
|
/* work on queued dtmf */
|
|
if (dsp->features.hfc_dtmf) {
|
|
dsp->dtmf.software = 0;
|
|
dsp->dtmf.hardware = 1;
|
|
} else {
|
|
dsp->dtmf.hardware = 0;
|
|
dsp->dtmf.software = 1;
|
|
}
|
|
}
|
|
|
|
if (dsp->queue_cancel[2]) {
|
|
dsp_cancel_init(dsp,
|
|
dsp->queue_cancel[0],
|
|
dsp->queue_cancel[1],
|
|
dsp->queue_cancel[2]
|
|
);
|
|
|
|
}
|
|
break;
|
|
}
|
|
|
|
}
|
|
|
|
|
|
/*
|
|
* create new DSP instances
|
|
*/
|
|
static int
|
|
new_dsp(mISDNstack_t *st, mISDN_pid_t *pid)
|
|
{
|
|
int err = 0;
|
|
dsp_t *ndsp;
|
|
u_long flags;
|
|
|
|
if (dsp_debug & DEBUG_DSP_MGR)
|
|
printk(KERN_DEBUG "%s: creating new dsp instance\n", __FUNCTION__);
|
|
|
|
if (!st || !pid)
|
|
return(-EINVAL);
|
|
if (!(ndsp = vmalloc(sizeof(dsp_t)))) {
|
|
printk(KERN_ERR "%s: vmalloc dsp_t failed\n", __FUNCTION__);
|
|
return(-ENOMEM);
|
|
}
|
|
memset(ndsp, 0, sizeof(dsp_t));
|
|
memcpy(&ndsp->inst.pid, pid, sizeof(mISDN_pid_t));
|
|
mISDN_init_instance(&ndsp->inst, &dsp_obj, ndsp, dsp_function);
|
|
if (!mISDN_SetHandledPID(&dsp_obj, &ndsp->inst.pid)) {
|
|
int_error();
|
|
err = -ENOPROTOOPT;
|
|
free_mem:
|
|
vfree(ndsp);
|
|
return(err);
|
|
}
|
|
sprintf(ndsp->inst.name, "DSP_S%x/C%x",
|
|
(st->id&0xff00)>>8, (st->id&0xff0000)>>16);
|
|
/* set frame size to start */
|
|
ndsp->features.hfc_id = -1; /* current PCM id */
|
|
ndsp->features.pcm_id = -1; /* current PCM id */
|
|
ndsp->pcm_slot_rx = -1; /* current CPM slot */
|
|
ndsp->pcm_slot_tx = -1;
|
|
ndsp->pcm_bank_rx = -1;
|
|
ndsp->pcm_bank_tx = -1;
|
|
ndsp->hfc_conf = -1; /* current conference number */
|
|
/* set tone timer */
|
|
ndsp->tone.tl.function = (void *)dsp_tone_timeout;
|
|
ndsp->tone.tl.data = (long) ndsp;
|
|
init_timer(&ndsp->tone.tl);
|
|
/* set dsp feture timer */
|
|
ndsp->feature_tl.function = (void *)dsp_feat;
|
|
ndsp->feature_tl.data = (long) ndsp;
|
|
ndsp->feature_state = FEAT_STATE_INIT;
|
|
|
|
if (dtmfthreshold < 20 || dtmfthreshold> 500) {
|
|
dtmfthreshold=200;
|
|
}
|
|
#warning CHRISTIAN: my define was 200000, but your default is 200*10000=2000000. what shall we do? *1000 or dtmftreshold=20 ??
|
|
ndsp->dtmf.treshold=dtmfthreshold*10000;
|
|
|
|
spin_lock_init(&ndsp->feature_lock);
|
|
init_timer(&ndsp->feature_tl);
|
|
if (!(dsp_options & DSP_OPT_NOHARDWARE)) {
|
|
ndsp->feature_tl.expires = jiffies + (HZ / 100);
|
|
add_timer(&ndsp->feature_tl);
|
|
}
|
|
spin_lock_irqsave(&dsp_obj.lock, flags);
|
|
/* append and register */
|
|
list_add_tail(&ndsp->list, &dsp_obj.ilist);
|
|
spin_unlock_irqrestore(&dsp_obj.lock, flags);
|
|
err = mISDN_ctrl(st, MGR_REGLAYER | INDICATION, &ndsp->inst);
|
|
if (err) {
|
|
printk(KERN_ERR "%s: failed to register layer %s\n", __FUNCTION__, ndsp->inst.name);
|
|
spin_lock_irqsave(&dsp_obj.lock, flags);
|
|
list_del(&ndsp->list);
|
|
spin_unlock_irqrestore(&dsp_obj.lock, flags);
|
|
goto free_mem;
|
|
}
|
|
if (dsp_debug & DEBUG_DSP_MGR)
|
|
printk(KERN_DEBUG "%s: dsp instance created %s\n", __FUNCTION__, ndsp->inst.name);
|
|
return(err);
|
|
}
|
|
|
|
|
|
/*
|
|
* manager for DSP instances
|
|
*/
|
|
static int
|
|
dsp_manager(void *data, u_int prim, void *arg) {
|
|
mISDNinstance_t *inst = data;
|
|
dsp_t *dspl;
|
|
int ret = -EINVAL;
|
|
u_long flags;
|
|
|
|
if (dsp_debug & DEBUG_DSP_MGR)
|
|
printk(KERN_DEBUG "%s: data:%p prim:%x arg:%p\n", __FUNCTION__, data, prim, arg);
|
|
if (!data)
|
|
return(ret);
|
|
spin_lock_irqsave(&dsp_obj.lock, flags);
|
|
list_for_each_entry(dspl, &dsp_obj.ilist, list) {
|
|
if (&dspl->inst == inst) {
|
|
ret = 0;
|
|
break;
|
|
}
|
|
}
|
|
spin_unlock_irqrestore(&dsp_obj.lock, flags);
|
|
if (ret && (prim != (MGR_NEWLAYER | REQUEST))) {
|
|
printk(KERN_WARNING "%s: given instance(%p) not in ilist.\n", __FUNCTION__, data);
|
|
return(ret);
|
|
}
|
|
|
|
switch(prim) {
|
|
case MGR_NEWLAYER | REQUEST:
|
|
ret = new_dsp(data, arg);
|
|
break;
|
|
case MGR_SETSTACK | INDICATION:
|
|
break;
|
|
#ifdef OBSOLETE
|
|
case MGR_CONNECT | REQUEST:
|
|
ret = mISDN_ConnectIF(inst, arg);
|
|
break;
|
|
case MGR_SETIF | REQUEST:
|
|
case MGR_SETIF | INDICATION:
|
|
ret = mISDN_SetIF(inst, arg, prim, dsp_from_up, dsp_from_down, dspl);
|
|
break;
|
|
case MGR_DISCONNECT | REQUEST:
|
|
case MGR_DISCONNECT | INDICATION:
|
|
ret = mISDN_DisConnectIF(inst, arg);
|
|
break;
|
|
#endif
|
|
case MGR_UNREGLAYER | REQUEST:
|
|
case MGR_RELEASE | INDICATION:
|
|
if (dsp_debug & DEBUG_DSP_MGR)
|
|
printk(KERN_DEBUG "%s: release_dsp id %x\n", __FUNCTION__, dspl->inst.st->id);
|
|
|
|
release_dsp(dspl);
|
|
break;
|
|
default:
|
|
printk(KERN_WARNING "%s: prim %x not handled\n", __FUNCTION__, prim);
|
|
ret = -EINVAL;
|
|
break;
|
|
}
|
|
return(ret);
|
|
}
|
|
|
|
|
|
/*
|
|
* initialize DSP object
|
|
*/
|
|
static int dsp_init(void)
|
|
{
|
|
int err;
|
|
|
|
/* copy variables */
|
|
dsp_options = options;
|
|
dsp_debug = debug;
|
|
|
|
/* display revision */
|
|
printk(KERN_INFO "mISDN_dsp: Audio DSP Rev. %s (debug=0x%x) EchoCancellor %s dtmfthreshold(%d)\n", mISDN_getrev(dsp_revision), debug, EC_TYPE, dtmfthreshold);
|
|
|
|
/* set packet size */
|
|
if (poll == 0) {
|
|
if (HZ == 100)
|
|
poll = 80;
|
|
else
|
|
poll = 64;
|
|
}
|
|
|
|
if (poll > MAX_POLL) {
|
|
printk(KERN_ERR "%s: Wrong poll value (%d), using %d.\n", __FUNCTION__, poll, MAX_POLL);
|
|
poll = MAX_POLL;
|
|
}
|
|
if (poll < 8) {
|
|
printk(KERN_ERR "%s: Wrong poll value (%d), using 8.\n", __FUNCTION__, poll);
|
|
poll = 8;
|
|
}
|
|
dsp_poll = poll;
|
|
dsp_tics = poll * HZ / 8000;
|
|
if (dsp_tics * 8000 == poll * HZ)
|
|
printk(KERN_INFO "mISDN_dsp: DSP clocks every %d samples. This equals %d jiffies.\n", poll, dsp_tics);
|
|
else {
|
|
printk(KERN_INFO "mISDN_dsp: Cannot clock ever %d samples. Use a multiple of %d (samples)\n", poll, 8000 / HZ);
|
|
err = -EINVAL;
|
|
return(err);
|
|
}
|
|
|
|
/* fill mISDN object (dsp_obj) */
|
|
memset(&dsp_obj, 0, sizeof(dsp_obj));
|
|
#ifdef MODULE
|
|
SET_MODULE_OWNER(&dsp_obj);
|
|
#endif
|
|
spin_lock_init(&dsp_obj.lock);
|
|
dsp_obj.name = DSPName;
|
|
dsp_obj.BPROTO.protocol[3] = ISDN_PID_L3_B_DSP;
|
|
dsp_obj.own_ctrl = dsp_manager;
|
|
INIT_LIST_HEAD(&dsp_obj.ilist);
|
|
|
|
/* initialize audio tables */
|
|
dsp_silence = (dsp_options&DSP_OPT_ULAW)?0xff:0x2a;
|
|
dsp_audio_law_to_s32 = (dsp_options&DSP_OPT_ULAW)?dsp_audio_ulaw_to_s32:dsp_audio_alaw_to_s32;
|
|
dsp_audio_generate_s2law_table();
|
|
dsp_audio_generate_seven();
|
|
dsp_audio_generate_mix_table();
|
|
if (dsp_options & DSP_OPT_ULAW)
|
|
dsp_audio_generate_ulaw_samples();
|
|
dsp_audio_generate_volume_changes();
|
|
|
|
/* register object */
|
|
if ((err = mISDN_register(&dsp_obj))) {
|
|
printk(KERN_ERR "mISDN_dsp: Can't register %s error(%d)\n", DSPName, err);
|
|
return(err);
|
|
}
|
|
|
|
/* set sample timer */
|
|
dsp_spl_tl.function = (void *)dsp_cmx_send;
|
|
dsp_spl_tl.data = 0;
|
|
init_timer(&dsp_spl_tl);
|
|
dsp_spl_tl.expires = jiffies + dsp_tics + 1; /* safer */
|
|
dsp_spl_jiffies = dsp_spl_tl.expires;
|
|
add_timer(&dsp_spl_tl);
|
|
|
|
mISDN_module_register(THIS_MODULE);
|
|
|
|
return(0);
|
|
}
|
|
|
|
|
|
/*
|
|
* cleanup DSP object during module removal
|
|
*/
|
|
static void dsp_cleanup(void)
|
|
{
|
|
dsp_t *dspl, *nd;
|
|
int err;
|
|
|
|
mISDN_module_unregister(THIS_MODULE);
|
|
|
|
if (timer_pending(&dsp_spl_tl))
|
|
del_timer(&dsp_spl_tl);
|
|
|
|
if (dsp_debug & DEBUG_DSP_MGR)
|
|
printk(KERN_DEBUG "%s: removing module\n", __FUNCTION__);
|
|
|
|
if ((err = mISDN_unregister(&dsp_obj))) {
|
|
printk(KERN_ERR "mISDN_dsp: Can't unregister Audio DSP error(%d)\n",
|
|
err);
|
|
}
|
|
if (!list_empty(&dsp_obj.ilist)) {
|
|
printk(KERN_WARNING "mISDN_dsp: Audio DSP object inst list not empty.\n");
|
|
list_for_each_entry_safe(dspl, nd, &dsp_obj.ilist, list)
|
|
release_dsp(dspl);
|
|
}
|
|
if (!list_empty(&Conf_list)) {
|
|
printk(KERN_ERR "mISDN_dsp: Conference list not empty. Not all memory freed.\n");
|
|
}
|
|
}
|
|
|
|
#ifdef MODULE
|
|
module_init(dsp_init);
|
|
module_exit(dsp_cleanup);
|
|
#endif
|
|
|