25'ten fazla konu seçemezsiniz Konular bir harf veya rakamla başlamalı, kısa çizgiler ('-') içerebilir ve en fazla 35 karakter uzunluğunda olabilir.
 
 
 
 

102 satır
2.6 KiB

#! /usr/bin/env escript
% This file is part of Jiffy released under the MIT license.
% See the LICENSE file for more information.
main([]) ->
code:add_pathz("ebin"),
code:add_pathz("test"),
etap:plan(76),
util:test_good(good()),
util:test_errors(errors()),
test_utf8(utf8_cases()),
etap:end_tests().
good() ->
[
{<<"\"\"">>, <<"">>},
{<<"\"0\"">>, <<"0">>},
{<<"\"foo\"">>, <<"foo">>},
{<<"\"\\\"foobar\\\"\"">>, <<"\"foobar\"">>},
{<<"\"\\n\\n\\n\"">>, <<"\n\n\n">>},
{<<"\"\\\" \\b\\f\\r\\n\\t\\\"\"">>, <<"\" \b\f\r\n\t\"">>},
{<<"\"foo\\u0005bar\"">>, <<"foo", 5, "bar">>},
{
<<"\"\\uD834\\uDD1E\"">>,
<<240, 157, 132, 158>>,
<<34, 240, 157, 132, 158, 34>>
}
].
errors() ->
[
<<"\"foo">>,
<<"\"", 0, "\"">>,
<<"\"\\g\"">>,
<<"\"\\uFFFF\"">>,
<<"\"\\uD834foo\\uDD1E\"">>,
% CouchDB-345
<<34,78,69,73,77,69,78,32,70,216,82,82,32,70,65,69,78,33,34>>
].
test_utf8([]) ->
ok;
test_utf8([Case | Rest]) ->
etap:fun_is(
fun({error, invalid_string}) -> true; (Else) -> Else end,
(catch jiffy:encode(Case)),
lists:flatten(io_lib:format("Invalid utf-8: ~p", [Case]))
),
Case2 = <<34, Case/binary, 34>>,
etap:fun_is(
fun({error, {_, invalid_string}}) -> true; (Else) -> Else end,
(catch jiffy:decode(Case2)),
lists:flatten(io_lib:format("Invalid utf-8: ~p", [Case2]))
),
test_utf8(Rest).
utf8_cases() ->
[
% Stray continuation byte
<<16#C2, 16#81, 16#80>>,
<<"foo", 16#80, "bar">>,
% Not enough extension bytes
<<16#C0>>,
<<16#E0>>,
<<16#E0, 16#80>>,
<<16#F0>>,
<<16#F0, 16#80>>,
<<16#F0, 16#80, 16#80>>,
<<16#F8>>,
<<16#F8, 16#80>>,
<<16#F8, 16#80, 16#80>>,
<<16#F8, 16#80, 16#80, 16#80>>,
<<16#FC>>,
<<16#FC, 16#80>>,
<<16#FC, 16#80, 16#80>>,
<<16#FC, 16#80, 16#80, 16#80>>,
<<16#FC, 16#80, 16#80, 16#80, 16#80>>,
% No data in high bits.
<<16#C0, 16#80>>,
<<16#C1, 16#80>>,
<<16#E0, 16#80, 16#80>>,
<<16#E0, 16#90, 16#80>>,
<<16#F0, 16#80, 16#80, 16#80>>,
<<16#F0, 16#88, 16#80, 16#80>>,
<<16#F8, 16#80, 16#80, 16#80, 16#80>>,
<<16#F8, 16#84, 16#80, 16#80, 16#80>>,
<<16#FC, 16#80, 16#80, 16#80, 16#80, 16#80>>,
<<16#FC, 16#82, 16#80, 16#80, 16#80, 16#80>>
].