Current section
Files
Jump to
Current section
Files
test/jiffy_21_naughty_strings_tests.erl
% This file is part of Jiffy released under the MIT license.
% See the LICENSE file for more information.
% Test the Big List of Naughty Strings (BLNS)
% https://github.com/minimaxir/big-list-of-naughty-strings
-module(jiffy_21_naughty_strings_tests).
-include_lib("eunit/include/eunit.hrl").
-include("jiffy_util.hrl").
naughty_strings_test() ->
lists:foreach(fun t_string/1, load_strings()).
t_string(String) ->
?assertEqual(String, jiffy:decode(jiffy:encode(String))),
ForceEnc = jiffy:encode(String, [force_utf8]),
?assertEqual(String, jiffy:decode(ForceEnc)).
load_strings() ->
FilePath = cases_path("blns.txt"),
{ok, Binary} = file:read_file(FilePath),
Lines = binary:split(Binary, <<"\n">>, [global]),
% Skip blank lines and comments
[Line || Line <- Lines, byte_size(Line) > 0, binary:first(Line) =/= $#].