fixed so, PRI/BRI NT/TE works
[lcr.git] / mISDN.cpp
index 6307840..f50abb6 100644 (file)
--- a/mISDN.cpp
+++ b/mISDN.cpp
@@ -60,12 +60,20 @@ extern "C" {
 
 #else
 // socket mISDN
-#include <sys/socket.h>
 extern "C" {
 }
-#include <mISDNuser/mISDNif.h>
-#include <mISDNuser/q931.h>
-#include <mISDNuser/mlayer3.h>
+#include <q931.h>
+
+#undef offsetof
+#ifdef __compiler_offsetof
+#define offsetof(TYPE,MEMBER) __compiler_offsetof(TYPE,MEMBER)
+#else
+#define offsetof(TYPE, MEMBER) ((size_t) &((TYPE *)0)->MEMBER)
+#endif
+
+#define container_of(ptr, type, member) ({                     \
+       const typeof( ((type *)0)->member ) *__mptr = (ptr);    \
+       (type *)( (char *)__mptr - offsetof(type,member) );})
 #endif
 
 // timeouts if activating/deactivating response from mISDN got lost
@@ -96,8 +104,11 @@ int mISDN_initialize(void)
                return(-1);
        }
 
+       /* init mlayer3 */
+       init_layer3(4); // buffer of 4
+
        /* open debug, if enabled and not only stack debugging */
-       if (options.deb && (options.deb != DEBUG_STACK))
+       if (options.deb)
        {
                SPRINT(filename, "%s/debug.log", INSTALL_DATA);
                debug_fp = fopen(filename, "a");
@@ -110,9 +121,6 @@ int mISDN_initialize(void)
        } else
                mISDN_debug_init(0, NULL, NULL, NULL);
 
-       /* init mlayer3 */
-       init_layer3(4); // buffer of 4
-
        return(0);
 }
 
@@ -278,7 +286,7 @@ PmISDN::PmISDN(int type, mISDNport *mISDNport, char *portname, struct port_setti
  */
 PmISDN::~PmISDN()
 {
-       struct message *message;
+       struct lcr_msg *message;
 
        /* remove bchannel relation */
        drop_bchannel();
@@ -309,7 +317,7 @@ void chan_trace_header(struct mISDNport *mISDNport, class PmISDN *port, char *ms
        /* init trace with given values */
        start_trace(mISDNport?mISDNport->portnum:0,
                    (mISDNport)?((mISDNport->ifport)?mISDNport->ifport->interface:NULL):NULL,
-                   port?numberrize_callerinfo(port->p_callerinfo.id, port->p_callerinfo.ntype):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,
@@ -419,8 +427,8 @@ void l1l2l3_trace_header(struct mISDNport *mISDNport, class PmISDN *port, unsign
 
        /* init trace with given values */
        start_trace(mISDNport?mISDNport->portnum:0,
-                   mISDNport?mISDNport->ifport->interface:NULL,
-                   port?numberrize_callerinfo(port->p_callerinfo.id, port->p_callerinfo.ntype):NULL,
+                   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,
@@ -432,28 +440,36 @@ void l1l2l3_trace_header(struct mISDNport *mISDNport, class PmISDN *port, unsign
 /*
  * send control information to the channel (dsp-module)
  */
-void ph_control(struct mISDNport *mISDNport, class PmISDN *isdnport, unsigned long handle, unsigned long c1, unsigned long c2, char *trace_name, int trace_value)
-{
 #ifdef SOCKET_MISDN
+void ph_control(struct mISDNport *mISDNport, class PmISDN *isdnport, unsigned long sock, unsigned long c1, unsigned long c2, char *trace_name, int trace_value)
+{
        unsigned char buffer[MISDN_HEADER_LEN+sizeof(int)+sizeof(int)];
        struct mISDNhead *ctrl = (struct mISDNhead *)buffer;
        unsigned long *d = (unsigned long *)(buffer+MISDN_HEADER_LEN);
        int ret;
 
+       if (sock < 0)
+               return;
+
        ctrl->prim = PH_CONTROL_REQ;
        ctrl->id = 0;
        *d++ = c1;
        *d++ = c2;
-       ret = sendto(handle, buffer, MISDN_HEADER_LEN+sizeof(int)*2, 0, NULL, 0);
+       ret = sendto(sock, buffer, MISDN_HEADER_LEN+sizeof(int)*2, 0, NULL, 0);
        if (!ret)
-               PERROR("Failed to send to socket %d\n", handle);
+               PERROR("Failed to send to socket %d\n", sock);
 #else
+void ph_control(struct mISDNport *mISDNport, class PmISDN *isdnport, unsigned long addr, unsigned long c1, unsigned long c2, 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;
 
+       if (!addr)
+               return;
+
        ctrl->prim = PH_CONTROL | REQUEST;
-       ctrl->addr = handle | FLG_MSG_DOWN;
+       ctrl->addr = addr | FLG_MSG_DOWN;
        ctrl->dinfo = 0;
        ctrl->len = sizeof(int)*2;
        *d++ = c1;
@@ -461,35 +477,47 @@ void ph_control(struct mISDNport *mISDNport, class PmISDN *isdnport, unsigned lo
        mISDN_write(mISDNdevice, ctrl, mISDN_HEADER_LEN+ctrl->len, TIMEOUT_1SEC);
 #endif
        chan_trace_header(mISDNport, isdnport, "BCHANNEL control", DIRECTION_OUT);
+#ifdef SOCKET_MISDN
+       if (c1 == DSP_CONF_JOIN)
+#else
        if (c1 == CMX_CONF_JOIN)
+#endif
                add_trace(trace_name, NULL, "0x%08x", trace_value);
        else
                add_trace(trace_name, NULL, "%d", trace_value);
        end_trace();
 }
 
-void ph_control_block(struct mISDNport *mISDNport, class PmISDN *isdnport, unsigned long handle, unsigned long c1, void *c2, int c2_len, char *trace_name, int trace_value)
-{
 #ifdef SOCKET_MISDN
+void ph_control_block(struct mISDNport *mISDNport, class PmISDN *isdnport, int sock, unsigned long c1, void *c2, int c2_len, char *trace_name, int trace_value)
+{
        unsigned char buffer[MISDN_HEADER_LEN+sizeof(int)+c2_len];
        struct mISDNhead *ctrl = (struct mISDNhead *)buffer;
        unsigned long *d = (unsigned long *)(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);
-       ret = sendto(handle, buffer, MISDN_HEADER_LEN+sizeof(int)+c2_len, 0, NULL, 0);
+       ret = sendto(sock, buffer, MISDN_HEADER_LEN+sizeof(int)+c2_len, 0, NULL, 0);
        if (!ret)
-               PERROR("Failed to send to socket %d\n", handle);
+               PERROR("Failed to send to socket %d\n", sock);
 #else
+void ph_control_block(struct mISDNport *mISDNport, class PmISDN *isdnport, unsigned long addr, unsigned long c1, void *c2, int c2_len, 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;
 
+       if (!addr)
+               return;
+
        ctrl->prim = PH_CONTROL | REQUEST;
-       ctrl->addr = handle | FLG_MSG_DOWN;
+       ctrl->addr = addr | FLG_MSG_DOWN;
        ctrl->dinfo = 0;
        ctrl->len = sizeof(int)+c2_len;
        *d++ = c1;
@@ -513,13 +541,15 @@ static int _bchannel_create(struct mISDNport *mISDNport, int i)
        unsigned long on = 1;
        struct sockaddr_mISDN addr;
 
-       if (mISDNport->b_socket[i])
+       if (mISDNport->b_socket[i] > -1)
        {
                PERROR("Error: Socket already created for index %d\n", i);
                return(0);
        }
 
        /* open socket */
+//#warning testing without DSP
+//     mISDNport->b_socket[i] = socket(PF_ISDN, SOCK_DGRAM, ISDN_P_B_RAW);
        mISDNport->b_socket[i] = socket(PF_ISDN, SOCK_DGRAM, ISDN_P_B_L2DSP);
        if (mISDNport->b_socket[i] < 0)
        {
@@ -643,7 +673,9 @@ static void _bchannel_activate(struct mISDNport *mISDNport, int i, int activate)
        struct mISDNhead act;
        int ret;
 
-       act.prim = (activate)?DL_ESTABLISH_REQ:DL_RELEASE_REQ; 
+       if (mISDNport->b_socket[i] < 0)
+               return;
+       act.prim = (activate)?PH_ACTIVATE_REQ:PH_DEACTIVATE_REQ; 
        act.id = 0;
        ret = sendto(mISDNport->b_socket[i], &act, MISDN_HEADER_LEN, 0, NULL, 0);
        if (!ret)
@@ -678,12 +710,45 @@ static void _bchannel_configure(struct mISDNport *mISDNport, int i)
 #ifdef SOCKET_MISDN
        int handle;
 
+       if (mISDNport->b_socket[i] < 0)
+               return;
        handle = mISDNport->b_socket[i];
+       port = mISDNport->b_port[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)
+               ph_control(mISDNport, port, handle, DSP_DELAY, port->p_m_delay, "DSP-DELAY", port->p_m_delay);
+       if (port->p_m_tx_gain)
+               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)
+               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])
+               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)
+               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)
+               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)
+//             ph_control(mISDNport, port, handle, DSP_MIX_ON, 0, "DSP-MIX", 1);
+       if (port->p_m_dtmf)
+               ph_control(mISDNport, port, handle, DTMF_TONE_START, 0, "DSP-DTMF", 1);
+       if (port->p_m_crypt)
+               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);
 #else
        unsigned long handle;
 
        handle = mISDNport->b_addr[i];
-#endif
        port = mISDNport->b_port[i];
        if (!port)
        {
@@ -720,6 +785,7 @@ static void _bchannel_configure(struct mISDNport *mISDNport, int i)
                ph_control(mISDNport, port, handle, DTMF_TONE_START, 0, "DSP-DTMF", 1);
        if (port->p_m_crypt)
                ph_control_block(mISDNport, port, handle, BF_ENABLE_KEY, port->p_m_crypt_key, port->p_m_crypt_key_len, "DSP-CRYPT", port->p_m_crypt_key_len);
+#endif
 }
 
 /*
@@ -729,15 +795,14 @@ static void _bchannel_configure(struct mISDNport *mISDNport, int i)
 static void _bchannel_destroy(struct mISDNport *mISDNport, int i)
 {
 #ifdef SOCKET_MISDN
+       if (mISDNport->b_socket[i] < 0)
+               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_socket[i]);
        end_trace();
-       if (mISDNport->b_socket[i] > -1)
-       {
-               close(mISDNport->b_socket[i]);
-               mISDNport->b_socket[i] = -1;
-       }
+       close(mISDNport->b_socket[i]);
+       mISDNport->b_socket[i] = -1;
 #else
        unsigned char buff[1024];
 
@@ -1467,7 +1532,7 @@ on empty load, remote-audio causes the load with the remote audio to be increase
  */
 int PmISDN::handler(void)
 {
-       struct message *message;
+       struct lcr_msg *message;
        int elapsed = 0;
        int ret;
 
@@ -1548,20 +1613,23 @@ int PmISDN::handler(void)
                        }
 
                        /* send data */
+                       if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE)
+                       {
 #ifdef SOCKET_MISDN
-                       frm->prim = DL_DATA_REQ;
-                       frm->id = 0;
-                       ret = sendto(p_m_mISDNport->b_socket[p_m_b_index], buf, MISDN_HEADER_LEN+ISDN_LOAD-p_m_load-tosend, 0, NULL, 0);
-                       if (!ret)
-                               PERROR("Failed to send to socket %d\n", p_m_mISDNport->b_socket[p_m_b_index]);
+                               frm->prim = PH_DATA_REQ;
+                               frm->id = 0;
+                               ret = sendto(p_m_mISDNport->b_socket[p_m_b_index], buf, MISDN_HEADER_LEN+ISDN_LOAD-p_m_load-tosend, 0, NULL, 0);
+                               if (!ret)
+                                       PERROR("Failed to send to socket %d\n", p_m_mISDNport->b_socket[p_m_b_index]);
 #else
-                       frm->prim = DL_DATA | REQUEST; 
-                       frm->addr = p_m_mISDNport->b_addr[p_m_b_index] | FLG_MSG_DOWN;
-                       frm->dinfo = 0;
-                       frm->len = ISDN_LOAD - p_m_load - tosend;
-                       if (frm->len)
-                               mISDN_write(mISDNdevice, frm, mISDN_HEADER_LEN+frm->len, TIMEOUT_1SEC);
+                               frm->prim = DL_DATA | REQUEST; 
+                               frm->addr = p_m_mISDNport->b_addr[p_m_b_index] | FLG_MSG_DOWN;
+                               frm->dinfo = 0;
+                               frm->len = ISDN_LOAD - p_m_load - tosend;
+                               if (frm->len)
+                                       mISDN_write(mISDNdevice, frm, mISDN_HEADER_LEN+frm->len, TIMEOUT_1SEC);
 #endif
+                       }
                        p_m_load += ISDN_LOAD - p_m_load - tosend;
                }
        }
@@ -1603,7 +1671,7 @@ void PmISDN::bchannel_receive(iframe_t *frm)
 #endif
        unsigned char *data_temp;
        unsigned long length_temp;
-       struct message *message;
+       struct lcr_msg *message;
        unsigned char *p;
        int l;
 
@@ -1631,7 +1699,11 @@ void PmISDN::bchannel_receive(iframe_t *frm)
                }
                switch(cont)
                {
+#ifdef SOCKET_MISDN
+                       case DSP_BF_REJECT:
+#else
                        case BF_REJECT:
+#endif
                        chan_trace_header(p_m_mISDNport, this, "BCHANNEL control", DIRECTION_IN);
                        add_trace("DSP-CRYPT", NULL, "error");
                        end_trace();
@@ -1641,7 +1713,11 @@ void PmISDN::bchannel_receive(iframe_t *frm)
                        message_put(message);
                        break;
 
+#ifdef SOCKET_MISDN
+                       case DSP_BF_ACCEPT:
+#else
                        case BF_ACCEPT:
+#endif
                        chan_trace_header(p_m_mISDNport, this, "BCHANNEL control", DIRECTION_IN);
                        add_trace("DSP-CRYPT", NULL, "ok");
                        end_trace();
@@ -1670,7 +1746,11 @@ void PmISDN::bchannel_receive(iframe_t *frm)
 #endif
                {
 #ifndef OLD_MISDN
+#ifdef SOCKET_MISDN
+                       case DSP_TX_DATA:
+#else
                        case CMX_TX_DATA:
+#endif
                        if (!p_m_txdata)
                        {
                                /* if tx is off, it may happen that fifos send us pending informations, we just ignore them */
@@ -1776,7 +1856,7 @@ void PmISDN::set_echotest(int echo)
                if (p_m_b_channel)
                        if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE)
 #ifdef SOCKET_MISDN
-                               ph_control(p_m_mISDNport, this, p_m_mISDNport->b_socket[p_m_b_index], p_m_echo?CMX_ECHO_ON:CMX_ECHO_OFF, 0, "DSP-ECHO", p_m_echo);
+                               ph_control(p_m_mISDNport, this, p_m_mISDNport->b_socket[p_m_b_index], p_m_echo?DSP_ECHO_ON:DSP_ECHO_OFF, 0, "DSP-ECHO", p_m_echo);
 #else
                                ph_control(p_m_mISDNport, this, p_m_mISDNport->b_addr[p_m_b_index], p_m_echo?CMX_ECHO_ON:CMX_ECHO_OFF, 0, "DSP-ECHO", p_m_echo);
 #endif
@@ -1809,7 +1889,7 @@ void PmISDN::set_tone(char *dir, char *tone)
                {
                        PDEBUG(DEBUG_ISDN, "we reset tone from id=%d to OFF.\n", p_m_tone);
 #ifdef SOCKET_MISDN
-                       ph_control(p_m_mISDNport, this, p_m_mISDNport->b_socket[p_m_b_index], TONE_PATT_OFF, 0, "DSP-TONE", 0);
+                       ph_control(p_m_mISDNport, this, p_m_mISDNport->b_socket[p_m_b_index], DSP_TONE_PATT_OFF, 0, "DSP-TONE", 0);
 #else
                        ph_control(p_m_mISDNport, this, p_m_mISDNport->b_addr[p_m_b_index], TONE_PATT_OFF, 0, "DSP-TONE", 0);
 #endif
@@ -1895,7 +1975,7 @@ void PmISDN::set_tone(char *dir, char *tone)
                if (p_m_b_index > -1)
                if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE)
 #ifdef SOCKET_MISDN
-                       ph_control(p_m_mISDNport, this, p_m_mISDNport->b_socket[p_m_b_index], p_m_tone?TONE_PATT_ON:TONE_PATT_OFF, p_m_tone, "DSP-TONE", p_m_tone);
+                       ph_control(p_m_mISDNport, this, p_m_mISDNport->b_socket[p_m_b_index], p_m_tone?DSP_TONE_PATT_ON:DSP_TONE_PATT_OFF, p_m_tone, "DSP-TONE", p_m_tone);
 #else
                        ph_control(p_m_mISDNport, this, p_m_mISDNport->b_addr[p_m_b_index], p_m_tone?TONE_PATT_ON:TONE_PATT_OFF, p_m_tone, "DSP-TONE", p_m_tone);
 #endif
@@ -1906,7 +1986,7 @@ void PmISDN::set_tone(char *dir, char *tone)
 
 
 /* MESSAGE_mISDNSIGNAL */
-//extern struct message *dddebug;
+//extern struct lcr_msg *dddebug;
 void PmISDN::message_mISDNsignal(unsigned long epoint_id, int message_id, union parameter *param)
 {
        switch(param->mISDNsignal.message)
@@ -1919,7 +1999,7 @@ void PmISDN::message_mISDNsignal(unsigned long epoint_id, int message_id, union
                        if (p_m_b_index > -1)
                        if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE)
 #ifdef SOCKET_MISDN
-                               ph_control(p_m_mISDNport, this, p_m_mISDNport->b_socket[p_m_b_index], VOL_CHANGE_TX, p_m_tx_gain, "DSP-TX_GAIN", p_m_tx_gain);
+                               ph_control(p_m_mISDNport, this, p_m_mISDNport->b_socket[p_m_b_index], DSP_VOL_CHANGE_TX, p_m_tx_gain, "DSP-TX_GAIN", p_m_tx_gain);
 #else
                                ph_control(p_m_mISDNport, this, p_m_mISDNport->b_addr[p_m_b_index], VOL_CHANGE_TX, p_m_tx_gain, "DSP-TX_GAIN", p_m_tx_gain);
 #endif
@@ -1932,7 +2012,7 @@ void PmISDN::message_mISDNsignal(unsigned long epoint_id, int message_id, union
                        if (p_m_b_index > -1)
                        if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE)
 #ifdef SOCKET_MISDN
-                               ph_control(p_m_mISDNport, this, p_m_mISDNport->b_socket[p_m_b_index], VOL_CHANGE_RX, p_m_rx_gain, "DSP-RX_GAIN", p_m_rx_gain);
+                               ph_control(p_m_mISDNport, this, p_m_mISDNport->b_socket[p_m_b_index], DSP_VOL_CHANGE_RX, p_m_rx_gain, "DSP-RX_GAIN", p_m_rx_gain);
 #else
                                ph_control(p_m_mISDNport, this, p_m_mISDNport->b_addr[p_m_b_index], VOL_CHANGE_RX, p_m_rx_gain, "DSP-RX_GAIN", p_m_rx_gain);
 #endif
@@ -1950,7 +2030,7 @@ void PmISDN::message_mISDNsignal(unsigned long epoint_id, int message_id, union
                        if (p_m_b_index > -1)
                        if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE)
 #ifdef SOCKET_MISDN
-                               ph_control(p_m_mISDNport, this, p_m_mISDNport->b_socket[p_m_b_index], (p_m_conf)?CMX_CONF_JOIN:CMX_CONF_SPLIT, p_m_conf, "DSP-CONF", p_m_conf);
+                               ph_control(p_m_mISDNport, this, p_m_mISDNport->b_socket[p_m_b_index], (p_m_conf)?DSP_CONF_JOIN:DSP_CONF_SPLIT, p_m_conf, "DSP-CONF", p_m_conf);
 #else
                                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);
 #endif
@@ -1979,7 +2059,7 @@ void PmISDN::message_mISDNsignal(unsigned long epoint_id, int message_id, union
                        if (p_m_b_index > -1)
                        if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE)
 #ifdef SOCKET_MISDN
-                               ph_control(p_m_mISDNport, this, p_m_mISDNport->b_socket[p_m_b_index], p_m_delay?CMX_DELAY:CMX_JITTER, p_m_delay, "DSP-DELAY", p_m_delay);
+                               ph_control(p_m_mISDNport, this, p_m_mISDNport->b_socket[p_m_b_index], p_m_delay?DSP_DELAY:DSP_JITTER, p_m_delay, "DSP-DELAY", p_m_delay);
 #else
                                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);
 #endif
@@ -1996,7 +2076,7 @@ void PmISDN::message_mISDNsignal(unsigned long epoint_id, int message_id, union
 /* MESSAGE_CRYPT */
 void PmISDN::message_crypt(unsigned long epoint_id, int message_id, union parameter *param)
 {
-       struct message *message;
+       struct lcr_msg *message;
 
        switch(param->crypt.type)
        {
@@ -2017,7 +2097,7 @@ void PmISDN::message_crypt(unsigned long epoint_id, int message_id, union parame
                if (p_m_b_index > -1)
                if (p_m_mISDNport->b_state[p_m_b_index] == B_STATE_ACTIVE)
 #ifdef SOCKET_MISDN
-                       ph_control_block(p_m_mISDNport, this, p_m_mISDNport->b_socket[p_m_b_index], p_m_crypt?BF_ENABLE_KEY:BF_DISABLE, p_m_crypt_key, p_m_crypt_key_len, "DSP-CRYPT", p_m_crypt_key_len);
+                       ph_control_block(p_m_mISDNport, this, p_m_mISDNport->b_socket[p_m_b_index], 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);
 #else
                        ph_control_block(p_m_mISDNport, this, p_m_mISDNport->b_addr[p_m_b_index], p_m_crypt?BF_ENABLE_KEY:BF_DISABLE, p_m_crypt_key, p_m_crypt_key_len, "DSP-CRYPT", p_m_crypt_key_len);
 #endif
@@ -2052,7 +2132,7 @@ void PmISDN::message_crypt(unsigned long epoint_id, int message_id, union parame
                {
                        PDEBUG(DEBUG_BCHANNEL, "for sending CR_MESSAGE_REQ, we reset txmix from txmix=%d.\n", p_m_txmix);
 #ifdef SOCKET_MISDN
-                       ph_control(p_m_mISDNport, this, p_mISDNport->b_socket[p_m_b_index], CMX_MIX_OFF, 0, "DSP-TXMIX", 0);
+                       ph_control(p_m_mISDNport, this, p_mISDNport->b_socket[p_m_b_index], DSP_MIX_OFF, 0, "DSP-TXMIX", 0);
 #else
                        ph_control(p_m_mISDNport, this, p_mISDNport->b_addr[p_m_b_index], CMX_MIX_OFF, 0, "DSP-TXMIX", 0);
 #endif
@@ -2107,6 +2187,8 @@ int mISDN_handler(void)
        int i;
        unsigned char buffer[2048+MISDN_HEADER_LEN];
        struct mISDNhead *hh = (struct mISDNhead *)buffer;
+       struct mbuffer *mb;
+       struct l3_msg *l3m;
 
        /* process all ports */
        mISDNport = mISDNport_first;
@@ -2134,9 +2216,9 @@ int mISDN_handler(void)
                                        {
                                                /* turn on RX */
                                                isdnport->p_m_rxoff = 0;
-                                               PDEBUG(DEBUG_BCHANNEL, "%s: receive data is required, so we turn them on\n");
+                                               PDEBUG(DEBUG_BCHANNEL, "%s: receive data is required, so we turn them on\n", __FUNCTION__);
                                                if (mISDNport->b_port[i] && mISDNport->b_state[i] == B_STATE_ACTIVE)
-                                                       ph_control(mISDNport, isdnport, mISDNport->b_socket[isdnport->p_m_b_index], CMX_RECEIVE_ON, 0, "DSP-RXOFF", 0);
+                                                       ph_control(mISDNport, isdnport, mISDNport->b_socket[isdnport->p_m_b_index], DSP_RECEIVE_ON, 0, "DSP-RXOFF", 0);
                                                return(1);
                                        }
                                } else
@@ -2146,9 +2228,9 @@ int mISDN_handler(void)
                                        {
                                                /* turn off RX */
                                                isdnport->p_m_rxoff = 1;
-                                               PDEBUG(DEBUG_BCHANNEL, "%s: receive data is not required, so we turn them off\n");
+                                               PDEBUG(DEBUG_BCHANNEL, "%s: receive data is not required, so we turn them off\n", __FUNCTION__);
                                                if (mISDNport->b_port[i] && mISDNport->b_state[i] == B_STATE_ACTIVE)
-                                                       ph_control(mISDNport, isdnport, mISDNport->b_socket[isdnport->p_m_b_index], CMX_RECEIVE_OFF, 0, "DSP-RXOFF", 1);
+                                                       ph_control(mISDNport, isdnport, mISDNport->b_socket[isdnport->p_m_b_index], DSP_RECEIVE_OFF, 0, "DSP-RXOFF", 1);
                                                return(1);
                                        }
                                }
@@ -2160,9 +2242,9 @@ int mISDN_handler(void)
                                        {
                                                /* turn on RX */
                                                isdnport->p_m_txdata = 1;
-                                               PDEBUG(DEBUG_BCHANNEL, "%s: transmit data is required, so we turn them on\n");
+                                               PDEBUG(DEBUG_BCHANNEL, "%s: transmit data is required, so we turn them on\n", __FUNCTION__);
                                                if (mISDNport->b_port[i] && mISDNport->b_state[i] == B_STATE_ACTIVE)
-                                                       ph_control(mISDNport, isdnport, mISDNport->b_socket[isdnport->p_m_b_index], CMX_TXDATA_ON, 0, "DSP-TXDATA", 1);
+                                                       ph_control(mISDNport, isdnport, mISDNport->b_socket[isdnport->p_m_b_index], DSP_TXDATA_ON, 0, "DSP-TXDATA", 1);
                                                return(1);
                                        }
                                } else
@@ -2172,9 +2254,9 @@ int mISDN_handler(void)
                                        {
                                                /* turn off RX */
                                                isdnport->p_m_txdata = 0;
-                                               PDEBUG(DEBUG_BCHANNEL, "%s: transmit data is not required, so we turn them off\n");
+                                               PDEBUG(DEBUG_BCHANNEL, "%s: transmit data is not required, so we turn them off\n", __FUNCTION__);
                                                if (mISDNport->b_port[i] && mISDNport->b_state[i] == B_STATE_ACTIVE)
-                                                       ph_control(mISDNport, isdnport, mISDNport->b_socket[isdnport->p_m_b_index], CMX_TXDATA_OFF, 0, "DSP-TXDATA", 0);
+                                                       ph_control(mISDNport, isdnport, mISDNport->b_socket[isdnport->p_m_b_index], DSP_TXDATA_OFF, 0, "DSP-TXDATA", 0);
                                                return(1);
                                        }
                                }
@@ -2231,6 +2313,92 @@ int mISDN_handler(void)
                        
                        i++;
                }
+
+               /* handle queued up-messages (d-channel) */
+               while ((mb = mdequeue(&mISDNport->upqueue)))
+               {
+                       l3m = &mb->l3;
+                       switch(l3m->type)
+                       {
+                               case MPH_ACTIVATE_IND:
+                               l1l2l3_trace_header(mISDNport, NULL, L1_ACTIVATE_IND, DIRECTION_IN);
+                               end_trace();
+                               mISDNport->l1link = 1;
+                               break;
+       
+                               case MPH_DEACTIVATE_IND:
+                               l1l2l3_trace_header(mISDNport, NULL, L1_DEACTIVATE_IND, DIRECTION_IN);
+                               end_trace();
+                               mISDNport->l1link = 0;
+                               break;
+
+                               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 MT_L2ESTABLISH:
+                               l1l2l3_trace_header(mISDNport, NULL, L2_ESTABLISH_IND, DIRECTION_IN);
+                               end_trace();
+                               if ((!mISDNport->ntmode || mISDNport->ptp) && l3m->pid < 127)
+                               {
+                                       if (mISDNport->l2establish)
+                                       {
+                                               mISDNport->l2establish = 0;
+                                               PDEBUG(DEBUG_ISDN, "the link became active before l2establish timer expiry.\n");
+                                       }
+                                       mISDNport->l2link = 1;
+                               }
+                               break;
+
+                               case MT_L2RELEASE:
+                               l1l2l3_trace_header(mISDNport, NULL, L2_RELEASE_IND, DIRECTION_IN);
+                               end_trace();
+                               if ((!mISDNport->ntmode || mISDNport->ptp) && l3m->pid < 127)
+                               {
+                                       mISDNport->l2link = 0;
+                                       if (mISDNport->l2hold)
+                                       {
+                                               time(&mISDNport->l2establish);
+                                               PDEBUG(DEBUG_ISDN, "because we are ptp, we set a l2establish timer.\n");
+                                       }
+                               }
+                               break;
+
+                               default:
+                               /* l3-data is sent to LCR */
+                               stack2manager(mISDNport, l3m->type, l3m->pid, l3m);
+                       }
+                       /* free message */
+                       free_l3_msg(l3m);
+               }
+
 #if 0
                if (mISDNport->l1timeout && now>mISDNport->l1timeout)
                { ---}
@@ -2243,13 +2411,17 @@ int mISDN_handler(void)
                {
                        if (now-mISDNport->l2establish > 5)
                        {
+                               mISDNport->l2establish = 0;
+                               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);
-#warning SOCKET TBD
-//                             mISDNport->ml3->to_layer2(mISDNport->ml3, DL_ESTABLISH_REQ);
-//                             l1l2l3_trace_header(mISDNport, NULL, L2_ESTABLISH_REQ, DIRECTION_OUT);
-//                             end_trace();
-                               return(1);
+                                       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);
+                                       l1l2l3_trace_header(mISDNport, NULL, L2_ESTABLISH_REQ, DIRECTION_OUT);
+                                       end_trace();
+                                       time(&mISDNport->l2establish);
+                                       return(1);
+                               }
                        }
                }
 
@@ -2299,7 +2471,7 @@ int mISDN_handler(void)
                                        {
                                                /* turn on RX */
                                                isdnport->p_m_rxoff = 0;
-                                               PDEBUG(DEBUG_BCHANNEL, "%s: receive data is required, so we turn them on\n");
+                                               PDEBUG(DEBUG_BCHANNEL, "%s: receive data is required, so we turn them on\n", __FUNCTION__);
                                                if (mISDNport->b_port[i] && mISDNport->b_state[i] == B_STATE_ACTIVE)
                                                        ph_control(mISDNport, isdnport, mISDNport->b_addr[isdnport->p_m_b_index], CMX_RECEIVE_ON, 0, "DSP-RXOFF", 0);
                                                return(1);
@@ -2311,7 +2483,7 @@ int mISDN_handler(void)
                                        {
                                                /* turn off RX */
                                                isdnport->p_m_rxoff = 1;
-                                               PDEBUG(DEBUG_BCHANNEL, "%s: receive data is not required, so we turn them off\n");
+                                               PDEBUG(DEBUG_BCHANNEL, "%s: receive data is not required, so we turn them off\n", __FUNCTION__);
                                                if (mISDNport->b_port[i] && mISDNport->b_state[i] == B_STATE_ACTIVE)
                                                        ph_control(mISDNport, isdnport, mISDNport->b_addr[isdnport->p_m_b_index], CMX_RECEIVE_OFF, 0, "DSP-RXOFF", 1);
                                                return(1);
@@ -2325,7 +2497,7 @@ int mISDN_handler(void)
                                        {
                                                /* turn on RX */
                                                isdnport->p_m_txdata = 1;
-                                               PDEBUG(DEBUG_BCHANNEL, "%s: transmit data is required, so we turn them on\n");
+                                               PDEBUG(DEBUG_BCHANNEL, "%s: transmit data is required, so we turn them on\n", __FUNCTION__);
 #ifndef OLD_MISDN
                                                if (mISDNport->b_port[i] && mISDNport->b_state[i] == B_STATE_ACTIVE)
                                                        ph_control(mISDNport, isdnport, mISDNport->b_addr[isdnport->p_m_b_index], CMX_TXDATA_ON, 0, "DSP-TXDATA", 1);
@@ -2339,7 +2511,7 @@ int mISDN_handler(void)
                                        {
                                                /* turn off RX */
                                                isdnport->p_m_txdata = 0;
-                                               PDEBUG(DEBUG_BCHANNEL, "%s: transmit data is not required, so we turn them off\n");
+                                               PDEBUG(DEBUG_BCHANNEL, "%s: transmit data is not required, so we turn them off\n", __FUNCTION__);
 #ifndef OLD_MISDN
                                                if (mISDNport->b_port[i] && mISDNport->b_state[i] == B_STATE_ACTIVE)
                                                        ph_control(mISDNport, isdnport, mISDNport->b_addr[isdnport->p_m_b_index], CMX_TXDATA_OFF, 0, "DSP-TXDATA", 0);
@@ -2361,29 +2533,34 @@ int mISDN_handler(void)
                {
                        if (now-mISDNport->l2establish > 5)
                        {
-                               if (mISDNport->ntmode)
+                               mISDNport->l2establish = 0;
+                               if (mISDNport->l2hold && (mISDNport->ptp || !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 {
-                                       iframe_t act;
-
-                                       PDEBUG(DEBUG_ISDN, "the L2 establish timer expired, we try to establish the link TE portnum=%d.\n", mISDNport->portnum);
+                                       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 {
+                                               iframe_t act;
+
+                                               PDEBUG(DEBUG_ISDN, "the L2 establish timer expired, we try to establish the link TE portnum=%d.\n", mISDNport->portnum);
+                                               time(&mISDNport->l2establish);
+                                               /* establish */
+                                               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);
+                                       }
+                                       l1l2l3_trace_header(mISDNport, NULL, L2_ESTABLISH_REQ, DIRECTION_OUT);
+                                       end_trace();
                                        time(&mISDNport->l2establish);
-                                       /* establish */
-                                       act.prim = DL_ESTABLISH | REQUEST; 
-                                       act.addr = (mISDNport->upper_id & ~LAYER_ID_MASK) | 3 | FLG_MSG_DOWN;
-                                       act.dinfo = 0;
-                                       act.len = 0;
-                                       mISDN_write(mISDNdevice, &act, mISDN_HEADER_LEN+act.len, TIMEOUT_1SEC);
+                                       return(1);
                                }
-                               l1l2l3_trace_header(mISDNport, NULL, L2_ESTABLISH_REQ, DIRECTION_OUT);
-                               end_trace();
-                               return(1);
                        }
                }
                if ((dmsg = msg_dequeue(&mISDNport->downqueue)))
@@ -2577,12 +2754,15 @@ int mISDN_handler(void)
                        end_trace();
                        if (!mISDNport->ntmode) break; /* !!!!!!!!!!!!!!!! */
                        ss_estab:
-                       if (mISDNport->l2establish)
+                       if (!mISDNport->ntmode || mISDNport->ptp)
                        {
-                               mISDNport->l2establish = 0;
-                               PDEBUG(DEBUG_ISDN, "the link became active before l2establish timer expiry.\n");
+                               if (mISDNport->l2establish)
+                               {
+                                       mISDNport->l2establish = 0;
+                                       PDEBUG(DEBUG_ISDN, "the link became active before l2establish timer expiry.\n");
+                               }
+                               mISDNport->l2link = 1;
                        }
-                       mISDNport->l2link = 1;
                        break;
 
                        case DL_RELEASE | INDICATION:
@@ -2591,11 +2771,14 @@ int mISDN_handler(void)
                        end_trace();
                        if (!mISDNport->ntmode) break; /* !!!!!!!!!!!!!!!! */
                        ss_rel:
-                       mISDNport->l2link = 0;
-                       if (mISDNport->ptp)
+                       if (!mISDNport->ntmode || mISDNport->ptp)
                        {
-                               time(&mISDNport->l2establish);
-                               PDEBUG(DEBUG_ISDN, "because we are ptp, we set a l2establish timer.\n");
+                               mISDNport->l2link = 0;
+                               if (mISDNport->l2hold)
+                               {
+                                       time(&mISDNport->l2establish);
+                                       PDEBUG(DEBUG_ISDN, "because we are ptp, we set a l2establish timer.\n");
+                               }
                        }
                        break;
 
@@ -2714,10 +2897,11 @@ int do_layer3(struct mlayer3 *ml3, unsigned int cmd, unsigned int pid, struct l3
 {
        /* IMPORTAINT:
         *
-        * l3m must be freed, except for MT_ASSIGN
+        * l3m must be queued, except for MT_ASSIGN
         *
         */
        struct mISDNport *mISDNport = (struct mISDNport *)ml3->priv;
+       struct mbuffer *mb;
 
        /* special MT_ASSIGN handling:
         *
@@ -2729,116 +2913,36 @@ int do_layer3(struct mlayer3 *ml3, unsigned int cmd, unsigned int pid, struct l3
         * we must check if we get a reply and we know that we lcr is currently
         * locked.
         */
-       if (cmd == MT_ASSIGN)
+       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");
-               if ((pid >> 16) != MISDN_CES_MASTER)
-                       FATAL("someone played with the mISDNuser stack. MT_ASSIGN is expected with master CES.\n");
                mt_assign_pid = pid;
                return(0);
        }
        
-       /* lock LCR */
-       pthread_mutex_lock(&mutex_lcr);
-
-       /* d-message */
-       switch(cmd)
-       {
-#warning SOCKET TBD
-#if 0
-               case MGR_SHORTSTATUS_IND:
-               case MGR_SHORTSTATUS_CNF:
-               switch(frm->dinfo) {
-                       case SSTATUS_L1_ACTIVATED:
-                       l1l2l3_trace_header(mISDNport, NULL, L1_ACTIVATE_IND, DIRECTION_IN);
-                       end_trace();
-                       goto ss_act;
-                       case SSTATUS_L1_DEACTIVATED:
-                       l1l2l3_trace_header(mISDNport, NULL, L1_DEACTIVATE_IND, DIRECTION_IN);
-                       end_trace();
-                       goto ss_deact;
-                       case SSTATUS_L2_ESTABLISHED:
-                       l1l2l3_trace_header(mISDNport, NULL, L2_ESTABLISH_IND, DIRECTION_IN);
-                       end_trace();
-                       goto ss_estab;
-                       case SSTATUS_L2_RELEASED:
-                       l1l2l3_trace_header(mISDNport, NULL, L2_RELEASE_IND, DIRECTION_IN);
-                       end_trace();
-                       goto ss_rel;
-               }
-               break;
-#endif
-
-#warning SOCKET TBD
-#if 0
-               case MT_L1ACTIVATE:
-               l1l2l3_trace_header(mISDNport, NULL, L1_ACTIVATE_IND, DIRECTION_IN);
-               end_trace();
-//             ss_act:
-               mISDNport->l1link = 1;
-               break;
-
-               case MT_L1DEACTIVATE:
-               l1l2l3_trace_header(mISDNport, NULL, L1_DEACTIVATE_IND, DIRECTION_IN);
-               end_trace();
-//             ss_deact:
-               mISDNport->l1link = 0;
-               break;
-
-               case MT_L1CONTROL:
-               PDEBUG(DEBUG_ISDN, "Received PH_CONTROL for port %d (%s).\n", mISDNport->portnum, mISDNport->ifport->interface->name);
-               // special config commands for interface (ip-address/LOS/AIS/RDI/SLIP)
-               break;
-#endif
-
-               case MT_L2ESTABLISH:
-               l1l2l3_trace_header(mISDNport, NULL, L2_ESTABLISH_IND, DIRECTION_IN);
-               end_trace();
-//             ss_estab:
-               if (mISDNport->l2establish)
-               {
-                       mISDNport->l2establish = 0;
-                       PDEBUG(DEBUG_ISDN, "the link became active before l2establish timer expiry.\n");
-               }
-               mISDNport->l2link = 1;
-               break;
-
-               case MT_L2RELEASE:
-               l1l2l3_trace_header(mISDNport, NULL, L2_RELEASE_IND, DIRECTION_IN);
-               end_trace();
-//             ss_rel:
-               mISDNport->l2link = 0;
-               if (mISDNport->ptp)
-               {
-                       time(&mISDNport->l2establish);
-                       PDEBUG(DEBUG_ISDN, "because we are ptp, we set a l2establish timer.\n");
-               }
-               break;
-
-               default:
-               /* l3-data is sent to LCR */
-               stack2manager(mISDNport, cmd, pid, l3m);
-       }
-
-       /* free message */
-       if (l3m)
-               free_l3_msg(l3m);
-
-       /* unlock LCR */
-       pthread_mutex_unlock(&mutex_lcr);
-
-       return(0);
-
+       /* 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);
+       return 0;
 }
+
 #endif
 
 
 /*
  * global function to add a new card (port)
  */
-struct mISDNport *mISDNport_open(int port, int ptp, int ptmp, int force_nt, struct interface *interface)
+struct mISDNport *mISDNport_open(int port, int ptp, int force_nt, int l2hold, struct interface *interface)
 {
        int ret;
        struct mISDNport *mISDNport, **mISDNportp;
@@ -2884,7 +2988,7 @@ struct mISDNport *mISDNport_open(int port, int ptp, int ptmp, int force_nt, stru
 #ifdef SOCKET_MISDN
        devinfo.id = port - 1;
        ret = ioctl(mISDNsocket, IMGETDEVINFO, &devinfo);
-       if (ret <= 0)
+       if (ret < 0)
        {
                PERROR_RUNTIME("Cannot get device information for port %d. (ioctl IMGETDEVINFO failed ret=%d)\n", i, ret);
                return(NULL);
@@ -2900,20 +3004,16 @@ struct mISDNport *mISDNport_open(int port, int ptp, int ptmp, int force_nt, stru
                bri = 1;
                nt = 1;
        }
-#ifdef ISDN_P_TE_E1
        if (devinfo.Dprotocols & (1 << ISDN_P_TE_E1))
        {
                pri = 1;
                te = 1;
        }
-#endif
-#ifdef ISDN_P_NT_E1
        if (devinfo.Dprotocols & (1 << ISDN_P_NT_E1))
        {
                pri = 1;
                nt = 1;
        }
-#endif
 #ifdef ISDN_P_FXS
        if (devinfo.Dprotocols & (1 << ISDN_P_FXS))
        {
@@ -2930,7 +3030,7 @@ struct mISDNport *mISDNport_open(int port, int ptp, int ptmp, int force_nt, stru
 #endif
        if (force_nt && !nt)
        {
-               PERROR_RUNTIME("Port %d does not support NT-mode.\n", port);
+               PERROR_RUNTIME("Port %d does not support NT-mode\n", port);
                return(NULL);
        }
        if (bri && pri)
@@ -2953,7 +3053,7 @@ struct mISDNport *mISDNport_open(int port, int ptp, int ptmp, int force_nt, stru
                PERROR_RUNTIME("Port %d does not support NT-mode nor TE-mode!\n", port);
                return(NULL);
        }
-       /* force nt, by turning off TE */
+       /* 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 */
@@ -3048,24 +3148,55 @@ struct mISDNport *mISDNport_open(int port, int ptp, int ptmp, int force_nt, stru
        pmemuse++;
        *mISDNportp = mISDNport;
 
+       /* if pri, must set PTP */
+       if (pri)
+               ptp = 1;
+       
+       /* 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 */
 #ifdef SOCKET_MISDN
-       /* open layer 3 */
-       protocol = (nt)?L3_PROTOCOL_DSS1_USER:L3_PROTOCOL_DSS1_NET;
-       prop = 0;
+       /* open layer 3 and init upqueue */
+       protocol = (nt)?L3_PROTOCOL_DSS1_NET:L3_PROTOCOL_DSS1_USER;
+       prop = (1 << MISDN_FLG_L2_CLEAN);
        if (ptp) // ptp forced
-              prop |= MISDN_FLG_PTP;
-#warning SOCKET TBD
-#if 0
-       if (ptmp && pri) // ptmp forced
-              prop |= FLG_FORCE_PTMP;
-#endif
+              prop |= (1 << MISDN_FLG_PTP);
        if (nt) // supports hold/retrieve on nt-mode
-              prop |= MISDN_FLG_NET_HOLD;
+              prop |= (1 << MISDN_FLG_NET_HOLD);
+       if (l2hold) // supports layer 2 hold
+              prop |= (1 << MISDN_FLG_L2_HOLD);
+       /* queue must be initializes, because l3-thread may send messages during open_layer3() */
+       mqueue_init(&mISDNport->upqueue);
        mISDNport->ml3 = open_layer3(port-1, protocol, prop , do_layer3, mISDNport);
        if (!mISDNport->ml3)
        {
-               PERROR_RUNTIME("Cannot get layer(%d) id of port %d\n", nt?2:4, port);
+               mqueue_purge(&mISDNport->upqueue);
+               PERROR_RUNTIME("open_layer3() failed for port %d\n", port);
+               start_trace(port,
+                       interface,
+                       NULL,
+                       NULL,
+                       DIRECTION_NONE,
+                       CATEGORY_CH,
+                       0,
+                       "PORT (open failed)");
+               end_trace();
+               mISDNport_close(mISDNport);
                return(NULL);
        }
 
@@ -3091,16 +3222,6 @@ struct mISDNport *mISDNport_open(int port, int ptp, int ptmp, int force_nt, stru
        msg_queue_init(&mISDNport->downqueue);
        mISDNport->d_stid = stinf->id;
        PDEBUG(DEBUG_ISDN, "d_stid = 0x%x.\n", mISDNport->d_stid);
-       if ((stinf->pid.protocol[2]&ISDN_PID_L2_DF_PTP) || (nt&&ptp) || pri)
-       {
-               PDEBUG(DEBUG_ISDN, "Port is point-to-point.\n");
-               ptp = 1;
-               if (ptmp && nt)
-               {
-                       PDEBUG(DEBUG_ISDN, "Port is forced to point-to-multipoint.\n");
-                       ptp = 0;
-               }
-       }
 
        /* create layer intance */
        memset(&li, 0, sizeof(li));
@@ -3196,6 +3317,7 @@ struct mISDNport *mISDNport_open(int port, int ptp, int ptmp, int force_nt, stru
        mISDNport->ntmode = nt;
        mISDNport->pri = pri;
        mISDNport->ptp = ptp;
+       mISDNport->l2hold = l2hold;
        PDEBUG(DEBUG_ISDN, "Port has %d b-channels.\n", mISDNport->b_num);
        i = 0;
        while(i < mISDNport->b_num)
@@ -3212,12 +3334,11 @@ struct mISDNport *mISDNport_open(int port, int ptp, int ptmp, int force_nt, stru
 
 #ifdef SOCKET_MISDN
        /* if ptp, pull up the link */
-       if (mISDNport->ptp)
+       if (mISDNport->l2hold && (mISDNport->ptp || !mISDNport->ntmode))
        {
-#warning SOCKET TBD
-//             mISDNport->ml3->to_layer2(mISDNport->ml3, DL_ESTABLISH_REQ);
-//             l1l2l3_trace_header(mISDNport, NULL, L2_ESTABLISH_REQ, DIRECTION_OUT);
-//             end_trace();
+               mISDNport->ml3->to_layer3(mISDNport->ml3, MT_L2ESTABLISH, 0, NULL);
+               l1l2l3_trace_header(mISDNport, NULL, L2_ESTABLISH_REQ, DIRECTION_OUT);
+               end_trace();
                time(&mISDNport->l2establish);
        }
 #else
@@ -3232,10 +3353,9 @@ struct mISDNport *mISDNport_open(int port, int ptp, int ptmp, int force_nt, stru
                act.dinfo = SSTATUS_BROADCAST_BIT | SSTATUS_ALL;
                act.len = 0;
                mISDN_write(mISDNdevice, &act, mISDN_HEADER_LEN+act.len, TIMEOUT_1SEC);
-               time(&mISDNport->l2establish);
        }
        /* if ptp AND te-mode, pull up the link */
-       if (mISDNport->ptp && !mISDNport->ntmode)
+       if (mISDNport->l2hold && !mISDNport->ntmode)
        {
                iframe_t act;
                /* L2 */
@@ -3244,13 +3364,13 @@ struct mISDNport *mISDNport_open(int port, int ptp, int ptmp, int force_nt, stru
                act.dinfo = 0;
                act.len = 0;
                mISDN_write(mISDNdevice, &act, mISDN_HEADER_LEN+act.len, TIMEOUT_1SEC);
-               time(&mISDNport->l2establish);
 
                l1l2l3_trace_header(mISDNport, NULL, L2_ESTABLISH_REQ, DIRECTION_OUT);
                end_trace();
+               time(&mISDNport->l2establish);
        }
        /* if ptp AND nt-mode, pull up the link */
-       if (mISDNport->ptp && mISDNport->ntmode)
+       if (mISDNport->l2hold && mISDNport->ntmode && mISDNport->ptp)
        {
                msg_t *dmsg;
                /* L2 */
@@ -3259,8 +3379,10 @@ struct mISDNport *mISDNport_open(int port, int ptp, int ptmp, int force_nt, stru
                        free_msg(dmsg);
                l1l2l3_trace_header(mISDNport, NULL, L2_ESTABLISH_REQ, DIRECTION_OUT);
                end_trace();
+               time(&mISDNport->l2establish);
        }
 #endif
+
        /* initially, we assume that the link is down, exept for nt-ptmp */
        mISDNport->l2link = (mISDNport->ntmode && !mISDNport->ptp)?1:0;
 
@@ -3274,6 +3396,7 @@ struct mISDNport *mISDNport_open(int port, int ptp, int ptmp, int force_nt, stru
                    CATEGORY_CH,
                    0,
                    "PORT (open)");
+       add_trace("mode", NULL, (mISDNport->ntmode)?"network":"terminal");
        add_trace("channels", NULL, "%d", mISDNport->b_num);
        end_trace();
        return(mISDNport);
@@ -3352,7 +3475,12 @@ void mISDNport_close(struct mISDNport *mISDNport)
        }
 
 #ifdef SOCKET_MISDN
-       close_layer3(mISDNport->ml3);
+       /* close layer 3, if open and purge upqueue */
+       if (mISDNport->ml3)
+       {
+               close_layer3(mISDNport->ml3);
+               mqueue_purge(&mISDNport->upqueue);
+       }
 #else
        /* free ressources of port */
        msg_queue_purge(&mISDNport->downqueue);
@@ -3466,7 +3594,7 @@ void mISDN_port_info(void)
 #ifdef SOCKET_MISDN
                devinfo.id = i - 1;
                ret = ioctl(sock, IMGETDEVINFO, &devinfo);
-               if (ret <= 0)
+               if (ret < 0)
                {
                        fprintf(stderr, "Cannot get device information for port %d. (ioctl IMGETDEVINFO failed ret=%d)\n", i, ret);
                        break;
@@ -3484,20 +3612,16 @@ void mISDN_port_info(void)
                        bri = 1;
                        nt = 1;
                }
-#ifdef ISDN_P_TE_E1
                if (devinfo.Dprotocols & (1 << ISDN_P_TE_E1))
                {
                        pri = 1;
                        te = 1;
                }
-#endif
-#ifdef ISDN_P_NT_E1
                if (devinfo.Dprotocols & (1 << ISDN_P_NT_E1))
                {
                        pri = 1;
                        nt = 1;
                }
-#endif
 #ifdef ISDN_P_FXS
                if (devinfo.Dprotocols & (1 << ISDN_P_FXS))
                {
@@ -3515,18 +3639,24 @@ void mISDN_port_info(void)
                if ((te || nt) && (bri || pri || pots))
                        useable = 1;
 
-               if (te && bri)
-                       printf("TE-mode BRI S/T interface line (for phone lines)");
-               if (nt && bri)
-                       printf("NT-mode BRI S/T interface port (for phones)");
-               if (te && pri)
-                       printf("TE-mode PRI E1  interface line (for phone lines)");
-               if (nt && pri)
-                       printf("NT-mode PRI E1  interface port (for E1 terminals)");
-               if (te && pots)
-                       printf("FXS     POTS    interface port (for analog lines)");
-               if (nt && pots)
-                       printf("FXO     POTS    interface port (for analog phones)");
+               if (te && nt && bri)
+                       printf("TE/NT-mode BRI S/T (for phone lines & phones)");
+               if (te && !nt && bri)
+                       printf("TE-mode    BRI S/T (for phone lines)");
+               if (nt && !te && bri)
+                       printf("NT-mode    BRI S/T (for phones)");
+               if (te && nt && pri)
+                       printf("TE/NT-mode PRI E1  (for phone lines & E1 devices)");
+               if (te && !nt && pri)
+                       printf("TE-mode    PRI E1  (for phone lines)");
+               if (nt && !te && pri)
+                       printf("NT-mode    PRI E1  (for E1 devices)");
+               if (te && nt && pots)
+                       printf("FXS/FXO    POTS    (for analog lines & phones)");
+               if (te && !nt && pots)
+                       printf("FXS        POTS    (for analog lines)");
+               if (nt && !te && pots)
+                       printf("FXO        POTS    (for analog phones)");
                if (pots)
                {
                        useable = 0;
@@ -3574,7 +3704,7 @@ void mISDN_port_info(void)
                        useable = 1;
                        nt = 1;
                        pri = 1;
-                       printf("NT-mode PRI E1  interface port (for E1 terminals)");
+                       printf("NT-mode PRI E1  interface port (for E1 devices)");
                        break;
                        default:
                        useable = 0;
@@ -3686,7 +3816,7 @@ void PmISDN::txfromup(unsigned char *data, int length)
 
        if (p_m_b_index < 0)
                return;
-       if (!p_m_mISDNport->b_socket[p_m_b_index])
+       if (p_m_mISDNport->b_state[p_m_b_index] != B_STATE_ACTIVE)
                return;
 #else
        unsigned char buf[mISDN_HEADER_LEN+((length>ISDN_LOAD)?length:ISDN_LOAD)];
@@ -3711,9 +3841,9 @@ void PmISDN::txfromup(unsigned char *data, int length)
        if (p_m_load==0 && ISDN_LOAD>0)
        {
 #ifdef SOCKET_MISDN
-               hh->prim = DL_DATA_REQ; 
+               hh->prim = PH_DATA_REQ; 
                hh->id = 0;
-               memcpy(buf+MISDN_HEADER_LEN, data, ISDN_LOAD);
+               memset(buf+MISDN_HEADER_LEN, (options.law=='a')?0x2a:0xff, ISDN_LOAD);
                ret = sendto(p_m_mISDNport->b_socket[p_m_b_index], buf, MISDN_HEADER_LEN+ISDN_LOAD, 0, NULL, 0);
                if (!ret)
                        PERROR("Failed to send to socket %d\n", p_m_mISDNport->b_socket[p_m_b_index]);
@@ -3722,7 +3852,7 @@ void PmISDN::txfromup(unsigned char *data, int length)
                frm->addr = p_m_mISDNport->b_addr[p_m_b_index] | FLG_MSG_DOWN;
                frm->dinfo = 0;
                frm->len = ISDN_LOAD;
-               memcpy(buf+mISDN_HEADER_LEN, data, ISDN_LOAD);
+               memset(buf+mISDN_HEADER_LEN, (options.law=='a')?0x2a:0xff, ISDN_LOAD);
                mISDN_write(mISDNdevice, frm, mISDN_HEADER_LEN+ISDN_LOAD, TIMEOUT_1SEC);
 #endif
                p_m_load += ISDN_LOAD;
@@ -3736,7 +3866,7 @@ void PmISDN::txfromup(unsigned char *data, int length)
 
        /* make and send frame */
 #ifdef SOCKET_MISDN
-       hh->prim = DL_DATA_REQ;
+       hh->prim = PH_DATA_REQ;
        hh->id = 0;
        memcpy(buf+MISDN_HEADER_LEN, data, length);
        ret = sendto(p_m_mISDNport->b_socket[p_m_b_index], buf, MISDN_HEADER_LEN+length, 0, NULL, 0);