summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorVadim Yanitskiy <axilirator@gmail.com>2017-08-07 14:24:18 +0600
committerVadim Yanitskiy <axilirator@gmail.com>2017-11-19 15:55:34 +0700
commitede8789c57ac4977dcce5fbe4af2ad119fa7e3d1 (patch)
tree6eefdfa32b1a1217686924b657d771c824cdff6d
parentfb06462d3c9c93f730c4234f9f062fd18b0bf5f2 (diff)
host/trxcon/scheduler: add TCH/F channel support
-rw-r--r--src/host/trxcon/Makefile.am1
-rw-r--r--src/host/trxcon/sched_lchan_common.c41
-rw-r--r--src/host/trxcon/sched_lchan_desc.c9
-rw-r--r--src/host/trxcon/sched_lchan_tchf.c272
4 files changed, 321 insertions, 2 deletions
diff --git a/src/host/trxcon/Makefile.am b/src/host/trxcon/Makefile.am
index 90c7a3c..88ff2be 100644
--- a/src/host/trxcon/Makefile.am
+++ b/src/host/trxcon/Makefile.am
@@ -34,6 +34,7 @@ trxcon_SOURCES += \
sched_lchan_common.c \
sched_lchan_desc.c \
sched_lchan_xcch.c \
+ sched_lchan_tchf.c \
sched_lchan_rach.c \
sched_lchan_sch.c \
sched_mframe.c \
diff --git a/src/host/trxcon/sched_lchan_common.c b/src/host/trxcon/sched_lchan_common.c
index aa0614c..3445b7a 100644
--- a/src/host/trxcon/sched_lchan_common.c
+++ b/src/host/trxcon/sched_lchan_common.c
@@ -32,6 +32,9 @@
#include <osmocom/core/logging.h>
#include <osmocom/core/bits.h>
+#include <osmocom/gsm/protocol/gsm_04_08.h>
+#include <osmocom/gsm/protocol/gsm_08_58.h>
+
#include "l1ctl_proto.h"
#include "scheduler.h"
#include "sched_trx.h"
@@ -143,3 +146,41 @@ int sched_send_data_conf(struct trx_instance *trx, struct trx_ts *ts,
return 0;
}
+
+/* TS 101318 Chapter 5.1: 260 bits + 4bit sig */
+#define GSM_FR_BYTES 33
+/* TS 101318 Chapter 5.3: 244 bits + 4bit sig */
+#define GSM_EFR_BYTES 31
+
+/**
+ * Composes a bad frame indication message
+ * according to the current tch_mode.
+ *
+ * @param l2 Pointer to allocated byte array
+ * @param tch_mode Current TCH mode
+ * @return How much bytes were written
+ */
+size_t sched_bad_frame_ind(uint8_t *l2, uint8_t rsl_cmode, uint8_t tch_mode)
+{
+ /* BFI is only required for speech */
+ if (rsl_cmode != RSL_CMOD_SPD_SPEECH)
+ return 0;
+
+ switch (tch_mode) {
+ case GSM48_CMODE_SIGN:
+ case GSM48_CMODE_SPEECH_V1: /* Full Rate */
+ memset(l2, 0x00, GSM_FR_BYTES);
+ l2[0] = 0xd0;
+ return GSM_FR_BYTES;
+ case GSM48_CMODE_SPEECH_EFR: /* Enhanced Full Rate */
+ memset(l2, 0x00, GSM_EFR_BYTES);
+ l2[0] = 0xc0;
+ return GSM_EFR_BYTES;
+ case GSM48_CMODE_SPEECH_AMR: /* Adaptive Multi Rate */
+ /* FIXME: AMR is not implemented yet */
+ return 0;
+ default:
+ LOGP(DSCH, LOGL_ERROR, "Invalid TCH mode: %u\n", tch_mode);
+ return 0;
+ }
+}
diff --git a/src/host/trxcon/sched_lchan_desc.c b/src/host/trxcon/sched_lchan_desc.c
index c483db8..390b1ef 100644
--- a/src/host/trxcon/sched_lchan_desc.c
+++ b/src/host/trxcon/sched_lchan_desc.c
@@ -30,11 +30,9 @@
/* TODO: implement */
#define tx_pdtch_fn NULL
-#define tx_tchf_fn NULL
#define tx_tchh_fn NULL
#define rx_pdtch_fn NULL
-#define rx_tchf_fn NULL
#define rx_tchh_fn NULL
/* Forward declaration of handlers */
@@ -52,6 +50,13 @@ int rx_sch_fn(struct trx_instance *trx, struct trx_ts *ts,
int tx_rach_fn(struct trx_instance *trx, struct trx_ts *ts,
struct trx_lchan_state *lchan, uint32_t fn, uint8_t bid);
+int rx_tchf_fn(struct trx_instance *trx, struct trx_ts *ts,
+ struct trx_lchan_state *lchan, uint32_t fn, uint8_t bid,
+ sbit_t *bits, int8_t rssi, float toa);
+
+int tx_tchf_fn(struct trx_instance *trx, struct trx_ts *ts,
+ struct trx_lchan_state *lchan, uint32_t fn, uint8_t bid);
+
const struct trx_lchan_desc trx_lchan_desc[_TRX_CHAN_MAX] = {
{
TRXC_IDLE, "IDLE",
diff --git a/src/host/trxcon/sched_lchan_tchf.c b/src/host/trxcon/sched_lchan_tchf.c
new file mode 100644
index 0000000..a9d2e26
--- /dev/null
+++ b/src/host/trxcon/sched_lchan_tchf.c
@@ -0,0 +1,272 @@
+/*
+ * OsmocomBB <-> SDR connection bridge
+ * TDMA scheduler: handlers for DL / UL bursts on logical channels
+ *
+ * (C) 2017 by Vadim Yanitskiy <axilirator@gmail.com>
+ *
+ * All Rights Reserved
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License along
+ * with this program; if not, write to the Free Software Foundation, Inc.,
+ * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+ *
+ */
+
+#include <errno.h>
+#include <string.h>
+#include <talloc.h>
+#include <stdint.h>
+
+#include <osmocom/core/linuxlist.h>
+#include <osmocom/core/logging.h>
+#include <osmocom/core/bits.h>
+
+#include <osmocom/gsm/protocol/gsm_04_08.h>
+#include <osmocom/gsm/protocol/gsm_08_58.h>
+#include <osmocom/gsm/gsm_utils.h>
+
+#include <osmocom/coding/gsm0503_coding.h>
+#include <osmocom/codec/codec.h>
+
+#include "l1ctl_proto.h"
+#include "scheduler.h"
+#include "sched_trx.h"
+#include "logging.h"
+#include "trx_if.h"
+#include "trxcon.h"
+#include "l1ctl.h"
+
+int rx_tchf_fn(struct trx_instance *trx, struct trx_ts *ts,
+ struct trx_lchan_state *lchan, uint32_t fn, uint8_t bid,
+ sbit_t *bits, int8_t rssi, float toa)
+{
+ const struct trx_lchan_desc *lchan_desc;
+ uint8_t rsl_cmode, tch_mode, mode;
+ int n_errors, n_bits_total, rc;
+ uint8_t *rssi_num, *toa_num;
+ float *rssi_sum, *toa_sum;
+ sbit_t *buffer, *offset;
+ uint8_t l2[128], *mask;
+ uint32_t *first_fn;
+ size_t l2_len;
+
+ /* Set up pointers */
+ lchan_desc = &trx_lchan_desc[lchan->type];
+ first_fn = &lchan->rx_first_fn;
+ mask = &lchan->rx_burst_mask;
+ buffer = lchan->rx_bursts;
+
+ rssi_sum = &lchan->rssi_sum;
+ rssi_num = &lchan->rssi_num;
+ toa_sum = &lchan->toa_sum;
+ toa_num = &lchan->toa_num;
+
+ LOGP(DSCHD, LOGL_DEBUG, "Traffic received on %s: fn=%u ts=%u bid=%u\n",
+ lchan_desc->name, fn, ts->index, bid);
+
+ if (bid == 0) {
+ *first_fn = fn;
+ *mask = 0x00;
+
+ *rssi_sum = 0;
+ *rssi_num = 0;
+ *toa_sum = 0;
+ *toa_num = 0;
+ }
+
+ /* Update mask and RSSI */
+ *mask |= (1 << bid);
+ *rssi_sum += rssi;
+ (*rssi_num)++;
+ *toa_sum += toa;
+ (*toa_num)++;
+
+ /* Copy burst to end of buffer of 8 bursts */
+ offset = buffer + bid * 116 + 464;
+ memcpy(offset, bits + 3, 58);
+ memcpy(offset + 58, bits + 87, 58);
+
+ /* Wait until complete set of bursts */
+ if (bid != 3)
+ return 0;
+
+ /* Check for complete set of bursts */
+ if ((*mask & 0xf) != 0xf) {
+ LOGP(DSCHD, LOGL_DEBUG, "Received incomplete traffic frame at "
+ "fn=%u (%u/%u) for %s\n", *first_fn,
+ (*first_fn) % ts->mf_layout->period,
+ ts->mf_layout->period,
+ lchan_desc->name);
+
+ return -1;
+ }
+
+ /**
+ * Get current RSL / TCH modes
+ *
+ * FIXME: we do support speech only, and
+ * CSD support may be implemented latter.
+ */
+ rsl_cmode = RSL_CMOD_SPD_SPEECH;
+ tch_mode = lchan->tch_mode;
+
+ mode = rsl_cmode != RSL_CMOD_SPD_SPEECH ?
+ GSM48_CMODE_SPEECH_V1 : tch_mode;
+
+ switch (mode) {
+ case GSM48_CMODE_SIGN:
+ case GSM48_CMODE_SPEECH_V1: /* FR */
+ rc = gsm0503_tch_fr_decode(l2, buffer,
+ 1, 0, &n_errors, &n_bits_total);
+ break;
+ case GSM48_CMODE_SPEECH_EFR: /* EFR */
+ rc = gsm0503_tch_fr_decode(l2, buffer,
+ 1, 1, &n_errors, &n_bits_total);
+ break;
+ case GSM48_CMODE_SPEECH_AMR: /* AMR */
+ /**
+ * TODO: AMR requires a dedicated loop,
+ * which will be implemented later...
+ */
+ LOGP(DSCHD, LOGL_ERROR, "AMR isn't supported yet\n");
+ return -ENOTSUP;
+ default:
+ LOGP(DSCHD, LOGL_ERROR, "Invalid TCH mode: %u\n", tch_mode);
+ return -EINVAL;
+ }
+
+ /* Shift buffer by 4 bursts for interleaving */
+ memcpy(buffer, buffer + 464, 464);
+
+ /* Check decoding result */
+ if (rc < 4) {
+ LOGP(DSCHD, LOGL_DEBUG, "Received bad TCH frame ending at "
+ "fn=%u for %s\n", fn, lchan_desc->name);
+
+ l2_len = sched_bad_frame_ind(l2, rsl_cmode, tch_mode);
+ } else if (rc == GSM_MACBLOCK_LEN) {
+ /* FACCH received */
+ sched_send_data_ind(trx, ts, lchan, l2, GSM_MACBLOCK_LEN);
+ sched_bad_frame_ind(l2, rsl_cmode, tch_mode);
+ l2_len = GSM_MACBLOCK_LEN;
+ } else {
+ /* Good TCH frame received */
+ l2_len = rc;
+ }
+
+ /* Send a traffic frame to the higher layers */
+ if (l2_len > 0)
+ sched_send_data_ind(trx, ts, lchan, l2, l2_len);
+
+ return 0;
+}
+
+int tx_tchf_fn(struct trx_instance *trx, struct trx_ts *ts,
+ struct trx_lchan_state *lchan, uint32_t fn, uint8_t bid)
+{
+ const struct trx_lchan_desc *lchan_desc;
+ struct trx_ts_prim *prim;
+ ubit_t burst[GSM_BURST_LEN];
+ ubit_t *buffer, *offset;
+ uint8_t *mask, *l2;
+ const uint8_t *tsc;
+ int rc;
+
+ /* Set up pointers */
+ lchan_desc = &trx_lchan_desc[lchan->type];
+ mask = &lchan->tx_burst_mask;
+ buffer = lchan->tx_bursts;
+
+ /* If we have encoded bursts */
+ if (*mask)
+ goto send_burst;
+
+ if (bid > 0)
+ return 0;
+
+ /* Get a message from TX queue */
+ prim = llist_entry(ts->tx_prims.next, struct trx_ts_prim, list);
+ l2 = (uint8_t *) prim->payload;
+
+ /* Encode payload (prioritize FACCH) */
+ /* How to distinguish between TCH and FACCH??? */
+
+ /* Encode bursts */
+ rc = gsm0503_tch_fr_encode(buffer, l2, 23, 1);
+ if (rc) {
+ LOGP(DSCHD, LOGL_ERROR, "Failed to encode L2 payload\n");
+
+ /* Remove primitive from queue and free memory */
+ llist_del(&prim->list);
+ talloc_free(prim);
+
+ return -EINVAL;
+ }
+
+send_burst:
+ /* Determine which burst should be sent */
+ offset = buffer + bid * 116;
+
+ /* Check if first 4 bursts have been sent */
+ if ((*mask & 0x0f) == 0x0f) {
+ *mask |= (1 << (bid + 4));
+ offset += 464;
+ } else {
+ *mask |= (1 << bid);
+ }
+
+ /* Choose proper TSC */
+ tsc = sched_nb_training_bits[trx->tsc];
+
+ /* Compose a new burst */
+ memset(burst, 0, 3); /* TB */
+ memcpy(burst + 3, offset, 58); /* Payload 1/2 */
+ memcpy(burst + 61, tsc, 26); /* TSC */
+ memcpy(burst + 87, offset + 58, 58); /* Payload 2/2 */
+ memset(burst + 145, 0, 3); /* TB */
+
+ LOGP(DSCHD, LOGL_DEBUG, "Transmitting %s fn=%u ts=%u burst=%u\n",
+ lchan_desc->name, fn, ts->index, bid);
+
+ /* Send burst to transceiver */
+ rc = trx_if_tx_burst(trx, ts->index, fn, trx->tx_power, burst);
+ if (rc) {
+ LOGP(DSCHD, LOGL_ERROR, "Could not send burst to transceiver\n");
+
+ /* Remove primitive from queue and free memory */
+ prim = llist_entry(ts->tx_prims.next, struct trx_ts_prim, list);
+ llist_del(&prim->list);
+ talloc_free(prim);
+
+ /* Reset mask */
+ *mask = 0x00;
+
+ return rc;
+ }
+
+ /* If we have sent the last (8/8) burst */
+ if (*mask == 0xff) {
+ /* Remove primitive from queue and free memory */
+ prim = llist_entry(ts->tx_prims.next, struct trx_ts_prim, list);
+ llist_del(&prim->list);
+ talloc_free(prim);
+
+ /* Reset mask */
+ *mask = 0x00;
+
+ /* FIXME: confirm data / traffic sending */
+ sched_send_data_conf(trx, ts, lchan, fn, 23);
+ }
+
+ return 0;
+}