frnet: Add BSSGP_Emulation

Change-Id: I00f69a30f8ffcaed680f0f885b6789b45120f700
laforge/fr
Harald Welte 2 years ago
parent 7dcf174098
commit e241df4c72
  1. 34
      fr-net/FRNET_Tests.ttcn

@ -2,8 +2,10 @@ module FRNET_Tests {
import from General_Types all;
import from Osmocom_Types all;
import from Osmocom_Gb_Types all;
import from NS_Emulation all;
import from BSSGP_Emulation all;
modulepar {
NSConfigurations mp_nsconfig := {
@ -23,33 +25,47 @@ modulepar {
}
type record GbInstance {
NS_CT vc_NS
//BSSGP_CT vc_BSSGP,
//BssgpConfig cfg
NS_CT vc_NS,
BSSGP_CT vc_BSSGP,
BssgpConfig cfg
};
const integer NUM_GB := 1;
type record length(NUM_GB) of GbInstance GbInstances;
type record length(NUM_GB) of NSConfiguration NSConfigurations;
//type record length(NUM_GB) of BssgpCellId BssgpCellIds;
type record length(NUM_GB) of BssgpCellId BssgpCellIds;
type component test_CT {
var GbInstances g_gb;
port NS_PT NS[NUM_GB];
};
private function f_init_gb(inout GbInstance gb, charstring id, integer offset) runs on test_CT {
var charstring id_idx := id & int2str(offset);
gb.vc_NS := NS_CT.create(id_idx & "-NSemu");
//gb_vc_BSSGP := BSSGP_CT.create(id_idx & "-BSSGPemu");
//connect(gb.vc_BSSGP:BSCP, gb.vc_NS:NS_SP);
connect(self:NS[offset], gb.vc_NS:NS_SP);
gb.vc_BSSGP := BSSGP_CT.create(id_idx & "-BSSGPemu");
connect(gb.vc_BSSGP:BSCP, gb.vc_NS:NS_SP);
gb.vc_NS.start(NSStart(mp_nsconfig[offset], id_idx));
//gb.vc_BSSGP.start(BssgpStart(gb.cfg));
gb.vc_BSSGP.start(BssgpStart(gb.cfg));
}
testcase TC_foo() runs on test_CT {
g_gb[0].cfg := {
nsei := 123,
bvci := 1123,
cell_id := {
ra_id := {
lai := {
mcc_mnc := '262F42'H,
lac := 11123
},
rac := 1
},
cell_id := 31123
},
sgsn_role := true,
depth := BSSGP_DECODE_DEPTH_LLC
};
f_init_gb(g_gb[0], "gb", 0);
while (true) {
f_sleep(100.0);

Loading…
Cancel
Save