X-Git-Url: http://git.eversberg.eu/gitweb.cgi?p=lcr.git;a=blobdiff_plain;f=mISDN.cpp;h=546b39f3c933b984da298c46dcc4e79fbaee890c;hp=02269476dc11cf30e4a976f06dc91e9524f473da;hb=3f7ef909c907a374a1760ffae0c01b49487f18d7;hpb=fd2045584f7084d209607f4d717a66bea9afe88e diff --git a/mISDN.cpp b/mISDN.cpp index 0226947..546b39f 100644 --- a/mISDN.cpp +++ b/mISDN.cpp @@ -1,51 +1,128 @@ /*****************************************************************************\ ** ** -** PBX4Linux ** +** Linux Call Router ** ** ** **---------------------------------------------------------------------------** ** Copyright: Andreas Eversberg ** ** ** -** mISDN port abstraction for dss1 and sip ** +** mISDN port abstraction for dss1 ** ** ** \*****************************************************************************/ - -#include -#include -#include #include "main.h" -#include -#include -#include -#include -#include -#include -#include -extern "C" { -#include -} +#include "myisdn.h" +#include + +#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; +} + +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, int channel, int exclusive, int mode) : Port(type, portname, settings) { p_m_mISDNport = mISDNport; p_m_portnum = mISDNport->portnum; @@ -53,26 +130,34 @@ PmISDN::PmISDN(int type, mISDNport *mISDNport, char *portname, struct port_setti 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_nodata = 1; /* may be 1, because call always notifies us */ - 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; + 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; @@ -80,30 +165,33 @@ PmISDN::PmISDN(int type, mISDNport *mISDNport, char *portname, struct port_setti 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(); } @@ -112,14 +200,16 @@ PmISDN::PmISDN(int type, mISDNport *mISDNport, char *portname, struct port_setti */ 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; @@ -136,240 +226,540 @@ PmISDN::~PmISDN() /* + * 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, "<>"); + /* 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(unsigned long)*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; + + if (sock < 0) + return; + + 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+sizeof(int)*2, 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(unsigned long)*2; + 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); - } + 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(); - /* preload tx-buffer */ - pre->len = mISDNport->b_port[i]->read_audio(p, ISDN_PRELOAD, 1); - if (pre->len > 0) - { - PDEBUG(DEBUG_BCHANNEL, "port is activated, we fill our buffer (ISDN_PRELOAD = %d).\n", pre->len); - /* flip bits */ -#if 0 - q = p + pre->len; - while(p != q) - *p++ = flip[*p]; -#endif - pre->prim = DL_DATA | REQUEST; - pre->addr = mISDNport->b_addr[i] | FLG_MSG_DOWN; - pre->dinfo = 0; - mISDN_write(mISDNdevice, pre, mISDN_HEADER_LEN+pre->len, TIMEOUT_1SEC); - } + 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, 0, "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; + } 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; @@ -393,8 +783,7 @@ int PmISDN::seize_bchannel(int channel, int exclusive) 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 */ @@ -402,8 +791,7 @@ int PmISDN::seize_bchannel(int channel, int exclusive) } /* ask for channel */ - if (channel>0) - { + if (channel>0) { i = channel-1-(channel>16); if (p_m_mISDNport->b_port[i] == NULL) goto seize; @@ -411,10 +799,8 @@ int PmISDN::seize_bchannel(int channel, int exclusive) /* 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; } @@ -423,29 +809,27 @@ int PmISDN::seize_bchannel(int channel, int exclusive) 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) { @@ -455,121 +839,304 @@ 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; } + /* * handler - */ -int PmISDN::handler(void) -{ - struct message *message; - - // 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 */ -} +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 | ++--------------------+----------------------+ -/* - * whenever we get audio data from bchannel, we process it here */ -void PmISDN::bchannel_receive(iframe_t *frm) -{ - unsigned char *data_temp; - unsigned long length_temp; - struct message *message; - struct timeval tv; - struct timezone tz; - long long jitter_now; - int newlen; - unsigned char *p; - int l; - unsigned long cont; -// iframe_t rsp; /* response to possible indication */ -#if 0 -#warning BCHANNEL-DEBUG +void PmISDN::update_load(void) { - // 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"); + /* don't trigger load event if: */ + if (!p_tone_name[0] && !p_m_crypt_msg_loops && !p_m_inband_send_on) return; - } + + /* 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 */ } -#endif +int load_timer(struct lcr_timer *timer, void *instance, int index) +{ + class PmISDN *isdnport = (class PmISDN *)instance; - 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); - } - switch(cont) - { - case BF_REJECT: - 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); - message_put(message); - break; + isdnport->load_tx(); - case BF_ACCEPT: - 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); - message_put(message); - break; - } + return 0; +} + +void PmISDN::load_tx(void) +{ + 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 (elapsed && p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE) { + /* 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); + } + + /* 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; + } + } + } + + if (p_tone_name[0] || p_m_crypt_msg_loops || p_m_inband_send_on || p_m_load) { + 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(struct mISDNhead *hh, unsigned char *data, int len) +{ + unsigned int cont = *((unsigned int *)data); + struct lcr_msg *message; + unsigned char *p; + int l; + + 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; + 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 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 INDICATION reject of blowfish.\n", p_name); + message_put(message); + break; + + 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 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 + 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 @@ -580,145 +1147,25 @@ void PmISDN::bchannel_receive(iframe_t *frm) #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 + /* 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); - } - - /* prevent jitter */ - gettimeofday(&tv, &tz); - jitter_now = tv.tv_sec; - jitter_now = jitter_now*8000 + tv.tv_usec/125; - if (p_m_jittercheck == 0) - { - p_m_jittercheck = jitter_now; - p_m_jitterdropped = 0; - } else - p_m_jittercheck += frm->len; - if (p_m_jittercheck < jitter_now) - { -// PERROR("jitter: ignoring slow data\n"); - p_m_jittercheck = jitter_now; - } else - if (p_m_jittercheck-ISDN_JITTERLIMIT > jitter_now) - { - p_m_jitterdropped += frm->len; - p_m_jittercheck -= frm->len; - /* must exit here */ - return; - } else - if (p_m_jitterdropped) - { - PERROR("jitter: dropping, caused by fast data: %lld\n", p_m_jitterdropped); - p_m_jitterdropped = 0; - } - - p = (unsigned char *)&frm->data.p; - - /* send data to epoint */ - if (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); } - /* return the same number of tone data, as we recieved */ - newlen = read_audio(p, frm->len, 1); - /* send tone data to isdn device only if we have data, otherwhise we send nothing */ - if (newlen>0 && (p_tone_fh>=0 || p_tone_fetched || !p_m_nodata || p_m_crypt_msg_loops)) - { -//printf("jolly: sending.... %d %d %d %d %d\n", newlen, p_tone_fh, p_tone_fetched, p_m_nodata, p_m_crypt_msg_loops); -#if 0 - if (p_m_txmix_on) - { - p_m_txmix_on -= newlen; - if (p_m_txmix_on <= 0) - { - p_m_txmix_on = 0; - p_m_txmix = !p_m_nodata; - PDEBUG(DEBUG_BCHANNEL, "after sending message, we set txmix to txmix=%d.\n", p_m_txmix); - if (p_m_txmix) - ph_control(p_m_b_addr, CMX_MIX_ON, 0); - } - } -#endif - 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--; -#if 0 -// we need to disable rxmix some time after sending the loops... - if (!p_m_crypt_msg_loops && p_m_txmix) - { - p_m_txmix_on = 8000; /* one sec */ - } -#endif - } - } - frm->prim = frm->prim & 0xfffffffc | REQUEST; - frm->addr = p_m_b_addr | FLG_MSG_DOWN; - frm->len = newlen; - 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); - } - } -#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 } @@ -727,90 +1174,96 @@ void PmISDN::bchannel_receive(iframe_t *frm) */ 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; @@ -819,9 +1272,8 @@ void PmISDN::set_tone(char *dir, char *tone) 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; @@ -836,14 +1288,13 @@ void PmISDN::set_tone(char *dir, char *tone) 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); @@ -851,110 +1302,63 @@ void PmISDN::set_tone(char *dir, char *tone) /* 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); - 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 - } + newconf = p_m_mute?0:p_m_conf; + set_conf(oldconf, newconf); 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; @@ -964,9 +1368,9 @@ void PmISDN::message_crypt(unsigned long epoint_id, int message_id, union parame 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 */ @@ -976,28 +1380,30 @@ void PmISDN::message_crypt(unsigned long epoint_id, int message_id, union parame 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(); + update_load(); #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; @@ -1011,794 +1417,647 @@ void PmISDN::message_crypt(unsigned long epoint_id, int message_id, union parame /* * 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; } - -/* - * main loop for processing messages from mISDN device - */ -int mISDN_handler(void) +void PmISDN::update_rxoff(void) { - 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; - - if ((ret = Port::handler())) - return(ret); - - /* the que avoids loopbacks when replying to stack after receiving - * from stack. */ - mISDNport = mISDNport_first; - while(mISDNport) - { - /* process turning 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_tone_name[0] || isdnport->p_tone_fh>=0 || isdnport->p_tone_fetched || !isdnport->p_m_nodata || 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); - } - } 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); - } - } - isdnport->p_m_jittercheck = 0; /* reset jitter detection check */ - } - i++; + 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_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); } -#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); - } - } - } - 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); + } + /* recording */ + if (p_record) { + /* 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); } - 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; - - /* 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); + /* 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 delay=%d.\n", p_m_tx_dejitter); + 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); } +} - /* find the port */ - 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; +static int mISDN_upqueue(struct lcr_fd *fd, unsigned int what, void *instance, int i) +{ + struct mISDNport *mISDNport; + struct mbuffer *mb; + struct l3_msg *l3m; + char byte; + int ret; + + /* 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); - 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) - { + /* process all ports */ + mISDNport = mISDNport_first; + 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); +} /* * 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 + if (devinfo.Dprotocols & (1 << ISDN_P_FXS)) { + pots = 1; + te = 1; + } +#endif +#ifdef ISDN_P_FXO + if (devinfo.Dprotocols & (1 << ISDN_P_FXO)) { + pots = 1; + nt = 1; + } +#endif + if (force_nt && !nt) { + PERROR_RUNTIME("Port %d does not support NT-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 (pots && !bri && !pri) { + PERROR_RUNTIME("Port %d supports POTS, LCR does not!\n", port); + return(NULL); + } + if (!bri && !pri) { + PERROR_RUNTIME("Port %d does not support BRI nor PRI!\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; + + /* 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"); + 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); + } + + SCPY(mISDNport->name, devinfo.name); + mISDNport->b_num = devinfo.nrbchan; mISDNport->portnum = port; mISDNport->ntmode = nt; + 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 (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 nt-mode ptmp the link is always up */ + if (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)"); + add_trace("mode", NULL, (mISDNport->ntmode)?"network":"terminal"); + 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); } @@ -1819,291 +2078,191 @@ void mISDNport_close(struct mISDNport *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); - } + /* 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; - 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); + /* preload procedure + * if transmit buffer in DSP module is empty, + * preload it to DSP_LOAD to prevent jitter gaps. + */ + if ((!p_bridge || p_m_disable_dejitter) && p_m_load == 0 && p_m_preload > 0) { + 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); + } - if (!useable) - printf(" * Port NOT useable for PBX\n"); + /* drop if load would exceed ISDN_MAXLOAD + * this keeps the delay not too high + */ + if (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; +} - printf("--------\n"); +int PmISDN::inband_send(unsigned char *buffer, int len) +{ + PERROR("this function must be derived to function!\n"); + return 0; +} - i++; - } - printf("\n"); +void PmISDN::inband_send_on(void) +{ + PDEBUG(DEBUG_PORT, "turning inband signalling send on.\n"); + p_m_inband_send_on = 1; + /* trigger inband transmit */ + update_load(); +} - /* close mISDN */ - if ((err = mISDN_close(device))) - { - fprintf(stderr, "mISDN_close() failed: err=%d '%s'\n", err, strerror(err)); - exit(-1); - } +void PmISDN::inband_send_off(void) +{ + PDEBUG(DEBUG_PORT, "turning inband signalling send off.\n"); + p_m_inband_send_on = 0; +} + +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); }