ss7_{links,routes}: deal with tuple/record point codes
diff --git a/src/ss7_links.erl b/src/ss7_links.erl
index aa91330..da6f790 100644
--- a/src/ss7_links.erl
+++ b/src/ss7_links.erl
@@ -138,7 +138,8 @@
end.
% Resolve linkset name directly connected to given point code
-get_linkset_for_dpc(Dpc) when is_integer (Dpc) ->
+get_linkset_for_dpc(DpcIn) ->
+ Dpc = osmo_util:pointcode2int(DpcIn),
Ret = ets:match_object(ss7_linksets,
#slinkset{remote_pc = Dpc, _ = '_'}),
case Ret of
@@ -149,7 +150,8 @@
end.
% resolve link-handler Pid for given (directly connected) point code/sls
-get_pid_for_dpc_sls(Dpc, Sls) when is_integer(Dpc) and is_integer(Sls) ->
+get_pid_for_dpc_sls(DpcIn, Sls) when is_integer(Sls) ->
+ Dpc = osmo_util:pointcode2int(DpcIn),
case get_linkset_for_dpc(Dpc) of
{error, Err} ->
{error, Err};
diff --git a/src/ss7_routes.erl b/src/ss7_routes.erl
index 6aac951..ba66742 100644
--- a/src/ss7_routes.erl
+++ b/src/ss7_routes.erl
@@ -69,10 +69,12 @@
% all write operations go through gen_server:call(), as only the ?MODULE
% process has permission to modify the table content
-create_route(RemotePc, RemoteMask, LinksetName) ->
+create_route(RemotePcIn, RemoteMask, LinksetName) ->
+ RemotePc = osmo_util:pointcode2int(RemotePcIn),
gen_server:call(?MODULE, {create_route, {RemotePc, RemoteMask, LinksetName}}).
-delete_route(RemotePc, RemoteMask, LinksetName) ->
+delete_route(RemotePcIn, RemoteMask, LinksetName) ->
+ RemotePc = osmo_util:pointcode2int(RemotePcIn),
gen_server:call(?MODULE, {delete_route, {RemotePc, RemoteMask, LinksetName}}).
% the lookup functions can directly use the ets named_table from within