Commit c576620b authored by garciay's avatar garciay
Browse files

STF538: Start Certificate generation script

parent a2bc641f

ttcn/AtsGenCert/ItsGenCert_Functions.ttcn

+1 −1
Original line number Diff line number Diff line
@@ -172,7 +172,7 @@ module ItsGenCert_Functions { 
  function f_store_certificates(

                                in certificate_details_list p_certificate_details_list

                                ) return integer {

    fx_loadCertificates(PX_CERTIFICATE_POOL_PATH, "certificates");

    fx_loadCertificates(PX_CERTIFICATE_POOL_PATH, PX_IUT_SEC_CONFIG_NAME);

    for (var integer v_counter := 0; v_counter < lengthof(p_certificate_details_list); v_counter := v_counter + 1) {

      fx_store_certificate(

                           p_certificate_details_list[v_counter].certificate_id,

ttcn/AtsGenCert/ItsGenCert_TestCases.ttcn

+8 −2
Original line number Diff line number Diff line
@@ -82,16 +82,22 @@ module ItsGencert_TestCases { 
  } // End of testcase TC_GEN_CERT

  

  testcase TC_VALIDATE_CERT() runs on TCType system TCType {

    var SequenceOfCertificate v_certificate_list;

    var integer v_idx := 0;

      

    for (var integer v_counter := 0; v_counter < lengthof(PICS_CERTFICATES); v_counter := v_counter + 1) {

      var EtsiTs103097Certificate v_certificate;



      fx_loadCertificates(PX_CERTIFICATE_POOL_PATH, "certificates");

      fx_loadCertificates(PX_CERTIFICATE_POOL_PATH, PX_IUT_SEC_CONFIG_NAME);

      if (f_readCertificate(PICS_CERTFICATES[v_counter].certificate_id, v_certificate) == false) {

        setverdict(fail, "Failed to read certificate ", PICS_CERTFICATES[v_counter].certificate_id);

        stop;

      } else {

          v_certificate_list[v_idx] := v_certificate;

          v_idx := v_idx + 1;

      }

    } // End of 'for' statement

    log("v_certificate_list = ", v_certificate_list);



    setverdict(pass);

  } // End of testcase TC_VALIDATE_CERT