chore: make elvis checking happy

This commit is contained in:
JianBo He 2024-01-25 20:53:10 +08:00
parent e65cfb836c
commit fed512689a
1 changed files with 30 additions and 41 deletions

View File

@ -78,6 +78,8 @@
{<<"is_superuser">>, atom} {<<"is_superuser">>, atom}
]). ]).
-elvis([{elvis_style, nesting_level, disable}]).
%%------------------------------------------------------------------------------ %%------------------------------------------------------------------------------
%% Mnesia bootstrap %% Mnesia bootstrap
%%------------------------------------------------------------------------------ %%------------------------------------------------------------------------------
@ -175,37 +177,25 @@ import_users({PasswordType, Filename, FileData}, State) ->
Convertor = convertor(PasswordType, State), Convertor = convertor(PasswordType, State),
try try
{_NewUsersCnt, Users} = parse_import_users(Filename, FileData, Convertor), {_NewUsersCnt, Users} = parse_import_users(Filename, FileData, Convertor),
try case do_import_users(Users) of
case do_import_users(Users) of ok ->
ok -> ok; ok;
{error, Reason} -> error(Reason) {error, Reason} ->
end
catch
error:Reason1:Stk ->
?SLOG(
warning,
#{
msg => "import_users_failed",
type => PasswordType,
filename => Filename,
stacktrace => Stk
}
),
_ = do_clean_imported_users(Users), _ = do_clean_imported_users(Users),
{error, Reason1} error(Reason)
end end
catch catch
error:Reason2:Stk2 -> error:Reason1:Stk ->
?SLOG( ?SLOG(
warning, warning,
#{ #{
msg => "import_users_failed", msg => "import_users_failed",
type => PasswordType, type => PasswordType,
filename => Filename, filename => Filename,
stacktrace => Stk2 stacktrace => Stk
} }
), ),
{error, Reason2} {error, Reason1}
end. end.
do_import_users(Users) -> do_import_users(Users) ->
@ -514,28 +504,27 @@ reader(json, Data, Convertor) when is_binary(Data) ->
%% Example: data/user-credentials.csv %% Example: data/user-credentials.csv
reader(csv, Data, Convertor) when is_binary(Data) -> reader(csv, Data, Convertor) when is_binary(Data) ->
CSVData = csv_data(Data), CSVData = csv_data(Data),
Reader = fun _Iter(Headers, Lines) ->
case csv_read_line(Lines) of
{ok, Line, Rest} ->
%% XXX: not support ' ' for a field?
Fields = binary:split(Line, [<<",">>, <<" ">>, <<"\n">>], [
global, trim_all
]),
case length(Fields) == length(Headers) of
true ->
User = maps:from_list(lists:zip(Headers, Fields)),
{Convertor(User), fun() -> _Iter(Headers, Rest) end};
false ->
error(bad_format)
end;
eof ->
eof
end
end,
case get_csv_header(CSVData) of case get_csv_header(CSVData) of
{ok, Headers, CSVLines} -> {ok, CSVHeaders, CSVLines} ->
Reader = fun() -> Reader(CSVHeaders, CSVLines) end;
fun _Iter(Lines) ->
case csv_read_line(Lines) of
{ok, Line, Rest} ->
%% XXX: not support ' ' for a field?
Fields = binary:split(Line, [<<",">>, <<" ">>, <<"\n">>], [
global, trim_all
]),
case length(Fields) == length(Headers) of
true ->
User = maps:from_list(lists:zip(Headers, Fields)),
{Convertor(User), fun() -> _Iter(Rest) end};
false ->
error(bad_format)
end;
eof ->
eof
end
end,
fun() -> Reader(CSVLines) end;
{error, Reason} -> {error, Reason} ->
error(Reason) error(Reason)
end; end;