migrate system scanning logic to lib/

Signed-off-by: ahuston-0 <aliceghuston@gmail.com>
This commit is contained in:
2024-05-19 10:26:46 -04:00
committed by Alice Huston
parent 6b5dda1f39
commit 46aee20d9e
3 changed files with 49 additions and 49 deletions

View File

@ -31,7 +31,7 @@
#
# type:
# ls :: Path -> String -> [String]
ls = base: dir: lib.attrNames (builtins.readDir (base + "/${dir}"));
ls = dir: lib.attrNames (builtins.readDir dir);
# gets list of directories inside of a given directory
#
@ -42,11 +42,9 @@
# type:
# lsdir :: Path -> String -> [String]
lsdir =
base: dir:
if (builtins.pathExists (base + "/${dir}")) then
(lib.attrNames (
lib.filterAttrs (path: type: type == "directory") (builtins.readDir (base + "/${dir}"))
))
dir:
if (builtins.pathExists (dir)) then
(lib.attrNames (lib.filterAttrs (path: type: type == "directory") (builtins.readDir (dir))))
else
[ ];
@ -58,6 +56,6 @@
#
# type:
# fileList :: Path -> String -> [Path]
fileList = base: dir: map (file: base + "/${dir}/${file}") (ls base dir);
fileList = dir: map (file: dir + "/${file}") (ls dir);
};
}