CCO: correctly resolve ISM Pid on response to outgoing Invokes

This commit is contained in:
Harald Welte 2012-01-30 22:36:02 +01:00
parent bc4c9669ae
commit feb2275971
1 changed files with 3 additions and 3 deletions

View File

@ -345,7 +345,7 @@ process_rx_component(ISMs, C={invoke, #'Invoke'{invokeId=InvId}}) ->
ok
end,
Prim = asn_rec_to_uprim(C),
ISM = lists:keyfind(InvId, 1, ISMs),
{InvId, ISM} = lists:keyfind(InvId, 1, ISMs),
gen_fsm:send_event(ISM, Prim);
process_rx_component(ISMs, C={reject, #'Reject'{invokeId=InvId,
problem=Problem}}) ->
@ -359,12 +359,12 @@ process_rx_component(ISMs, C={reject, #'Reject'{invokeId=InvId,
end,
% FIXME: decide on TC-U-REJECT or TC-R-REJECT
Prim = asn_rec_to_uprim(C),
ISM = lists:keyfind(InvId, 1, ISMs),
{InvId, ISM} = lists:keyfind(InvId, 1, ISMs),
gen_fsm:send_event(ISM, Prim);
process_rx_component(ISMs, Comp) ->
% syntax error?
InvId = get_invoke_id_from_comp(Comp),
ISM = lists:keyfind(InvId, 1, ISMs),
{InvId, ISM} = lists:keyfind(InvId, 1, ISMs),
% FIXME: ISM active (No -> 6)
Prim = asn_rec_to_uprim(Comp),
gen_fsm:send_event(ISM, Prim).