From c7a65bf32e8c6974b6ebbd2ec2667a775b8a0479 Mon Sep 17 00:00:00 2001 From: reinaortega <miguelangel.reinaortega@etsi.org> Date: Thu, 23 Jan 2020 15:48:22 +0100 Subject: [PATCH] Fix #90 Signed-off-by: reinaortega <miguelangel.reinaortega@etsi.org> --- OneM2M_PermutationFunctions.ttcn | 44 ++++++++++++-------------------- 1 file changed, 17 insertions(+), 27 deletions(-) diff --git a/OneM2M_PermutationFunctions.ttcn b/OneM2M_PermutationFunctions.ttcn index 2b4a2c1..9f5061c 100644 --- a/OneM2M_PermutationFunctions.ttcn +++ b/OneM2M_PermutationFunctions.ttcn @@ -4035,14 +4035,11 @@ module OneM2M_PermutationFunctions { function f_CSE_DMR_CRE_023(ResourceType p_resourceType, template RequestPrimitive p_requestPrimitive, template (present) RequestPrimitive p_requestAnnc) runs on AeSimu system CseSystem{ // Local variables - var MsgIn v_anncRequest; - var RequestPrimitive v_request; + var integer v_aeIndex := -1; var integer v_parentIndex := -1; - var integer v_containerIndex := -1; - var integer v_remoteCseIndex; - var integer v_aeAnncIndex; - var integer v_resourceIndex; - + var template RequestPrimitive v_create := m_createAe(PX_TS_AE1.appId, omit, omit); + v_create.primitiveContent.aE.announceTo := {PX_TS_CSE1.cseId}; + // Test control // Test component configuration @@ -4052,31 +4049,24 @@ module OneM2M_PermutationFunctions { // Preamble - if (PX_MN_CSE) { - vc_cse1.start(f_cse_registrationRemoteCse(mw_createRemoteCSE)); - }else if (PX_IN_CSE) { - vc_cse1.start(f_cse_registerRemoteCse(m_createRemoteCSEBase)); - } - vc_cse1.done; + vc_cse1.start(f_cse_registerRemoteCse(m_createRemoteCSE_poa(-, -, -, -, {f_getCompletePoA()}))); + f_aeSimu_checkComponentDoneAndGetVerdict(vc_cse1); - vc_cse1.start(f_cse_announcementProcedure_createHandler()); - v_resourceIndex := f_cse_createResource(int2, m_createAe(PX_TS_AE1.appId, omit, omit)); - vc_cse1.done; - + vc_cse1.start(f_cse_announcementProcedure_createHandler(mw_createAEAnnc(-, -, -))); + v_aeIndex := f_cse_createResource(int2,v_create); + f_aeSimu_checkComponentDoneAndGetVerdict(vc_cse1); + if(p_resourceType == int4) { - v_containerIndex := f_cse_createResource(int3, m_createContainerBase, v_parentIndex); - v_parentIndex := v_containerIndex; + v_parentIndex := f_cse_createResource(int3, m_createContainerBase, v_aeIndex); + } else { + v_parentIndex := v_aeIndex; } // Test Body - v_request := f_getCreateRequestPrimitive(p_resourceType, p_requestPrimitive, v_parentIndex); - - vc_cse1.start(f_cse_receiveCreateRequest_cseSimu(p_requestAnnc)); - f_send(e_mcaPort, m_request(v_request)); - vc_cse1.done; - - vc_request.primitive.requestPrimitive := f_getRequestPrimitive(vc_cse1); - + vc_cse1.start(f_cse_announcementProcedure_createHandler(p_requestAnnc)); + f_cse_createResource(p_resourceType, p_requestPrimitive, v_aeIndex); + f_aeSimu_checkComponentDoneAndGetVerdict(vc_cse1); + // Postamble f_cse_postamble_deleteResources(); -- GitLab