X-Git-Url: http://git.eversberg.eu/gitweb.cgi?p=lcr.git;a=blobdiff_plain;f=mISDN.cpp;h=f10a1a4205149e291dad93b36079ede65db14764;hp=4f6f67870747677bc8bcd8c8679825549df9039c;hb=54d34cda7a6f0d9bd3ff22d529ce69ff2c004bd3;hpb=7b78740c6e5e4ad585d36c157333b8c5018dcc82 diff --git a/mISDN.cpp b/mISDN.cpp index 4f6f678..f10a1a4 100644 --- a/mISDN.cpp +++ b/mISDN.cpp @@ -1,6 +1,6 @@ /*****************************************************************************\ ** ** -** PBX4Linux ** +** Linux Call Router ** ** ** **---------------------------------------------------------------------------** ** Copyright: Andreas Eversberg ** @@ -10,37 +10,130 @@ \*****************************************************************************/ -#include -#include -#include #include "main.h" -#include #include #include #include #include #include #include +#ifdef SOCKET_MISDN +#include +#include +#include +#include +#include +#include +#include +#include +#else extern "C" { #include } +#endif -#define ISDN_PID_L2_B_USER 0x420000ff -#define ISDN_PID_L3_B_USER 0x430000ff +#ifndef ISDN_PID_L4_B_USER #define ISDN_PID_L4_B_USER 0x440000ff +#endif -/* 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 MISDN_SOCKET +int mISDN_initialize(void) +{ + /* try to open raw socket to check kernel */ + ret = socket(AF_ISDN, SOCK_RAW, ISDN_P_BASE); + if (ret < 0) + { + fprintf(stderr, "Cannot open mISDN due to %s. (Does your Kernel support socket based mISDN?)\n", strerror(errno)); + return(-1); + } + close(ret); -/* list of mISDN ports */ -struct mISDNport *mISDNport_first; + init_layer3(4); // buffer of 4 + + return(0); +} + +void mISDN_deinitialize(void) +{ + cleanup_layer3(); +} +#else +int entity = 0; /* used for udevice */ +int mISDNdevice = -1; /* the device handler and port list */ + +int mISDN_initialize(void) +{ + char debug_log[128]; + unsigned char buff[1025]; + iframe_t *frm = (iframe_t *)buff; + int ret; + + /* initialize stuff of the NT lib */ + if (options.deb & DEBUG_STACK) + { + global_debug = 0xffffffff & ~DBGM_MSG; +// global_debug = DBGM_L3DATA; + } else + global_debug = DBGM_MAN; + SPRINT(debug_log, "%s/debug.log", INSTALL_DATA); + if (options.deb & DEBUG_LOG) + debug_init(global_debug, debug_log, debug_log, debug_log); + else + debug_init(global_debug, NULL, NULL, NULL); + msg_init(); + + /* open mISDNdevice if not already open */ + if (mISDNdevice < 0) + { + ret = mISDN_open(); + if (ret < 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", ret, errno, strerror(errno)); + return(-1); + } + 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: + FATAL("Cannot request MGR_NEWENTITY from mISDN. Exitting due to software bug."); + } + entity = frm->dinfo & 0xffff; + if (!entity) + goto noentity; + PDEBUG(DEBUG_ISDN, "our entity for l3-processes is %d.\n", entity); + } + return(0); +} + +void mISDN_deinitialize(void) +{ + unsigned char buff[1025]; + + debug_close(); + + if (mISDNdevice >= 0) + { + /* free entity */ + mISDN_write_frame(mISDNdevice, buff, 0, MGR_DELENTITY | REQUEST, entity, 0, NULL, TIMEOUT_1SEC); + /* close device */ + mISDN_close(mISDNdevice); + mISDNdevice = -1; + PDEBUG(DEBUG_ISDN, "mISDN device closed.\n"); + } +} +#endif /* * constructor @@ -53,7 +146,6 @@ 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_jittercheck = 0; p_m_delete = 0; p_m_hold = 0; p_m_txvol = p_m_rxvol = 0; @@ -63,14 +155,14 @@ PmISDN::PmISDN(int type, mISDNport *mISDNport, char *portname, struct port_setti p_m_echo = 0; p_m_tone = 0; p_m_rxoff = 0; - p_m_calldata = 0; + p_m_joindata = 0; p_m_dtmf = !mISDNport->ifport->nodtmf; p_m_timeout = 0; p_m_timer = 0; - /* audio from up */ - p_m_fromup_buffer_readp = 0; - p_m_fromup_buffer_writep = 0; + /* audio */ + p_m_load = 0; + p_m_last_tv_sec = 0; /* crypt */ p_m_crypt = 0; @@ -270,7 +362,10 @@ void ph_control(struct mISDNport *mISDNport, class PmISDN *isdnport, unsigned lo *d++ = c2; mISDN_write(mISDNdevice, ctrl, mISDN_HEADER_LEN+ctrl->len, TIMEOUT_1SEC); chan_trace_header(mISDNport, isdnport, "BCHANNEL control", DIRECTION_OUT); - add_trace(trace_name, NULL, "%d", trace_value); + if (c1 == CMX_CONF_JOIN) + add_trace(trace_name, NULL, "0x%08x", trace_value); + else + add_trace(trace_name, NULL, "%d", trace_value); end_trace(); } @@ -363,8 +458,8 @@ static int _bchannel_create(struct mISDNport *mISDNport, int i) goto stack_error; chan_trace_header(mISDNport, mISDNport->b_port[i], "BCHANNEL create stack", DIRECTION_OUT); add_trace("channel", NULL, "%d", i+1+(i>=15)); - add_trace("stack", "id", "0x%8x", mISDNport->b_stid[i]); - add_trace("stack", "address", "0x%8x", mISDNport->b_addr[i]); + add_trace("stack", "id", "0x%08x", mISDNport->b_stid[i]); + add_trace("stack", "address", "0x%08x", mISDNport->b_addr[i]); end_trace(); return(1); @@ -379,15 +474,15 @@ failed: * subfunction for bchannel_event * activate request */ -static void _bchannel_activate(struct mISDNport *mISDNport, int i) +static void _bchannel_activate(struct mISDNport *mISDNport, int i, int activate) { iframe_t act; /* activate bchannel */ - chan_trace_header(mISDNport, mISDNport->b_port[i], "BCHANNEL activate", DIRECTION_OUT); + chan_trace_header(mISDNport, mISDNport->b_port[i], activate?(char*)"BCHANNEL activate":(char*)"BCHANNEL deactivate", DIRECTION_OUT); add_trace("channel", NULL, "%d", i+1+(i>=15)); end_trace(); - act.prim = DL_ESTABLISH | REQUEST; + act.prim = (activate?DL_ESTABLISH:DL_RELEASE) | REQUEST; act.addr = mISDNport->b_addr[i] | FLG_MSG_DOWN; act.dinfo = 0; act.len = 0; @@ -439,24 +534,6 @@ static void _bchannel_configure(struct mISDNport *mISDNport, int i) /* * subfunction for bchannel_event - * deactivate - */ -static void _bchannel_deactivate(struct mISDNport *mISDNport, int i) -{ - iframe_t dact; - - chan_trace_header(mISDNport, mISDNport->b_port[i], "BCHANNEL deactivate", DIRECTION_OUT); - add_trace("channel", NULL, "%d", i+1+(i>=15)); - end_trace(); - 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); -} - -/* - * subfunction for bchannel_event * destroy stack */ static void _bchannel_destroy(struct mISDNport *mISDNport, int i) @@ -465,15 +542,17 @@ static void _bchannel_destroy(struct mISDNport *mISDNport, int i) chan_trace_header(mISDNport, mISDNport->b_port[i], "BCHANNEL remove stack", DIRECTION_OUT); add_trace("channel", NULL, "%d", i+1+(i>=15)); - add_trace("stack", "id", "0x%8x", mISDNport->b_stid[i]); - add_trace("stack", "address", "0x%8x", mISDNport->b_addr[i]); + add_trace("stack", "id", "0x%08x", mISDNport->b_stid[i]); + add_trace("stack", "address", "0x%08x", mISDNport->b_addr[i]); end_trace(); /* remove our stack only if set */ - PDEBUG(DEBUG_BCHANNEL, "free stack (b_addr=0x%x)\n", mISDNport->b_addr[i]); - mISDN_clear_stack(mISDNdevice, mISDNport->b_stid[i]); if (mISDNport->b_addr[i]) + { + PDEBUG(DEBUG_BCHANNEL, "free stack (b_addr=0x%x)\n", mISDNport->b_addr[i]); + mISDN_clear_stack(mISDNdevice, mISDNport->b_stid[i]); mISDN_write_frame(mISDNdevice, buff, mISDNport->b_addr[i] | FLG_MSG_DOWN, MGR_DELLAYER | REQUEST, 0, 0, NULL, TIMEOUT_1SEC); - mISDNport->b_addr[i] = 0; + mISDNport->b_addr[i] = 0; + } } @@ -538,17 +617,14 @@ void bchannel_event(struct mISDNport *mISDNport, int i, int event) case B_EVENT_ACTIVATE: /* port must be linked in order to allow activation */ if (!mISDNport->b_port[i]) - { - PERROR("SOFTWARE ERROR: bchannel must be linked to a Port class\n"); - exit(-1); - } + 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); + _bchannel_activate(mISDNport, i, 1); state = B_STATE_ACTIVATING; } break; @@ -578,7 +654,7 @@ void bchannel_event(struct mISDNport *mISDNport, int i, int event) } else { /* bchannel is active, but not used anymore (or has wrong stack config), so we deactivate */ - _bchannel_deactivate(mISDNport, i); + _bchannel_activate(mISDNport, i, 0); state = B_STATE_DEACTIVATING; } break; @@ -590,10 +666,7 @@ void bchannel_event(struct mISDNport *mISDNport, int i, int event) case B_EVENT_DEACTIVATE: if (!mISDNport->b_port[i]) - { - PERROR("SOFTWARE ERROR: bchannel must be linked to a Port class\n"); - exit(-1); - } + FATAL("bchannel must be linked to a Port class\n"); switch(state) { case B_STATE_IDLE: @@ -606,7 +679,7 @@ void bchannel_event(struct mISDNport *mISDNport, int i, int event) case B_STATE_ACTIVE: /* bchannel is active, so we deactivate */ - _bchannel_deactivate(mISDNport, i); + _bchannel_activate(mISDNport, i, 0); state = B_STATE_DEACTIVATING; break; @@ -634,7 +707,7 @@ void bchannel_event(struct mISDNport *mISDNport, int i, int event) /* bchannel is now deactivate, but is requied by Port class, so we reactivate */ if (_bchannel_create(mISDNport, i)) { - _bchannel_activate(mISDNport, i); + _bchannel_activate(mISDNport, i, 1); state = B_STATE_ACTIVATING; } } @@ -722,7 +795,6 @@ seize: p_m_b_index = i; p_m_b_channel = channel; p_m_b_exclusive = exclusive; - p_m_jittercheck = 0; /* reserve channel */ if (!p_m_b_reserve) @@ -765,128 +837,141 @@ void PmISDN::drop_bchannel(void) /* * handler + +audio transmission procedure: +----------------------------- + +* priority +three sources of audio transmission: +- crypto-data high priority +- tones high priority (also high) +- remote-data low priority + +* elapsed +a variable that temporarily shows the number of samples elapsed since last transmission process. +p_m_last_tv_* is used to store that last timestamp. this is used to calculate the time elapsed. + +* load +a variable that is increased whenever data is transmitted. +it is decreased while time elapses. it stores the number of samples that +are currently loaded to dsp module. +since clock in dsp module is the same clock for user space process, these +times have no skew. + +* levels +there are two levels: +ISDN_LOAD will give the load that have to be kept in dsp. +ISDN_MAXLOAD 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 ISDN_LOAD, load is filled up to ISDN_LOAD +if no more data is available, load becomes empty again. + +'load' variable: +0 ISDN_LOAD ISDN_MAXLOAD ++--------------------+----------------------+ +| | | ++--------------------+----------------------+ + +on empty load or on load below ISDN_LOAD, the load is inceased to ISDN_LOAD: +0 ISDN_LOAD ISDN_MAXLOAD ++--------------------+----------------------+ +|TTTTTTTTTTTTTTTTTTTT| | ++--------------------+----------------------+ + +on empty load, remote-audio causes the load with the remote audio to be increased to ISDN_LOAD. +0 ISDN_LOAD ISDN_MAXLOAD ++--------------------+----------------------+ +|TTTTTTTTTTTTTTTTTTTTRRRRR | ++--------------------+----------------------+ + */ int PmISDN::handler(void) { struct message *message; - int elapsed, length; + int elapsed = 0; int ret; - int inbuffer; if ((ret = Port::handler())) return(ret); - inbuffer = (p_m_fromup_buffer_writep - p_m_fromup_buffer_readp) & FROMUP_BUFFER_MASK; - /* send tone data to isdn device only if we have data */ - if (p_tone_name[0] || p_m_crypt_msg_loops || inbuffer) + /* get elapsed */ + if (p_m_last_tv_sec) { - /* calculate how much to transmit */ - if (!p_last_tv_sec) - { - elapsed = ISDN_PRELOAD; /* preload for the first time */ - } else - { - elapsed = 8000 * (now_tv.tv_sec - p_last_tv_sec) - + 8 * (now_tv.tv_usec/1000 - p_last_tv_msec); - /* gap was greater preload, so only fill up to preload level */ - if (elapsed > ISDN_PRELOAD) - { - elapsed = ISDN_PRELOAD; - } - } - if (elapsed >= ISDN_TRANSMIT) + elapsed = 8000 * (now_tv.tv_sec - p_m_last_tv_sec) + + 8 * (now_tv.tv_usec/1000 - p_m_last_tv_msec); + } else + { + /* set clock of first process ever in this instance */ + p_m_last_tv_sec = now_tv.tv_sec; + p_m_last_tv_msec = now_tv.tv_usec/1000; + } + /* process only if we have a minimum of samples, to make packets not too small */ + if (elapsed >= ISDN_TRANSMIT) + { + /* set clock of last process! */ + p_m_last_tv_sec = now_tv.tv_sec; + p_m_last_tv_msec = now_tv.tv_usec/1000; + + /* update load */ + if (elapsed < p_m_load) + p_m_load -= elapsed; + else + p_m_load = 0; + + /* to send data, tone must be active OR crypt messages must be on */ + if ((p_tone_name[0] || p_m_crypt_msg_loops) && p_m_load < ISDN_LOAD) { - unsigned char buf[mISDN_HEADER_LEN+ISDN_PRELOAD]; + int tosend = ISDN_LOAD - p_m_load, length; + unsigned char buf[mISDN_HEADER_LEN+tosend]; iframe_t *frm = (iframe_t *)buf; unsigned char *p = buf+mISDN_HEADER_LEN; - p_last_tv_sec = now_tv.tv_sec; - p_last_tv_msec = now_tv.tv_usec/1000; - - /* read tones or fill with silence */ - length = read_audio(p, elapsed); - - /* - * get data from up - * the fromup_buffer data is written to the beginning of the buffer - * the part that is filles with tones (length) is skipped, so tones have priority - * the length value is increased by the number of data copied from fromup_buffer - */ - if (inbuffer) - { - printf("nix\n"); - /* inbuffer might be less than we skip due to audio */ - if (inbuffer <= length) - { - /* clear buffer */ - p_m_fromup_buffer_readp = p_m_fromup_buffer_writep; - inbuffer = 0; - } else - { - /* skip what we already have with tones */ - p_m_fromup_buffer_readp = (p_m_fromup_buffer_readp + length) & FROMUP_BUFFER_MASK; - inbuffer -= length; - p += length; - } - /* if we have more in buffer, than we send this time */ - if (inbuffer > (elapsed-length)) - inbuffer = elapsed - length; - /* set length to what we actually have */ - length = length + inbuffer; - /* now fill up with fromup_buffer */ - while (inbuffer) - { - *p++ = p_m_fromup_buffer[p_m_fromup_buffer_readp]; - p_m_fromup_buffer_readp = (p_m_fromup_buffer_readp + 1) & FROMUP_BUFFER_MASK; - inbuffer--; - } - } - - /* overwrite buffer with crypto stuff */ - if (p_m_crypt_msg_loops) + /* copy crypto loops */ + while (p_m_crypt_msg_loops && tosend) { - printf("nix2\n"); - /* send pending message */ - int tosend; - /* how much do we have to send */ - tosend = p_m_crypt_msg_len - p_m_crypt_msg_current; - if (tosend > elapsed) - tosend = elapsed; + length = p_m_crypt_msg_len - p_m_crypt_msg_current; - /* our length increases, if less */ - if (length < tosend) + /* clip tosend */ + if (length > tosend) length = tosend; /* copy message (part) to buffer */ - memcpy(p, p_m_crypt_msg+p_m_crypt_msg_current, tosend); - p_m_crypt_msg_current += tosend; + 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--; } + + /* new length */ + tosend -= length; + } + + /* copy tones */ + if (p_tone_name[0] && tosend) + { + tosend -= read_audio(p, tosend); } + + /* send data */ frm->prim = DL_DATA | REQUEST; frm->addr = p_m_mISDNport->b_addr[p_m_b_index] | FLG_MSG_DOWN; frm->dinfo = 0; - frm->len = length; - mISDN_write(mISDNdevice, frm, mISDN_HEADER_LEN+frm->len, TIMEOUT_1SEC); - - if (p_debug_nothingtosend) - { - p_debug_nothingtosend = 0; - PDEBUG((DEBUG_PORT | DEBUG_BCHANNEL), "PmISDN(%s) start sending, because we have tones and/or remote audio.\n", p_name); - } - return(1); + frm->len = ISDN_LOAD - p_m_load - tosend; + if (frm->len) + mISDN_write(mISDNdevice, frm, mISDN_HEADER_LEN+frm->len, TIMEOUT_1SEC); + p_m_load += frm->len; } - } 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); - } } // NOTE: deletion is done by the child class @@ -902,8 +987,8 @@ int PmISDN::handler(void) 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(1); } return(0); /* nothing done */ @@ -921,28 +1006,6 @@ void PmISDN::bchannel_receive(iframe_t *frm) unsigned char *p; int l; unsigned long cont; -// iframe_t rsp; /* response to possible indication */ -#if 0 -#warning BCHANNEL-DEBUG -{ - // check if we are part of all ports */ - class Port *port = port_first; - while(port) - { - if (port==this) - break; - port=port->next; - } - if (!port) - { - PERROR_RUNTIME("**************************************************\n"); - PERROR_RUNTIME("*** BCHANNEL-DEBUG: !this! is not in list of ports\n"); - PERROR_RUNTIME("**************************************************\n"); - return; - } -} -#endif - if (frm->prim == (PH_CONTROL | INDICATION)) { @@ -952,7 +1015,6 @@ void PmISDN::bchannel_receive(iframe_t *frm) return; } 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) { chan_trace_header(p_m_mISDNport, this, "BCHANNEL control", DIRECTION_IN); @@ -989,8 +1051,8 @@ void PmISDN::bchannel_receive(iframe_t *frm) case CMX_TX_DATA: if (!p_m_txdata) { - /* if rx is off, it may happen that fifos send us pending informations, we just ignore them */ - PDEBUG(DEBUG_BCHANNEL, "PmISDN(%s) ignoring rx data, because 'txdata' is turned off\n", p_name); + /* 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; } if (p_record) @@ -1003,7 +1065,7 @@ void PmISDN::bchannel_receive(iframe_t *frm) end_trace(); } return; - } + } if (frm->prim != (PH_DATA | INDICATION) && frm->prim != (DL_DATA | INDICATION)) { PERROR("Bchannel received unknown primitve: 0x%x\n", frm->prim); @@ -1011,17 +1073,12 @@ void PmISDN::bchannel_receive(iframe_t *frm) } /* calls will not process any audio data unless - * the call is connected OR tones feature is enabled. + * the call is connected OR interface features audio during call setup. */ +//printf("%d -> %d prim=%x joindata=%d tones=%d\n", p_serial, ACTIVE_EPOINT(p_epointlist), frm->prim, p_m_joindata, p_m_mISDNport->earlyb); +#ifndef DEBUG_COREBRIDGE if (p_state!=PORT_STATE_CONNECT - && !p_m_mISDNport->tones) - return; - -#if 0 - /* the bearer capability must be audio in order to send and receive - * audio prior or after connect. - */ - if (!(p_bearerinfo.capability&CLASS_CAPABILITY_AUDIO) && p_state!=PORT_STATE_CONNECT) + && !p_m_mISDNport->earlyb) return; #endif @@ -1051,9 +1108,8 @@ void PmISDN::bchannel_receive(iframe_t *frm) p = (unsigned char *)&frm->data.p; /* send data to epoint */ - if (p_m_calldata && ACTIVE_EPOINT(p_epointlist)) /* only if we have an epoint object */ + if (p_m_joindata && 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) @@ -1068,15 +1124,6 @@ void PmISDN::bchannel_receive(iframe_t *frm) length_temp -= sizeof(message->param.data.data); } } -#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 } @@ -1222,7 +1269,8 @@ void PmISDN::message_mISDNsignal(unsigned long epoint_id, int message_id, union if (p_m_b_channel) if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE) ph_control(p_m_mISDNport, this, p_m_mISDNport->b_addr[p_m_b_index], VOL_CHANGE_TX, p_m_txvol, "DSP-TXVOL", p_m_txvol); - } + } else + PDEBUG(DEBUG_BCHANNEL, "we already have tx-volume shift=%d.\n", p_m_rxvol); if (p_m_rxvol != param->mISDNsignal.rxvol) { p_m_rxvol = param->mISDNsignal.rxvol; @@ -1230,7 +1278,8 @@ void PmISDN::message_mISDNsignal(unsigned long epoint_id, int message_id, union if (p_m_b_channel) if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE) ph_control(p_m_mISDNport, this, p_m_mISDNport->b_addr[p_m_b_index], VOL_CHANGE_RX, p_m_rxvol, "DSP-RXVOL", p_m_rxvol); - } + } else + PDEBUG(DEBUG_BCHANNEL, "we already have rx-volume shift=%d.\n", p_m_rxvol); break; case mISDNSIGNAL_CONF: @@ -1243,18 +1292,20 @@ void PmISDN::message_mISDNsignal(unsigned long epoint_id, int message_id, union if (p_m_b_channel) if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE) ph_control(p_m_mISDNport, this, p_m_mISDNport->b_addr[p_m_b_index], (p_m_conf)?CMX_CONF_JOIN:CMX_CONF_SPLIT, p_m_conf, "DSP-CONF", p_m_conf); - } + } else + PDEBUG(DEBUG_BCHANNEL, "we already have conf=%d.\n", p_m_conf); /* we must set, even if currently tone forbids 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) + case mISDNSIGNAL_JOINDATA: + if (p_m_joindata != param->mISDNsignal.joindata) { - p_m_calldata = param->mISDNsignal.calldata; - PDEBUG(DEBUG_BCHANNEL, "we change to calldata=%d.\n", p_m_calldata); - } + p_m_joindata = param->mISDNsignal.joindata; + PDEBUG(DEBUG_BCHANNEL, "we change to joindata=%d.\n", p_m_joindata); + } else + PDEBUG(DEBUG_BCHANNEL, "we already have joindata=%d.\n", p_m_joindata); break; case mISDNSIGNAL_DELAY: @@ -1265,7 +1316,8 @@ void PmISDN::message_mISDNsignal(unsigned long epoint_id, int message_id, union if (p_m_b_channel) if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE) ph_control(p_m_mISDNport, this, p_m_mISDNport->b_addr[p_m_b_index], p_m_delay?CMX_DELAY:CMX_JITTER, p_m_delay, "DSP-DELAY", p_m_delay); - } + } else + PDEBUG(DEBUG_BCHANNEL, "we already have delay=%d.\n", p_m_delay); break; default: @@ -1395,7 +1447,7 @@ int mISDN_handler(void) if (isdnport) { /* call bridges in user space OR crypto OR recording */ - if (isdnport->p_m_calldata || isdnport->p_m_crypt_msg_loops || isdnport->p_m_crypt_listen || isdnport->p_record) + if (isdnport->p_m_joindata || isdnport->p_m_crypt_msg_loops || isdnport->p_m_crypt_listen || isdnport->p_record) { /* rx IS required */ if (isdnport->p_m_rxoff) @@ -1519,8 +1571,7 @@ int mISDN_handler(void) free_msg(msg); if (errno == EAGAIN) return(0); - PERROR("FATAL ERROR: failed to do mISDN_read()\n"); - exit(-1); + FATAL("Failed to do mISDN_read()\n"); } if (!ret) { @@ -1736,7 +1787,7 @@ int mISDN_handler(void) } if (i == mISDNport->b_num) { - PERROR("unhandled b-message (address 0x%x).\n", frm->addr); + PERROR("unhandled b-message (prim 0x%x address 0x%x).\n", frm->prim, frm->addr); break; } if (mISDNport->b_port[i]) @@ -1761,7 +1812,7 @@ int mISDN_handler(void) } if (i == mISDNport->b_num) { - PERROR("unhandled b-establish (address 0x%x).\n", frm->addr); + PERROR("unhandled b-establish (prim 0x%x address 0x%x).\n", frm->prim, frm->addr); break; } bchannel_event(mISDNport, i, B_EVENT_ACTIVATED); @@ -1781,7 +1832,7 @@ int mISDN_handler(void) } if (i == mISDNport->b_num) { - PERROR("unhandled b-release (address 0x%x).\n", frm->addr); + PERROR("unhandled b-release (prim 0x%x address 0x%x).\n", frm->prim, frm->addr); break; } bchannel_event(mISDNport, i, B_EVENT_DEACTIVATED); @@ -1806,59 +1857,36 @@ struct mISDNport *mISDNport_open(int port, int ptp, int ptmp, struct interface * int ret; unsigned char buff[1025]; iframe_t *frm = (iframe_t *)buff; - stack_info_t *stinf; struct mISDNport *mISDNport, **mISDNportp; int i, cnt; + int pri = 0; + int nt = 0; +#ifdef SOCKET_MISDN +// struct mlayer3 *layer3; +#else // interface_info_t ii; net_stack_t *nst; manager_t *mgr; layer_info_t li; - int pri = 0; - int nt = 0; - - /* 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); - } + stack_info_t *stinf; +#endif /* 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"); + 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); + PERROR_RUNTIME("Port (%d) given at 'ports' (options.conf) is out of existing port range (%d-%d)\n", port, 1, 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); + PERROR_RUNTIME("Cannot get stack info for port %d (ret=%d)\n", port, ret); return(NULL); } stinf = (stack_info_t *)&frm->data.p; @@ -1881,7 +1909,7 @@ struct mISDNport *mISDNport_open(int port, int ptp, int ptmp, struct interface * nt = 1; break; default: - PERROR("unknown port(%d) type 0x%08x\n", port, stinf->pid.protocol[0]); + PERROR_RUNTIME("unknown port(%d) type 0x%08x\n", port, stinf->pid.protocol[0]); return(NULL); } if (nt) @@ -1889,12 +1917,12 @@ struct mISDNport *mISDNport_open(int port, int ptp, int ptmp, struct interface * /* NT */ if (stinf->pid.protocol[1] == 0) { - PERROR("Given port %d: Missing layer 1 NT-mode protocol.\n", port); + PERROR_RUNTIME("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]); + PERROR_RUNTIME("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 @@ -1902,17 +1930,17 @@ struct mISDNport *mISDNport_open(int port, int ptp, int ptmp, struct interface * /* TE */ if (stinf->pid.protocol[1] == 0) { - PERROR("Given port %d: Missing layer 1 protocol.\n", port); + PERROR_RUNTIME("Given port %d: Missing layer 1 protocol.\n", port); return(NULL); } if (stinf->pid.protocol[2] == 0) { - PERROR("Given port %d: Missing layer 2 protocol.\n", port); + PERROR_RUNTIME("Given port %d: Missing layer 2 protocol.\n", port); return(NULL); } if (stinf->pid.protocol[3] == 0) { - PERROR("Given port %d: Missing layer 3 protocol.\n", port); + PERROR_RUNTIME("Given port %d: Missing layer 3 protocol.\n", port); return(NULL); } else { @@ -1922,13 +1950,13 @@ struct mISDNport *mISDNport_open(int port, int ptp, int ptmp, struct interface * break; default: - PERROR("Given port %d: own protocol 0x%08x", port,stinf->pid.protocol[3]); + PERROR_RUNTIME("Given port %d: own protocol 0x%08x", port,stinf->pid.protocol[3]); return(NULL); } } if (stinf->pid.protocol[4]) { - PERROR("Given port %d: Layer 4 protocol not allowed.\n", port); + PERROR_RUNTIME("Given port %d: Layer 4 protocol not allowed.\n", port); return(NULL); } } @@ -1937,44 +1965,57 @@ struct mISDNport *mISDNport_open(int port, int ptp, int ptmp, struct interface * mISDNportp = &mISDNport_first; while(*mISDNportp) mISDNportp = &((*mISDNportp)->next); - mISDNport = (struct mISDNport *)calloc(1, sizeof(struct mISDNport)); - if (!mISDNport) - { - PERROR("Cannot alloc mISDNport structure\n"); - return(NULL); - } + mISDNport = (struct mISDNport *)MALLOC(sizeof(struct mISDNport)); pmemuse++; - memset(mISDNport, 0, sizeof(mISDNport)); *mISDNportp = mISDNport; /* allocate ressources of port */ +#ifdef SOCKET_MISDN + /* open layer 3 */ + protocol = (nt)?L3_PROTOCOL_DSS1_USER:L3_PROTOCOL_DSS1_NETWORK; + prop = 0; + if (ptp) + prop |= FLG_PTP; + if (ptp) + prop |= FLG_FORCE_PTMP; + mISDNport->layer3 = open_layer3(port-1, protocol, prop , do_dchannel, mISDNport); + if (!mISDNport->layer3) + { + PERROR_RUNTIME("Cannot get layer(%d) id of port %d\n", nt?2:4, port); + return(NULL); + } + +#warning KKEIL: braucht man das noch? + /* 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 */ + } + +#else msg_queue_init(&mISDNport->downqueue); -// SCPY(mISDNport->name, "noname"); - mISDNport->portnum = port; - mISDNport->ntmode = nt; - mISDNport->pri = pri; mISDNport->d_stid = stinf->id; PDEBUG(DEBUG_ISDN, "d_stid = 0x%x.\n", mISDNport->d_stid); - mISDNport->b_num = stinf->childcnt; - 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; + ptp = 1; if (ptmp && nt) { PDEBUG(DEBUG_ISDN, "Port is forced to point-to-multipoint.\n"); - mISDNport->ptp = ptp = 0; + ptp = 0; } } - i = 0; - while(i < stinf->childcnt) - { - mISDNport->b_stid[i] = stinf->child[i]; - mISDNport->b_state[i] = B_STATE_IDLE; - PDEBUG(DEBUG_ISDN, "b_stid[%d] = 0x%x.\n", i, mISDNport->b_stid[i]); - i++; - } + + /* create layer intance */ memset(&li, 0, sizeof(li)); UCPY(&li.name[0], (nt)?"net l2":"pbx l4"); li.object_id = -1; @@ -2062,6 +2103,23 @@ struct mISDNport *mISDNport_open(int port, int ptp, int ptmp, struct interface * Isdnl3Init(nst); } +#endif +// SCPY(mISDNport->name, "noname"); + mISDNport->portnum = port; + mISDNport->ntmode = nt; + mISDNport->pri = pri; + mISDNport->ptp = ptp; + mISDNport->b_num = stinf->childcnt; + PDEBUG(DEBUG_ISDN, "Port has %d b-channels.\n", mISDNport->b_num); + i = 0; + while(i < stinf->childcnt) + { + mISDNport->b_stid[i] = stinf->child[i]; + mISDNport->b_state[i] = B_STATE_IDLE; + PDEBUG(DEBUG_ISDN, "b_stid[%d] = 0x%x.\n", i, mISDNport->b_stid[i]); + i++; + } + /* if te-mode, query state link */ if (!mISDNport->ntmode) { @@ -2193,7 +2251,7 @@ void mISDNport_close(struct mISDNport *mISDNport) /* phd */ msg_queue_purge(&nst->down_queue); if (nst->phd_down_msg) - free(nst->phd_down_msg); + FREE(nst->phd_down_msg, 0); } } @@ -2218,25 +2276,11 @@ void mISDNport_close(struct mISDNport *mISDNport) } if (mISDNportp) - { - PERROR("software error, mISDNport not in list\n"); - exit(-1); - } + 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"); - } } @@ -2257,7 +2301,7 @@ void mISDN_port_info(void) 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); + exit(EXIT_FAILURE); } /* get number of stacks */ @@ -2337,7 +2381,7 @@ void mISDN_port_info(void) 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]); + printf(" -> Layer %d protocol 0x%08x is detected, port already in use by another application.\n", p, stinf->pid.protocol[p]); } p++; } @@ -2388,7 +2432,7 @@ void mISDN_port_info(void) 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]); + printf(" -> Layer %d protocol 0x%08x is detected, port already in use by another application.\n", p, stinf->pid.protocol[p]); } p++; } @@ -2396,7 +2440,7 @@ void mISDN_port_info(void) printf(" - %d B-channels\n", stinf->childcnt); if (!useable) - printf(" * Port NOT useable for PBX\n"); + printf(" * Port NOT useable for LCR\n"); printf("--------\n"); @@ -2406,10 +2450,7 @@ void mISDN_port_info(void) /* close mISDN */ if ((err = mISDN_close(device))) - { - fprintf(stderr, "mISDN_close() failed: err=%d '%s'\n", err, strerror(err)); - exit(-1); - } + FATAL("mISDN_close() failed: err=%d '%s'\n", err, strerror(err)); } @@ -2418,26 +2459,44 @@ void mISDN_port_info(void) */ void PmISDN::txfromup(unsigned char *data, int length) { - int avail; - /* no data */ - if (!length) - return; + unsigned char buf[mISDN_HEADER_LEN+((length>ISDN_LOAD)?length:ISDN_LOAD)]; + iframe_t *frm = (iframe_t *)buf; - /* get free samples in buffer */ - avail = ((p_m_fromup_buffer_readp - p_m_fromup_buffer_writep - 1) & FROMUP_BUFFER_MASK); - if (avail < length) - { - PDEBUG(DEBUG_PORT, "Port(%d): fromup_buffer overflows, this shall not happen under normal conditions\n", p_serial); + /* configure frame */ + frm->prim = DL_DATA | REQUEST; + frm->addr = p_m_mISDNport->b_addr[p_m_b_index] | FLG_MSG_DOWN; + frm->dinfo = 0; + + /* check if high priority tones exist + * ignore data in this case + */ + if (p_tone_name[0] || p_m_crypt_msg_loops) return; - } - /* write data to buffer and return */ - while(length) + /* preload procedure + * if transmit buffer in DSP module is empty, + * preload it to DSP_LOAD to prevent jitter gaps. + */ + if (p_m_load==0 && ISDN_LOAD>0) { - p_m_fromup_buffer[p_m_fromup_buffer_writep] = *data++; - p_m_fromup_buffer_writep = (p_m_fromup_buffer_writep + 1) & FROMUP_BUFFER_MASK; - length--; + + memcpy(buf+mISDN_HEADER_LEN, data, ISDN_LOAD); + frm->len = ISDN_LOAD; + mISDN_write(mISDNdevice, frm, mISDN_HEADER_LEN+frm->len, TIMEOUT_1SEC); + p_m_load += frm->len; } - return; // must return, because length is 0 + + /* drop if load would exceed ISDN_MAXLOAD + * this keeps the delay not too high + */ + if (p_m_load+length > ISDN_MAXLOAD) + return; + + /* load data to buffer + */ + memcpy(buf+mISDN_HEADER_LEN, data, length); + frm->len = length; + mISDN_write(mISDNdevice, frm, mISDN_HEADER_LEN+frm->len, TIMEOUT_1SEC); + p_m_load += frm->len; }