[layer23] Updated layer23 to current L1 support and forthcomming hopping.
[osmocom-bb.git] / src / host / layer23 / src / l1ctl.c
index a960829..8d5e569 100644 (file)
@@ -42,6 +42,7 @@
 
 #include <osmocom/l1ctl.h>
 #include <osmocom/osmocom_data.h>
+#include <osmocom/l1l2_interface.h>
 #include <osmocom/lapdm.h>
 #include <osmocom/logging.h>
 #include <osmocom/gsmtap_util.h>
@@ -70,24 +71,54 @@ static int osmo_make_band_arfcn(struct osmocom_ms *ms, uint16_t arfcn)
        return arfcn;
 }
 
-static int rx_l1_ccch_resp(struct osmocom_ms *ms, struct msgb *msg)
+static int rx_l1_fbsb_conf(struct osmocom_ms *ms, struct msgb *msg)
 {
        struct l1ctl_info_dl *dl;
-       struct l1ctl_sync_new_ccch_resp *sb;
+       struct l1ctl_fbsb_conf *sb;
        struct gsm_time tm;
 
-       if (msgb_l3len(msg) < sizeof(*sb)) {
-               LOGP(DL1C, LOGL_ERROR, "MSG too short for CCCH RESP: %u\n",
+       if (msgb_l3len(msg) < sizeof(*dl) + sizeof(*sb)) {
+               LOGP(DL1C, LOGL_ERROR, "FBSB RESP: MSG too short %u\n",
                        msgb_l3len(msg));
                return -1;
        }
 
        dl = (struct l1ctl_info_dl *) msg->l1h;
-       sb = (struct l1ctl_sync_new_ccch_resp *) dl->payload;
+       sb = (struct l1ctl_fbsb_conf *) dl->payload;
+
+       printf("snr=%04x, arfcn=%u result=%u\n", dl->snr, ntohs(dl->band_arfcn),
+               sb->result);
+
+       if (sb->result != 0) {
+               LOGP(DL1C, LOGL_ERROR, "FBSB RESP: result=%u\n", sb->result);
+               dispatch_signal(SS_L1CTL, S_L1CTL_FBSB_ERR, ms);
+               return 0;
+       }
 
        gsm_fn2gsmtime(&tm, ntohl(dl->frame_nr));
        DEBUGP(DL1C, "SCH: SNR: %u TDMA: (%.4u/%.2u/%.2u) bsic: %d\n",
                dl->snr, tm.t1, tm.t2, tm.t3, sb->bsic);
+       dispatch_signal(SS_L1CTL, S_L1CTL_FBSB_RESP, ms);
+
+       return 0;
+}
+
+static int rx_l1_rach_conf(struct osmocom_ms *ms, struct msgb *msg)
+{
+       struct l1ctl_info_dl *dl;
+       struct osmobb_rach_conf rc;
+
+       if (msgb_l3len(msg) < sizeof(*dl)) {
+               LOGP(DL1C, LOGL_ERROR, "RACH CONF: MSG too short %u\n",
+                       msgb_l3len(msg));
+               return -1;
+       }
+
+       dl = (struct l1ctl_info_dl *) msg->l1h;
+
+       rc.fn = htonl(dl->frame_nr);
+       rc.ms = ms;
+       dispatch_signal(SS_L1CTL, S_L1CTL_RACH_CONF, &rc);
 
        return 0;
 }
@@ -132,6 +163,7 @@ static int rx_ph_data_ind(struct osmocom_ms *ms, struct msgb *msg)
        if (msgb_l3len(msg) < sizeof(*ccch)) {
                LOGP(DL1C, LOGL_ERROR, "MSG too short Data Ind: %u\n",
                        msgb_l3len(msg));
+               msgb_free(msg);
                return -1;
        }
 
@@ -145,9 +177,15 @@ static int rx_ph_data_ind(struct osmocom_ms *ms, struct msgb *msg)
                chan_nr2string(dl->chan_nr), tm.t1, tm.t2, tm.t3,
                hexdump(ccch->data, sizeof(ccch->data)));
 
+       if (dl->num_biterr) {
+               LOGP(DL1C, LOGL_NOTICE, "Dropping frame with %u bit errors\n",
+                       dl->num_biterr);
+               return 0;
+       }
+
        /* send CCCH data via GSMTAP */
        gsmtap_chan_type = chantype_rsl2gsmtap(chan_type, dl->link_id);
-       gsmtap_sendmsg(dl->band_arfcn, chan_ts, gsmtap_chan_type, chan_ss,
+       gsmtap_sendmsg(ntohs(dl->band_arfcn), chan_ts, gsmtap_chan_type, chan_ss,
                        tm.fn, dl->rx_level-110, dl->snr, ccch->data,
                        sizeof(ccch->data));
 
@@ -170,6 +208,26 @@ static int rx_ph_data_ind(struct osmocom_ms *ms, struct msgb *msg)
        return 0;
 }
 
+/* Receive L1CTL_DATA_CONF (Data Confirm from L1) */
+static int rx_ph_data_conf(struct osmocom_ms *ms, struct msgb *msg)
+{
+       struct l1ctl_info_dl *dl;
+       struct lapdm_entity *le;
+
+       dl = (struct l1ctl_info_dl *) msg->l1h;
+
+       /* determine LAPDm entity based on SACCH or not */
+       if (dl->link_id & 0x40)
+               le = &ms->l2_entity.lapdm_acch;
+       else
+               le = &ms->l2_entity.lapdm_dcch;
+
+       /* send it up into LAPDm */
+       l2_ph_data_conf(msg, le);
+
+       return 0;
+}
+
 /* Transmit L1CTL_DATA_REQ */
 int tx_ph_data_req(struct osmocom_ms *ms, struct msgb *msg,
                   uint8_t chan_nr, uint8_t link_id)
@@ -213,18 +271,46 @@ int tx_ph_data_req(struct osmocom_ms *ms, struct msgb *msg,
        return osmo_send_l1(ms, msg);
 }
 
-/* Transmit NEW_CCCH_REQ */
-int l1ctl_tx_ccch_req(struct osmocom_ms *ms, uint16_t arfcn)
+/* Transmit FBSB_REQ */
+int l1ctl_tx_fbsb_req(struct osmocom_ms *ms, uint16_t arfcn,
+                     uint8_t flags, uint16_t timeout, uint8_t sync_info_idx,
+                     uint8_t ccch_mode)
+{
+       struct msgb *msg;
+       struct l1ctl_fbsb_req *req;
+
+       msg = osmo_l1_alloc(L1CTL_FBSB_REQ);
+       if (!msg)
+               return -1;
+
+       req = (struct l1ctl_fbsb_req *) msgb_put(msg, sizeof(*req));
+       req->band_arfcn = htons(osmo_make_band_arfcn(ms, arfcn));
+       req->timeout = htons(timeout);
+       /* Threshold when to consider FB_MODE1: 4kHz - 1kHz */
+       req->freq_err_thresh1 = htons(4000 - 1000);
+       /* Threshold when to consider SCH: 1kHz - 200Hz */
+       req->freq_err_thresh2 = htons(1000 - 200);
+       /* not used yet! */
+       req->num_freqerr_avg = 3;
+       req->flags = flags;
+       req->sync_info_idx = sync_info_idx;
+       req->ccch_mode = ccch_mode;
+
+       return osmo_send_l1(ms, msg);
+}
+
+/* Transmit L1CTL_CCCH_MODE_REQ */
+int l1ctl_tx_ccch_mode_req(struct osmocom_ms *ms, uint8_t ccch_mode)
 {
        struct msgb *msg;
-       struct l1ctl_sync_new_ccch_req *req;
+       struct l1ctl_ccch_mode_req *req;
 
-       msg = osmo_l1_alloc(L1CTL_NEW_CCCH_REQ);
+       msg = osmo_l1_alloc(L1CTL_CCCH_MODE_REQ);
        if (!msg)
                return -1;
 
-       req = (struct l1ctl_sync_new_ccch_req *) msgb_put(msg, sizeof(*req));
-       req->band_arfcn = osmo_make_band_arfcn(ms, arfcn);
+       req = (struct l1ctl_ccch_mode_req *) msgb_put(msg, sizeof(*req));
+       req->ccch_mode = ccch_mode;
 
        return osmo_send_l1(ms, msg);
 }
@@ -250,7 +336,8 @@ int tx_ph_rach_req(struct osmocom_ms *ms)
 }
 
 /* Transmit L1CTL_DM_EST_REQ */
-int tx_ph_dm_est_req(struct osmocom_ms *ms, uint16_t band_arfcn, uint8_t chan_nr)
+int tx_ph_dm_est_req_h0(struct osmocom_ms *ms, uint16_t band_arfcn,
+       uint8_t chan_nr, uint8_t tsc, uint8_t tx_power)
 {
        struct msgb *msg;
        struct l1ctl_info_ul *ul;
@@ -262,12 +349,66 @@ int tx_ph_dm_est_req(struct osmocom_ms *ms, uint16_t band_arfcn, uint8_t chan_nr
 
        DEBUGP(DL1C, "Tx Dedic.Mode Est Req (arfcn=%u, chan_nr=0x%02x)\n",
                band_arfcn, chan_nr);
+
+       ul = (struct l1ctl_info_ul *) msgb_put(msg, sizeof(*ul));
+       ul->chan_nr = chan_nr;
+       ul->link_id = 0;
+       ul->tx_power = tx_power;
+
+       req = (struct l1ctl_dm_est_req *) msgb_put(msg, sizeof(*req));
+       req->tsc = tsc;
+       req->h = 0;
+       req->h0.band_arfcn = htons(band_arfcn);
+
+       return osmo_send_l1(ms, msg);
+}
+
+int tx_ph_dm_est_req_h1(struct osmocom_ms *ms, uint8_t maio, uint8_t hsn,
+       uint16_t *ma, uint8_t ma_len, uint8_t chan_nr, uint8_t tsc,
+       uint8_t tx_power)
+{
+       struct msgb *msg;
+       struct l1ctl_info_ul *ul;
+       struct l1ctl_dm_est_req *req;
+       int i;
+
+       msg = osmo_l1_alloc(L1CTL_DM_EST_REQ);
+       if (!msg)
+               return -1;
+
+       DEBUGP(DL1C, "Tx Dedic.Mode Est Req (maio=%u, hsn=%u, "
+               "chan_nr=0x%02x)\n", maio, hsn, chan_nr);
+
        ul = (struct l1ctl_info_ul *) msgb_put(msg, sizeof(*ul));
        ul->chan_nr = chan_nr;
        ul->link_id = 0;
-       ul->tx_power = 0; /* FIXME: initial TX power */
+       ul->tx_power = tx_power;
+
        req = (struct l1ctl_dm_est_req *) msgb_put(msg, sizeof(*req));
-       req->band_arfcn = band_arfcn;
+       req->tsc = tsc;
+       req->h = 1;
+       req->h1.maio = maio;
+       req->h1.hsn = hsn;
+       req->h1.n = ma_len;
+       for (i = 0; i < ma_len; i++)
+               req->h1.ma[i] = htons(ma[i]);
+
+       return osmo_send_l1(ms, msg);
+}
+
+/* Transmit L1CTL_DM_REL_REQ */
+int tx_ph_dm_rel_req(struct osmocom_ms *ms)
+{
+       struct msgb *msg;
+       struct l1ctl_info_ul *ul;
+
+       msg = osmo_l1_alloc(L1CTL_DM_REL_REQ);
+       if (!msg)
+               return -1;
+
+       DEBUGP(DL1C, "Tx Dedic.Mode Rel Req\n");
+
+       ul = (struct l1ctl_info_ul *) msgb_put(msg, sizeof(*ul));
 
        return osmo_send_l1(ms, msg);
 }
@@ -309,19 +450,38 @@ int l1ctl_tx_pm_req_range(struct osmocom_ms *ms, uint16_t arfcn_from,
        return osmo_send_l1(ms, msg);
 }
 
-/* Receive L1CTL_RESET */
+/* Transmit L1CTL_RESET_REQ */
+int l1ctl_tx_reset_req(struct osmocom_ms *ms, uint8_t type)
+{
+       struct msgb *msg;
+       struct l1ctl_reset *res;
+
+       msg = osmo_l1_alloc(L1CTL_RESET_REQ);
+       if (!msg)
+               return -1;
+
+       printf("Tx Reset Req (%u)\n", type);
+       res = (struct l1ctl_reset *) msgb_put(msg, sizeof(*res));
+       res->type = type;
+
+       return osmo_send_l1(ms, msg);
+}
+
+/* Receive L1CTL_RESET_IND */
 static int rx_l1_reset(struct osmocom_ms *ms)
 {
        printf("Layer1 Reset.\n");
        dispatch_signal(SS_L1CTL, S_L1CTL_RESET, ms);
+
+       return 0;
 }
 
-/* Receive L1CTL_PM_RESP */
-static int rx_l1_pm_resp(struct osmocom_ms *ms, struct msgb *msg)
+/* Receive L1CTL_PM_CONF */
+static int rx_l1_pm_conf(struct osmocom_ms *ms, struct msgb *msg)
 {
-       struct l1ctl_pm_resp *pmr;
+       struct l1ctl_pm_conf *pmr;
 
-       for (pmr = (struct l1ctl_pm_resp *) msg->l1h;
+       for (pmr = (struct l1ctl_pm_conf *) msg->l1h;
             (uint8_t *) pmr < msg->tail; pmr++) {
                struct osmobb_meas_res mr;
                DEBUGP(DL1C, "PM MEAS: ARFCN: %4u RxLev: %3d %3d\n",
@@ -334,6 +494,29 @@ static int rx_l1_pm_resp(struct osmocom_ms *ms, struct msgb *msg)
        return 0;
 }
 
+/* Receive L1CTL_MODE_CONF */
+static int rx_l1_ccch_mode_conf(struct osmocom_ms *ms, struct msgb *msg)
+{
+       struct osmobb_ccch_mode_conf mc;
+       struct l1ctl_ccch_mode_conf *conf;
+
+       if (msgb_l3len(msg) < sizeof(*conf)) {
+               LOGP(DL1C, LOGL_ERROR, "MODE CONF: MSG too short %u\n",
+                       msgb_l3len(msg));
+               return -1;
+       }
+
+       conf = (struct l1ctl_ccch_mode_conf *) msg->l1h;
+
+       printf("mode=%u\n", conf->ccch_mode);
+
+       mc.ccch_mode = conf->ccch_mode;
+       mc.ms = ms;
+       dispatch_signal(SS_L1CTL, S_L1CTL_CCCH_MODE_CONF, &mc);
+
+       return 0;
+}
+
 /* Receive incoming data from L1 using L1CTL format */
 int l1ctl_recv(struct osmocom_ms *ms, struct msgb *msg)
 {
@@ -344,6 +527,7 @@ int l1ctl_recv(struct osmocom_ms *ms, struct msgb *msg)
        if (msgb_l2len(msg) < sizeof(*dl)) {
                LOGP(DL1C, LOGL_ERROR, "Short Layer2 message: %u\n",
                        msgb_l2len(msg));
+               msgb_free(msg);
                return -1;
        }
 
@@ -354,22 +538,38 @@ int l1ctl_recv(struct osmocom_ms *ms, struct msgb *msg)
        msg->l1h = l1h->data;
 
        switch (l1h->msg_type) {
-       case L1CTL_NEW_CCCH_RESP:
-               rc = rx_l1_ccch_resp(ms, msg);
+       case L1CTL_FBSB_CONF:
+               rc = rx_l1_fbsb_conf(ms, msg);
+               msgb_free(msg);
                break;
        case L1CTL_DATA_IND:
                rc = rx_ph_data_ind(ms, msg);
                break;
-       case L1CTL_RESET:
+       case L1CTL_DATA_CONF:
+               rc = rx_ph_data_conf(ms, msg);
+               break;
+       case L1CTL_RESET_IND:
+       case L1CTL_RESET_CONF:
                rc = rx_l1_reset(ms);
+               msgb_free(msg);
                break;
-       case L1CTL_PM_RESP:
-               rc = rx_l1_pm_resp(ms, msg);
+       case L1CTL_PM_CONF:
+               rc = rx_l1_pm_conf(ms, msg);
+               msgb_free(msg);
                if (l1h->flags & L1CTL_F_DONE)
                        dispatch_signal(SS_L1CTL, S_L1CTL_PM_DONE, ms);
                break;
+       case L1CTL_RACH_CONF:
+               rc = rx_l1_rach_conf(ms, msg);
+               msgb_free(msg);
+               break;
+       case L1CTL_CCCH_MODE_CONF:
+               rc = rx_l1_ccch_mode_conf(ms, msg);
+               msgb_free(msg);
+               break;
        default:
                fprintf(stderr, "Unknown MSG: %u\n", l1h->msg_type);
+               msgb_free(msg);
                break;
        }