RSL_Emulation: Pass ASP_IPA_EVENT_UP to RSL_CCHAN port

When emulating the BSC side of RSL, this can be used by a test case
to wait for the RSL connection to be established.

Change-Id: Iad2f6e4cb6a8f3b77e452f36a83ec11e7554e6c7
This commit is contained in:
Harald Welte 2018-02-21 12:19:18 +01:00
parent 1c02fd1ad5
commit bb6aed387e
1 changed files with 6 additions and 2 deletions

View File

@ -53,7 +53,7 @@ type port RSL_DCHAN_PT message {
} with { extension "internal" };
type port RSL_CCHAN_PT message {
inout ASP_RSL_Unitdata;
inout ASP_RSL_Unitdata, ASP_IPA_Event;
} with { extension "internal" };
@ -277,6 +277,7 @@ private function f_streamId_by_trx(uint8_t trx_nr) return IpaStreamId {
function main(boolean bts_role := true) runs on RSL_Emulation_CT {
var ASP_IPA_Event evt;
var ASP_RSL_Unitdata rx_rsl;
var RSL_Message rx_rsl_msg;
var RSLDC_ChanRqd chan_rqd;
@ -292,7 +293,10 @@ function main(boolean bts_role := true) runs on RSL_Emulation_CT {
while (true) {
alt {
[] IPA_PT.receive(ASP_IPA_Event:{up_down := ASP_IPA_EVENT_UP}) {
[bts_role] IPA_PT.receive(ASP_IPA_Event:{up_down := ASP_IPA_EVENT_UP}) {
}
[not bts_role] IPA_PT.receive(ASP_IPA_Event:{up_down := ASP_IPA_EVENT_UP}) -> value evt {
CCHAN_PT.send(evt);
}
[bts_role] IPA_PT.receive(ASP_IPA_Event:{up_down := ASP_IPA_EVENT_ID_ACK}) {
IPA_PT.send(ts_ASP_RSL_UD(IPAC_PROTO_RSL_TRX0,ts_RSL_PAGING_LOAD_IND(23)));