Commit 9456754b authored by garciay's avatar garciay
Browse files

Add new tests for Anycast

parent f9b822d3

ttcn/TestCodec/TestCodec_GeoNetworking.ttcn

+389 −355
Original line number Original line Diff line number Diff line
@@ -194,13 +194,45 @@ module TestCodec_GeoNetworking { 
        

        

    group testGeoNetMessages {

    group testGeoNetMessages {

            

            

      /**

       * @desc validate GeoNetworkingReq/Anycast

       * @verdict Pass on success, Fail otherwise

       */

      testcase tc_GeoNetReq_AnycastPacket() runs on TCType system TCType {

	var GeoNetworkingReq v_gnReq;

	var octetstring v_buffer := '01002B0A00418000000F0A000D800000A832A40102030405000011E90000007E0000007B002D007D00048D8800007FE904D2162E23A3000044454641554C545F5041594C4F4144FFFFFFFFFFFFA0A0A0A0'O; // Check for 'LibItsGeoNetworking_TypesAndValues.encode:' output in codec traces to get the dump

                

	if (PX_GN_UPPER_LAYER != e_any) {

	  log("PX_GN_UPPER_LAYER shall be set to e_any");

	  stop;

	}

                

      v_gnReq := valueof(m_geoNwReq_linkLayerBroadcast(

						       m_geoNwPdu(

								  m_geoNwAnycastPacket(

											 m_dummyLongPosVectorNodeA, 

											 1234, 

											 m_dummyGeoAnycastArea1

										       )),

						       oct2int('A0A0A0A0'O)

						       ));

	TestGeoNetworkingReq(

			     v_gnReq, 

			     false);

      v_gnReq.msgOut.gnPacket.packet.commonHeader.plLength := 15;

	TestDecodeGeoNetworkingReq(

				   v_gnReq, 

				   v_buffer

				   );

      }

            

      /**

      /**

       * @desc validate GeoNetworkingReq/Broadcast

       * @desc validate GeoNetworkingReq/Broadcast

       * @verdict Pass on success, Fail otherwise

       * @verdict Pass on success, Fail otherwise

       */

       */

      testcase tc_GeoNetReq_BroadcastPacket() runs on TCType system TCType {

      testcase tc_GeoNetReq_BroadcastPacket() runs on TCType system TCType {

	var GeoNetworkingReq v_gnReq;

	var GeoNetworkingReq v_gnReq;

                var octetstring v_buffer := '01002B0A00418000000F0A000D800000A832A40102030405000011E90000007E0000007B002D007D00048D8800007FE904D2162E23A3000044454641554C545F5041594C4F4144FFFFFFFFFFFF'O; // Check for 'LibItsGeoNetworking_TypesAndValues.encode:' output in codec traces to get the dump

	var octetstring v_buffer := '01002B0A00418000000F0A000D800000A832A40102030405000011E90000007E0000007B002D007D00048D8800007FE904D2162E23A3000044454641554C545F5041594C4F4144FFFFFFFFFFFFA0A0A0A0'O; // Check for 'LibItsGeoNetworking_TypesAndValues.encode:' output in codec traces to get the dump

                

                

	if (PX_GN_UPPER_LAYER != e_any) {

	if (PX_GN_UPPER_LAYER != e_any) {

	  log("PX_GN_UPPER_LAYER shall be set to e_any");

	  log("PX_GN_UPPER_LAYER shall be set to e_any");
@@ -213,7 +245,9 @@ module TestCodec_GeoNetworking { 
											 m_dummyLongPosVectorNodeB, 

											 m_dummyLongPosVectorNodeB, 

											 3456, 

											 3456, 

											 m_dummyGeoBroadcastArea1

											 m_dummyGeoBroadcastArea1

                ))));

											 )),

						       oct2int('A0A0A0A0'O)

						       ));

	TestGeoNetworkingReq(

	TestGeoNetworkingReq(

			     v_gnReq, 

			     v_gnReq, 

			     false);

			     false);
@@ -231,7 +265,7 @@ module TestCodec_GeoNetworking { 
       */

       */

      testcase tc_GeoNetReq_BeaconPacket() runs on TCType system TCType {

      testcase tc_GeoNetReq_BeaconPacket() runs on TCType system TCType {

	var GeoNetworkingReq v_gnReq;

	var GeoNetworkingReq v_gnReq;

                var octetstring v_buffer := '01001001001000000000010000004c5e0c14d2ea9ed6b19719f6674d062493eb80000000464b1442FFFFFFFFFFFF'O; // Check for 'LibItsGeoNetworking_TypesAndValues.encode:' output in codec traces to get the dump

	var octetstring v_buffer := '01001001001000000000010000004c5e0c14d2ea9ed6b19719f6674d062493eb80000000464b1442FFFFFFFFFFFF00000000'O; // Check for 'LibItsGeoNetworking_TypesAndValues.encode:' output in codec traces to get the dump

                

                

	if (PX_GN_UPPER_LAYER != e_any) {

	if (PX_GN_UPPER_LAYER != e_any) {

	  log("PX_GN_UPPER_LAYER shall be set to e_any");

	  log("PX_GN_UPPER_LAYER shall be set to e_any");