Commit 9e20a552 authored by garciay's avatar garciay
Browse files

Simplify Payload for GeoNetworking & BTP 

==> Check TODO in Security ATS
parent 93e3fea4

ttcn/TestCodec/TestCodec_GeoNetworking.ttcn

+47 −1
Original line number Diff line number Diff line
@@ -171,6 +171,17 @@ module TestCodec_GeoNetworking { 
      geoAnycastArea := m_dummyArea2

      }



      /**

       * @desc    Send template for GeoNetworking SHB Packet

       * @param   p_sourceLongPosVec  Long position vector of source

       */

      template (value) GnNonSecuredPacket m_geoNwShbPacket_payload(

								   in template (value) LongPosVector p_sourceLongPosVec,

								   in template (value) GnRawPayload p_payload

							   ) modifies m_geoNwShbPacket := {

      payload :=  p_payload

      }



      template (value) GnNonSecuredPacket m_geoNwBeaconPacket_payload(

								      in template (value) LongPosVector p_sourceLongPosVec,

								      in template (value) GnRawPayload p_payload
@@ -352,6 +363,40 @@ module TestCodec_GeoNetworking { 
                

      }

            

      /**

       * @desc validate GeoNetworkingInd/Broadcast SHB

       * @verdict Pass on success, Fail otherwise

       */

      testcase tc_GeoNetInd_ShbPacket() runs on TCType system TCType {

	var GeoNetworkingInd v_gnInd;

	var octetstring v_buffer := '01002B0A0050800000300A00A832A40102030405000011E90000007E0000007B002D007D0000000007D1000001020000273F7C730059F34F8C4E2DB0661FFFFFFC2231129E48927FC1F48082788A800F53080FFFC4014004FFFFFFFFFFFF0000000000000000000000000000000000000000000000000000000000000000A0A0A0A0'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_gnInd := valueof(m_geoNwInd_withLinkLayerDestination(

							     m_geoNwPdu(

									m_geoNwShbPacket_payload(

											       m_dummyLongPosVectorNodeB,

											       '07D1000001020000273F7C730059F34F8C4E2DB0661FFFFFFC2231129E48927FC1F48082788A800F53080FFFC4014004'O

											       )),

							     -,

							     -,

							     oct2int('A0A0A0A0'O)

							     ));

	TestGeoNetworkingInd(

			     v_gnInd, 

			     false);

        v_gnInd.msgIn.gnPacket.packet.commonHeader.plLength := 48;

	TestDecodeGeoNetworkingInd(

				   v_gnInd, 

				   v_buffer

				   );

                

      }

            

      /**

       * @desc validate GeoNetworkingReq/Unicast

       * @verdict Pass on success, Fail otherwise
@@ -803,6 +848,7 @@ module TestCodec_GeoNetworking { 
    v_res := decvalue(v_encMsg, v_decMsg);

      select (v_res) {

      case (0) {

	log("p_geoNetworkingInd: ", p_geoNetworkingInd);

	log("v_decMsg          : ", v_decMsg);

	if(match(valueof(v_decMsg), p_geoNetworkingInd)) {

	  setverdict(pass);