chore(gw-lwm2m): format emqx_lwm2m_tlv_SUITE
This commit is contained in:
JianBo He
parent
d82830d8c7
commit
2fe96a3ad0
|
|
@ -25,7 +25,13 @@
|
||||||
-include_lib("emqx_gateway/src/coap/include/emqx_coap.hrl").
|
-include_lib("emqx_gateway/src/coap/include/emqx_coap.hrl").
|
||||||
-include_lib("eunit/include/eunit.hrl").
|
-include_lib("eunit/include/eunit.hrl").
|
||||||
|
|
||||||
all() -> [case01, case02, case03, case03_0, case04, case05, case06, case07, case08, case09].
|
%%--------------------------------------------------------------------
|
||||||
|
%% Setup
|
||||||
|
%%--------------------------------------------------------------------
|
||||||
|
|
||||||
|
all() ->
|
||||||
|
[case01, case02, case03, case03_0,
|
||||||
|
case04, case05, case06, case07, case08, case09].
|
||||||
|
|
||||||
init_per_suite(Config) ->
|
init_per_suite(Config) ->
|
||||||
Config.
|
Config.
|
||||||
|
|
@ -33,9 +39,14 @@ init_per_suite(Config) ->
|
||||||
end_per_suite(Config) ->
|
end_per_suite(Config) ->
|
||||||
Config.
|
Config.
|
||||||
|
|
||||||
|
%%--------------------------------------------------------------------
|
||||||
|
%% Cases
|
||||||
|
%%--------------------------------------------------------------------
|
||||||
|
|
||||||
case01(_Config) ->
|
case01(_Config) ->
|
||||||
Data = <<16#C8, 16#00, 16#14, 16#4F, 16#70, 16#65, 16#6E, 16#20, 16#4D, 16#6F, 16#62, 16#69, 16#6C, 16#65, 16#20, 16#41, 16#6C, 16#6C, 16#69, 16#61, 16#6E, 16#63, 16#65>>,
|
Data = <<16#C8, 16#00, 16#14, 16#4F, 16#70, 16#65, 16#6E, 16#20,
|
||||||
|
16#4D, 16#6F, 16#62, 16#69, 16#6C, 16#65, 16#20, 16#41,
|
||||||
|
16#6C, 16#6C, 16#69, 16#61, 16#6E, 16#63, 16#65>>,
|
||||||
R = emqx_lwm2m_tlv:parse(Data),
|
R = emqx_lwm2m_tlv:parse(Data),
|
||||||
Exp = [
|
Exp = [
|
||||||
#{tlv_resource_with_value => 16#00, value => <<"Open Mobile Alliance">>}
|
#{tlv_resource_with_value => 16#00, value => <<"Open Mobile Alliance">>}
|
||||||
|
|
@ -47,24 +58,28 @@ case01(_Config) ->
|
||||||
case02(_Config) ->
|
case02(_Config) ->
|
||||||
Data = <<16#86, 16#06, 16#41, 16#00, 16#01, 16#41, 16#01, 16#05>>,
|
Data = <<16#86, 16#06, 16#41, 16#00, 16#01, 16#41, 16#01, 16#05>>,
|
||||||
R = emqx_lwm2m_tlv:parse(Data),
|
R = emqx_lwm2m_tlv:parse(Data),
|
||||||
Exp = [
|
Exp = [ #{tlv_multiple_resource => 16#06,
|
||||||
#{tlv_multiple_resource => 16#06, value => [
|
value => [ #{tlv_resource_instance => 16#00, value => <<1>>},
|
||||||
#{tlv_resource_instance => 16#00, value => <<1>>},
|
#{tlv_resource_instance => 16#01, value => <<5>>}]}
|
||||||
#{tlv_resource_instance => 16#01, value => <<5>>}
|
],
|
||||||
]}
|
|
||||||
],
|
|
||||||
?assertEqual(Exp, R),
|
?assertEqual(Exp, R),
|
||||||
EncodedBinary = emqx_lwm2m_tlv:encode(Exp),
|
EncodedBinary = emqx_lwm2m_tlv:encode(Exp),
|
||||||
?assertEqual(EncodedBinary, Data).
|
?assertEqual(EncodedBinary, Data).
|
||||||
|
|
||||||
case03(_Config) ->
|
case03(_Config) ->
|
||||||
Data = <<16#C8, 16#00, 16#14, 16#4F, 16#70, 16#65, 16#6E, 16#20, 16#4D, 16#6F, 16#62, 16#69, 16#6C, 16#65, 16#20, 16#41, 16#6C, 16#6C, 16#69, 16#61, 16#6E, 16#63, 16#65, 16#C8, 16#01, 16#16, 16#4C, 16#69, 16#67, 16#68, 16#74, 16#77, 16#65, 16#69, 16#67, 16#68, 16#74, 16#20, 16#4D, 16#32, 16#4D, 16#20, 16#43, 16#6C, 16#69, 16#65, 16#6E, 16#74, 16#C8, 16#02, 16#09, 16#33, 16#34, 16#35, 16#30, 16#30, 16#30, 16#31, 16#32, 16#33>>,
|
Data = <<16#C8, 16#00, 16#14, 16#4F, 16#70, 16#65, 16#6E, 16#20,
|
||||||
|
16#4D, 16#6F, 16#62, 16#69, 16#6C, 16#65, 16#20, 16#41,
|
||||||
|
16#6C, 16#6C, 16#69, 16#61, 16#6E, 16#63, 16#65, 16#C8,
|
||||||
|
16#01, 16#16, 16#4C, 16#69, 16#67, 16#68, 16#74, 16#77,
|
||||||
|
16#65, 16#69, 16#67, 16#68, 16#74, 16#20, 16#4D, 16#32,
|
||||||
|
16#4D, 16#20, 16#43, 16#6C, 16#69, 16#65, 16#6E, 16#74,
|
||||||
|
16#C8, 16#02, 16#09, 16#33, 16#34, 16#35, 16#30, 16#30,
|
||||||
|
16#30, 16#31, 16#32, 16#33>>,
|
||||||
R = emqx_lwm2m_tlv:parse(Data),
|
R = emqx_lwm2m_tlv:parse(Data),
|
||||||
Exp = [
|
Exp = [ #{tlv_resource_with_value => 16#00, value => <<"Open Mobile Alliance">>},
|
||||||
#{tlv_resource_with_value => 16#00, value => <<"Open Mobile Alliance">>},
|
|
||||||
#{tlv_resource_with_value => 16#01, value => <<"Lightweight M2M Client">>},
|
#{tlv_resource_with_value => 16#01, value => <<"Lightweight M2M Client">>},
|
||||||
#{tlv_resource_with_value => 16#02, value => <<"345000123">>}
|
#{tlv_resource_with_value => 16#02, value => <<"345000123">>}
|
||||||
],
|
],
|
||||||
?assertEqual(Exp, R),
|
?assertEqual(Exp, R),
|
||||||
EncodedBinary = emqx_lwm2m_tlv:encode(Exp),
|
EncodedBinary = emqx_lwm2m_tlv:encode(Exp),
|
||||||
?assertEqual(EncodedBinary, Data).
|
?assertEqual(EncodedBinary, Data).
|
||||||
|
|
@ -72,42 +87,46 @@ case03(_Config) ->
|
||||||
case03_0(_Config) ->
|
case03_0(_Config) ->
|
||||||
Data = <<16#87, 16#02, 16#41, 16#7F, 16#07, 16#61, 16#01, 16#36, 16#01>>,
|
Data = <<16#87, 16#02, 16#41, 16#7F, 16#07, 16#61, 16#01, 16#36, 16#01>>,
|
||||||
R = emqx_lwm2m_tlv:parse(Data),
|
R = emqx_lwm2m_tlv:parse(Data),
|
||||||
Exp = [
|
Exp = [ #{tlv_multiple_resource => 16#02,
|
||||||
#{tlv_multiple_resource => 16#02, value => [
|
value => [ #{tlv_resource_instance => 16#7F, value => <<16#07>>},
|
||||||
#{tlv_resource_instance => 16#7F, value => <<16#07>>},
|
#{tlv_resource_instance => 16#0136, value => <<16#01>>}
|
||||||
#{tlv_resource_instance => 16#0136, value => <<16#01>>}
|
]}
|
||||||
]}
|
],
|
||||||
],
|
|
||||||
?assertEqual(Exp, R),
|
?assertEqual(Exp, R),
|
||||||
EncodedBinary = emqx_lwm2m_tlv:encode(Exp),
|
EncodedBinary = emqx_lwm2m_tlv:encode(Exp),
|
||||||
?assertEqual(EncodedBinary, Data).
|
?assertEqual(EncodedBinary, Data).
|
||||||
|
|
||||||
case04(_Config) ->
|
case04(_Config) ->
|
||||||
% 6.4.3.1 Single Object Instance Request Example
|
% 6.4.3.1 Single Object Instance Request Example
|
||||||
Data = <<16#C8, 16#00, 16#14, 16#4F, 16#70, 16#65, 16#6E, 16#20, 16#4D, 16#6F, 16#62, 16#69, 16#6C, 16#65, 16#20, 16#41, 16#6C, 16#6C, 16#69, 16#61, 16#6E, 16#63, 16#65, 16#C8, 16#01, 16#16, 16#4C, 16#69, 16#67, 16#68, 16#74, 16#77, 16#65, 16#69, 16#67, 16#68, 16#74, 16#20, 16#4D, 16#32, 16#4D, 16#20, 16#43, 16#6C, 16#69, 16#65, 16#6E, 16#74, 16#C8, 16#02, 16#09, 16#33, 16#34, 16#35, 16#30, 16#30, 16#30, 16#31, 16#32, 16#33, 16#C3, 16#03, 16#31, 16#2E, 16#30, 16#86, 16#06, 16#41, 16#00, 16#01, 16#41, 16#01, 16#05, 16#88, 16#07, 16#08, 16#42, 16#00, 16#0E, 16#D8, 16#42, 16#01, 16#13, 16#88, 16#87, 16#08, 16#41, 16#00, 16#7D, 16#42, 16#01, 16#03, 16#84, 16#C1, 16#09, 16#64, 16#C1, 16#0A, 16#0F, 16#83, 16#0B, 16#41, 16#00, 16#00, 16#C4, 16#0D, 16#51, 16#82, 16#42, 16#8F, 16#C6, 16#0E, 16#2B, 16#30, 16#32, 16#3A, 16#30, 16#30, 16#C1, 16#10, 16#55>>,
|
Data = <<16#C8, 16#00, 16#14, 16#4F, 16#70, 16#65, 16#6E, 16#20,
|
||||||
|
16#4D, 16#6F, 16#62, 16#69, 16#6C, 16#65, 16#20, 16#41,
|
||||||
|
16#6C, 16#6C, 16#69, 16#61, 16#6E, 16#63, 16#65, 16#C8,
|
||||||
|
16#01, 16#16, 16#4C, 16#69, 16#67, 16#68, 16#74, 16#77,
|
||||||
|
16#65, 16#69, 16#67, 16#68, 16#74, 16#20, 16#4D, 16#32,
|
||||||
|
16#4D, 16#20, 16#43, 16#6C, 16#69, 16#65, 16#6E, 16#74,
|
||||||
|
16#C8, 16#02, 16#09, 16#33, 16#34, 16#35, 16#30, 16#30,
|
||||||
|
16#30, 16#31, 16#32, 16#33, 16#C3, 16#03, 16#31, 16#2E,
|
||||||
|
16#30, 16#86, 16#06, 16#41, 16#00, 16#01, 16#41, 16#01,
|
||||||
|
16#05, 16#88, 16#07, 16#08, 16#42, 16#00, 16#0E, 16#D8,
|
||||||
|
16#42, 16#01, 16#13, 16#88, 16#87, 16#08, 16#41, 16#00,
|
||||||
|
16#7D, 16#42, 16#01, 16#03, 16#84, 16#C1, 16#09, 16#64,
|
||||||
|
16#C1, 16#0A, 16#0F, 16#83, 16#0B, 16#41, 16#00, 16#00,
|
||||||
|
16#C4, 16#0D, 16#51, 16#82, 16#42, 16#8F, 16#C6, 16#0E,
|
||||||
|
16#2B, 16#30, 16#32, 16#3A, 16#30, 16#30, 16#C1, 16#10, 16#55>>,
|
||||||
R = emqx_lwm2m_tlv:parse(Data),
|
R = emqx_lwm2m_tlv:parse(Data),
|
||||||
Exp = [
|
Exp = [ #{tlv_resource_with_value => 16#00, value => <<"Open Mobile Alliance">>},
|
||||||
#{tlv_resource_with_value => 16#00, value => <<"Open Mobile Alliance">>},
|
|
||||||
#{tlv_resource_with_value => 16#01, value => <<"Lightweight M2M Client">>},
|
#{tlv_resource_with_value => 16#01, value => <<"Lightweight M2M Client">>},
|
||||||
#{tlv_resource_with_value => 16#02, value => <<"345000123">>},
|
#{tlv_resource_with_value => 16#02, value => <<"345000123">>},
|
||||||
#{tlv_resource_with_value => 16#03, value => <<"1.0">>},
|
#{tlv_resource_with_value => 16#03, value => <<"1.0">>},
|
||||||
#{tlv_multiple_resource => 16#06, value => [
|
#{tlv_multiple_resource => 16#06, value => [#{tlv_resource_instance => 16#00, value => <<1>>},
|
||||||
#{tlv_resource_instance => 16#00, value => <<1>>},
|
#{tlv_resource_instance => 16#01, value => <<5>>}]},
|
||||||
#{tlv_resource_instance => 16#01, value => <<5>>}
|
#{tlv_multiple_resource => 16#07, value => [#{tlv_resource_instance => 16#00, value => <<16#0ED8:16>>},
|
||||||
]},
|
#{tlv_resource_instance => 16#01, value => <<16#1388:16>>}]},
|
||||||
#{tlv_multiple_resource => 16#07, value => [
|
#{tlv_multiple_resource => 16#08, value => [#{tlv_resource_instance => 16#00, value => <<16#7d>>},
|
||||||
#{tlv_resource_instance => 16#00, value => <<16#0ED8:16>>},
|
#{tlv_resource_instance => 16#01, value => <<16#0384:16>>}]},
|
||||||
#{tlv_resource_instance => 16#01, value => <<16#1388:16>>}
|
|
||||||
]},
|
|
||||||
#{tlv_multiple_resource => 16#08, value => [
|
|
||||||
#{tlv_resource_instance => 16#00, value => <<16#7d>>},
|
|
||||||
#{tlv_resource_instance => 16#01, value => <<16#0384:16>>}
|
|
||||||
]},
|
|
||||||
#{tlv_resource_with_value => 16#09, value => <<16#64>>},
|
#{tlv_resource_with_value => 16#09, value => <<16#64>>},
|
||||||
#{tlv_resource_with_value => 16#0A, value => <<16#0F>>},
|
#{tlv_resource_with_value => 16#0A, value => <<16#0F>>},
|
||||||
#{tlv_multiple_resource => 16#0B, value => [
|
#{tlv_multiple_resource => 16#0B, value => [#{tlv_resource_instance => 16#00, value => <<16#00>>}]},
|
||||||
#{tlv_resource_instance => 16#00, value => <<16#00>>}
|
|
||||||
]},
|
|
||||||
#{tlv_resource_with_value => 16#0D, value => <<16#5182428F:32>>},
|
#{tlv_resource_with_value => 16#0D, value => <<16#5182428F:32>>},
|
||||||
#{tlv_resource_with_value => 16#0E, value => <<"+02:00">>},
|
#{tlv_resource_with_value => 16#0E, value => <<"+02:00">>},
|
||||||
#{tlv_resource_with_value => 16#10, value => <<"U">>}
|
#{tlv_resource_with_value => 16#10, value => <<"U">>}
|
||||||
|
|
@ -119,7 +138,22 @@ case04(_Config) ->
|
||||||
case05(_Config) ->
|
case05(_Config) ->
|
||||||
% 6.4.3.2 Multiple Object Instance Request Examples
|
% 6.4.3.2 Multiple Object Instance Request Examples
|
||||||
% A) Request on Single-Instance Object
|
% A) Request on Single-Instance Object
|
||||||
Data = <<16#08, 16#00, 16#79, 16#C8, 16#00, 16#14, 16#4F, 16#70, 16#65, 16#6E, 16#20, 16#4D, 16#6F, 16#62, 16#69, 16#6C, 16#65, 16#20, 16#41, 16#6C, 16#6C, 16#69, 16#61, 16#6E, 16#63, 16#65, 16#C8, 16#01, 16#16, 16#4C, 16#69, 16#67, 16#68, 16#74, 16#77, 16#65, 16#69, 16#67, 16#68, 16#74, 16#20, 16#4D, 16#32, 16#4D, 16#20, 16#43, 16#6C, 16#69, 16#65, 16#6E, 16#74, 16#C8, 16#02, 16#09, 16#33, 16#34, 16#35, 16#30, 16#30, 16#30, 16#31, 16#32, 16#33, 16#C3, 16#03, 16#31, 16#2E, 16#30, 16#86, 16#06, 16#41, 16#00, 16#01, 16#41, 16#01, 16#05, 16#88, 16#07, 16#08, 16#42, 16#00, 16#0E, 16#D8, 16#42, 16#01, 16#13, 16#88, 16#87, 16#08, 16#41, 16#00, 16#7D, 16#42, 16#01, 16#03, 16#84, 16#C1, 16#09, 16#64, 16#C1, 16#0A, 16#0F, 16#83, 16#0B, 16#41, 16#00, 16#00, 16#C4, 16#0D, 16#51, 16#82, 16#42, 16#8F, 16#C6, 16#0E, 16#2B, 16#30, 16#32, 16#3A, 16#30, 16#30, 16#C1, 16#10, 16#55>>,
|
Data = <<16#08, 16#00, 16#79, 16#C8, 16#00, 16#14, 16#4F, 16#70,
|
||||||
|
16#65, 16#6E, 16#20, 16#4D, 16#6F, 16#62, 16#69, 16#6C,
|
||||||
|
16#65, 16#20, 16#41, 16#6C, 16#6C, 16#69, 16#61, 16#6E,
|
||||||
|
16#63, 16#65, 16#C8, 16#01, 16#16, 16#4C, 16#69, 16#67,
|
||||||
|
16#68, 16#74, 16#77, 16#65, 16#69, 16#67, 16#68, 16#74,
|
||||||
|
16#20, 16#4D, 16#32, 16#4D, 16#20, 16#43, 16#6C, 16#69,
|
||||||
|
16#65, 16#6E, 16#74, 16#C8, 16#02, 16#09, 16#33, 16#34,
|
||||||
|
16#35, 16#30, 16#30, 16#30, 16#31, 16#32, 16#33, 16#C3,
|
||||||
|
16#03, 16#31, 16#2E, 16#30, 16#86, 16#06, 16#41, 16#00,
|
||||||
|
16#01, 16#41, 16#01, 16#05, 16#88, 16#07, 16#08, 16#42,
|
||||||
|
16#00, 16#0E, 16#D8, 16#42, 16#01, 16#13, 16#88, 16#87,
|
||||||
|
16#08, 16#41, 16#00, 16#7D, 16#42, 16#01, 16#03, 16#84,
|
||||||
|
16#C1, 16#09, 16#64, 16#C1, 16#0A, 16#0F, 16#83, 16#0B,
|
||||||
|
16#41, 16#00, 16#00, 16#C4, 16#0D, 16#51, 16#82, 16#42,
|
||||||
|
16#8F, 16#C6, 16#0E, 16#2B, 16#30, 16#32, 16#3A, 16#30,
|
||||||
|
16#30, 16#C1, 16#10, 16#55>>,
|
||||||
R = emqx_lwm2m_tlv:parse(Data),
|
R = emqx_lwm2m_tlv:parse(Data),
|
||||||
Exp = [
|
Exp = [
|
||||||
#{tlv_object_instance => 16#00, value => [
|
#{tlv_object_instance => 16#00, value => [
|
||||||
|
|
@ -127,23 +161,16 @@ case05(_Config) ->
|
||||||
#{tlv_resource_with_value => 16#01, value => <<"Lightweight M2M Client">>},
|
#{tlv_resource_with_value => 16#01, value => <<"Lightweight M2M Client">>},
|
||||||
#{tlv_resource_with_value => 16#02, value => <<"345000123">>},
|
#{tlv_resource_with_value => 16#02, value => <<"345000123">>},
|
||||||
#{tlv_resource_with_value => 16#03, value => <<"1.0">>},
|
#{tlv_resource_with_value => 16#03, value => <<"1.0">>},
|
||||||
#{tlv_multiple_resource => 16#06, value => [
|
#{tlv_multiple_resource => 16#06, value => [#{tlv_resource_instance => 16#00, value => <<1>>},
|
||||||
#{tlv_resource_instance => 16#00, value => <<1>>},
|
#{tlv_resource_instance => 16#01, value => <<5>>}]},
|
||||||
#{tlv_resource_instance => 16#01, value => <<5>>}
|
#{tlv_multiple_resource => 16#07, value => [#{tlv_resource_instance => 16#00, value => <<16#0ED8:16>>},
|
||||||
]},
|
#{tlv_resource_instance => 16#01, value => <<16#1388:16>>}
|
||||||
#{tlv_multiple_resource => 16#07, value => [
|
|
||||||
#{tlv_resource_instance => 16#00, value => <<16#0ED8:16>>},
|
|
||||||
#{tlv_resource_instance => 16#01, value => <<16#1388:16>>}
|
|
||||||
]},
|
|
||||||
#{tlv_multiple_resource => 16#08, value => [
|
|
||||||
#{tlv_resource_instance => 16#00, value => <<16#7d>>},
|
|
||||||
#{tlv_resource_instance => 16#01, value => <<16#0384:16>>}
|
|
||||||
]},
|
]},
|
||||||
|
#{tlv_multiple_resource => 16#08, value => [#{tlv_resource_instance => 16#00, value => <<16#7d>>},
|
||||||
|
#{tlv_resource_instance => 16#01, value => <<16#0384:16>>}]},
|
||||||
#{tlv_resource_with_value => 16#09, value => <<16#64>>},
|
#{tlv_resource_with_value => 16#09, value => <<16#64>>},
|
||||||
#{tlv_resource_with_value => 16#0A, value => <<16#0F>>},
|
#{tlv_resource_with_value => 16#0A, value => <<16#0F>>},
|
||||||
#{tlv_multiple_resource => 16#0B, value => [
|
#{tlv_multiple_resource => 16#0B, value => [#{tlv_resource_instance => 16#00, value => <<16#00>>}]},
|
||||||
#{tlv_resource_instance => 16#00, value => <<16#00>>}
|
|
||||||
]},
|
|
||||||
#{tlv_resource_with_value => 16#0D, value => <<16#5182428F:32>>},
|
#{tlv_resource_with_value => 16#0D, value => <<16#5182428F:32>>},
|
||||||
#{tlv_resource_with_value => 16#0E, value => <<"+02:00">>},
|
#{tlv_resource_with_value => 16#0E, value => <<"+02:00">>},
|
||||||
#{tlv_resource_with_value => 16#10, value => <<"U">>}
|
#{tlv_resource_with_value => 16#10, value => <<"U">>}
|
||||||
|
|
@ -156,27 +183,25 @@ case05(_Config) ->
|
||||||
case06(_Config) ->
|
case06(_Config) ->
|
||||||
% 6.4.3.2 Multiple Object Instance Request Examples
|
% 6.4.3.2 Multiple Object Instance Request Examples
|
||||||
% B) Request on Multiple-Instances Object having 2 instances
|
% B) Request on Multiple-Instances Object having 2 instances
|
||||||
Data = <<16#08, 16#00, 16#0E, 16#C1, 16#00, 16#01, 16#C1, 16#01, 16#00, 16#83, 16#02, 16#41, 16#7F, 16#07, 16#C1, 16#03, 16#7F, 16#08, 16#02, 16#12, 16#C1, 16#00, 16#03, 16#C1, 16#01, 16#00, 16#87, 16#02, 16#41, 16#7F, 16#07, 16#61, 16#01, 16#36, 16#01, 16#C1, 16#03, 16#7F>>,
|
Data = <<16#08, 16#00, 16#0E, 16#C1, 16#00, 16#01, 16#C1, 16#01,
|
||||||
|
16#00, 16#83, 16#02, 16#41, 16#7F, 16#07, 16#C1, 16#03,
|
||||||
|
16#7F, 16#08, 16#02, 16#12, 16#C1, 16#00, 16#03, 16#C1,
|
||||||
|
16#01, 16#00, 16#87, 16#02, 16#41, 16#7F, 16#07, 16#61,
|
||||||
|
16#01, 16#36, 16#01, 16#C1, 16#03, 16#7F>>,
|
||||||
R = emqx_lwm2m_tlv:parse(Data),
|
R = emqx_lwm2m_tlv:parse(Data),
|
||||||
Exp = [
|
Exp = [#{tlv_object_instance => 16#00, value => [#{tlv_resource_with_value => 16#00, value => <<16#01>>},
|
||||||
#{tlv_object_instance => 16#00, value => [
|
#{tlv_resource_with_value => 16#01, value => <<16#00>>},
|
||||||
#{tlv_resource_with_value => 16#00, value => <<16#01>>},
|
#{tlv_multiple_resource => 16#02,
|
||||||
#{tlv_resource_with_value => 16#01, value => <<16#00>>},
|
value => [#{tlv_resource_instance => 16#7F, value => <<16#07>>}]},
|
||||||
#{tlv_multiple_resource => 16#02, value => [
|
#{tlv_resource_with_value => 16#03, value => <<16#7F>>}
|
||||||
#{tlv_resource_instance => 16#7F, value => <<16#07>>}
|
]},
|
||||||
]},
|
#{tlv_object_instance => 16#02, value => [#{tlv_resource_with_value => 16#00, value => <<16#03>>},
|
||||||
#{tlv_resource_with_value => 16#03, value => <<16#7F>>}
|
#{tlv_resource_with_value => 16#01, value => <<16#00>>},
|
||||||
]},
|
#{tlv_multiple_resource => 16#02,
|
||||||
#{tlv_object_instance => 16#02, value => [
|
value => [#{tlv_resource_instance => 16#7F, value => <<16#07>>},
|
||||||
#{tlv_resource_with_value => 16#00, value => <<16#03>>},
|
#{tlv_resource_instance => 16#0136, value => <<16#01>>}]},
|
||||||
#{tlv_resource_with_value => 16#01, value => <<16#00>>},
|
#{tlv_resource_with_value => 16#03, value => <<16#7F>>}]}
|
||||||
#{tlv_multiple_resource => 16#02, value => [
|
],
|
||||||
#{tlv_resource_instance => 16#7F, value => <<16#07>>},
|
|
||||||
#{tlv_resource_instance => 16#0136, value => <<16#01>>}
|
|
||||||
]},
|
|
||||||
#{tlv_resource_with_value => 16#03, value => <<16#7F>>}
|
|
||||||
]}
|
|
||||||
],
|
|
||||||
?assertEqual(Exp, R),
|
?assertEqual(Exp, R),
|
||||||
EncodedBinary = emqx_lwm2m_tlv:encode(Exp),
|
EncodedBinary = emqx_lwm2m_tlv:encode(Exp),
|
||||||
?assertEqual(EncodedBinary, Data).
|
?assertEqual(EncodedBinary, Data).
|
||||||
|
|
@ -184,15 +209,16 @@ case06(_Config) ->
|
||||||
case07(_Config) ->
|
case07(_Config) ->
|
||||||
% 6.4.3.2 Multiple Object Instance Request Examples
|
% 6.4.3.2 Multiple Object Instance Request Examples
|
||||||
% C) Request on Multiple-Instances Object having 1 instance only
|
% C) Request on Multiple-Instances Object having 1 instance only
|
||||||
Data = <<16#08, 16#00, 16#0F, 16#C1, 16#00, 16#01, 16#C4, 16#01, 16#00, 16#01, 16#51, 16#80, 16#C1, 16#06, 16#01, 16#C1, 16#07, 16#55>>,
|
Data = <<16#08, 16#00, 16#0F, 16#C1, 16#00, 16#01, 16#C4, 16#01,
|
||||||
|
16#00, 16#01, 16#51, 16#80, 16#C1, 16#06, 16#01, 16#C1,
|
||||||
|
16#07, 16#55>>,
|
||||||
R = emqx_lwm2m_tlv:parse(Data),
|
R = emqx_lwm2m_tlv:parse(Data),
|
||||||
Exp = [
|
Exp = [#{tlv_object_instance => 16#00,
|
||||||
#{tlv_object_instance => 16#00, value => [
|
value => [#{tlv_resource_with_value => 16#00, value => <<16#01>>},
|
||||||
#{tlv_resource_with_value => 16#00, value => <<16#01>>},
|
#{tlv_resource_with_value => 16#01, value => <<86400:32>>},
|
||||||
#{tlv_resource_with_value => 16#01, value => <<86400:32>>},
|
#{tlv_resource_with_value => 16#06, value => <<16#01>>},
|
||||||
#{tlv_resource_with_value => 16#06, value => <<16#01>>},
|
#{tlv_resource_with_value => 16#07, value => <<$U>>}]}
|
||||||
#{tlv_resource_with_value => 16#07, value => <<$U>>}]}
|
],
|
||||||
],
|
|
||||||
?assertEqual(Exp, R),
|
?assertEqual(Exp, R),
|
||||||
EncodedBinary = emqx_lwm2m_tlv:encode(Exp),
|
EncodedBinary = emqx_lwm2m_tlv:encode(Exp),
|
||||||
?assertEqual(EncodedBinary, Data).
|
?assertEqual(EncodedBinary, Data).
|
||||||
|
|
@ -200,16 +226,17 @@ case07(_Config) ->
|
||||||
case08(_Config) ->
|
case08(_Config) ->
|
||||||
% 6.4.3.3 Example of Request on an Object Instance containing an Object Link Resource
|
% 6.4.3.3 Example of Request on an Object Instance containing an Object Link Resource
|
||||||
% Example 1) request to Object 65 Instance 0: Read /65/0
|
% Example 1) request to Object 65 Instance 0: Read /65/0
|
||||||
Data = <<16#88, 16#00, 16#0C, 16#44, 16#00, 16#00, 16#42, 16#00, 16#00, 16#44, 16#01, 16#00, 16#42, 16#00, 16#01, 16#C8, 16#01, 16#0D, 16#38, 16#36, 16#31, 16#33, 16#38, 16#30, 16#30, 16#37, 16#35, 16#35, 16#35, 16#30, 16#30, 16#C4, 16#02, 16#12, 16#34, 16#56, 16#78>>,
|
Data = <<16#88, 16#00, 16#0C, 16#44, 16#00, 16#00, 16#42, 16#00,
|
||||||
|
16#00, 16#44, 16#01, 16#00, 16#42, 16#00, 16#01, 16#C8,
|
||||||
|
16#01, 16#0D, 16#38, 16#36, 16#31, 16#33, 16#38, 16#30,
|
||||||
|
16#30, 16#37, 16#35, 16#35, 16#35, 16#30, 16#30, 16#C4,
|
||||||
|
16#02, 16#12, 16#34, 16#56, 16#78>>,
|
||||||
R = emqx_lwm2m_tlv:parse(Data),
|
R = emqx_lwm2m_tlv:parse(Data),
|
||||||
Exp = [
|
Exp = [#{tlv_multiple_resource => 16#00, value => [#{tlv_resource_instance => 16#00, value => <<16#00, 16#42, 16#00, 16#00>>},
|
||||||
#{tlv_multiple_resource => 16#00, value => [
|
#{tlv_resource_instance => 16#01, value => <<16#00, 16#42, 16#00, 16#01>>}]},
|
||||||
#{tlv_resource_instance => 16#00, value => <<16#00, 16#42, 16#00, 16#00>>},
|
#{tlv_resource_with_value => 16#01, value => <<"8613800755500">>},
|
||||||
#{tlv_resource_instance => 16#01, value => <<16#00, 16#42, 16#00, 16#01>>}
|
#{tlv_resource_with_value => 16#02, value => <<16#12345678:32>>}
|
||||||
]},
|
],
|
||||||
#{tlv_resource_with_value => 16#01, value => <<"8613800755500">>},
|
|
||||||
#{tlv_resource_with_value => 16#02, value => <<16#12345678:32>>}
|
|
||||||
],
|
|
||||||
?assertEqual(Exp, R),
|
?assertEqual(Exp, R),
|
||||||
EncodedBinary = emqx_lwm2m_tlv:encode(Exp),
|
EncodedBinary = emqx_lwm2m_tlv:encode(Exp),
|
||||||
?assertEqual(EncodedBinary, Data).
|
?assertEqual(EncodedBinary, Data).
|
||||||
|
|
@ -217,21 +244,26 @@ case08(_Config) ->
|
||||||
case09(_Config) ->
|
case09(_Config) ->
|
||||||
% 6.4.3.3 Example of Request on an Object Instance containing an Object Link Resource
|
% 6.4.3.3 Example of Request on an Object Instance containing an Object Link Resource
|
||||||
% Example 2) request to Object 66: Read /66: TLV payload will contain 2 Object Instances
|
% Example 2) request to Object 66: Read /66: TLV payload will contain 2 Object Instances
|
||||||
Data = <<16#08, 16#00, 16#26, 16#C8, 16#00, 16#0B, 16#6D, 16#79, 16#53, 16#65, 16#72, 16#76, 16#69, 16#63, 16#65, 16#20, 16#31, 16#C8, 16#01, 16#0F, 16#49, 16#6E, 16#74, 16#65, 16#72, 16#6E, 16#65, 16#74, 16#2E, 16#31, 16#35, 16#2E, 16#32, 16#33, 16#34, 16#C4, 16#02, 16#00, 16#43, 16#00, 16#00, 16#08, 16#01, 16#26, 16#C8, 16#00, 16#0B, 16#6D, 16#79, 16#53, 16#65, 16#72, 16#76, 16#69, 16#63, 16#65, 16#20, 16#32, 16#C8, 16#01, 16#0F, 16#49, 16#6E, 16#74, 16#65, 16#72, 16#6E, 16#65, 16#74, 16#2E, 16#31, 16#35, 16#2E, 16#32, 16#33, 16#35, 16#C4, 16#02, 16#FF, 16#FF, 16#FF, 16#FF>>,
|
Data = <<16#08, 16#00, 16#26, 16#C8, 16#00, 16#0B, 16#6D, 16#79,
|
||||||
|
16#53, 16#65, 16#72, 16#76, 16#69, 16#63, 16#65, 16#20,
|
||||||
|
16#31, 16#C8, 16#01, 16#0F, 16#49, 16#6E, 16#74, 16#65,
|
||||||
|
16#72, 16#6E, 16#65, 16#74, 16#2E, 16#31, 16#35, 16#2E,
|
||||||
|
16#32, 16#33, 16#34, 16#C4, 16#02, 16#00, 16#43, 16#00,
|
||||||
|
16#00, 16#08, 16#01, 16#26, 16#C8, 16#00, 16#0B, 16#6D,
|
||||||
|
16#79, 16#53, 16#65, 16#72, 16#76, 16#69, 16#63, 16#65,
|
||||||
|
16#20, 16#32, 16#C8, 16#01, 16#0F, 16#49, 16#6E, 16#74,
|
||||||
|
16#65, 16#72, 16#6E, 16#65, 16#74, 16#2E, 16#31, 16#35,
|
||||||
|
16#2E, 16#32, 16#33, 16#35, 16#C4, 16#02, 16#FF, 16#FF,
|
||||||
|
16#FF, 16#FF>>,
|
||||||
R = emqx_lwm2m_tlv:parse(Data),
|
R = emqx_lwm2m_tlv:parse(Data),
|
||||||
Exp = [
|
Exp = [#{tlv_object_instance => 16#00, value => [#{tlv_resource_with_value => 16#00, value => <<"myService 1">>},
|
||||||
#{tlv_object_instance => 16#00, value => [
|
#{tlv_resource_with_value => 16#01, value => <<"Internet.15.234">>},
|
||||||
#{tlv_resource_with_value => 16#00, value => <<"myService 1">>},
|
#{tlv_resource_with_value => 16#02, value => <<16#00, 16#43, 16#00, 16#00>>}]},
|
||||||
#{tlv_resource_with_value => 16#01, value => <<"Internet.15.234">>},
|
#{tlv_object_instance => 16#01, value => [#{tlv_resource_with_value => 16#00, value => <<"myService 2">>},
|
||||||
#{tlv_resource_with_value => 16#02, value => <<16#00, 16#43, 16#00, 16#00>>}
|
#{tlv_resource_with_value => 16#01, value => <<"Internet.15.235">>},
|
||||||
]},
|
#{tlv_resource_with_value => 16#02, value => <<16#FF, 16#FF, 16#FF, 16#FF>>}
|
||||||
#{tlv_object_instance => 16#01, value => [
|
]}
|
||||||
#{tlv_resource_with_value => 16#00, value => <<"myService 2">>},
|
],
|
||||||
#{tlv_resource_with_value => 16#01, value => <<"Internet.15.235">>},
|
|
||||||
#{tlv_resource_with_value => 16#02, value => <<16#FF, 16#FF, 16#FF, 16#FF>>}
|
|
||||||
]}
|
|
||||||
],
|
|
||||||
?assertEqual(Exp, R),
|
?assertEqual(Exp, R),
|
||||||
EncodedBinary = emqx_lwm2m_tlv:encode(Exp),
|
EncodedBinary = emqx_lwm2m_tlv:encode(Exp),
|
||||||
?assertEqual(EncodedBinary, Data).
|
?assertEqual(EncodedBinary, Data).
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue