Loading ttcn/LibSip_SMSFunctions.ttcn3 +6 −2 Original line number Diff line number Diff line Loading @@ -8,7 +8,9 @@ module LibSip_SMSFunctions { import from LibSip_SMSTypesAndValues all; function f_IA5_2oct(charstring p_ASCII_String) return octetstring { function f_IA5_2oct( charstring p_ASCII_String ) return octetstring { var integer i; var integer k; var integer v_Length := lengthof(p_ASCII_String); Loading Loading @@ -40,5 +42,7 @@ module LibSip_SMSFunctions { return v_Noctets; } // f_IA5_2oct external function fx_GetSC_TimeStamp(integer p_TimeZone) return TP_ServiceCentreTimeStamp_Type; external function fx_GetSC_TimeStamp( integer p_TimeZone ) return TP_ServiceCentreTimeStamp_Type; } // End of module LibSip_SMSFunctions No newline at end of file ttcn/LibSip_Steps.ttcn +353 −126 File changed.Preview size limit exceeded, changes collapsed. Show changes ttcn/LibSip_Templates.ttcn +59 −25 Original line number Diff line number Diff line Loading @@ -3701,7 +3701,9 @@ module LibSip_Templates { * @param p_mb_par contain message body part * @return message body length */ function f_MessageBodyLength(template(value) MessageBody p_mb_par) return integer { function f_MessageBodyLength( template(value) MessageBody p_mb_par ) return integer { var integer v_result := 0; if (MB_LENGTH_FROM_ENCVAL) { Loading Loading @@ -3766,7 +3768,9 @@ module LibSip_Templates { * @param p_mb contain sdp message * @return sdp_lenght */ function f_SDPlength(SDP_Message p_mb) return integer { function f_SDPlength( SDP_Message p_mb ) return integer { var integer v_result := 2; Loading Loading @@ -3920,10 +3924,10 @@ module LibSip_Templates { return v_result; } //* end function f_SDPlength function f_SDPlength_connection(SDP_connection p_element) return integer //* "c=" { function f_SDPlength_connection( SDP_connection p_element ) return integer { //* "c=" var integer v_result := 0; var charstring v_auxstring; v_result := v_result + 2 + c_CRlen + lengthof(p_element.net_type & " " & p_element.addr_type & " " & p_element.conn_addr.addr); Loading @@ -3936,10 +3940,10 @@ module LibSip_Templates { return v_result; } //* f_SDPlength_connection function f_SDPlength_attribute(SDP_attribute p_element) return integer //* "a=" { function f_SDPlength_attribute( SDP_attribute p_element ) return integer { //* "a=" var integer v_result := 0; var charstring v_auxstring; if (ischosen(p_element.cat)) { Loading Loading @@ -4026,7 +4030,9 @@ module LibSip_Templates { /** * @desc Declaration of external functions to calculate length of message bodies switching of internal or external functions are made by boolean module parameter/PIXIT USE_FX_FOR_XML_LENGTH declared at top of this module */ external function fx_calculateXMLBodyLen(XmlBody p_mb) return integer; external function fx_calculateXMLBodyLen( XmlBody p_mb ) return integer; /** * @desc Calculation of XML body length Loading Loading @@ -4102,7 +4108,9 @@ module LibSip_Templates { * @param p_mb contain XML ConfInfo body * @return xml_length */ function f_XMLBody_ConferenceInfo_Length(template(value) Conference_type p_mb) return integer { function f_XMLBody_ConferenceInfo_Length( template(value) Conference_type p_mb ) return integer { var integer v_result := lengthof(encvalue(p_mb)) / 8; return v_result; } //* f_XMLBody_ConferenceInfo_Length Loading @@ -4112,7 +4120,9 @@ module LibSip_Templates { * @param p_mb contain XML CUG body * @return xml_length */ function f_XMLBody_Cug_Length(template(value) Cug p_mb) return integer { function f_XMLBody_Cug_Length( template(value) Cug p_mb ) return integer { var integer v_result := lengthof(encvalue(p_mb)) / 8; return v_result; } //* f_XMLBody_Cug_Length Loading @@ -4122,7 +4132,9 @@ module LibSip_Templates { * @param p_mb contain XML MCID body * @return xml_length */ function f_XMLBody_Mcid_Length(template(value) Mcid p_mb) return integer { function f_XMLBody_Mcid_Length( template(value) Mcid p_mb ) return integer { var integer v_result := lengthof(encvalue(p_mb)) / 8; return v_result; Loading @@ -4133,7 +4145,9 @@ module LibSip_Templates { * @param p_mb contain XML CW body * @return xml_length */ function f_XMLBody_Cw_Length(template(value) Ims_cw p_mb) return integer { function f_XMLBody_Cw_Length( template(value) Ims_cw p_mb ) return integer { var integer v_result := lengthof(encvalue(p_mb)) / 8; return v_result; Loading @@ -4144,7 +4158,9 @@ module LibSip_Templates { * @param p_mb contain XML CDIVN body * @return xml_length */ function f_XMLBody_Cdivn_Length(template(value) Comm_div_info_type p_mb) return integer { function f_XMLBody_Cdivn_Length( template(value) Comm_div_info_type p_mb ) return integer { var integer v_result := lengthof(encvalue(p_mb)) / 8; return v_result; Loading @@ -4155,7 +4171,9 @@ module LibSip_Templates { * @param p_mb contain XML PSTNTransit body * @return xml_length */ function f_XMLBody_PSTNTransit_Length(template(value) PSTN_transit p_mb) return integer { function f_XMLBody_PSTNTransit_Length( template(value) PSTN_transit p_mb ) return integer { var integer v_result := lengthof(encvalue(p_mb)) / 8; return v_result; } //* f_XMLBody_PSTNTransit_Length Loading @@ -4165,7 +4183,9 @@ module LibSip_Templates { * @param p_mb contain XML Simservs body * @return xml_length */ function f_XMLBody_Simservs_Length(template(value) Simservs p_mb) return integer { function f_XMLBody_Simservs_Length( template(value) Simservs p_mb ) return integer { var integer v_result := lengthof(encvalue(p_mb)) / 8; return v_result; } //* f_XMLBody_Simservs_Length Loading @@ -4175,7 +4195,9 @@ module LibSip_Templates { * @param p_mb contain XML ResourceList body * @return xml_length */ function f_XMLBody_ResourceList_Length(template(value) Resource_lists p_mb) return integer { function f_XMLBody_ResourceList_Length( template(value) Resource_lists p_mb ) return integer { var integer v_result := lengthof(encvalue(p_mb)) / 8; return v_result; } //* f_XMLBody_ResourceList_Length Loading @@ -4185,7 +4207,9 @@ module LibSip_Templates { * @param p_mb contain XML Ims3GPP body * @return xml_length */ function f_XMLBody_Ims3GPP_Length(template(value) TIMS3GPP p_mb) return integer { function f_XMLBody_Ims3GPP_Length( template(value) TIMS3GPP p_mb ) return integer { var integer v_result := lengthof(encvalue(p_mb)) / 8; return v_result; } //* f_XMLBody_Ims3GPP_Length Loading @@ -4202,7 +4226,9 @@ module LibSip_Templates { group simpleMsgSummaryBody_Length { function f_simpleMsgSummaryBody_Length(SimpleMsgSummary p_mb) return integer { function f_simpleMsgSummaryBody_Length( SimpleMsgSummary p_mb ) return integer { var integer v_result := 2; Loading Loading @@ -4240,7 +4266,9 @@ module LibSip_Templates { * @param p_mb contain MIME message * @return xml_length */ function f_MIMElength(MIME_Message p_mb) return integer { function f_MIMElength( MIME_Message p_mb ) return integer { var integer v_result := 2; // 0d0a v_result := v_result + lengthof(p_mb.boundary) + 2 /*0d0a*/; Loading Loading @@ -4290,7 +4318,9 @@ module LibSip_Templates { * @param p_mb contain textplain message * @return lenght */ function f_TextPlainLength(template(value) MessageBody p_mb) return integer { function f_TextPlainLength( template(value) MessageBody p_mb ) return integer { var integer v_result := 0; v_result := v_result + lengthof(p_mb.textplain); Loading @@ -4314,7 +4344,9 @@ module LibSip_Templates { * @desc Return component variable of recordRoute header if vc_boo_recordRoute is true * @return component variable of recordRoute header */ function f_recordroute() runs on SipComponent return template(omit) RecordRoute { function f_recordroute( ) runs on SipComponent return template(omit) RecordRoute { template RecordRoute v_recordRoute := omit; if (vc_boo_recordRoute) { return vc_recordRoute; Loading @@ -4328,7 +4360,9 @@ module LibSip_Templates { * @desc Return component variable of Route header if vc_boo_route is true * @return component variable of recordRoute header */ function f_route() runs on SipComponent return template(omit) Route { function f_route( ) runs on SipComponent return template(omit) Route { template(omit) Route v_route := omit; if (vc_boo_route) { return v_route; Loading Loading
ttcn/LibSip_SMSFunctions.ttcn3 +6 −2 Original line number Diff line number Diff line Loading @@ -8,7 +8,9 @@ module LibSip_SMSFunctions { import from LibSip_SMSTypesAndValues all; function f_IA5_2oct(charstring p_ASCII_String) return octetstring { function f_IA5_2oct( charstring p_ASCII_String ) return octetstring { var integer i; var integer k; var integer v_Length := lengthof(p_ASCII_String); Loading Loading @@ -40,5 +42,7 @@ module LibSip_SMSFunctions { return v_Noctets; } // f_IA5_2oct external function fx_GetSC_TimeStamp(integer p_TimeZone) return TP_ServiceCentreTimeStamp_Type; external function fx_GetSC_TimeStamp( integer p_TimeZone ) return TP_ServiceCentreTimeStamp_Type; } // End of module LibSip_SMSFunctions No newline at end of file
ttcn/LibSip_Steps.ttcn +353 −126 File changed.Preview size limit exceeded, changes collapsed. Show changes
ttcn/LibSip_Templates.ttcn +59 −25 Original line number Diff line number Diff line Loading @@ -3701,7 +3701,9 @@ module LibSip_Templates { * @param p_mb_par contain message body part * @return message body length */ function f_MessageBodyLength(template(value) MessageBody p_mb_par) return integer { function f_MessageBodyLength( template(value) MessageBody p_mb_par ) return integer { var integer v_result := 0; if (MB_LENGTH_FROM_ENCVAL) { Loading Loading @@ -3766,7 +3768,9 @@ module LibSip_Templates { * @param p_mb contain sdp message * @return sdp_lenght */ function f_SDPlength(SDP_Message p_mb) return integer { function f_SDPlength( SDP_Message p_mb ) return integer { var integer v_result := 2; Loading Loading @@ -3920,10 +3924,10 @@ module LibSip_Templates { return v_result; } //* end function f_SDPlength function f_SDPlength_connection(SDP_connection p_element) return integer //* "c=" { function f_SDPlength_connection( SDP_connection p_element ) return integer { //* "c=" var integer v_result := 0; var charstring v_auxstring; v_result := v_result + 2 + c_CRlen + lengthof(p_element.net_type & " " & p_element.addr_type & " " & p_element.conn_addr.addr); Loading @@ -3936,10 +3940,10 @@ module LibSip_Templates { return v_result; } //* f_SDPlength_connection function f_SDPlength_attribute(SDP_attribute p_element) return integer //* "a=" { function f_SDPlength_attribute( SDP_attribute p_element ) return integer { //* "a=" var integer v_result := 0; var charstring v_auxstring; if (ischosen(p_element.cat)) { Loading Loading @@ -4026,7 +4030,9 @@ module LibSip_Templates { /** * @desc Declaration of external functions to calculate length of message bodies switching of internal or external functions are made by boolean module parameter/PIXIT USE_FX_FOR_XML_LENGTH declared at top of this module */ external function fx_calculateXMLBodyLen(XmlBody p_mb) return integer; external function fx_calculateXMLBodyLen( XmlBody p_mb ) return integer; /** * @desc Calculation of XML body length Loading Loading @@ -4102,7 +4108,9 @@ module LibSip_Templates { * @param p_mb contain XML ConfInfo body * @return xml_length */ function f_XMLBody_ConferenceInfo_Length(template(value) Conference_type p_mb) return integer { function f_XMLBody_ConferenceInfo_Length( template(value) Conference_type p_mb ) return integer { var integer v_result := lengthof(encvalue(p_mb)) / 8; return v_result; } //* f_XMLBody_ConferenceInfo_Length Loading @@ -4112,7 +4120,9 @@ module LibSip_Templates { * @param p_mb contain XML CUG body * @return xml_length */ function f_XMLBody_Cug_Length(template(value) Cug p_mb) return integer { function f_XMLBody_Cug_Length( template(value) Cug p_mb ) return integer { var integer v_result := lengthof(encvalue(p_mb)) / 8; return v_result; } //* f_XMLBody_Cug_Length Loading @@ -4122,7 +4132,9 @@ module LibSip_Templates { * @param p_mb contain XML MCID body * @return xml_length */ function f_XMLBody_Mcid_Length(template(value) Mcid p_mb) return integer { function f_XMLBody_Mcid_Length( template(value) Mcid p_mb ) return integer { var integer v_result := lengthof(encvalue(p_mb)) / 8; return v_result; Loading @@ -4133,7 +4145,9 @@ module LibSip_Templates { * @param p_mb contain XML CW body * @return xml_length */ function f_XMLBody_Cw_Length(template(value) Ims_cw p_mb) return integer { function f_XMLBody_Cw_Length( template(value) Ims_cw p_mb ) return integer { var integer v_result := lengthof(encvalue(p_mb)) / 8; return v_result; Loading @@ -4144,7 +4158,9 @@ module LibSip_Templates { * @param p_mb contain XML CDIVN body * @return xml_length */ function f_XMLBody_Cdivn_Length(template(value) Comm_div_info_type p_mb) return integer { function f_XMLBody_Cdivn_Length( template(value) Comm_div_info_type p_mb ) return integer { var integer v_result := lengthof(encvalue(p_mb)) / 8; return v_result; Loading @@ -4155,7 +4171,9 @@ module LibSip_Templates { * @param p_mb contain XML PSTNTransit body * @return xml_length */ function f_XMLBody_PSTNTransit_Length(template(value) PSTN_transit p_mb) return integer { function f_XMLBody_PSTNTransit_Length( template(value) PSTN_transit p_mb ) return integer { var integer v_result := lengthof(encvalue(p_mb)) / 8; return v_result; } //* f_XMLBody_PSTNTransit_Length Loading @@ -4165,7 +4183,9 @@ module LibSip_Templates { * @param p_mb contain XML Simservs body * @return xml_length */ function f_XMLBody_Simservs_Length(template(value) Simservs p_mb) return integer { function f_XMLBody_Simservs_Length( template(value) Simservs p_mb ) return integer { var integer v_result := lengthof(encvalue(p_mb)) / 8; return v_result; } //* f_XMLBody_Simservs_Length Loading @@ -4175,7 +4195,9 @@ module LibSip_Templates { * @param p_mb contain XML ResourceList body * @return xml_length */ function f_XMLBody_ResourceList_Length(template(value) Resource_lists p_mb) return integer { function f_XMLBody_ResourceList_Length( template(value) Resource_lists p_mb ) return integer { var integer v_result := lengthof(encvalue(p_mb)) / 8; return v_result; } //* f_XMLBody_ResourceList_Length Loading @@ -4185,7 +4207,9 @@ module LibSip_Templates { * @param p_mb contain XML Ims3GPP body * @return xml_length */ function f_XMLBody_Ims3GPP_Length(template(value) TIMS3GPP p_mb) return integer { function f_XMLBody_Ims3GPP_Length( template(value) TIMS3GPP p_mb ) return integer { var integer v_result := lengthof(encvalue(p_mb)) / 8; return v_result; } //* f_XMLBody_Ims3GPP_Length Loading @@ -4202,7 +4226,9 @@ module LibSip_Templates { group simpleMsgSummaryBody_Length { function f_simpleMsgSummaryBody_Length(SimpleMsgSummary p_mb) return integer { function f_simpleMsgSummaryBody_Length( SimpleMsgSummary p_mb ) return integer { var integer v_result := 2; Loading Loading @@ -4240,7 +4266,9 @@ module LibSip_Templates { * @param p_mb contain MIME message * @return xml_length */ function f_MIMElength(MIME_Message p_mb) return integer { function f_MIMElength( MIME_Message p_mb ) return integer { var integer v_result := 2; // 0d0a v_result := v_result + lengthof(p_mb.boundary) + 2 /*0d0a*/; Loading Loading @@ -4290,7 +4318,9 @@ module LibSip_Templates { * @param p_mb contain textplain message * @return lenght */ function f_TextPlainLength(template(value) MessageBody p_mb) return integer { function f_TextPlainLength( template(value) MessageBody p_mb ) return integer { var integer v_result := 0; v_result := v_result + lengthof(p_mb.textplain); Loading @@ -4314,7 +4344,9 @@ module LibSip_Templates { * @desc Return component variable of recordRoute header if vc_boo_recordRoute is true * @return component variable of recordRoute header */ function f_recordroute() runs on SipComponent return template(omit) RecordRoute { function f_recordroute( ) runs on SipComponent return template(omit) RecordRoute { template RecordRoute v_recordRoute := omit; if (vc_boo_recordRoute) { return vc_recordRoute; Loading @@ -4328,7 +4360,9 @@ module LibSip_Templates { * @desc Return component variable of Route header if vc_boo_route is true * @return component variable of recordRoute header */ function f_route() runs on SipComponent return template(omit) Route { function f_route( ) runs on SipComponent return template(omit) Route { template(omit) Route v_route := omit; if (vc_boo_route) { return v_route; Loading