You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

457 lines
14 KiB
C++

/**
*
* \section COPYRIGHT
*
* Copyright 2013-2020 Software Radio Systems Limited
*
* By using this file, you agree to the terms and conditions set
* forth in the LICENSE file which can be found at the top level of
* the distribution.
*
*/
#include "rlc_test_common.h"
#include "srslte/common/log_filter.h"
#include "srslte/upper/rlc_um_lte.h"
#include <iostream>
#define TESTASSERT(cond) \
{ \
if (!(cond)) { \
std::cout << "[" << __FUNCTION__ << "][Line " << __LINE__ << "]: FAIL at " << (#cond) << std::endl; \
return -1; \
} \
}
#define MAX_NBUFS 100
#define NBUFS 5
using namespace srslte;
using namespace srsue;
// Helper class to create two pre-configured RLC instances
class rlc_um_lte_test_context1
{
public:
rlc_um_lte_test_context1() :
log1("RLC_UM_1"),
log2("RLC_UM_2"),
timers(16),
rlc1(log1, 3, &tester, &tester, &timers),
rlc2(log2, 3, &tester, &tester, &timers)
{
// setup logging
log1->set_level(srslte::LOG_LEVEL_DEBUG);
log2->set_level(srslte::LOG_LEVEL_DEBUG);
log1->set_hex_limit(-1);
log2->set_hex_limit(-1);
// configure RLC entities
rlc_config_t cnfg = rlc_config_t::default_rlc_um_config(10);
if (rlc1.configure(cnfg) != true) {
fprintf(stderr, "Couldn't configure RLC1 object\n");
}
if (rlc2.configure(cnfg) != true) {
fprintf(stderr, "Couldn't configure RLC2 object\n");
}
tester.set_expected_sdu_len(1);
}
srslte::log_ref log1, log2;
srslte::timer_handler timers;
rlc_um_tester tester;
rlc_um_lte rlc1, rlc2;
};
int meas_obj_test()
{
rlc_um_lte_test_context1 ctxt;
// Push 5 SDUs into RLC1
byte_buffer_pool* pool = byte_buffer_pool::get_instance();
unique_byte_buffer_t sdu_bufs[NBUFS];
for (int i = 0; i < NBUFS; i++) {
sdu_bufs[i] = srslte::allocate_unique_buffer(*pool, true);
*sdu_bufs[i]->msg = i; // Write the index into the buffer
sdu_bufs[i]->N_bytes = 1; // Give each buffer a size of 1 byte
ctxt.rlc1.write_sdu(std::move(sdu_bufs[i]));
}
TESTASSERT(14 == ctxt.rlc1.get_buffer_state());
// Read 5 PDUs from RLC1 (1 byte each)
byte_buffer_t pdu_bufs[NBUFS];
for (int i = 0; i < NBUFS; i++) {
int len = ctxt.rlc1.read_pdu(pdu_bufs[i].msg, 4); // 3 bytes for header + payload
pdu_bufs[i].N_bytes = len;
}
TESTASSERT(0 == ctxt.rlc1.get_buffer_state());
// Write 5 PDUs into RLC2
for (int i = 0; i < NBUFS; i++) {
ctxt.rlc2.write_pdu(pdu_bufs[i].msg, pdu_bufs[i].N_bytes);
}
TESTASSERT(0 == ctxt.rlc2.get_buffer_state());
TESTASSERT(NBUFS == ctxt.tester.get_num_sdus());
for (uint32_t i = 0; i < ctxt.tester.sdus.size(); i++) {
TESTASSERT(ctxt.tester.sdus.at(i)->N_bytes == 1);
TESTASSERT(*(ctxt.tester.sdus[i]->msg) == i);
}
return 0;
}
int loss_test()
{
rlc_um_lte_test_context1 ctxt;
// Push 5 SDUs into RLC1
byte_buffer_pool* pool = byte_buffer_pool::get_instance();
unique_byte_buffer_t sdu_bufs[NBUFS];
for (int i = 0; i < NBUFS; i++) {
sdu_bufs[i] = srslte::allocate_unique_buffer(*pool, true);
sdu_bufs[i]->msg[0] = i; // Write the index into the buffer
sdu_bufs[i]->N_bytes = 1; // Give each buffer a size of 1 byte
ctxt.rlc1.write_sdu(std::move(sdu_bufs[i]));
}
TESTASSERT(14 == ctxt.rlc1.get_buffer_state());
// Read 5 PDUs from RLC1 (1 byte each)
byte_buffer_t pdu_bufs[NBUFS];
for (int i = 0; i < NBUFS; i++) {
int len = ctxt.rlc1.read_pdu(pdu_bufs[i].msg, 4); // 3 bytes for header + payload
pdu_bufs[i].N_bytes = len;
}
TESTASSERT(0 == ctxt.rlc1.get_buffer_state());
// Write 5 PDUs into RLC2 (skip SN 1)
for (int i = 0; i < NBUFS; i++) {
if (i != 1) {
ctxt.rlc2.write_pdu(pdu_bufs[i].msg, pdu_bufs[i].N_bytes);
}
}
// Step the reordering timer until expiry
while (ctxt.timers.nof_running_timers() != 0) {
ctxt.timers.step_all();
}
TESTASSERT(NBUFS - 1 == ctxt.tester.sdus.size());
return 0;
}
int basic_mbsfn_test()
{
rlc_um_lte_test_context1 ctxt;
// configure as MCH
ctxt.rlc1.configure(rlc_config_t::mch_config());
ctxt.rlc2.configure(rlc_config_t::mch_config());
// Push 5 SDUs into RLC1
byte_buffer_pool* pool = byte_buffer_pool::get_instance();
unique_byte_buffer_t sdu_bufs[NBUFS * 2];
for (int i = 0; i < NBUFS; i++) {
sdu_bufs[i] = srslte::allocate_unique_buffer(*pool, true);
sdu_bufs[i]->msg[0] = i; // Write the index into the buffer
sdu_bufs[i]->N_bytes = 1; // Give each buffer a size of 1 byte
ctxt.rlc1.write_sdu(std::move(sdu_bufs[i]));
}
TESTASSERT(13 == ctxt.rlc1.get_buffer_state());
// Read 5 PDUs from RLC1 (1 byte each)
byte_buffer_t pdu_bufs[NBUFS * 2];
for (int i = 0; i < NBUFS; i++) {
int len = ctxt.rlc1.read_pdu(pdu_bufs[i].msg, 3); // 2 bytes for header + payload
pdu_bufs[i].N_bytes = len;
}
TESTASSERT(0 == ctxt.rlc1.get_buffer_state());
// Write 5 PDUs into RLC2
for (int i = 0; i < NBUFS; i++) {
ctxt.rlc2.write_pdu(pdu_bufs[i].msg, pdu_bufs[i].N_bytes);
}
TESTASSERT(0 == ctxt.rlc2.get_buffer_state());
TESTASSERT(NBUFS == ctxt.tester.sdus.size());
for (uint32_t i = 0; i < ctxt.tester.sdus.size(); i++) {
TESTASSERT(ctxt.tester.sdus[i]->N_bytes == 1);
TESTASSERT(*(ctxt.tester.sdus[i]->msg) == i);
}
return 0;
}
// This test checks the reassembly routines when a PDU
// is lost that contains the beginning of SDU segment.
// The PDU that contains the end of this SDU _also_ contains
// a segment of another SDU.
// On reassembly of the SDUs, the missing start segment
// should be detected and the complete SDU be discarded
// Therefore, one SDU less should be received than was tx'ed.
// This test sends PDU in two batches so it's not the reordering
// timeout that detects the missing PDU but the fact more
// PDUs than rx_mod are received.
int reassmble_test()
{
rlc_um_lte_test_context1 ctxt;
// reconfigure them with 5bit SNs
rlc_config_t cnfg = rlc_config_t::default_rlc_um_config(5);
ctxt.rlc1.configure(cnfg);
ctxt.rlc2.configure(cnfg);
// Push SDUs into RLC1
const int n_sdus = 25;
const int sdu_len = 100;
ctxt.tester.set_expected_sdu_len(sdu_len);
const int n_sdu_first_batch = 17;
byte_buffer_pool* pool = byte_buffer_pool::get_instance();
unique_byte_buffer_t sdu_bufs[n_sdus];
for (int i = 0; i < n_sdu_first_batch; i++) {
sdu_bufs[i] = srslte::allocate_unique_buffer(*pool, true);
for (int k = 0; k < sdu_len; ++k) {
sdu_bufs[i]->msg[k] = i;
}
sdu_bufs[i]->N_bytes = sdu_len; // Give each buffer a size of 1 byte
ctxt.rlc1.write_sdu(std::move(sdu_bufs[i]));
}
// Read PDUs from RLC1 (use smaller grant for first PDU and large for the rest)
const int max_n_pdus = 100;
int n_pdus = 0;
byte_buffer_t* pdu_bufs[max_n_pdus];
for (int i = 0; i < max_n_pdus; i++) {
pdu_bufs[i] = byte_buffer_pool::get_instance()->allocate();
int len = ctxt.rlc1.read_pdu(pdu_bufs[i]->msg, (i == 0) ? sdu_len * 3 / 4 : sdu_len * 1.25);
pdu_bufs[i]->N_bytes = len;
if (len) {
n_pdus++;
} else {
break;
}
}
printf("Generated %d PDUs in first batch\n", n_pdus);
TESTASSERT(0 == ctxt.rlc1.get_buffer_state());
// push second batch of SDUs
for (int i = n_sdu_first_batch; i < n_sdus; ++i) {
sdu_bufs[i] = srslte::allocate_unique_buffer(*pool, true);
for (int k = 0; k < sdu_len; ++k) {
sdu_bufs[i]->msg[k] = i;
}
sdu_bufs[i]->N_bytes = sdu_len; // Give each buffer a size of 1 byte
ctxt.rlc1.write_sdu(std::move(sdu_bufs[i]));
}
// Read second batch of PDUs (use large grants)
for (int i = n_pdus; i < max_n_pdus; i++) {
pdu_bufs[i] = byte_buffer_pool::get_instance()->allocate();
int len = ctxt.rlc1.read_pdu(pdu_bufs[i]->msg, sdu_len * 1.25);
pdu_bufs[i]->N_bytes = len;
if (len) {
n_pdus++;
} else {
// stop reading PDUs after first zero length PDU
break;
}
}
printf("Generated %d PDUs in total\n", n_pdus);
// Write all PDUs into RLC2 except first one
for (int i = 0; i < n_pdus; i++) {
if (i != 0) {
ctxt.rlc2.write_pdu(pdu_bufs[i]->msg, pdu_bufs[i]->N_bytes);
}
}
// We should have received one SDU less than we tx'ed
TESTASSERT(ctxt.tester.sdus.size() == n_sdus - 1);
for (uint32_t i = 0; i < ctxt.tester.sdus.size(); ++i) {
TESTASSERT(ctxt.tester.sdus[i]->N_bytes == sdu_len);
}
return 0;
}
// This reassmble test checks the reassembly routines when a PDU
// is lost that _only_ contains the beginning of SDU segment,
// while the next PDU contains the middle part of this SDU (and
// yet another PDU the end part).
// On reassembly of the SDUs, the missing start segment
// should be detected and the complete SDU be discarded
// Therefore, one SDU less should be received than was tx'ed.
int reassmble_test2()
{
rlc_um_lte_test_context1 ctxt;
// reconfigure them with 5bit SNs
rlc_config_t cnfg = rlc_config_t::default_rlc_um_config(5);
ctxt.rlc1.configure(cnfg);
ctxt.rlc2.configure(cnfg);
// Push SDUs into RLC1
const int n_sdus = 25;
const int sdu_len = 100;
ctxt.tester.set_expected_sdu_len(sdu_len);
const int n_sdu_first_batch = 17;
byte_buffer_pool* pool = byte_buffer_pool::get_instance();
unique_byte_buffer_t sdu_bufs[n_sdus];
for (int i = 0; i < n_sdu_first_batch; i++) {
sdu_bufs[i] = srslte::allocate_unique_buffer(*pool, true);
for (int k = 0; k < sdu_len; ++k) {
sdu_bufs[i]->msg[k] = i;
}
sdu_bufs[i]->N_bytes = sdu_len;
ctxt.rlc1.write_sdu(std::move(sdu_bufs[i]));
}
const int max_n_pdus = 100;
int n_pdus = 0;
byte_buffer_t* pdu_bufs[max_n_pdus];
for (int i = 0; i < max_n_pdus; i++) {
pdu_bufs[i] = byte_buffer_pool::get_instance()->allocate();
int len = ctxt.rlc1.read_pdu(pdu_bufs[i]->msg, (i == 0) ? sdu_len * .75 : sdu_len * .25);
pdu_bufs[i]->N_bytes = len;
if (len) {
n_pdus++;
} else {
break;
}
}
printf("Generated %d PDUs in first batch\n", n_pdus);
TESTASSERT(0 == ctxt.rlc1.get_buffer_state());
// push second batch of SDUs
for (int i = n_sdu_first_batch; i < n_sdus; ++i) {
sdu_bufs[i] = srslte::allocate_unique_buffer(*pool, true);
for (int k = 0; k < sdu_len; ++k) {
sdu_bufs[i]->msg[k] = i;
}
sdu_bufs[i]->N_bytes = sdu_len; // Give each buffer a size of 1 byte
ctxt.rlc1.write_sdu(std::move(sdu_bufs[i]));
}
// Read second batch of PDUs
for (int i = n_pdus; i < max_n_pdus; i++) {
pdu_bufs[i] = byte_buffer_pool::get_instance()->allocate();
int len = ctxt.rlc1.read_pdu(pdu_bufs[i]->msg, sdu_len * 1.25);
pdu_bufs[i]->N_bytes = len;
if (len) {
n_pdus++;
} else {
break;
}
}
printf("Generated %d PDUs in total\n", n_pdus);
// Write all PDUs into RLC2 except first one
for (int i = 0; i < n_pdus; i++) {
if (i != 0) {
ctxt.rlc2.write_pdu(pdu_bufs[i]->msg, pdu_bufs[i]->N_bytes);
}
}
// We should have received one SDU less than we tx'ed
TESTASSERT(ctxt.tester.sdus.size() == n_sdus - 1);
for (uint32_t i = 0; i < ctxt.tester.sdus.size(); ++i) {
TESTASSERT(ctxt.tester.sdus[i]->N_bytes == sdu_len);
}
return 0;
}
/* PDU pack test where 2nd SDU segment is added but no
* space is left in PDU to add data bytes of the newly added SDU.
* The test makes sure that a SDU header is removed again and that
* the SDU is in fact transmitted in the next PDU.
*/
int pdu_pack_no_space_test()
{
rlc_um_lte_test_context1 ctxt;
const int32_t num_sdus = 2;
// Push 2 SDUs into RLC1
byte_buffer_pool* pool = byte_buffer_pool::get_instance();
unique_byte_buffer_t sdu_bufs[num_sdus];
for (int i = 0; i < num_sdus; i++) {
sdu_bufs[i] = srslte::allocate_unique_buffer(*pool, true);
*sdu_bufs[i]->msg = i; // Write the index into the buffer
sdu_bufs[i]->N_bytes = 10; // Give each buffer a size of 1 byte
ctxt.rlc1.write_sdu(std::move(sdu_bufs[i]));
}
// Read 1 PDU from RLC1
byte_buffer_t pdu_bufs[num_sdus];
int grant_size = 14; // Provide grant slightly bigger than the SDU
int len = ctxt.rlc1.read_pdu(pdu_bufs[0].msg, grant_size);
pdu_bufs[0].N_bytes = len;
// the generated PDU is shorter than the MAC opportunity
TESTASSERT(len < grant_size);
// this PDU contains a full SDU
{
srslte::rlc_umd_pdu_header_t h;
rlc_um_read_data_pdu_header(&pdu_bufs[0], srslte::rlc_umd_sn_size_t::size10bits, &h);
TESTASSERT(h.fi == RLC_FI_FIELD_START_AND_END_ALIGNED);
}
// get the 2nd SDU
len = ctxt.rlc1.read_pdu(pdu_bufs[1].msg, grant_size);
pdu_bufs[1].N_bytes = len;
{
srslte::rlc_umd_pdu_header_t h;
rlc_um_read_data_pdu_header(&pdu_bufs[1], srslte::rlc_umd_sn_size_t::size10bits, &h);
TESTASSERT(h.fi == RLC_FI_FIELD_START_AND_END_ALIGNED);
}
return SRSLTE_SUCCESS;
}
int main(int argc, char** argv)
{
if (meas_obj_test()) {
return -1;
}
if (loss_test()) {
return -1;
}
if (basic_mbsfn_test()) {
return -1;
}
if (reassmble_test()) {
return -1;
}
if (reassmble_test2()) {
return -1;
}
TESTASSERT(pdu_pack_no_space_test() == 0);
}