2019-05-27 09:54:11 +00:00
|
|
|
/* Osmocom utility type definitions in TTCN-3
|
|
|
|
* (C) 2017-2019 Harald Welte <laforge@gnumonks.org>
|
|
|
|
* All rights reserved.
|
|
|
|
*
|
|
|
|
* Released under the terms of GNU General Public License, Version 2 or
|
|
|
|
* (at your option) any later version.
|
|
|
|
*
|
|
|
|
* SPDX-License-Identifier: GPL-2.0-or-later
|
|
|
|
*/
|
|
|
|
|
2017-07-14 16:28:55 +00:00
|
|
|
module Osmocom_Types {
|
2018-02-15 19:40:36 +00:00
|
|
|
|
|
|
|
import from General_Types all;
|
|
|
|
|
2017-07-14 16:58:07 +00:00
|
|
|
type integer uint8_t (0..255) with { variant "unsigned 8 bit" };
|
2017-07-14 16:28:55 +00:00
|
|
|
type integer uint16_t (0..65535) with { variant "unsigned 16 bit" };
|
2017-07-28 11:30:24 +00:00
|
|
|
type integer uint24_t (0..16777215) with { variant "unsigned 24 bit" };
|
2017-07-14 16:58:07 +00:00
|
|
|
type integer uint32_t (0..4294967295) with { variant "unsigned 32 bit" };
|
|
|
|
|
|
|
|
type integer int8_t (-128..127) with { variant "8 bit" };
|
|
|
|
type integer int16_t (-32768..32767) with { variant "16 bit" };
|
|
|
|
|
2017-07-16 05:35:10 +00:00
|
|
|
type integer uint1_t (0..1) with { variant "unsigned 1 bit" };
|
2017-07-14 16:28:55 +00:00
|
|
|
type integer uint2_t (0..3) with { variant "unsigned 2 bit" };
|
|
|
|
type integer uint3_t (0..7) with { variant "unsigned 3 bit" };
|
|
|
|
type integer uint4_t (0..15) with { variant "unsigned 4 bit" };
|
|
|
|
type integer uint5_t (0..31) with { variant "unsigned 5 bit" };
|
|
|
|
type integer uint6_t (0..63) with { variant "unsigned 6 bit" };
|
|
|
|
type integer uint7_t (0..127) with { variant "unsigned 7 bit" };
|
|
|
|
type integer uint9_t (0..511) with { variant "unsigned 9 bit" };
|
|
|
|
type integer uint10_t (0..1023) with { variant "unsigned 10 bit" };
|
|
|
|
type integer uint11_t (0..2047) with { variant "unsigned 11 bit" };
|
|
|
|
type integer uint12_t (0..4095) with { variant "unsigned 12 bit" };
|
2017-07-14 16:58:07 +00:00
|
|
|
type integer uint13_t (0..8191) with { variant "unsigned 13 bit" };
|
|
|
|
type integer uint14_t (0..16383) with { variant "unsigned 14 bit" };
|
|
|
|
type integer uint15_t (0..32767) with { variant "unsigned 15 bit" };
|
|
|
|
|
2018-02-25 11:39:05 +00:00
|
|
|
|
|
|
|
const uint16_t c_UINT16_MAX := 65535;
|
|
|
|
const uint32_t c_UINT32_MAX := 4294967295;
|
|
|
|
|
2017-07-14 16:58:07 +00:00
|
|
|
type record Arfcn {
|
|
|
|
boolean pcs,
|
|
|
|
uint15_t arfcn
|
|
|
|
} with { variant "" };
|
|
|
|
|
2018-01-25 08:20:04 +00:00
|
|
|
/* return random integer between 0 and max */
|
|
|
|
function f_rnd_int(integer max) return integer {
|
|
|
|
return float2int(rnd()*int2float(max));
|
|
|
|
}
|
|
|
|
|
|
|
|
/* return hexstring composed of random digits */
|
|
|
|
function f_rnd_hexstring(in integer len, in integer max := 15) return hexstring {
|
|
|
|
var integer i;
|
|
|
|
var hexstring ret := ''H;
|
|
|
|
for (i := 0; i < len; i := i + 1) {
|
|
|
|
ret := ret & int2hex(f_rnd_int(max), 1);
|
|
|
|
}
|
|
|
|
return ret;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* return octetstring composed of random bytes */
|
|
|
|
function f_rnd_octstring(in integer len) return octetstring {
|
|
|
|
var integer i;
|
|
|
|
var octetstring ret := ''O;
|
|
|
|
for (i := 0; i < len; i := i + 1) {
|
|
|
|
ret := ret & int2oct(f_rnd_int(255), 1);
|
|
|
|
}
|
|
|
|
return ret;
|
|
|
|
}
|
|
|
|
|
|
|
|
function f_rnd_imsi(in hexstring prefix) return hexstring {
|
|
|
|
return prefix & f_rnd_hexstring(15 - lengthof(prefix), 9);
|
|
|
|
}
|
|
|
|
|
|
|
|
function f_rnd_msisdn(in octetstring prefix, integer len := 6) return octetstring {
|
|
|
|
return prefix & f_rnd_octstring(len - lengthof(prefix));
|
|
|
|
}
|
|
|
|
|
2018-01-26 17:55:00 +00:00
|
|
|
function f_sleep(float seconds) {
|
|
|
|
timer T := seconds;
|
|
|
|
T.start;
|
|
|
|
T.timeout;
|
|
|
|
}
|
|
|
|
|
2018-02-15 19:40:36 +00:00
|
|
|
function bool2bit(boolean inp) return BIT1 {
|
|
|
|
if (inp) {
|
|
|
|
return '1'B;
|
|
|
|
} else {
|
|
|
|
return '0'B;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
function bool2bit_tmpl(template boolean inp) return template BIT1 {
|
|
|
|
if (istemplatekind(inp, "omit")) {
|
|
|
|
return omit;
|
|
|
|
} else if (istemplatekind(inp, "*")) {
|
|
|
|
return *;
|
|
|
|
} else if (istemplatekind(inp, "?")) {
|
2018-02-16 17:12:59 +00:00
|
|
|
return ?;
|
2018-02-15 19:40:36 +00:00
|
|
|
} else {
|
|
|
|
if (valueof(inp)) {
|
|
|
|
return '1'B;
|
|
|
|
} else {
|
|
|
|
return '0'B;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2018-02-25 15:33:38 +00:00
|
|
|
type record of integer IntegerRecord;
|
|
|
|
|
|
|
|
function int2bool(integer int) return boolean {
|
|
|
|
if (int != 0) {
|
|
|
|
return true;
|
|
|
|
} else {
|
|
|
|
return false;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
function f_array_contains(IntegerRecord arr, integer key) return boolean {
|
|
|
|
for (var integer i:= 0; i< sizeof(arr); i := i + 1) {
|
|
|
|
if (arr[i] == key) {
|
|
|
|
return true;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return false;
|
|
|
|
}
|
|
|
|
|
2018-02-26 16:37:47 +00:00
|
|
|
/* re-start given timer in a warning-safe way: Stop (only if running) + start */
|
|
|
|
function f_timer_safe_restart(timer T) {
|
|
|
|
if (T.running) {
|
|
|
|
T.stop;
|
|
|
|
}
|
|
|
|
T.start;
|
|
|
|
}
|
|
|
|
|
2018-03-03 19:38:19 +00:00
|
|
|
/* divide two integers and return rounded-up result */
|
|
|
|
function f_div_round_up(integer dividend, integer divisor) return integer {
|
|
|
|
var integer x := dividend / divisor;
|
|
|
|
if (dividend rem divisor != 0) {
|
|
|
|
x := x+1;
|
|
|
|
}
|
|
|
|
return x;
|
|
|
|
}
|
|
|
|
|
2019-05-02 16:33:16 +00:00
|
|
|
function imsi_hex2oct(hexstring imsi) return octetstring {
|
|
|
|
var hexstring tmp := ''H;
|
|
|
|
var octetstring ret;
|
|
|
|
var integer i;
|
|
|
|
|
|
|
|
/* swap nibbles and pad with F if insufficient input nibbles */
|
|
|
|
for (i := 0; i < lengthof(imsi); i := i+1) {
|
|
|
|
if (i+1 < lengthof(imsi)) {
|
|
|
|
tmp := tmp & imsi[i+1];
|
|
|
|
} else {
|
|
|
|
tmp := tmp & 'F'H;
|
|
|
|
}
|
|
|
|
tmp := tmp & imsi[i];
|
|
|
|
i := i+1;
|
|
|
|
}
|
|
|
|
ret := hex2oct(tmp);
|
|
|
|
return ret;
|
|
|
|
}
|
|
|
|
|
2018-02-15 19:40:36 +00:00
|
|
|
|
2017-07-14 16:28:55 +00:00
|
|
|
} with { encode "RAW"; variant "FIELDORDER(msb)" }
|