Add missing TTCN-3 files (b4778834) · Commits · EMTEL - Emergency Communications / NG112 Conformance Test Suites

ttcn/AtsNg112/AtsNg112_TestCases.ttcn

+7 −4

Original line number	Diff line number	Diff line
		@@ -69,16 +69,19 @@ module AtsNg112_TestCases {
		m_http_request(
		m_http_request_get(
		PICS_LISP_URI,
		v_headers
		)));
		v_headers,
		m_http_message_body_xml(
		))));
		f_selfOrClientSyncAndVerdictTestBody(c_prDone, e_success);

		// Test body
		tc_ac.start;
		alt {
		[] httpPort.receive(
		mw_http_response
		) {
		mw_http_response(
		mw_http_response_ok(
		mw_http_message_body_xml
		))) {
		tc_ac.stop;
		log("* " & testcasename() & ": PASS: Security protocol version set to 3 *");
		f_selfOrClientSyncAndVerdictTestBody(c_tbDone, e_success);

ttcn/AtsNg112/AtsNg112_TestControl.ttcn

0 → 100644

+16 −0

Original line number	Diff line number	Diff line
		module AtsNg112_TestControl {

		// LibNg112
		import from LibNg112_Pics all;

		// AtsNg112
		import from AtsNg112_TestCases all;

		// Test Execution
		control {
		if (PICS_HTTP_POST_REQUEST and PICS_LOCATION_HELD) {
		execute(TC_LIS_HTTP_POST_BV_01());
		}
		} // End of 'control' statement

		} // End of module AtsNg112_TestControl

ttcn/LibEmcom/LibNg112/ttcn/LibNg112_Templates.ttcn

+12 −0

Original line number	Diff line number	Diff line
		@@ -11,6 +11,18 @@ module LibNg112_Templates {

		group rfc5985_held {

		template (omit) LocationRequestType m_locationRequest(
		template (value) LocationRequestType.elem_list p_elem_list,
		template (omit) ResponseTimeType p_responseTime := omit,
		template (omit) LocationRequestType.attr p_attr := omit,
		template (omit) LocationTypeType p_locationType := omit
		) := {
		responseTime := p_responseTime,
		attr := p_attr,
		locationType := p_locationType,
		elem_list := p_elem_list
		} // End of template m_locationRequest

		template LocationResponseType mw_locationResponse_dummy(
		template ReturnLocationType p_locationUriSet := *,
		template LocationResponseType.elem_list p_elem_list := *

ttcn/LibEmcom/LibNg112/ttcn/LibNg112_TypesAndValues.ttcn

+12 −1

Original line number	Diff line number	Diff line
		module LibNg112_TypesAndValues {

		type set of charstring XmlNs;

		type set of charstring XmlItems;

		type record xml_item {
		charstring name,
		XmlNs ns,
		charstring uri,
		XmlItems elem_list
		} // End of type xml_item

		} // End of module LibNg112_TypesAndValues

ttcn/TestCodec/TestCodec_Invite.ttcn

0 → 100644

+48 −0

Original line number	Diff line number	Diff line
		/**
		* @author ETSI / STF549
		* @version $URL:$
		* $ID:$
		* @desc This module provides the codec validation test cases.
		* @copyright ETSI Copyright Notification
		* No part may be reproduced except as authorized by written permission.
		* The copyright and the foregoing restriction extend to reproduction in all media.
		* All rights reserved.
		* @see ETSI TS 103 478
		*/
		module TestCodec_Invite {

		// LibCommon

		// LibSip
		import from LibSip_SIPTypesAndValues all;
		import from LibSip_Templates all;
		import from LibSip_EncdecDeclarations all;

		// LibNg112
		import from LibNg112_TypesAndValues all;
		import from LibNg112_Templates all;
		import from LibNg112_TestSystem all;

		// TestCodec
		import from TestCodec_TestAndSystem all;

		testcase tc_invite_request_1() runs on TCType system TCType {
		var bitstring v_raw_message := oct2bit('494e56495445207369703a757365723140657473692e6f7267205349502f322e300d0a43616c6c2d49443a2037343239323933324031302e3130302e342e31310d0a436f6e746163743a203c7369703a494d533155454031302e3130302e342e35303a353036303e0d0a436f6e74656e742d4c656e6774683a203134360d0a436f6e74656e742d547970653a206170706c69636174696f6e2f7364700d0a437365713a203230323020494e564954450d0a46726f6d3a203c7369703a494d533155454074657374657473692e6f72673a353036303e3b7461673d35303638393734350d0a4d61782d466f7277617264733a2037300d0a502d4368617267696e672d566563746f723a20696369642d76616c75653d3132336162633b696369642d67656e6572617465642d61743d3139322e312e312e31303b6f7269672d696f693d74657374657473692e6f72670d0a546f3a203c7369703a757365723140657473692e6f72673e0d0a5669613a205349502f322e302f5544502031302e3130302e342e31313a353036303b6272616e63683d7a39684734624b393236383135300d0a0d0a763d300d0a6f3d766f69636573657373696f6e203330303030203020494e204950342031302e3130302e342e35300d0a733d566f6963652053657373696f6e0d0a633d494e204950342031302e3130302e342e35300d0a623d41533a36340d0a743d3020300d0a6d3d617564696f2038353030205254502f4156502034350d0a613d7274706d61703a343520455453490d0a'O);
		var INVITE_Request v_dec_msg;
		var integer v_result := fx_dec_INVITE_Request (v_raw_message, v_dec_msg);

		if (v_result == 0) {
		setverdict(pass, "Decode match");
		} else {
		setverdict(fail, "Decode failure");
		}
		} // End of testcase tc_invite_request_1

		testcase tc_invite_request_2() runs on TCType system TCType {} // End of testcase tc_invite_request_2

		control {
		execute(tc_invite_request_1());
		execute(tc_invite_request_2());
		}

		} // End of module TestCodec_Invite