# ranap.cnf
# ranap conformation file

# $Id$

#.EXPORTS
TargetID
Service-Handover
IntegrityProtectionInformation
EncryptionInformation

#.PDU_NEW
RANAP-PDU

#.NO_EMIT

#.TYPE_RENAME

#.FIELD_RENAME

SDU-ErrorRatio/exponent exponent_1_8

PrivateIE-Field/id private_id
ProtocolExtensionField/id ext_id

MessageStructure/_item/repetitionNumber item_repetitionNumber
PrivateIE-Field/value private_value
ProtocolIE-Field/value ie_field_value
RAB-DataVolumeReportItem/dl-UnsuccessfullyTransmittedDataVolume rab-dl-UnsuccessfullyTransmittedDataVolume
#.FN_PARS RANAP-PDU

VAL_PTR = &type_of_message

#.FN_PARS ProcedureCode

VAL_PTR = &ProcedureCode

#.FN_FTR ProcedureCode
	if (check_col(actx->pinfo->cinfo, COL_INFO))
       col_add_fstr(actx->pinfo->cinfo, COL_INFO, "%s ",
                   val_to_str(ProcedureCode, ranap_ProcedureCode_vals,
                              "unknown message"));
#.FN_PARS ProtocolIE-ID
 
VAL_PTR = &ProtocolIE_ID

#.FN_PARS ProtocolExtensionID

VAL_PTR = &ProtocolIE_ID

#.FN_BODY PermanentNAS-UE-ID/iMSI
  tvbuff_t* imsi_tvb;
  offset = dissect_per_octet_string(tvb, offset, actx, tree, hf_ranap_iMSI,
                                       3, 8, &imsi_tvb);
  
	if ( actx->pinfo->sccp_info
		 && actx->pinfo->sccp_info->data.co.assoc
		 && ! actx->pinfo->sccp_info->data.co.assoc->calling_party ) {
	   
		guint len = tvb_length(imsi_tvb);
		guint8* bytes = ep_tvb_memdup(imsi_tvb,0,len);

		actx->pinfo->sccp_info->data.co.assoc->calling_party = 
			se_strdup_printf("IMSI: %%s", bytes_to_str(bytes, len) );
	}
#.FN_BODY Value
	
	offset = dissect_ranap_messages(tvb, offset, %(ACTX)s, tree);

#.FN_BODY RANAP-PROTOCOL-IES-Value

	offset = dissect_ranap_ies(tvb, offset, %(ACTX)s, tree);

#.FN_BODY NAS-PDU  VAL_PTR = &nas_pdu_tvb

tvbuff_t *nas_pdu_tvb=NULL;

%(DEFAULT_BODY)s

	if (nas_pdu_tvb)
		dissector_try_port(nas_pdu_dissector_table, 0x1, nas_pdu_tvb, %(ACTX)s->pinfo, top_tree);

#.FN_BODY SecondValue
	offset = dissect_ranap_SecondValue_ies(tvb, offset, %(ACTX)s, tree);

#.FN_BODY FirstValue
	offset = dissect_ranap_FirstValue_ies(tvb, offset, %(ACTX)s, tree);

#.FN_BODY Extension

	offset = dissect_ranap_ies(tvb, offset, %(ACTX)s, tree);

#.FN_BODY RANAP-PRIVATE-IES-Value
/* FIX ME */

#.FN_BODY PLMNidentity  VAL_PTR = &parameter_tvb

	tvbuff_t *parameter_tvb=NULL;

%(DEFAULT_BODY)s

	 if (!parameter_tvb)
		return offset;
	dissect_e212_mcc_mnc(parameter_tvb, tree, 0);

#.END
#.TYPE_ATTR
ProtocolExtensionID TYPE = FT_UINT8  DISPLAY = BASE_DEC STRINGS = VALS(ranap_ProtocolIE_ID_vals)