umgeher/erlware_commons
0
Fork 0
Code Issues Pull requests Releases Activity

Merge pull request #166 from ariel-anieli/pr-typo-checksums-ec_file

Browse source 
[src/ec_file.erl] Factorization & typos, in sha1sum/1 & md5sum/1
This commit is contained in:
Fred Hebert 2024-01-08 11:58:18 -05:00 • committed by GitHub
commit 952a1d2bc6
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
1 changed files with 10 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

17
src/ec_file.erl
View file

@ -139,24 +139,27 @@ try_write_owner(To, #file_info{uid=OwnerId}) ->
try_write_group(To, #file_info{gid=OwnerId}) ->
file:write_file_info(To, #file_info{gid=OwnerId}).
%% @doc return an md5 checksum string or a binary. Same as unix utility of
%% same name.
%% @doc return the MD5 digest of a string or a binary,
%% named after the UNIX utility.
-spec md5sum(string() | binary()) -> string().
md5sum(Value) ->
hex(binary_to_list(erlang:md5(Value))).
bin_to_hex(erlang:md5(Value)).
%% @doc return an sha1sum checksum string or a binary. Same as unix utility of
%% same name.
%% @doc return the SHA-1 digest of a string or a binary,
%% named after the UNIX utility.
-ifdef(deprecated_crypto).
-spec sha1sum(string() | binary()) -> string().
sha1sum(Value) ->
hex(binary_to_list(crypto:sha(Value))).
bin_to_hex(crypto:sha(Value)).
-else.
-spec sha1sum(string() | binary()) -> string().
sha1sum(Value) ->
hex(binary_to_list(crypto:hash(sha, Value))).
bin_to_hex(crypto:hash(sha, Value)).
-endif.
bin_to_hex(Bin) ->
hex(binary_to_list(Bin)).
%% @doc delete a file. Use the recursive option for directories.
%% <pre>
%% Example: remove("./tmp_dir", [recursive]).