Reg

OneM2M_Functions.ttcn

@@ -106,6 +106,50 @@ module OneM2M_Functions {
 			return v_aeAuxIndex;
 		
 		}
+		
+		//Added by @Naum
+		function f_preamble_prepareCSE(in template (value) AccessControlOperations p_allowedOperations := int63, in template ListOfM2MID p_allowedAEs) runs on M2M return integer{//c_CRUDNDi
+		
+			var integer v_aeAuxIndex := -1;
+			var integer v_acpAuxIndex := -1;
+		
+			if(PX_ACP_SUPPORT){
+				v_acpAuxIndex := f_createAccessControlPolicyAux(p_allowedOperations := p_allowedOperations);
+			}
+			
+			if(v_acpAuxIndex != -1) {
+				//TODO:Discuss this case
+			} else {
+			  	var ServiceSubscribedAppRule v_serviceSubscribedAppRule;
+			  	v_serviceSubscribedAppRule.applicableCredIDs := {"None"};
+			  	v_serviceSubscribedAppRule.allowedApp_IDs := {"APP-ID"};
+			  	v_serviceSubscribedAppRule.allowedAEs := valueof(p_allowedAEs);
+				mcaPort.send(m_request(m_createCSEBase(v_serviceSubscribedAppRule)));
+			}
+			tc_ac.start;
+			alt {
+				[] mcaPort.receive(mw_response(int2001)){
+					tc_ac.stop;
+				}
+				[] mcaPort.receive(mw_responseKO) {
+					tc_ac.stop;
+					setverdict(inconc, "Preamble: Error while registering application");
+					stop;
+				}
+				[] mcaPort.receive {
+					tc_ac.stop;
+					setverdict(inconc, "Preamble: Unexpected message received");
+					stop;
+				}
+				[] tc_ac.timeout {
+					setverdict(inconc, "Preamble: No answer while registering resource");
+					stop;
+				}
+			}	
+			
+			return v_aeAuxIndex;
+		
+		}
 	
 	}//end group preambleFunctions