Newer
Older
in template (value) RecordOf_ProtocolIE p_value
) runs on S1APComponent {
f_send_S1AP_initiatingMessage(m_kill_Response(p_value))
} // End of function f_send_Kill_Response
/**
* @desc Send S1AP Message UE Context Release Command
* @param p_value Send template for UE CONTEXT RELEASE REQUEST
* @see ETSI TS 136 413 V13.4.0 Clause 9.1.4.6 UE CONTEXT RELEASE COMMAND
*/
function f_send_UE_Context_Release_Command(
template (value) RecordOf_ProtocolIE p_value
) runs on S1APComponent {
f_send_S1AP_initiatingMessage(m_UeContextReleaseCommand(p_value))
} // End of f_send_UE_Context_Release_Command
1018
1019
1020
1021
1022
1023
1024
1025
1026
1027
1028
1029
1030
1031
1032
1033
1034
1035
1036
1037
1038
/**
* @desc Send S1AP Message UE Context Release Complete
* @param p_value Send template for UE CONTEXT RELEASE COMPLETE
* @see ETSI TS 136 413 V13.4.0 Clause 9.1.4.7 UE CONTEXT RELEASE COMPLETE
*/
function f_send_UE_Context_Release_Complete(
template (value) RecordOf_ProtocolIE p_value
) runs on S1APComponent {
f_send_S1AP_initiatingMessage(m_UeContextReleaseComplete(p_value))
} // End of f_send_UE_Context_Release_Command
/**
* @desc Send S1AP Message UE Context Release Request
* @param p_value Receive template for UE CONTEXT RELEASE REQUEST
* @see ETSI TS 136 413 V13.4.0 Clause 9.1.4.5 UE CONTEXT RELEASE REQUEST
*/
function f_send_UE_Context_Release_Request(
template (value) RecordOf_ProtocolIE p_value
) runs on S1APComponent {
f_send_S1AP_initiatingMessage(m_UeContextReleaseRequest(p_value))
} // End of f_send_UE_Context_Release_Request
/**
* @desc Send S1AP Message UE Context Modification Request
* @param p_value Send template for UE CONTEXT MODIFICATION REQUEST
* @see ETSI TS 136 413 V13.4.0 Clause 9.1.4.8 UE CONTEXT MODIFICATION COMMAND
*/
function f_send_UE_Context_Modification_Request(
template (value) RecordOf_ProtocolIE p_value
) runs on S1APComponent {
f_send_S1AP_initiatingMessage(m_UeContextModificationRequest(p_value))
} // End of f_send_UE_Context_Modification_Request
/**
* @desc Send S1AP Message UE Radio Capability Match Request
* @param p_value Send template for UE_RADIO_CAPABILITY_MATCH_REQUEST
* @see ETSI TS 136 413 V13.4.0 Clause 9.1.4.11 UE CONTEXT MODIFICATION COMMAND
*/
function f_send_UE_Radio_Capability_Match_Request(
template (value) RecordOf_ProtocolIE p_value
) runs on S1APComponent {
f_send_S1AP_initiatingMessage(m_UeRadioCapabilityMatchRequest(p_value))
} // End of f_send_UE_Radio_Capability_Match_Request
/**
* @desc Setup full procedure functions
* @see ETSI TS 136 413 V13.4.0 Clause 8.1 List of S1AP Elementary procedures
*/
group fullProcedures {
/**
* @desc Setup a full E-RAB Setup procedure
*/
function f_rABSetupRequest() runs on S1APComponent {
f_send_E_RABSetupRequest(m_E_RABSetupReqIEs(
vc_MME_UE_ID,
{
m_E_RABToBeSetupItemBearerSUReq(1),
m_E_RABToBeSetupItemBearerSUReq(
2,
m_e_RABlevelQoSParameters
(255)
)
}
));
f_recv_E_RABSetupResponse(mw_E_RABSetupResIEs_FailedToSetupList(
vc_MME_UE_ID,
1090
1091
1092
1093
1094
1095
1096
1097
1098
1099
1100
1101
1102
1103
1104
1105
1106
1107
1108
1109
1110
{
mw_E_RABSetupItemBearerSURes(1)
},
{
mw_E_RABItem(
2,
{
radioNetwork :=not_supported_QCI_value
}
)
}
));
} // End of function f_rABSetupRequest
/**
* @desc Setup a full E-RAB Release procedure
*/
function f_rABSetupRelease() runs on S1APComponent {
// TODO
} // End of function f_rABSetupRelease
/**
* @desc Initiate an Handover procedure
*/
function f_initiate_handover() runs on S1APComponent {
// TODO
} // End of function f_initiate_handover
/**
* @desc Initiate a Trace Start procedure
*/
function f_initiate_traceStart() runs on S1APComponent {
f_send_Trace_Start(
m_trace_StartIEs(
m_traceActivation(
PX_EUTRAN_TRACE_ID,
PX_INTERFACES_TO_TRACE,
PX_TRACE_DEPTH,
PX_TRANSPORT_LAYER_ADDRESS
)));
} // End of function f_initiate_traceStart
/**
* @desc Initiate a Deactivate Trace procedure
*/
function f_initiate_deactivateTrace() runs on S1APComponent {
// TODO
} // End of function f_initiate_deactivateTrace
/**
* @desc Initiate a an Write-Replace Warning Request procedure
*/
function f_writeReplaceWarningExchanges() runs on S1APComponent {
// TODO
} // End of function f_writeReplaceWarningExchanges
} // End of group fullProcedures
group externalFunctions {
/**
* @desc Trigger a Handover preparation procedure
* @return true on success, false otherwise
*/
external function fx_eNB_Handover_preparation_procedure() return boolean;
/**
* @desc Trigger an INITIAL UE MESSAGE procedure
* @return true on success, false otherwise
*/
external function fx_eNB_Initiate_NAS_transport_procedure() return boolean;
/**
* @desc Trigger an INITIAL UE MESSAGE procedure
* @return true on success, false otherwise
*/
external function fx_eNB_NAS_transport_procedure() return boolean;
1170
1171
1172
1173
1174
1175
1176
1177
1178
1179
1180
1181
1182
1183
1184
1185
1186
1187
1188
1189
1190
1191
1192
1193
1194
1195
1196
1197
1198
1199
1200
1201
1202
1203
1204
1205
1206
1207
1208
1209
1210
1211
1212
1213
1214
1215
1216
1217
1218
1219
1220
1221
1222
1223
1224
1225
1226
1227
1228
1229
1230
1231
1232
1233
1234
1235
1236
1237
1238
1239
1240
1241
1242
1243
1244
1245
1246
1247
1248
1249
1250
1251
1252
1253
1254
/**
* @desc Trigger an S1 SETUP procedure
* @return true on success, false otherwise
*/
external function fx_eNB_S1_Setup_Request_procedure() return boolean;
/**
* @desc Trigger an eNB Configuration Update procedure
* @return true on success, false otherwise
*/
external function fx_eNB_Configuration_Update_procedure() return boolean;
/**
* @desc Trigger an an Overload Start procedure
* @return true on success, false otherwise
*/
external function fx_eNB_Overload_Start_procedure() return boolean;
/**
* @desc Trigger an an Overload Stop procedure
* @return true on success, false otherwise
*/
external function fx_eNB_Overload_Stop_procedure() return boolean;
/**
* @desc Trigger an Error Indication procedure
* @return true on success, false otherwise
*/
external function fx_eNB_Error_Indication_procedure() return boolean;
/**
* @desc Trigger a RESET procedure
* @return true on success, false otherwise
*/
external function fx_eNB_Reset_procedure() return boolean;
/**
* @desc Trigger a CDMA2000 to be forwarded procedure
* @return true on success, false otherwise
*/
external function fx_eNB_Uplink_S1_CDMA2000_Tunnelling_procedure() return boolean;
/**
* @desc Trigger a UE CAPABILITY INFO INDICATION procedure
* @return true on success, false otherwise
*/
external function fx_eNB_UE_Capability_Info_Indication_procedure() return boolean;
/**
* @desc Force the UE to be registered to a new cell
* @return true on success, false otherwise
*/
external function fx_move_UE_to_new_cell() return boolean;
/**
* @desc Check htat UE stop reporting at change of serving cell
* @return true on success, false otherwise
*/
external function fx_check_UE_stops_reporting() return boolean;
/**
* @desc Trigger a PWS Restart Indication procedure
* @return true on success, false otherwise
*/
external function fx_eNB_PWS_Restart_Indication_procedure() return boolean;
/**
* @desc Trigger a PWS Failure Indication procedure
* @return true on success, false otherwise
*/
external function fx_eNB_PWS_Failure_Indication_procedure() return boolean;
/**
* @desc Trigger an ENB direct information Transfer procedure
* @return true on success, false otherwise
*/
external function fx_eNB_Direct_Information_Transfer_procedure() return boolean;
/**
* @desc Trigger an ENB Configuration Transfer procedure
* @return true on success, false otherwise
*/
external function fx_eNB_Configuration_Transfer_procedure() return boolean;
/**
* @desc Trigger a LPPa Transport procedure using a UE associated signalling on eNodeB
* @param p_associated_signalling_mode Set to true for an associated signalling mode, false otherwise
* @return true on success, false otherwise
*/
external function fx_eNB_LPPa_Transport_procedure_ind(
in boolean p_associated_signalling_mode
) return boolean;
} // End of group eNBRole
group mmeRole {
/**
* @desc Trigger a PAGING event
* @return true on success, false otherwise
*/
external function fx_MME_Paging_procedure() return boolean;
/**
* @desc Trigger a DOWNLINK NAS TRANSPORT event
* @return true on success, false otherwise
*/
external function fx_MME_Downlink_NAS_Transport_procedure() return boolean;
/**
* @desc Trigger a REROUTE NAS REQUEST event
* @return true on success, false otherwise
*/
external function fx_MME_Reroute_NAS_Request_procedure() return boolean;
/**
1286
1287
1288
1289
1290
1291
1292
1293
1294
1295
1296
1297
1298
1299
1300
1301
1302
1303
1304
1305
1306
1307
1308
1309
1310
1311
1312
1313
1314
1315
1316
1317
1318
1319
1320
1321
1322
1323
1324
1325
1326
1327
1328
1329
1330
1331
1332
1333
1334
1335
1336
1337
1338
1339
1340
1341
1342
1343
1344
1345
1346
1347
1348
1349
* @desc Trigger a RESET event
* @return true on success, false otherwise
*/
external function fx_MME_Reset_procedure() return boolean;
/**
* @desc Trigger an ERROR INDICATION event
* @return true on success, false otherwise
*/
external function fx_MME_Error_Indication_procedure() return boolean;
/**
* @desc Trigger a CDMA2000 signalling event
* @return true on success, false otherwise
*/
external function fx_MME_Downlink_S1_CDMA2000_Tunnelling_procedure() return boolean;
/**
* @desc Trigger a Trace Start procedure
* @return true on success, false otherwise
*/
external function fx_MME_Trace_Start_procedure() return boolean;
/**
* @desc Trigger a Deactivate Trace procedure
* @return true on success, false otherwise
*/
external function fx_MME_Deactivate_Trace_procedure() return boolean;
/**
* @desc Trigger a Location Reporting Control procedure
* @return true on success, false otherwise
*/
external function fx_MME_Location_Reporting_Control_procedure() return boolean;
/**
* @desc Trigger a Write-Replace Warning procedure
* @return true on success, false otherwise
*/
external function fx_MME_Write_Replace_Warning_procedure() return boolean;
/**
* @desc Trigger a Kill procedure
* @return true on success, false otherwise
*/
external function fx_MME_Kill_procedure() return boolean;
/**
* @desc Trigger an MME Direct Information Transfer procedure
* @return true on success, false otherwise
*/
external function fx_MME_Direct_Information_Transfer_procedure() return boolean;
/**
* @desc Trigger an MME Configuration Transfer procedure
* @return true on success, false otherwise
*/
external function fx_MME_Configuration_Transfer_procedure() return boolean;
/**
* @desc Trigger a LPPa Transport procedure using a UE associated signalling on MME
* @param p_associated_signalling_mode Set to true for an associated signalling mode, false otherwise
* @return true on success, false otherwise
*/
external function fx_MME_LPPa_Transport_procedure_ind(
in boolean p_associated_signalling_mode
) return boolean;
} // End of group mmeRole
} // End of group externalFunctions
function f_preambleS1AP_MME()
runs on S1APComponent {
//TODO:...
function f_preambleS1AP_eNB()
runs on S1APComponent {
//TODO:...
} // End of function f_preambleS1AP_eNB
} // End of group preamble_S1AP
function f_postambleS1AP_MME()
runs on S1APComponent {
// TODO:...
} // End of function f_postambleS1AP_MME
/**
* @desc
* @verdict
*/
function f_postambleS1AP_eNB()
runs on S1APComponent {
// TODO:...
} // End of function f_postambleS1AP_eNB
} // End of group postamble_S1AP
1408
1409
1410
1411
1412
1413
1414
1415
1416
1417
1418
1419
1420
1421
1422
1423
1424
1425
1426
1427
1428
1429
1430
1431
1432
1433
1434
1435
1436
1437
1438
1439
1440
1441
1442
1443
1444
1445
1446
1447
1448
1449
1450
1451
1452
1453
1454
1455
1456
1457
1458
1459
1460
1461
1462
1463
1464
1465
1466
1467
1468
1469
1470
1471
} // End of group postambles
/**
* @desc Global 'altstep' statements description
*/
group globalSteps {
/**
* @desc This is a test step that init S1AP component
*/
function f_S1AP_Init_Component()
runs on S1APComponent {
} // End of function f_S1AP_Init_Component
/**
* @desc Component termination
*/
function f_S1AP_terminate_component()
runs on S1APComponent {
log("component terminated - forced!");
deactivate;
stop;
} // End of function f_S1AP_terminate_component
/**
* @desc Component termination
*/
function f_componentStop()
runs on S1APComponent {
syncPort.send(m_syncClientStop);
S1_MMEeNB_P.clear;
stop;
} // End of function f_componentStop
/**
* @desc Original copied from older LibCommon_VerdictControl
*/
function f_getVerdict() // FIXME Are you sure we really need it???
return FncRetCode {
var FncRetCode v_ret := e_error;
if (getverdict == pass or getverdict == none) {
v_ret := e_success;
}
return v_ret;
} // End of function
/**
*
* @desc Wait for particular time before next expected message
*/
function f_wait(float p_time) // FIXME To be replace by LibCommon.f_sleep!!!
runs on S1APComponent {
tc_wait.start(p_time);
alt {
[] tc_wait.timeout{ }
}
} // End of function f_wait
} // End of group globalSteps
/**
* @desc Default 'altstep' statements description
*/
group defaultsTestStep {
1483
1484
1485
1486
1487
1488
1489
1490
1491
1492
1493
1494
1495
1496
1497
1498
1499
1500
1501
1502
1503
1504
1505
1506
1507
1508
1509
1510
1511
1512
1513
1514
1515
1516
1517
runs on S1APComponent {
[] any timer.timeout {
all timer.stop;
if (vc_serverStop==false) {
f_selfOrClientSyncAndVerdict("error", e_timeout);
}
else {
stop;
}
}
[] S1_MMEeNB_P.receive (S1AP_PDU:{initiatingMessage := ?}) -> value vc_recvS1AP_PDUDefault {
repeat;
}
[] S1_MMEeNB_P.receive (S1AP_PDU:{successfulOutcome := ?}) -> value vc_recvS1AP_PDUDefault {
repeat;
}
[] S1_MMEeNB_P.receive (S1AP_PDU:{unsuccessfulOutcome := ?}) -> value vc_recvS1AP_PDUDefault {
repeat;
}
[] S1_MMEeNB_P.receive (S1AP_PDU:?) -> value vc_recvS1AP_PDUDefault {
if (vc_serverStop==false) {
f_selfOrClientSyncAndVerdict("error", e_error);
}
else {
stop;
}
}
[] S1_MMEeNB_P.receive {
if (vc_serverStop==false) {
f_selfOrClientSyncAndVerdict("error", e_error);
}
else {
stop;
}
}
[] a_shutdown() {
// Process temination on error
log("*** a_defaultS1AP() : Process temination on error ***");
// Terminate component execution
stop;
}
runs on S1APComponent {
[] any timer.timeout {
all timer.stop;
if (vc_serverStop==false) {
f_selfOrClientSyncAndVerdict("error", e_timeout);
}
else {
stop;
}
}
//TODO:...
} // End of altstep a_defaultS1AP_MME
runs on S1APComponent {
[] any timer.timeout {
all timer.stop;
if (vc_serverStop==false) {
f_selfOrClientSyncAndVerdict("error", e_timeout);
}
else {
stop;
}
}