summaryrefslogtreecommitdiffstats
path: root/src/mtp3_codec.erl
diff options
context:
space:
mode:
authorHarald Welte <laforge@gnumonks.org>2011-01-15 20:51:53 +0100
committerHarald Welte <laforge@gnumonks.org>2011-01-15 20:51:53 +0100
commit1fbcd1c88b12b5527bd0ddf9b7e7c9e106f79b59 (patch)
treeef731bde407bd4446d27ddec9307d67ba53c2f59 /src/mtp3_codec.erl
parent1f6a0358908984cb55b3ecc881763f9d3bd67115 (diff)
Add some simplistic MTP3 parsing/encoding functions
Diffstat (limited to 'src/mtp3_codec.erl')
-rw-r--r--src/mtp3_codec.erl46
1 files changed, 46 insertions, 0 deletions
diff --git a/src/mtp3_codec.erl b/src/mtp3_codec.erl
new file mode 100644
index 0000000..4912b54
--- /dev/null
+++ b/src/mtp3_codec.erl
@@ -0,0 +1,46 @@
+% ITU-T Q.704 (MTP Level 3) coding / decoding
+
+% (C) 2011 by Harald Welte <laforge@gnumonks.org>
+%
+% All Rights Reserved
+%
+% This program is free software; you can redistribute it and/or modify
+% it under the terms of the GNU Affero General Public License as
+% published by the Free Software Foundation; either version 3 of the
+% License, or (at your option) any later version.
+%
+% This program is distributed in the hope that it will be useful,
+% but WITHOUT ANY WARRANTY; without even the implied warranty of
+% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+% GNU General Public License for more details.
+%
+% You should have received a copy of the GNU Affero General Public License
+% along with this program. If not, see <http://www.gnu.org/licenses/>.
+
+-module(mtp3_codec).
+-author('Harald Welte <laforge@gnumonks.org>').
+-include("mtp3.hrl").
+
+-export([parse_mtp3_msg/1, encode_mtp3_msg/1]).
+
+% Parse standard routing label according to Section 2.2 of ITU-T Q.704
+parse_mtp3_routing_label(_, LabelBin) when is_binary(LabelBin) ->
+ <<Sls:4/big, Opc:14/big, Dpc:14/big, Remain/binary>> = LabelBin,
+ {ok, #mtp3_routing_label{sig_link_sel = Sls, origin_pc = Opc, dest_pc = Dpc}, Remain}.
+
+parse_mtp3_msg(DataBin) when is_binary(DataBin) ->
+ <<NetInd:2, 0:2, ServiceInd:4, Remain/binary>> = DataBin,
+ {ok, RoutLbl, Payload} = parse_mtp3_routing_label(ServiceInd, Remain),
+ #mtp3_msg{network_ind = NetInd, service_ind = ServiceInd, routing_label = RoutLbl,
+ payload = Payload}.
+
+
+encode_mtp3_routing_label(#mtp3_routing_label{sig_link_sel = Sls, origin_pc = Opc,
+ dest_pc = Dpc}) ->
+ <<Sls:4/big, Opc:14/big, Dpc:14/big>>.
+
+encode_mtp3_msg(#mtp3_msg{network_ind = NetInd, service_ind = ServiceInd,
+ routing_label = RoutLbl, payload = Payload}) ->
+ RoutLblBin = encode_mtp3_routing_label(RoutLbl),
+ <<NetInd:2, 0:2, ServiceInd:4, RoutLblBin/binary, Payload/binary>>.
+