Commit d0d8a696 authored by schmitting's avatar schmitting
Browse files

No commit message

No commit message
parent e26856dd
Loading
Loading
Loading
Loading
+18 −0
Original line number Diff line number Diff line
@@ -73,6 +73,9 @@ const integer c_CAU_CauseVal_24 := 24;
/* Value '#28 Invalid number format (address incomplete)' of element 'Cause indicator' in IE 'Cause'. */
const integer c_CAU_CauseVal_28 := 28;

/* Value '#29 Facility rejected' of element 'Cause indicator' in IE 'Cause'. */
const integer c_CAU_CauseVal_29 := 29;

/* Value '#31 Normal, unspecified' of element 'Cause indicator' in IE 'Cause'. */
const integer c_CAU_CauseVal_31 := 31;

@@ -538,6 +541,9 @@ const Bit7 c_GNI_gNotInd_remHold := '1111001'B;
/* Value 'remote retrieval' of bit field element 'generic notification indicator' in IE 'Generic notification indicator'. */
const Bit7 c_GNI_gNotInd_remRetriv := '1111010'B;

/* Value 'call transfer, active' of bit field element 'generic notification indicator' in IE 'Generic notification indicator'. */
const Bit7 c_GNI_gNotInd_callTransferActive := '1101010'B;

/* Value 'call is a waiting call' of bit field element 'generic notification indicator' in IE 'Generic notification indicator'. */
const Bit7 c_GNI_gNotInd_waitCall := '1100000'B;

@@ -613,12 +619,24 @@ const Bit1 c_MRQI_mcidRqInd_notReq := '0'B;
/* Value 'MCID requested' of bit field element 'MCID request indicator value' in IE 'MCID request indicators'. */
const Bit1 c_MRQI_mcidRqInd_req := '1'B;

/* Value 'holding not requested' of bit field element 'MCID request indicator value' in IE 'MCID request indicators'. */
const Bit1 c_MRQI_holdingInd_notReq := '0'B;

/* Value 'holding requested' of bit field element 'MCID request indicator value' in IE 'MCID request indicators'. */
const Bit1 c_MRQI_holdingInd_req := '1'B;

/* Value 'MCID included' of bit field element 'MCID response indicator value' in IE 'MCID response indicators'. */
const Bit1 c_MRSI_mcidRsInd_incl := '1'B;

/* Value 'MCID not included' of bit field element 'MCID response indicator value' in IE 'MCID response indicators'. */
const Bit1 c_MRSI_mcidRsInd_notIncl := '0'B;

/* Value 'holding not provided' of bit field element 'MCID response indicator value' in IE 'MCID response indicators'. */
const Bit1 c_MRSI_holdingInd_notProv := '0'B;

/* Value 'holding provided' of bit field element 'MCID response indicator value' in IE 'MCID response indicators'. */
const Bit1 c_MRSI_holdingInd_prov := '1'B;

/* Value '1 satellite' for element satelliteIndicator inside Nature of connection indicators parameter (NCI); Fixed(F) format.  (TX side).*/
const Bit2 c_ISUP_NCI_satInd_1sat := '01'B;

+14 −119
Original line number Diff line number Diff line
@@ -15,105 +15,10 @@ module SipIsup_ISUP_ModuleParams{
		
modulepar
{
/* @desc	Time to delay ACM message before sending
/* @desc	Time to delay messages before sending
** @remark	PICS/PIXIT Reference:	TISPAN DTS 06014-3, Table A3, item 3.7
*/
float		PX_TDelay_ACM := 1.0;

/* @desc	Time to delay ANM message before sending
** @remark	PICS/PIXIT Reference:	TISPAN DTS 06014-3, Table A3, item 3.8
*/
float		PX_TDelay_ANM := 1.0;

/* @desc	Time to delay APM message before sending
** @remark	PICS/PIXIT Reference:	TISPAN DTS 06014-3, Table A3, item 3.9
*/
float		PX_TDelay_APM := 1.0;

/* @desc	Time to delay CGB message before sending
** @remark	PICS/PIXIT Reference:	TISPAN DTS 06014-3, Table A3, item 3.10
*/
float		PX_TDelay_CGB := 1.0;

/* @desc	Time to delay CON message before sending
** @remark	PICS/PIXIT Reference:	TISPAN DTS 06014-3, Table A3, item 3.11
*/
float		PX_TDelay_CON := 1.0;

/* @desc	Time to delay COTM message before sending
** @remark	PICS/PIXIT Reference:	TISPAN DTS 06014-3, Table A3, item 3.12
*/
float		PX_TDelay_COT := 1.0;

/* @desc	Time to delay CPG message before sending
** @remark	PICS/PIXIT Reference:	TISPAN DTS 06014-3, Table A3, item 3.13
*/
float		PX_TDelay_CPG := 1.0;

/* @desc	Time to delay FAC message before sending
** @remark	PICS/PIXIT Reference:	TISPAN DTS 06014-3, Table A3, item 3.14
*/
float		PX_TDelay_FAC := 1.0;

/* @desc	Time to delay FAR message before sending
** @remark	PICS/PIXIT Reference:	TISPAN DTS 06014-3, Table A3, item 3.15
*/
float		PX_TDelay_FAR := 1.0;

/* @desc	Time to delay GRS message before sending
** @remark	PICS/PIXIT Reference:	TISPAN DTS 06014-3, Table A3, item 3.16
*/
float		PX_TDelay_GRS := 1.0;

/* @desc	Time to delay IDR message before sending
** @remark	PICS/PIXIT Reference:	TISPAN DTS 06014-3, Table A3, item 3.17
*/
float		PX_TDelay_IDR := 1.0;

/* @desc	Time to delay INF message before sending
** @remark	PICS/PIXIT Reference:	TISPAN DTS 06014-3, Table A3, item 3.18
*/
float		PX_TDelay_INF := 1.0;

/* @desc	Time to delay LOP message before sending
** @remark	PICS/PIXIT Reference:	TISPAN DTS 06014-3, Table A3, item 3.19
*/
float		PX_TDelay_LOP := 1.0;

/* @desc	Time to delay REL message before sending
** @remark	PICS/PIXIT Reference:	TISPAN DTS 06014-3, Table A3, item 3.20
*/
float		PX_TDelay_REL := 1.0;

/* @desc	Time to delay RES message before sending
** @remark	PICS/PIXIT Reference:	TISPAN DTS 06014-3, Table A3, item 3.21
*/
float		PX_TDelay_RES := 1.0;

/* @desc	Time to delay RLC message before sending
** @remark	PICS/PIXIT Reference:	TISPAN DTS 06014-3, Table A3, item 3.22
*/
float		PX_TDelay_RLC := 1.0;

/* @desc	Time to delay RSC message before sending
** @remark	PICS/PIXIT Reference:	TISPAN DTS 06014-3, Table A3, item 3.23
*/
float		PX_TDelay_RSC := 1.0;

/* @desc	Time to delay SAM message before sending
** @remark	PICS/PIXIT Reference:	TISPAN DTS 06014-3, Table A3, item 3.24
*/
float		PX_TDelay_SAM := 1.0;

/* @desc	Time to delay SUS message before sending
** @remark	PICS/PIXIT Reference:	TISPAN DTS 06014-3, Table A3, item 3.28
*/
float		PX_TDelay_SUS := 1.0;

/* @desc	Time to delay UNKNOWN message before sending
** @remark	PICS/PIXIT Reference:	TISPAN DTS 06014-3, Table A3, item 3.26
*/
float		PX_TDelay_UNKNOWN := 1.0;
float		PX_TDelay := 1.0;

/* @desc	Nominal timeout value of ISUP protocol timer T2
** @remark	PICS/PIXIT Reference:	TISPAN DTS 06014-3, Table A3, item 3.27
@@ -368,7 +273,12 @@ charstring PX_ISUP_IAM_CLD_digits_txDef_nat :="42909";
/*  @desc	Default 'user-to-user information' value sent in the 'User-to-user information' parameter.
** @remark	PICS/PIXIT Reference: TISPAN DTS 06014-3, Table A5, item 5.9.1
*/
octetstring		PX_ISUP_IAM_UUI_userInfo := '0449534B524154454C'O;
octetstring		PX_ISUP_UUI_userInfo_tx := '0449534B524154454C'O;

/*  @desc	Default 'user-to-user information' value received in the 'User-to-user information' parameter.
** @remark	PICS/PIXIT Reference: TISPAN DTS 06014-3, Table A5, item 5.9.1
*/
octetstring		PX_ISUP_UUI_userInfo_rx := '0449534B524154454C'O;

/*  @desc	'Location' value sent in the 'Cause indicators' parameter.
** @remark	PICS/PIXIT Reference: TISPAN DTS 06014-3, Table A5, item 5.10.1
@@ -602,16 +512,6 @@ charstring PX_ISUP_IAM_OCN_digits_rxNat := "42909";
*/
Bit7			PX_ISUP_TX_OCN_natOfAddressInd := '0000001'B;

/*  @desc	Default value for element addrPresRestrInd inside Original called number parameter (OCN); Optional(O) format (to be sent when the TP does not specify a specific value for that field).
** @remark	PICS/PIXIT Reference: TISPAN DTS 06014-3, Table A5, item 5.17.2
*/
Bit2			PX_ISUP_TX_OCN_addrPresRestrInd := '00'B;

/*  @desc	Default value for element numberingPlanIndicator inside Original called number parameter (OCN); Optional(O) format (to be sent when the TP does not specify a specific value for that field).
** @remark	PICS/PIXIT Reference: TISPAN DTS 06014-3, Table A5, item 5.17.3
*/
Bit3			PX_ISUP_TX_OCN_numbPlanInd := '001'B;

/*  @desc	Default value for element addressSignals inside Original called number parameter (OCN); Optional(O) format (to be sent when the TP does not specify a specific value for that field).
** @remark	PICS/PIXIT Reference: TISPAN DTS 06014-3, Table A5, item 5.17.4
*/
@@ -627,7 +527,7 @@ Bit8 PX_ISUP_TX_RAS_range := '00011110'B; // 30
*/
octetstring		PX_ISUP_TX_RAS_status := 'FE7FFF7F'O; // cic 1-15, 17-31;

/*  @desc	Default 'address digits' value received in the 'ORedirecting number' parameter in the IAM message, when the Redirecting party number is 'international'.
/*  @desc	Default 'address digits' value received in the 'Redirecting number' parameter in the IAM message, when the Redirecting party number is 'international'.
** @remark	PICS/PIXIT Reference: TISPAN DTS 06014-3, Table A5, item 5.5.1
*/
charstring		PX_ISUP_IAM_RDN_digits_rxInat := "38642909";
@@ -642,16 +542,6 @@ charstring PX_ISUP_IAM_RDN_digits_rxNat := "42909";
*/
Bit7			PX_ISUP_TX_RDN_natOfAddressInd := '0000001'B;

/*  @desc	Default value for element addrPresRestrInd inside Redirecting number parameter (RDN); Optional(O) format (to be sent when the TP does not specify a specific value for that field).
** @remark	PICS/PIXIT Reference: TISPAN DTS 06014-3, Table A5, item 5.19.2
*/
Bit2			PX_ISUP_TX_RDN_addrPresRestrInd := '00'B;

/*  @desc	Default value for element numberingPlanIndicator inside Redirecting number parameter (RDN); Optional(O) format (to be sent when the TP does not specify a specific value for that field).
** @remark	PICS/PIXIT Reference: TISPAN DTS 06014-3, Table A5, item 5.19.3
*/
Bit3			PX_ISUP_TX_RDN_numbPlanInd := '001'B;

/*  @desc	Default value for element addressSignals inside Redirecting number parameter (RDN); Optional(O) format (to be sent when the TP does not specify a specific value for that field).
** @remark	PICS/PIXIT Reference: TISPAN DTS 06014-3, Table A5, item 5.19.4
*/
@@ -667,6 +557,11 @@ Bit7 PX_ISUP_TX_RNN_natOfAddressInd := '0000001'B;
*/
charstring		PX_ISUP_TX_RNN_addrSignals := "2909";

/*  @desc	Default value for element addressSignals inside Redirection number parameter (RNN); Optional(O) format (to be received in ACM or CPG messages).
** @remark	PICS/PIXIT Reference: TISPAN DTS 06014-3, Table A5, item 5.20.4
*/
charstring		PX_ISUP_RX_RNN_addrSignals := "2909";

/*  @desc	Default value for element transmissionMediumRequirement inside Transmission medium requirement prime parameter (TMRP); Optional(O) format (to be sent when the TP does not specify a specific value for that field).
** @remark	PICS/PIXIT Reference: TISPAN DTS 06014-3, Table A5, item 5.22
*/
+40 −10
Original line number Diff line number Diff line
@@ -140,7 +140,8 @@ template ACM_MSG mw_ACM_CDIV
 endOfOptionalParameters := '00000000'B /* End of optional parameters, O, len=1 */
}

template ACM_MSG mw_ACM_UUI(template UUID_PAR_tlv p_UUID, template UUIF_PAR_tlv p_UUIF) :=
template ACM_MSG mw_ACM_UUI(template UUID_PAR_tlv p_UUID,
						    template UUIF_PAR_tlv p_UUIF) :=
/* RX template for Address complete message (ACM) with UUID and UUIF parameterized and any other optional parameters.*/
{
 msgType := '00000110'B,                     /* Message Type '00000110'B */
@@ -481,12 +482,12 @@ template CPG_MSG mw_CPG_CDIV
} /* end group CPG */

group FAC {
template FAC_MSG m_FAC(template ROP_PAR_tlv p_ROP) :=
/* RX template for Facility message (FAC) with default remote operations and no other optional parameters.*/
template FAC_MSG m_FAC(template GNI_PAR_tlv p_GNI) :=
/* RX template for Facility message (FAC) with parametrized Generic notifcation indicator parameter and no other optional parameters.*/
{
 msgType := '00110011'B,                                  /* Message Type '00110011'B */
 pOptional := '00000001'B,                                /* Pointer to optional parameters. */
 optionalParameters := m_FAC_USED_OPTIONAL_PARAMS(p_ROP),      /* SET: optional parameters of Facility message (FAC) */
 optionalParameters := m_FAC_USED_OPTIONAL_PARAMS(p_GNI), /* SET: optional parameters of Facility message (FAC) */
 endOfOptionalParameters := '00000000'B                   /* End of optional parameters, O, len=1 */
}
} /* end group FAC */
@@ -956,6 +957,15 @@ template IDR_MSG m_IDR_MCRI(template MCRI_PAR_tlv p_MRQI) :=
 optionalParameters := m_IDR_USED_OPTIONAL_PARAMS(p_MRQI), /* SET: optional parameters of Identification request message (IDR) */
 endOfOptionalParameters := '00000000'B                    /* End of optional parameters, O, len=1 */
}

template IDR_MSG mw_IDR_MCRI(template MCRI_PAR_tlv p_MRQI) :=
/* RX template for Identification request message (IDR) with MCID request indicators parameterized, and 'any' other optional parameters */
{
 msgType := '00110110'B,                                    /* Message Type '00110110'B */
 pOptional := '00000001'B,                                  /* Pointer to optional parameters. */
 optionalParameters := mw_IDR_USED_OPTIONAL_PARAMS(p_MRQI), /* SET: optional parameters of Identification request message (IDR) */
 endOfOptionalParameters := '00000000'B                     /* End of optional parameters, O, len=1 */
}
} /* end group IDR */

group INF {
@@ -983,6 +993,15 @@ template INR_MSG mw_INR :=
} /* end group INR */

group IRS {
template IRS_MSG m_IRS_MCRS(template MCRS_PAR_tlv p_MRSI) :=
/* TX template for Identification response message (IRS) with MCID response indicators parameterized and with no other optional parameters */
{
 msgType := '00110111'B,                                   /* Message Type '00110111'B */
 pOptional := ?,                                           /* Pointer to optional parameters. */
 optionalParameters := m_IRS_USED_OPTIONAL_PARAMS(p_MRSI), /* SET: optional parameters of Identification response message (IRS) */
 endOfOptionalParameters := '00000000'B                    /* End of optional parameters, O, len=1 */
}

template IRS_MSG mw_IRS_MCRS(template MCRS_PAR_tlv p_MRSI) :=
/* RX template for Identification response message (IRS) with MCID response indicators parameterized and with 'any' other values */
{
@@ -1050,6 +1069,17 @@ template REL_MSG mw_REL(template CAUI_PAR_lv p_CAU) :=
 optionalParameters := mw_REL_OPTIONAL_PARAMS_any,      /* SET: optional parameters of Release message (REL) */
 endOfOptionalParameters := '00000000'B ifpresent       /* End of optional parameters, O, len=1 */
}

template REL_MSG mw_REL_UUI(template UUIF_PAR_tlv p_UUIF) :=
/* RX template for Release message (REL) with User-to-user information parameterized and with 'any'-values */
{
 msgType := '00001100'B,                                    /* Message Type '00001100'B */
 pCAUI := '00000010'B,                                      /* Pointer to parameter 'Cause indicators'. */
 pOptional := ?,                                            /* Pointer to optional parameters. */
 causeIndicators := mw_CAUI_PAR_lv_any,                     /* Cause indicators, V, len=3-? */
 optionalParameters := mw_REL_USED_OPTIONAL_PARAMS(p_UUIF), /* SET: optional parameters of Release message (REL) */
 endOfOptionalParameters := '00000000'B                     /* End of optional parameters, O, len=1 */
}
} /* end group REL */

group RLC {
+146 −131

File changed.

Preview size limit exceeded, changes collapsed.

+44 −0
Original line number Diff line number Diff line
@@ -562,6 +562,28 @@ group SipIsup_ISUP_Receive_Msgs
	  }
	}
  
	function f_awaiting_IDR(template IDR_MSG p_IDR) runs on IsupBiccComponent
	{
	  v_Default := activate (a_IsupBicc_Def_Generic());
      
	  TAck.start;
	  alt
	  {
		[PX_ISUP_Isup] IsupBiccP.receive 
		   (mw_ISUP_MSG_ind(v_CircuitIdentityCode1, { iDR_MSG := p_IDR}, v_SLS))
		   {
			 setverdict(pass);
			TAck.stop;
		   };
		[not PX_ISUP_Isup] IsupBiccP.receive 
		   (mw_BICC_MSG_ind(v_CallInstanceCode1, { iDR_MSG := p_IDR}))
		   {
			 setverdict(pass);
			TAck.stop;
		   };
	  }
	}
  
	function f_awaiting_INR(template INR_MSG p_INR) runs on IsupBiccComponent
	{
	  v_Default := activate (a_IsupBicc_Def_Generic());
@@ -1100,6 +1122,28 @@ group SipIsup_ISUP_Transmit_Msgs
	  }
	}

	function f_send_IRS(template IRS_MSG p_IRS, boolean p_delay) runs on IsupBiccComponent
	{
	  v_Default := activate (a_IsupBicc_Def_Generic());
      
	  if (p_delay == true)
	  {
		TDelay_IRS.start;
		alt
		{
		   [] TDelay_IRS.timeout{};
		}
	  }
	  if (PX_ISUP_Isup == true)
	  {
		 IsupBiccP.send (m_ISUP_MSG_req(v_CircuitIdentityCode1, { iRS_MSG := p_IRS}, v_SLS));
	  }
	  else
	  {
		 IsupBiccP.send (m_BICC_MSG_req(v_CallInstanceCode1, { iRS_MSG := p_IRS}));
	  }
	}

	function f_send_LOP(template LOP_MSG p_LOP, boolean p_delay) runs on IsupBiccComponent
	{
	  v_Default := activate (a_IsupBicc_Def_Generic());
Loading