OneM2M_Testcases_CSE_Release_1.ttcn 450 KB
Newer Older
1 2 3 4 5 6 7 8
/**
 *  Copyright Notification
 *  No part of this document may be reproduced, in an electronic retrieval system or otherwise, except as authorized by written permission.
 *  The copyright and the foregoing restriction extend to reproduction in all media.
 *  © 2016, oneM2M Partners Type 1 (ARIB, ATIS, CCSA, ETSI, TIA, TSDSI, TTA, TTC).
 *  All rights reserved.
 *  
 *  @author     ETSI
9 10
 *  @version    $URL: https://oldforge.etsi.org/svn/oneM2M/branches/Release1/ttcn/OneM2M_Testcases.ttcn $
 *              $Id: OneM2M_Testcases.ttcn 347 2017-08-11 08:48:20Z reinaortega $
11 12 13
 *  @desc       Module containing test cases for oneM2M
 *
 */
14
module OneM2M_Testcases_CSE_Release_1 {
15 16 17 18 19 20

	import from OneM2M_TestSystem all;
	import from OneM2M_Templates all;
	import from OneM2M_Types all;//{type XSD.ID};
	import from OneM2M_TypesAndValues all;
	import from OneM2M_Pixits all;
21
	import from LibCommon_Time all;
22
	import from OneM2M_Pics all;
23
	import from OneM2M_Functions all;
24
	import from OneM2M_PermutationFunctions all;
25 26
	import from XSD all;
	
27
	
28 29 30
	//Demos used for validation purposes
	group oneM2M_demos {
	
31
		group helpingTestCases {//These are not part of the test suite, just for verification purposes
32
			
33
			testcase TC_DELETE_RESOURCES() runs on AeSimu system CseSystem {
34 35 36
				
				timer t_ac := 5.0;
				var integer i; 
37 38
				var XSD.ID v_resourceAddress;
				var RequestPrimitive v_request;
39 40 41
				map(self:mcaPort, system:mcaPort); 
					
				for (i:=0; i<lengthof(PX_RESOURCES_TO_BE_DELETED); i:= i+1) {  
42 43 44
					
					v_resourceAddress := f_getResourceAddress() & "/" & PX_RESOURCES_TO_BE_DELETED[i]; 
						
45 46
					v_request := valueof(m_delete(v_resourceAddress, PX_SUPER_AE_ID));
					    
47 48
					mcaPort.send(m_request(v_request));
					
49 50
					t_ac.start;
					alt {
51
						[] mcaPort.receive(mw_response(mw_responsePrimitiveOK)) {
52
							t_ac.stop;
53
							log(__SCOPE__ & ":Resource deleted");
54 55
							setverdict(pass);
						}
56
						[] mcaPort.receive(mw_response(mw_responsePrimitiveKO)) {
57
							t_ac.stop;
58
							log(__SCOPE__ & ":Error while deleting resource");
59 60 61 62
							setverdict(fail);
						}
						[] mcaPort.receive {
							t_ac.stop;
63
							log(__SCOPE__ & ":Unexpected message received");
64 65 66
							setverdict(inconc);
						}
						[] t_ac.timeout {
67
							log(__SCOPE__ & ":No answer while deleting resource");
68 69 70 71 72 73 74 75 76
							setverdict(inconc);
						}	
					}	
				}
			
				unmap(self:mcaPort, system:mcaPort); 
				stop;
			}	
		
77
		}//end group helpingTestCases
78 79 80 81 82
	
	}//end group oneM2M_demos
	
	group CSE {
		
83 84 85 86 87 88 89 90 91
		group Generic {
			
			group Create {
				group g_CSE_GEN_CRE_001 {

					/**
					 * @desc Check that the IUT accepts the creation of a  resource using unstructured resource identifier
					 * 
					 */
92
					testcase TC_CSE_GEN_CRE_001_CSR() runs on Tester system CseSystem {
93 94
						// Local variables
						                        
95 96 97 98
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
                        
						v_ae1.start(f_CSE_GEN_CRE_001(e_cseRelative));
						v_ae1.done;
99
					}
100

101
					testcase TC_CSE_GEN_CRE_001_SPR() runs on Tester system CseSystem {
102 103
						// Local variables
						
104 105 106 107
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;

						v_ae1.start(f_CSE_GEN_CRE_001(e_spRelative));
						v_ae1.done;
108
					}
109
					
110
					testcase TC_CSE_GEN_CRE_001_ABS() runs on Tester system CseSystem {
111
						// Local variables
112 113 114 115
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
                        
						v_ae1.start(f_CSE_GEN_CRE_001(e_absolute));
						v_ae1.done;
116
					}				
117 118 119 120
				
				} // end of group g_CSE_GEN_CRE_001
				
				group g_CSE_GEN_CRE_002 {
121

122 123 124 125
					/**
					 * @desc Check that the IUT accepts the creation of a  resource using structured resource identifier
					 * 
					 */
126
					testcase TC_CSE_GEN_CRE_002_CSR() runs on Tester system CseSystem {
127 128
						// Local variables
						                        
129 130 131 132
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
                        
						v_ae1.start(f_CSE_GEN_CRE_002(e_cseRelative));
						v_ae1.done;
133
					}
134

135
					testcase TC_CSE_GEN_CRE_002_SPR() runs on Tester system CseSystem {
136 137
						// Local variables
						
138 139 140 141
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
                        
						v_ae1.start(f_CSE_GEN_CRE_002(e_spRelative));
						v_ae1.done;
142
					}
143
					
144
					testcase TC_CSE_GEN_CRE_002_ABS() runs on Tester system CseSystem {
145 146
						// Local variables
							
147 148 149 150
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
                        
						v_ae1.start(f_CSE_GEN_CRE_002(e_absolute));
						v_ae1.done;
151
					}
152
				
153
				} // end of group g_CSE_GEN_CRE_002
154
				
155 156 157 158 159 160 161 162 163
			} // end of group Create
			
			group Retrieve {
				group g_CSE_GEN_RET_001 {

					/**
					 * @desc Check that the IUT accepts the retrieval of a <container>  resource using unstructured resource identifier
					 * 
					 */
164
					testcase TC_CSE_GEN_RET_001_CSR() runs on Tester system CseSystem {
165 166
						// Local variables
						                        
167 168 169 170
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
                        
						v_ae1.start(f_CSE_GEN_RET_001(e_cseRelative));
						v_ae1.done;
171
					}
172

173
					testcase TC_CSE_GEN_RET_001_SPR() runs on Tester system CseSystem {
174 175
						// Local variables
						
176 177 178 179
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
                        
						v_ae1.start(f_CSE_GEN_RET_001(e_spRelative));
						v_ae1.done;
180
					}
181
					
182
					testcase TC_CSE_GEN_RET_001_ABS() runs on Tester system CseSystem {
183
						// Local variables
184 185 186 187
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
                        
						v_ae1.start(f_CSE_GEN_RET_001(e_absolute));
						v_ae1.done;
188 189
					}
								
190
				
191 192 193 194 195 196 197 198
				} // end of group g_CSE_GEN_RET_001
				
				group g_CSE_GEN_RET_002 {

					/**
					 * @desc Check that the IUT accepts the retrieval of a <container>  resource using structured resource identifier
					 * 
					 */
199
					testcase TC_CSE_GEN_RET_002_CSR() runs on Tester system CseSystem {
200
						// Local variables
201 202 203 204
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
                        
						v_ae1.start(f_CSE_GEN_RET_002(e_cseRelative));
						v_ae1.done;
205
					}
206

207
					testcase TC_CSE_GEN_RET_002_SPR() runs on Tester system CseSystem {
208 209
						// Local variables
						
210 211 212 213
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
                        
						v_ae1.start(f_CSE_GEN_RET_002(e_spRelative));
						v_ae1.done;
214
					}
215
					
216
					testcase TC_CSE_GEN_RET_002_ABS() runs on Tester system CseSystem {
217 218
						// Local variables
							
219 220 221 222
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
                        
						v_ae1.start(f_CSE_GEN_RET_002(e_absolute));
						v_ae1.done;
223 224
					}
								
225 226 227
				} // end of group g_CSE_GEN_RET_002
				
			} // end of group Retrieve
228
			
229 230
			group Update {
				group g_CSE_GEN_UPD_001 {
231

232 233 234 235
					/**
					 * @desc Check that the IUT accepts the update of a <container>  resource using unstructured resource identifier
					 * 
					 */
236
					testcase TC_CSE_GEN_UPD_001_CSR() runs on Tester system CseSystem {
237
						// Local variables
238 239 240 241
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
                        
						v_ae1.start(f_CSE_GEN_UPD_001(e_cseRelative));
						v_ae1.done;
242
					}
243

244
					testcase TC_CSE_GEN_UPD_001_SPR() runs on Tester system CseSystem {
245
						// Local variables
246 247 248 249
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
                        
						v_ae1.start(f_CSE_GEN_UPD_001(e_spRelative));
						v_ae1.done;
250
					}
251
					
252
					testcase TC_CSE_GEN_UPD_001_ABS() runs on Tester system CseSystem {
253 254
						// Local variables
							
255 256 257 258
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
                        
						v_ae1.start(f_CSE_GEN_UPD_001(e_absolute));
						v_ae1.done;
259 260
					}
								
261 262 263 264 265 266 267 268
				} // end of group g_CSE_GEN_UPD_001
				
				group g_CSE_GEN_UPD_002 {

					/**
					 * @desc Check that the IUT accepts the update of a <container>  resource using structured resource identifier
					 * 
					 */
269
					testcase TC_CSE_GEN_UPD_002_CSR() runs on Tester system CseSystem {
270 271
						// Local variables
						                        
272 273 274 275
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
                        
						v_ae1.start(f_CSE_GEN_UPD_002(e_cseRelative));
						v_ae1.done;
276 277
					}

278
					testcase TC_CSE_GEN_UPD_002_SPR() runs on Tester system CseSystem {
279 280
						// Local variables
						
281 282 283 284
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
                        
						v_ae1.start(f_CSE_GEN_UPD_002(e_spRelative));
						v_ae1.done;
285
					}
286
					
287
					testcase TC_CSE_GEN_UPD_002_ABS() runs on Tester system CseSystem {
288
						// Local variables
289
							
290 291 292 293
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
                        
						v_ae1.start(f_CSE_GEN_UPD_002(e_absolute));
						v_ae1.done;
294
					}
295 296 297 298
								
				} // end of group g_CSE_GEN_UPD_002
				
			} // end of group Update
299
			
300 301
			group Delete {
				group g_CSE_GEN_DEL_001 {
302

303 304 305 306
					/**
					 * @desc Check that the IUT accepts the deletion of a <container>  resource using unstructured resource identifier
					 *  
					 */
307
					testcase TC_CSE_GEN_DEL_001_CSR() runs on Tester system CseSystem {
308 309
						// Local variables
						                        
310 311 312 313
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
                        
						v_ae1.start(f_CSE_GEN_DEL_001(e_cseRelative));
						v_ae1.done;
314 315
					}

316
					testcase TC_CSE_GEN_DEL_001_SPR() runs on Tester system CseSystem {
317 318
						// Local variables
						
319 320 321 322
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
                        
						v_ae1.start(f_CSE_GEN_DEL_001(e_spRelative));
						v_ae1.done;
323
					}
324
					
325
					testcase TC_CSE_GEN_DEL_001_ABS() runs on Tester system CseSystem {
326 327
						// Local variables
							
328 329 330 331
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
                        
						v_ae1.start(f_CSE_GEN_DEL_001(e_absolute));
						v_ae1.done;
332 333 334 335 336 337 338 339 340 341
					}
								
				} // end of group g_CSE_GEN_DEL_001
				
				group g_CSE_GEN_DEL_002 {

					/**
					 * @desc Check that the IUT accepts the deletion of a <container>  resource using structured resource identifier
					 * 
					 */
342
					testcase TC_CSE_GEN_DEL_002_CSR() runs on Tester system CseSystem {
343 344
						// Local variables
						                        
345 346 347 348
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
                        
						v_ae1.start(f_CSE_GEN_DEL_002(e_cseRelative));
						v_ae1.done;
349 350
					}

351
					testcase TC_CSE_GEN_DEL_002_SPR() runs on Tester system CseSystem {
352
						// Local variables
353
						
354 355 356 357
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
                        
						v_ae1.start(f_CSE_GEN_DEL_002(e_spRelative));
						v_ae1.done;
358
					}
359
					
360
					testcase TC_CSE_GEN_DEL_002_ABS() runs on Tester system CseSystem {
361 362
						// Local variables
							
363 364 365 366
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
                        
						v_ae1.start(f_CSE_GEN_DEL_002(e_absolute));
						v_ae1.done;
367 368 369 370 371 372 373 374 375 376 377 378 379
					}
								
				} // end of group g_CSE_GEN_DEL_002
				
			} // end of group Delete
		
		} // end of group Generic
		
		group Registration {
			
			group Create{
				
				/**
380
				 * @desc Check that the IUT accepts a create request of <AE> resource with attributes multiplicity equals to 1 and provided preprovisioned SP_relative_ AE_ID.  
381 382
				 * 
				 */
383
				testcase TC_CSE_REG_CRE_001() runs on AeSimu system CseSystem {
384
		  	  	
385
					var MsgIn v_response;
386
					var RequestPrimitive v_request;
387 388
					var integer v_cseBaseIndex := -1;
					var ResourceType v_resourceType := int2;
389 390
					var charstring v_action :=  __SCOPE__ & ": Please, make sure that the following AE-ID is allowed to register: " & PX_ALLOWED_C_AE_IDS[0];
					
391 392 393 394 395 396
					//Test control
					if(not(PICS_IN_CSE)) {
						setverdict(inconc, __SCOPE__ & ": IUT shall be IN-CSE to run this test case");
						stop;
					}
	                
397 398
					// Test component configuration
					f_cf01Up();
399 400
	                
					//Preamble
401
					action(v_action);
402
					f_sleepIgnoreDef(PX_TCONFIG_IUT);
403
					
404
					//Test Body
405
					v_request := valueof(m_createAe(PX_APP_ID, omit, f_getResourceAddress(-1, -, e_spRelative) & "/" & PX_ALLOWED_C_AE_IDS[0]));	
406
					
407
					v_request := f_getCreateRequestPrimitive(v_resourceType, v_request, -1);
408
					
409
					mcaPort.send(m_request(v_request));
410
					
411 412
					tc_ac.start;
					alt {
413
						[] mcaPort.receive(mw_response(mw_responsePrimitive(int2001))) -> value v_response {
414
							tc_ac.stop;
415 416 417
							f_checkAttributesToBeSaved(int2, v_request, v_response.primitive.responsePrimitive);
							vc_aeAuxIndex := f_setResource(v_response.primitive.responsePrimitive.primitiveContent, int2);
							
418
							setverdict(pass, __SCOPE__ & ": AE successfully created.");
419
						}
420
						[] mcaPort.receive(mw_response(mw_responsePrimitiveInverse(int2001))) -> value v_response{
421
							tc_ac.stop;
422
							setverdict(fail, __SCOPE__ & ": Error while creating AE with status code " & int2str(enum2int(v_response.primitive.responsePrimitive.responseStatusCode)));
423 424
						}
						[] tc_ac.timeout {
425
							setverdict(fail, __SCOPE__ & ": No answer while creating AE");
426 427
						}
					}	
428
									
429
					// Postamble
430 431 432 433
					f_cse_postamble_deleteResources();
					
					// Tear down
					f_cf01Down();
434 435
						
				}
436 437 438 439 440
		  	  	
				/**
				 * @desc Check that the IUT sends a registration CREATE Request with the value of the attribute ATTRIBUTE_NAME  of the AE resource
				 * 
				 */
441
				testcase TC_CSE_REG_CRE_002() runs on AeSimu system CseSystem {
442
		  	  	
443
					var MsgIn v_response;
444
					var RequestPrimitive v_request;
445 446
					var integer v_cseBaseIndex := -1;
					var ResourceType v_resourceType := int2;
447 448
					
					//Test control
449
	                
450 451
					// Test component configuration
					f_cf01Up();
452
		  	  	
453
					//Preamble
454
					
455 456 457
					//Test Body
					v_request := valueof(m_createAe(PX_APP_ID, omit, "C-AE-ID-STEM"));				
	    									
458
					v_request := f_getCreateRequestPrimitive(v_resourceType, v_request, -1);
459
	
460 461 462
					mcaPort.send(m_request(v_request));
					tc_ac.start;
					alt {
463
						[] mcaPort.receive(mw_response(mw_responsePrimitive(int2001))) -> value v_response{
464
							tc_ac.stop;
465 466 467
							
							f_checkAttributesToBeSaved(int2, v_request, v_response.primitive.responsePrimitive);
							vc_aeAuxIndex := f_setResource(v_response.primitive.responsePrimitive.primitiveContent, int2);
468
							setverdict(pass, __SCOPE__ & ": AE successfully created.");
469
						}
470
						[] mcaPort.receive(mw_response(mw_responsePrimitiveInverse(int2001))) -> value v_response{
471
							tc_ac.stop;
472
							setverdict(fail, __SCOPE__ & ": Error while creating AE with status code " & int2str(enum2int(v_response.primitive.responsePrimitive.responseStatusCode)));
473 474
						}
						[] tc_ac.timeout {
475
							setverdict(fail, __SCOPE__ & ": No answer while creating AE");
476 477
						}
					}	
478
									
479
					// Postamble
480 481 482 483
					f_cse_postamble_deleteResources();
					
					// Tear down
					f_cf01Down();
484
						
485
				}
486 487

				/**
488 489 490 491 492 493 494 495
				 * @desc Check that the IUT accepts a create request of <AE> resource with attributes multiplicity equals to 1 and provided preprovisioned SP_relative_AE_ID. 
				 */
				
				testcase TC_CSE_REG_CRE_003() runs on CseSimu system CseSystem{
					
					var integer v_remoteCseIndex := -1;
					
					//Test Configuration
496
					//f_cf02Up();
497 498 499
					
					//Preamble
					v_remoteCseIndex := f_cse_registrationRemoteCse();
500
					vc_ae1 := AeSimu.create("AE1") alive;
501
					vc_ae1.start(f_cse_preamble_registerAe());
502 503
					
				
504
				}
505 506 507 508 509
		  	  	
				/**
				 * @desc Check that the IUT rejects an AE registration (allowed App-ID, not allowed C-AE-ID-STEM provided by AE) 
				 * 
				 */
510
				testcase TC_CSE_REG_CRE_004() runs on AeSimu system CseSystem {
511
		  	  	
512
					var MsgIn v_response;
513
					var RequestPrimitive v_request;
514 515
					var integer v_cseBaseIndex := -1;
					var ResourceType v_resourceType := int2;
516
					var charstring v_action :=  __SCOPE__ & ": Please, make sure that the following AE-ID is not allowed to register: " & PX_NOT_ALLOWED_C_AE_IDS[0];
517 518
					
					//Test control
519
	                
520
					// Test component configuration
521
					f_cf01Up();
522
		  	  	
523
					//Preamble
Antonio Castillo Verdugo's avatar
Antonio Castillo Verdugo committed
524
					//vc_remoteCseIndex := f_cse_registrationRemoteCse(mw_createRemoteCSE);
525
					//TODO: create serviceSubscribedProfile, Node, and serviceSubscribedAppRule
526
					//v_cseBaseIndex := f_cse_preamble_createServiceSubscribedProfile({"C*"}); //c_CRUDNDi);
527
					action(v_action);
528
					f_sleepIgnoreDef(PX_TCONFIG_IUT);
529
					
530
					//Test Body	
531
					//v_request := valueof(m_createAe(PX_APP_ID, omit, "C-AE-ID-STEM"));				
532
	    											
533
					v_request := f_getCreateRequestPrimitive(int2, m_createAe(PX_APP_ID, omit, PX_NOT_ALLOWED_C_AE_IDS[0]), -1);
534
			
535
					mcaPort.send(m_request(v_request));
536 537
					tc_ac.start;
					alt {
538
						[] mcaPort.receive(mw_response(mw_responsePrimitive(int4107))) {
539
							tc_ac.stop;
540
							setverdict(pass, __SCOPE__ & ": AE creation rejected.");
541
						}
542
						[] mcaPort.receive(mw_response(mw_responsePrimitiveKO)) -> value v_response{
543
							tc_ac.stop;
544
							setverdict(fail, __SCOPE__ & ": Error while creating AE with status code " & int2str(enum2int(v_response.primitive.responsePrimitive.responseStatusCode)));
545
						}
546 547 548 549 550 551
						[] mcaPort.receive(mw_response(mw_responsePrimitiveOK)) -> value v_response{
							tc_ac.stop;
							setverdict(fail, __SCOPE__ & ": Error, creating AE with not allowed AE-ID ");
							f_checkAttributesToBeSaved(int2, v_request, v_response.primitive.responsePrimitive);
							vc_aeAuxIndex := f_setResource(v_response.primitive.responsePrimitive.primitiveContent, int2);
						}
552
						[] tc_ac.timeout {
553
							setverdict(fail, __SCOPE__ & ": No answer while creating AE");
554
						}
555
					}
556
									
557
					// Postamble
558
					f_cse_postamble_deleteResources();
559
						
560
					// Tear down
561
					f_cf01Down();
562 563
						
				}
564 565 566 567 568
		  	  	
				/**
				 * @desc Check that the IUT accepts an AE registration (allowed App-ID, S-AE-ID-STEM not provided by AE) 
				 * 
				 */
569
				testcase TC_CSE_REG_CRE_005() runs on InCseSimu system CseSystem {
570
		  	  	
571 572
		  	  		var MsgIn v_request;
					var template RequestPrimitive v_requestPrimitive;
573 574
					var integer v_cseBaseIndex := -1;
					var ResourceType v_resourceType := int2;
575
					var boolean v_handleResponses := false;
576 577
					
					//Test control
578
	                
579
					// Test component configuration
580
					f_cf02UpCseSimuMaster();
581
		  	  	
582
					//Preamble
Antonio Castillo Verdugo's avatar
Antonio Castillo Verdugo committed
583
					vc_remoteCseIndex := f_cse_registrationRemoteCse(mw_createRemoteCSE);
584 585
		
					//Test Body
586 587
					vc_ae1.start(f_cse_sendCreateRequestPrimitive(int2, m_createAe(PX_APP_ID, -, "S", omit)));
					vc_ae1.done;
588
					
589 590
					v_requestPrimitive := mw_createAEAnnc(PX_CSE_ID & "/S", -, -, -);
					v_requestPrimitive.primitiveContent.aEAnnc.app_ID := PX_APP_ID;
591
	    									
592 593
					tc_ac.start;
					alt{
594
						[] mccPortIn.receive(mw_request(v_requestPrimitive)) -> value v_request {
595 596
							tc_ac.stop;
							setverdict(pass, __SCOPE__ & ": AE creation redirected.");
597
							v_handleResponses := true;
598
						}
599
						[] mccPortIn.receive(mw_request(mw_createAEAnnc())) -> value v_request {
600
							tc_ac.stop;
601
							setverdict(fail, __SCOPE__ & ": AE creation redirected but wrong parameters");
602
							v_handleResponses := true;
603
						}
604
						[] mccPortIn.receive(mw_request(?))-> value v_request {
605 606
							tc_ac.stop;
							setverdict(fail, __SCOPE__ & ": Unexpected message received");
607
							v_handleResponses := true;
608 609 610 611 612
						}
						[] tc_ac.timeout {
							setverdict(fail, __SCOPE__ & ": No answer while creating AE");
						}
					}
613
									
614
					// Postamble
615 616 617 618 619
					if (v_handleResponses) {
						vc_ae1.start(f_cse_receiveResponse());
						f_cse_sendResponse(v_request);
						vc_ae1.done;
					}
620
					f_cse_postamble_deleteResourcesCSE();
621 622
					
					// Tear down
623
					f_cf02DownCseSimuMaster();
624 625
						
				}
626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645
				
				/**
				 * @desc Check that the IUT accepts a create request of <AE> resource with attributes multiplicity equals to 1 and provided character ‘S’ in AE_ID_Stem ask for a SP_relative_AE_ID 
				 * 
				 */
				testcase TC_CSE_REG_CRE_006() runs on InCseSimu system CseSystem {

					var RequestPrimitive v_request;
					var integer v_cseBaseIndex := -1;
					var ResourceType v_resourceType := int2;
	
					//Test control
					if(not(PICS_MN_CSE or PICS_ASN_CSE)) {
						setverdict(inconc, __SCOPE__ & ": IUT shall be MN-CSE or ASN-CSE to run this test case");
						stop;
					}
    
					// Test component configuration
					f_cf02UpCseSimuMaster();

646
					//Preamble
647 648 649
					vc_remoteCseIndex := f_cse_registrationRemoteCse(mw_createRemoteCSE);
					
					//Test Body
650
					vc_ae1.start(f_cse_sendCreateRequestPrimitive(int2, m_createAe(PX_APP_ID, omit, "S")));
651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691
					vc_ae1.done;
							
					tc_ac.start;

					alt {
						[] mccPortIn.receive(mw_request(mw_createAEAnnc(PX_CSE_ID, f_getLocalResourceAddress(vc_cSEBaseIndex), -, "S"))) {
							tc_ac.stop;
							setverdict(pass, __SCOPE__ & ": AE creation redirected.");
						}
						[] tc_ac.timeout {
							setverdict(fail, __SCOPE__ & ": No answer while creating AE");
						}
					}	
					
					// Postamble
					f_cse_postamble_deleteResourcesCSE();
	
					// Tear down
					f_cf02DownCseSimuMaster();
		
				}	// end of TC_CSE_REG_CRE_006
				
				/**
				 * @desc Check that the IUT accepts a create request of <AE> resource with attributes multiplicity equals to 1 and provided character ‘S’ in AE_ID_Stem ask for a SP_relative_AE_ID 
				 * 
				 */
				testcase TC_CSE_REG_CRE_007() runs on AeSimu system CseSystem{

					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();
					
692
					//Preamble
693 694
					vc_cse1.start(f_cse_registrationRemoteCse(mw_createRemoteCSE));
					vc_cse1.done;
695 696
			
					mcaPort.send(m_request(f_getCreateRequestPrimitive(int2, m_createAe(PX_APP_ID, omit, "S"),-1)));
697
					
698
					vc_cse1.start(f_cse_announcementProcedure_createHandler());
699 700 701 702 703 704
					vc_cse1.done;
					
					//Test Body
					tc_ac.start;
					
					alt {
705
						[] mcaPort.receive(mw_response(mw_responsePrimitive(int2001))) -> value v_response {
706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729
							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_APP_ID){
									setverdict(pass, __SCOPE__ & ": AE creation success.");
								}else{
									setverdict(fail, __SCOPE__ & ": Error in AE content.");
								}
							}else{
								setverdict(fail, __SCOPE__ & ": primitiveContent doesn't exist");
							}
						}
						[] tc_ac.timeout {
							setverdict(fail, __SCOPE__ & ": No answer while creating AE");
						}
					}	
									
					// Postamble
					f_cse_postamble_deleteResources();
					
					// Tear down
					f_cf02Down();

				}	// end of TC_CSE_REG_CRE_007
730

731 732 733 734
				/**
				 * @desc Check that the IUT accepts an AE re-registration (allowed M2M-SP-assigned AE-ID, S-AE-ID-STEM provided by AE), transfer request to the IN-CSE 
				 * 
				 */
735
				testcase TC_CSE_REG_CRE_008() runs on InCseSimu system CseSystem {
736
		  	  	
737
					var RequestPrimitive v_request;
738 739
					var integer v_cseBaseIndex := -1;
					var ResourceType v_resourceType := int2;
740 741 742 743 744 745
					
					//Test control
					if(not(PICS_MN_CSE)) {
						setverdict(inconc, __SCOPE__ & ": IUT shall be MN-CSE to run this test case");
						stop;
					}
746
	                
747
					// Test component configuration
748
					f_cf02UpCseSimuMaster();
749
		  	  	
750
					//Preamble
Antonio Castillo Verdugo's avatar
Antonio Castillo Verdugo committed
751
					vc_remoteCseIndex := f_cse_registrationRemoteCse(mw_createRemoteCSE);
752
					vc_ae1.start(f_cse_createResource(int2, m_createAe(PX_APP_ID, omit, "S")));
753
					
754 755
					f_cseSimu_checkComponentDoneAndGetVerdict(vc_ae1);
								
756
					
757 758 759 760
					//TODO:
					//v_request := valueof(m_delete(f_getResourceAddress(v_aeIndex), f_getOriginator(v_aeIndex)));
					//mcaPort.send(m_request(v_request));
					
761
					//Test Body
762
					vc_ae1.start(f_cse_createResource(int2, m_createAe(PX_APP_ID, omit, "S")));
763
											
764
					tc_ac.start;
765
	
766
					alt {
767
						[] mccPortIn.receive(mw_request(mw_createAEAnnc(f_getResourceAddress(-1,e_hierarchical, e_spRelative) & "/S", "CSE_ID", -))) {
768 769 770
							tc_ac.stop;
							setverdict(pass, __SCOPE__ & ": AE creation redirected.");
						}
771
						[] mccPortIn.receive(mw_request(mw_createAEAnnc(f_getResourceAddress(-1,e_hierarchical, e_absolute) & "/S", "CSE_ID", -))) {
772
							tc_ac.stop;
773
							setverdict(pass, __SCOPE__ & ": AE creation redirected.");
774
						}
775
						[] mccPortIn.receive {
776
							tc_ac.stop;
777
							setverdict(fail, __SCOPE__ & ": Error while creating AE");
778 779
						}
						[] tc_ac.timeout {
780
							setverdict(fail, __SCOPE__ & ": No answer while creating AE");
781 782
						}
					}	
783
									
784
					// Postamble
785
					f_cse_postamble_deleteResourcesCSE();
786 787
					
					// Tear down
788
					f_cf02DownCseSimuMaster();
789 790
						
				}
791 792 793 794 795
		  	  	
				/**
				 * @desc Check that the IUT accepts an AE re-registration (allowed M2M-SP-assigned AE-ID, S-AE-ID-STEM provided by AE), communication between MN-CSE and IN-CSE
				 *  
				 */
796
				testcase TC_CSE_REG_CRE_009() runs on MnCseSimu system CseSystem {
797
		  	  	
798
					var MsgIn v_response;
799
					var RequestPrimitive v_request;
800 801
					var integer v_aeAnncIndex := -1;
					var ResourceType v_resourceType := int2;
802 803 804
					
					//Test control
					if(not(PICS_IN_CSE)) {
805
						setverdict(inconc, __SCOPE__ & ": IUT shall be IN-CSE to run this test case");
806 807
						stop;
					}
808
	                
809
					// Test component configuration
810
					f_cf04Up();
811
		  	  	
812
					//Preamble
813 814
					
					vc_remoteCseIndex := f_cse_registerRemoteCse(m_createRemoteCSEBase);
815 816
							
					//Create AEAnnc				
817
					v_aeAnncIndex := f_cse_announcementProcedure_announceResource(int2, m_createAEAnnc(-, PX_CSE1_ID & "/" & "S", PX_APP_ID, PX_CSE1_ID & "/" & "S"));
818 819 820 821 822 823
					
					//Update AEAnnc to simulate deregistration of AE
					v_request := f_getUpdateRequestPrimitive(f_getAnnouncedResourceType(int2),v_aeAnncIndex, valueof(m_updateAEAnncBase));//TODO 
					//v_request.primitiveContent.aEAnnc.link := "";//TODO To fix when base specs are fixed
					
					f_cse_updateAnnouncedResource(v_request);
824
					
825
					//Test Body
826
					v_request := valueof(m_updateAEAnncBase);			
827
	    									
828
					v_request := f_getUpdateRequestPrimitive(f_getAnnouncedResourceType(int2),v_aeAnncIndex, v_request);//TODO 
829
					v_request.primitiveContent.aEAnnc.labels := {"Credential-ID:None"};
830 831
		  	  		
					mccPort.send(m_request(v_request));
832
					tc_ac.start;
833
	
834
					alt {
835
						[] mccPort.receive(mw_response(mw_responsePrimitive(int2004))) -> value v_response {
836
							tc_ac.stop;
837 838
							setverdict(pass, __SCOPE__ & ": AE creation redirected.");
							//continue to test the content
839
						}
840
						[] mccPort.receive {
841
							tc_ac.stop;
842
							setverdict(fail, __SCOPE__ & ": Error while creating AE");
843 844
						}
						[] tc_ac.timeout {
845
							setverdict(fail, __SCOPE__ & ": No answer while creating AE");
846 847
						}
					}	
848 849 850
									
					//v_primitiveContentRetrievedResource := f_cse_retrieveResource(v_resourceIndex);	
									
851
					// Postamble
852
					f_cse_postamble_deleteResourcesCSE();
853 854
					
					// Tear down
855
					f_cf04Down();
856
						
857
				}
858 859


860 861 862 863
				/**
				 * @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
				 * 
				 */
864
				testcase TC_CSE_REG_CRE_010() runs on AeSimu system CseSystem {
865 866
		  	  	
					var MsgIn v_response;
867
					var RequestPrimitive v_request;
868
					var integer v_aeIndex := -1;
869 870 871 872 873 874
					
					//Test control
					if(not(PICS_MN_CSE)) {
						setverdict(inconc, __SCOPE__ & ": IUT shall be MN-CSE to run this test case");
						stop;
					}
875 876 877 878
	                
					// Test component configuration
					f_cf02Up();
		  	  	
879
					//Preamble
Antonio Castillo Verdugo's avatar
Antonio Castillo Verdugo committed
880
					vc_cse1.start(f_cse_registrationRemoteCse(mw_createRemoteCSE));
881
					vc_cse1.done;
882
					
883 884
					v_aeIndex := f_cse_createResource(int2, m_createAe(PX_APP_ID, omit, "S-AE-ID-STEM"));
					
885
					vc_cse1.start(f_cse_announcementProcedure_createHandler());
886
					vc_cse1.done;
887
					
888
					//TODO Deregister
889 890 891
					//f_cse_deleteResource(v_aeIndex);
					v_request := valueof(m_delete(f_getResourceAddress(v_aeIndex), f_getOriginator(v_aeIndex)));
					mcaPort.send(m_request(v_request));
892
					
893
					//Test Body
894 895
					f_cse_createResource(int2, m_createAe(PX_APP_ID, omit, f_getResourceId(vc_resourcesList[v_aeIndex].resource)));
					
896
					vc_cse1.start(f_cse_announcementProcedure_createHandler(mw_createAEAnnc(PX_CSE_ID, -, -, -)));
897
					vc_cse1.done;
898
					
899 900 901
					tc_ac.start;
	
					alt {
902
						[] mcaPortIn.receive(mw_response(mw_responsePrimitive(int2001))) -> value v_response {
903 904
							tc_ac.stop;
							//continue to test the content
905 906 907 908 909 910 911 912 913
							if (ischosen(v_response.primitive.responsePrimitive.primitiveContent.aE)){
								if (v_response.primitive.responsePrimitive.primitiveContent.aE.app_ID == PX_APP_ID){
									setverdict(pass, __SCOPE__ & ": AE creation success.");
								}else{
									setverdict(fail, __SCOPE__ & ": Error in AE content.");
								}
							}else{
								setverdict(fail, __SCOPE__ & ": primitiveContent doesn't exist");
							}
914
						}
915
						[] mcaPortIn.receive {
916 917
							tc_ac.stop;
							setverdict(fail, __SCOPE__ & ": Error while creating AE");
918
						}
919 920
						[] tc_ac.timeout {
							setverdict(fail, __SCOPE__ & ": No answer while creating AE");
921
						}
922 923 924 925
					}	
									
					// Postamble
					f_cse_postamble_deleteResources();
926
					
927 928
					// Tear down
					f_cf02Down();
929
						
930
				}; //end TC_CSE_REG_CRE_010
931

932 933 934 935 936 937 938 939 940 941
				/**
				 * @desc Check that the IUT accepts a create request of <AE> resource with attributes multiplicity equals to 1 and asking an CSE relative AE_ID by indicating AE_ID_Stem with character ‘C’.  
				 * 
				 */
				testcase TC_CSE_REG_CRE_011() runs on AeSimu system CseSystem {

					var MsgIn v_response;
					var RequestPrimitive v_request;
					var integer v_cseBaseIndex := -1;
					var ResourceType v_resourceType := int2;
942 943
					
					//Test control
944 945 946 947 948 949 950 951 952 953 954 955 956 957 958 959 960 961 962 963 964 965 966 967 968 969 970 971 972 973 974 975 976 977 978 979 980 981 982 983 984 985 986 987 988
    
    
					// Test component configuration
					f_cf01Up();
    
					//Preamble

					//Test Body
					v_request := valueof(m_createAe(PX_APP_ID, omit, "C"));	
	
					v_request := f_getCreateRequestPrimitive(v_resourceType, v_request, -1);
	
					mcaPort.send(m_request(v_request));
	
					tc_ac.start;
					alt {
						[] mcaPort.receive(mw_response(mw_responsePrimitive(int2001))) -> value v_response {
							tc_ac.stop;
							f_checkAttributesToBeSaved(int2, v_request, v_response.primitive.responsePrimitive);
							vc_aeAuxIndex := f_setResource(v_response.primitive.responsePrimitive.primitiveContent, int2);
							setverdict(pass, __SCOPE__ & ": AE successfully created.");
							
							if(v_response.primitive.responsePrimitive.primitiveContent.aE.resourceID[0] == "C"){
								setverdict(pass, __SCOPE__ & "Resource ID set correctly.");
							} else {
								setverdict(fail, __SCOPE__ & "Resource ID not set correctly.");
							}
							
						}
						[] mcaPort.receive(mw_response(mw_responsePrimitiveInverse(int2001))) -> value v_response{
							tc_ac.stop;
							setverdict(fail, __SCOPE__ & ": Error while creating AE with status code " & int2str(enum2int(v_response.primitive.responsePrimitive.responseStatusCode)));
						}
						[] tc_ac.timeout {
							setverdict(fail, __SCOPE__ & ": No answer while creating AE");
						}
					}	
					
					// Postamble
					f_cse_postamble_deleteResources();
	
					// Tear down
					f_cf01Down();
		
				}
989

990 991 992 993
				/**
				  * @desc Check that the IUT accepts an AE registration with the optional attribute OPTIONAL_ATTRIBUTE provided   
				  * 
				 */
994
				group g_CSE_REG_CRE_012 {
995
					
996 997 998 999 1000
					testcase TC_CSE_REG_CRE_012_AE_LBL() runs on Tester system CseSystem {
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						var template RequestPrimitive v_create := m_createAe(PX_APP_ID, omit, omit);
						
						v_create.primitiveContent.aE.labels := {"labels"};
1001
						v_ae1.start(f_CSE_REG_CRE_012(v_create));
1002
						v_ae1.done;
1003 1004
					}
					
1005 1006 1007 1008 1009
					testcase TC_CSE_REG_CRE_012_AE_APN() runs on Tester system CseSystem {
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						var template RequestPrimitive v_create := m_createAe(PX_APP_ID, omit, omit);
						
						v_create.primitiveContent.aE.appName := "AeAppName";
1010
						v_ae1.start(f_CSE_REG_CRE_012(v_create));
1011
						v_ae1.done;
1012 1013
					}
					
1014 1015 1016 1017 1018
					testcase TC_CSE_REG_CRE_012_AE_POA() runs on Tester system CseSystem {
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						var template RequestPrimitive v_create := m_createAe(PX_APP_ID, omit, omit);
						
						v_create.primitiveContent.aE.pointOfAccess := {PX_AE1_ADDRESS};
1019
						v_ae1.start(f_CSE_REG_CRE_012(v_create));
1020
						v_ae1.done;
1021 1022 1023
					}
					
				}
1024

1025
				group g_CSE_REG_CRE_013 {
1026 1027 1028 1029 1030
					
					/**
					 * @desc Check that the IUT accepts a create request of <remoteCSE> resource with OPTIONAL_ATTRIBUTE. 
					 * 
					 */
1031
					testcase TC_CSE_REG_CRE_013_LBL() runs on Tester system CseSystem {
1032
						// Local variables
1033
						var template RequestPrimitive v_createRequest := m_createRemoteCSEBase;	
1034
						const AttributeAux c_optionalAttribute := {"labels", omit};
1035 1036
						var CseSimu v_cse1 := CseSimu.create("CSE1") alive;
                        						
1037
						v_createRequest.primitiveContent.remoteCSE.labels := {"MyLabel"};
1038
						
1039
						v_cse1.start(f_CSE_REG_CRE_013(v_createRequest, c_optionalAttribute));
1040
						v_cse1.done;
1041
						
1042 1043
					}
					
1044
					testcase TC_CSE_REG_CRE_013_CST() runs on Tester system CseSystem {
1045
						// Local variables
1046 1047
						var template RequestPrimitive v_createRequest := m_createRemoteCSEBase;	
						const AttributeAux c_optionalAttribute := {"cseType", omit};
1048 1049
						var CseSimu v_cse1 := CseSimu.create("CSE1") alive;
												
1050
						v_createRequest.primitiveContent.remoteCSE.cseType := int1;
1051
						
1052
						v_cse1.start(f_CSE_REG_CRE_013(v_createRequest, c_optionalAttribute));
1053
						v_cse1.done;
1054 1055
					}
					
1056
					testcase TC_CSE_REG_CRE_013_POA() runs on Tester system CseSystem {
1057
						// Local variables
1058 1059
						var template RequestPrimitive v_createRequest := m_createRemoteCSEBase;	
						const AttributeAux c_optionalAttribute := {"pointOfAccess", omit};
1060
						var CseSimu v_cse1 := CseSimu.create("CSE1") alive;
1061
	
1062 1063
						v_createRequest.primitiveContent.remoteCSE.pointOfAccess := {"http://" & PX_CSE1_ADDRESS & "/"};
	
1064
						v_cse1.start(f_CSE_REG_CRE_013(v_createRequest, c_optionalAttribute));
1065
						v_cse1.done;
1066 1067

					}
1068
					
1069
					testcase TC_CSE_REG_CRE_013_NL() runs on Tester system CseSystem {
1070
						// Local variables
1071 1072
						var template RequestPrimitive v_createRequest := m_createRemoteCSEBase;	
						const AttributeAux c_optionalAttribute := {"nodeLink", omit};
1073
						var CseSimu v_cse1 := CseSimu.create("CSE1") alive;
1074

1075
						v_createRequest.primitiveContent.remoteCSE.nodeLink := c_defaultNodeID;
1076

1077
						v_cse1.start(f_CSE_REG_CRE_013(v_createRequest, c_optionalAttribute));
1078
						v_cse1.done;
1079

1080 1081
					}
					
1082
				}// end group g_CSE_REG_CRE_BV_013	
1083

1084 1085 1086 1087
				/**
				 * @desc Check that the IUT rejects an AE registration (not allowed App-ID) 
				 * 
				 */
1088
				testcase TC_CSE_REG_CRE_016() runs on AeSimu system CseSystem {
1089 1090 1091 1092 1093
		  	  	
					var MsgIn v_response;
					var RequestPrimitive v_request;
					var integer v_cseBaseIndex := -1;
					var ResourceType v_resourceType := int2;
1094 1095
					var charstring v_action :=  __SCOPE__ & ": Please, make sure that the following AppId is not allowed to register: " & PX_APP_ID;
	   
1096
					//Test control
1097 1098 1099
	                
					// Test component configuration
					f_cf01Up();
1100
					
1101 1102
					//Preamble
					action(v_action);
1103
					f_sleepIgnoreDef(PX_TCONFIG_IUT);
1104
											
1105
					// Test Body
1106
					v_request := valueof(m_createAe(PX_NOT_ALLOWED_APP_ID, omit, omit));				
1107 1108
	    									
					v_request := f_getCreateRequestPrimitive(v_resourceType, v_request, v_cseBaseIndex);
1109
					
1110 1111 1112
					mcaPort.send(m_request(v_request));
					tc_ac.start;
					alt {
1113
						[] mcaPort.receive(mw_response(mw_responsePrimitive(int4107))) {
1114 1115 1116
							tc_ac.stop;
							setverdict(pass, __SCOPE__ & ": AE creation rejected.");
						}
1117
						[] mcaPort.receive(mw_response(mw_responsePrimitiveKO)) -> value v_response{
1118 1119 1120
							tc_ac.stop;
							setverdict(fail, __SCOPE__ & ": Error while creating AE with status code " & int2str(enum2int(v_response.primitive.responsePrimitive.responseStatusCode)));
						}
1121 1122 1123 1124 1125 1126
						[] mcaPort.receive(mw_response(mw_responsePrimitiveOK)) -> value v_response{
							tc_ac.stop;
							setverdict(fail, __SCOPE__ & ": Error, creating AE with not allowed APP-ID ");
							f_checkAttributesToBeSaved(int2, v_request, v_response.primitive.responsePrimitive);
							vc_aeAuxIndex := f_setResource(v_response.primitive.responsePrimitive.primitiveContent, int2);
						}
1127 1128 1129 1130 1131 1132 1133
						[] tc_ac.timeout {
							setverdict(fail, __SCOPE__ & ": No answer while creating AE");
						}
					}	
									
					// Postamble
					f_cse_postamble_deleteResources();
1134
					
1135 1136
					// Tear down
					f_cf01Down();
1137
						
1138
				}
1139
				
1140 1141 1142 1143
				/**
				 * @desc Check that the IUT rejects a create request of <AE> resource that doesn’t include the MANDATORY_ATTRIBUTE
				 * 
				 */
1144 1145
				group g_CSE_REG_CRE_017 {
					testcase TC_CSE_REG_CRE_017_API() runs on Tester system CseSystem {
1146 1147 1148 1149 1150 1151 1152
						
						//Local variables
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						var template RequestPrimitive v_createRequest := m_createAe(PX_APP_ID);
						
						v_createRequest.primitiveContent.aE.app_ID := omit;	//Mandatory app_ID field is being set empty
	
1153
						v_ae1.start(f_CSE_REG_CRE_017(v_createRequest));
1154 1155
						v_ae1.done;
	
1156 1157
					}//end TC_CSE_REG_CRE_017_API
					testcase TC_CSE_REG_CRE_017_RR() runs on Tester system CseSystem {
1158 1159 1160 1161 1162 1163 1164
	
						// Local variables
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						var template RequestPrimitive v_createRequest := m_createAe(PX_APP_ID);
						
						v_createRequest.primitiveContent.aE.requestReachability := omit;	//Mandatory requestReachability field is being set empty
						
1165
						v_ae1.start(f_CSE_REG_CRE_017(v_createRequest));
1166
						v_ae1.done;
1167

1168
					}//end TC_CSE_REG_CRE_017_RR
1169
					
1170
				}//end g_CSE_REG_CRE_017
1171

1172 1173 1174 1175
				/**
				 * @desc Check that the IUT accepts an create request of <remoteCSE> resource with attributes multiplicity equals to 1. 
				 *  
				 */
1176
				testcase TC_CSE_REG_CRE_018() runs on CseSimu system CseSystem {
1177 1178 1179 1180 1181 1182 1183 1184
				
					// Local variables
					var MsgIn v_response;
					var RequestPrimitive v_request;
					var RequestPrimitive v_createRequestPrimitive := valueof(m_createRemoteCSEBase);	
					var ResourceType v_resourceType := int16;	//remoteCSE
					   
					// Test control
1185

1186 1187
					// Test component configuration
					f_cf04Up();
1188

1189 1190 1191
					// Test adapter configuration

					// Preamble
1192
				
1193 1194 1195 1196 1197 1198 1199 1200 1201
					// Test Body
					v_request := f_getCreateRequestPrimitive(v_resourceType, v_createRequestPrimitive, -1);
	
					mccPort.send(m_request(v_request));
					tc_ac.start;
					alt {
						[] mccPort.receive(mw_response(mw_responsePrimitive(int2001))) -> value v_response {
							tc_ac.stop;
							setverdict(pass, __SCOPE__ & ": Resource type remoteCSE created successfully");
1202 1203
							f_checkAttributesToBeSaved(int16, v_request, v_response.primitive.responsePrimitive);
							vc_aeAuxIndex := f_setResource(v_response.primitive.responsePrimitive.primitiveContent, int16);
1204
						}
1205 1206 1207
						[] mccPort.receive(mw_response(mw_responsePrimitiveOK)) {
							tc_ac.stop;
							setverdict(fail, __SCOPE__ & ": Wrong response status code in the response");
1208
						}
1209 1210 1211 1212 1213 1214 1215 1216
						[] mccPort.receive(mw_response(mw_responsePrimitiveKO)) -> value v_response {
							tc_ac.stop;
							setverdict(fail, __SCOPE__ & ": Error while creating resource type remoteCSE");
						}
						[] tc_ac.timeout {
							setverdict(fail, __SCOPE__ & ": No answer while creating resource type remoteCSE");
						}
					}	
1217
			
1218
					// Postamble
1219
					f_cse_postamble_deleteResourcesCSE();
1220 1221 1222
	
					// Tear down
					f_cf04Down();
1223

1224
				}//end TC_CSE_REG_CRE_018
1225
				
1226 1227 1228 1229
				/**
				 * @desc Check that the IUT accepts an create request of <remoteCSE> resource with attributes multiplicity equals to 1 without the preconfigured CSE-ID
				 *
				 */
1230
				testcase TC_CSE_REG_CRE_019() runs on CseSimu system CseSystem {
1231
				
1232 1233 1234 1235 1236 1237 1238 1239 1240 1241 1242 1243 1244 1245 1246 1247 1248 1249 1250 1251 1252 1253 1254 1255
					// Local variables
					var MsgIn v_response;
					var RequestPrimitive v_request;
					var RequestPrimitive v_createRequestPrimitive := valueof(m_createRemoteCSEBase);	
					var ResourceType v_resourceType := int16;	//remoteCSE
	   
					// Test control

					// Test component configuration
					f_cf04Up();

					// Test adapter configuration

					// Preamble

					// Test Body
					v_request := f_getCreateRequestPrimitive(v_resourceType, v_createRequestPrimitive, -1);

					mccPort.send(m_request(v_request));
					tc_ac.start;
					alt {
						[] mccPort.receive(mw_response(mw_responsePrimitiveOK)) -> value v_response {
							tc_ac.stop;
							setverdict(pass, __SCOPE__ & ": Resource type remoteCSE created successfully");
1256 1257
							f_checkAttributesToBeSaved(int16, v_request, v_response.primitive.responsePrimitive);
							vc_aeAuxIndex := f_setResource(v_response.primitive.responsePrimitive.primitiveContent, int16);
1258 1259 1260 1261 1262 1263 1264 1265 1266 1267 1268
						}
						[] mccPort.receive(mw_response(mw_responsePrimitiveKO)) -> value v_response {
							tc_ac.stop;
							setverdict(fail, __SCOPE__ & ": Error while creating resource type remoteCSE");
						}
						[] tc_ac.timeout {
							setverdict(fail, __SCOPE__ & ": No answer while creating resource type remoteCSE");
						}
					}	

					// Postamble
1269
					f_cse_postamble_deleteResourcesCSE();
1270 1271 1272 1273

					// Tear down
					f_cf04Down();