|
|
|
@ -0,0 +1,210 @@
|
|
|
|
|
/* (C) 2013 by Andreas Eversberg <jolly@eversberg.eu>
|
|
|
|
|
*
|
|
|
|
|
* All Rights Reserved
|
|
|
|
|
*
|
|
|
|
|
* This program is free software; you can redistribute it and/or modify
|
|
|
|
|
* it under the terms of the GNU Affero General Public License as published by
|
|
|
|
|
* the Free Software Foundation; either version 3 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 Affero General Public License
|
|
|
|
|
* along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
|
*
|
|
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
#include <stdio.h>
|
|
|
|
|
#include <errno.h>
|
|
|
|
|
#include <unistd.h>
|
|
|
|
|
#include <string.h>
|
|
|
|
|
#include <stdlib.h>
|
|
|
|
|
|
|
|
|
|
#include <osmocom/core/bits.h>
|
|
|
|
|
#include <osmocom/core/utils.h>
|
|
|
|
|
|
|
|
|
|
#include "../../src/osmo-bts-trx/xcch.h"
|
|
|
|
|
#include "../../src/osmo-bts-trx/rach.h"
|
|
|
|
|
#include "../../src/osmo-bts-trx/sch.h"
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
#define ASSERT_TRUE(rc) \
|
|
|
|
|
if (!(rc)) { \
|
|
|
|
|
printf("Assert failed in %s:%d.\n", \
|
|
|
|
|
__FILE__, __LINE__); \
|
|
|
|
|
abort(); \
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* set condition to 1, to show debugging */
|
|
|
|
|
#define printd if (0) printf
|
|
|
|
|
|
|
|
|
|
static int ubits2sbits(ubit_t *ubits, sbit_t *sbits, int count)
|
|
|
|
|
{
|
|
|
|
|
int i;
|
|
|
|
|
|
|
|
|
|
for (i = 0; i < count; i++) {
|
|
|
|
|
if ((*ubits++) & 1)
|
|
|
|
|
*sbits++ = -127;
|
|
|
|
|
else
|
|
|
|
|
*sbits++ = 127;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
return count;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static void test_xcch(uint8_t *l2)
|
|
|
|
|
{
|
|
|
|
|
uint8_t result[23];
|
|
|
|
|
ubit_t bursts_u[116 * 4];
|
|
|
|
|
sbit_t bursts_s[116 * 4];
|
|
|
|
|
|
|
|
|
|
printd("Encoding: %s\n", osmo_hexdump(l2, 23));
|
|
|
|
|
|
|
|
|
|
/* encode */
|
|
|
|
|
xcch_encode(bursts_u, l2);
|
|
|
|
|
|
|
|
|
|
printd("U-Bits:\n");
|
|
|
|
|
printd("%s %02x %02x %s\n", osmo_hexdump(bursts_u, 57),
|
|
|
|
|
bursts_u[57], bursts_u[58],
|
|
|
|
|
osmo_hexdump(bursts_u + 59, 57));
|
|
|
|
|
printd("%s %02x %02x %s\n", osmo_hexdump(bursts_u + 116, 57),
|
|
|
|
|
bursts_u[57 + 116], bursts_u[58 + 116],
|
|
|
|
|
osmo_hexdump(bursts_u + 59 + 116, 57));
|
|
|
|
|
printd("%s %02x %02x %s\n", osmo_hexdump(bursts_u + 232, 57),
|
|
|
|
|
bursts_u[57 + 232], bursts_u[58 + 232],
|
|
|
|
|
osmo_hexdump(bursts_u + 59 + 232, 57));
|
|
|
|
|
printd("%s %02x %02x %s\n", osmo_hexdump(bursts_u + 348, 57),
|
|
|
|
|
bursts_u[57 + 348], bursts_u[58 + 348],
|
|
|
|
|
osmo_hexdump(bursts_u + 59 + 348, 57));
|
|
|
|
|
ubits2sbits(bursts_u, bursts_s, 116 * 4);
|
|
|
|
|
printd("S-Bits:\n");
|
|
|
|
|
printd("%s %02x %02x %s\n", osmo_hexdump((uint8_t *)bursts_s, 57),
|
|
|
|
|
(uint8_t)bursts_s[57], (uint8_t)bursts_s[58],
|
|
|
|
|
osmo_hexdump((uint8_t *)bursts_s + 59, 57));
|
|
|
|
|
printd("%s %02x %02x %s\n", osmo_hexdump((uint8_t *)bursts_s + 116, 57),
|
|
|
|
|
(uint8_t)bursts_s[57 + 116], (uint8_t)bursts_s[58 + 116],
|
|
|
|
|
osmo_hexdump((uint8_t *)bursts_s + 59 + 116, 57));
|
|
|
|
|
printd("%s %02x %02x %s\n", osmo_hexdump((uint8_t *)bursts_s + 232, 57),
|
|
|
|
|
(uint8_t)bursts_s[57 + 232], (uint8_t)bursts_s[58 + 232],
|
|
|
|
|
osmo_hexdump((uint8_t *)bursts_s + 59 + 232, 57));
|
|
|
|
|
printd("%s %02x %02x %s\n", osmo_hexdump((uint8_t *)bursts_s + 348, 57),
|
|
|
|
|
(uint8_t)bursts_s[57 + 348], (uint8_t)bursts_s[58 + 348],
|
|
|
|
|
osmo_hexdump((uint8_t *)bursts_s + 59 + 348, 57));
|
|
|
|
|
|
|
|
|
|
/* destroy */
|
|
|
|
|
memset(bursts_s, 0, 30);
|
|
|
|
|
memset(bursts_s + 116, 0, 30);
|
|
|
|
|
|
|
|
|
|
/* decode */
|
|
|
|
|
xcch_decode(result, bursts_s);
|
|
|
|
|
|
|
|
|
|
printd("Decoded: %s\n", osmo_hexdump(result, 23));
|
|
|
|
|
|
|
|
|
|
ASSERT_TRUE(!memcmp(l2, result, 23));
|
|
|
|
|
|
|
|
|
|
printd("\n");
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static void test_rach(uint8_t bsic, uint8_t ra)
|
|
|
|
|
{
|
|
|
|
|
uint8_t result;
|
|
|
|
|
ubit_t bursts_u[36];
|
|
|
|
|
sbit_t bursts_s[36];
|
|
|
|
|
|
|
|
|
|
printd("Encoding: %02x\n", ra);
|
|
|
|
|
|
|
|
|
|
/* encode */
|
|
|
|
|
rach_encode(bursts_u, &ra, bsic);
|
|
|
|
|
|
|
|
|
|
printd("U-Bits:\n");
|
|
|
|
|
printd("%s\n", osmo_hexdump(bursts_u, 36));
|
|
|
|
|
ubits2sbits(bursts_u, bursts_s, 36);
|
|
|
|
|
printd("S-Bits:\n");
|
|
|
|
|
printd("%s\n", osmo_hexdump((uint8_t *)bursts_s, 36));
|
|
|
|
|
|
|
|
|
|
/* destroy */
|
|
|
|
|
memset(bursts_s + 6, 0, 8);
|
|
|
|
|
|
|
|
|
|
/* decode */
|
|
|
|
|
rach_decode(&result, bursts_s, bsic);
|
|
|
|
|
|
|
|
|
|
printd("Decoded: %02x\n", result);
|
|
|
|
|
|
|
|
|
|
ASSERT_TRUE(ra == result);
|
|
|
|
|
|
|
|
|
|
printd("\n");
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static void test_sch(uint8_t *info)
|
|
|
|
|
{
|
|
|
|
|
uint8_t result[4];
|
|
|
|
|
ubit_t bursts_u[78];
|
|
|
|
|
sbit_t bursts_s[78];
|
|
|
|
|
|
|
|
|
|
/* zero bits 25 and above */
|
|
|
|
|
info[3] &= 1;
|
|
|
|
|
result[3] = 0;
|
|
|
|
|
|
|
|
|
|
printd("Encoding: %s\n", osmo_hexdump(info, 4));
|
|
|
|
|
|
|
|
|
|
/* encode */
|
|
|
|
|
sch_encode(bursts_u, info);
|
|
|
|
|
|
|
|
|
|
printd("U-Bits:\n");
|
|
|
|
|
printd("%s\n", osmo_hexdump(bursts_u, 78));
|
|
|
|
|
ubits2sbits(bursts_u, bursts_s, 78);
|
|
|
|
|
printd("S-Bits:\n");
|
|
|
|
|
printd("%s\n", osmo_hexdump((uint8_t *)bursts_s, 78));
|
|
|
|
|
|
|
|
|
|
/* destroy */
|
|
|
|
|
memset(bursts_s + 6, 0, 10);
|
|
|
|
|
|
|
|
|
|
/* decode */
|
|
|
|
|
sch_decode(result, bursts_s);
|
|
|
|
|
|
|
|
|
|
printd("Decoded: %s\n", osmo_hexdump(result, 4));
|
|
|
|
|
|
|
|
|
|
ASSERT_TRUE(!memcmp(info, result, 4));
|
|
|
|
|
|
|
|
|
|
printd("\n");
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
uint8_t test_l2[][23] = {
|
|
|
|
|
/* dummy frame */
|
|
|
|
|
{ 0x03, 0x03, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00,
|
|
|
|
|
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
|
|
|
|
|
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 },
|
|
|
|
|
/* random frame */
|
|
|
|
|
{ 0xa3, 0xaf, 0x5f, 0xc6, 0x36, 0x43, 0x44, 0xab,
|
|
|
|
|
0xd9, 0x6d, 0x7d, 0x62, 0x24, 0xc9, 0xd2, 0x92,
|
|
|
|
|
0xfa, 0x27, 0x5d, 0x71, 0x7a, 0x59, 0xa8 },
|
|
|
|
|
/* jolly frame */
|
|
|
|
|
{ 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07, 0x08,
|
|
|
|
|
0x09, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f, 0x10,
|
|
|
|
|
0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17 },
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
int main(int argc, char **argv)
|
|
|
|
|
{
|
|
|
|
|
int i;
|
|
|
|
|
|
|
|
|
|
for (i = 0; i < sizeof(test_l2) / sizeof(test_l2[0]); i++)
|
|
|
|
|
test_xcch(test_l2[i]);
|
|
|
|
|
|
|
|
|
|
for (i = 0; i < 256; i++) {
|
|
|
|
|
test_rach(0x3f, i);
|
|
|
|
|
test_rach(0x00, i);
|
|
|
|
|
test_rach(0x1a, i);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
for (i = 0; i < sizeof(test_l2) / sizeof(test_l2[0]); i++)
|
|
|
|
|
test_sch(test_l2[i]);
|
|
|
|
|
|
|
|
|
|
printf("Success\n");
|
|
|
|
|
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|