-module(polly_ffi).
-export([
    readdir/1,
    lstat/1
]).
-include_lib("kernel/include/file.hrl").

readdir(Dir) ->
    case file:list_dir(Dir) of
        {ok, Filenames} ->
            {ok, [unicode:characters_to_binary(Filename) || Filename <- Filenames]};

        {error, Reason} ->
            {error, Reason}
    end.

lstat(Path) ->
    file:read_link_info(Path, [{time, posix}]).