emqx/test/emqx_json_SUITE.erl

125 lines
5.4 KiB
Erlang

%%--------------------------------------------------------------------
%% Copyright (c) 2020 EMQ Technologies Co., Ltd. All Rights Reserved.
%%
%% Licensed under the Apache License, Version 2.0 (the "License");
%% you may not use this file except in compliance with the License.
%% You may obtain a copy of the License at
%%
%% http://www.apache.org/licenses/LICENSE-2.0
%%
%% Unless required by applicable law or agreed to in writing, software
%% distributed under the License is distributed on an "AS IS" BASIS,
%% WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
%% See the License for the specific language governing permissions and
%% limitations under the License.
%%--------------------------------------------------------------------
-module(emqx_json_SUITE).
-compile(export_all).
-compile(nowarn_export_all).
-include_lib("eunit/include/eunit.hrl").
-import(emqx_json,
[ encode/1
, decode/1
, decode/2
]).
%% copied jiffy/readme
%%--------------------------------------------------------------------
%% Erlang JSON Erlang
%% -------------------------------------------------------------------
%%
%% null -> null -> null
%% true -> true -> true
%% false -> false -> false
%% "hi" -> [104, 105] -> [104, 105]
%% <<"hi">> -> "hi" -> <<"hi">>
%% hi -> "hi" -> <<"hi">>
%% 1 -> 1 -> 1
%% 1.25 -> 1.25 -> 1.25
%% [] -> [] -> []
%% [true, 1.0] -> [true, 1.0] -> [true, 1.0]
%% {[]} -> {} -> {[]}
%% {[{foo, bar}]} -> {"foo": "bar"} -> {[{<<"foo">>, <<"bar">>}]}
%% {[{<<"foo">>, <<"bar">>}]} -> {"foo": "bar"} -> {[{<<"foo">>, <<"bar">>}]}
%% #{<<"foo">> => <<"bar">>} -> {"foo": "bar"} -> #{<<"foo">> => <<"bar">>}
%%--------------------------------------------------------------------
%% but in emqx_json, we use the jsx style for it:
%%--------------------------------------------------------------------
%% Erlang JSON Erlang
%% -------------------------------------------------------------------
%%
%% null -> null -> null
%% true -> true -> true
%% false -> false -> false
%% "hi" -> [104, 105] -> [104, 105]
%% <<"hi">> -> "hi" -> <<"hi">>
%% hi -> "hi" -> <<"hi">>
%% 1 -> 1 -> 1
%% 1.25 -> 1.25 -> 1.25
%% [] -> [] -> []
%% [true, 1.0] -> [true, 1.0] -> [true, 1.0]
%m [{}] -> {} -> [{}]
%a [{<<"foo">>, <<"bar">>}] -> {"foo": "bar"} -> [{<<"foo">>, <<"bar">>}]
%% #{<<"foo">> => <<"bar">>} -> {"foo": "bar"} -> #{<<"foo">> => <<"bar">>}
%m #{<<"foo">> => [{}]} NOT SUPPORT
%%--------------------------------------------------------------------
all() -> emqx_ct:all(?MODULE).
t_decode_encode(_) ->
null = decode(encode(null)),
true = decode(encode(true)),
false = decode(encode(false)),
"hi" = decode(encode("hi")),
<<"hi">> = decode(encode(hi)),
1 = decode(encode(1)),
1.25 = decode(encode(1.25)),
[] = decode(encode([])),
[true, 1] = decode(encode([true, 1])),
[{}] = decode(encode([{}])),
[{<<"foo">>, <<"bar">>}] = decode(encode([{foo, bar}])),
[{<<"foo">>, <<"bar">>}] = decode(encode([{<<"foo">>, <<"bar">>}])),
[[{<<"foo">>, <<"bar">>}]] = decode(encode([[{<<"foo">>, <<"bar">>}]])),
[[{<<"foo">>, <<"bar">>},
{<<"a">>, <<"b">>}],
[{<<"x">>, <<"y">>}]] = decode(encode([[{<<"foo">>, <<"bar">>},
{<<"a">>, <<"b">>}],
[{<<"x">>, <<"y">>}]])),
#{<<"foo">> := <<"bar">>} = decode(encode(#{<<"foo">> => <<"bar">>}), [return_maps]),
JsonText = <<"{\"bool\":true,\"int\":10,\"foo\":\"bar\"}">>,
JsonMaps = #{<<"bool">> => true,
<<"int">> => 10,
<<"foo">> => <<"bar">>
},
?assertEqual(JsonText, encode({decode(JsonText)})),
?assertEqual(JsonMaps, decode(JsonText, [return_maps])).
t_safe_decode_encode(_) ->
safe_encode_decode(null),
safe_encode_decode(true),
safe_encode_decode(false),
"hi" = safe_encode_decode("hi"),
<<"hi">> = safe_encode_decode(hi),
1 = safe_encode_decode(1),
1.25 = safe_encode_decode(1.25),
[] = safe_encode_decode([]),
[true, 1] = safe_encode_decode([true, 1]),
[{}] = decode(encode([{}])),
[{<<"foo">>, <<"bar">>}] = safe_encode_decode([{foo, bar}]),
[{<<"foo">>, <<"bar">>}] = safe_encode_decode([{<<"foo">>, <<"bar">>}]),
[[{<<"foo">>, <<"bar">>}]] = safe_encode_decode([[{<<"foo">>, <<"bar">>}]]),
{ok, Json} = emqx_json:safe_encode(#{<<"foo">> => <<"bar">>}),
{ok, #{<<"foo">> := <<"bar">>}} = emqx_json:safe_decode(Json, [return_maps]).
safe_encode_decode(Term) ->
{ok, Json} = emqx_json:safe_encode(Term),
case emqx_json:safe_decode(Json) of
{ok, {NTerm}} -> NTerm;
{ok, NTerm} -> NTerm
end.