erlang
/
signerl
4
0
Fork 1
Code Issues Pull Requests Projects Releases Wiki Activity

TCAP CCO: Handle case where ReturnResult.result is asn1_NOVALUE

This commit is contained in:
Harald Welte 2013-06-24 14:40:19 +02:00
parent 8d32188896
commit cb55abc0f7
1 changed files with 14 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
TCAP/src/ITU/tcap_cco_server.erl
View File

@ -319,14 +319,26 @@ asn_rec_to_uprim({invoke, AsnRec}, DlgId, Last) when is_record(AsnRec, 'Invoke')
parameters = AsnRec#'Invoke'.argument,
lastComponent = Last};
asn_rec_to_uprim({returnResultNotLast, AsnRec}, DlgId, Last) when is_record(AsnRec, 'ReturnResult') ->
#'ReturnResult_result'{opcode = Op, result = Result} = AsnRec#'ReturnResult'.result,
case AsnRec#'ReturnResult'.result of
#'ReturnResult_result'{opcode = Op, result = Result} ->
ok;
asn1_NOVALUE ->
Op = undefined,
Result = undefined
end,
#'TC-RESULT-NL'{dialogueID = DlgId,
invokeID = inv_id_to_uprim(AsnRec#'ReturnResult'.invokeId),
operation = Op,
parameters = Result,
lastComponent = Last};
asn_rec_to_uprim({returnResult, AsnRec}, DlgId, Last) when is_record(AsnRec, 'ReturnResult') ->
#'ReturnResult_result'{opcode = Op, result = Result} = AsnRec#'ReturnResult'.result,
case AsnRec#'ReturnResult'.result of
#'ReturnResult_result'{opcode = Op, result = Result} ->
ok;
asn1_NOVALUE ->
Op = undefined,
Result = undefined
end,
#'TC-RESULT-L'{dialogueID = DlgId,
invokeID = inv_id_to_uprim(AsnRec#'ReturnResult'.invokeId),
operation = Op,