Add initial TTCN3 test for GbProxy
The first testcase, TC_BVC_bringup just waits for NS/BSSGP Emulation to do their thing. If nothing fails there then we pass. Related: SYS#5002 Change-Id: Ib3dc05fe5598b53e963ca863968e387cc36b9de3
This commit is contained in:
parent
654f85e2b8
commit
423d8f48f8
4
Makefile
4
Makefile
|
|
@ -13,8 +13,8 @@
|
|||
# See the License for the specific language governing permissions and
|
||||
# limitations under the License.
|
||||
|
||||
SUBDIRS=bsc bsc-nat bts ccid ggsn_tests hlr mgw mme msc pcu pgw remsim sccp selftest sgsn \
|
||||
simtrace sip stp sysinfo smlc
|
||||
SUBDIRS=bsc bsc-nat bts ccid gbproxy ggsn_tests hlr mgw mme msc pcu pgw remsim \
|
||||
sccp selftest sgsn simtrace sip stp sysinfo smlc
|
||||
|
||||
NPROC=$(shell nproc 2>/dev/null)
|
||||
ifeq ($(NPROC),)
|
||||
|
|
|
|||
|
|
@ -0,0 +1,33 @@
|
|||
[ORDERED_INCLUDE]
|
||||
# Common configuration, shared between test suites
|
||||
"../Common.cfg"
|
||||
# testsuite specific configuration, not expected to change
|
||||
"./GBProxy_Tests.default"
|
||||
|
||||
# Local configuration below
|
||||
|
||||
[LOGGING]
|
||||
|
||||
[TESTPORT_PARAMETERS]
|
||||
*.GBPVTY.CTRL_HOSTNAME := "127.0.0.1"
|
||||
|
||||
[MODULE_PARAMETERS]
|
||||
GBProxy_Tests.mp_nsconfig_pcu := {
|
||||
{provider := { ip := {
|
||||
local_ip := "127.0.0.1",
|
||||
remote_ip := "127.0.0.1"
|
||||
}}},
|
||||
{provider := { ip := {
|
||||
local_ip := "127.0.0.1",
|
||||
remote_ip := "127.0.0.1"
|
||||
}}},
|
||||
{provider := { ip := {
|
||||
local_ip := "127.0.0.1",
|
||||
remote_ip := "127.0.0.1"
|
||||
}}}
|
||||
}
|
||||
|
||||
[MAIN_CONTROLLER]
|
||||
|
||||
[EXECUTE]
|
||||
GBProxy_Tests.control
|
||||
|
|
@ -0,0 +1,27 @@
|
|||
[LOGGING]
|
||||
FileMask := LOG_ALL | TTCN_MATCHING;
|
||||
|
||||
"IPA-CTRL-IPA".FileMask := ERROR | WARNING | PARALLEL | VERDICTOP;
|
||||
"GBProxy-GSUP-IPA".FileMask := ERROR | WARNING | PARALLEL | VERDICTOP;
|
||||
"GBProxy-Gb0-NS".FileMask := ERROR | WARNING | PARALLEL | VERDICTOP;
|
||||
"GBProxy-Gb0-BSSGP".FileMask := ERROR | WARNING | PARALLEL | VERDICTOP;
|
||||
"GBProxy-GSUP".FileMask := ERROR | WARNING | PARALLEL | VERDICTOP;
|
||||
|
||||
[TESTPORT_PARAMETERS]
|
||||
*.GBPVTY.CTRL_MODE := "client"
|
||||
*.GBPVTY.CTRL_HOSTNAME := "127.0.0.1"
|
||||
*.GBPVTY.CTRL_PORTNUM := "4246"
|
||||
*.GBPVTY.CTRL_LOGIN_SKIPPED := "yes"
|
||||
*.GBPVTY.CTRL_DETECT_SERVER_DISCONNECTED := "yes"
|
||||
*.GBPVTY.CTRL_READMODE := "buffered"
|
||||
*.GBPVTY.CTRL_CLIENT_CLEANUP_LINEFEED := "yes"
|
||||
*.GBPVTY.CTRL_DETECT_CONNECTION_ESTABLISHMENT_RESULT := "yes"
|
||||
*.GBPVTY.PROMPT1 := "OsmoGbProxy> "
|
||||
|
||||
|
||||
[MODULE_PARAMETERS]
|
||||
Osmocom_VTY_Functions.mp_prompt_prefix := "OsmoGbProxy";
|
||||
|
||||
[MAIN_CONTROLLER]
|
||||
|
||||
[EXECUTE]
|
||||
|
|
@ -0,0 +1,480 @@
|
|||
module GBProxy_Tests {
|
||||
|
||||
/* Osmocom GBProxy test suite in TTCN-3
|
||||
* (C) 2020 sysmocom - s.f.m.c. GmbH
|
||||
* All rights reserved.
|
||||
*
|
||||
* Author: Daniel Willmann <dwillmann@sysmocom.de>
|
||||
|
||||
* 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
|
||||
*/
|
||||
|
||||
import from General_Types all;
|
||||
import from Osmocom_Types all;
|
||||
import from GSM_Types all;
|
||||
import from Native_Functions all;
|
||||
import from NS_Types all;
|
||||
import from NS_Emulation all;
|
||||
import from BSSGP_Types all;
|
||||
import from BSSGP_Emulation all;
|
||||
import from SCCPasp_Types all;
|
||||
import from Osmocom_Gb_Types all;
|
||||
|
||||
import from MobileL3_CommonIE_Types all;
|
||||
import from MobileL3_GMM_SM_Types all;
|
||||
import from MobileL3_Types all;
|
||||
import from L3_Templates all;
|
||||
import from L3_Common all;
|
||||
|
||||
import from TELNETasp_PortType all;
|
||||
import from Osmocom_VTY_Functions all;
|
||||
|
||||
import from LLC_Types all;
|
||||
import from LLC_Templates all;
|
||||
|
||||
import from GSM_RR_Types all;
|
||||
|
||||
modulepar {
|
||||
/* IP/port on which we run our internal GSUP/HLR emulation */
|
||||
NSConfigurations_SGSN mp_nsconfig_sgsn := {
|
||||
{
|
||||
provider := {
|
||||
ip := {
|
||||
address_family := AF_INET,
|
||||
local_udp_port := 7777,
|
||||
local_ip := "127.0.0.1",
|
||||
remote_udp_port := 23000,
|
||||
remote_ip := "127.0.0.1"
|
||||
}
|
||||
},
|
||||
nsvci := 101,
|
||||
nsei := 101,
|
||||
role_sgsn := true,
|
||||
handle_sns := true
|
||||
}
|
||||
};
|
||||
NSConfigurations_PCU mp_nsconfig_pcu := {
|
||||
{
|
||||
provider := {
|
||||
ip := {
|
||||
address_family := AF_INET,
|
||||
local_udp_port := 21010,
|
||||
local_ip := "127.0.0.1",
|
||||
remote_udp_port := 23000,
|
||||
remote_ip := "127.0.0.1"
|
||||
}
|
||||
},
|
||||
nsvci := 97,
|
||||
nsei := 96,
|
||||
role_sgsn := false,
|
||||
handle_sns := false
|
||||
},
|
||||
{
|
||||
provider := {
|
||||
ip := {
|
||||
address_family := AF_INET,
|
||||
local_udp_port := 21011,
|
||||
local_ip := "127.0.0.1",
|
||||
remote_udp_port := 23000,
|
||||
remote_ip := "127.0.0.1"
|
||||
}
|
||||
},
|
||||
nsvci := 98,
|
||||
nsei := 97,
|
||||
role_sgsn := false,
|
||||
handle_sns := false
|
||||
},
|
||||
{
|
||||
provider := {
|
||||
ip := {
|
||||
address_family := AF_INET,
|
||||
local_udp_port := 21012,
|
||||
local_ip := "127.0.0.1",
|
||||
remote_udp_port := 23000,
|
||||
remote_ip := "127.0.0.1"
|
||||
}
|
||||
},
|
||||
nsvci := 99,
|
||||
nsei := 98,
|
||||
role_sgsn := false,
|
||||
handle_sns := false
|
||||
}
|
||||
};
|
||||
};
|
||||
|
||||
const integer NUM_BVC_PER_NSE := 3;
|
||||
type record GbInstance {
|
||||
NS_CT vc_NS,
|
||||
BSSGP_CT vc_BSSGP,
|
||||
BSSGP_BVC_CT vc_BSSGP_BVC[NUM_BVC_PER_NSE],
|
||||
BssgpConfig cfg
|
||||
};
|
||||
|
||||
const integer NUM_PCU := 3;
|
||||
type record length(NUM_PCU) of GbInstance GbInstances_PCU;
|
||||
type record length(NUM_PCU) of NSConfiguration NSConfigurations_PCU;
|
||||
type record length(NUM_PCU) of BssgpCellId BssgpCellIds;
|
||||
|
||||
const integer NUM_SGSN := 1;
|
||||
type record length(NUM_SGSN) of GbInstance GbInstances_SGSN;
|
||||
type record length(NUM_SGSN) of NSConfiguration NSConfigurations_SGSN;
|
||||
|
||||
type component test_CT {
|
||||
var GbInstances_PCU g_pcu;
|
||||
var GbInstances_SGSN g_sgsn;
|
||||
|
||||
port BSSGP_CT_PROC_PT PROC;
|
||||
|
||||
port TELNETasp_PT GBPVTY;
|
||||
|
||||
var boolean g_initialized := false;
|
||||
var boolean g_use_echo := false;
|
||||
};
|
||||
|
||||
type component BSSGP_ConnHdlr {
|
||||
port BSSGP_PT PCU[NUM_PCU];
|
||||
port BSSGP_PT PCU_SIG[NUM_PCU];
|
||||
port BSSGP_PROC_PT PCU_PROC[NUM_PCU];
|
||||
port BSSGP_PT SGSN[NUM_SGSN];
|
||||
port BSSGP_PT SGSN_SIG[NUM_SGSN];
|
||||
port BSSGP_PROC_PT SGSN_PROC[NUM_SGSN];
|
||||
|
||||
var BSSGP_ConnHdlrPars g_pars;
|
||||
timer g_Tguard;
|
||||
var LLC_Entities llc;
|
||||
}
|
||||
|
||||
type record SGSN_ConnHdlrNetworkPars {
|
||||
boolean expect_ptmsi,
|
||||
boolean expect_auth,
|
||||
boolean expect_ciph
|
||||
};
|
||||
|
||||
type record BSSGP_ConnHdlrPars {
|
||||
/* IMEI of the simulated ME */
|
||||
hexstring imei,
|
||||
/* IMSI of the simulated MS */
|
||||
hexstring imsi,
|
||||
/* MSISDN of the simulated MS (probably unused) */
|
||||
hexstring msisdn,
|
||||
/* P-TMSI allocated to the simulated MS */
|
||||
OCT4 p_tmsi optional,
|
||||
OCT3 p_tmsi_sig optional,
|
||||
/* TLLI of the simulated MS */
|
||||
OCT4 tlli,
|
||||
OCT4 tlli_old optional,
|
||||
RoutingAreaIdentificationV ra optional,
|
||||
BssgpCellIds bssgp_cell_id,
|
||||
float t_guard
|
||||
};
|
||||
|
||||
private function f_cellid_to_RAI(in BssgpCellId cell_id) return RoutingAreaIdentificationV {
|
||||
/* mcc_mnc is encoded as of 24.008 10.5.5.15 */
|
||||
var BcdMccMnc mcc_mnc := cell_id.ra_id.lai.mcc_mnc;
|
||||
|
||||
var RoutingAreaIdentificationV ret := {
|
||||
mccDigit1 := mcc_mnc[0],
|
||||
mccDigit2 := mcc_mnc[1],
|
||||
mccDigit3 := mcc_mnc[2],
|
||||
mncDigit3 := mcc_mnc[3],
|
||||
mncDigit1 := mcc_mnc[4],
|
||||
mncDigit2 := mcc_mnc[5],
|
||||
lac := int2oct(cell_id.ra_id.lai.lac, 16),
|
||||
rac := int2oct(cell_id.ra_id.rac, 8)
|
||||
}
|
||||
return ret;
|
||||
};
|
||||
|
||||
private function f_init_gb_pcu(inout GbInstance gb, charstring id, integer offset) runs on test_CT {
|
||||
gb.vc_NS := NS_CT.create(id & "-NS(PCU)" & int2str(offset));
|
||||
gb.vc_BSSGP := BSSGP_CT.create(id & "-BSSGP(PCU)" & int2str(offset));
|
||||
/* connect lower end of BSSGP emulation with NS upper port */
|
||||
connect(gb.vc_BSSGP:BSCP, gb.vc_NS:NS_SP);
|
||||
|
||||
gb.vc_NS.start(NSStart(mp_nsconfig_pcu[offset]));
|
||||
gb.vc_BSSGP.start(BssgpStart(gb.cfg, id));
|
||||
|
||||
for (var integer i := 0; i < lengthof(gb.cfg.bvc); i := i + 1) {
|
||||
connect(self:PROC, gb.vc_BSSGP:PROC);
|
||||
gb.vc_BSSGP_BVC[i] := f_bssgp_get_bvci_ct(gb.cfg.bvc[i].bvci, PROC);
|
||||
disconnect(self:PROC, gb.vc_BSSGP:PROC);
|
||||
}
|
||||
}
|
||||
|
||||
private function f_init_gb_sgsn(inout GbInstance gb, charstring id, integer offset) runs on test_CT {
|
||||
gb.vc_NS := NS_CT.create(id & "-NS(SGSN)" & int2str(offset));
|
||||
gb.vc_BSSGP := BSSGP_CT.create(id & "-BSSGP(SGSN)" & int2str(offset));
|
||||
/* connect lower end of BSSGP emulation with NS upper port */
|
||||
connect(gb.vc_BSSGP:BSCP, gb.vc_NS:NS_SP);
|
||||
|
||||
gb.vc_NS.start(NSStart(mp_nsconfig_sgsn[offset]));
|
||||
gb.vc_BSSGP.start(BssgpStart(gb.cfg, id));
|
||||
|
||||
for (var integer i := 0; i < lengthof(gb.cfg.bvc); i := i + 1) {
|
||||
connect(self:PROC, gb.vc_BSSGP:PROC);
|
||||
gb.vc_BSSGP_BVC[i] := f_bssgp_get_bvci_ct(gb.cfg.bvc[i].bvci, PROC);
|
||||
disconnect(self:PROC, gb.vc_BSSGP:PROC);
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
private function f_init_vty() runs on test_CT {
|
||||
map(self:GBPVTY, system:GBPVTY);
|
||||
f_vty_set_prompts(GBPVTY);
|
||||
f_vty_transceive(GBPVTY, "enable");
|
||||
}
|
||||
|
||||
/* mcc_mnc is 24.008 10.5.5.15 encoded. 262 42 */
|
||||
function f_init(BcdMccMnc mcc_mnc := '262F42'H) runs on test_CT {
|
||||
var integer i;
|
||||
|
||||
if (g_initialized == true) {
|
||||
return;
|
||||
}
|
||||
g_initialized := true;
|
||||
g_pcu[0].cfg := {
|
||||
nsei := 96,
|
||||
sgsn_role := false,
|
||||
bvc := { {
|
||||
bvci := 196,
|
||||
cell_id := {
|
||||
ra_id := {
|
||||
lai := {
|
||||
mcc_mnc := mcc_mnc, lac := 13135},
|
||||
rac := 0
|
||||
},
|
||||
cell_id := 20960
|
||||
},
|
||||
depth := BSSGP_DECODE_DEPTH_BSSGP
|
||||
} }
|
||||
};
|
||||
g_pcu[1].cfg := {
|
||||
nsei := 97,
|
||||
sgsn_role := false,
|
||||
bvc := { {
|
||||
bvci := 210,
|
||||
cell_id := {
|
||||
ra_id := {
|
||||
lai := {
|
||||
mcc_mnc := mcc_mnc, lac := 13200},
|
||||
rac := 0
|
||||
},
|
||||
cell_id := 20961
|
||||
},
|
||||
depth := BSSGP_DECODE_DEPTH_BSSGP
|
||||
} }
|
||||
};
|
||||
g_pcu[2].cfg := {
|
||||
nsei := 98,
|
||||
sgsn_role := false,
|
||||
bvc := { {
|
||||
bvci := 220,
|
||||
cell_id := {
|
||||
ra_id := {
|
||||
lai := {
|
||||
mcc_mnc := mcc_mnc, lac := 13300},
|
||||
rac := 0
|
||||
},
|
||||
cell_id := 20962
|
||||
},
|
||||
depth := BSSGP_DECODE_DEPTH_BSSGP
|
||||
} }
|
||||
};
|
||||
|
||||
g_sgsn[0].cfg := {
|
||||
nsei := 101,
|
||||
sgsn_role := true,
|
||||
bvc := {
|
||||
{
|
||||
bvci := 196,
|
||||
cell_id := {
|
||||
ra_id := {
|
||||
lai := {
|
||||
mcc_mnc := mcc_mnc, lac := 13135},
|
||||
rac := 0
|
||||
},
|
||||
cell_id := 20960
|
||||
},
|
||||
depth := BSSGP_DECODE_DEPTH_BSSGP
|
||||
},
|
||||
{
|
||||
bvci := 210,
|
||||
cell_id := {
|
||||
ra_id := {
|
||||
lai := {
|
||||
mcc_mnc := mcc_mnc, lac := 13200},
|
||||
rac := 0
|
||||
},
|
||||
cell_id := 20961
|
||||
},
|
||||
depth := BSSGP_DECODE_DEPTH_BSSGP
|
||||
},
|
||||
{
|
||||
bvci := 220,
|
||||
cell_id := {
|
||||
ra_id := {
|
||||
lai := {
|
||||
mcc_mnc := mcc_mnc, lac := 13300},
|
||||
rac := 0
|
||||
},
|
||||
cell_id := 20962
|
||||
},
|
||||
depth := BSSGP_DECODE_DEPTH_BSSGP
|
||||
}
|
||||
}
|
||||
};
|
||||
|
||||
f_init_vty();
|
||||
f_init_gb_sgsn(g_sgsn[0], "GbProxy_Test-SGSN0", 0);
|
||||
f_sleep(4.0);
|
||||
f_init_gb_pcu(g_pcu[0], "GbProxy_Test-PCU0", 0);
|
||||
f_init_gb_pcu(g_pcu[1], "GbProxy_Test-PCU1", 1);
|
||||
f_init_gb_pcu(g_pcu[2], "GbProxy_Test-PCU2", 2);
|
||||
}
|
||||
|
||||
function f_cleanup() runs on test_CT {
|
||||
self.stop;
|
||||
}
|
||||
|
||||
type function void_fn(charstring id) runs on BSSGP_ConnHdlr;
|
||||
|
||||
/* helper function to create, connect and start a BSSGP_ConnHdlr component */
|
||||
function f_start_handler(void_fn fn, charstring id, GbInstances_PCU pcu, GbInstances_SGSN sgsn, integer imsi_suffix,
|
||||
float t_guard := 30.0)
|
||||
runs on test_CT return BSSGP_ConnHdlr {
|
||||
var BSSGP_ConnHdlr vc_conn;
|
||||
|
||||
var BSSGP_ConnHdlrPars pars := {
|
||||
imei := f_gen_imei(imsi_suffix),
|
||||
imsi := f_gen_imsi(imsi_suffix),
|
||||
msisdn := f_gen_msisdn(imsi_suffix),
|
||||
p_tmsi := omit,
|
||||
p_tmsi_sig := omit,
|
||||
tlli := f_gprs_tlli_random(),
|
||||
tlli_old := omit,
|
||||
ra := omit,
|
||||
bssgp_cell_id := { pcu[0].cfg.bvc[0].cell_id, pcu[1].cfg.bvc[0].cell_id, pcu[2].cfg.bvc[0].cell_id },
|
||||
t_guard := t_guard
|
||||
};
|
||||
|
||||
vc_conn := BSSGP_ConnHdlr.create(id);
|
||||
// PDU side
|
||||
connect(vc_conn:PCU[0], pcu[0].vc_BSSGP_BVC[0]:BSSGP_SP);
|
||||
connect(vc_conn:PCU_SIG[0], pcu[0].vc_BSSGP_BVC[0]:BSSGP_SP_SIG);
|
||||
connect(vc_conn:PCU_PROC[0], pcu[0].vc_BSSGP_BVC[0]:BSSGP_PROC);
|
||||
connect(vc_conn:PCU[1], pcu[1].vc_BSSGP_BVC[0]:BSSGP_SP);
|
||||
connect(vc_conn:PCU_SIG[1], pcu[1].vc_BSSGP_BVC[0]:BSSGP_SP_SIG);
|
||||
connect(vc_conn:PCU_PROC[1], pcu[1].vc_BSSGP_BVC[0]:BSSGP_PROC);
|
||||
connect(vc_conn:PCU[2], pcu[2].vc_BSSGP_BVC[0]:BSSGP_SP);
|
||||
connect(vc_conn:PCU_SIG[2], pcu[2].vc_BSSGP_BVC[0]:BSSGP_SP_SIG);
|
||||
connect(vc_conn:PCU_PROC[2], pcu[2].vc_BSSGP_BVC[0]:BSSGP_PROC);
|
||||
// SGSN side
|
||||
connect(vc_conn:SGSN[0], sgsn[0].vc_BSSGP_BVC[0]:BSSGP_SP);
|
||||
connect(vc_conn:SGSN_SIG[0], sgsn[0].vc_BSSGP_BVC[0]:BSSGP_SP_SIG);
|
||||
connect(vc_conn:SGSN_PROC[0], sgsn[0].vc_BSSGP_BVC[0]:BSSGP_PROC);
|
||||
|
||||
vc_conn.start(f_handler_init(fn, id, pars));
|
||||
return vc_conn;
|
||||
}
|
||||
|
||||
private altstep as_Tguard() runs on BSSGP_ConnHdlr {
|
||||
[] g_Tguard.timeout {
|
||||
setverdict(fail, "Tguard timeout");
|
||||
mtc.stop;
|
||||
}
|
||||
}
|
||||
|
||||
/* first function called in every ConnHdlr */
|
||||
private function f_handler_init(void_fn fn, charstring id, BSSGP_ConnHdlrPars pars)
|
||||
runs on BSSGP_ConnHdlr {
|
||||
/* do some common stuff like setting up g_pars */
|
||||
g_pars := pars;
|
||||
|
||||
llc := f_llc_create(false);
|
||||
|
||||
|
||||
g_Tguard.start(pars.t_guard);
|
||||
activate(as_Tguard());
|
||||
|
||||
/* call the user-supplied test case function */
|
||||
fn.apply(id);
|
||||
}
|
||||
|
||||
/* TODO:
|
||||
* Detach without Attach
|
||||
* SM procedures without attach / RAU
|
||||
* ATTACH / RAU
|
||||
** with / without authentication
|
||||
** with / without P-TMSI allocation
|
||||
* re-transmissions of LLC frames
|
||||
* PDP Context activation
|
||||
** with different GGSN config in SGSN VTY
|
||||
** with different PDP context type (v4/v6/v46)
|
||||
** timeout from GGSN
|
||||
** multiple / secondary PDP context
|
||||
*/
|
||||
|
||||
private function f_TC_BVC_bringup(charstring id) runs on BSSGP_ConnHdlr {
|
||||
f_sleep(5.0);
|
||||
setverdict(pass);
|
||||
}
|
||||
|
||||
testcase TC_BVC_bringup() runs on test_CT {
|
||||
var BSSGP_ConnHdlr vc_conn;
|
||||
f_init();
|
||||
|
||||
vc_conn := f_start_handler(refers(f_TC_BVC_bringup), testcasename(), g_pcu, g_sgsn, 51);
|
||||
vc_conn.done;
|
||||
|
||||
f_cleanup();
|
||||
}
|
||||
|
||||
friend function f_bssgp_suspend(integer ran_idx := 0) runs on BSSGP_ConnHdlr return OCT1 {
|
||||
timer T := 5.0;
|
||||
var PDU_BSSGP rx_pdu;
|
||||
PCU_SIG[ran_idx].send(ts_BSSGP_SUSPEND(g_pars.tlli, g_pars.bssgp_cell_id[ran_idx].ra_id));
|
||||
T.start;
|
||||
alt {
|
||||
[] PCU_SIG[ran_idx].receive(tr_BSSGP_SUSPEND_ACK(g_pars.tlli, g_pars.bssgp_cell_id[ran_idx].ra_id, ?)) -> value rx_pdu {
|
||||
return rx_pdu.pDU_BSSGP_SUSPEND_ACK.suspend_Reference_Number.suspend_Reference_Number_value;
|
||||
}
|
||||
[] PCU_SIG[ran_idx].receive(tr_BSSGP_SUSPEND_NACK(g_pars.tlli, g_pars.bssgp_cell_id[ran_idx].ra_id, ?)) -> value rx_pdu {
|
||||
setverdict(fail, "SUSPEND-NACK in response to SUSPEND for TLLI ", g_pars.tlli);
|
||||
mtc.stop;
|
||||
}
|
||||
[] T.timeout {
|
||||
setverdict(fail, "No SUSPEND-ACK in response to SUSPEND for TLLI ", g_pars.tlli);
|
||||
mtc.stop;
|
||||
}
|
||||
}
|
||||
return '00'O;
|
||||
}
|
||||
|
||||
friend function f_bssgp_resume(OCT1 susp_ref, integer ran_idx := 0) runs on BSSGP_ConnHdlr {
|
||||
timer T := 5.0;
|
||||
PCU_SIG[ran_idx].send(ts_BSSGP_RESUME(g_pars.tlli, g_pars.bssgp_cell_id[ran_idx].ra_id, susp_ref));
|
||||
T.start;
|
||||
alt {
|
||||
[] PCU_SIG[ran_idx].receive(tr_BSSGP_RESUME_ACK(g_pars.tlli, g_pars.bssgp_cell_id[ran_idx].ra_id));
|
||||
[] PCU_SIG[ran_idx].receive(tr_BSSGP_RESUME_NACK(g_pars.tlli, g_pars.bssgp_cell_id[ran_idx].ra_id,
|
||||
?)) {
|
||||
setverdict(fail, "RESUME-NACK in response to RESUME for TLLI ", g_pars.tlli);
|
||||
mtc.stop;
|
||||
}
|
||||
[] T.timeout {
|
||||
setverdict(fail, "No RESUME-ACK in response to SUSPEND for TLLI ", g_pars.tlli);
|
||||
mtc.stop;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
control {
|
||||
execute( TC_BVC_bringup() );
|
||||
}
|
||||
|
||||
|
||||
}
|
||||
|
|
@ -0,0 +1,18 @@
|
|||
# GBProxy_Tests.ttcn
|
||||
|
||||
* external interfaces
|
||||
* Gb (emulates PCU side NS/BSSGP)
|
||||
* Gb (emulates SGSN side NS/BSSGP)
|
||||
* VTY
|
||||
|
||||
{% dot gbproxy_tests.svg
|
||||
digraph G {
|
||||
rankdir=LR;
|
||||
GBP [label="IUT\nosmo-gbproxy",shape="box"];
|
||||
ATS [label="ATS\nGBProxy_Tests.ttcn"];
|
||||
|
||||
ATS -> GBP [label="Gb (from SGSN)"];
|
||||
GBP -> ATS [label="Gb (from PCU)"];
|
||||
ATS -> SGSN [label="VTY"];
|
||||
}
|
||||
%}
|
||||
|
|
@ -0,0 +1,94 @@
|
|||
#!/bin/bash
|
||||
|
||||
BASEDIR=../deps
|
||||
|
||||
. ../gen_links.sh.inc
|
||||
|
||||
#DIR=$BASEDIR/titan.TestPorts.UNIX_DOMAIN_SOCKETasp/src
|
||||
#FILES="UD_PT.cc UD_PT.hh UD_PortType.ttcn UD_Types.ttcn"
|
||||
#gen_links $DIR $FILES
|
||||
|
||||
DIR=$BASEDIR/titan.Libraries.TCCUsefulFunctions/src
|
||||
FILES="TCCInterface_Functions.ttcn TCCConversion_Functions.ttcn TCCConversion.cc TCCConversion.hh TCCInterface.cc TCCInterface_ip.h"
|
||||
gen_links $DIR $FILES
|
||||
|
||||
DIR=$BASEDIR/titan.TestPorts.Common_Components.Socket-API/src
|
||||
FILES="Socket_API_Definitions.ttcn"
|
||||
gen_links $DIR $FILES
|
||||
|
||||
DIR=$BASEDIR/titan.TestPorts.IPL4asp/src
|
||||
FILES="IPL4asp_Functions.ttcn IPL4asp_PT.cc IPL4asp_PT.hh IPL4asp_PortType.ttcn IPL4asp_Types.ttcn IPL4asp_discovery.cc IPL4asp_protocol_L234.hh"
|
||||
gen_links $DIR $FILES
|
||||
|
||||
#DIR=$BASEDIR/titan.TestPorts.UNIX_DOMAIN_SOCKETasp/src
|
||||
#FILES="UD_PT.cc UD_PT.hh UD_PortType.ttcn UD_Types.ttcn"
|
||||
#gen_links $DIR $FILES
|
||||
|
||||
# for Osmocom_VTY
|
||||
DIR=$BASEDIR/titan.TestPorts.TELNETasp/src
|
||||
FILES="TELNETasp_PT.cc TELNETasp_PT.hh TELNETasp_PortType.ttcn"
|
||||
gen_links $DIR $FILES
|
||||
|
||||
DIR=$BASEDIR/titan.ProtocolModules.NS_v7.3.0/src
|
||||
FILES="NS_Types.ttcn"
|
||||
gen_links $DIR $FILES
|
||||
|
||||
DIR=$BASEDIR/titan.ProtocolModules.BSSGP_v13.0.0/src
|
||||
FILES="BSSGP_EncDec.cc BSSGP_Types.ttcn"
|
||||
gen_links $DIR $FILES
|
||||
|
||||
DIR=$BASEDIR/titan.ProtocolModules.LLC_v7.1.0/src
|
||||
FILES="LLC_EncDec.cc LLC_Types.ttcn"
|
||||
gen_links $DIR $FILES
|
||||
|
||||
DIR=$BASEDIR/titan.ProtocolModules.SNDCP_v7.0.0/src
|
||||
FILES="SNDCP_Types.ttcn"
|
||||
gen_links $DIR $FILES
|
||||
|
||||
DIR=$BASEDIR/titan.ProtocolModules.MobileL3_v13.4.0/src
|
||||
FILES="MobileL3_CC_Types.ttcn MobileL3_CommonIE_Types.ttcn MobileL3_GMM_SM_Types.ttcn MobileL3_MM_Types.ttcn MobileL3_RRM_Types.ttcn MobileL3_SMS_Types.ttcn MobileL3_SS_Types.ttcn MobileL3_Types.ttcn"
|
||||
gen_links $DIR $FILES
|
||||
|
||||
DIR=$BASEDIR/titan.ProtocolModules.GTP_v13.5.0/src
|
||||
FILES="GTPC_EncDec.cc GTPC_Types.ttcn GTPU_EncDec.cc GTPU_Types.ttcn"
|
||||
gen_links $DIR $FILES
|
||||
|
||||
# required by M3UA_Emulation
|
||||
DIR=$BASEDIR/titan.ProtocolModules.M3UA/src
|
||||
FILES="M3UA_Types.ttcn"
|
||||
gen_links $DIR $FILES
|
||||
|
||||
# required by M3UA_Emulation
|
||||
DIR=$BASEDIR/titan.TestPorts.SCTPasp/src
|
||||
FILES="SCTPasp_PT.cc SCTPasp_PT.hh SCTPasp_PortType.ttcn SCTPasp_Types.ttcn"
|
||||
gen_links $DIR $FILES
|
||||
|
||||
# required by M3UA Emulation
|
||||
DIR=$BASEDIR/titan.TestPorts.MTP3asp/src
|
||||
FILES="MTP3asp_PortType.ttcn MTP3asp_Types.ttcn"
|
||||
gen_links $DIR $FILES
|
||||
|
||||
# required by SCCP Emulation
|
||||
DIR=$BASEDIR/titan.ProtocolEmulations.M3UA/src
|
||||
FILES="M3UA_Emulation.ttcn"
|
||||
gen_links $DIR $FILES
|
||||
|
||||
DIR=$BASEDIR/titan.ProtocolEmulations.SCCP/src
|
||||
FILES="SCCP_Emulation.ttcn SCCP_EncDec.cc SCCP_Mapping.ttcnpp SCCP_Types.ttcn SCCPasp_Types.ttcn"
|
||||
gen_links $DIR $FILES
|
||||
|
||||
DIR=../library
|
||||
FILES="Misc_Helpers.ttcn General_Types.ttcn GSM_Types.ttcn GSM_RR_Types.ttcn Osmocom_Types.ttcn RLCMAC_Templates.ttcn RLCMAC_Types.ttcn RLCMAC_CSN1_Templates.ttcn RLCMAC_CSN1_Types.ttcn RLCMAC_EncDec.cc "
|
||||
FILES+="NS_Provider_IPL4.ttcn NS_Emulation.ttcnpp NS_CodecPort.ttcn NS_CodecPort_CtrlFunct.ttcn NS_CodecPort_CtrlFunctDef.cc "
|
||||
FILES+="BSSGP_Emulation.ttcnpp Osmocom_Gb_Types.ttcn "
|
||||
FILES+="PCUIF_Types.ttcn "
|
||||
FILES+="Osmocom_CTRL_Types.ttcn Osmocom_CTRL_Functions.ttcn Osmocom_CTRL_Adapter.ttcn "
|
||||
FILES+="Osmocom_VTY_Functions.ttcn "
|
||||
FILES+="LLC_Templates.ttcn L3_Templates.ttcn L3_Common.ttcn "
|
||||
# IPA_Emulation + dependencies
|
||||
FILES+="IPA_Types.ttcn IPA_Emulation.ttcnpp IPA_CodecPort.ttcn IPA_CodecPort_CtrlFunct.ttcn IPA_CodecPort_CtrlFunctDef.cc Native_Functions.ttcn Native_FunctionDefs.cc GSUP_Types.ttcn GSUP_Emulation.ttcn "
|
||||
FILES+="GTP_CodecPort.ttcn GTP_CodecPort_CtrlFunct.ttcn GTP_CodecPort_CtrlFunctDef.cc GTP_Emulation.ttcn
|
||||
GTP_Templates.ttcn IPCP_Types.ttcn "
|
||||
gen_links $DIR $FILES
|
||||
|
||||
ignore_pp_results
|
||||
|
|
@ -0,0 +1,25 @@
|
|||
!
|
||||
! Osmocom Gb Proxy (0.9.0.404-6463) configuration saved from vty
|
||||
!!
|
||||
!
|
||||
line vty
|
||||
no login
|
||||
!
|
||||
gbproxy
|
||||
sgsn nsei 101
|
||||
ns
|
||||
nse 101 nsvci 101
|
||||
nse 101 remote-role sgsn
|
||||
nse 101 encapsulation udp
|
||||
nse 101 remote-ip 127.0.0.1
|
||||
nse 101 remote-port 7777
|
||||
timer tns-block 3
|
||||
timer tns-block-retries 3
|
||||
timer tns-reset 3
|
||||
timer tns-reset-retries 3
|
||||
timer tns-test 30
|
||||
timer tns-alive 3
|
||||
timer tns-alive-retries 10
|
||||
encapsulation udp local-ip 127.0.0.1
|
||||
encapsulation udp local-port 23000
|
||||
encapsulation framerelay-gre enabled 0
|
||||
|
|
@ -0,0 +1,9 @@
|
|||
#!/bin/sh
|
||||
|
||||
FILES="*.ttcn *.ttcnpp BSSGP_EncDec.cc LLC_EncDec.cc IPL4asp_PT.cc IPL4asp_discovery.cc TCCConversion.cc TCCInterface.cc NS_CodecPort_CtrlFunctDef.cc RLCMAC_EncDec.cc Native_FunctionDefs.cc TELNETasp_PT.cc IPA_CodecPort_CtrlFunctDef.cc GTPU_EncDec.cc GTPC_EncDec.cc GTP_CodecPort_CtrlFunctDef.cc SCCP_EncDec.cc SCTPasp_PT.cc "
|
||||
|
||||
export CPPFLAGS_TTCN3="-DIPA_EMULATION_GSUP -DIPA_EMULATION_CTRL -DUSE_MTP3_DISTRIBUTOR -DBSSGP_EM_L3"
|
||||
|
||||
../regen-makefile.sh GBProxy_Tests.ttcn $FILES
|
||||
|
||||
sed -i -i 's/^LINUX_LIBS = -lxml2/LINUX_LIBS = -lxml2 -lsctp/' Makefile
|
||||
Loading…
Reference in New Issue