diff --git a/apps/emqx_gateway/test/emqx_tlv_SUITE.erl b/apps/emqx_gateway/test/emqx_tlv_SUITE.erl index a37eeb7d2..1191d748e 100644 --- a/apps/emqx_gateway/test/emqx_tlv_SUITE.erl +++ b/apps/emqx_gateway/test/emqx_tlv_SUITE.erl @@ -25,7 +25,13 @@ -include_lib("emqx_gateway/src/coap/include/emqx_coap.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) -> Config. @@ -33,9 +39,14 @@ init_per_suite(Config) -> end_per_suite(Config) -> Config. +%%-------------------------------------------------------------------- +%% Cases +%%-------------------------------------------------------------------- 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), Exp = [ #{tlv_resource_with_value => 16#00, value => <<"Open Mobile Alliance">>} @@ -47,24 +58,28 @@ case01(_Config) -> case02(_Config) -> Data = <<16#86, 16#06, 16#41, 16#00, 16#01, 16#41, 16#01, 16#05>>, R = emqx_lwm2m_tlv:parse(Data), - Exp = [ - #{tlv_multiple_resource => 16#06, value => [ - #{tlv_resource_instance => 16#00, value => <<1>>}, - #{tlv_resource_instance => 16#01, value => <<5>>} - ]} - ], + Exp = [ #{tlv_multiple_resource => 16#06, + value => [ #{tlv_resource_instance => 16#00, value => <<1>>}, + #{tlv_resource_instance => 16#01, value => <<5>>}]} + ], ?assertEqual(Exp, R), EncodedBinary = emqx_lwm2m_tlv:encode(Exp), ?assertEqual(EncodedBinary, Data). 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), - Exp = [ - #{tlv_resource_with_value => 16#00, value => <<"Open Mobile Alliance">>}, + Exp = [ #{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#02, value => <<"345000123">>} - ], + ], ?assertEqual(Exp, R), EncodedBinary = emqx_lwm2m_tlv:encode(Exp), ?assertEqual(EncodedBinary, Data). @@ -72,42 +87,46 @@ case03(_Config) -> case03_0(_Config) -> 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), - Exp = [ - #{tlv_multiple_resource => 16#02, value => [ - #{tlv_resource_instance => 16#7F, value => <<16#07>>}, - #{tlv_resource_instance => 16#0136, value => <<16#01>>} - ]} - ], + Exp = [ #{tlv_multiple_resource => 16#02, + value => [ #{tlv_resource_instance => 16#7F, value => <<16#07>>}, + #{tlv_resource_instance => 16#0136, value => <<16#01>>} + ]} + ], ?assertEqual(Exp, R), EncodedBinary = emqx_lwm2m_tlv:encode(Exp), ?assertEqual(EncodedBinary, Data). case04(_Config) -> % 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), - Exp = [ - #{tlv_resource_with_value => 16#00, value => <<"Open Mobile Alliance">>}, + Exp = [ #{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#02, value => <<"345000123">>}, #{tlv_resource_with_value => 16#03, value => <<"1.0">>}, - #{tlv_multiple_resource => 16#06, value => [ - #{tlv_resource_instance => 16#00, value => <<1>>}, - #{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#08, value => [ - #{tlv_resource_instance => 16#00, value => <<16#7d>>}, - #{tlv_resource_instance => 16#01, value => <<16#0384:16>>} - ]}, + #{tlv_multiple_resource => 16#06, value => [#{tlv_resource_instance => 16#00, value => <<1>>}, + #{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#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#0A, value => <<16#0F>>}, - #{tlv_multiple_resource => 16#0B, value => [ - #{tlv_resource_instance => 16#00, value => <<16#00>>} - ]}, + #{tlv_multiple_resource => 16#0B, value => [#{tlv_resource_instance => 16#00, value => <<16#00>>}]}, #{tlv_resource_with_value => 16#0D, value => <<16#5182428F:32>>}, #{tlv_resource_with_value => 16#0E, value => <<"+02:00">>}, #{tlv_resource_with_value => 16#10, value => <<"U">>} @@ -119,7 +138,22 @@ case04(_Config) -> case05(_Config) -> % 6.4.3.2 Multiple Object Instance Request Examples % 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), Exp = [ #{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#02, value => <<"345000123">>}, #{tlv_resource_with_value => 16#03, value => <<"1.0">>}, - #{tlv_multiple_resource => 16#06, value => [ - #{tlv_resource_instance => 16#00, value => <<1>>}, - #{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#08, value => [ - #{tlv_resource_instance => 16#00, value => <<16#7d>>}, - #{tlv_resource_instance => 16#01, value => <<16#0384:16>>} + #{tlv_multiple_resource => 16#06, value => [#{tlv_resource_instance => 16#00, value => <<1>>}, + #{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#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#0A, value => <<16#0F>>}, - #{tlv_multiple_resource => 16#0B, value => [ - #{tlv_resource_instance => 16#00, value => <<16#00>>} - ]}, + #{tlv_multiple_resource => 16#0B, value => [#{tlv_resource_instance => 16#00, value => <<16#00>>}]}, #{tlv_resource_with_value => 16#0D, value => <<16#5182428F:32>>}, #{tlv_resource_with_value => 16#0E, value => <<"+02:00">>}, #{tlv_resource_with_value => 16#10, value => <<"U">>} @@ -156,27 +183,25 @@ case05(_Config) -> case06(_Config) -> % 6.4.3.2 Multiple Object Instance Request Examples % 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), - Exp = [ - #{tlv_object_instance => 16#00, value => [ - #{tlv_resource_with_value => 16#00, value => <<16#01>>}, - #{tlv_resource_with_value => 16#01, value => <<16#00>>}, - #{tlv_multiple_resource => 16#02, value => [ - #{tlv_resource_instance => 16#7F, value => <<16#07>>} - ]}, - #{tlv_resource_with_value => 16#03, value => <<16#7F>>} - ]}, - #{tlv_object_instance => 16#02, value => [ - #{tlv_resource_with_value => 16#00, value => <<16#03>>}, - #{tlv_resource_with_value => 16#01, value => <<16#00>>}, - #{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>>} - ]} - ], + Exp = [#{tlv_object_instance => 16#00, value => [#{tlv_resource_with_value => 16#00, value => <<16#01>>}, + #{tlv_resource_with_value => 16#01, value => <<16#00>>}, + #{tlv_multiple_resource => 16#02, + value => [#{tlv_resource_instance => 16#7F, value => <<16#07>>}]}, + #{tlv_resource_with_value => 16#03, value => <<16#7F>>} + ]}, + #{tlv_object_instance => 16#02, value => [#{tlv_resource_with_value => 16#00, value => <<16#03>>}, + #{tlv_resource_with_value => 16#01, value => <<16#00>>}, + #{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), EncodedBinary = emqx_lwm2m_tlv:encode(Exp), ?assertEqual(EncodedBinary, Data). @@ -184,15 +209,16 @@ case06(_Config) -> case07(_Config) -> % 6.4.3.2 Multiple Object Instance Request Examples % 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), - Exp = [ - #{tlv_object_instance => 16#00, value => [ - #{tlv_resource_with_value => 16#00, value => <<16#01>>}, - #{tlv_resource_with_value => 16#01, value => <<86400:32>>}, - #{tlv_resource_with_value => 16#06, value => <<16#01>>}, - #{tlv_resource_with_value => 16#07, value => <<$U>>}]} - ], + Exp = [#{tlv_object_instance => 16#00, + value => [#{tlv_resource_with_value => 16#00, value => <<16#01>>}, + #{tlv_resource_with_value => 16#01, value => <<86400:32>>}, + #{tlv_resource_with_value => 16#06, value => <<16#01>>}, + #{tlv_resource_with_value => 16#07, value => <<$U>>}]} + ], ?assertEqual(Exp, R), EncodedBinary = emqx_lwm2m_tlv:encode(Exp), ?assertEqual(EncodedBinary, Data). @@ -200,16 +226,17 @@ case07(_Config) -> case08(_Config) -> % 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 - 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), - Exp = [ - #{tlv_multiple_resource => 16#00, value => [ - #{tlv_resource_instance => 16#00, value => <<16#00, 16#42, 16#00, 16#00>>}, - #{tlv_resource_instance => 16#01, value => <<16#00, 16#42, 16#00, 16#01>>} - ]}, - #{tlv_resource_with_value => 16#01, value => <<"8613800755500">>}, - #{tlv_resource_with_value => 16#02, value => <<16#12345678:32>>} - ], + Exp = [#{tlv_multiple_resource => 16#00, value => [#{tlv_resource_instance => 16#00, value => <<16#00, 16#42, 16#00, 16#00>>}, + #{tlv_resource_instance => 16#01, value => <<16#00, 16#42, 16#00, 16#01>>}]}, + #{tlv_resource_with_value => 16#01, value => <<"8613800755500">>}, + #{tlv_resource_with_value => 16#02, value => <<16#12345678:32>>} + ], ?assertEqual(Exp, R), EncodedBinary = emqx_lwm2m_tlv:encode(Exp), ?assertEqual(EncodedBinary, Data). @@ -217,21 +244,26 @@ case08(_Config) -> case09(_Config) -> % 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 - 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), - Exp = [ - #{tlv_object_instance => 16#00, value => [ - #{tlv_resource_with_value => 16#00, value => <<"myService 1">>}, - #{tlv_resource_with_value => 16#01, value => <<"Internet.15.234">>}, - #{tlv_resource_with_value => 16#02, value => <<16#00, 16#43, 16#00, 16#00>>} - ]}, - #{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>>} - ]} - ], + Exp = [#{tlv_object_instance => 16#00, value => [#{tlv_resource_with_value => 16#00, value => <<"myService 1">>}, + #{tlv_resource_with_value => 16#01, value => <<"Internet.15.234">>}, + #{tlv_resource_with_value => 16#02, value => <<16#00, 16#43, 16#00, 16#00>>}]}, + #{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), EncodedBinary = emqx_lwm2m_tlv:encode(Exp), ?assertEqual(EncodedBinary, Data). -