TC_CSE_REG_CRE_030 implemented

Signed-off-by: reinaortega <miguelangel.reinaortega@etsi.org>

OneM2M_Testcases_CSE_Release_1.ttcn

@@ -2198,7 +2198,79 @@ module OneM2M_Testcases_CSE_Release_1 {
 					f_cf04Down();
 						
 				}
-
+				
+				/**
+				 * @desc Check that the IUT accepts an AE re-registration (allowed M2M-SP-assigned AE-ID, S-AE-ID-STEM provided by AE), transfer response to the AE
+				 * 
+				 */
+				testcase TC_CSE_REG_CRE_030() runs on Tester system CseSystem {
+					
+					var AeSimu v_ae1 := AeSimu.create("AE1") alive;
+						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
+						v_ae1.done;
+						
+					v_ae1.start(f_CSE_REG_CRE_030());
+			  	  	
+					v_ae1.done;
+			  	  		
+				}
+					
+				function f_CSE_REG_CRE_030() runs on AeSimu {
+		  	  	
+					var MsgIn v_response;
+					var RequestPrimitive v_request;
+					var integer v_aeIndex := -1;
+					
+					//Test control
+					if(not(PICS_MN_CSE)) {
+						setverdict(inconc, __SCOPE__ & ": IUT shall be MN-CSE to run this test case");
+						stop;
+					}
+	                
+					// Test component configuration
+					f_cf02Up();
+		  	  	
+					//Preamble
+					vc_cse1.start(f_cse_registrationRemoteCse(mw_createRemoteCSE));
+					vc_cse1.done;
+					
+					vc_cse1.start(f_cse_announcementProcedure_createHandler(mw_createAEAnnc_s_ae_id(PX_CSE_ID & "/" & PX_ALLOWED_S_AE_IDS[0], -, -, -)));
+					
+					v_request := valueof(m_createAe(PX_APP_ID, omit, PX_ALLOWED_S_AE_IDS[0]));	
+					v_request := f_getCreateRequestPrimitive(int2, v_request, -1);
+					mcaPort.send(f_getMsgOutPrimitive(m_request(v_request)));
+					
+					f_aeSimu_checkComponentDoneAndGetVerdict(vc_cse1);
+					
+					//Test Body
+					tc_ac.start;
+	
+					alt {
+						[] mcaPort.receive(mw_response(mw_responsePrimitive(int2001))) -> value v_response {
+							tc_ac.stop;
+							//continue to test the content
+							if (ischosen(v_response.primitive.responsePrimitive.primitiveContent.aE)){
+								if (v_response.primitive.responsePrimitive.primitiveContent.aE.aE_ID == PX_ALLOWED_S_AE_IDS[0]){
+									setverdict(pass, __SCOPE__ & ": AE creation success.");
+								}else{
+									setverdict(fail, __SCOPE__ & ": AE-ID is not correct");
+								}
+							}else{
+								setverdict(fail, __SCOPE__ & ": AE representation not present");
+							}
+						}
+						[] tc_ac.timeout {
+							setverdict(fail, __SCOPE__ & ": No answer while creating AE");
+						}
+					}	
+									
+					// Postamble
+					f_cse_postamble_deleteResources();
+					
+					// Tear down
+					f_cf02Down();
+						
+				}; //end f_CSE_REG_CRE_030
 			
 			}	//end group Create