From 683ed23bbd103372fa326f0a523dba5645271ef4 Mon Sep 17 00:00:00 2001
From: Harald Welte <laforge@gnumonks.org>
Date: Thu, 8 Dec 2011 00:56:54 +0100
Subject: SCCP: support encoding of non-integer pointcodes (auto conversion)

---
 src/sccp_codec.erl | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

(limited to 'src/sccp_codec.erl')

diff --git a/src/sccp_codec.erl b/src/sccp_codec.erl
index b3989e6..39f25a2 100644
--- a/src/sccp_codec.erl
+++ b/src/sccp_codec.erl
@@ -269,13 +269,16 @@ encode_gt(#global_title{gti = GTind, phone_number = PhoneNum,
 			{GTind, <<TransType:8, NumPlan:4, Enc:4, 0:1, Nature:7, PhoneBin/binary>>}
 	end.
 
-encode_pc(PointCode) ->
+encode_pc(PointCode) when is_integer(PointCode) ->
 	case PointCode of
 		undef ->
 			{0, <<>>};
 		_ ->
 			{1, <<PointCode:16/little>>}
-	end.
+	end;
+encode_pc(PcRec) ->
+	PcInt = osmo_util:pointcode2int(PcRec),
+	encode_pc(PcInt).
 
 encode_ssn(SSN) ->
 	case SSN of
-- 
cgit v1.2.3