For TTCN V4.3.1 (75a3e028) · Commits · TTCN-3 Libraries / LibSip

ttcn/LibSip_Interface.ttcn

+1 −1

Original line number	Diff line number	Diff line
		@@ -119,7 +119,7 @@ module LibSip_Interface
		var SDP_Message vc_sdp_remote; // incoming SDP offers
		var SDP_Message vc_sdp_local; // SDP values to be sent
		var XmlBody vc_xml_remote; // incoming XML value
		var XmlBody vc_xml_local; //SDP values to be sent
		var template XmlBody vc_xml_local; //SDP values to be sent

		var CSeq vc_iut_CSeq := c_empty_cSeq; // value of last CSeq header used by the IUT in request
		// To/From header-fields to be used if the callee will release the session

ttcn/LibSip_PIXITS.ttcn

+67 −93

Original line number	Diff line number	Diff line
		@@ -21,344 +21,318 @@ module LibSip_PIXITS //MRO
		// _____________________________ PIXIT-S_______________________________
		group SIP_PIXITparameters{
		group SDPParameter {
		modulepar {

		/** @desc charstring for SDP dynamic port
		*/
		charstring PX_SIP_SDP_dyn := "0";
		modulepar charstring PX_SIP_SDP_dyn := "0";

		/** @desc charstring for SDP bandwidth modifier
		*/
		charstring PX_SIP_SDP_b_modifier := "AS";
		modulepar charstring PX_SIP_SDP_b_modifier := "AS";

		/** @desc integer for SDP bandwidth value
		*/
		integer PX_SIP_SDP_b_bandwidth := 64;
		modulepar integer PX_SIP_SDP_b_bandwidth := 64;

		/** @desc charstring for SDP media attribute encoding supported by the IUT
		*/
		charstring PX_SIP_SDP_encoding := "PCMU/8000";
		modulepar charstring PX_SIP_SDP_encoding := "PCMU/8000";

		/** @desc charstring for SDP media attribute encoding unavailable by the IUT
		*/
		charstring PX_SIP_SDP_encoding_unavail := "GSM/8000"; // f_Sip_TC2105_IS___xx__U18
		modulepar charstring PX_SIP_SDP_encoding_unavail := "GSM/8000"; // f_Sip_TC2105_IS___xx__U18

		/** @desc charstring for SDP media attribute encoding unsupported by the IUT
		*/
		charstring PX_SIP_SDP_encoding_unsup := "GSM/8000"; // f_Sip_TC2105_IS___xx__U18
		modulepar charstring PX_SIP_SDP_encoding_unsup := "GSM/8000"; // f_Sip_TC2105_IS___xx__U18

		/** @desc charstring for SDP media T.38 transport (used in TC2101_IS___AU__09)
		*/
		charstring PX_SIP_SDP_transport := "udptl";
		} // modulepar
		modulepar charstring PX_SIP_SDP_transport := "udptl";
		} //group SDP Parameter

		group ISUPinterworkingParameters{
		modulepar {
		/** @desc charstring for Used CPC language
		*/
		charstring PX_SIP_ISUP_LANGUAGE := "English";
		modulepar charstring PX_SIP_ISUP_LANGUAGE := "English";
		/** @desc charstring for Used CPC language
		*/
		charstring PX_SIP_ISUP_CPC_VALUE := "prison";
		}//modulepar
		modulepar charstring PX_SIP_ISUP_CPC_VALUE := "prison";
		} // goup PSTNParameters

		group SupportedOptions{
		modulepar {

		/** @desc boolean for True if 100rel mechanism is supported in SIP
		*/
		boolean PX_SIP_100rel := false;
		modulepar boolean PX_SIP_100rel := false;

		/** @desc boolean for True if precondition mechanism is supported in SIP
		*/
		boolean PX_SIP_precondition := false;
		modulepar boolean PX_SIP_precondition := false;

		/** @desc boolean for True if UDP Transport is used by the IUT to run campaign
		*/
		boolean PX_SIP_UDP := true;
		modulepar boolean PX_SIP_UDP := true;

		/** @desc charstring for Used Transport in upper case "UDP"/"TCP"
		*/
		charstring PX_SIP_TRANSPORT := "UDP";
		}//modulepar
		modulepar charstring PX_SIP_TRANSPORT := "UDP";
		}// group SupportedOptions{

		// PIXITS in group Ports_and_addresses_of_the_SUT can be ignored if this information is provided in other modules of the ATS that uses this SIP library
		group Ports_and_addresses_of_the_SUT{
		modulepar{

		/** @desc integer for SUT port number to exchange SIP messages
		*/
		integer PX_SIP_SUT_PORT := 5060;
		modulepar integer PX_SIP_SUT_PORT := 5060;

		/** @desc charstring for SUT IP address to exchange SIP messages
		*/
		charstring PX_SIP_SUT_IPADDR := "172.27.16.115";
		modulepar charstring PX_SIP_SUT_IPADDR := "172.27.16.115";

		/** @desc charstring for SUT domain
		*/
		charstring PX_SIP_SUT_HOME_DOMAIN := "172.27.16.115";
		modulepar charstring PX_SIP_SUT_HOME_DOMAIN := "172.27.16.115";

		/** @desc charstring for unknown SUT domain
		*/
		charstring PX_SIP_SUT_HOME_DOMAIN_UNKNOWN := "172.88.88.88";
		modulepar charstring PX_SIP_SUT_HOME_DOMAIN_UNKNOWN := "172.88.88.88";

		} //modulepar
		}

		// PIXITS in group PortsAndAddressesOfTheTS1 can be ignored if this information is provided in other modules of the ATS that uses this SIP library
		group PortsAndAddressesOfTheTS1 {
		// Ports and addresses of the TS1 (tester), first access
		modulepar {
		/** @desc integer for port number used by the TS1 to exchange SIP messages
		*/
		integer PX_SIP_TS1_PORT := 5060;
		modulepar integer PX_SIP_TS1_PORT := 5060;

		/** @desc charstring for IP address used by the TS1 to exchange SIP messages
		*/
		charstring PX_SIP_TS1_IPADDR := "172.27.1.218";
		modulepar charstring PX_SIP_TS1_IPADDR := "172.27.1.218";

		/** @desc charstring for identity of the tester local domain
		*/
		charstring PX_SIP_TS1_LOCAL_DOMAIN := "172.27.1.218";
		modulepar charstring PX_SIP_TS1_LOCAL_DOMAIN := "172.27.1.218";

		/** @desc charstring for identity of the tester local user
		*/
		charstring PX_SIP_TS1_LOCAL_USER := "2910";
		modulepar charstring PX_SIP_TS1_LOCAL_USER := "2910";

		/** @desc charstring for identity of the user with active call diversion service
		*/
		charstring PX_SIP_TS1_LOCAL_USER_DIV := "2907";
		modulepar charstring PX_SIP_TS1_LOCAL_USER_DIV := "2907";

		/** @desc charstring for identity of the tester local user (format "+"cc+ndc+sn)
		*/
		charstring PX_SIP_TS1_LOCAL_USER_FULL := "+ 33492941111";
		modulepar charstring PX_SIP_TS1_LOCAL_USER_FULL := "+ 33492941111";

		/** @desc integer for port number used by the TS to exchange media streams
		*/
		integer PX_SIP_TS1_BEARER_PORT := 52000;
		modulepar integer PX_SIP_TS1_BEARER_PORT := 52000;

		/** @desc charstring for port number used by the TS to exchange media streams
		*/
		integer PX_SIP_TS1_BEARER_PORT2 := 62000;
		modulepar integer PX_SIP_TS1_BEARER_PORT2 := 62000;

		/** @desc charstring for IP address used by the TS to exchange media streams
		*/
		charstring PX_SIP_TS1_BEARER_IPADDR := "172.27.1.218";
		}//modulepar
		modulepar charstring PX_SIP_TS1_BEARER_IPADDR := "172.27.1.218";
		}// group PortsAndAddressesOfTheTS

		// PIXITS in group PortsAndAddressesOfTheTS2 can be ignored if this information is provided in other modules of the ATS that uses this SIP library
		group PortsAndAddressesOfTheTS2 {
		// Ports and addresses of the TS2 (tester), second access
		modulepar {

		/** @desc integer for port number used by the TS2 to exchange SIP messages
		*/
		integer PX_SIP_TS2_PORT := 5060;
		modulepar integer PX_SIP_TS2_PORT := 5060;

		/** @desc charstring for IP address used by the TS2 to exchange SIP messages
		*/
		charstring PX_SIP_TS2_IPADDR := "172.27.1.219";
		modulepar charstring PX_SIP_TS2_IPADDR := "172.27.1.219";

		/** @desc charstring for identity of the tester local domain
		*/
		charstring PX_SIP_TS2_LOCAL_DOMAIN := "172.27.1.219";
		modulepar charstring PX_SIP_TS2_LOCAL_DOMAIN := "172.27.1.219";

		/** @desc charstring for identity of the tester local user
		*/
		charstring PX_SIP_TS2_LOCAL_USER := "2911";
		modulepar charstring PX_SIP_TS2_LOCAL_USER := "2911";

		/** @desc charstring for identity of the user with active call diversion service
		*/
		charstring PX_SIP_TS2_LOCAL_USER_DIV := "2011";
		modulepar charstring PX_SIP_TS2_LOCAL_USER_DIV := "2011";

		/** @desc charstring for identity of the tester local user (format "+"cc+ndc+sn)
		*/
		charstring PX_SIP_TS2_LOCAL_USER_FULL := "+ 33 4 92941111";
		modulepar charstring PX_SIP_TS2_LOCAL_USER_FULL := "+ 33 4 92941111";

		/** @desc integer for port number used by the TS to exchange media streams
		*/
		integer PX_SIP_TS2_BEARER_PORT := 53000;
		modulepar integer PX_SIP_TS2_BEARER_PORT := 53000;

		/** @desc integer for port number used by the TS to exchange media streams
		*/
		integer PX_SIP_TS2_BEARER_PORT2 := 63000;
		modulepar integer PX_SIP_TS2_BEARER_PORT2 := 63000;

		/** @desc charstring for IP address used by the TS to exchange media streams
		*/
		charstring PX_SIP_TS2_BEARER_IPADDR := "172.27.1.218";
		modulepar charstring PX_SIP_TS2_BEARER_IPADDR := "172.27.1.218";

		} // modulepar
		}//group PortsAndAddressesOfTheTS2

		// PIXITS in group PortsAndAddressesOfTheTS3 can be ignored if this information is provided in other modules of the ATS that uses this SIP library
		group PortsAndAddressesOfTheTS3 {
		// Ports and addresses of the TS3 (tester), second access
		modulepar{
		/** @desc integer for Port number used by the TS3 to exchange SIP messages
		*/
		integer PX_SIP_TS3_PORT := 5060;
		modulepar integer PX_SIP_TS3_PORT := 5060;

		/** @desc charstring for IP address used by the TS3 to exchange SIP messages
		*/
		charstring PX_SIP_TS3_IPADDR := "172.27.1.220";
		modulepar charstring PX_SIP_TS3_IPADDR := "172.27.1.220";

		/** @desc charstring for identity of the tester local domain
		*/
		charstring PX_SIP_TS3_LOCAL_DOMAIN := "172.27.1.220";
		modulepar charstring PX_SIP_TS3_LOCAL_DOMAIN := "172.27.1.220";

		/** @desc charstring for identity of the tester local user
		*/
		charstring PX_SIP_TS3_LOCAL_USER := "2012";
		modulepar charstring PX_SIP_TS3_LOCAL_USER := "2012";

		} //modulepar
		} //group PortsAndAddressesOfTheTS3

		group RegistrationParameters {
		modulepar {

		/** @desc boolean for the SIP user if it have to register itself before executing a test case
		*/
		boolean PX_SIP_REGISTRATION := false;
		modulepar boolean PX_SIP_REGISTRATION := false;

		/** @desc integer for the minimun SIP user registration expires-value
		*/
		integer PX_SIP_REGISTRATION_exp_min := 3600;
		modulepar integer PX_SIP_REGISTRATION_exp_min := 3600;

		/** @desc charstring for REGISTRAR domain
		*/
		charstring PX_SIP_SUT_REGISTRAR_DOMAIN := "172.27.16.115";
		}// modulepar
		modulepar charstring PX_SIP_SUT_REGISTRAR_DOMAIN := "172.27.16.115";
		}// group Registration parameters

		group ReleaseCause{
		modulepar {
		/** @desc integer for Release cause to be used in BYE and in Failure messages
		*/
		integer PX_SIP_BYE_CAUSE := 16;
		}//modulepar
		modulepar integer PX_SIP_BYE_CAUSE := 16;
		}//group ReleaseCause

		group RTPStreamControlAndCheck{
		modulepar {
		/** @desc boolean for True, if conversation check is implemented.
		*/
		boolean PX_SIP_CheckConversation := false;
		modulepar boolean PX_SIP_CheckConversation := false;

		/** @desc boolean for True, if DTMF check is implemented.
		*/
		boolean PX_SIP_CheckDTMF := false;
		modulepar boolean PX_SIP_CheckDTMF := false;

		/** @desc boolean for True, if Announcement sending is implemented.
		*/
		boolean PX_SIP_SendAnnouncement := false;
		modulepar boolean PX_SIP_SendAnnouncement := false;

		/** @desc boolean for True, if ringing check is implemented.
		*/
		boolean PX_SIP_CheckRinging := false;
		}//modulepar
		modulepar boolean PX_SIP_CheckRinging := false;
		}//group RTPStreamControlAndCheck

		group SwitchToEnableAuthentication {
		modulepar{
		/** @desc boolean for option controlling if authentication is enabled/disabled for REGISTER messages
		*/
		boolean PX_SIP_REGISTER_AUTHENTICATION_ENABLED := true;
		modulepar boolean PX_SIP_REGISTER_AUTHENTICATION_ENABLED := true;

		/** @desc boolean for option controlling if authentication is enabled/disabled for INVITE messages
		*/
		boolean PX_SIP_INVITE_AUTHENTICATION_ENABLED := false;
		}
		}
		modulepar boolean PX_SIP_INVITE_AUTHENTICATION_ENABLED := false;
		}//group SwitchToEnableAuthentication

		// PIXITS in group ParametersForHTTP_Authentication can be ignored if this information is provided in other modules of the ATS that uses this SIP library
		group ParametersForHTTP_Authentication {
		modulepar{

		/** @desc charstring for RFC 2617 clause 3-2-1 qop options:
		* Quoted string of one or more tokens indicating the "quality of protection" values supported by the server. The
		* value "auth" indicates authentication; the value "auth-int" indicates authentication with integrity protection.
		*/
		charstring PX_SIP_SUT_UE1_QOP := "auth";
		modulepar charstring PX_SIP_SUT_UE1_QOP := "auth";

		/** @desc charstring for RFC 2617 clause 3-2-2 username:
		* The name of user in the specified realm
		*/
		charstring PX_SIP_SUT_UE1_USERNAME := "abcd";
		modulepar charstring PX_SIP_SUT_UE1_USERNAME := "abcd";

		/** @desc charstring for RFC 2617 clause 3-2-2-2 passwd: A known shared secret, the password of user of the specified username
		*/
		charstring PX_SIP_SUT_UE1_PASSWD := "1234";
		modulepar charstring PX_SIP_SUT_UE1_PASSWD := "1234";

		/** @desc charstring for RFC 2617 3-2-1 qop options:
		* Quoted string of one or more tokens indicating the "quality of protection" values supported by the server. The
		* value "auth" indicates authentication; the value "auth-int" indicates authentication with integrity protection.
		*/
		charstring PX_SIP_SUT_UE2_QOP := "auth";
		modulepar charstring PX_SIP_SUT_UE2_QOP := "auth";

		/** @desc charstring for RFC 2617 clause 3-2-2 username:
		* The name of user in the specified realm
		*/
		charstring PX_SIP_SUT_UE2_USERNAME := "abcd";
		modulepar charstring PX_SIP_SUT_UE2_USERNAME := "abcd";

		/** @desc charstring for RFC 2617 clause 3-2-2-2 passwd: A known shared secret, the password of user of the specified username
		*/
		charstring PX_SIP_SUT_UE2_PASSWD := "1234";
		modulepar charstring PX_SIP_SUT_UE2_PASSWD := "1234";

		}//modulepar
		}//group ParametersForHTTP_Authentication

		group SIP_Timers {
		modulepar {
		/** @desc float for T1 RTT estimate (500 ms)
		*/
		float PX_SIP_T1 := 0.5;
		modulepar float PX_SIP_T1 := 0.5;

		/** @desc float for T2 Maximum retransmit interval for non-INVITE requests and INVITE response (4000 ms)
		*/
		float PX_T2 := 4.0;
		modulepar float PX_T2 := 4.0;

		/** @desc float for T4 Maximum duration a message will remain in the network
		*/
		float PX_T4 := 1.0;
		modulepar float PX_T4 := 1.0;

		/** @desc float for TDELAY default value for timeout on outgoing SIP request (ie 64*T1)
		*/
		float PX_SIP_TF := 32.0;
		modulepar float PX_SIP_TF := 32.0;

		/** @desc float for TWait default value for waiting an operator action
		*/
		float PX_SIP_TWAIT := 30.0;
		modulepar float PX_SIP_TWAIT := 30.0;

		/** @desc float for TAck default value for waiting an acknowledgement
		*/
		float PX_SIP_TACK := 8.0;
		modulepar float PX_SIP_TACK := 8.0;

		/** @desc float for TResp default value for waiting for a response from the IUT
		*/
		float PX_SIP_TRESP := 15.0;
		modulepar float PX_SIP_TRESP := 15.0;

		/** @desc float for TNoAct default value for waiting no message from the IUT
		* Value given for PX_TNOACT should be less than value of
		* SHORT_REGISTRATION constant (which is currently "3" (seconds))
		*/
		float PX_SIP_TNOACT := 1.0;
		modulepar float PX_SIP_TNOACT := 1.0;

		/** @desc float for TSYNC default value to synchronise ptc
		*/
		float PX_SIP_TSYNC := 10.0;
		modulepar float PX_SIP_TSYNC := 10.0;

		/** @desc float for TGUARD default value for an extra long timer to limit test execution
		*/
		float PX_SIP_TGUARD := 120.0;
		modulepar float PX_SIP_TGUARD := 120.0;

		/** @desc float for TRespRetention minimum time that a Proxy will wait before sending a final response
		*/
		float PX_TRespRetention := 1.0;
		}//modulepar
		modulepar float PX_TRespRetention := 1.0;
		}//group SIP_Timers
		} //group SIP_PIXITparameters
		} // end module LibSip_PIXITS

ttcn/LibSip_Steps.ttcn

+4 −4

Original line number	Diff line number	Diff line
		@@ -2392,7 +2392,7 @@ group SDPOperations{
		)))
		{log("than branch of if");
		if (
		match(p_direction_in,mw_attribute_sendrecv) and
		match(valueof(p_direction_in),valueof(mw_attribute_sendrecv)) and
		not(f_check_attribute(vc_request.messageBody.sdpMessageBody,mw_attribute_sendrecv) or
		f_check_attribute(vc_request.messageBody.sdpMessageBody,mw_attribute_sendonly) or
		f_check_attribute(vc_request.messageBody.sdpMessageBody,mw_attribute_recvonly) or
		@@ -2425,7 +2425,7 @@ group SDPOperations{
		)))
		{log("than branch of if");
		if (
		match(p_direction_in,mw_attribute_sendrecv) and
		match(valueof(p_direction_in),valueof(mw_attribute_sendrecv)) and
		not(f_check_attribute(vc_response.messageBody.sdpMessageBody,mw_attribute_sendrecv) or
		f_check_attribute(vc_response.messageBody.sdpMessageBody,mw_attribute_sendonly) or
		f_check_attribute(vc_response.messageBody.sdpMessageBody,mw_attribute_recvonly) or
		@@ -2456,7 +2456,7 @@ group SDPOperations{
		if (not (ispresent(vc_request.messageBody) and (f_check_session_attribute(vc_request.messageBody.sdpMessageBody,p_direction_in)
		)))
		{if (
		match(mw_attribute_sendrecv,p_direction_in) and
		match(valueof(mw_attribute_sendrecv),valueof(p_direction_in)) and
		not(f_check_session_attribute(vc_request.messageBody.sdpMessageBody,mw_attribute_sendrecv) or
		f_check_session_attribute(vc_request.messageBody.sdpMessageBody,mw_attribute_sendonly) or
		f_check_session_attribute(vc_request.messageBody.sdpMessageBody,mw_attribute_recvonly) or
		@@ -2485,7 +2485,7 @@ group SDPOperations{
		if (not (ispresent(vc_response.messageBody) and (f_check_session_attribute(vc_response.messageBody.sdpMessageBody,p_direction_in)
		)))
		{if (
		match(mw_attribute_sendrecv,p_direction_in) and
		match(valueof(mw_attribute_sendrecv),valueof(p_direction_in)) and
		not(f_check_session_attribute(vc_response.messageBody.sdpMessageBody,mw_attribute_sendrecv) or
		f_check_session_attribute(vc_response.messageBody.sdpMessageBody,mw_attribute_sendonly) or
		f_check_session_attribute(vc_response.messageBody.sdpMessageBody,mw_attribute_recvonly) or

ttcn/LibSip_Templates.ttcn

+39 −44

Original line number	Diff line number	Diff line
		@@ -2201,7 +2201,7 @@ group response_send {
		To p_to,
		Via p_via,
		Contact p_contact,
		AlertInfo p_alertInfo
		template AlertInfo p_alertInfo
		) modifies m_Response_Base:= {
		msgHeader := {
		alertInfo := p_alertInfo,
		@@ -3049,13 +3049,8 @@ group TemplatePreparationFunctions {
		var charstring v_auxstring;

		v_result := 2 + c_CRlen + lengthof(int2str(p_mb.protocol_version)); //* "v="
		v_result := v_result + 2+c_CRlen + lengthof(p_mb.origin.user_name & " " &
		p_mb.origin.session_id & " " &
		p_mb.origin.session_version & " " &
		p_mb.origin.net_type & " " &
		p_mb.origin.addr_type & " " &
		p_mb.origin.addr
		); //* "o="
		v_auxstring := p_mb.origin.user_name & " " & p_mb.origin.session_id & " " & p_mb.origin.session_version & " " & p_mb.origin.net_type & " " & p_mb.origin.addr_type & " " & p_mb.origin.addr;
		v_result := v_result + 2 + c_CRlen + lengthof(v_auxstring); //* "o="
		v_result := v_result + 2 + c_CRlen + lengthof(p_mb.session_name); //* "s="
		if (ispresent(p_mb.information))
		{v_auxstring:=p_mb.information; v_result := v_result + 2 + c_CRlen + lengthof(v_auxstring);}; //* "i= "
		@@ -3087,14 +3082,15 @@ group TemplatePreparationFunctions {
		if (ispresent(p_mb.bandwidth))
		{
		for (var integer i:=0; i<sizeof(p_mb.bandwidth); i:=i+1) { //* "b= "
		v_result := v_result + 2+c_CRlen + lengthof(p_mb.bandwidth[i].modifier & " ") +
		v_auxstring:= p_mb.bandwidth[i].modifier & " ";
		v_result := v_result + 2 + c_CRlen + lengthof(v_auxstring) +
		lengthof(int2str(p_mb.bandwidth[i].bandwidth));
		};
		};

		for (var integer i:=0; i<sizeof(p_mb.times); i:=i+1) {
		v_result := v_result + 2+c_CRlen + lengthof(p_mb.times[i].time_field.start_time & " "
		& p_mb.times[i].time_field.stop_time);//* "t="
		v_auxstring:= p_mb.times[i].time_field.start_time & " " & p_mb.times[i].time_field.stop_time;
		v_result := v_result + 2 + c_CRlen + lengthof(v_auxstring);//* "t="

		if (ispresent(p_mb.times[i].time_repeat))
		{
		@@ -3601,5 +3597,4 @@ group others {

		} //* group TemplatePreparationFunctions


		} //* end module LibSip_Templates