diff --git a/ttcn/GeoNetworking/LibItsGeoNetworking_Functions.ttcn b/ttcn/GeoNetworking/LibItsGeoNetworking_Functions.ttcn new file mode 100644 index 0000000000000000000000000000000000000000..01c70a4652332fda3fb8c2450944d20ff3cffeb2 --- /dev/null +++ b/ttcn/GeoNetworking/LibItsGeoNetworking_Functions.ttcn @@ -0,0 +1,48 @@ +/** + * @author ETSI / STF405 + * @version $URL$ + * $Id$ + * @desc Module containing functions for GeoNetworking + * + */ +module LibItsGeoNetworking_Functions { + + // LibIts + import from LibIts_TestSystem all; + import from LibIts_Interface all; + + /** + * @desc Create Facility component and connects GeoNetworking port + * @param p_ptcDenm returned Facility component variable + */ + function f_cfGeoNetworkingUp(out PtcNt p_ptcGeoNetworking) { + + // Create Facility component + p_ptcGeoNetworking := PtcNt.create("GeoNetworking Tester"); + + // map ports + map(p_ptcGeoNetworking:geoNetworkingPort, system:geoNetworkingPort); + + } // end f_cfGeoNetworkingUp + + /** + * @desc Wait for component to finish and unmap GeoNetworking ports + * @param p_camPtc Facility component variable + */ + function f_cfGeoNetworkingDown(in PtcNt p_ptcGeoNetworking) runs on ItsMtc { + tc_guard.start; + alt { + [] p_ptcGeoNetworking.done { + tc_guard.stop; + } + + [] tc_guard.timeout { + log("*** f_cfGeoNetworkingDown: ERROR: Timeout while waiting for component ***"); + setverdict(inconc); + } + } + unmap(p_ptcGeoNetworking:geoNetworkingPort); + + } // end f_cfGeoNetworkingDown + +} // end LibItsGeoNetworking_Functions \ No newline at end of file diff --git a/ttcn/GeoNetworking/LibItsGeoNetworking_Templates.ttcn b/ttcn/GeoNetworking/LibItsGeoNetworking_Templates.ttcn new file mode 100644 index 0000000000000000000000000000000000000000..95b85ebd94571511d87abe60572ef63a16a24f50 --- /dev/null +++ b/ttcn/GeoNetworking/LibItsGeoNetworking_Templates.ttcn @@ -0,0 +1,13 @@ +/** + * @author ETSI / STF405 + * @version $URL$ + * $Id$ + * @desc GeoNetworking Templates + * + */ +module ItsGeoNetworking_Templates { + + + + +} // end ItsGeoNetworking_Templates \ No newline at end of file