Initial version of TC_NAT64_LSN_AA_BV_001. (3be36ac9) · Commits · CABLE - Integrated broadband cable telecommunication networks / CableIPv6

ttcn/AtsNAT64/AtsNat64_Pics.ttcn3

+4 −1

Original line number	Diff line number	Diff line
		@@ -5,6 +5,9 @@
		*/
		module AtsNat64_Pics {

		// LibCommon
		/**
		* @desc IUT supports Anycast GW address
		*/
		modulepar boolean PICS_ANYCAST_GATEWAYADDRESS_CONFIGURED := true;

		} // End of module AtsNat64_Pics
		No newline at end of file

ttcn/AtsNAT64/AtsNat64_TestCases.ttcn3

+151 −0

Original line number	Diff line number	Diff line
		@@ -19,6 +19,7 @@ module AtsNat64_TestCases {
		import from AtsNat64_Templates all;
		import from AtsNat64_Interfaces all;
		import from AtsNat64_Pixits all;
		import from AtsNat64_Pics all;
		import from AtsNat64_TypesAndValues all;

		// AtsCommon
		@@ -2222,6 +2223,156 @@ module AtsNat64_TestCases {

		group validBehaviour {

		/**
		* @desc Check that the IUT supports Anycast GW addressing
		* @verdict pass on success, inconc on timeout, fail otherwise
		* <pre>
		* PICS Selection: none
		* Initial conditions:
		* with {
		* the IUT is properly provisioned
		* the interfaces are connected & functional
		* the IUT is configured with an Anycast address
		* }
		* Expected behaviour:
		* ensure that {
		* when {
		* the IUT receives multiple IPv6 packets
		* containing IPv6 transport header
		* containing source address
		* indicating client IPv6 address
		* containing destination address
		* indicating IUT GW IPv6 prefix first 64 bits
		* indicating IUT IPv4 embedded into the IPv6 address in last 32 bits
		* from multiple clients
		* }
		* then {
		* the IUT forwards packets to the destination
		* }
		* }
		* </pre>
		*
		* @version 0.0.1
		* @reference ETSI TS 101 569-1 Clause 6.4.6.14 Anycast Gateway Address
		* @see ETSI TS xxx xxx-x V0.0.1.5a-draft (2013-07) TP/NAT64/LSN/AA/VB/01
		*/
		testcase TC_NAT64_LSN_AA_BV_001() runs on Nat64Component system TestAdapter {

		// Local variables
		var UInt v_hostNum := lengthof(PX_NAT64_MAPPING_TABLE_1_TO_N.portInfos); /** Expected number of IPv6 packets to be forwarded */
		var Ipv4Packet v_ipv4Packet; /** IPv4 packets */
		var Ipv6Packet v_ipv6Packet; /** IPv6 packets address to IPv4 */
		var integer v_host; /** 'for' statement counter */

		// Test control
		if (not PICS_ANYCAST_GATEWAYADDRESS_CONFIGURED) {
		log("* " & __SCOPE__ & ": ERROR: 'PICS_ANYCAST_GATEWAYADDRESS_CONFIGURED' required for executing the TC *");
		stop;
		}

		// Test component configuration
		vc_lsnComponents[0] := LSNComponent.create(c_COMP_LSN);
		for (v_host := 0; v_host < v_hostNum; v_host := v_host + 1) {
		vc_hostComponents[v_host] := HostComponent.create(c_COMP_HOST & int2str(v_host));
		} // End of 'for' statement
		f_cf01Up();

		// Test adapter configuration

		// Test Body
		// Start all components
		vc_lsnComponents[v_host].start(f_TC_NAT64_LSN_AA_BV_001_lsn(v_hostNum));
		for (v_host := 0; v_host < v_hostNum; v_host := v_host + 1) {
		v_ipv4Packet := m_ipv4Packet_dummy(
		PX_NAT64_MAPPING_TABLE_1_TO_N.ip4Address,
		PX_IPV4_DESTINATION_INFORMATION.iutAddress,
		m_tcp_packet(
		PX_NAT64_MAPPING_TABLE_1_TO_N.portInfos[v_host].srcPort,
		PX_NAT64_MAPPING_TABLE_1_TO_N.dstPort,
		PX_IPV4_DESTINATION_INFORMATION.payload,
		m_tcp_flags_syn
		)
		);
		v_ipv6Packet := m_generalIpv6_extHdr_data(
		c_tcpHdr,
		PX_NAT64_MAPPING_TABLE_1_TO_N.portInfos[v_host].ip6Address,
		PX_NAT64_PREFIX & c_4ZeroBytes & PX_NAT64_MAPPING_TABLE_1_TO_N.ip4Address,
		omit,
		v_ipv4Packet.ipv4Payload.rawPacket
		);

		vc_hostComponents[v_host].start(f_TC_NAT64_LSN_AA_BV_001_host(v_ipv6Packet));
		} // End of 'for' statement

		f_serverSyncNClientsAndStop(v_hostNum, { c_prDone, "NPUremoval", c_tbDone, c_poDone });

		// Postamble
		f_down();

		} // End of testcase TC_NAT64_LSN_AA_BV_001

		group f_TC_NAT64_LSN_AA_BV_001 {

		/**
		* @desc Simulates LSN side
		* @verdict 'pass' on success, 'inconc' on 'timeout', fail otherwise
		*/
		function f_TC_NAT64_LSN_AA_BV_001_lsn(integer p_hostNum) runs on LSNComponent {

		// Local variables
		var FncRetCode v_result;
		var Ipv4Address v_localAddress := PX_IPV4_DESTINATION_INFORMATION.iutAddress;

		// Preamble
		// Clause 'Initial conditions'
		f_preamble_lsn(v_localAddress);
		f_selfOrClientSyncAndVerdict(c_prDone, e_success);
		log("* " & __SCOPE__ & ": INFO: Preamble done. *");

		// Test Body
		v_result := f_lsn_check_1_to_n_NAT_mapping(v_localAddress, p_hostNum);

		f_selfOrClientSyncAndVerdict(c_tbDone, v_result);

		// Postamble
		f_postamble_lsn();
		f_selfOrClientSyncAndVerdict(c_poDone, e_success);
		log("* " & __SCOPE__ & ": INFO: Postamble done. *");

		} // End of function f_TC_NAT64_LSN_AA_BV_001_lsn

		/**
		* @desc Simulates client side
		* @verdict 'pass' on success, 'inconc' on 'timeout', fail otherwise
		*/
		function f_TC_NAT64_LSN_AA_BV_001_host(Ipv6Packet p_ipv6Packet) runs on HostComponent {

		// Local variables

		// Preamble
		// Clause 'Initial conditions'
		f_preamble_host();
		f_selfOrClientSyncAndVerdict(c_prDone, e_success);
		log("* " & __SCOPE__ & ": INFO: Preamble done. *");

		// Test Body
		//TODO needs to be called as it sets length and checksum fields
		// if(f_setExtensionHeaders(v_ipv6Packet) != e_success) {
		// log(" ** " & __SCOPE__ & ": Error when calculating length of extension headers **");
		// f_selfOrClientSyncAndVerdict(c_tbDone, e_error);
		// }
		ipv6Port.send(p_ipv6Packet);
		f_selfOrClientSyncAndVerdict(c_tbDone, e_success);

		// Postamble
		f_postamble_host();
		f_selfOrClientSyncAndVerdict(c_poDone, e_success);
		log("* " & __SCOPE__ & ": INFO: Postamble done. *");

		} // End of function f_TC_NAT64_LSN_AA_BV_001_host

		} // End of group f_TC_NAT64_LSN_AA_BV_001

		} // End of group validBehaviour

		} // End of group anycastAddressing

ttcn/AtsNAT64/AtsNat64_TestControl.ttcn3

+8 −0

Original line number	Diff line number	Diff line
		@@ -5,6 +5,8 @@
		*/
		module AtsNat64_TestControl {

		// AtsNat64
		import from AtsNat64_Pics all;
		import from AtsNat64_TestCases all;

		control {
		@@ -38,14 +40,20 @@ module AtsNat64_TestControl {
		execute(TC_NAT64_LSN_ALG_BV_002());
		execute(TC_NAT64_LSN_ALG_BV_003());
		execute(TC_NAT64_LSN_ALG_BV_004());
		execute(TC_NAT64_LSN_ALG_BV_005());

		// 5.1.9 Routing Tables

		// 5.1.10 Anycast Addressing
		if (PICS_ANYCAST_GATEWAYADDRESS_CONFIGURED) {
		execute(TC_NAT64_LSN_AA_BV_001());
		}

		// 5.1.11 Redundancy
		execute(TC_NAT64_LSN_RED_BV_001());

		// 5.1.12 Load-Balancing
		execute(TC_NAT64_LSN_LB_BV_001());

		// 5.1.13 Failure Events
		execute(TC_NAT64_LSN_FE_BV_001());