Commit 910e7344 authored by garciay's avatar garciay
Browse files

STF538: Certificate TPs implementation

parent 2a285225

ttcn/TestCodec/TestCodec_GeoNetworking.ttcn

+35 −2
Original line number Diff line number Diff line
@@ -13,8 +13,8 @@ module TestCodec_GeoNetworking { 
  //    import from DENM_PDU_Descriptions language "ASN.1:1997" all;

  

  // LibItsCommon

  //    import from LibItsCommon_TypesAndValues all;

  //    import from LibItsCommon_Functions all;

  import from LibItsCommon_TypesAndValues all;

  import from LibItsCommon_Templates all;

  

  // LibItsExternal

  import from LibItsExternal_TypesAndValues all;
@@ -1891,6 +1891,39 @@ module TestCodec_GeoNetworking { 
        

      } // End of testcase tc_GeoNet_acPort_pass_beaconing_2

      

      /**

       * @desc validate GeoNetworkingReq/Broadcast with AcPort/beaconing

       * @verdict Pass on success, Fail otherwise

       */

      testcase tc_GeoNet_Port_acPort_secured_1() runs on ItsGeoNetworking system ItsGeoNetworkingSystem {

        // Variables

        var GeoNetworkingInd v_msg;

        

        map(self:acPort, system:acPort);



        f_loadCertificates(PX_IUT_SEC_CONFIG_NAME);

        

        acPort.send(m_acEnableSecurity(cc_taCert_A)); 

        tc_ac.start;

        alt {

          [] acPort.receive(m_acSecResponseSuccess) {

            tc_ac.stop;

          }

          [] acPort.receive {

            tc_ac.stop;

            log("*** " & __SCOPE__ & ": ERROR: Received unexpected message ***");

            f_selfOrClientSyncAndVerdict("error", e_error);

          }

          [] tc_ac.timeout {

            log("*** " & __SCOPE__ & ": ERROR: Timeout while waiting for adapter control event result ***");

            f_selfOrClientSyncAndVerdict("error", e_timeout);

          }

        } // End of 'alt' statement

        

        unmap(self:acPort, system:acPort);

        

      } // End of testcase tc_GeoNet_acPort_secured_1

      

    } // End of group testGeoNetPort

    

  } // End of group LibItsGeoNetworking_testCases