[layer23] Reconnect of layer 2 link must be performed in idle mode also
[osmocom-bb.git] / src / host / layer23 / src / common / lapdm.c
index 44d314b..b1c0d40 100644 (file)
@@ -155,7 +155,7 @@ enum lapdm_format {
 };
 
 static void lapdm_t200_cb(void *data);
-static int rslms_send_i(struct lapdm_msg_ctx *mctx);
+static int rslms_send_i(struct lapdm_msg_ctx *mctx, int line);
 
 /* UTILITY FUNCTIONS */
 
@@ -373,7 +373,7 @@ static int send_rslms_rll_l3_ui(struct lapdm_msg_ctx *mctx, struct msgb *msg)
                mctx->link_id, 1);
        rllh = (struct abis_rsl_rll_hdr *)msgb_l2(msg);
 
-       rllh->data[0] = RSL_IE_ACCESS_DELAY;
+       rllh->data[0] = RSL_IE_TIMING_ADVANCE;
        rllh->data[1] = mctx->ta_ind;
 
        rllh->data[2] = RSL_IE_MS_POWER;
@@ -524,9 +524,8 @@ static void lapdm_t200_cb(void *data)
                        send_rll_simple(RSL_MT_REL_IND, &dl->mctx);
                        /* send MDL ERROR INIDCATION to L3 */
                        rsl_rll_error(RLL_CAUSE_T200_EXPIRED, &dl->mctx);
-                       /* flush buffers */
+                       /* flush tx buffers */
                        lapdm_dl_flush_tx(dl);
-                       lapdm_dl_flush_send(dl);
                        /* go back to idle state */
                        lapdm_dl_newstate(dl, LAPDm_STATE_IDLE);
                        /* NOTE: we must not change any other states or buffers
@@ -1046,7 +1045,7 @@ static int lapdm_rx_u(struct msgb *msg, struct lapdm_msg_ctx *mctx)
                /* enter multiple-frame-established state */
                lapdm_dl_newstate(dl, LAPDm_STATE_MF_EST);
                /* send outstanding frames, if any (resume / reconnect) */
-               rslms_send_i(mctx);
+               rslms_send_i(mctx, __LINE__);
                /* send notification to L3 */
                rc = send_rll_simple(RSL_MT_EST_CONF, mctx);
                msgb_free(msg);
@@ -1126,7 +1125,7 @@ static int lapdm_rx_s(struct msgb *msg, struct lapdm_msg_ctx *mctx)
                        }
                }
                /* Send message, if possible due to acknowledged data */
-               rslms_send_i(mctx);
+               rslms_send_i(mctx, __LINE__);
 
                break;
        case LAPDm_S_RNR:
@@ -1169,7 +1168,7 @@ static int lapdm_rx_s(struct msgb *msg, struct lapdm_msg_ctx *mctx)
                                "received\n");
 
                /* Send message, if possible due to acknowledged data */
-               rslms_send_i(mctx);
+               rslms_send_i(mctx, __LINE__);
 
                break;
        case LAPDm_S_REJ:
@@ -1273,7 +1272,7 @@ static int lapdm_rx_s(struct msgb *msg, struct lapdm_msg_ctx *mctx)
                /* FIXME: 5.5.4.2 2) */
 
                /* Send message, if possible due to acknowledged data */
-               rslms_send_i(mctx);
+               rslms_send_i(mctx, __LINE__);
 
                break;
        default:
@@ -1376,6 +1375,8 @@ static int lapdm_rx_i(struct msgb *msg, struct lapdm_msg_ctx *mctx)
                        /* send a DATA INDICATION to L3 */
                        msg->l3h = msg->l2h + 3;
                        msgb_pull_l2h(msg);
+                       msg->len = length;
+                       msg->tail = msg->data + length;
                        rc = send_rslms_rll_l3(RSL_MT_DATA_IND, mctx, msg);
                } else {
                        /* create rcv_buffer */
@@ -1397,13 +1398,13 @@ static int lapdm_rx_i(struct msgb *msg, struct lapdm_msg_ctx *mctx)
                        /* if the last segment was received */
                        if (!(msg->l2h[2] & LAPDm_MORE)) {
                                LOGP(DLAPDM, LOGL_INFO, "message in multiple I "
-                                       "frames (next message)\n");
+                                       "frames (last message)\n");
                                rc = send_rslms_rll_l3(RSL_MT_DATA_IND, mctx,
                                        dl->rcv_buffer);
                                dl->rcv_buffer = NULL;
                        } else
                                LOGP(DLAPDM, LOGL_INFO, "message in multiple I "
-                                       "frames (last message)\n");
+                                       "frames (next message)\n");
                        msgb_free(msg);
 
                }
@@ -1429,13 +1430,15 @@ static int lapdm_rx_i(struct msgb *msg, struct lapdm_msg_ctx *mctx)
                /* check if we are not in own receiver busy */
                if (!dl->own_busy) {
                        /* NOTE: V(R) is already set above */
-                       rc = rslms_send_i(mctx);
+                       rc = rslms_send_i(mctx, __LINE__);
                        if (rc) {
                                LOGP(DLAPDM, LOGL_INFO, "we are not busy and "
                                        "have no pending data, send RR\n");
                                /* Send RR with F=0 */
                                return lapdm_send_rr(mctx, 0);
                        }
+                       /* all I or one RR is sent, we are done */
+                       return 0;
                } else {
                        LOGP(DLAPDM, LOGL_INFO, "we are busy, send RNR\n");
                        /* Send RNR with F=0 */
@@ -1444,7 +1447,7 @@ static int lapdm_rx_i(struct msgb *msg, struct lapdm_msg_ctx *mctx)
        }
 
        /* Send message, if possible due to acknowledged data */
-       rslms_send_i(mctx);
+       rslms_send_i(mctx, __LINE__);
 
        return rc;
 }
@@ -1597,11 +1600,11 @@ static int rslms_rx_rll_est_req(struct msgb *msg, struct lapdm_datalink *dl)
                 * command shall contain the layer 3 message unit */
                length = TLVP_LEN(&tv, RSL_IE_L3_INFO);
                LOGP(DLAPDM, LOGL_INFO, "perform establishment with content "
-                       "(SAMB)\n");
+                       "(SABM)\n");
        } else {
                /* normal establishment procedure */
                length = 0;
-               LOGP(DLAPDM, LOGL_INFO, "perform normal establishm. (SAMB)\n");
+               LOGP(DLAPDM, LOGL_INFO, "perform normal establishm. (SABM)\n");
        }
 
        /* check if the layer3 message length exceeds N201 */
@@ -1633,7 +1636,7 @@ static int rslms_rx_rll_est_req(struct msgb *msg, struct lapdm_datalink *dl)
        /* Transmit-buffer carries exactly one segment */
        memcpy(dl->tx_hist[0], msg->l2h, 3 + length);
        dl->tx_length[0] = 3 + length;
-       /* set Vs to 0, because it is used as index when resending SAMB */
+       /* set Vs to 0, because it is used as index when resending SABM */
        dl->V_send = 0;
        
        /* Set states */
@@ -1656,30 +1659,46 @@ static int rslms_rx_rll_udata_req(struct msgb *msg, struct lapdm_datalink *dl)
        struct tlv_parsed tv;
        int length;
        uint8_t n201 = 23; //FIXME
+       uint8_t ta = 0, tx_power = 0;
 
        /* check if the layer3 message length exceeds N201 */
 
        rsl_tlv_parse(&tv, rllh->data, msgb_l2len(msg)-sizeof(*rllh));
 
+       if (TLVP_PRESENT(&tv, RSL_IE_TIMING_ADVANCE)) {
+               ta = *TLVP_VAL(&tv, RSL_IE_TIMING_ADVANCE);
+       }
+       if (TLVP_PRESENT(&tv, RSL_IE_MS_POWER)) {
+               tx_power = *TLVP_VAL(&tv, RSL_IE_MS_POWER);
+       }
+       if (!TLVP_PRESENT(&tv, RSL_IE_L3_INFO)) {
+               LOGP(DLAPDM, LOGL_ERROR, "unit data request without message "
+                       "error\n");
+               msgb_free(msg);
+               return -EINVAL;
+       }
        length = TLVP_LEN(&tv, RSL_IE_L3_INFO);
        /* check if the layer3 message length exceeds N201 */
-       if (length + 3 > 18) { /* FIXME: do we know the channel N201? */
+       if (length + 5 > 23) { /* FIXME: do we know the channel N201? */
                LOGP(DLAPDM, LOGL_ERROR, "frame too large: %d > N201(%d) "
-                       "(discarding)\n", length + 3, 18);
+                       "(discarding)\n", length + 5, 23);
                msgb_free(msg);
                return -EIO;
        }
 
-       LOGP(DLAPDM, LOGL_INFO, "sending unit data\n");
+       LOGP(DLAPDM, LOGL_INFO, "sending unit data (tx_power=%d, ta=%d)\n",
+               tx_power, ta);
 
        /* Remove RLL header from msgb */
        msgb_pull_l2h(msg);
 
-       /* Push LAPDm header on msgb */
-       msg->l2h = msgb_push(msg, 3);
-       msg->l2h[0] = LAPDm_ADDR(LAPDm_LPD_NORMAL, sapi, CR_MS2BS_CMD);
-       msg->l2h[1] = LAPDm_CTRL_U(LAPDm_U_UI, 0);
-       msg->l2h[2] = LAPDm_LEN(length);
+       /* Push L1 + LAPDm header on msgb */
+       msg->l2h = msgb_push(msg, 2 + 3);
+       msg->l2h[0] = tx_power;
+       msg->l2h[1] = ta;
+       msg->l2h[2] = LAPDm_ADDR(LAPDm_LPD_NORMAL, sapi, CR_MS2BS_CMD);
+       msg->l2h[3] = LAPDm_CTRL_U(LAPDm_U_UI, 0);
+       msg->l2h[4] = LAPDm_LEN(length);
        // FIXME: short L2 header support
 
        /* Tramsmit */
@@ -1709,12 +1728,12 @@ static int rslms_rx_rll_data_req(struct msgb *msg, struct lapdm_datalink *dl)
        msgb_enqueue(&dl->send_queue, msg);
 
        /* Send message, if possible */
-       rslms_send_i(&dl->mctx);
+       rslms_send_i(&dl->mctx, __LINE__);
        return 0;
 }
 
 /* Send next I frame from queued/buffered data */
-static int rslms_send_i(struct lapdm_msg_ctx *mctx)
+static int rslms_send_i(struct lapdm_msg_ctx *mctx, int line)
 {
        struct lapdm_datalink *dl = mctx->dl;
        uint8_t chan_nr = mctx->chan_nr;
@@ -1725,6 +1744,8 @@ static int rslms_send_i(struct lapdm_msg_ctx *mctx)
        int length, left;
        int rc = -1; /* we sent nothing */
 
+       LOGP(DLAPDM, LOGL_INFO, "%s() called from line %d\n", __func__, line);
+
        next_frame:
 
        if (dl->peer_busy) {
@@ -1770,7 +1791,10 @@ static int rslms_send_i(struct lapdm_msg_ctx *mctx)
                length = left;
                if (length > mctx->n201 - 3)
                        length = mctx->n201 - 3;
-printf("msg-len %d sent %d left %d N201 %d length %d first byte %02x\n", msgb_l3len(dl->send_buffer), dl->send_out, left, mctx->n201, length, dl->send_buffer->l3h[0]);
+               LOGP(DLAPDM, LOGL_INFO, "msg-len %d sent %d left %d N201 %d "
+                       "length %d first byte %02x\n",
+                       msgb_l3len(dl->send_buffer), dl->send_out, left,
+                       mctx->n201, length, dl->send_buffer->l3h[0]);
                /* If message in send-buffer is completely sent */
                if (left == 0) {
                        msgb_free(dl->send_buffer);
@@ -1839,13 +1863,15 @@ static int rslms_rx_rll_susp_req(struct msgb *msg, struct lapdm_datalink *dl)
 
        /* put back the send-buffer to the send-queue (first position) */
        if (dl->send_buffer) {
+               LOGP(DLAPDM, LOGL_INFO, "put frame in sendbuffer back to "
+                       "queue\n");
                llist_add(&dl->send_buffer->list, &dl->send_queue);
                dl->send_buffer = NULL;
-       }
+       } else
+               LOGP(DLAPDM, LOGL_INFO, "no frame in sendbuffer\n");
 
-       /* Clear transmit and send buffer, if any */
+       /* Clear transmit buffer, but keep send buffer */
        lapdm_dl_flush_tx(dl);
-       lapdm_dl_flush_send(dl);
 
        msgb_free(msg);
 
@@ -1878,13 +1904,19 @@ static int rslms_rx_rll_res_req(struct msgb *msg, struct lapdm_datalink *dl)
        }
        length = TLVP_LEN(&tv, RSL_IE_L3_INFO);
 
-       LOGP(DLAPDM, LOGL_INFO, "perform re-establishment (SAMB)\n");
+       LOGP(DLAPDM, LOGL_INFO, "perform re-establishment (SABM) length=%d\n",
+               length);
        
        /* Replace message in the send-buffer (reconnect) */
        if (dl->send_buffer)
                msgb_free(dl->send_buffer);
        dl->send_out = 0;
-       dl->send_buffer = msg;
+       if (length) {
+               /* Remove the RSL/RLL header */
+               msgb_pull_l2h(msg);
+               /* Write data into the send buffer, to be sent first */
+               dl->send_buffer = msg;
+       }
 
        /* Discard partly received L3 message */
        if (dl->rcv_buffer) {
@@ -1901,7 +1933,7 @@ static int rslms_rx_rll_res_req(struct msgb *msg, struct lapdm_datalink *dl)
        /* Transmit-buffer carries exactly one segment */
        memcpy(dl->tx_hist[0], msg->l2h, 3);
        dl->tx_length[0] = 3;
-       /* set Vs to 0, because it is used as index when resending SAMB */
+       /* set Vs to 0, because it is used as index when resending SABM */
        dl->V_send = 0;
 
        /* Set states */
@@ -2104,7 +2136,8 @@ static struct l2downstate {
         RSL_MT_RES_REQ, rslms_rx_rll_res_req},
 
        /* create and send SABM command (reconnect) */
-       {SBIT(LAPDm_STATE_MF_EST) |
+       {SBIT(LAPDm_STATE_IDLE) |
+        SBIT(LAPDm_STATE_MF_EST) |
         SBIT(LAPDm_STATE_TIMER_RECOV),
         RSL_MT_RECON_REQ, rslms_rx_rll_res_req},