summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorVadim Yanitskiy <axilirator@gmail.com>2017-08-13 01:30:18 +0600
committerVadim Yanitskiy <axilirator@gmail.com>2017-11-19 15:55:35 +0700
commit64e08c45abae6e07c765fbc39a424b1a863c1d35 (patch)
tree6d39f7cbf5e6a7149ee35b51103d9aee2e65618f
parentede8789c57ac4977dcce5fbe4af2ad119fa7e3d1 (diff)
host/trxcon/scheduler: add TCH/H channel support
-rw-r--r--src/host/trxcon/Makefile.am1
-rw-r--r--src/host/trxcon/sched_lchan_desc.c10
-rw-r--r--src/host/trxcon/sched_lchan_tchh.c281
3 files changed, 289 insertions, 3 deletions
diff --git a/src/host/trxcon/Makefile.am b/src/host/trxcon/Makefile.am
index 88ff2be..107ed22 100644
--- a/src/host/trxcon/Makefile.am
+++ b/src/host/trxcon/Makefile.am
@@ -35,6 +35,7 @@ trxcon_SOURCES += \
sched_lchan_desc.c \
sched_lchan_xcch.c \
sched_lchan_tchf.c \
+ sched_lchan_tchh.c \
sched_lchan_rach.c \
sched_lchan_sch.c \
sched_mframe.c \
diff --git a/src/host/trxcon/sched_lchan_desc.c b/src/host/trxcon/sched_lchan_desc.c
index 390b1ef..2f4849e 100644
--- a/src/host/trxcon/sched_lchan_desc.c
+++ b/src/host/trxcon/sched_lchan_desc.c
@@ -30,10 +30,7 @@
/* TODO: implement */
#define tx_pdtch_fn NULL
-#define tx_tchh_fn NULL
-
#define rx_pdtch_fn NULL
-#define rx_tchh_fn NULL
/* Forward declaration of handlers */
int rx_data_fn(struct trx_instance *trx, struct trx_ts *ts,
@@ -57,6 +54,13 @@ int rx_tchf_fn(struct trx_instance *trx, struct trx_ts *ts,
int tx_tchf_fn(struct trx_instance *trx, struct trx_ts *ts,
struct trx_lchan_state *lchan, uint32_t fn, uint8_t bid);
+int rx_tchh_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_tchh_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_tchh.c b/src/host/trxcon/sched_lchan_tchh.c
new file mode 100644
index 0000000..83cb17e
--- /dev/null
+++ b/src/host/trxcon/sched_lchan_tchh.c
@@ -0,0 +1,281 @@
+/*
+ * 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_tchh_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 n_errors, n_bits_total, fn_is_odd, rc;
+ const struct trx_lchan_desc *lchan_desc;
+ uint8_t rsl_cmode, tch_mode, mode;
+ 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;
+
+ fn_is_odd = (((fn + 26 - 10) % 26) >> 2) & 1;
+
+ 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 != 1)
+ return 0;
+
+ /* Check for complete set of bursts */
+ if ((*mask & 0x3) != 0x3) {
+ 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;
+ }
+
+ /* FIXME: skip second of two TCH frames of FACCH was received */
+ if (lchan->dl_ongoing_facch) {
+ lchan->dl_ongoing_facch = 0;
+ memcpy(buffer, buffer + 232, 232);
+ memcpy(buffer + 232, buffer + 464, 232);
+ // goto bfi;
+ }
+
+ /**
+ * 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_hr_decode(l2, buffer,
+ fn_is_odd, &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 for interleaving */
+ memcpy(buffer, buffer + 232, 232);
+ memcpy(buffer + 232, buffer + 464, 232);
+
+ /* 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_tchh_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, msg_facch;
+
+ /* 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;
+
+ /* TODO: prioritize FACCH */
+
+ /* Distinguish between TCH and FACCH */
+ // msg_facch = prim->payload_len == GSM_MACBLOCK_LEN;
+
+ /* Encode bursts */
+ rc = gsm0503_tch_hr_encode(buffer, l2, GSM_MACBLOCK_LEN);
+ 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 burst 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;
+}