Changes done due to validation weeks 40 and 41 for (07acfe8d) · Commits · TTCN-3 Libraries / LibIms

ttcn/LibIms_Steps.ttcn

+260 −71

Original line number	Original line	Diff line number	Diff line
	@@ -24,9 +24,70 @@ module LibIms_Steps
	import from LibIms_SIPTypesAndValues all;		import from LibIms_SIPTypesAndValues all;

	group externalfunctions {		group externalfunctions {
	}		}//end group externalfunctions
	group parameterOperations {		group parameterOperations {

			/**
			*
			* @desc functions add new via parameter
			* @param p_message (request) SIP message to be used to prepair via header
			* @param p_userprofile user profile
			*/
			function f_addNewViaParameter(in Request p_message, in integer p_userprofile) runs on ImsComponent
			{
			var integer v_intVia;
			var integer i := 0;
			if (ispresent(p_message.msgHeader.via)) {

			v_intVia := sizeof(p_message.msgHeader.via.viaBody);
			while (i < v_intVia) {
			p_message.msgHeader.via.viaBody[v_intVia] := p_message.msgHeader.via.viaBody[v_intVia-1];
			v_intVia := v_intVia - 1;
			}
			vc_branch := c_branchCookie & f_getRndTag();
			p_message.msgHeader.via.viaBody[0] := valueof(m_ViaBody_currIpaddr(vc_branch, vc_userprofile));
			vc_via := p_message.msgHeader.via;
			}
			}

			/**
			*
			* @desc functions add new via parameter
			* @param p_message (request) SIP message to be used to prepair via header
			* @param p_userprofile user profile
			*/
			function f_addNewRecordRouteAndRemoveRoutParameter(in Request p_message) runs on ImsComponent
			{
			var integer v_intRoute,v_intRecordRoute;
			var integer i := 1;
			var integer j := 0;
			var RouteBody v_route1;
			var Route v_newRoute;
			v_newRoute.fieldName := ROUTE_E;
			if (ispresent(p_message.msgHeader.route)) {

			v_intRoute := sizeof(p_message.msgHeader.route.routeBody);
			v_route1 := p_message.msgHeader.route.routeBody[0];
			while (i < v_intRoute) {
			v_newRoute.routeBody[i-1] := p_message.msgHeader.route.routeBody[i];
			i := i + 1;
			}
			vc_route := v_newRoute;
			}

			if (ispresent(p_message.msgHeader.recordRoute)) {

			v_intRecordRoute := sizeof(p_message.msgHeader.recordRoute.routeBody);
			while (j < v_intRecordRoute) {
			p_message.msgHeader.recordRoute.routeBody[v_intRecordRoute] := p_message.msgHeader.recordRoute.routeBody[v_intRecordRoute-1];
			v_intRecordRoute := v_intRecordRoute - 1;
			}
			p_message.msgHeader.recordRoute.routeBody[0] := v_route1;
			vc_recordRoute := p_message.msgHeader.recordRoute;
			}
	}		}
			}//end group parameterOperations

	group fieldOperations {		group fieldOperations {

	/*		/*
	@@ -68,20 +129,29 @@ module LibIms_Steps

	}// end f_setHeadersCANCEL		}// end f_setHeadersCANCEL


	/**		/**
	*		*
	* @desc sets headers for forward request from AS in case if AS acts as Proxy		* @desc sets headers for forward request from AS in case if AS acts as Proxy
			* @param p_proxyMode true = proxyMode, false = B2BMode
	*/		*/
	function f_setHeadersForwardRequestFromAS (inout CSeq p_cSeq_s) runs on ImsComponent		function f_setHeadersForwardRequestFromAS (inout CSeq p_cSeq_s, boolean p_proxyMode) runs on ImsComponent
	{		{
	var Request v_request;		var Request v_request;
	v_request := vc_request;		v_request := vc_request;

	vc_via := v_request.msgHeader.via; // TODO via header need to be adapted due to standards		if (p_proxyMode)
			{
	vc_route := v_request.msgHeader.route; // TODO route header need to be adapted due to standards		vc_requestUri2 := v_request.requestLine.requestUri;
			vc_to := v_request.msgHeader.toField;
			vc_contact := v_request.msgHeader.contact;
			f_addNewViaParameter(v_request, c_userProfile_AS1);
			f_addNewRecordRouteAndRemoveRoutParameter(v_request);
			}
			else
			{ //B2Bmode
			vc_contact := valueof(m_Contact(m_SipUrl_contactIpaddr(vc_userprofile)));
			vc_callId := { fieldName:=CALL_ID_E, callid:=f_getRndCallId(p_cSeq_s) & c_AT & vc_userprofile.currIpaddr };
			}
	}// end function f_setHeadersForwardRequest		}// end function f_setHeadersForwardRequest

	/**		/**
	@@ -266,12 +336,16 @@ module LibIms_Steps
	* @param p_cSeq_s current cSeq		* @param p_cSeq_s current cSeq
	* @param p_orginatingSide true in case of Re-INVITE is send from the orgination endpoint otherwise false.		* @param p_orginatingSide true in case of Re-INVITE is send from the orgination endpoint otherwise false.
	*/		*/
	function f_setHeadersReINVITE (inout CSeq p_cSeq_s, in boolean p_orginatingSide) runs on ImsComponent		function f_setHeadersReINVITE (inout CSeq p_cSeq_s, in boolean p_orginatingSide, in integer p_to_user) runs on ImsComponent
	{		{
			var integer v_tmp;

	f_setHeadersGeneral(p_cSeq_s, "INVITE"); // cseq, contact, branch, via		f_setHeadersGeneral(p_cSeq_s, "INVITE"); // cseq, contact, branch, via

	vc_reqHostPort := vc_requestUri.components.sip.hostPort;		vc_reqHostPort := vc_requestUri.components.sip.hostPort;

			vc_requestUri := f_initSipUrl(p_to_user);

	if(p_orginatingSide) {		if(p_orginatingSide) {
	vc_to := vc_caller_To;		vc_to := vc_caller_To;
	vc_from := vc_caller_From;		vc_from := vc_caller_From;
	@@ -281,6 +355,11 @@ module LibIms_Steps
	vc_from := vc_callee_From;		vc_from := vc_callee_From;
	}		}

			v_tmp := str2int(vc_sdp_local.origin.session_id);
			vc_sdp_local.origin.session_id := int2str(v_tmp + 1);
			v_tmp := str2int(vc_sdp_local.origin.session_version);
			vc_sdp_local.origin.session_version := int2str(v_tmp + 1);

	}// end function f_setHeadersReINVITE		}// end function f_setHeadersReINVITE

	/**		/**
	@@ -696,7 +775,16 @@ module LibIms_Steps
	case (c_userProfile_AS1) { //variant c_userProfile_AS1		case (c_userProfile_AS1) { //variant c_userProfile_AS1
	vc_userprofile.currPort := PX_IMS_TS_AS1_PORT; // via, route(Isc interface of TS)		vc_userprofile.currPort := PX_IMS_TS_AS1_PORT; // via, route(Isc interface of TS)
	vc_userprofile.currIpaddr := PX_IMS_TS_AS1_IPADDR; // via, route		vc_userprofile.currIpaddr := PX_IMS_TS_AS1_IPADDR; // via, route
	vc_userprofile.homeDomain := PX_IMS_TS_AS1_HOME_DOMAIN; // via, route		vc_userprofile.contactPort := PX_IMS_TS_AS1_PORT; // contact (simulated UE)
			vc_userprofile.contactIpaddr := PX_IMS_TS_AS1_IPADDR; // contact
			vc_userprofile.bearerIpaddr := PX_IMS_SUT_UE1_BEARER_IPADDR;
			vc_userprofile.homeDomain := PX_IMS_TS_AS1_HOME_DOMAIN; // via, routevc_userprofile.publUsername := PX_IMS_SUT_UE4_PUBLIC_USER; // From, To (register)
			vc_userprofile.publUsername := "as1";
			vc_userprofile.qop := ""; // Authorization
			vc_userprofile.privUsername := ""; // Authorization
			vc_userprofile.passwd := ""; // Authorization
			vc_userprofile.registrarDomain := ""; // Authorization

	}		}

	case (c_userProfile_AS2) { //variant c_userProfile_AS2		case (c_userProfile_AS2) { //variant c_userProfile_AS2
	@@ -753,7 +841,7 @@ module LibIms_Steps

	function f_initSipUrl(in integer p_user) runs on ImsComponent return SipUrl		function f_initSipUrl(in integer p_user) runs on ImsComponent return SipUrl
	{		{
	var SipUrl p_sipUrl := {		var SipUrl v_sipUrl := {
	scheme := c_sipScheme, // contains "sip"		scheme := c_sipScheme, // contains "sip"
	components := { sip:= {		components := { sip:= {
	userInfo := omit,		userInfo := omit,
	@@ -761,88 +849,96 @@ module LibIms_Steps
	urlParameters := omit,		urlParameters := omit,
	headers := omit};		headers := omit};

			var SipUrl v_urnUrl := {
			scheme := c_urnScheme, // contains "urn"
			components := { urn:= {
			namespaceId := "service",
			namespaceSpecificString := "sos"}},
			urlParameters := omit,
			headers := omit};

	select(p_user){		select(p_user){
	case (c_userProfile_UE1atSUThome) {		case (c_userProfile_UE1atSUThome) {
	p_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_SUT_UE1_PUBLIC_USER, password:=omit};		v_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_SUT_UE1_PUBLIC_USER, password:=omit};
	p_sipUrl.components.sip.hostPort := {host := PX_IMS_SUT_UE1_HOME_DOMAIN, portField :=omit}		v_sipUrl.components.sip.hostPort := {host := PX_IMS_SUT_UE1_HOME_DOMAIN, portField :=omit}
	}		}
	case (c_userProfile_UE2atSUThome) {		case (c_userProfile_UE2atSUThome) {
	p_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_SUT_UE2_PUBLIC_USER, password:=omit};		v_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_SUT_UE2_PUBLIC_USER, password:=omit};
	p_sipUrl.components.sip.hostPort := {host := PX_IMS_SUT_UE2_HOME_DOMAIN, portField :=omit}		v_sipUrl.components.sip.hostPort := {host := PX_IMS_SUT_UE2_HOME_DOMAIN, portField :=omit}
	}		}
	case (c_userProfile_UE3atSUThome) {		case (c_userProfile_UE3atSUThome) {
	p_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_SUT_UE3_PUBLIC_USER, password:=omit};		v_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_SUT_UE3_PUBLIC_USER, password:=omit};
	p_sipUrl.components.sip.hostPort := {host := PX_IMS_SUT_UE3_HOME_DOMAIN, portField :=omit}		v_sipUrl.components.sip.hostPort := {host := PX_IMS_SUT_UE3_HOME_DOMAIN, portField :=omit}
	}		}
	case (c_userProfile_UE4atSUThome) {		case (c_userProfile_UE4atSUThome) {
	p_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_SUT_UE4_PUBLIC_USER, password:=omit};		v_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_SUT_UE4_PUBLIC_USER, password:=omit};
	p_sipUrl.components.sip.hostPort := {host := PX_IMS_SUT_UE4_HOME_DOMAIN, portField :=omit}		v_sipUrl.components.sip.hostPort := {host := PX_IMS_SUT_UE4_HOME_DOMAIN, portField :=omit}
	}		}
	case (c_userProfile_IBCFwithHomeUE) {		case (c_userProfile_IBCFwithHomeUE) {
	p_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_TS_IMS1UE_PUBLIC_USER, password:=omit};		v_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_TS_IMS1UE_PUBLIC_USER, password:=omit};
	p_sipUrl.components.sip.hostPort := {host := PX_IMS_TS_IMS1UE_HOME_DOMAIN, portField :=omit}		v_sipUrl.components.sip.hostPort := {host := PX_IMS_TS_IMS1UE_HOME_DOMAIN, portField :=omit}
	}		}
	case (c_userProfile_ICSCFwithHomeUE) {		case (c_userProfile_ICSCFwithHomeUE) {
	p_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_TS_IMS1UE_PUBLIC_USER, password:=omit};		v_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_TS_IMS1UE_PUBLIC_USER, password:=omit};
	p_sipUrl.components.sip.hostPort := {host := PX_IMS_TS_IMS1UE_HOME_DOMAIN, portField :=omit}		v_sipUrl.components.sip.hostPort := {host := PX_IMS_TS_IMS1UE_HOME_DOMAIN, portField :=omit}
	}		}
	case (c_userProfile_PCSCFwithHomeUE) {		case (c_userProfile_PCSCFwithHomeUE) {
	p_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_TS_IMS1UE_PUBLIC_USER, password:=omit};		v_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_TS_IMS1UE_PUBLIC_USER, password:=omit};
	p_sipUrl.components.sip.hostPort := {host := PX_IMS_TS_PCSCF_IPADDR, portField :=omit}		v_sipUrl.components.sip.hostPort := {host := PX_IMS_TS_PCSCF_IPADDR, portField :=omit}
	}		}
	case (c_userProfile_SCSCFwithHomeUE) {		case (c_userProfile_SCSCFwithHomeUE) {
	p_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_SUT_UE4_PUBLIC_USER, password:=omit};		v_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_SUT_UE4_PUBLIC_USER, password:=omit};
	p_sipUrl.components.sip.hostPort := {host := PX_IMS_TS_SCSCF_HOME_DOMAIN, portField :=PX_IMS_TS_SCSCF_PORT}		v_sipUrl.components.sip.hostPort := {host := PX_IMS_TS_SCSCF_HOME_DOMAIN, portField :=PX_IMS_TS_SCSCF_PORT}
	}		}
	case (c_userProfile_SCSCFwithHomeUE_domain) {		case (c_userProfile_SCSCFwithHomeUE_domain) {
	p_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_SUT_UE4_PUBLIC_USER, password:=omit};		v_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_SUT_UE4_PUBLIC_USER, password:=omit};
	p_sipUrl.components.sip.hostPort := {host := PX_IMS_TS_SCSCF_HOME_DOMAIN, portField :=omit}		v_sipUrl.components.sip.hostPort := {host := PX_IMS_TS_SCSCF_HOME_DOMAIN, portField :=omit}
	}		}
	case (c_userProfile_AS1) {		case (c_userProfile_AS1) {
	p_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_TS_IMS1UE_PUBLIC_USER, password:=omit};		v_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_TS_IMS1UE_PUBLIC_USER, password:=omit};
	p_sipUrl.components.sip.hostPort := {host := PX_IMS_TS_AS1_IPADDR, portField :=omit}		v_sipUrl.components.sip.hostPort := {host := PX_IMS_TS_AS1_IPADDR, portField :=omit}
	}		}
	case (c_userProfile_ECSCFwithHomeUE) {		case (c_userProfile_ECSCFwithHomeUE) {
	p_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_TS_IMS1UE_PUBLIC_USER, password:=omit};		v_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_TS_IMS1UE_PUBLIC_USER, password:=omit};
	p_sipUrl.components.sip.hostPort := {host := PX_IMS_TS_ECSCF_IPADDR, portField :=omit}		v_sipUrl.components.sip.hostPort := {host := PX_IMS_TS_ECSCF_IPADDR, portField :=omit}
	}		}
	case (c_userProfile_ISUP) {		case (c_userProfile_ISUP) {
	p_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_TS_ISUP_PUBLIC_USER, password:=omit};		v_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_TS_ISUP_PUBLIC_USER, password:=omit};
	p_sipUrl.components.sip.hostPort := {host := PX_IMS_TS_ISUP_HOME_DOMAIN, portField :=omit}		v_sipUrl.components.sip.hostPort := {host := PX_IMS_TS_ISUP_HOME_DOMAIN, portField :=omit}
	}		}
	case (c_serviceProfile_EMERGENCY) {		case (c_serviceProfile_EMERGENCY) {
	p_sipUrl.scheme := c_urnScheme;		v_urnUrl.components.urn.namespaceId := PX_IMS_SUT_EMERGENCY_SERVICE_namespaceId;
	p_sipUrl.components.urn.namespaceId := PX_IMS_SUT_EMERGENCY_SERVICE_namespaceId;		v_urnUrl.components.urn.namespaceSpecificString := PX_IMS_SUT_EMERGENCY_SERVICE_namespaceSpecificString;
	p_sipUrl.components.urn.namespaceId := PX_IMS_SUT_EMERGENCY_SERVICE_namespaceSpecificString;
	//p_sipUrl.hostPort := {host := PX_IMS_SUT_EMERGENCY_HOME_DOMAIN, portField :=omit}
	}		}
	case (c_serviceProfile_EMERGENCY_INVALID) {		case (c_serviceProfile_EMERGENCY_INVALID) {
	p_sipUrl.scheme := c_urnScheme;		v_urnUrl.components.urn.namespaceId := PX_IMS_SUT_EMERGENCY_SERVICE_INVALID_namespaceId;
	p_sipUrl.components.urn.namespaceId := PX_IMS_SUT_EMERGENCY_SERVICE_INVALID_namespaceId;		v_urnUrl.components.urn.namespaceSpecificString := PX_IMS_SUT_EMERGENCY_SERVICE_INVALID_namespaceSpecificString;
	p_sipUrl.components.urn.namespaceId := PX_IMS_SUT_EMERGENCY_SERVICE_INVALID_namespaceSpecificString;
	}		}

	// following setting is used for the assignment of the Path header field		// following setting is used for the assignment of the Path header field
	case (c_interfaceProfile_IMS_SUT_PCSCF1) {		case (c_interfaceProfile_IMS_SUT_PCSCF1) {
	p_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:="", password:=omit};		v_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:="", password:=omit};
	p_sipUrl.components.sip.hostPort := {host := PX_IMS_SUT_PCSCF1_HOME_DOMAIN, portField :=PX_IMS_SUT_PCSCF1_PORT}		v_sipUrl.components.sip.hostPort := {host := PX_IMS_SUT_PCSCF1_HOME_DOMAIN, portField :=PX_IMS_SUT_PCSCF1_PORT}
	}		}

	// following setting is used in relation to the route headers list elements		// following setting is used in relation to the route headers list elements
	case (c_interfaceSIPURL_IMS_SUT_PCSCF1_domain) {		case (c_interfaceSIPURL_IMS_SUT_PCSCF1_domain) {
	p_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:="", password:=omit};		v_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:="", password:=omit};
	p_sipUrl.components.sip.hostPort := {host := PX_IMS_SUT_PCSCF1_HOME_DOMAIN, portField :=PX_IMS_SUT_PCSCF1_PORT}		v_sipUrl.components.sip.hostPort := {host := PX_IMS_SUT_PCSCF1_HOME_DOMAIN, portField :=PX_IMS_SUT_PCSCF1_PORT}
	}		}
	case (c_interfaceSIPURL_IMS_SUT_PCSCF1_ip) {		case (c_interfaceSIPURL_IMS_SUT_PCSCF1_ip) {
	p_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:="", password:=omit};		v_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:="", password:=omit};
	p_sipUrl.components.sip.hostPort := {host := PX_IMS_SUT_PCSCF1_IPADDR, portField :=PX_IMS_SUT_PCSCF1_PORT}		v_sipUrl.components.sip.hostPort := {host := PX_IMS_SUT_PCSCF1_IPADDR, portField :=PX_IMS_SUT_PCSCF1_PORT}
	}		}
	case (c_conferenceProfile_factoryURI) {		case (c_conferenceProfile_factoryURI) {
	p_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_SUT_CONF_FACTORY_NAME, password:=omit};		v_sipUrl.components.sip.userInfo := {userOrTelephoneSubscriber:=PX_IMS_SUT_CONF_FACTORY_NAME, password:=omit};
	p_sipUrl.components.sip.hostPort := {host := PX_IMS_SUT_CONF_HOME_DOMAIN, portField := omit}		v_sipUrl.components.sip.hostPort := {host := PX_IMS_SUT_CONF_HOME_DOMAIN, portField := omit}
	}		}
	};		};
	return(p_sipUrl)		if(p_user == c_serviceProfile_EMERGENCY or p_user == c_serviceProfile_EMERGENCY_INVALID)
			{return(v_urnUrl)}
			else
			{return(v_sipUrl)}
	}		}


	@@ -903,6 +999,17 @@ module LibIms_Steps
	}		}
	}		}

			/*
			*
			* @desc retrieves user DomainPort value of the interface profile
			* @param p_interface identifies the selected interface
			* @return DomainPort template
			*/
			function f_get_userDomainPort (in SipUserProfile p_userProfile) runs on ImsComponent return /template/ HostPort
			{
			return {p_userProfile.homeDomain, p_userProfile.currPort}
			}

	/*		/*
	*		*
	* @desc retrieves HostPort value of the interface profile		* @desc retrieves HostPort value of the interface profile
	@@ -1151,9 +1258,10 @@ module LibIms_Steps
	* @param p_cSeq_s cseq parameter		* @param p_cSeq_s cseq parameter
	* @param p_register register template		* @param p_register register template
	*/		*/
	function f_IMS_preamble_withRegistration (in integer p_userprofile, inout CSeq p_cSeq_s, template REGISTER_Request p_register) runs on ImsComponent		function f_IMS_preamble_withRegistration (in integer p_userprofile, in integer p_interface, inout CSeq p_cSeq_s, template REGISTER_Request p_register) runs on ImsComponent
	{		{

			f_init_interfaceprofile(p_interface);
	//Variables & defaults initialization		//Variables & defaults initialization
	f_IMS_preamble_woRegistration(p_userprofile, p_cSeq_s);		f_IMS_preamble_woRegistration(p_userprofile, p_cSeq_s);

	@@ -1175,9 +1283,9 @@ module LibIms_Steps
	* @param p_userprofile user profile of call		* @param p_userprofile user profile of call
	* @param p_cSeq_s cseq parameter		* @param p_cSeq_s cseq parameter
	*/		*/
	function f_IMS_preamble_withRegistrationBasic (in integer p_userprofile, inout CSeq p_cSeq_s) runs on ImsComponent		function f_IMS_preamble_withRegistrationBasic (in integer p_userprofile,in integer p_interface, inout CSeq p_cSeq_s) runs on ImsComponent
	{		{
			f_init_interfaceprofile(p_interface);
	//Variables & defaults initialization		//Variables & defaults initialization
	f_IMS_preamble_woRegistration(p_userprofile, p_cSeq_s);		f_IMS_preamble_woRegistration(p_userprofile, p_cSeq_s);

	@@ -1187,6 +1295,32 @@ module LibIms_Steps
	f_Subscription(p_cSeq_s, m_SUBSCRIBE_Request_UE(vc_requestUri, vc_callId, p_cSeq_s, vc_from, vc_to, vc_via, vc_contact, vc_route_REG));		f_Subscription(p_cSeq_s, m_SUBSCRIBE_Request_UE(vc_requestUri, vc_callId, p_cSeq_s, vc_from, vc_to, vc_via, vc_contact, vc_route_REG));
	}		}

			/*
			*
			* @desc Sets variables and default initialization for user profile and handle registration and authentication with MD5
			* (basic registration template)
			* @param p_userprofile user profile of call
			* @param p_cSeq_s cseq parameter
			*/
			function f_IMS_preamble_AS (in integer p_userprofile, in integer p_interface, inout CSeq p_cSeq_s) runs on ImsComponent
			{
			// avoid deregistration in default behavior
			vc_DeregDone := true;
			vc_boo_route := true;
			vc_boo_recordRoute := true;
			vc_cSeq := p_cSeq_s;

			//Defaults
			vc_def_catchSyncStop := activate(a_Sip_catchSyncStop());
			vc_default := activate (a_altstep_AS());

			//Preamble
			f_init_interfaceprofile(p_interface);
			f_init_userprofile(p_userprofile); // assignment of PIXIT values to component variable
			vc_sdp_local := valueof(m_SDP_bandwidth(valueof(m_media_dynPT(PX_SIP_SDP_dyn, PX_SIP_SDP_encoding)), vc_userprofile));
			vc_contact := valueof(m_Contact(m_SipUrl_contactIpaddr(vc_userprofile)));
			}

	} // end group preambles		} // end group preambles

	group postambles {		group postambles {
	@@ -1202,6 +1336,18 @@ module LibIms_Steps
	f_terminate_component();		f_terminate_component();
	}		}

			/*
			*
			* @desc Sets variables and default initialization for user profile and handle deregistration on AS as TS
			* @param p_cSeq_s cseq parameter
			*/
			function f_IMS_postamble_AS_withDeRegistration (boolean p_deRegistration) runs on ImsComponent {

			if(p_deRegistration == true)
			{f_awaitingREGISTER_sendReply(mw_REGISTER_Request_Base,true);}
			f_terminate_component();
			}

	function f_SIP_postamble_IMS1_withoutRegistration () runs on ImsComponent		function f_SIP_postamble_IMS1_withoutRegistration () runs on ImsComponent
	{f_terminate_component()};		{f_terminate_component()};

	@@ -1556,5 +1702,48 @@ module LibIms_Steps
	f_componentStop();		f_componentStop();
	}		}
	}		}

			/**
			*
			* @desc main default altstep to handle unexpected messages and timeout
			* @verdict fail for all unexpected branches
			*/
			altstep a_altstep_AS() runs on SipComponent
			{
			var Response v_response;
			var Request v_request;

			[] any timer.timeout
			{
			setverdict(fail);
			all timer.stop;
			}

			// allow repeated INVITEs
			[vc_ignore_invite] SIPP.receive(mw_INVITE_Request_Base)
			{
			repeat
			}
			//handle REGISTER requests
			[] SIPP.receive(mw_REGISTER_Request_Base)-> value v_request sender vc_sent_label
			{
			f_setHeadersOnReceiptOfREGISTER(v_request);
			//vc_contact := vc_request.msgHeader.contact;
			f_sendResponse(m_Response_Contact(c_statusLine200,vc_callId, vc_cSeq,vc_caller_From, vc_caller_To, vc_via, vc_contact));
			repeat;
			}

			// according to SIP chap.8.1.3.2
			[] SIPP.receive(mw_Response_Base(c_statusLine183,vc_callId, vc_cSeq))
			{
			repeat;
			}
			// any
			[] SIPP.receive
			{
			setverdict(fail);
			all timer.stop;
			}
			}
	}		}
	} // module LibIms_Steps		} // module LibIms_Steps
			No newline at end of file

ttcn/LibIms_Templates.ttcn

+54 −3

Original line number	Original line	Diff line number	Diff line
	@@ -245,6 +245,14 @@ group HeaderFieldTemplates{
	{id:=c_orig_ioi, paramValue := p_homeDomain}}		{id:=c_orig_ioi, paramValue := p_homeDomain}}
	};		};

			template PChargingVector m_pChargingVector_accessNetwInfo(charstring p_homeDomain) :=
			{
			fieldName := P_CHARGING_VECTOR_E,
			chargeParams := {{id:=c_icid, paramValue :=c_icid_value},
			{id:=c_term_ioi, paramValue := p_homeDomain},
			{id:=c_access_network_charging_info, paramValue := "192.1.1.10"}}
			};

	template PChargingVector mw_pChargingVector(template charstring p_id, template charstring p_paramValue) :=		template PChargingVector mw_pChargingVector(template charstring p_id, template charstring p_paramValue) :=
	{		{
	fieldName := P_CHARGING_VECTOR_E,		fieldName := P_CHARGING_VECTOR_E,
	@@ -453,8 +461,8 @@ group HeaderFieldTemplates{

	template SemicolonParam_List mw_challenge := superset(mw_ck,mw_ik);		template SemicolonParam_List mw_challenge := superset(mw_ck,mw_ik);
	// template SemicolonParam_List mw_challenge := {mw_ck,mw_ik};		// template SemicolonParam_List mw_challenge := {mw_ck,mw_ik};
	template GenericParam mw_ck := {"ck",*};		template GenericParam mw_ck := {"ck"};
	template GenericParam mw_ik := {"ik",*}		template GenericParam mw_ik := {"ik"}


	/*		/*
	@@ -1311,6 +1319,15 @@ group modified_templates {

	group request_send {		group request_send {

			template ACK_Request m_ACK_Request_AS (SipUrl p_requestUri, CallId p_callId, CSeq p_cSeq,
			From p_from, To p_to, Via p_via, template Route p_route, template RecordRoute p_recordRoute ) modifies m_ACK_Request_Base :=
			{
			msgHeader :=
			{
			route := p_route,
			recordRoute := p_recordRoute
			}
			}

	template ACK_Request m_ACK_Request_IMS (SipUrl p_requestUri, CallId p_callId, CSeq p_cSeq,		template ACK_Request m_ACK_Request_IMS (SipUrl p_requestUri, CallId p_callId, CSeq p_cSeq,
	From p_from, To p_to, Via p_via, template Route p_route) modifies m_ACK_Request_Base :=		From p_from, To p_to, Via p_via, template Route p_route) modifies m_ACK_Request_Base :=
	@@ -1321,6 +1338,20 @@ group request_send {
	}		}
	}		}

			template ACK_Request m_ACK_Request_sdp_IMS (SipUrl p_requestUri, CallId p_callId, CSeq p_cSeq,
			From p_from, To p_to, Via p_via,template MessageBody p_mb, template Route p_route)
			modifies m_ACK_Request_Base
			:=
			{
			msgHeader :=
			{
			contentLength := {fieldName := CONTENT_LENGTH_E, len:= f_MessageBodyLength(valueof(p_mb))},
			contentType := {fieldName := CONTENT_TYPE_E, mediaType := c_sdpAplication},
			route := p_route
			},
			messageBody := p_mb
			}

	template BYE_Request m_BYE_Request_IMS		template BYE_Request m_BYE_Request_IMS
	( SipUrl p_requestUri, CallId p_callId, CSeq p_cSeq, From p_from, To p_to,		( SipUrl p_requestUri, CallId p_callId, CSeq p_cSeq, From p_from, To p_to,
	Via p_via, template Route p_route)		Via p_via, template Route p_route)
	@@ -2825,6 +2856,16 @@ group response_send
	messageBody := p_mb		messageBody := p_mb
	}		}

			template Response m_Response_18XonINVITE_AS (StatusLine p_statusLine, CallId p_callId, CSeq p_cSeq,
			From p_from, To p_to, Via p_via, Contact p_contact, template RecordRoute p_recordRoute ) modifies m_Response_Base:=
			{
			msgHeader :=
			{
			contact := p_contact,
			recordRoute := p_recordRoute
			}
			}

	template Response m_Response_18XonINVITE_UE (StatusLine p_statusLine, CallId p_callId, CSeq p_cSeq,		template Response m_Response_18XonINVITE_UE (StatusLine p_statusLine, CallId p_callId, CSeq p_cSeq,
	From p_from, To p_to, Via p_via, Contact p_contact ) modifies m_Response_Base:=		From p_from, To p_to, Via p_via, Contact p_contact ) modifies m_Response_Base:=
	{		{
	@@ -3539,6 +3580,16 @@ group response_receive
	}		}
	}		}

			template Response mw_Response_PchargingFunctionAddr(template StatusLine p_statusLine, template CallId p_callId,
			template CSeq p_cSeq, template PChargingFunctionAddresses p_chargingFunctionAddresses) modifies mw_Response_Base:=
			{
			statusLine := {sipVersion := c_sipNameVersion, statusCode := p_statusLine.statusCode, reasonPhrase := ?},
			msgHeader :=
			{
			pChargingFunctionAddresses := p_chargingFunctionAddresses
			}
			}

	} // end response_receive		} // end response_receive

	}//end modified_templates		}//end modified_templates

Admin message