Validation Results included (33dbccd0) · Commits · TTCN-3 Libraries / LibDiameter

ttcn/LibDiameter_Interface.ttcn

+2 −0

Changes for ttcn/LibDiameter_Interface.ttcn: 2 added lines, 0 removed lines.
Original line number	Diff line number	Diff line
		@@ -69,6 +69,8 @@ module LibDiameter_Interface
		port SyncPort syncPort;
		timer tc_sync := PX_TSYNC_TIME_LIMIT;

		var boolean vc_isAF := false;
		var boolean vc_serverStop:=false;
		} // end DiameterComponent

		} // end module LibDiameter_Interface
		No newline at end of file

ttcn/LibDiameter_Steps.ttcn

+99 −15

Changes for ttcn/LibDiameter_Steps.ttcn: 99 added lines, 15 removed lines.
Original line number	Diff line number	Diff line
		@@ -245,7 +245,7 @@ group SendMessage {
		else
		{
		log("Please check configuration!!! Send of DIAMETER message unsucessfull!");
		setverdict (inconc);
		f_setVerdict (e_error);
		}
		}
		else
		@@ -687,14 +687,16 @@ group GlobalSteps {
		return template Address
		{
		var template Address v_ipv4, v_ipv6;
		v_ipv4.ipAddress := {ipv4:= p_ipv4 };
		v_ipv6.ipAddress := {ipv6:= p_ipv6 };
		if (PX_IPv6)
		{
		v_ipv6.addressFamily := c_ipv6AddressFamily;
		v_ipv6.ipAddress := {ipv6:= p_ipv6 };
		return(v_ipv6)
		}
		else
		{
		v_ipv4.addressFamily := c_ipv4AddressFamily;
		v_ipv4.ipAddress := {ipv4:= p_ipv4 };
		return(v_ipv4)
		}
		}
		@@ -713,7 +715,7 @@ group GlobalSteps {
		addr_i:=0;

		if (PX_IPv6){
		v_ip.addressFamily := '0002'O;
		v_ip.addressFamily := c_ipv6AddressFamily;
		for(i:=0;i<addr_len;i:=i+1){
		current:=substr(p_addr,i,1);
		if(current==":"){
		@@ -744,7 +746,7 @@ group GlobalSteps {
		return(v_ip)
		}
		else{
		v_ip.addressFamily := '0001'O;
		v_ip.addressFamily := c_ipv4AddressFamily;
		for(i:=0;i<addr_len;i:=i+1){
		current:=substr(p_addr,i,1);
		if(current=="."){
		@@ -825,13 +827,13 @@ group Preambles {
		tc_wait.stop;
		vc_ETS_conn:=0;
		log("Connection NOT established");
		setverdict (fail);
		f_setVerdict (e_error);
		};
		[] tc_wait.timeout
		{
		vc_ETS_conn:=0;
		log("Connection NOT established");
		setverdict (fail);
		f_setVerdict (e_error);
		}
		}
		}
		@@ -858,7 +860,7 @@ group Preambles {
		[] tc_wait.timeout
		{
		log("Connection NOT established");
		setverdict (fail);
		f_setVerdict (e_error);
		}
		}
		}
		@@ -880,8 +882,8 @@ group Preambles {

		f_awaiting_CER(mw_CER_dummy);
		f_send_CEA(m_CEA_AppId(vc_originHost, vc_originRealm, vc_hostIPAddress, p_authApplicationId));
		f_send_DWR(m_DWR_basic(vc_originHost, vc_originRealm));
		f_awaiting_DWA(mw_DWA_dummy);
		// f_send_DWR(m_DWR_basic(vc_originHost, vc_originRealm));
		// f_awaiting_DWA(mw_DWA_dummy);
		}

		}//end group preamble_Diameter
		@@ -937,8 +939,6 @@ group Postambles {
		{
		f_send_DPR(m_DPR_basic(vc_originHost, vc_originRealm));
		f_awaiting_DPA(mw_DPA_dummy);

		f_terminate_diameter_component();
		}

		}//end group postamble_Diameter
		@@ -956,7 +956,7 @@ group DefaultsTestStep
		{
		[] any timer.timeout
		{
		setverdict(fail);
		f_setVerdict(e_error);
		all timer.stop;
		//stop
		}
		@@ -965,7 +965,7 @@ group DefaultsTestStep
		{
		tc_wait.stop;
		vc_ETS_conn:=0;
		setverdict (fail);
		f_setVerdict (e_error);
		};

		}
		@@ -974,7 +974,7 @@ group DefaultsTestStep
		{
		[] any timer.timeout
		{
		setverdict(fail);
		f_setVerdict(e_error);
		all timer.stop;
		//stop
		}
		@@ -990,6 +990,90 @@ group DefaultsTestStep

		}

		/**
		* @desc This default handles receiving of the sync server
		* STOP message and calls the RT HUT postamble. (copy from common lib)
		*/
		altstep a_diameter_catchSyncStop() runs on DiameterComponent
		{
		[] syncPort.receive(m_syncServerStop)
		{
		tc_sync.stop ;
		log("** a_diameter_catchSyncStop: Test component received STOP signal from MTC - going to IDLE state ** ");
		syncPort.send(m_syncClientStop);
		f_terminate_diameter_component();
		log("** a_diameter_catchSyncStop: TEST COMPONENT NOW STOPPING ITSELF! ** ") ;
		f_setVerdict(e_timeout);
		stop ;
		}
		}

		altstep a_diameter_default() runs on DiameterComponent
		{
		[] any timer.timeout
		{
		all timer.stop;
		if (vc_serverStop==false) {
		f_selfOrClientSyncAndVerdict("error", e_timeout);
		}
		else {
		stop;
		}
		}
		[] DIAMP.receive (DIAMETER_MSG:{dWR_MSG := mw_DWR_dummy}) -> value vc_recvDiamMsgDefault
		{
		vc_recv_hopid:= vc_recvDiamMsgDefault.dWR_MSG.header.hopid;
		vc_recv_endid:= vc_recvDiamMsgDefault.dWR_MSG.header.endid;
		f_send_DWA(m_DWA_basic(vc_originHost, vc_originRealm));
		repeat;
		}
		[] DIAMP.receive (DIAMETER_MSG:{cER_MSG := mw_CER_basic(mw_authApplicationId(c_applIdRx))}) -> value vc_recvDiamMsgDefault
		{
		vc_recv_hopid:= vc_recvDiamMsgDefault.cER_MSG.header.hopid;
		vc_recv_endid:= vc_recvDiamMsgDefault.cER_MSG.header.endid;
		f_send_CEA(m_CEA_AppId(vc_originHost, vc_originRealm, vc_hostIPAddress, c_applIdRx));
		repeat;
		}
		[] DIAMP.receive (DIAMETER_MSG:{cER_MSG := mw_CER_basic(mw_authApplicationId(c_applIdGx))}) -> value vc_recvDiamMsgDefault
		{
		vc_recv_hopid:= vc_recvDiamMsgDefault.cER_MSG.header.hopid;
		vc_recv_endid:= vc_recvDiamMsgDefault.cER_MSG.header.endid;
		f_send_CEA(m_CEA_AppId(vc_originHost, vc_originRealm, vc_hostIPAddress, c_applIdGx));
		repeat;
		}
		[] DIAMP.receive (DIAMETER_MSG:?) -> value vc_recvDiamMsgDefault
		{
		if (vc_serverStop==false) {
		f_selfOrClientSyncAndVerdict("error", e_error);
		}
		else {
		stop;
		}
		}
		[] DIAMP.receive
		{
		if (vc_serverStop==false) {
		f_selfOrClientSyncAndVerdict("error", e_error);
		}
		else {
		stop;
		}
		}
		[] syncPort.receive(m_syncServerStop) {
		tc_sync.stop;
		vc_serverStop := true;
		log("* Test component received STOP signal from MTC *");
		if (vc_isAF) {
		f_postamble_AF();
		}
		else {
		f_postamble_PCRF();
		}
		log("* " & __SCOPE__ & ": INFO: TEST COMPONENT NOW STOPPING ITSELF! *");
		stop
		}
		}



		} // end of group DefaultsTestStep

ttcn/LibDiameter_Templates.ttcn

+82 −74

File changed.

Preview size limit exceeded, changes collapsed.

ttcn/LibDiameter_TypesAndValues.ttcn

+1033 −858

File changed.

Preview size limit exceeded, changes collapsed.