From 7aff8fb62be1422016ec92df5d1cbec0c738b75c Mon Sep 17 00:00:00 2001 From: Harald Welte Date: Sun, 1 Apr 2012 19:03:31 +0200 Subject: sua_codec: rename generic part from sua -> xua --- src/sua_codec.erl | 8 +++----- 1 file changed, 3 insertions(+), 5 deletions(-) (limited to 'src') diff --git a/src/sua_codec.erl b/src/sua_codec.erl index 9e2e203..ee7830c 100644 --- a/src/sua_codec.erl +++ b/src/sua_codec.erl @@ -58,8 +58,6 @@ parse_xua_opts(OptBin, OptList) when is_binary(OptBin), is_list(OptList) -> NewOpt = {Tag, {Length, Value}}, parse_xua_opts(NextOpts, OptList ++ [NewOpt]). -parse_sua_opt(Opt, Msg) -> - {Opt, Msg}. encode_msg(#sua_msg{version = Version, msg_class = MsgClass, @@ -74,14 +72,14 @@ encode_xua_opts(OptList) when is_list(OptList) -> encode_xua_opts([], Bin) -> Bin; encode_xua_opts([{Iei, Attr}|Tail], Bin) -> - OptBin = encode_sua_opt(Iei, Attr), + OptBin = encode_xua_opt(Iei, Attr), encode_xua_opts(Tail, <>). -encode_sua_opt(Iei, {LenIn, Data}) when is_integer(Iei), is_binary(Data) -> +encode_xua_opt(Iei, {LenIn, Data}) when is_integer(Iei), is_binary(Data) -> Length = LenIn + 4, PadLen = get_num_pad_bytes(Length), <>; -encode_sua_opt(Iei, Data) when is_integer(Iei), is_binary(Data) -> +encode_xua_opt(Iei, Data) when is_integer(Iei), is_binary(Data) -> Length = byte_size(Data) + 4, PadLen = get_num_pad_bytes(Length), <>. -- cgit v1.2.3