/*****************************************************************************\
** **
-** PBX4Linux **
+** Linux Call Router **
** **
**---------------------------------------------------------------------------**
** Copyright: Andreas Eversberg **
** **
-** mISDN port abstraction for dss1 and sip **
+** mISDN port abstraction for dss1 **
** **
\*****************************************************************************/
-
-#include <stdio.h>
-#include <string.h>
-#include <stdlib.h>
#include "main.h"
-#include <unistd.h>
-#include <poll.h>
-#include <errno.h>
-#include <sys/ioctl.h>
-#include <sys/types.h>
-#include <sys/stat.h>
-#include <fcntl.h>
-extern "C" {
-#include <net_l2.h>
-}
+#include "myisdn.h"
+#include <mISDN/q931.h>
+
+#undef offsetof
+#ifdef __compiler_offsetof
+#define offsetof(TYPE,MEMBER) __compiler_offsetof(TYPE,MEMBER)
+#else
+#define offsetof(TYPE, MEMBER) ((size_t) &((TYPE *)0)->MEMBER)
+#endif
+
+#ifndef container_of
+#define container_of(ptr, type, member) ({ \
+ const typeof( ((type *)0)->member ) *__mptr = (ptr); \
+ (type *)( (char *)__mptr - offsetof(type,member) );})
+#endif
-#define ISDN_PID_L2_B_USER 0x420000ff
-#define ISDN_PID_L3_B_USER 0x430000ff
-#define ISDN_PID_L4_B_USER 0x440000ff
+// timeouts if activating/deactivating response from mISDN got lost
+#define B_TIMER_ACTIVATING 1 // seconds
+#define B_TIMER_DEACTIVATING 1 // seconds
-/* used for udevice */
-int entity = 0;
+/* list of mISDN ports */
+struct mISDNport *mISDNport_first;
/* noise randomizer */
unsigned char mISDN_rand[256];
int mISDN_rand_count = 0;
-/* the device handler and port list */
-int mISDNdevice = -1;
+#ifdef OLD_MT_ASSIGN
+unsigned int mt_assign_pid = ~0;
+#endif
+
+int mISDNsocket = -1;
+static int upqueue_pipe[2];
+static struct lcr_fd upqueue_fd;
+int upqueue_avail = 0;
-/* list of mISDN ports */
-struct mISDNport *mISDNport_first;
+static int mISDN_upqueue(struct lcr_fd *fd, unsigned int what, void *instance, int i);
+static int mISDN_timeout(struct lcr_timer *timer, void *instance, int i);
+
+static int my_mISDNlib_debug(const char *file, int line, const char *func, int level, const char *fmt, va_list va)
+{
+ int ret = 0;
+
+ if (debug_fp > 0)
+ ret = vfprintf(debug_fp, fmt, va);
+ return ret;
+}
+
+static struct mi_ext_fn_s myfn;
+
+int mISDN_initialize(void)
+{
+ char filename[256];
+ int ver;
+
+ /* try to open raw socket to check kernel */
+ mISDNsocket = socket(PF_ISDN, SOCK_RAW, ISDN_P_BASE);
+ if (mISDNsocket < 0) {
+ fprintf(stderr, "Cannot open mISDN due to '%s'. (Does your Kernel support socket based mISDN? Protocol family is %d.)\n", strerror(errno), PF_ISDN);
+ return(-1);
+ }
+
+ /* init mlayer3 */
+ // set debug printout function
+ myfn.prt_debug = my_mISDNlib_debug;
+
+ ver = init_layer3(4, &myfn); // buffer of 4
+
+ /* open debug, if enabled and not only stack debugging */
+ if (options.deb) {
+ SPRINT(filename, "%s/debug.log", LOG_DIR);
+ debug_fp = fopen(filename, "a");
+ }
+
+ if (options.deb & DEBUG_STACK)
+ mISDN_set_debug_level(0xfffffeff);
+ else
+ mISDN_set_debug_level(0);
+
+ if (pipe(upqueue_pipe) < 0)
+ FATAL("Failed to open pipe\n");
+ memset(&upqueue_fd, 0, sizeof(upqueue_fd));
+ upqueue_fd.fd = upqueue_pipe[0];
+ register_fd(&upqueue_fd, LCR_FD_READ, mISDN_upqueue, NULL, 0);
+
+ return(0);
+}
+
+void mISDN_deinitialize(void)
+{
+ cleanup_layer3();
+
+ if (debug_fp)
+ fclose(debug_fp);
+ debug_fp = NULL;
+
+ if (mISDNsocket > -1)
+ close(mISDNsocket);
+
+ if (upqueue_fd.inuse) {
+ unregister_fd(&upqueue_fd);
+ close(upqueue_pipe[0]);
+ close(upqueue_pipe[1]);
+ }
+ upqueue_avail = 0;
+}
+
+static int load_timer(struct lcr_timer *timer, void *instance, int index);
/*
* constructor
*/
-PmISDN::PmISDN(int type, mISDNport *mISDNport, char *portname, struct port_settings *settings, int channel, int exclusive) : Port(type, portname, settings)
+PmISDN::PmISDN(int type, mISDNport *mISDNport, char *portname, struct port_settings *settings, struct interface *interface, int channel, int exclusive, int mode) : Port(type, portname, settings, interface)
{
p_m_mISDNport = mISDNport;
p_m_portnum = mISDNport->portnum;
p_m_b_channel = 0;
p_m_b_exclusive = 0;
p_m_b_reserve = 0;
- p_m_b_addr = 0;
- p_m_b_stid = 0;
- p_m_jittercheck = 0;
- p_m_delete = 0;
+ p_m_b_mode = mode;
p_m_hold = 0;
- p_m_txvol = p_m_rxvol = 0;
+ p_m_tx_gain = mISDNport->ifport->interface->tx_gain;
+ p_m_rx_gain = mISDNport->ifport->interface->rx_gain;
p_m_conf = 0;
+ p_m_mute = 0;
p_m_txdata = 0;
-#warning set delay by routing parameter or interface config
p_m_delay = 0;
+ p_m_tx_dejitter = 0;
+ p_m_preload = ISDN_LOAD;
+ p_m_disable_dejitter = 0;
p_m_echo = 0;
p_m_tone = 0;
p_m_rxoff = 0;
- p_m_calldata = 0;
- p_m_dtmf = !options.nodtmf;
- sollen wir daraus eine interface-option machen?:
- p_m_timeout = 0;
- p_m_timer = 0;
-#warning denke auch an die andere seite. also das setup sollte dies weitertragen
+ p_m_inband_send_on = 0;
+ p_m_inband_receive_on = 0;
+ p_m_dtmf = !mISDNport->ifport->nodtmf;
+ p_m_dtmf_threshold = mISDNport->ifport->dtmf_threshold;
+ memset(&p_m_timeout, 0, sizeof(p_m_timeout));
+ add_timer(&p_m_timeout, mISDN_timeout, this, 0);
+ SCPY(p_m_pipeline, mISDNport->ifport->interface->pipeline);
+
+ /* audio */
+ memset(&p_m_loadtimer, 0, sizeof(p_m_loadtimer));
+ add_timer(&p_m_loadtimer, load_timer, this, 0);
+ p_m_load = 0;
+ p_m_last_tv_sec = 0;
+ /* crypt */
p_m_crypt = 0;
p_m_crypt_listen = 0;
p_m_crypt_msg_loops = 0;
p_m_crypt_msg_len = 0;
p_m_crypt_msg[0] = '\0';
p_m_crypt_msg_current = 0;
- p_m_crypt_key[0] = '\0';
p_m_crypt_key_len = 0;
p_m_crypt_listen = 0;
p_m_crypt_listen_state = 0;
p_m_crypt_listen_len = 0;
p_m_crypt_listen_msg[0] = '\0';
p_m_crypt_listen_crc = 0;
+ if (mISDNport->ifport->interface->bf_len >= 4 && mISDNport->ifport->interface->bf_len <= 56) {
+ memcpy(p_m_crypt_key, mISDNport->ifport->interface->bf_key, p_m_crypt_key_len);
+ p_m_crypt_key_len = mISDNport->ifport->interface->bf_len;
+ p_m_crypt = 1;
+ }
/* if any channel requested by constructor */
- if (channel == CHANNEL_ANY)
- {
+ if (channel == CHANNEL_ANY) {
/* reserve channel */
p_m_b_reserve = 1;
mISDNport->b_reserved++;
}
- } else
/* reserve channel */
- if (channel) // only if constructor was called with a channel resevation
+ if (channel > 0) // only if constructor was called with a channel resevation
seize_bchannel(channel, exclusive);
/* we increase the number of objects: */
mISDNport->use++;
PDEBUG(DEBUG_ISDN, "Created new mISDNPort(%s). Currently %d objects use, port #%d\n", portname, mISDNport->use, p_m_portnum);
+//inband_receive_on();
}
*/
PmISDN::~PmISDN()
{
- struct message *message;
+ struct lcr_msg *message;
+
+ del_timer(&p_m_timeout);
+ del_timer(&p_m_loadtimer);
/* remove bchannel relation */
- free_bchannel();
+ drop_bchannel();
/* release epoint */
- while (p_epointlist)
- {
+ while (p_epointlist) {
PDEBUG(DEBUG_ISDN, "destroy mISDNPort(%s). endpoint still exists, releaseing.\n", p_name);
message = message_create(p_serial, p_epointlist->epoint_id, PORT_TO_EPOINT, MESSAGE_RELEASE);
message->param.disconnectinfo.cause = 16;
/*
+ * trace
+ */
+void chan_trace_header(struct mISDNport *mISDNport, class PmISDN *port, const char *msgtext, int direction)
+{
+ /* init trace with given values */
+ start_trace(mISDNport?mISDNport->portnum:-1,
+ (mISDNport)?((mISDNport->ifport)?mISDNport->ifport->interface:NULL):NULL,
+ port?numberrize_callerinfo(port->p_callerinfo.id, port->p_callerinfo.ntype, options.national, options.international):NULL,
+ port?port->p_dialinginfo.id:NULL,
+ direction,
+ CATEGORY_CH,
+ port?port->p_serial:0,
+ msgtext);
+}
+
+
+/*
+ * layer trace header
+ */
+static struct isdn_message {
+ const char *name;
+ unsigned int value;
+} isdn_message[] = {
+ {"PH_ACTIVATE", L1_ACTIVATE_REQ},
+ {"PH_DEACTIVATE", L1_DEACTIVATE_REQ},
+ {"DL_ESTABLISH", L2_ESTABLISH_REQ},
+ {"DL_RELEASE", L2_RELEASE_REQ},
+ {"UNKNOWN", L3_UNKNOWN_REQ},
+ {"MT_TIMEOUT", L3_TIMEOUT_REQ},
+ {"MT_SETUP", L3_SETUP_REQ},
+ {"MT_SETUP_ACK", L3_SETUP_ACKNOWLEDGE_REQ},
+ {"MT_PROCEEDING", L3_PROCEEDING_REQ},
+ {"MT_ALERTING", L3_ALERTING_REQ},
+ {"MT_CONNECT", L3_CONNECT_REQ},
+ {"MT_CONNECT_ACK", L3_CONNECT_ACKNOWLEDGE_REQ},
+ {"MT_DISCONNECT", L3_DISCONNECT_REQ},
+ {"MT_RELEASE", L3_RELEASE_REQ},
+ {"MT_RELEASE_COMP", L3_RELEASE_COMPLETE_REQ},
+ {"MT_INFORMATION", L3_INFORMATION_REQ},
+ {"MT_PROGRESS", L3_PROGRESS_REQ},
+ {"MT_NOTIFY", L3_NOTIFY_REQ},
+ {"MT_SUSPEND", L3_SUSPEND_REQ},
+ {"MT_SUSPEND_ACK", L3_SUSPEND_ACKNOWLEDGE_REQ},
+ {"MT_SUSPEND_REJ", L3_SUSPEND_REJECT_REQ},
+ {"MT_RESUME", L3_RESUME_REQ},
+ {"MT_RESUME_ACK", L3_RESUME_ACKNOWLEDGE_REQ},
+ {"MT_RESUME_REJ", L3_RESUME_REJECT_REQ},
+ {"MT_HOLD", L3_HOLD_REQ},
+ {"MT_HOLD_ACK", L3_HOLD_ACKNOWLEDGE_REQ},
+ {"MT_HOLD_REJ", L3_HOLD_REJECT_REQ},
+ {"MT_RETRIEVE", L3_RETRIEVE_REQ},
+ {"MT_RETRIEVE_ACK", L3_RETRIEVE_ACKNOWLEDGE_REQ},
+ {"MT_RETRIEVE_REJ", L3_RETRIEVE_REJECT_REQ},
+ {"MT_FACILITY", L3_FACILITY_REQ},
+ {"MT_STATUS", L3_STATUS_REQ},
+ {"MT_RESTART", L3_RESTART_REQ},
+ {"MT_NEW_L3ID", L3_NEW_L3ID_REQ},
+ {"MT_RELEASE_L3ID", L3_RELEASE_L3ID_REQ},
+ {NULL, 0},
+};
+static const char *isdn_prim[4] = {
+ " REQUEST",
+ " CONFIRM",
+ " INDICATION",
+ " RESPONSE",
+};
+void l1l2l3_trace_header(struct mISDNport *mISDNport, class PmISDN *port, unsigned int msg, int direction)
+{
+ int i;
+ char msgtext[64];
+
+ SCPY(msgtext, "<<UNKNOWN MESSAGE>>");
+ /* select message and primitive text */
+ i = 0;
+ while(isdn_message[i].name) {
+// if (msg == L3_NOTIFY_REQ) printf("val = %x %s\n", isdn_message[i].value, isdn_message[i].name);
+ if (isdn_message[i].value == (msg&0xffffff00)) {
+ SCPY(msgtext, isdn_message[i].name);
+ break;
+ }
+ i++;
+ }
+ SCAT(msgtext, isdn_prim[msg&0x00000003]);
+
+ /* add direction */
+ if (direction && (msg&0xffffff00)!=L3_NEW_L3ID_REQ && (msg&0xffffff00)!=L3_RELEASE_L3ID_REQ) {
+ if (mISDNport) {
+ if (mISDNport->ntmode) {
+ if (direction == DIRECTION_OUT)
+ SCAT(msgtext, " N->U");
+ else
+ SCAT(msgtext, " N<-U");
+ } else {
+ if (direction == DIRECTION_OUT)
+ SCAT(msgtext, " U->N");
+ else
+ SCAT(msgtext, " U<-N");
+ }
+ }
+ }
+
+ /* init trace with given values */
+ start_trace(mISDNport?mISDNport->portnum:-1,
+ mISDNport?(mISDNport->ifport?mISDNport->ifport->interface:NULL):NULL,
+ port?numberrize_callerinfo(port->p_callerinfo.id, port->p_callerinfo.ntype, options.national, options.international):NULL,
+ port?port->p_dialinginfo.id:NULL,
+ direction,
+ CATEGORY_CH,
+ port?port->p_serial:0,
+ msgtext);
+}
+
+
+/*
* send control information to the channel (dsp-module)
*/
-void ph_control(unsigned long b_addr, int c1, int c2)
+void ph_control(struct mISDNport *mISDNport, class PmISDN *isdnport, int sock, unsigned int c1, unsigned int c2, const char *trace_name, int trace_value)
{
- unsigned char buffer[mISDN_HEADER_LEN+sizeof(int)+sizeof(int)];
- iframe_t *ctrl = (iframe_t *)buffer;
- unsigned long *d = (unsigned long *)&ctrl->data.p;
-
- ctrl->prim = PH_CONTROL | REQUEST;
- ctrl->addr = b_addr | FLG_MSG_DOWN;
- ctrl->dinfo = 0;
- ctrl->len = sizeof(int)*2;
+ unsigned char buffer[MISDN_HEADER_LEN+sizeof(int)+sizeof(int)];
+ struct mISDNhead *ctrl = (struct mISDNhead *)buffer;
+ unsigned int *d = (unsigned int *)(buffer+MISDN_HEADER_LEN);
+ int ret;
+ int len = 8;
+
+ if (sock < 0)
+ return;
+
+ if (c1 == DTMF_TONE_START && c2 == 0) {
+ len = 4;
+ }
+
+ ctrl->prim = PH_CONTROL_REQ;
+ ctrl->id = 0;
*d++ = c1;
*d++ = c2;
- mISDN_write(mISDNdevice, ctrl, mISDN_HEADER_LEN+ctrl->len, TIMEOUT_1SEC);
+ ret = sendto(sock, buffer, MISDN_HEADER_LEN+len, 0, NULL, 0);
+ if (ret <= 0)
+ PERROR("Failed to send to socket %d\n", sock);
+ chan_trace_header(mISDNport, isdnport, "BCHANNEL control", DIRECTION_OUT);
+ if (c1 == DSP_CONF_JOIN)
+ add_trace(trace_name, NULL, "0x%08x", trace_value);
+ else
+ add_trace(trace_name, NULL, "%d", trace_value);
+ end_trace();
}
-void ph_control_block(unsigned long b_addr, int c1, void *c2, int c2_len)
+void ph_control_block(struct mISDNport *mISDNport, class PmISDN *isdnport, int sock, unsigned int c1, void *c2, int c2_len, const char *trace_name, int trace_value)
{
- unsigned char buffer[mISDN_HEADER_LEN+sizeof(int)+c2_len];
- iframe_t *ctrl = (iframe_t *)buffer;
- unsigned long *d = (unsigned long *)&ctrl->data.p;
-
- ctrl->prim = PH_CONTROL | REQUEST;
- ctrl->addr = b_addr | FLG_MSG_DOWN;
- ctrl->dinfo = 0;
- ctrl->len = sizeof(int)+c2_len;
+ unsigned char buffer[MISDN_HEADER_LEN+sizeof(int)+c2_len];
+ struct mISDNhead *ctrl = (struct mISDNhead *)buffer;
+ unsigned int *d = (unsigned int *)(buffer+MISDN_HEADER_LEN);
+ int ret;
+
+ if (sock < 0)
+ return;
+
+ ctrl->prim = PH_CONTROL_REQ;
+ ctrl->id = 0;
*d++ = c1;
memcpy(d, c2, c2_len);
- mISDN_write(mISDNdevice, ctrl, mISDN_HEADER_LEN+ctrl->len, TIMEOUT_1SEC);
+ ret = sendto(sock, buffer, MISDN_HEADER_LEN+sizeof(int)+c2_len, 0, NULL, 0);
+ if (ret <= 0)
+ PERROR("Failed to send to socket %d\n", sock);
+ chan_trace_header(mISDNport, isdnport, "BCHANNEL control", DIRECTION_OUT);
+ add_trace(trace_name, NULL, "%d", trace_value);
+ end_trace();
}
+static int b_sock_callback(struct lcr_fd *fd, unsigned int what, void *instance, int i);
/*
- * activate / deactivate bchannel
+ * subfunction for bchannel_event
+ * create stack
*/
-static void bchannel_activate(struct mISDNport *mISDNport, int i)
+static int _bchannel_create(struct mISDNport *mISDNport, int i)
{
- iframe_t act;
-
- /* we must activate if we are deactivated */
- if (mISDNport->b_state[i] == B_STATE_IDLE)
- {
- /* activate bchannel */
- PDEBUG(DEBUG_BCHANNEL, "activating bchannel (index %d), because currently idle (address 0x%x).\n", i, mISDNport->b_addr[i]);
- act.prim = DL_ESTABLISH | REQUEST;
- act.addr = mISDNport->b_addr[i] | FLG_MSG_DOWN;
- act.dinfo = 0;
- act.len = 0;
- mISDN_write(mISDNdevice, &act, mISDN_HEADER_LEN+act.len, TIMEOUT_1SEC);
- mISDNport->b_state[i] = B_STATE_ACTIVATING;
- return;
+ int ret;
+ struct sockaddr_mISDN addr;
+
+ if (mISDNport->b_sock[i].inuse) {
+ PERROR("Error: Socket already created for index %d\n", i);
+ return(0);
}
- /* if we are active, we configure our channel */
- if (mISDNport->b_state[i] == B_STATE_ACTIVE)
- {
- unsigned char buffer[mISDN_HEADER_LEN+ISDN_PRELOAD];
- iframe_t *pre = (iframe_t *)buffer; /* preload data */
- unsigned char *p = (unsigned char *)&pre->data.p;
+ /* open socket */
+//#warning testing without DSP
+// mISDNport->b_sock[i].fd = socket(PF_ISDN, SOCK_DGRAM, (mISDNport->b_mode[i]==B_MODE_HDLC)?ISDN_P_B_HDLC:ISDN_P_B_RAW);
+ mISDNport->b_sock[i].fd = socket(PF_ISDN, SOCK_DGRAM, (mISDNport->b_mode[i]==B_MODE_HDLC)?ISDN_P_B_L2DSPHDLC:ISDN_P_B_L2DSP);
+ if (mISDNport->b_sock[i].fd < 0) {
+ PERROR("Error: Failed to open bchannel-socket for index %d with mISDN-DSP layer. Did you load mISDN_dsp.ko?\n", i);
+ return(0);
+ }
- /* it is an error if this channel is not associated with a port object */
- if (!mISDNport->b_port[i])
- {
- PERROR("bchannel index i=%d not associated with a port object\n", i);
- return;
- }
+ /* register callback for read */
+ register_fd(&mISDNport->b_sock[i], LCR_FD_READ, b_sock_callback, mISDNport, i);
+
+ /* bind socket to bchannel */
+ addr.family = AF_ISDN;
+ addr.dev = mISDNport->portnum;
+ addr.channel = i+1+(i>=15);
+ ret = bind(mISDNport->b_sock[i].fd, (struct sockaddr *)&addr, sizeof(addr));
+ if (ret < 0) {
+ PERROR("Error: Failed to bind bchannel-socket for index %d with mISDN-DSP layer (errno=%d). Did you load mISDN_dsp.ko?\n", i, errno);
+ close(mISDNport->b_sock[i].fd);
+ unregister_fd(&mISDNport->b_sock[i]);
+ return(0);
+ }
- /* configure dsp features */
- if (mISDNport->b_port[i]->p_m_txdata)
- {
- PDEBUG(DEBUG_BCHANNEL, "during activation, we set txdata to txdata=%d.\n", mISDNport->b_port[i]->p_m_txdata);
- ph_control(mISDNport->b_addr[i], (mISDNport->b_port[i]->p_m_txdata)?CMX_TXDATA_ON:CMX_TXDATA_OFF);
- }
- if (mISDNport->b_port[i]->p_m_delay)
- {
- PDEBUG(DEBUG_BCHANNEL, "during activation, we set delay to delay=%d.\n", mISDNport->b_port[i]->p_m_delay);
- ph_control(mISDNport->b_addr[i], CMX_DELAY, mISDNport->b_port[i]->p_m_delay);
- }
- if (mISDNport->b_port[i]->p_m_txvol)
- {
- PDEBUG(DEBUG_BCHANNEL, "during activation, we change tx-volume to shift=%d.\n", mISDNport->b_port[i]->p_m_txvol);
- ph_control(mISDNport->b_addr[i], VOL_CHANGE_TX, mISDNport->b_port[i]->p_m_txvol);
- }
- if (mISDNport->b_port[i]->p_m_rxvol)
- {
- PDEBUG(DEBUG_BCHANNEL, "during activation, we change rx-volume to shift=%d.\n", mISDNport->b_port[i]->p_m_rxvol);
- ph_control(mISDNport->b_addr[i], VOL_CHANGE_RX, mISDNport->b_port[i]->p_m_rxvol);
- }
-//tone if (mISDNport->b_port[i]->p_m_conf && !mISDNport->b_port[i]->p_m_tone)
- if (mISDNport->b_port[i]->p_m_conf)
- {
- PDEBUG(DEBUG_BCHANNEL, "during activation, we change conference to conf=%d.\n", mISDNport->b_port[i]->p_m_conf);
- ph_control(mISDNport->b_addr[i], CMX_CONF_JOIN, mISDNport->b_port[i]->p_m_conf);
- }
- if (mISDNport->b_port[i]->p_m_echo)
- {
- PDEBUG(DEBUG_BCHANNEL, "during activation, we set echo to echo=%d.\n", mISDNport->b_port[i]->p_m_echo);
- ph_control(mISDNport->b_addr[i], CMX_ECHO_ON, 0);
- }
- if (mISDNport->b_port[i]->p_m_tone)
- {
- PDEBUG(DEBUG_BCHANNEL, "during activation, we set tone to tone=%d.\n", mISDNport->b_port[i]->p_m_tone);
- ph_control(mISDNport->b_addr[i], TONE_PATT_ON, mISDNport->b_port[i]->p_m_tone);
- }
- if (mISDNport->b_port[i]->p_m_rxoff)
- {
- PDEBUG(DEBUG_BCHANNEL, "during activation, we set rxoff to rxoff=%d.\n", mISDNport->b_port[i]->p_m_rxoff);
- ph_control(mISDNport->b_addr[i], CMX_RECEIVE_OFF, 0);
- }
-#if 0
- if (mISDNport->b_port[i]->p_m_txmix)
- {
- PDEBUG(DEBUG_BCHANNEL, "during activation, we set txmix to txmix=%d.\n", mISDNport->b_port[i]->p_m_txmix);
- ph_control(mISDNport->b_addr[i], CMX_MIX_ON, 0);
- }
-#endif
- if (mISDNport->b_port[i]->p_m_dtmf)
- {
- PDEBUG(DEBUG_BCHANNEL, "during activation, we set dtmf to dtmf=%d.\n", mISDNport->b_port[i]->p_m_dtmf);
- ph_control(mISDNport->b_addr[i], DTMF_TONE_START, 0);
- }
- if (mISDNport->b_port[i]->p_m_crypt)
- {
- PDEBUG(DEBUG_BCHANNEL, "during activation, we set crypt to crypt=%d.\n", mISDNport->b_port[i]->p_m_crypt);
- ph_control_block(mISDNport->b_addr[i], BF_ENABLE_KEY, mISDNport->b_port[i]->p_m_crypt_key, mISDNport->b_port[i]->p_m_crypt_key_len);
- }
- todo: wer startet/stoppt eigentlich den audio-transmit
+ chan_trace_header(mISDNport, mISDNport->b_port[i], "BCHANNEL create socket", DIRECTION_OUT);
+ add_trace("channel", NULL, "%d", i+1+(i>=15));
+ add_trace("socket", NULL, "%d", mISDNport->b_sock[i].fd);
+ end_trace();
+
+ return(1);
+}
+
+
+/*
+ * subfunction for bchannel_event
+ * activate / deactivate request
+ */
+static void _bchannel_activate(struct mISDNport *mISDNport, int i, int activate, int timeout)
+{
+ struct mISDNhead act;
+ int ret;
+
+ if (!mISDNport->b_sock[i].inuse)
+ return;
+ act.prim = (activate)?PH_ACTIVATE_REQ:PH_DEACTIVATE_REQ;
+ act.id = 0;
+ ret = sendto(mISDNport->b_sock[i].fd, &act, MISDN_HEADER_LEN, 0, NULL, 0);
+ if (ret <= 0)
+ PERROR("Failed to send to socket %d\n", mISDNport->b_sock[i].fd);
+
+ /* trace */
+ chan_trace_header(mISDNport, mISDNport->b_port[i], activate ? "BCHANNEL activate" : "BCHANNEL deactivate", DIRECTION_OUT);
+ add_trace("channel", NULL, "%d", i+1+(i>=15));
+ if (timeout)
+ add_trace("event", NULL, "timeout recovery");
+ end_trace();
+}
+
+
+/*
+ * subfunction for bchannel_event
+ * set features
+ */
+static void _bchannel_configure(struct mISDNport *mISDNport, int i)
+{
+ struct PmISDN *port;
+ int handle, mode;
+
+ if (!mISDNport->b_sock[i].inuse)
+ return;
+ handle = mISDNport->b_sock[i].fd;
+ port = mISDNport->b_port[i];
+ mode = mISDNport->b_mode[i];
+ if (!port) {
+ PERROR("bchannel index i=%d not associated with a port object\n", i);
+ return;
}
+
+ /* set dsp features */
+ if (port->p_m_txdata)
+ ph_control(mISDNport, port, handle, (port->p_m_txdata)?DSP_TXDATA_ON:DSP_TXDATA_OFF, 0, "DSP-TXDATA", port->p_m_txdata);
+ if (port->p_m_delay && mode == B_MODE_TRANSPARENT)
+ ph_control(mISDNport, port, handle, DSP_DELAY, port->p_m_delay, "DSP-DELAY", port->p_m_delay);
+ if (port->p_m_tx_dejitter && mode == B_MODE_TRANSPARENT)
+ ph_control(mISDNport, port, handle, DSP_TX_DEJITTER, port->p_m_tx_dejitter, "DSP-TX_DEJITTER", port->p_m_tx_dejitter);
+ if (port->p_m_tx_gain && mode == B_MODE_TRANSPARENT)
+ ph_control(mISDNport, port, handle, DSP_VOL_CHANGE_TX, port->p_m_tx_gain, "DSP-TX_GAIN", port->p_m_tx_gain);
+ if (port->p_m_rx_gain && mode == B_MODE_TRANSPARENT)
+ ph_control(mISDNport, port, handle, DSP_VOL_CHANGE_RX, port->p_m_rx_gain, "DSP-RX_GAIN", port->p_m_rx_gain);
+ if (port->p_m_pipeline[0] && mode == B_MODE_TRANSPARENT)
+ ph_control_block(mISDNport, port, handle, DSP_PIPELINE_CFG, port->p_m_pipeline, strlen(port->p_m_pipeline)+1, "DSP-PIPELINE", 0);
+ if (port->p_m_conf && !port->p_m_mute)
+ ph_control(mISDNport, port, handle, DSP_CONF_JOIN, port->p_m_conf, "DSP-CONF", port->p_m_conf);
+ if (port->p_m_echo)
+ ph_control(mISDNport, port, handle, DSP_ECHO_ON, 0, "DSP-ECHO", 1);
+ if (port->p_m_tone && mode == B_MODE_TRANSPARENT)
+ ph_control(mISDNport, port, handle, DSP_TONE_PATT_ON, port->p_m_tone, "DSP-TONE", port->p_m_tone);
+ if (port->p_m_rxoff)
+ ph_control(mISDNport, port, handle, DSP_RECEIVE_OFF, 0, "DSP-RXOFF", 1);
+// if (port->p_m_txmix && mode == B_MODE_TRANSPARENT)
+// ph_control(mISDNport, port, handle, DSP_MIX_ON, 0, "DSP-MIX", 1);
+ if (port->p_m_dtmf && mode == B_MODE_TRANSPARENT)
+ ph_control(mISDNport, port, handle, DTMF_TONE_START, port->p_m_dtmf_threshold, "DSP-DTMF", 1);
+ if (port->p_m_crypt && mode == B_MODE_TRANSPARENT)
+ ph_control_block(mISDNport, port, handle, DSP_BF_ENABLE_KEY, port->p_m_crypt_key, port->p_m_crypt_key_len, "DSP-CRYPT", port->p_m_crypt_key_len);
}
-static void bchannel_deactivate(struct mISDNport *mISDNport, int i)
+
+void PmISDN::set_conf(int oldconf, int newconf)
{
- iframe_t dact;
+ if (oldconf != newconf) {
+ PDEBUG(DEBUG_BCHANNEL, "we change conference from conf=%d to conf=%d.\n", oldconf, newconf);
+ if (p_m_b_index > -1)
+ if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE)
+ ph_control(p_m_mISDNport, this, p_m_mISDNport->b_sock[p_m_b_index].fd, (newconf)?DSP_CONF_JOIN:DSP_CONF_SPLIT, newconf, "DSP-CONF", newconf);
+ } else
+ PDEBUG(DEBUG_BCHANNEL, "we already have conf=%d.\n", newconf);
+}
- if (mISDNport->b_state[i] == B_STATE_ACTIVE)
- {
- /* reset dsp features */
- if (mISDNport->b_port[i])
- {
- if (mISDNport->b_port[i]->p_m_delay)
- {
- PDEBUG(DEBUG_BCHANNEL, "during deactivation, we reset txdata from txdata=%d.\n", mISDNport->b_port[i]->p_m_txdata);
- ph_control(mISDNport->b_addr[i], CMX_TXDATA_OFF, 0);
- }
- if (mISDNport->b_port[i]->p_m_delay)
- {
- PDEBUG(DEBUG_BCHANNEL, "during deactivation, we reset delay from delay=%d.\n", mISDNport->b_port[i]->p_m_delay);
- ph_control(mISDNport->b_addr[i], CMX_JITTER, 0);
- }
- if (mISDNport->b_port[i]->p_m_txvol)
- {
- PDEBUG(DEBUG_BCHANNEL, "during deactivation, we reset tx-volume from shift=%d.\n", mISDNport->b_port[i]->p_m_txvol);
- ph_control(mISDNport->b_addr[i], VOL_CHANGE_TX, 0);
- }
- if (mISDNport->b_port[i]->p_m_rxvol)
- {
- PDEBUG(DEBUG_BCHANNEL, "during deactivation, we reset rx-volume from shift=%d.\n", mISDNport->b_port[i]->p_m_rxvol);
- ph_control(mISDNport->b_addr[i], VOL_CHANGE_RX, 0);
- }
- if (mISDNport->b_port[i]->p_m_conf)
- {
- PDEBUG(DEBUG_BCHANNEL, "during deactivation, we release conference from conf=%d.\n", mISDNport->b_port[i]->p_m_conf);
- ph_control(mISDNport->b_addr[i], CMX_CONF_SPLIT, 0);
- }
- if (mISDNport->b_port[i]->p_m_echo)
- {
- PDEBUG(DEBUG_BCHANNEL, "during deactivation, we reset echo from echo=%d.\n", mISDNport->b_port[i]->p_m_echo);
- ph_control(mISDNport->b_addr[i], CMX_ECHO_OFF, 0);
- }
- if (mISDNport->b_port[i]->p_m_tone)
- {
- PDEBUG(DEBUG_BCHANNEL, "during deactivation, we reset tone from tone=%d.\n", mISDNport->b_port[i]->p_m_tone);
- ph_control(mISDNport->b_addr[i], TONE_PATT_OFF, 0);
- }
- if (mISDNport->b_port[i]->p_m_rxoff)
- {
- PDEBUG(DEBUG_BCHANNEL, "during deactivation, we reset rxoff from rxoff=%d.\n", mISDNport->b_port[i]->p_m_rxoff);
- ph_control(mISDNport->b_addr[i], CMX_RECEIVE_ON, 0);
- }
-#if 0
- if (mISDNport->b_port[i]->p_m_txmix)
- {
- PDEBUG(DEBUG_BCHANNEL, "during deactivation, we reset txmix from txmix=%d.\n", mISDNport->b_port[i]->p_m_txmix);
- ph_control(mISDNport->b_addr[i], CMX_MIX_OFF, 0);
+
+/*
+ * subfunction for bchannel_event
+ * destroy stack
+ */
+static void _bchannel_destroy(struct mISDNport *mISDNport, int i)
+{
+ if (!mISDNport->b_sock[i].inuse)
+ return;
+ chan_trace_header(mISDNport, mISDNport->b_port[i], "BCHANNEL remove socket", DIRECTION_OUT);
+ add_trace("channel", NULL, "%d", i+1+(i>=15));
+ add_trace("socket", NULL, "%d", mISDNport->b_sock[i].fd);
+ end_trace();
+ close(mISDNport->b_sock[i].fd);
+ unregister_fd(&mISDNport->b_sock[i]);
+}
+
+
+/*
+bchannel procedure
+------------------
+
+A bchannel goes through the following states in this order:
+
+- B_STATE_IDLE
+No one is using the bchannel.
+It is available and not linked to Port class, nor reserved.
+
+- B_STATE_ACTIVATING
+The bchannel stack is created and an activation request is sent.
+It MAY be linked to Port class, but already unlinked due to Port class removal.
+
+- B_STATE_ACTIVE
+The bchannel is active and cofigured to the Port class needs.
+Also it is linked to a Port class, otherwhise it would be deactivated.
+
+- B_STATE_DEACTIVATING
+The bchannel is in deactivating state, due to deactivation request.
+It may be linked to a Port class, that likes to reactivate it.
+
+- B_STATE_IDLE
+See above.
+After deactivating bchannel, and if not used, the bchannel becomes idle again.
+
+A bchannel can have the following events:
+
+- B_EVENT_USE
+A bchannel is required by a Port class.
+
+- B_EVENT_ACTIVATED
+The bchannel beomes active.
+
+- B_EVENT_DROP
+The bchannel is not required by Port class anymore
+
+- B_EVENT_DEACTIVATED
+The bchannel becomes inactive.
+
+All actions taken on these events depend on the current bchannel's state and if it is linked to a Port class.
+
+*/
+
+/*
+ * process bchannel events
+ * - mISDNport is a pointer to the port's structure
+ * - i is the index of the bchannel
+ * - event is the B_EVENT_* value
+ * - port is the PmISDN class pointer
+ */
+void bchannel_event(struct mISDNport *mISDNport, int i, int event)
+{
+ class PmISDN *b_port = mISDNport->b_port[i];
+ int state = mISDNport->b_state[i];
+ int timer = -1; // no change
+ int p_m_tx_gain = 0;
+ int p_m_rx_gain = 0;
+ char *p_m_pipeline = NULL;
+ unsigned char *p_m_crypt_key = NULL;
+ int p_m_crypt_key_len = 0;
+ int p_m_crypt_key_type = 0;
+
+ if (b_port) {
+ p_m_tx_gain = b_port->p_m_tx_gain;
+ p_m_rx_gain = b_port->p_m_rx_gain;
+ p_m_pipeline = b_port->p_m_pipeline;
+ p_m_crypt_key = b_port->p_m_crypt_key;
+ p_m_crypt_key_len = b_port->p_m_crypt_key_len;
+ p_m_crypt_key_type = /*b_port->p_m_crypt_key_type*/1;
+ }
+
+ switch(event) {
+ case B_EVENT_USE:
+ /* port must be linked in order to allow activation */
+ if (!b_port)
+ FATAL("bchannel must be linked to a Port class\n");
+ switch(state) {
+ case B_STATE_IDLE:
+ /* create stack and send activation request */
+ if (_bchannel_create(mISDNport, i)) {
+ _bchannel_activate(mISDNport, i, 1, 0);
+ state = B_STATE_ACTIVATING;
+ timer = B_TIMER_ACTIVATING;
}
-#endif
- if (mISDNport->b_port[i]->p_m_dtmf)
- {
- PDEBUG(DEBUG_BCHANNEL, "during deactivation, we reset dtmf from dtmf=%d.\n", mISDNport->b_port[i]->p_m_dtmf);
- ph_control(mISDNport->b_addr[i], DTMF_TONE_STOP, 0);
+ break;
+
+ case B_STATE_ACTIVATING:
+ /* do nothing, because it is already activating */
+ break;
+
+ default:
+ /* problems that might ocurr:
+ * B_EVENT_USE is received when channel already in use.
+ */
+ PERROR("Illegal event %d at state %d, please correct.\n", event, state);
+ }
+ break;
+
+
+ case B_EVENT_ACTIVATED:
+ timer = 0;
+ switch(state) {
+ case B_STATE_ACTIVATING:
+ if (b_port) {
+ /* bchannel is active and used by Port class, so we configure bchannel */
+ _bchannel_configure(mISDNport, i);
+ state = B_STATE_ACTIVE;
+ b_port->p_m_load = 0;
+ b_port->update_load();
+ } else {
+ /* bchannel is active, but not used anymore (or has wrong stack config), so we deactivate */
+ _bchannel_activate(mISDNport, i, 0, 0);
+ state = B_STATE_DEACTIVATING;
+ timer = B_TIMER_DEACTIVATING;
}
- if (mISDNport->b_port[i]->p_m_crypt)
- {
- PDEBUG(DEBUG_BCHANNEL, "during deactivation, we reset crypt from crypt=%d.\n", mISDNport->b_port[i]->p_m_dtmf);
- ph_control(mISDNport->b_addr[i], BF_DISABLE, 0);
+ break;
+
+ default:
+ PERROR("Illegal event %d at state %d, please correct.\n", event, state);
+ }
+ break;
+
+ case B_EVENT_DROP:
+ if (!b_port)
+ FATAL("bchannel must be linked to a Port class\n");
+ switch(state) {
+ case B_STATE_IDLE:
+ /* bchannel is idle due to an error, so we do nothing */
+ break;
+
+ case B_STATE_ACTIVATING:
+ /* do nothing because we must wait until bchanenl is active before deactivating */
+ break;
+
+ case B_STATE_ACTIVE:
+ /* bchannel is active, so we deactivate */
+ _bchannel_activate(mISDNport, i, 0, 0);
+ state = B_STATE_DEACTIVATING;
+ timer = B_TIMER_DEACTIVATING;
+ break;
+
+ case B_STATE_DEACTIVATING:
+ /* we may have taken an already deactivating bchannel, but do not require it anymore, so we do nothing */
+ break;
+
+ default:
+ PERROR("Illegal event %d at state %d, please correct.\n", event, state);
+ }
+ break;
+
+ case B_EVENT_DEACTIVATED:
+ timer = 0;
+ switch(state) {
+ case B_STATE_IDLE:
+ /* ignore due to deactivation confirm after unloading */
+ break;
+
+ case B_STATE_DEACTIVATING:
+ _bchannel_destroy(mISDNport, i);
+ state = B_STATE_IDLE;
+ if (b_port) {
+ /* bchannel is now deactivate, but is requied by Port class, so we reactivate */
+ if (_bchannel_create(mISDNport, i)) {
+ _bchannel_activate(mISDNport, i, 1, 0);
+ state = B_STATE_ACTIVATING;
+ timer = B_TIMER_ACTIVATING;
+ }
}
+ break;
+
+ default:
+ PERROR("Illegal event %d at state %d, please correct.\n", event, state);
}
- /* deactivate bchannel */
- PDEBUG(DEBUG_BCHANNEL, "deactivating bchannel (index %d), because currently active.\n", i);
- dact.prim = DL_RELEASE | REQUEST;
- dact.addr = mISDNport->b_addr[i] | FLG_MSG_DOWN;
- dact.dinfo = 0;
- dact.len = 0;
- mISDN_write(mISDNdevice, &dact, mISDN_HEADER_LEN+dact.len, TIMEOUT_1SEC);
- mISDNport->b_state[i] = B_STATE_DEACTIVATING;
- return;
+ break;
+
+ case B_EVENT_TIMEOUT:
+ timer = 0;
+ switch(state) {
+ case B_STATE_IDLE:
+ /* ignore due to deactivation confirm after unloading */
+ break;
+
+ case B_STATE_ACTIVATING:
+ _bchannel_activate(mISDNport, i, 1, 1);
+ timer = B_TIMER_ACTIVATING;
+ break;
+
+ case B_STATE_DEACTIVATING:
+ _bchannel_activate(mISDNport, i, 0, 1);
+ timer = B_TIMER_DEACTIVATING;
+ break;
+
+ default:
+ PERROR("Illegal event %d at state %d, please correct.\n", event, state);
+ }
+ break;
+
+ default:
+ PERROR("Illegal event %d, please correct.\n", event);
}
+
+ mISDNport->b_state[i] = state;
+ if (timer == 0)
+ unsched_timer(&mISDNport->b_timer[i]);
+ else if (timer > 0)
+ schedule_timer(&mISDNport->b_timer[i], timer, 0);
}
+
+
/*
* check for available channel and reserve+set it.
* give channel number or SEL_CHANNEL_ANY or SEL_CHANNEL_NO
* give exclusiv flag
* returns -(cause value) or x = channel x or 0 = no channel
+ * NOTE: no activation is done here
*/
-denke ans aktivieren und deaktivieren
int PmISDN::seize_bchannel(int channel, int exclusive)
{
int i;
return(-6); /* channel unacceptable */
/* request exclusive channel */
- if (exclusive && channel>0)
- {
+ if (exclusive && channel>0) {
i = channel-1-(channel>16);
if (p_m_mISDNport->b_port[i])
return(-44); /* requested channel not available */
}
/* ask for channel */
- if (channel>0)
- {
+ if (channel>0) {
i = channel-1-(channel>16);
if (p_m_mISDNport->b_port[i] == NULL)
goto seize;
/* search for channel */
i = 0;
- while(i < p_m_mISDNport->b_num)
- {
- if (!p_m_mISDNport->b_port[i])
- {
+ while(i < p_m_mISDNport->b_num) {
+ if (!p_m_mISDNport->b_port[i]) {
channel = i+1+(i>=15);
goto seize;
}
return(-34); /* no free channel */
seize:
- /* link Port */
+ PDEBUG(DEBUG_BCHANNEL, "PmISDN(%s) seizing bchannel %d (index %d)\n", p_name, channel, i);
+
+ /* link Port, set parameters */
p_m_mISDNport->b_port[i] = this;
p_m_b_index = i;
p_m_b_channel = channel;
p_m_b_exclusive = exclusive;
- p_m_b_stid = p_m_mISDNport->b_stid[i];
- p_m_b_addr = p_m_mISDNport->b_addr[i];
- p_m_jittercheck = 0;
+ p_m_mISDNport->b_mode[i] = p_m_b_mode;
/* reserve channel */
- if (p_m_b_reserve == 0) // already reserved
- {
+ if (!p_m_b_reserve) {
p_m_b_reserve = 1;
- mISDNport->b_reserved++;
+ p_m_mISDNport->b_reserved++;
}
- PDEBUG(DEBUG_BCHANNEL, "PmISDN(%s) seizing bchannel %d (index %d)\n", p_name, channel, i);
-
return(channel);
}
/*
* drop reserved channel and unset it.
+ * deactivation is also done
*/
void PmISDN::drop_bchannel(void)
{
p_m_b_reserve = 0;
/* if not in use */
+ if (p_m_b_index < 0)
+ return;
if (!p_m_b_channel)
return;
PDEBUG(DEBUG_BCHANNEL, "PmISDN(%s) dropping bchannel\n", p_name);
+ if (p_m_mISDNport->b_state[p_m_b_index] != B_STATE_IDLE)
+ bchannel_event(p_m_mISDNport, p_m_b_index, B_EVENT_DROP);
p_m_mISDNport->b_port[p_m_b_index] = NULL;
+ p_m_mISDNport->b_mode[p_m_b_index] = 0;
p_m_b_index = -1;
p_m_b_channel = 0;
p_m_b_exclusive = 0;
- p_m_b_addr = 0;
- p_m_b_stid = 0;
}
/*
- * data is to be transmitted to the remote
+ * handler
+
+audio transmission procedure:
+-----------------------------
+
+* priority
+three sources of audio transmission:
+- crypto-data high priority
+- tones high priority (also high)
+- remote-data low priority
+
+* elapsed
+a variable that temporarily shows the number of samples elapsed since last transmission process.
+p_m_last_tv_* is used to store that last timestamp. this is used to calculate the time elapsed.
+
+* load
+a variable that is increased whenever data is transmitted.
+it is decreased while time elapses. it stores the number of samples that
+are currently loaded to dsp module.
+since clock in dsp module is the same clock for user space process, these
+times have no skew.
+
+* levels
+there are two levels:
+p_m_preload will give the load that have to be kept in dsp.
+ISDN_MAXLOAD (2*p_m_preload) will give the maximum load before dropping.
+
+* procedure for low priority data
+see txfromup() for procedure
+in short: remote data is ignored during high priority tones
+
+* procedure for high priority data
+whenever load is below p_m_preload, load is filled up to p_m_preload
+if no more data is available, load becomes empty again.
+
+'load' variable:
+0 p_m_preload ISDN_MAXLOAD
++--------------------+----------------------+
+| | |
++--------------------+----------------------+
+
+on empty load or on load below p_m_preload, the load is inceased to p_m_preload:
+0 p_m_preload ISDN_MAXLOAD
++--------------------+----------------------+
+|TTTTTTTTTTTTTTTTTTTT| |
++--------------------+----------------------+
+
+on empty load, remote-audio causes the load with the remote audio to be increased to p_m_preload.
+0 p_m_preload ISDN_MAXLOAD
++--------------------+----------------------+
+|TTTTTTTTTTTTTTTTTTTTRRRRR |
++--------------------+----------------------+
+
*/
-wech void Port::transmit(unsigned char *buffer, int length, int tonelength)
+void PmISDN::update_load(void)
{
- /* send tone data to isdn device only if we have data, otherwhise we send nothing */
- if (tonelength>0 && (p_tone_fh>=0 || p_tone_fetched || p_m_crypt_msg_loops))
- {
- unsigned char buf[mISDN_HEADER_LEN+tonelength];
- iframe_t *frm = (iframe_t *)buf;
-
- if (p_m_crypt_msg_loops)
- {
- /* send pending message */
- int tosend;
-
- tosend = p_m_crypt_msg_len - p_m_crypt_msg_current;
- if (tosend > newlen)
- tosend = newlen;
- memcpy(p, p_m_crypt_msg+p_m_crypt_msg_current, tosend);
- p_m_crypt_msg_current += tosend;
- if (p_m_crypt_msg_current == p_m_crypt_msg_len)
- {
- p_m_crypt_msg_current = 0;
- p_m_crypt_msg_loops--;
- }
- }
- frm->prim = DL_DATA | REQUEST;
- frm->addr = p_m_b_addr | FLG_MSG_DOWN;
- frm->dinfo = 0;
- frm->len = tonelength;
- memcpy(&frm->data.p, buffer, tonelength);
- mISDN_write(mISDNdevice, frm, mISDN_HEADER_LEN+frm->len, TIMEOUT_1SEC);
-
- if (p_debug_nothingtosend)
- {
- p_debug_nothingtosend = 0;
- PDEBUG((DEBUG_PORT | DEBUG_BCHANNEL), "PmISDN(%s) start sending, because we have tones and/or remote audio.\n", p_name);
- }
- } else
- {
- if (!p_debug_nothingtosend)
- {
- p_debug_nothingtosend = 1;
- PDEBUG((DEBUG_PORT | DEBUG_BCHANNEL), "PmISDN(%s) stop sending, because we have only silence.\n", p_name);
- }
- }
+ /* don't trigger load event if event already active */
+ if (p_m_loadtimer.active)
+ return;
+
+ schedule_timer(&p_m_loadtimer, 0, 0); /* no delay the first time */
}
+static int load_timer(struct lcr_timer *timer, void *instance, int index)
+{
+ class PmISDN *isdnport = (class PmISDN *)instance;
-/*
- * handler
- */
-int PmISDN::handler(void)
+ isdnport->load_tx();
+
+ return 0;
+}
+
+void PmISDN::load_tx(void)
{
- struct message *message;
- int elapsed, length;
-
- if ((ret = Port::handler()))
- return(ret);
-
- /* send tone data to isdn device only if we have data */
- if (p_tone_fh>=0 || p_tone_fetched || p_m_crypt_msg_loops)
- {
- /* calculate how much to transmit */
- if (!p_last_tv.sec)
- {
- elapsed = ISDN_PRELOAD << 3; /* preload for the first time */
- } else
- {
- elapsed = 1000 * (now_tv.sec - p_last_tv_sec)
- + (now_tv.usec/1000) - p_last_tv_msec;
- /* gap was greater preload, so only fill up to preload level */
- if (elapsed > ISDN_PRELOAD)
- {
- elapsed = ISDN_PRELOAD << 3
+ int elapsed = 0;
+ int ret;
+ struct timeval current_time;
+
+ /* get elapsed */
+ gettimeofday(¤t_time, NULL);
+ if (p_m_last_tv_sec) {
+ elapsed = 8000 * (current_time.tv_sec - p_m_last_tv_sec)
+ + 8 * (current_time.tv_usec/1000 - p_m_last_tv_msec);
+ }
+ /* set clock of last process! */
+ p_m_last_tv_sec = current_time.tv_sec;
+ p_m_last_tv_msec = current_time.tv_usec/1000;
+
+ /* process only if we have samples and we are active */
+ if (p_m_mISDNport->b_state[p_m_b_index] != B_STATE_ACTIVE)
+ return;
+
+ if (elapsed) {
+ /* update load */
+ if (elapsed < p_m_load)
+ p_m_load -= elapsed;
+ else
+ p_m_load = 0;
+
+ /* to send data, tone must be on */
+ if ((p_tone_name[0] || p_m_crypt_msg_loops || p_m_inband_send_on) /* what tones? */
+ && (p_m_load < p_m_preload) /* not too much load? */
+ && (p_state==PORT_STATE_CONNECT || p_m_mISDNport->tones || p_m_inband_send_on)) { /* connected or inband-tones? */
+ int tosend = p_m_preload - p_m_load, length;
+ unsigned char buf[MISDN_HEADER_LEN+tosend];
+ struct mISDNhead *frm = (struct mISDNhead *)buf;
+ unsigned char *p = buf+MISDN_HEADER_LEN;
+
+ /* copy inband signalling (e.g. used by ss5) */
+ if (p_m_inband_send_on && tosend) {
+ tosend -= inband_send(p, tosend);
}
- }
- if (elapsed >= ISDN_TRANSMIT)
- {
- unsigned char buf[mISDN_HEADER_LEN+(ISDN_PRELOAD<<3)];
- iframe_t *frm = (iframe_t *)buf;
-
- length = read_audio(buffer, elapsed);
- p_last_tv_sec = now_tv.sec;
- p_last_tv_msec = now_tv.usec/1000;
-
- if (p_m_crypt_msg_loops)
- {
- /* send pending message */
- int tosend;
- check!!
- tosend = p_m_crypt_msg_len - p_m_crypt_msg_current;
- if (tosend > length)
- tosend = length;
- memcpy(p, p_m_crypt_msg+p_m_crypt_msg_current, tosend);
- p_m_crypt_msg_current += tosend;
- if (p_m_crypt_msg_current == p_m_crypt_msg_len)
- {
+
+ /* copy crypto loops */
+ while (p_m_crypt_msg_loops && tosend) {
+ /* how much do we have to send */
+ length = p_m_crypt_msg_len - p_m_crypt_msg_current;
+
+ /* clip tosend */
+ if (length > tosend)
+ length = tosend;
+
+ /* copy message (part) to buffer */
+ memcpy(p, p_m_crypt_msg+p_m_crypt_msg_current, length);
+
+ /* new position */
+ p_m_crypt_msg_current += length;
+ if (p_m_crypt_msg_current == p_m_crypt_msg_len) {
+ /* next loop */
p_m_crypt_msg_current = 0;
p_m_crypt_msg_loops--;
+ if (!p_m_crypt_msg_loops)
+ update_rxoff();
+// puts("eine loop weniger");
}
+
+ /* new length */
+ tosend -= length;
+ }
+
+ /* copy tones */
+ if (p_tone_name[0] && tosend) {
+ tosend -= read_audio(p, tosend);
+ }
+
+ /* send data */
+ if (p_m_preload - p_m_load - tosend > 0) {
+ frm->prim = PH_DATA_REQ;
+ frm->id = 0;
+ ret = sendto(p_m_mISDNport->b_sock[p_m_b_index].fd, buf, MISDN_HEADER_LEN+p_m_preload-p_m_load-tosend, 0, NULL, 0);
+ if (ret <= 0)
+ PERROR("Failed to send to socket %d (samples = %d)\n", p_m_mISDNport->b_sock[p_m_b_index].fd, p_m_preload-p_m_load-tosend);
+ p_m_load += p_m_preload - p_m_load - tosend;
}
- frm->prim = DL_DATA | REQUEST;
- frm->addr = p_m_b_addr | FLG_MSG_DOWN;
- frm->dinfo = 0;
- frm->len = length;
- memcpy(&frm->data.p, buffer, length);
- mISDN_write(mISDNdevice, frm, mISDN_HEADER_LEN+frm->len, TIMEOUT_1SEC);
-
- if (p_debug_nothingtosend)
- {
- p_debug_nothingtosend = 0;
- PDEBUG((DEBUG_PORT | DEBUG_BCHANNEL), "PmISDN(%s) start sending, because we have tones and/or remote audio.\n", p_name);
- }
- return(1);
- }
- } else
- {
- p_last_tv.sec = p_last_tv.msec = 0; /* flag that we don't transmit data */
- if (!cwp_debug_nothingtosend)
- {
- p_debug_nothingtosend = 1;
- PDEBUG((DEBUG_PORT | DEBUG_BCHANNEL), "PmISDN(%s) stop sending, because we have only silence.\n", p_name);
- }
- }
-
- // NOTE: deletion is done by the child class
-
- /* handle timeouts */
- if (p_m_timeout)
- {
- if (p_m_timer+p_m_timeout < now_d)
- {
- PDEBUG(DEBUG_ISDN, "(%s) timeout after %d seconds detected (state=%d).\n", p_name, p_m_timeout, p_state);
- p_m_timeout = 0;
- /* send timeout to endpoint */
- message = message_create(p_serial, ACTIVE_EPOINT(p_epointlist), PORT_TO_EPOINT, MESSAGE_TIMEOUT);
- message->param.state = p_state;
- message_put(message);
}
- return(1);
}
-
- return(0); /* nothing done */
+
+ schedule_timer(&p_m_loadtimer, 0, PORT_TRANSMIT * 125);
}
+/* handle timeouts */
+static int mISDN_timeout(struct lcr_timer *timer, void *instance, int i)
+{
+ class PmISDN *isdnport = (class PmISDN *)instance;
+ struct lcr_msg *message;
+
+ PDEBUG(DEBUG_ISDN, "(%s) timeout after %d seconds detected (state=%d).\n", isdnport->p_name, isdnport->p_m_timeout.timeout.tv_sec, isdnport->p_state);
+ /* send timeout to endpoint */
+ message = message_create(isdnport->p_serial, ACTIVE_EPOINT(isdnport->p_epointlist), PORT_TO_EPOINT, MESSAGE_TIMEOUT);
+ message->param.state = isdnport->p_state;
+ message_put(message);
+
+ return 0;
+}
+
/*
* whenever we get audio data from bchannel, we process it here
*/
-void PmISDN::bchannel_receive(iframe_t *frm)
+void PmISDN::bchannel_receive(struct mISDNhead *hh, unsigned char *data, int len)
{
- unsigned char *data_temp;
- unsigned long length_temp;
- struct message *message;
- struct timeval tv;
- struct timezone tz;
- long long jitter_now;
- int newlen;
+ unsigned int cont = *((unsigned int *)data);
+ struct lcr_msg *message;
unsigned char *p;
int l;
- unsigned long cont;
-// iframe_t rsp; /* response to possible indication */
-#if 0
-#warning BCHANNEL-DEBUG
-{
- // check if we are part of all ports */
- class Port *port = port_first;
- while(port)
- {
- if (port==this)
- break;
- port=port->next;
- }
- if (!port)
- {
- PERROR_RUNTIME("**************************************************\n");
- PERROR_RUNTIME("*** BCHANNEL-DEBUG: !this! is not in list of ports\n");
- PERROR_RUNTIME("**************************************************\n");
- return;
- }
-}
-#endif
-
- if (frm->prim == (PH_CONTROL | INDICATION))
- {
- cont = *((unsigned long *)&frm->data.p);
- // PDEBUG(DEBUG_PORT, "PmISDN(%s) received a PH_CONTROL INDICATION 0x%x\n", p_name, cont);
- if ((cont&(~DTMF_TONE_MASK)) == DTMF_TONE_VAL)
- {
- message = message_create(p_serial, ACTIVE_EPOINT(p_epointlist), PORT_TO_EPOINT, MESSAGE_DTMF);
- message->param.dtmf = cont & DTMF_TONE_MASK;
- PDEBUG(DEBUG_PORT, "PmISDN(%s) PH_CONTROL DTMF digit '%c'\n", p_name, message->param.dtmf);
- message_put(message);
+ if (hh->prim == PH_CONTROL_IND) {
+ if (len < 4) {
+ PERROR("SHORT READ OF PH_CONTROL INDICATION\n");
+ return;
+ }
+ if ((cont&(~DTMF_TONE_MASK)) == DTMF_TONE_VAL) {
+ chan_trace_header(p_m_mISDNport, this, "BCHANNEL control", DIRECTION_IN);
+ add_trace("DTMF", NULL, "%c", cont & DTMF_TONE_MASK);
+ if (!p_m_dtmf)
+ add_trace("info", NULL, "DTMF is disabled");
+ end_trace();
+ if (!p_m_dtmf)
+ return;
+ if (p_type == PORT_TYPE_POTS_FXS_IN && p_state == PORT_STATE_IN_OVERLAP) {
+ class Pfxs *pfxs = (class Pfxs *)this;
+ if (!pfxs->p_m_fxs_allow_dtmf) {
+ PDEBUG(DEBUG_PORT, "PmISDN(%s) DTMF for FXS currently disabled\n", p_name);
+ return;
+ }
+ SCCAT(p_dialinginfo.id, cont & DTMF_TONE_MASK);
+ message = message_create(p_serial, ACTIVE_EPOINT(p_epointlist), PORT_TO_EPOINT, MESSAGE_INFORMATION);
+ message->param.information.id[0] = cont & DTMF_TONE_MASK;
+ PDEBUG(DEBUG_PORT, "PmISDN(%s) PH_CONTROL INDICATION INFORMATION digit '%s'\n", p_name, message->param.information.id);
+ message_put(message);
+ } else {
+ message = message_create(p_serial, ACTIVE_EPOINT(p_epointlist), PORT_TO_EPOINT, MESSAGE_DTMF);
+ message->param.dtmf = cont & DTMF_TONE_MASK;
+ PDEBUG(DEBUG_PORT, "PmISDN(%s) PH_CONTROL INDICATION DTMF digit '%c'\n", p_name, message->param.dtmf);
+ message_put(message);
+ }
+ return;
}
- switch(cont)
- {
- case BF_REJECT:
+ switch(cont) {
+ case DSP_BF_REJECT:
+ chan_trace_header(p_m_mISDNport, this, "BCHANNEL control", DIRECTION_IN);
+ add_trace("DSP-CRYPT", NULL, "error");
+ end_trace();
message = message_create(p_serial, ACTIVE_EPOINT(p_epointlist), PORT_TO_EPOINT, MESSAGE_CRYPT);
message->param.crypt.type = CC_ERROR_IND;
- PDEBUG(DEBUG_PORT, "PmISDN(%s) PH_CONTROL reject of blowfish.\n", p_name);
+ PDEBUG(DEBUG_PORT, "PmISDN(%s) PH_CONTROL INDICATION reject of blowfish.\n", p_name);
message_put(message);
break;
- case BF_ACCEPT:
+ case DSP_BF_ACCEPT:
+ chan_trace_header(p_m_mISDNport, this, "BCHANNEL control", DIRECTION_IN);
+ add_trace("DSP-CRYPT", NULL, "ok");
+ end_trace();
message = message_create(p_serial, ACTIVE_EPOINT(p_epointlist), PORT_TO_EPOINT, MESSAGE_CRYPT);
message->param.crypt.type = CC_ACTBF_CONF;
- PDEBUG(DEBUG_PORT, "PmISDN(%s) PH_CONTROL accept of blowfish.\n", p_name);
+ PDEBUG(DEBUG_PORT, "PmISDN(%s) PH_CONTROL INDICATION accept of blowfish.\n", p_name);
message_put(message);
break;
+
+ default:
+ chan_trace_header(p_m_mISDNport, this, "BCHANNEL control", DIRECTION_IN);
+ add_trace("unknown", NULL, "0x%x", cont);
+ end_trace();
}
return;
}
+ if (hh->prim == PH_CONTROL_IND) {
+ switch(hh->id) {
+ default:
+ chan_trace_header(p_m_mISDNport, this, "BCHANNEL control", DIRECTION_IN);
+ add_trace("unknown", NULL, "0x%x", hh->id);
+ end_trace();
+ }
+ return;
+ }
+ if (hh->prim == PH_DATA_REQ || hh->prim == DL_DATA_REQ) {
+ if (!p_m_txdata) {
+ /* if tx is off, it may happen that fifos send us pending informations, we just ignore them */
+ PDEBUG(DEBUG_BCHANNEL, "PmISDN(%s) ignoring tx data, because 'txdata' is turned off\n", p_name);
+ return;
+ }
+ /* see below (same condition) */
+ if (p_state!=PORT_STATE_CONNECT
+ && !p_m_mISDNport->tones)
+ return;
+// printf(".");fflush(stdout);return;
+ if (p_record)
+ record(data, len, 1); // from up
+ if (p_tap)
+ tap(data, len, 1); // from up
+ return;
+ }
+ if (hh->prim != PH_DATA_IND && hh->prim != DL_DATA_IND) {
+ PERROR("Bchannel received unknown primitve: 0x%x\n", hh->prim);
+ return;
+ }
+
+ /* inband is processed */
+ if (p_m_inband_receive_on)
+ inband_receive(data, len);
+
+ /* send to remote, if bridged */
+ bridge_tx(data, len);
/* calls will not process any audio data unless
* the call is connected OR tones feature is enabled.
*/
+#ifndef DEBUG_COREBRIDGE
if (p_state!=PORT_STATE_CONNECT
- && !p_m_mISDNport->is_tones)
+ && !p_m_mISDNport->tones)
return;
+#endif
#if 0
/* the bearer capability must be audio in order to send and receive
#endif
/* if rx is off, it may happen that fifos send us pending informations, we just ignore them */
- if (p_m_rxoff)
- {
+ if (p_m_rxoff) {
PDEBUG(DEBUG_BCHANNEL, "PmISDN(%s) ignoring data, because rx is turned off\n", p_name);
return;
}
+ /* record data */
+ if (p_record)
+ record(data, len, 0); // from down
+ if (p_tap)
+ tap(data, len, 0); // from down
+
/* randomize and listen to crypt message if enabled */
- if (p_m_crypt_listen)
- {
+ if (p_m_crypt_listen) {
/* the noisy randomizer */
- p = (unsigned char *)&frm->data.p;
- l = frm->len;
+ p = data;
+ l = len;
while(l--)
mISDN_rand[mISDN_rand_count & 0xff] += *p++;
- cryptman_listen_bch((unsigned char *)&frm->data.p, frm->len);
- }
-
- p = (unsigned char *)&frm->data.p;
-
- /* send data to epoint */
- if (p_m_calldata && ACTIVE_EPOINT(p_epointlist)) /* only if we have an epoint object */
- {
-//printf("we are port %s and sending to epoint %d\n", p_m_cardname, p_epoint->serial);
- length_temp = frm->len;
- data_temp = p;
- while(length_temp)
- {
- message = message_create(p_serial, ACTIVE_EPOINT(p_epointlist), PORT_TO_EPOINT, MESSAGE_DATA);
- message->param.data.len = (length_temp>sizeof(message->param.data.data))?sizeof(message->param.data.data):length_temp;
- memcpy(message->param.data.data, data_temp, message->param.data.len);
- message->param.data.compressed = 1;
- message->param.data.port_id = p_serial;
- message->param.data.port_type = p_type;
- message_put(message);
- if (length_temp <= sizeof(message->param.data.data))
- break;
- data_temp += sizeof(message->param.data.data);
- length_temp -= sizeof(message->param.data.data);
- }
+ cryptman_listen_bch(data, len);
}
-#if 0
- /* response to the data indication */
- rsp.prim = frm->prim & 0xfffffffc | RESPONSE;
- rsp.addr = frm->addr & INST_ID_MASK | FLG_MSG_DOWN;
- rsp.dinfo = frm->dinfo;
- rsp.len = 0;
- mISDN_write(mISDNdevice, &rsp, mISDN_HEADER_LEN+rsp.len, TIMEOUT_1SEC);
-//PDEBUG(DEBUG_ISDN, "written %d bytes.\n", length);
-#endif
}
*/
void PmISDN::set_echotest(int echo)
{
- if (p_m_echo != echo)
- {
+ if (p_m_echo != echo) {
p_m_echo = echo;
PDEBUG(DEBUG_ISDN, "we set echo to echo=%d.\n", p_m_echo);
if (p_m_b_channel)
if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE)
- ph_control(p_m_b_addr, p_m_echo?CMX_ECHO_ON:CMX_ECHO_OFF, 0);
+ ph_control(p_m_mISDNport, this, p_m_mISDNport->b_sock[p_m_b_index].fd, p_m_echo?DSP_ECHO_ON:DSP_ECHO_OFF, 0, "DSP-ECHO", p_m_echo);
}
}
/*
* set tone
*/
-void PmISDN::set_tone(char *dir, char *tone)
+void PmISDN::set_tone(const char *dir, const char *tone)
{
- int id;
+ int id = TONE_OFF;
+ int dsp = DSP_NONE;
+
+ /* if no directory is given (by extension), we use interface.conf or options.conf */
+ if (!dir || !dir[0]) {
+ if (p_m_mISDNport->ifport->tones_dir[0])
+ dir = p_m_mISDNport->ifport->tones_dir;
+ else if (options.tones_dir[0])
+ dir = options.tones_dir;
+ }
if (!tone)
tone = "";
PDEBUG(DEBUG_ISDN, "isdn port now plays tone:'%s'.\n", tone);
- if (!tone[0])
- {
+ if (!tone[0]) {
id = TONE_OFF;
goto setdsp;
}
+ /* check for dsp tones */
+ if (!strcmp(dir, "american"))
+ dsp = DSP_AMERICAN;
+ if (!strcmp(dir, "german"))
+ dsp = DSP_GERMAN;
+ if (!strcmp(dir, "oldgerman"))
+ dsp = DSP_OLDGERMAN;
+
/* check if we NOT really have to use a dsp-tone */
- if (!options.dsptones)
- {
+ if (dsp == DSP_NONE) {
nodsp:
if (p_m_tone)
- if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE)
- {
+ if (p_m_b_index > -1)
+ if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE && p_m_mISDNport->b_mode[p_m_b_index] == B_MODE_TRANSPARENT) {
PDEBUG(DEBUG_ISDN, "we reset tone from id=%d to OFF.\n", p_m_tone);
- ph_control(p_m_b_addr, TONE_PATT_OFF, 0);
+ ph_control(p_m_mISDNport, this, p_m_mISDNport->b_sock[p_m_b_index].fd, DSP_TONE_PATT_OFF, 0, "DSP-TONE", 0);
}
p_m_tone = 0;
Port::set_tone(dir, tone);
return;
}
- if (p_tone_dir[0])
- goto nodsp;
/* now we USE dsp-tone, convert name */
- else if (!strcmp(tone, "dialtone"))
- {
- switch(options.dsptones) {
+ if (!strcmp(tone, "dialtone")) {
+ switch(dsp) {
case DSP_AMERICAN: id = TONE_AMERICAN_DIALTONE; break;
case DSP_GERMAN: id = TONE_GERMAN_DIALTONE; break;
case DSP_OLDGERMAN: id = TONE_GERMAN_OLDDIALTONE; break;
}
- } else if (!strcmp(tone, "dialpbx"))
- {
- switch(options.dsptones) {
+ } else if (!strcmp(tone, "dialpbx")) {
+ switch(dsp) {
case DSP_AMERICAN: id = TONE_AMERICAN_DIALPBX; break;
case DSP_GERMAN: id = TONE_GERMAN_DIALPBX; break;
case DSP_OLDGERMAN: id = TONE_GERMAN_OLDDIALPBX; break;
}
- } else if (!strcmp(tone, "ringing"))
- {
- switch(options.dsptones) {
+ } else if (!strcmp(tone, "ringing")) {
+ switch(dsp) {
case DSP_AMERICAN: id = TONE_AMERICAN_RINGING; break;
case DSP_GERMAN: id = TONE_GERMAN_RINGING; break;
case DSP_OLDGERMAN: id = TONE_GERMAN_OLDRINGING; break;
}
- } else if (!strcmp(tone, "ringpbx"))
- {
- switch(options.dsptones) {
+ } else if (!strcmp(tone, "ringpbx")) {
+ switch(dsp) {
case DSP_AMERICAN: id = TONE_AMERICAN_RINGPBX; break;
case DSP_GERMAN: id = TONE_GERMAN_RINGPBX; break;
case DSP_OLDGERMAN: id = TONE_GERMAN_OLDRINGPBX; break;
}
- } else if (!strcmp(tone, "busy"))
- {
+ } else if (!strcmp(tone, "busy")) {
busy:
- switch(options.dsptones) {
+ switch(dsp) {
case DSP_AMERICAN: id = TONE_AMERICAN_BUSY; break;
case DSP_GERMAN: id = TONE_GERMAN_BUSY; break;
case DSP_OLDGERMAN: id = TONE_GERMAN_OLDBUSY; break;
}
- } else if (!strcmp(tone, "release"))
- {
+ } else if (!strcmp(tone, "release")) {
hangup:
- switch(options.dsptones) {
+ switch(dsp) {
case DSP_AMERICAN: id = TONE_AMERICAN_HANGUP; break;
case DSP_GERMAN: id = TONE_GERMAN_HANGUP; break;
case DSP_OLDGERMAN: id = TONE_GERMAN_OLDHANGUP; break;
goto hangup;
else if (!strcmp(tone, "cause_11"))
goto busy;
- else if (!strcmp(tone, "cause_22"))
- {
- switch(options.dsptones) {
+ else if (!strcmp(tone, "cause_22")) {
+ switch(dsp) {
case DSP_AMERICAN: id = TONE_SPECIAL_INFO; break;
case DSP_GERMAN: id = TONE_GERMAN_GASSENBESETZT; break;
case DSP_OLDGERMAN: id = TONE_GERMAN_OLDBUSY; break;
goto nodsp;
setdsp:
- if (p_m_tone != id)
- {
+ if (p_m_tone != id) {
/* set new tone */
p_m_tone = id;
PDEBUG(DEBUG_ISDN, "we set tone to id=%d.\n", p_m_tone);
- if (p_m_b_channel)
- if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE)
- ph_control(p_m_b_addr, p_m_tone?TONE_PATT_ON:TONE_PATT_OFF, p_m_tone);
+ if (p_m_b_index > -1)
+ if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE && p_m_mISDNport->b_mode[p_m_b_index] == B_MODE_TRANSPARENT)
+ ph_control(p_m_mISDNport, this, p_m_mISDNport->b_sock[p_m_b_index].fd, p_m_tone?DSP_TONE_PATT_ON:DSP_TONE_PATT_OFF, p_m_tone, "DSP-TONE", p_m_tone);
}
/* turn user-space tones off in cases of no tone OR dsp tone */
Port::set_tone("",NULL);
/* MESSAGE_mISDNSIGNAL */
-//extern struct message *dddebug;
-void PmISDN::message_mISDNsignal(unsigned long epoint_id, int message_id, union parameter *param)
+//extern struct lcr_msg *dddebug;
+void PmISDN::message_mISDNsignal(unsigned int epoint_id, int message_id, union parameter *param)
{
- switch(param->mISDNsignal.message)
- {
+ int oldconf, newconf;
+ switch(param->mISDNsignal.message) {
case mISDNSIGNAL_VOLUME:
- if (p_m_txvol != param->mISDNsignal.txvol)
- {
- p_m_txvol = param->mISDNsignal.txvol;
- PDEBUG(DEBUG_BCHANNEL, "we change tx-volume to shift=%d.\n", p_m_txvol);
- if (p_m_b_channel)
- if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE)
- ph_control(p_m_b_addr, VOL_CHANGE_TX, p_m_txvol);
- }
- if (p_m_rxvol != param->mISDNsignal.rxvol)
- {
- p_m_rxvol = param->mISDNsignal.rxvol;
- PDEBUG(DEBUG_BCHANNEL, "we change rx-volume to shift=%d.\n", p_m_rxvol);
- if (p_m_b_channel)
- if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE)
- ph_control(p_m_b_addr, VOL_CHANGE_RX, p_m_rxvol);
- }
+ if (p_m_tx_gain != param->mISDNsignal.tx_gain) {
+ p_m_tx_gain = param->mISDNsignal.tx_gain;
+ PDEBUG(DEBUG_BCHANNEL, "we change tx-volume to shift=%d.\n", p_m_tx_gain);
+ if (p_m_b_index > -1)
+ if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE && p_m_mISDNport->b_mode[p_m_b_index] == B_MODE_TRANSPARENT)
+ ph_control(p_m_mISDNport, this, p_m_mISDNport->b_sock[p_m_b_index].fd, DSP_VOL_CHANGE_TX, p_m_tx_gain, "DSP-TX_GAIN", p_m_tx_gain);
+ } else
+ PDEBUG(DEBUG_BCHANNEL, "we already have tx-volume shift=%d.\n", p_m_rx_gain);
+ if (p_m_rx_gain != param->mISDNsignal.rx_gain) {
+ p_m_rx_gain = param->mISDNsignal.rx_gain;
+ PDEBUG(DEBUG_BCHANNEL, "we change rx-volume to shift=%d.\n", p_m_rx_gain);
+ if (p_m_b_index > -1)
+ if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE && p_m_mISDNport->b_mode[p_m_b_index] == B_MODE_TRANSPARENT)
+ ph_control(p_m_mISDNport, this, p_m_mISDNport->b_sock[p_m_b_index].fd, DSP_VOL_CHANGE_RX, p_m_rx_gain, "DSP-RX_GAIN", p_m_rx_gain);
+ } else
+ PDEBUG(DEBUG_BCHANNEL, "we already have rx-volume shift=%d.\n", p_m_rx_gain);
break;
case mISDNSIGNAL_CONF:
-//if (dddebug) PDEBUG(DEBUG_ISDN, "dddebug = %d\n", dddebug->type);
-//tone if (!p_m_tone && p_m_conf!=param->mISDNsignal.conf)
- if (p_m_conf != param->mISDNsignal.conf)
- {
- p_m_conf = param->mISDNsignal.conf;
- PDEBUG(DEBUG_BCHANNEL, "we change conference to conf=%d.\n", p_m_conf);
- if (p_m_b_channel)
- if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE)
- ph_control(p_m_b_addr, (p_m_conf)?CMX_CONF_JOIN:CMX_CONF_SPLIT, p_m_conf);
- }
- /* we must set, even if currently tone forbids conf */
+ oldconf = p_m_mute?0:p_m_conf;
p_m_conf = param->mISDNsignal.conf;
-//if (dddebug) PDEBUG(DEBUG_ISDN, "dddebug = %d\n", dddebug->type);
+ newconf = p_m_mute?0:p_m_conf;
+ set_conf(oldconf, newconf);
break;
- case mISDNSIGNAL_CALLDATA:
- if (p_m_calldata != param->mISDNsignal.calldata)
- {
- p_m_calldata = param->mISDNsignal.calldata;
- PDEBUG(DEBUG_BCHANNEL, "we change to calldata=%d.\n", p_m_calldata);
- auch senden
- }
- break;
-
-#if 0
- case mISDNSIGNAL_NODATA:
- p_m_nodata = param->mISDNsignal.nodata;
- if (p_m_txmix == p_m_nodata) /* txmix != !nodata */
- {
- p_m_txmix = !p_m_nodata;
- PDEBUG(DEBUG_BCHANNEL, "we change mix mode to txmix=%d (nodata=%d).\n", p_m_txmix, p_m_nodata);
- if (p_m_b_channel)
- if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE)
- ph_control(p_m_b_addr, p_m_txmix?CMX_MIX_ON:CMX_MIX_OFF, 0);
- }
- break;
-#endif
-
-#if 0
- case mISDNSIGNAL_RXOFF:
- if (p_m_rxoff != param->mISDNsignal.rxoff)
- {
- p_m_rxoff = param->mISDNsignal.rxoff;
- PDEBUG(DEBUG_BCHANNEL, "we change receive mode to rxoff=%d.\n", p_m_rxoff);
- if (p_m_b_channel)
- if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE)
- ph_control(p_m_b_addr, p_m_rxoff?CMX_RECEIVE_OFF:CMX_RECEIVE_ON, 0);
- }
- break;
-
- case mISDNSIGNAL_DTMF:
- if (p_m_dtmf != param->mISDNsignal.dtmf)
- {
- p_m_dtmf = param->mISDNsignal.dtmf;
- PDEBUG(DEBUG_BCHANNEL, "we change dtmf mode to dtmf=%d.\n", p_m_dtmf);
- if (p_m_b_channel)
- if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE)
- ph_control(p_m_b_addr, p_m_dtmf?DTMF_TONE_START:DTMF_TONE_STOP, 0);
- }
+ case mISDNSIGNAL_DELAY:
+ if (p_m_delay != param->mISDNsignal.delay) {
+ p_m_delay = param->mISDNsignal.delay;
+ PDEBUG(DEBUG_BCHANNEL, "we change delay mode to delay=%d.\n", p_m_delay);
+ if (p_m_b_index > -1)
+ if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE && p_m_mISDNport->b_mode[p_m_b_index] == B_MODE_TRANSPARENT)
+ ph_control(p_m_mISDNport, this, p_m_mISDNport->b_sock[p_m_b_index].fd, p_m_delay?DSP_DELAY:DSP_JITTER, p_m_delay, "DSP-DELAY", p_m_delay);
+ } else
+ PDEBUG(DEBUG_BCHANNEL, "we already have delay=%d.\n", p_m_delay);
break;
-#endif
default:
PERROR("PmISDN(%s) unsupported signal message %d.\n", p_name, param->mISDNsignal.message);
}
}
/* MESSAGE_CRYPT */
-void PmISDN::message_crypt(unsigned long epoint_id, int message_id, union parameter *param)
+void PmISDN::message_crypt(unsigned int epoint_id, int message_id, union parameter *param)
{
- struct message *message;
+ struct lcr_msg *message;
- switch(param->crypt.type)
- {
+ switch(param->crypt.type) {
case CC_ACTBF_REQ: /* activate blowfish */
p_m_crypt = 1;
p_m_crypt_key_len = param->crypt.len;
- if (p_m_crypt_key_len > (int)sizeof(p_m_crypt_key))
- {
+ if (p_m_crypt_key_len > (int)sizeof(p_m_crypt_key)) {
PERROR("PmISDN(%s) key too long %d > %d\n", p_name, p_m_crypt_key_len, sizeof(p_m_crypt_key));
message = message_create(p_serial, ACTIVE_EPOINT(p_epointlist), PORT_TO_EPOINT, MESSAGE_CRYPT);
message->param.crypt.type = CC_ERROR_IND;
memcpy(p_m_crypt_key, param->crypt.data, p_m_crypt_key_len);
crypt_off:
PDEBUG(DEBUG_BCHANNEL, "we set encryption to crypt=%d. (0 means OFF)\n", p_m_crypt);
- if (p_m_b_channel)
- if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE)
- ph_control_block(p_m_b_addr, p_m_crypt?BF_ENABLE_KEY:BF_DISABLE, p_m_crypt_key, p_m_crypt_key_len);
+ if (p_m_b_index > -1)
+ if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE && p_m_mISDNport->b_mode[p_m_b_index] == B_MODE_TRANSPARENT)
+ ph_control_block(p_m_mISDNport, this, p_m_mISDNport->b_sock[p_m_b_index].fd, p_m_crypt?DSP_BF_ENABLE_KEY:DSP_BF_DISABLE, p_m_crypt_key, p_m_crypt_key_len, "DSP-CRYPT", p_m_crypt_key_len);
break;
case CC_DACT_REQ: /* deactivate session encryption */
case CR_LISTEN_REQ: /* start listening to messages */
p_m_crypt_listen = 1;
+ update_rxoff();
p_m_crypt_listen_state = 0;
break;
case CR_UNLISTEN_REQ: /* stop listening to messages */
p_m_crypt_listen = 0;
+ update_rxoff();
break;
case CR_MESSAGE_REQ: /* send message */
p_m_crypt_msg_len = cryptman_encode_bch(param->crypt.data, param->crypt.len, p_m_crypt_msg, sizeof(p_m_crypt_msg));
- if (!p_m_crypt_msg_len)
- {
+ if (!p_m_crypt_msg_len) {
PERROR("PmISDN(%s) message too long %d > %d\n", p_name, param->crypt.len-1, sizeof(p_m_crypt_msg));
break;
}
p_m_crypt_msg_current = 0; /* reset */
- p_m_crypt_msg_loops = 3; /* enable */
+ p_m_crypt_msg_loops = 6; /* enable */
+ update_rxoff();
#if 0
/* disable txmix, or we get corrupt data due to audio process */
- if (p_m_txmix)
- {
+ if (p_m_txmix && p_m_b_index>=0 && p_m_mISDNport->b_mode[p_m_b_index] == B_MODE_TRANSPARENT) {
PDEBUG(DEBUG_BCHANNEL, "for sending CR_MESSAGE_REQ, we reset txmix from txmix=%d.\n", p_m_txmix);
- ph_control(p_m_b_addr, CMX_MIX_OFF, 0);
+ ph_control(p_m_mISDNport, this, p_mISDNport->b_sock[p_m_b_index].fd, DSP_MIX_OFF, 0, "DSP-TXMIX", 0);
}
#endif
break;
/*
* endpoint sends messages to the port
*/
-int PmISDN::message_epoint(unsigned long epoint_id, int message_id, union parameter *param)
+int PmISDN::message_epoint(unsigned int epoint_id, int message_id, union parameter *param)
{
- if (Port::message_epoint(epoint_id, message_id, param))
- return(1);
+ if (Port::message_epoint(epoint_id, message_id, param)) {
+ if (message_id == MESSAGE_BRIDGE)
+ update_rxoff();
+ return 1;
+ }
- switch(message_id)
- {
+ switch(message_id) {
case MESSAGE_mISDNSIGNAL: /* user command */
PDEBUG(DEBUG_ISDN, "PmISDN(%s) received special ISDN SIGNAL %d.\n", p_name, param->mISDNsignal.message);
message_mISDNsignal(epoint_id, message_id, param);
- return(1);
+ return 1;
case MESSAGE_CRYPT: /* crypt control command */
PDEBUG(DEBUG_ISDN, "PmISDN(%s) received encryption command '%d'.\n", p_name, param->crypt.type);
message_crypt(epoint_id, message_id, param);
- return(1);
+ return 1;
+
+ case MESSAGE_DISABLE_DEJITTER:
+ PDEBUG(DEBUG_ISDN, "PmISDN(%s) received de-jitter disable order.\n", p_name);
+ p_m_disable_dejitter = 1;
+ p_m_preload = param->queue;
+ update_rxoff();
+ return 1;
}
- return(0);
+ return 0;
}
-
-/*
- * transmit function for data to mISDN b-channel
- */
-void Port::transmit(unsigned char *buffer, int length)
+void PmISDN::update_rxoff(void)
{
+ int tx_dejitter = 0;
+
+ /* call bridges in user space OR crypto OR recording */
+ if (p_bridge || p_m_crypt_msg_loops || p_m_crypt_listen || p_record || p_tap || p_m_inband_receive_on) {
+ /* rx IS required */
+ if (p_m_rxoff) {
+ /* turn on RX */
+ p_m_rxoff = 0;
+ PDEBUG(DEBUG_BCHANNEL, "%s: receive data is required, so we turn them on\n", __FUNCTION__);
+ if (p_m_b_index > -1)
+ if (p_m_mISDNport->b_port[p_m_b_index] && p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE)
+ ph_control(p_m_mISDNport, this, p_m_mISDNport->b_sock[p_m_b_index].fd, DSP_RECEIVE_ON, 0, "DSP-RXOFF", 0);
+ }
+ } else {
+ /* rx NOT required */
+ if (!p_m_rxoff) {
+ /* turn off RX */
+ p_m_rxoff = 1;
+ PDEBUG(DEBUG_BCHANNEL, "%s: receive data is not required, so we turn them off\n", __FUNCTION__);
+ if (p_m_b_index > -1)
+ if (p_m_mISDNport->b_port[p_m_b_index] && p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE)
+ ph_control(p_m_mISDNport, this, p_m_mISDNport->b_sock[p_m_b_index].fd, DSP_RECEIVE_OFF, 0, "DSP-RXOFF", 1);
+ }
+ }
+ /* recording / tapping */
+ if (p_record || p_tap) {
+ /* txdata IS required */
+ if (!p_m_txdata) {
+ /* turn on RX */
+ p_m_txdata = 1;
+ PDEBUG(DEBUG_BCHANNEL, "%s: transmit data is required, so we turn them on\n", __FUNCTION__);
+ if (p_m_b_index > -1)
+ if (p_m_mISDNport->b_port[p_m_b_index] && p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE)
+ ph_control(p_m_mISDNport, this, p_m_mISDNport->b_sock[p_m_b_index].fd, DSP_TXDATA_ON, 0, "DSP-TXDATA", 1);
+ }
+ } else {
+ /* txdata NOT required */
+ if (p_m_txdata) {
+ /* turn off RX */
+ p_m_txdata = 0;
+ PDEBUG(DEBUG_BCHANNEL, "%s: transmit data is not required, so we turn them off\n", __FUNCTION__);
+ if (p_m_b_index > -1)
+ if (p_m_mISDNport->b_port[p_m_b_index] && p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE)
+ ph_control(p_m_mISDNport, this, p_m_mISDNport->b_sock[p_m_b_index].fd, DSP_TXDATA_OFF, 0, "DSP-TXDATA", 0);
+ }
+ }
+ /* dejitter on bridge */
+ if (p_bridge && !p_m_disable_dejitter)
+ tx_dejitter = 1;
+ if (p_m_tx_dejitter != tx_dejitter) {
+ p_m_tx_dejitter = tx_dejitter;
+ PDEBUG(DEBUG_BCHANNEL, "we change dejitter mode to %s.\n", (p_m_tx_dejitter) ? "on" : "off");
+ if (p_m_b_index > -1)
+ if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE && p_m_mISDNport->b_mode[p_m_b_index] == B_MODE_TRANSPARENT)
+ ph_control(p_m_mISDNport, this, p_m_mISDNport->b_sock[p_m_b_index].fd, DSP_TX_DEJITTER, p_m_tx_dejitter, "DSP-TX_DEJITTER", p_m_tx_dejitter);
+ }
}
-
-/*
- * main loop for processing messages from mISDN device
- */
-int mISDN_handler(void)
+static int mISDN_upqueue(struct lcr_fd *fd, unsigned int what, void *instance, int i)
{
- int ret;
- msg_t *msg;
- iframe_t *frm;
struct mISDNport *mISDNport;
- class PmISDN *isdnport;
- net_stack_t *nst;
- msg_t *dmsg;
- mISDNuser_head_t *hh;
- int i;
-
- /* the que avoids loopbacks when replying to stack after receiving
- * from stack. */
- mISDNport = mISDNport_first;
- while(mISDNport)
- {
- /* process turning on/off rx */
- i = 0;
- while(i < mISDNport->b_num)
- {
- if (mISDNport->b_port[i] && mISDNport->b_state[i] == B_STATE_ACTIVE)
- {
- isdnport=mISDNport->b_port[i];
- if (isdnport->p_m_calldata || isdnport->p_m_crypt_msg_loops || isdnport->p_m_crypt_listen || isdnport->p_record)
- {
- /* rx IS required */
- if (isdnport->p_m_rxoff)
- {
- /* turn on RX */
- isdnport->p_m_rxoff = 0;
- PDEBUG(DEBUG_BCHANNEL, "%s: receive data is required, so we turn them on\n");
- ph_control(isdnport->p_m_b_addr, CMX_RECEIVE_ON, 0);
- return(1);
- }
- } else
- {
- /* rx NOT required */
- if (!isdnport->p_m_rxoff)
- {
- /* turn off RX */
- isdnport->p_m_rxoff = 1;
- PDEBUG(DEBUG_BCHANNEL, "%s: receive data is not required, so we turn them off\n");
- ph_control(isdnport->p_m_b_addr, CMX_RECEIVE_OFF, 0);
- return(1);
- }
- }
- }
- i++;
- }
-#if 0
- if (mISDNport->l1timeout && now>mISDNport->l1timeout)
- {
- PDEBUG(DEBUG_ISDN, "the L1 establish timer expired, we release all pending messages.\n", mISDNport->portnum);
- mISDNport->l1timeout = 0;
-#endif
-
- if (mISDNport->l2establish)
- {
- if (now-mISDNport->l2establish > 5)
- {
- if (mISDNport->ntmode)
- {
- PDEBUG(DEBUG_ISDN, "the L2 establish timer expired, we try to establish the link NT portnum=%d.\n", mISDNport->portnum);
- time(&mISDNport->l2establish);
- /* establish */
- dmsg = create_l2msg(DL_ESTABLISH | REQUEST, 0, 0);
- if (mISDNport->nst.manager_l3(&mISDNport->nst, dmsg))
- free_msg(dmsg);
- } else {
- PDEBUG(DEBUG_ISDN, "the L2 establish timer expired, we try to establish the link TE portnum=%d.\n", mISDNport->portnum);
- time(&mISDNport->l2establish);
- /* establish */
- iframe_t act;
- act.prim = DL_ESTABLISH | REQUEST;
- act.addr = (mISDNport->upper_id & ~LAYER_ID_MASK) | 3 | FLG_MSG_DOWN;
- act.dinfo = 0;
- act.len = 0;
- mISDN_write(mISDNdevice, &act, mISDN_HEADER_LEN+act.len, TIMEOUT_1SEC);
- }
- return(1);
- }
- }
- if ((dmsg = msg_dequeue(&mISDNport->downqueue)))
- {
- if (mISDNport->ntmode)
- {
- hh = (mISDNuser_head_t *)dmsg->data;
- PDEBUG(DEBUG_ISDN, "sending queued NT l3-down-message: prim(0x%x) dinfo(0x%x) msg->len(%d)\n", hh->prim, hh->dinfo, dmsg->len);
- if (mISDNport->nst.manager_l3(&mISDNport->nst, dmsg))
- free_msg(dmsg);
- } else
- {
- frm = (iframe_t *)dmsg->data;
- frm->addr = mISDNport->upper_id | FLG_MSG_DOWN;
- frm->len = (dmsg->len) - mISDN_HEADER_LEN;
- PDEBUG(DEBUG_ISDN, "sending queued TE l3-down-message: prim(0x%x) dinfo(0x%x) msg->len(%d)\n", frm->prim, frm->dinfo, dmsg->len);
- mISDN_write(mISDNdevice, dmsg->data, dmsg->len, TIMEOUT_1SEC);
- free_msg(dmsg);
- }
- return(1);
- }
- mISDNport = mISDNport->next;
- }
-
- /* get message from kernel */
- if (!(msg = alloc_msg(MAX_MSG_SIZE)))
- return(1);
- ret = mISDN_read(mISDNdevice, msg->data, MAX_MSG_SIZE, 0);
- if (ret < 0)
- {
- free_msg(msg);
- if (errno == EAGAIN)
- return(0);
- PERROR("FATAL ERROR: failed to do mISDN_read()\n");
- exit(-1);
- }
- if (!ret)
- {
- free_msg(msg);
-// printf("%s: ERROR: mISDN_read() returns nothing\n");
- return(0);
- }
- msg->len = ret;
- frm = (iframe_t *)msg->data;
+ struct mbuffer *mb;
+ struct l3_msg *l3m;
+ char byte;
+ int ret;
- /* global prim */
- switch(frm->prim)
- {
- case MGR_INITTIMER | CONFIRM:
- case MGR_ADDTIMER | CONFIRM:
- case MGR_DELTIMER | CONFIRM:
- case MGR_REMOVETIMER | CONFIRM:
-// if (options.deb & DEBUG_ISDN)
-// PDEBUG(DEBUG_ISDN, "timer-confirm\n");
- free_msg(msg);
- return(1);
- }
+ /* unset global semaphore */
+ upqueue_avail = 0;
+ // with a very small incident, upqueue_avail may be set by mISDN thread and
+ // another byte may be sent to the pipe, which causes a call to this function
+ // again with nothing in the upqueue. this is no problem.
+ ret = read(fd->fd, &byte, 1);
- /* find the port */
+ /* process all ports */
mISDNport = mISDNport_first;
- while(mISDNport)
- {
- if ((frm->prim==(MGR_TIMER | INDICATION)) && mISDNport->ntmode)
- {
- itimer_t *it = mISDNport->nst.tlist;
-
- /* find timer */
- while(it)
- {
- if (it->id == (int)frm->addr)
- break;
- it = it->next;
- }
- if (it)
- {
- mISDN_write_frame(mISDNdevice, msg->data, mISDNport->upper_id | FLG_MSG_DOWN,
- MGR_TIMER | RESPONSE, 0, 0, NULL, TIMEOUT_1SEC);
-
- PDEBUG(DEBUG_ISDN, "timer-indication %s port %d it=%p\n", (mISDNport->ntmode)?"NT":"TE", mISDNport->portnum, it);
- test_and_clear_bit(FLG_TIMER_RUNING, (long unsigned int *)&it->Flags);
- ret = it->function(it->data);
- break;
- }
- /* we will continue here because we have a timer for a different mISDNport */
- }
-//printf("comparing frm->addr %x with upper_id %x\n", frm->addr, mISDNport->upper_id);
- if ((frm->addr&STACK_ID_MASK) == (unsigned int)(mISDNport->upper_id&STACK_ID_MASK))
- {
- /* d-message */
- switch(frm->prim)
- {
- case MGR_SHORTSTATUS | INDICATION:
- case MGR_SHORTSTATUS | CONFIRM:
- switch(frm->dinfo) {
- case SSTATUS_L1_ACTIVATED:
- PDEBUG(DEBUG_ISDN, "Received SSTATUS_L1_ACTIVATED for port %d (%s).\n", mISDNport->portnum, mISDNport->ifport->interface->name);
- goto ss_act;
- case SSTATUS_L1_DEACTIVATED:
- PDEBUG(DEBUG_ISDN, "Received SSTATUS_L1_DEACTIVATED for port %d (%s).\n", mISDNport->portnum, mISDNport->ifport->interface->name);
- goto ss_deact;
- case SSTATUS_L2_ESTABLISHED:
- PDEBUG(DEBUG_ISDN, "Received SSTATUS_L2_ESTABLISHED for port %d (%s).\n", mISDNport->portnum, mISDNport->ifport->interface->name);
- goto ss_estab;
- case SSTATUS_L2_RELEASED:
- PDEBUG(DEBUG_ISDN, "Received SSTATUS_L2_RELEASED for port %d (%s).\n", mISDNport->portnum, mISDNport->ifport->interface->name);
- goto ss_rel;
- }
- break;
-
- case PH_ACTIVATE | CONFIRM:
- case PH_ACTIVATE | INDICATION:
- PDEBUG(DEBUG_ISDN, "Received PH_ACTIVATED for port %d (%s).\n", mISDNport->portnum, mISDNport->ifport->interface->name);
- if (mISDNport->ntmode)
- {
+ while(mISDNport) {
+ /* handle queued up-messages (d-channel) */
+ while ((mb = mdequeue(&mISDNport->upqueue))) {
+ l3m = &mb->l3;
+ switch(l3m->type) {
+ case MPH_ACTIVATE_IND:
+ if (mISDNport->l1link != 1) {
+ l1l2l3_trace_header(mISDNport, NULL, L1_ACTIVATE_IND, DIRECTION_IN);
+ end_trace();
mISDNport->l1link = 1;
- setup_queue(mISDNport, 1);
- goto l1_msg;
}
- ss_act:
- mISDNport->l1link = 1;
- setup_queue(mISDNport, 1);
break;
-
- case PH_DEACTIVATE | CONFIRM:
- case PH_DEACTIVATE | INDICATION:
- PDEBUG(DEBUG_ISDN, "Received PH_DEACTIVATED for port %d (%s).\n", mISDNport->portnum, mISDNport->ifport->interface->name);
- if (mISDNport->ntmode)
- {
+
+ case MPH_DEACTIVATE_IND:
+ if (mISDNport->l1link != 0) {
+ l1l2l3_trace_header(mISDNport, NULL, L1_DEACTIVATE_IND, DIRECTION_IN);
+ end_trace();
mISDNport->l1link = 0;
- setup_queue(mISDNport, 0);
- goto l1_msg;
}
- ss_deact:
- mISDNport->l1link = 0;
- setup_queue(mISDNport, 0);
break;
- case PH_CONTROL | CONFIRM:
- case PH_CONTROL | INDICATION:
- PDEBUG(DEBUG_ISDN, "Received PH_CONTROL for port %d (%s).\n", mISDNport->portnum, mISDNport->ifport->interface->name);
+ case MPH_INFORMATION_IND:
+ PDEBUG(DEBUG_ISDN, "Received MPH_INFORMATION_IND for port %d (%s).\n", mISDNport->portnum, mISDNport->ifport->interface->name);
+ switch (l3m->pid) {
+ case L1_SIGNAL_LOS_ON:
+ mISDNport->los = 1;
+ break;
+ case L1_SIGNAL_LOS_OFF:
+ mISDNport->los = 0;
+ break;
+ case L1_SIGNAL_AIS_ON:
+ mISDNport->ais = 1;
+ break;
+ case L1_SIGNAL_AIS_OFF:
+ mISDNport->ais = 0;
+ break;
+ case L1_SIGNAL_RDI_ON:
+ mISDNport->rdi = 1;
+ break;
+ case L1_SIGNAL_RDI_OFF:
+ mISDNport->rdi = 0;
+ break;
+ case L1_SIGNAL_SLIP_TX:
+ mISDNport->slip_tx++;
+ break;
+ case L1_SIGNAL_SLIP_RX:
+ mISDNport->slip_rx++;
+ break;
+ }
break;
- case DL_ESTABLISH | INDICATION:
- case DL_ESTABLISH | CONFIRM:
-// PDEBUG(DEBUG_ISDN, "addr 0x%x established data link (DL) TE portnum=%d (DL_ESTABLISH)\n", frm->addr, mISDNport->portnum);
- if (!mISDNport->ntmode) break; /* !!!!!!!!!!!!!!!! */
- ss_estab:
-// if (mISDNport->ntmode)
-// break;
- if (mISDNport->l2establish)
- {
- mISDNport->l2establish = 0;
- PDEBUG(DEBUG_ISDN, "the link became active before l2establish timer expiry.\n");
- }
+ case MT_L2ESTABLISH:
+ l1l2l3_trace_header(mISDNport, NULL, L2_ESTABLISH_IND, DIRECTION_IN);
+ add_trace("tei", NULL, "%d", l3m->pid);
+ end_trace();
mISDNport->l2link = 1;
+ if (l3m->pid < 128)
+ mISDNport->l2mask[l3m->pid >> 3] |= (1 << (l3m->pid & 7));
+ if ((!mISDNport->ntmode || mISDNport->ptp) && l3m->pid < 127) {
+ if (mISDNport->l2establish.active) {
+ unsched_timer(&mISDNport->l2establish);
+ PDEBUG(DEBUG_ISDN, "the link became active before l2establish timer expiry.\n");
+ }
+ }
break;
- case DL_RELEASE | INDICATION:
- case DL_RELEASE | CONFIRM:
-// PDEBUG(DEBUG_ISDN, "addr 0x%x released data link (DL) TE portnum=%d (DL_RELEASE)\n", frm->addr, mISDNport->portnum);
- if (!mISDNport->ntmode) break; /* !!!!!!!!!!!!!!!! */
- ss_rel:
-// if (mISDNport->ntmode)
-// break;
- mISDNport->l2link = 0;
- if (mISDNport->ptp)
- {
- time(&mISDNport->l2establish);
- PDEBUG(DEBUG_ISDN, "because we are ptp, we set a l2establish timer.\n");
+ case MT_L2RELEASE:
+ if (l3m->pid < 128)
+ mISDNport->l2mask[l3m->pid >> 3] &= ~(1 << (l3m->pid & 7));
+ if (!mISDNport->l2establish.active) {
+ l1l2l3_trace_header(mISDNport, NULL, L2_RELEASE_IND, DIRECTION_IN);
+ add_trace("tei", NULL, "%d", l3m->pid);
+ end_trace();
+ /* down if not nt-ptmp */
+ if (!mISDNport->ntmode || mISDNport->ptp)
+ mISDNport->l2link = 0;
+ }
+ if ((!mISDNport->ntmode || mISDNport->ptp) && l3m->pid < 127) {
+ if (!mISDNport->l2establish.active && mISDNport->l2hold) {
+ PDEBUG(DEBUG_ISDN, "set timer and establish.\n");
+ schedule_timer(&mISDNport->l2establish, 5, 0);
+ mISDNport->ml3->to_layer3(mISDNport->ml3, MT_L2ESTABLISH, 0, NULL);
+ }
}
break;
default:
- l1_msg:
- PDEBUG(DEBUG_STACK, "GOT d-msg from %s port %d prim 0x%x dinfo 0x%x addr 0x%x\n", (mISDNport->ntmode)?"NT":"TE", mISDNport->portnum, frm->prim, frm->dinfo, frm->addr);
- if (frm->dinfo==(signed long)0xffffffff && frm->prim==(PH_DATA|CONFIRM))
- {
- PERROR("SERIOUS BUG, dinfo == 0xffffffff, prim == PH_DATA | CONFIRM !!!!\n");
- }
- /* d-message */
- if (mISDNport->ntmode)
- {
- /* l1-data enters the nt-mode library */
- nst = &mISDNport->nst;
- if (nst->l1_l2(nst, msg))
- free_msg(msg);
- return(1);
- } else
- {
- /* l3-data is sent to pbx */
- if (stack2manager_te(mISDNport, msg))
- free_msg(msg);
- return(1);
- }
+ /* l3-data is sent to LCR */
+ stack2manager(mISDNport, l3m->type, l3m->pid, l3m);
}
- break;
+ /* free message */
+ free_l3_msg(l3m);
}
-//PDEBUG(DEBUG_ISDN, "flg:%d upper_id=%x addr=%x\n", (frm->addr&FLG_CHILD_STACK), (mISDNport->b_addr[0])&(~IF_CHILDMASK), (frm->addr)&(~IF_CHILDMASK));
- /* check if child, and if parent stack match */
- if ((frm->addr&FLG_CHILD_STACK) && (((unsigned int)(mISDNport->b_addr[0])&(~CHILD_ID_MASK)&STACK_ID_MASK) == ((frm->addr)&(~CHILD_ID_MASK)&STACK_ID_MASK)))
- {
- /* b-message */
- switch(frm->prim)
- {
- /* we don't care about confirms, we use rx data to sync tx */
- case PH_DATA | CONFIRM:
- case DL_DATA | CONFIRM:
- break;
+ mISDNport = mISDNport->next;
+ }
+ return 0;
+}
- /* we receive audio data, we respond to it AND we send tones */
- case PH_DATA | INDICATION:
- case DL_DATA | INDICATION:
- case PH_CONTROL | INDICATION:
- i = 0;
- while(i < mISDNport->b_num)
- {
- if ((unsigned int)(mISDNport->b_addr[i]&STACK_ID_MASK) == (frm->addr&STACK_ID_MASK))
- break;
- i++;
- }
- if (i == mISDNport->b_num)
- {
- PERROR("unhandled b-message (address 0x%x).\n", frm->addr);
- break;
- }
- if (mISDNport->b_port[i])
- {
-//PERROR("port sech: %s data\n", mISDNport->b_port[i]->p_name);
- mISDNport->b_port[i]->bchannel_receive(frm);
- } else
- PDEBUG(DEBUG_BCHANNEL, "b-channel is not associated to an ISDNPort (address 0x%x), ignoring.\n", frm->addr);
- break;
+/* l2 establish timer fires */
+static int l2establish_timeout(struct lcr_timer *timer, void *instance, int i)
+{
+ struct mISDNport *mISDNport = (struct mISDNport *)instance;
- case PH_ACTIVATE | INDICATION:
- case DL_ESTABLISH | INDICATION:
- case PH_ACTIVATE | CONFIRM:
- case DL_ESTABLISH | CONFIRM:
- PDEBUG(DEBUG_BCHANNEL, "DL_ESTABLISH confirm: bchannel is now activated (address 0x%x).\n", frm->addr);
- i = 0;
- while(i < mISDNport->b_num)
- {
- if ((unsigned int)(mISDNport->b_addr[i]&STACK_ID_MASK) == (frm->addr&STACK_ID_MASK))
- break;
- i++;
- }
- if (i == mISDNport->b_num)
- {
- PERROR("unhandled b-establish (address 0x%x).\n", frm->addr);
- break;
- }
- mISDNport->b_state[i] = B_STATE_ACTIVE;
- if (!mISDNport->b_port[i])
- bchannel_deactivate(mISDNport, i);
- else
- bchannel_activate(mISDNport, i);
- break;
+ if (mISDNport->l2hold && (mISDNport->ptp || !mISDNport->ntmode)) {
+ PDEBUG(DEBUG_ISDN, "the L2 establish timer expired, we try to establish the link portnum=%d.\n", mISDNport->portnum);
+ mISDNport->ml3->to_layer3(mISDNport->ml3, MT_L2ESTABLISH, 0, NULL);
+ schedule_timer(&mISDNport->l2establish, 5, 0); /* 5 seconds */
+ }
- case PH_DEACTIVATE | INDICATION:
- case DL_RELEASE | INDICATION:
- case PH_DEACTIVATE | CONFIRM:
- case DL_RELEASE | CONFIRM:
- PDEBUG(DEBUG_BCHANNEL, "DL_RELEASE confirm: bchannel is now de-activated (address 0x%x).\n", frm->addr);
- i = 0;
- while(i < mISDNport->b_num)
- {
- if ((unsigned int)(mISDNport->b_addr[i]&STACK_ID_MASK) == (frm->addr&STACK_ID_MASK))
- break;
- i++;
- }
- if (i == mISDNport->b_num)
- {
- PERROR("unhandled b-release (address 0x%x).\n", frm->addr);
- break;
- }
- mISDNport->b_state[i] = B_STATE_IDLE;
- if (mISDNport->b_port[i])
- bchannel_activate(mISDNport, i);
- else
- bchannel_deactivate(mISDNport, i);
- break;
- }
- break;
- }
+ return 0;
+}
- mISDNport = mISDNport->next;
- }
- if (!mISDNport)
- {
- if (frm->prim == (MGR_TIMER | INDICATION))
- PERROR("unhandled timer indication message: prim(0x%x) addr(0x%x) msg->len(%d)\n", frm->prim, frm->addr, msg->len);
+/* handle frames from bchannel */
+static int b_sock_callback(struct lcr_fd *fd, unsigned int what, void *instance, int i)
+{
+ struct mISDNport *mISDNport = (struct mISDNport *)instance;
+ unsigned char buffer[2048+MISDN_HEADER_LEN];
+ struct mISDNhead *hh = (struct mISDNhead *)buffer;
+ int ret;
+
+ ret = recv(fd->fd, buffer, sizeof(buffer), 0);
+ if (ret < 0) {
+ PERROR("read error frame, errno %d\n", errno);
+ return 0;
+ }
+ if (ret < (int)MISDN_HEADER_LEN) {
+ PERROR("read short frame, got %d, expected %d\n", ret, (int)MISDN_HEADER_LEN);
+ return 0;
+ }
+ switch(hh->prim) {
+ /* we don't care about confirms, we use rx data to sync tx */
+ case PH_DATA_CNF:
+ break;
+
+ /* we receive audio data, we respond to it AND we send tones */
+ case PH_DATA_IND:
+ case DL_DATA_IND:
+ case PH_DATA_REQ:
+ case DL_DATA_REQ:
+ case PH_CONTROL_IND:
+ if (mISDNport->b_port[i])
+ mISDNport->b_port[i]->bchannel_receive(hh, buffer+MISDN_HEADER_LEN, ret-MISDN_HEADER_LEN);
else
- PERROR("unhandled message: prim(0x%x) addr(0x%x) msg->len(%d)\n", frm->prim, frm->addr, msg->len);
-// PERROR("test: is_child: %x of stack %x == %x (baddr %x frm %x)\n", (frm->addr&FLG_CHILD_STACK), ((unsigned int)(mISDNport_first->b_addr[0])&(~CHILD_ID_MASK)&STACK_ID_MASK), ((frm->addr)&(~CHILD_ID_MASK)&STACK_ID_MASK), mISDNport_first->b_addr[0], frm->addr);
+ PDEBUG(DEBUG_BCHANNEL, "b-channel is not associated to an ISDNPort (socket %d), ignoring.\n", fd->fd);
+ break;
+
+ case PH_ACTIVATE_IND:
+ case DL_ESTABLISH_IND:
+ case PH_ACTIVATE_CNF:
+ case DL_ESTABLISH_CNF:
+ PDEBUG(DEBUG_BCHANNEL, "DL_ESTABLISH confirm: bchannel is now activated (socket %d).\n", fd->fd);
+ bchannel_event(mISDNport, i, B_EVENT_ACTIVATED);
+ break;
+
+ case PH_DEACTIVATE_IND:
+ case DL_RELEASE_IND:
+ case PH_DEACTIVATE_CNF:
+ case DL_RELEASE_CNF:
+ PDEBUG(DEBUG_BCHANNEL, "DL_RELEASE confirm: bchannel is now de-activated (socket %d).\n", fd->fd);
+ bchannel_event(mISDNport, i, B_EVENT_DEACTIVATED);
+ break;
+
+ default:
+ PERROR("child message not handled: prim(0x%x) socket(%d) msg->len(%d)\n", hh->prim, fd->fd, ret-MISDN_HEADER_LEN);
}
- free_msg(msg);
- return(1);
+ return 0;
+}
+
+/* process timer events for bchannel handling */
+static int b_timer_timeout(struct lcr_timer *timer, void *instance, int i)
+{
+ struct mISDNport *mISDNport = (struct mISDNport *)instance;
+
+ bchannel_event(mISDNport, i, B_EVENT_TIMEOUT);
+
+ return 0;
+}
+
+
+int do_layer3(struct mlayer3 *ml3, unsigned int cmd, unsigned int pid, struct l3_msg *l3m)
+{
+ /* IMPORTAINT:
+ *
+ * l3m must be queued, except for MT_ASSIGN
+ *
+ */
+ struct mISDNport *mISDNport = (struct mISDNport *)ml3->priv;
+ struct mbuffer *mb;
+
+#ifdef OLD_MT_ASSIGN
+ /* special MT_ASSIGN handling:
+ *
+ * if we request a PID from mlayer, we always do it while lcr is locked.
+ * therefore we must check the MT_ASSIGN reply first before we lock.
+ * this is because the MT_ASSIGN reply is received with the requesting
+ * process, not by the mlayer thread!
+ * this means, that the reply is sent during call of the request.
+ * we must check if we get a reply and we know that we lcr is currently
+ * locked.
+ */
+ if (cmd==MT_ASSIGN && (pid&MISDN_PID_CR_FLAG) && (pid>>16)==MISDN_CES_MASTER) {
+ /* let's do some checking if someone changes stack behaviour */
+ if (mt_assign_pid != 0)
+ FATAL("someone played with the mISDNuser stack. MT_ASSIGN not currently expected.\n");
+ mt_assign_pid = pid;
+ return(0);
+ }
+#endif
+ /* queue message, create, if required */
+ if (!l3m) {
+ l3m = alloc_l3_msg();
+ if (!l3m)
+ FATAL("No memory for layer 3 message\n");
+ }
+ mb = container_of(l3m, struct mbuffer, l3);
+ l3m->type = cmd;
+ l3m->pid = pid;
+ mqueue_tail(&mISDNport->upqueue, mb);
+ if (!upqueue_avail) {
+ // multiple threads may cause multiple calls of this section, but this
+ // results only in multiple processing of the upqueue read.
+ // this is no problem.
+ upqueue_avail = 1;
+ char byte = 0;
+ int ret;
+ ret = write(upqueue_pipe[1], &byte, 1);
+ }
+ return 0;
}
+int mISDN_getportbyname(int sock, int cnt, char *portname)
+{
+ struct mISDN_devinfo devinfo;
+ int port = 0, ret;
+
+ /* resolve name */
+ while (port < cnt) {
+ devinfo.id = port;
+ ret = ioctl(sock, IMGETDEVINFO, &devinfo);
+ if (ret < 0)
+ return ret;
+ if (!strcasecmp(devinfo.name, portname))
+ break;
+ port++;
+ }
+ if (port == cnt)
+ return -EIO;
+
+ return (port);
+}
+
+/* handle frames from pots */
+static int pots_sock_callback(struct lcr_fd *fd, unsigned int what, void *instance, int i)
+{
+ struct mISDNport *mISDNport = (struct mISDNport *)instance;
+ unsigned char buffer[2048+MISDN_HEADER_LEN];
+ struct mISDNhead *hh = (struct mISDNhead *)buffer;
+ unsigned int cont;
+ int ret;
+
+ ret = recv(fd->fd, buffer, sizeof(buffer), 0);
+ if (ret < 0) {
+ PERROR("read error frame, errno %d\n", errno);
+ return 0;
+ }
+ if (ret < (int)MISDN_HEADER_LEN) {
+ PERROR("read short frame, got %d, expected %d\n", ret, (int)MISDN_HEADER_LEN);
+ return 0;
+ }
+ switch(hh->prim) {
+ case PH_CONTROL_IND:
+ cont = *((unsigned int *)(buffer + MISDN_HEADER_LEN));
+ /* l1-control is sent to LCR */
+ if (mISDNport->ntmode)
+ stack2manager_fxs(mISDNport, cont);
+ else
+ PERROR("FXO not supported!\n");
+ break;
+ case PH_ACTIVATE_REQ:
+ break;
+
+ default:
+ PERROR("child message not handled: prim(0x%x) socket(%d) msg->len(%d)\n", hh->prim, fd->fd, ret-MISDN_HEADER_LEN);
+ }
+
+ return 0;
+}
/*
* global function to add a new card (port)
*/
-struct mISDNport *mISDN_port_open(int port, int ptp, int ptmp)
+struct mISDNport *mISDNport_open(struct interface_port *ifport)
{
int ret;
- unsigned char buff[1025];
- iframe_t *frm = (iframe_t *)buff;
- stack_info_t *stinf;
struct mISDNport *mISDNport, **mISDNportp;
+ int port = ifport->portnum;
+ int ptp = ifport->ptp;
+ int force_nt = ifport->nt;
+ int l1hold = ifport->l1hold;
+ int l2hold = ifport->l2hold;
+ int ss5 = ifport->ss5;
int i, cnt;
- layer_info_t li;
-// interface_info_t ii;
- net_stack_t *nst;
- manager_t *mgr;
- mISDN_pid_t pid;
- int pri = 0;
- int nt = 0;
- iframe_t dact;
-
- /* open mISDNdevice if not already open */
- if (mISDNdevice < 0)
- {
- ret = mISDN_open();
- if (ret < 0)
- {
- PERROR("cannot open mISDN device ret=%d errno=%d (%s) Check for mISDN modules!\nAlso did you create \"/dev/mISDN\"? Do: \"mknod /dev/mISDN c 46 0\"\n", ret, errno, strerror(errno));
- return(NULL);
- }
- mISDNdevice = ret;
- PDEBUG(DEBUG_ISDN, "mISDN device opened.\n");
-
- /* create entity for layer 3 TE-mode */
- mISDN_write_frame(mISDNdevice, buff, 0, MGR_NEWENTITY | REQUEST, 0, 0, NULL, TIMEOUT_1SEC);
- ret = mISDN_read_frame(mISDNdevice, frm, sizeof(iframe_t), 0, MGR_NEWENTITY | CONFIRM, TIMEOUT_1SEC);
- if (ret < (int)mISDN_HEADER_LEN)
- {
- noentity:
- fprintf(stderr, "cannot request MGR_NEWENTITY from mISDN. Exitting due to software bug.");
- exit(-1);
- }
- entity = frm->dinfo & 0xffff;
- if (!entity)
- goto noentity;
- PDEBUG(DEBUG_ISDN, "our entity for l3-processes is %d.\n", entity);
+ int pri, bri, pots;
+ int nt, te;
+// struct mlayer3 *ml3;
+ struct mISDN_devinfo devinfo;
+ unsigned int protocol, prop;
+
+ /* check port counts */
+ ret = ioctl(mISDNsocket, IMGETCOUNT, &cnt);
+ if (ret < 0) {
+ fprintf(stderr, "Cannot get number of mISDN devices. (ioctl IMGETCOUNT failed ret=%d)\n", ret);
+ return(NULL);
}
- /* query port's requirements */
- cnt = mISDN_get_stack_count(mISDNdevice);
- if (cnt <= 0)
- {
- PERROR("Found no card. Please be sure to load card drivers.\n");
+ if (cnt <= 0) {
+ PERROR_RUNTIME("Found no card. Please be sure to load card drivers.\n");
return(NULL);
}
- if (port>cnt || port<1)
- {
- PERROR("Port (%d) given at 'ports' (options.conf) is out of existing port range (%d-%d)\n", port, 1, cnt);
+ if (port < 0) {
+ port = mISDN_getportbyname(mISDNsocket, cnt, ifport->portname);
+ if (port < 0) {
+ PERROR_RUNTIME("Port name '%s' not found, use 'misdn_info' tool to list all existing ports.\n", ifport->portname);
+ return(NULL);
+ }
+ // note: 'port' has still the port number
+ }
+ if (port>cnt || port<0) {
+ PERROR_RUNTIME("Port (%d) given at 'ports' (options.conf) is out of existing port range (%d-%d)\n", port, 0, cnt);
return(NULL);
}
- ret = mISDN_get_stack_info(mISDNdevice, port, buff, sizeof(buff));
- if (ret < 0)
- {
- PERROR("Cannot get stack info for port %d (ret=%d)\n", port, ret);
+
+ /* get port attributes */
+ pri = bri = pots = nt = te = 0;
+ devinfo.id = port;
+ ret = ioctl(mISDNsocket, IMGETDEVINFO, &devinfo);
+ if (ret < 0) {
+ PERROR_RUNTIME("Cannot get device information for port %d. (ioctl IMGETDEVINFO failed ret=%d)\n", port, ret);
return(NULL);
}
- stinf = (stack_info_t *)&frm->data.p;
- switch(stinf->pid.protocol[0] & ~ISDN_PID_FEATURE_MASK)
- {
- case ISDN_PID_L0_TE_S0:
- PDEBUG(DEBUG_ISDN, "TE-mode BRI S/T interface line\n");
- break;
- case ISDN_PID_L0_NT_S0:
- PDEBUG(DEBUG_ISDN, "NT-mode BRI S/T interface port\n");
- nt = 1;
- break;
- case ISDN_PID_L0_TE_U:
- PDEBUG(DEBUG_ISDN, "TE-mode BRI U interface line\n");
- break;
- case ISDN_PID_L0_NT_U:
- PDEBUG(DEBUG_ISDN, "NT-mode BRI U interface port\n");
- nt = 1;
- break;
- case ISDN_PID_L0_TE_UP2:
- PDEBUG(DEBUG_ISDN, "TE-mode BRI Up2 interface line\n");
- break;
- case ISDN_PID_L0_NT_UP2:
- PDEBUG(DEBUG_ISDN, "NT-mode BRI Up2 interface port\n");
+ if (devinfo.Dprotocols & (1 << ISDN_P_TE_S0)) {
+ bri = 1;
+ te = 1;
+ }
+ if (devinfo.Dprotocols & (1 << ISDN_P_NT_S0)) {
+ bri = 1;
nt = 1;
- break;
- case ISDN_PID_L0_TE_E1:
- PDEBUG(DEBUG_ISDN, "TE-mode PRI E1 interface line\n");
+ }
+ if (devinfo.Dprotocols & (1 << ISDN_P_TE_E1)) {
pri = 1;
- break;
- case ISDN_PID_L0_NT_E1:
- PDEBUG(DEBUG_ISDN, "LT-mode PRI E1 interface port\n");
+ te = 1;
+ }
+ if (devinfo.Dprotocols & (1 << ISDN_P_NT_E1)) {
pri = 1;
nt = 1;
- break;
- default:
- PERROR("unknown port(%d) type 0x%08x\n", port, stinf->pid.protocol[0]);
+ }
+#ifdef ISDN_P_FXS_POTS
+ if (devinfo.Dprotocols & (1 << ISDN_P_FXO_POTS)) {
+ pots = 1;
+ te = 1;
+ }
+ if (devinfo.Dprotocols & (1 << ISDN_P_FXS_POTS)) {
+ pots = 1;
+ nt = 1;
+ }
+#endif
+ if (force_nt && !nt) {
+ if (!pots)
+ PERROR_RUNTIME("Port %d does not support NT-mode\n", port);
+ else
+ PERROR_RUNTIME("Port %d does not support FXS-mode\n", port);
return(NULL);
}
- if (nt)
- {
- /* NT */
- if (stinf->pid.protocol[1] == 0)
- {
- PERROR("Given port %d: Missing layer 1 NT-mode protocol.\n", port);
- return(NULL);
- }
- if (stinf->pid.protocol[2])
- {
- PERROR("Given port %d: Layer 2 protocol 0x%08x is detected, but not allowed for NT lib.\n", port, stinf->pid.protocol[2]);
- return(NULL);
- }
- } else
- {
- /* TE */
- if (stinf->pid.protocol[1] == 0)
- {
- PERROR("Given port %d: Missing layer 1 protocol.\n", port);
- return(NULL);
+ if (bri && pri) {
+ PERROR_RUNTIME("Port %d supports BRI and PRI?? What kind of controller is that?. (Can't use this!)\n", port);
+ return(NULL);
+ }
+ if (!bri && !pri && !pots) {
+ PERROR_RUNTIME("Port %d does not support BRI nor PRI nor POTS!\n", port);
+ return(NULL);
+ }
+ if (!nt && !te) {
+ PERROR_RUNTIME("Port %d does not support NT-mode nor TE-mode!\n", port);
+ return(NULL);
+ }
+ /* set NT by turning off TE */
+ if (force_nt && nt)
+ te = 0;
+ /* if TE an NT is supported (and not forced to NT), turn off NT */
+ if (te && nt)
+ nt = 0;
+ if (pots && te) {
+ PERROR_RUNTIME("Port %d uses FXO-mode, but not supported by LCR!\n", port);
+ return(NULL);
+ }
+
+ /* check for double use of port */
+ if (nt) {
+ mISDNport = mISDNport_first;
+ while(mISDNport) {
+ if (mISDNport->portnum == port)
+ break;
+ mISDNport = mISDNport->next;
}
- if (stinf->pid.protocol[2] == 0)
- {
- PERROR("Given port %d: Missing layer 2 protocol.\n", port);
+ if (mISDNport) {
+ PERROR_RUNTIME("Port %d already in use by LCR. You can't use a NT port multiple times.\n", port);
return(NULL);
}
- if (stinf->pid.protocol[3] == 0)
- {
- PERROR("Given port %d: Missing layer 3 protocol.\n", port);
- return(NULL);
- } else
- {
- switch(stinf->pid.protocol[3] & ~ISDN_PID_FEATURE_MASK)
- {
- case ISDN_PID_L3_DSS1USER:
- break;
+ }
- default:
- PERROR("Given port %d: own protocol 0x%08x", port,stinf->pid.protocol[3]);
+ /* check for continous channelmap with no bchannel on slot 16 */
+ if (test_channelmap(0, devinfo.channelmap)) {
+ PERROR_RUNTIME("Port %d provides channel 0, but we cannot access it!\n", port);
+ return(NULL);
+ }
+ i = 1;
+ while(i < (int)devinfo.nrbchan + 1) {
+ if (i == 16) {
+ if (test_channelmap(i, devinfo.channelmap)) {
+ PERROR("Port %d provides bchannel 16. Pleas upgrade mISDN, if this port is mISDN loopback interface.\n", port);
+ return(NULL);
+ }
+ } else {
+ if (!test_channelmap(i, devinfo.channelmap)) {
+ PERROR_RUNTIME("Port %d has no channel on slot %d!\n", port, i);
return(NULL);
}
}
- if (stinf->pid.protocol[4])
- {
- PERROR("Given port %d: Layer 4 protocol not allowed.\n", port);
- return(NULL);
- }
+ i++;
}
/* add mISDNport structure */
mISDNportp = &mISDNport_first;
while(*mISDNportp)
- mISDNportp = &mISDNport->next;
- mISDNport = (struct mISDNport *)calloc(1, sizeof(struct mISDNport));
- if (!mISDNport)
- {
- PERROR("Cannot alloc mISDNport structure\n");
- return(NULL);
+ mISDNportp = &((*mISDNportp)->next);
+ mISDNport = (struct mISDNport *)MALLOC(sizeof(struct mISDNport));
+ add_timer(&mISDNport->l2establish, l2establish_timeout, mISDNport, 0);
+ if (ss5) {
+ /* ss5 link is always active */
+ mISDNport->l1link = 1;
+ mISDNport->l2link = 1;
+ } else {
+ mISDNport->l1link = -1;
+ mISDNport->l2link = -1;
}
pmemuse++;
- memset(mISDNport, 0, sizeof(mISDNport));
*mISDNportp = mISDNport;
+ /* if pri, must set PTP */
+ if (pri)
+ ptp = 1;
+
+ /* set ss5 params */
+ if (ss5) {
+ /* try to keep interface enabled */
+ l1hold = 1;
+ l2hold = 0;
+ }
+ /* set l2hold */
+ switch (l2hold) {
+ case -1: // off
+ l2hold = 0;
+ break;
+ case 1: // on
+ l2hold = 1;
+ break;
+ default:
+ if (ptp)
+ l2hold = 1;
+ else
+ l2hold = 0;
+ break;
+ }
+
/* allocate ressources of port */
- msg_queue_init(&mISDNport->downqueue);
-// SCPY(mISDNport->name, "noname");
+ if (!pots) {
+ /* ISDN */
+ protocol = (nt)?L3_PROTOCOL_DSS1_NET:L3_PROTOCOL_DSS1_USER;
+ prop = (1 << MISDN_FLG_L2_CLEAN);
+ if (ptp) // ptp forced
+ prop |= (1 << MISDN_FLG_PTP);
+ if (nt) // supports hold/retrieve on nt-mode
+ prop |= (1 << MISDN_FLG_NET_HOLD);
+ if (l1hold) // supports layer 1 hold
+ prop |= (1 << MISDN_FLG_L1_HOLD);
+ if (l2hold) // supports layer 2 hold
+ prop |= (1 << MISDN_FLG_L2_HOLD);
+ /* open layer 3 and init upqueue */
+ /* queue must be initializes, because l3-thread may send messages during open_layer3() */
+ mqueue_init(&mISDNport->upqueue);
+ mISDNport->ml3 = open_layer3(port, protocol, prop , do_layer3, mISDNport);
+ if (!mISDNport->ml3) {
+ mqueue_purge(&mISDNport->upqueue);
+ PERROR_RUNTIME("open_layer3() failed for port %d\n", port);
+ start_trace(port,
+ ifport->interface,
+ NULL,
+ NULL,
+ DIRECTION_NONE,
+ CATEGORY_CH,
+ 0,
+ "PORT (open failed)");
+ end_trace();
+ mISDNport_close(mISDNport);
+ return(NULL);
+ }
+ } else {
+#ifdef ISDN_P_FXS_POTS
+ /* POTS */
+ int sock, ret;
+ struct sockaddr_mISDN addr;
+ struct mISDNhead act;
+
+ /* open socket */
+ /* queue must be initializes, because even pots interfaces are checked at mISDN_upqueue loop */
+ mqueue_init(&mISDNport->upqueue);
+ sock = socket(PF_ISDN, SOCK_DGRAM, (nt) ? ISDN_P_FXS_POTS : ISDN_P_FXO_POTS);
+ if (sock < 0) {
+ PERROR_RUNTIME("Cannot open mISDN due to '%s'.\n", strerror(errno));
+ return NULL;
+ }
+ /* bind socket to dchannel */
+ addr.family = AF_ISDN;
+ addr.dev = port;
+ addr.channel = 0;
+ ret = bind(sock, (struct sockaddr *)&addr, sizeof(addr));
+ if (ret < 0) {
+ PERROR_RUNTIME("Error: Failed to bind pots control channel\n");
+ start_trace(port,
+ ifport->interface,
+ NULL,
+ NULL,
+ DIRECTION_NONE,
+ CATEGORY_CH,
+ 0,
+ "PORT (open failed)");
+ end_trace();
+ return(NULL);
+ }
+ act.prim = PH_ACTIVATE_REQ;
+ act.id = 0;
+ ret = sendto(sock, &act, MISDN_HEADER_LEN, 0, NULL, 0);
+ if (ret <= 0)
+ PERROR("Failed to send to socket %d\n", sock);
+ mISDNport->pots_sock.fd = sock;
+ register_fd(&mISDNport->pots_sock, LCR_FD_READ, pots_sock_callback, mISDNport, i);
+#endif
+ }
+
+ SCPY(mISDNport->name, devinfo.name);
+ mISDNport->b_num = devinfo.nrbchan;
mISDNport->portnum = port;
mISDNport->ntmode = nt;
+ mISDNport->pots = pots;
+ mISDNport->tespecial = ifport->tespecial;
mISDNport->pri = pri;
- mISDNport->d_stid = stinf->id;
- PDEBUG(DEBUG_ISDN, "d_stid = 0x%x.\n", mISDNport->d_stid);
- mISDNport->b_num = stinf->childcnt;
+ mISDNport->ptp = ptp;
+ mISDNport->l1hold = l1hold;
+ mISDNport->l2hold = l2hold;
+ mISDNport->ss5 = ss5;
PDEBUG(DEBUG_ISDN, "Port has %d b-channels.\n", mISDNport->b_num);
- if ((stinf->pid.protocol[2]&ISDN_PID_L2_DF_PTP) || (nt&&ptp) || pri)
- {
- PDEBUG(DEBUG_ISDN, "Port is point-to-point.\n");
- mISDNport->ptp = ptp = 1;
- if (ptmp && nt)
- {
- PDEBUG(DEBUG_ISDN, "Port is forced to point-to-multipoint.\n");
- mISDNport->ptp = ptp = 0;
- }
- }
i = 0;
- while(i < stinf->childcnt)
- {
- mISDNport->b_stid[i] = stinf->child[i];
- PDEBUG(DEBUG_ISDN, "b_stid[%d] = 0x%x.\n", i, mISDNport->b_stid[i]);
+ while(i < mISDNport->b_num) {
+ mISDNport->b_state[i] = B_STATE_IDLE;
+ add_timer(&mISDNport->b_timer[i], b_timer_timeout, mISDNport, i);
i++;
}
- memset(&li, 0, sizeof(li));
- UCPY(&li.name[0], (nt)?"net l2":"pbx l4");
- li.object_id = -1;
- li.extentions = 0;
- li.pid.protocol[nt?2:4] = (nt)?ISDN_PID_L2_LAPD_NET:ISDN_PID_L4_CAPI20;
- li.pid.layermask = ISDN_LAYER((nt?2:4));
- li.st = mISDNport->d_stid;
- ret = mISDN_new_layer(mISDNdevice, &li);
- if (ret)
- {
- PERROR("Cannot add layer %d of port %d (ret %d)\n", nt?2:4, port, ret);
- closeport:
- mISDNport_close(mISDNport);
- return(NULL);
+
+ /* if ptp, pull up the link */
+ if (!pots && mISDNport->l2hold && (mISDNport->ptp || !mISDNport->ntmode)) {
+ mISDNport->ml3->to_layer3(mISDNport->ml3, MT_L2ESTABLISH, 0, NULL);
+ l1l2l3_trace_header(mISDNport, NULL, L2_ESTABLISH_REQ, DIRECTION_OUT);
+ add_trace("tei", NULL, "%d", 0);
+ end_trace();
+ schedule_timer(&mISDNport->l2establish, 5, 0); /* 5 seconds */
}
- mISDNport->upper_id = li.id;
- ret = mISDN_register_layer(mISDNdevice, mISDNport->d_stid, mISDNport->upper_id);
- if (ret)
- {
- PERROR("Cannot register layer %d of port %d\n", nt?2:4, port);
- goto closeport;
- }
- mISDNport->lower_id = mISDN_get_layerid(mISDNdevice, mISDNport->d_stid, nt?1:3); // id of lower layer (nt=1, te=3)
- if (mISDNport->lower_id < 0)
- {
- PERROR("Cannot get layer(%d) id of port %d\n", nt?1:3, port);
- goto closeport;
- }
- mISDNport->upper_id = mISDN_get_layerid(mISDNdevice, mISDNport->d_stid, nt?2:4); // id of uppermost layer (nt=2, te=4)
- if (mISDNport->upper_id < 0)
- {
- PERROR("Cannot get layer(%d) id of port %d\n", nt?2:4, port);
- goto closeport;
- }
- PDEBUG(DEBUG_ISDN, "Layer %d of port %d added.\n", nt?2:4, port);
-
- /* if ntmode, establish L1 to send the tei removal during start */
- if (mISDNport->ntmode)
- {
- iframe_t act;
- /* L1 */
- act.prim = PH_ACTIVATE | REQUEST;
- act.addr = mISDNport->upper_id | FLG_MSG_DOWN;
- printf("UPPER ID 0x%x, addr 0x%x\n",mISDNport->upper_id, act.addr);
- act.dinfo = 0;
- act.len = 0;
- mISDN_write(mISDNdevice, &act, mISDN_HEADER_LEN+act.len, TIMEOUT_1SEC);
- usleep(10000); /* to be sure, that l1 is up */
- }
-
- /* create nst (nt-mode only) */
- if (nt)
- {
- mgr = &mISDNport->mgr;
- nst = &mISDNport->nst;
-
- mgr->nst = nst;
- nst->manager = mgr;
-
- nst->l3_manager = stack2manager_nt; /* messages from nt-mode */
- nst->device = mISDNdevice;
- nst->cardnr = port;
- nst->d_stid = mISDNport->d_stid;
-
- nst->feature = FEATURE_NET_HOLD;
- if (ptp)
- nst->feature |= FEATURE_NET_PTP;
- if (pri)
- nst->feature |= FEATURE_NET_CRLEN2 | FEATURE_NET_EXTCID;
-#if 0
- i = 0;
- while(i < mISDNport->b_num)
- {
- nst->b_stid[i] = mISDNport->b_stid[i];
- i++;
- }
-#endif
- nst->l1_id = mISDNport->lower_id;
- nst->l2_id = mISDNport->upper_id;
-
- /* phd */
- msg_queue_init(&nst->down_queue);
-
- Isdnl2Init(nst);
- Isdnl3Init(nst);
- }
-
- /* if te-mode, query state link */
- if (!mISDNport->ntmode)
- {
- iframe_t act;
- /* L2 */
- PDEBUG(DEBUG_ISDN, "sending short status request for port %d.\n", port);
- act.prim = MGR_SHORTSTATUS | REQUEST;
- act.addr = mISDNport->upper_id | MSG_BROADCAST;
- act.dinfo = SSTATUS_BROADCAST_BIT | SSTATUS_ALL;
- act.len = 0;
- mISDN_write(mISDNdevice, &act, mISDN_HEADER_LEN+act.len, TIMEOUT_1SEC);
- }
- /* if ptp AND te-mode, pull up the link */
- if (mISDNport->ptp && !mISDNport->ntmode)
- {
- iframe_t act;
- /* L2 */
- act.prim = DL_ESTABLISH | REQUEST;
- act.addr = (mISDNport->upper_id & ~LAYER_ID_MASK) | 4 | FLG_MSG_DOWN;
- act.dinfo = 0;
- act.len = 0;
- mISDN_write(mISDNdevice, &act, mISDN_HEADER_LEN+act.len, TIMEOUT_1SEC);
- }
- /* if ptp AND nt-mode, pull up the link */
- if (mISDNport->ptp && mISDNport->ntmode)
- {
- msg_t *dmsg;
- /* L2 */
- dmsg = create_l2msg(DL_ESTABLISH | REQUEST, 0, 0);
- if (mISDNport->nst.manager_l3(&mISDNport->nst, dmsg))
- free_msg(dmsg);
- }
- /* initially, we assume that the link is down, exept for nt-ptmp */
- mISDNport->l2link = (mISDNport->ntmode && !mISDNport->ptp)?1:0;
+
+ /* for POTS or nt-mode ptmp the link is always up */
+ if (pots || (mISDNport->ntmode && !mISDNport->ptp))
+ mISDNport->l2link = 1;
PDEBUG(DEBUG_BCHANNEL, "using 'mISDN_dsp.o' module\n");
- /* add all bchannel layers */
- i = 0;
- while(i < mISDNport->b_num)
- {
- /* create new layer */
- PDEBUG(DEBUG_BCHANNEL, "creating bchannel %d (index %d).\n" , i+1+(i>=15), i);
- memset(&li, 0, sizeof(li));
- memset(&pid, 0, sizeof(pid));
- li.object_id = -1;
- li.extentions = 0;
- li.st = mISDNport->b_stid[i];
- UCPY(li.name, "B L4");
- li.pid.layermask = ISDN_LAYER((4));
- li.pid.protocol[4] = ISDN_PID_L4_B_USER;
- ret = mISDN_new_layer(mISDNdevice, &li);
- if (ret)
- {
- failed_new_layer:
- PERROR("mISDN_new_layer() failed to add bchannel %d (index %d)\n", i+1+(i>=15), i);
- goto closeport;
- }
- mISDNport->b_addr[i] = li.id;
- if (!li.id)
- {
- goto failed_new_layer;
- }
- PDEBUG(DEBUG_BCHANNEL, "new layer (b_addr=0x%x)\n", mISDNport->b_addr[i]);
-
- /* create new stack */
- pid.protocol[1] = ISDN_PID_L1_B_64TRANS;
- pid.protocol[2] = ISDN_PID_L2_B_TRANS;
- pid.protocol[3] = ISDN_PID_L3_B_DSP;
- pid.protocol[4] = ISDN_PID_L4_B_USER;
- pid.layermask = ISDN_LAYER((1)) | ISDN_LAYER((2)) | ISDN_LAYER((3)) | ISDN_LAYER((4));
- ret = mISDN_set_stack(mISDNdevice, mISDNport->b_stid[i], &pid);
- if (ret)
- {
- stack_error:
- PERROR("mISDN_set_stack() failed (ret=%d) to add bchannel (index %d) stid=0x%x\n", ret, i, mISDNport->b_stid[i]);
- mISDN_write_frame(mISDNdevice, buff, mISDNport->b_addr[i], MGR_DELLAYER | REQUEST, 0, 0, NULL, TIMEOUT_1SEC);
- mISDNport->b_addr[i] = 0;
-// mISDNport->b_addr_low[i] = 0;
- goto closeport;
- }
- ret = mISDN_get_setstack_ind(mISDNdevice, mISDNport->b_addr[i]);
- if (ret)
- goto stack_error;
-
- /* get layer id */
- mISDNport->b_addr[i] = mISDN_get_layerid(mISDNdevice, mISDNport->b_stid[i], 4);
- if (!mISDNport->b_addr[i])
- goto stack_error;
- /* deactivate bchannel if already enabled due to crash */
- PDEBUG(DEBUG_BCHANNEL, "deactivating bchannel (index %d) as a precaution.\n", i);
- dact.prim = DL_RELEASE | REQUEST;
- dact.addr = mISDNport->b_addr[i] | FLG_MSG_DOWN;
- dact.dinfo = 0;
- dact.len = 0;
- mISDN_write(mISDNdevice, &dact, mISDN_HEADER_LEN+dact.len, TIMEOUT_1SEC);
+ start_trace(mISDNport->portnum,
+ ifport->interface,
+ NULL,
+ NULL,
+ DIRECTION_NONE,
+ CATEGORY_CH,
+ 0,
+ "PORT (open)");
+ if (!pots)
+ add_trace("mode", NULL, (mISDNport->ntmode)?"network":"terminal");
+ else
+ add_trace("mode", NULL, (mISDNport->ntmode)?"FXS":"FXO");
+ add_trace("channels", NULL, "%d", mISDNport->b_num);
+ if (mISDNport->ss5)
+ add_trace("ccitt#5", NULL, "enabled");
+ end_trace();
+
+ return(mISDNport);
+}
+
+/*
+ * load static port instances, if required by mISDNport
+ */
+void mISDNport_static(struct mISDNport *mISDNport)
+{
+ int i;
+
+ i = 0;
+ while(i < mISDNport->b_num) {
+#ifdef WITH_SS5
+ if (mISDNport->ss5)
+ ss5_create_channel(mISDNport, i);
+#endif
i++;
}
- PDEBUG(DEBUG_ISDN, "- port %d %s (%s) %d b-channels\n", mISDNport->portnum, (mISDNport->ntmode)?"NT-mode":"TE-mode", (mISDNport->ptp)?"Point-To-Point":"Multipoint", mISDNport->b_num);
- printlog("opening port %d %s (%s) %d b-channels\n", mISDNport->portnum, (mISDNport->ntmode)?"NT-mode":"TE-mode", (mISDNport->ptp)?"Point-To-Point":"Multipoint", mISDNport->b_num);
- return(mISDNport);
}
{
struct mISDNport **mISDNportp;
class Port *port;
- classs PmISDN *pmISDN;
- net_stack_t *nst;
- unsigned char buf[32];
+ class PmISDN *isdnport;
int i;
/* remove all port instance that are linked to this mISDNport */
+ again:
port = port_first;
- while(port)
- {
- if ((port->p_type&PORT_CLASS_MASK) == PORT_CLASS_mISDN)
- {
- pmISDN = (class PmISDN)*port;
- if (pmISDN->p_m_mISDNport)
- {
- PDEBUG(DEBUG_ISDN, "port %s uses mISDNport %d, destroying it.\n", pnISDN->p_name, mISDNport->portnum);
- delete pmISDN;
+ while(port) {
+ if ((port->p_type&PORT_CLASS_MASK) == PORT_CLASS_mISDN) {
+ isdnport = (class PmISDN *)port;
+ if (isdnport->p_m_mISDNport && isdnport->p_m_mISDNport == mISDNport) {
+ PDEBUG(DEBUG_ISDN, "port %s uses mISDNport %d, destroying it.\n", isdnport->p_name, mISDNport->portnum);
+ delete isdnport;
+ goto again;
}
}
port = port->next;
}
- printlog("closing port %d\n", mISDNport->portnum);
+ /* only if we are already part of interface */
+ if (mISDNport->ifport) {
+ start_trace(mISDNport->portnum,
+ mISDNport->ifport->interface,
+ NULL,
+ NULL,
+ DIRECTION_NONE,
+ CATEGORY_CH,
+ 0,
+ "PORT (close)");
+ end_trace();
+ }
/* free bchannels */
i = 0;
- while(i < mISDNport->b_num)
- {
- bchannel_deactivate(mISDNport, i);
- PDEBUG(DEBUG_BCHANNEL, "freeing %s port %d bchannel (index %d).\n", (mISDNport->ntmode)?"NT":"TE", mISDNport->portnum, i);
- if (mISDNport->b_stid[i])
- {
- mISDN_clear_stack(mISDNdevice, mISDNport->b_stid[i]);
- if (mISDNport->b_addr[i])
- mISDN_write_frame(mISDNdevice, buf, mISDNport->b_addr[i] | FLG_MSG_DOWN, MGR_DELLAYER | REQUEST, 0, 0, NULL, TIMEOUT_1SEC);
+ while(i < mISDNport->b_num) {
+ if (mISDNport->b_sock[i].inuse) {
+ _bchannel_destroy(mISDNport, i);
+ PDEBUG(DEBUG_BCHANNEL, "freeing %s port %d bchannel (index %d).\n", (mISDNport->ntmode)?"NT":"TE", mISDNport->portnum, i);
+ }
+ if (mISDNport->b_timer[i].inuse) {
+ del_timer(&mISDNport->b_timer[i]);
}
i++;
}
+ del_timer(&mISDNport->l2establish);
- /* free ressources of port */
- msg_queue_purge(&mISDNport->downqueue);
-
- /* free stacks */
- if (mISDNport->ntmode)
- {
- nst = &mISDNport->nst;
- if (nst->manager) /* to see if initialized */
- {
- PDEBUG(DEBUG_STACK, "the following messages are ok: one L3 process always exists (broadcast process) and some L2 instances (broadcast + current telephone's instances)\n");
- cleanup_Isdnl3(nst);
- cleanup_Isdnl2(nst);
-
- /* phd */
- msg_queue_purge(&nst->down_queue);
- if (nst->phd_down_msg)
- free(nst->phd_down_msg);
- }
+ /* close layer 3, if open */
+ if (mISDNport->ml3) {
+ close_layer3(mISDNport->ml3);
}
- PDEBUG(DEBUG_BCHANNEL, "freeing d-stack.\n");
- if (mISDNport->d_stid)
- {
-// mISDN_clear_stack(mISDNdevice, mISDNport->d_stid);
- if (mISDNport->lower_id)
- mISDN_write_frame(mISDNdevice, buf, mISDNport->lower_id, MGR_DELLAYER | REQUEST, 0, 0, NULL, TIMEOUT_1SEC);
+ /* close layer 1, if open */
+ if (mISDNport->pots_sock.fd) {
+ unregister_fd(&mISDNport->pots_sock);
+ close(mISDNport->pots_sock.fd);
}
+ /* purge upqueue */
+ mqueue_purge(&mISDNport->upqueue);
+
/* remove from list */
mISDNportp = &mISDNport_first;
- while(*mISDNportp)
- {
- if (*mISDNportp == mISDNport)
- {
+ while(*mISDNportp) {
+ if (*mISDNportp == mISDNport) {
*mISDNportp = (*mISDNportp)->next;
+ mISDNportp = NULL;
break;
}
mISDNportp = &((*mISDNportp)->next);
}
- if (!(*mISDNportp))
- {
- PERROR("software error, mISDNport not in list\n");
- exit(-1);
- }
+ if (mISDNportp)
+ FATAL("mISDNport not in list\n");
- memset(mISDNport, 0, sizeof(struct mISDNport));
- free(mISDNport);
+ FREE(mISDNport, sizeof(struct mISDNport));
pmemuse--;
- /* close mISDNdevice, if no port */
- if (mISDNdevice>=0 && mISDNport_first==NULL)
- {
- /* free entity */
- mISDN_write_frame(mISDNdevice, buf, 0, MGR_DELENTITY | REQUEST, entity, 0, NULL, TIMEOUT_1SEC);
- /* close device */
- mISDN_close(mISDNdevice);
- mISDNdevice = -1;
- PDEBUG(DEBUG_ISDN, "mISDN device closed.\n");
- }
}
/*
- * global function to show all available isdn ports
+ * enque data from remote port
*/
-void mISDN_port_info(void)
+int PmISDN::bridge_rx(unsigned char *data, int length)
{
- int err;
- int i, ii, p;
- int useable, nt, pri;
- unsigned char buff[1025];
- iframe_t *frm = (iframe_t *)buff;
- stack_info_t *stinf;
- int device;
-
- /* open mISDN */
- if ((device = mISDN_open()) < 0)
- {
- fprintf(stderr, "cannot open mISDN device ret=%d errno=%d (%s) Check for mISDN modules!\nAlso did you create \"/dev/mISDN\"? Do: \"mknod /dev/mISDN c 46 0\"\n", device, errno, strerror(errno));
- exit(-1);
- }
-
- /* get number of stacks */
- i = 1;
- ii = mISDN_get_stack_count(device);
- printf("\n");
- if (ii <= 0)
- {
- printf("Found no card. Please be sure to load card drivers.\n");
- }
-
- /* loop the number of cards and get their info */
- while(i <= ii)
- {
- err = mISDN_get_stack_info(device, i, buff, sizeof(buff));
- if (err <= 0)
- {
- fprintf(stderr, "mISDN_get_stack_info() failed: port=%d err=%d\n", i, err);
- break;
- }
- stinf = (stack_info_t *)&frm->data.p;
+ unsigned char buf[MISDN_HEADER_LEN+((length>p_m_preload)?length:p_m_preload)];
+ struct mISDNhead *hh = (struct mISDNhead *)buf;
+ int ret;
- nt = pri = 0;
- useable = 1;
+ if (p_m_b_index < 0)
+ return -EIO;
+ if (p_m_mISDNport->b_state[p_m_b_index] != B_STATE_ACTIVE)
+ return -EINVAL;
- /* output the port info */
- printf("Port %2d: ", i);
- switch(stinf->pid.protocol[0] & ~ISDN_PID_FEATURE_MASK)
- {
- case ISDN_PID_L0_TE_S0:
- printf("TE-mode BRI S/T interface line (for phone lines)");
-#if 0
- if (stinf->pid.protocol[0] & ISDN_PID_L0_TE_S0_HFC & ISDN_PID_FEATURE_MASK)
- printf(" HFC multiport card");
-#endif
- break;
- case ISDN_PID_L0_NT_S0:
- nt = 1;
- printf("NT-mode BRI S/T interface port (for phones)");
-#if 0
- if (stinf->pid.protocol[0] & ISDN_PID_L0_NT_S0_HFC & ISDN_PID_FEATURE_MASK)
- printf(" HFC multiport card");
-#endif
- break;
- case ISDN_PID_L0_TE_U:
- printf("TE-mode BRI U interface line");
- break;
- case ISDN_PID_L0_NT_U:
- nt = 1;
- printf("NT-mode BRI U interface port");
- break;
- case ISDN_PID_L0_TE_UP2:
- printf("TE-mode BRI Up2 interface line");
- break;
- case ISDN_PID_L0_NT_UP2:
- nt = 1;
- printf("NT-mode BRI Up2 interface port");
- break;
- case ISDN_PID_L0_TE_E1:
- pri = 1;
- printf("TE-mode PRI E1 interface line (for phone lines)");
-#if 0
- if (stinf->pid.protocol[0] & ISDN_PID_L0_TE_E1_HFC & ISDN_PID_FEATURE_MASK)
- printf(" HFC-E1 card");
-#endif
- break;
- case ISDN_PID_L0_NT_E1:
- nt = 1;
- pri = 1;
- printf("NT-mode PRI E1 interface port (for phones)");
-#if 0
- if (stinf->pid.protocol[0] & ISDN_PID_L0_NT_E1_HFC & ISDN_PID_FEATURE_MASK)
- printf(" HFC-E1 card");
-#endif
- break;
- default:
- useable = 0;
- printf("unknown type 0x%08x",stinf->pid.protocol[0]);
- }
- printf("\n");
-
- if (nt)
- {
- if (stinf->pid.protocol[1] == 0)
- {
- useable = 0;
- printf(" -> Missing layer 1 NT-mode protocol.\n");
- }
- p = 2;
- while(p <= MAX_LAYER_NR) {
- if (stinf->pid.protocol[p])
- {
- useable = 0;
- printf(" -> Layer %d protocol 0x%08x is detected, but not allowed for NT lib.\n", p, stinf->pid.protocol[p]);
- }
- p++;
- }
- if (useable)
- {
- if (pri)
- printf(" -> Interface is Point-To-Point (PRI).\n");
- else
- printf(" -> Interface can be Poin-To-Point/Multipoint.\n");
- }
- } else
- {
- if (stinf->pid.protocol[1] == 0)
- {
- useable = 0;
- printf(" -> Missing layer 1 protocol.\n");
- }
- if (stinf->pid.protocol[2] == 0)
- {
- useable = 0;
- printf(" -> Missing layer 2 protocol.\n");
- }
- if (stinf->pid.protocol[2] & ISDN_PID_L2_DF_PTP)
- {
- printf(" -> Interface is Poin-To-Point.\n");
- }
- if (stinf->pid.protocol[3] == 0)
- {
- useable = 0;
- printf(" -> Missing layer 3 protocol.\n");
- } else
- {
- printf(" -> Protocol: ");
- switch(stinf->pid.protocol[3] & ~ISDN_PID_FEATURE_MASK)
- {
- case ISDN_PID_L3_DSS1USER:
- printf("DSS1 (Euro ISDN)");
- break;
+ /* check if high priority tones exist
+ * ignore data in this case
+ */
+ if (p_tone_name[0] || p_m_crypt_msg_loops || p_m_inband_send_on)
+ return -EBUSY;
+
+ /* preload procedure
+ * if transmit buffer in DSP module is empty,
+ * preload it to DSP_LOAD to prevent jitter gaps.
+ *
+ * if load runs empty, preload again.
+ */
+ if (p_m_disable_dejitter && p_m_load == 0 && p_m_preload > 0) {
+//printf("preload=%d\n", p_m_preload);
+ hh->prim = PH_DATA_REQ;
+ hh->id = 0;
+ memset(buf+MISDN_HEADER_LEN, silence, p_m_preload);
+ ret = sendto(p_m_mISDNport->b_sock[p_m_b_index].fd, buf, MISDN_HEADER_LEN+p_m_preload, 0, NULL, 0);
+ if (ret <= 0)
+ PERROR("Failed to send to socket %d\n", p_m_mISDNport->b_sock[p_m_b_index].fd);
+ p_m_load += p_m_preload;
+ schedule_timer(&p_m_loadtimer, 0, PORT_TRANSMIT * 125);
+ }
- default:
- useable = 0;
- printf("unknown protocol 0x%08x",stinf->pid.protocol[3]);
- }
- printf("\n");
- }
- p = 4;
- while(p <= MAX_LAYER_NR) {
- if (stinf->pid.protocol[p])
- {
- useable = 0;
- printf(" -> Layer %d protocol 0x%08x is detected, but not allowed for TE lib.\n", p, stinf->pid.protocol[p]);
- }
- p++;
- }
- }
- printf(" - %d B-channels\n", stinf->childcnt);
+ /* drop if load would exceed ISDN_MAXLOAD
+ * this keeps the delay not too high
+ */
+//printf("load=%d len=%d 2*preload=%d\n", p_m_load, length, p_m_preload << 1);
+ if (p_m_disable_dejitter && p_m_preload > 0 && p_m_load+length > (p_m_preload << 1))
+ return -EINVAL;
+
+ /* make and send frame */
+ hh->prim = PH_DATA_REQ;
+ hh->id = 0;
+ memcpy(buf+MISDN_HEADER_LEN, data, length);
+ ret = sendto(p_m_mISDNport->b_sock[p_m_b_index].fd, buf, MISDN_HEADER_LEN+length, 0, NULL, 0);
+ if (ret <= 0)
+ PERROR("Failed to send to socket %d\n", p_m_mISDNport->b_sock[p_m_b_index].fd);
+ p_m_load += length;
+
+ return 0;
+}
- if (!useable)
- printf(" * Port NOT useable for PBX\n");
+int PmISDN::inband_send(unsigned char *buffer, int len)
+{
+ PERROR("this function must be derived to function!\n");
+ return 0;
+}
- printf("--------\n");
+void PmISDN::inband_send_on(void)
+{
+ PDEBUG(DEBUG_PORT, "turning inband signalling send on.\n");
+ p_m_inband_send_on = 1;
+}
- i++;
- }
- printf("\n");
+void PmISDN::inband_send_off(void)
+{
+ PDEBUG(DEBUG_PORT, "turning inband signalling send off.\n");
+ p_m_inband_send_on = 0;
+}
- /* close mISDN */
- if ((err = mISDN_close(device)))
- {
- fprintf(stderr, "mISDN_close() failed: err=%d '%s'\n", err, strerror(err));
- exit(-1);
- }
+void PmISDN::inband_receive(unsigned char *buffer, int len)
+{
+//
+// if (len >= SS5_DECODER_NPOINTS)
+// ss5_decode(buffer, SS5_DECODER_NPOINTS);
+ PERROR("this function must be derived to function!\n");
+}
+
+void PmISDN::inband_receive_on(void)
+{
+ /* this must work during constructor, see ss5.cpp */
+ PDEBUG(DEBUG_PORT, "turning inband signalling receive on.\n");
+ p_m_inband_receive_on = 1;
+ update_rxoff();
+}
+
+void PmISDN::inband_receive_off(void)
+{
+ PDEBUG(DEBUG_PORT, "turning inband signalling receive off.\n");
+ p_m_inband_receive_on = 0;
+ update_rxoff();
+}
+
+void PmISDN::mute_on(void)
+{
+ if (p_m_mute)
+ return;
+ PDEBUG(DEBUG_PORT, "turning mute on.\n");
+ p_m_mute = 1;
+ set_conf(p_m_conf, 0);
+}
+
+void PmISDN::mute_off(void)
+{
+ if (!p_m_mute)
+ return;
+ PDEBUG(DEBUG_PORT, "turning mute off.\n");
+ p_m_mute = 0;
+ set_conf(0, p_m_conf);
}