26 lines
836 B
Nix
26 lines
836 B
Nix
{lib, ...}: let
|
|
inherit (lib.lists) any count;
|
|
inherit (lib.attrsets) filterAttrs listToAttrs mapAttrs' mapAttrsToList;
|
|
in rec {
|
|
# attrsToList
|
|
attrsToList = attrs:
|
|
mapAttrsToList (name: value: {inherit name value;}) attrs;
|
|
|
|
# mapFilterAttrs ::
|
|
# (name -> value -> bool)
|
|
# (name -> value -> { name = any; value = any; })
|
|
# attrs
|
|
mapFilterAttrs = pred: f: attrs: filterAttrs pred (mapAttrs' f attrs);
|
|
|
|
# Generate an attribute set by mapping a function over a list of values.
|
|
genAttrs' = values: f: listToAttrs (map f values);
|
|
|
|
# anyAttrs :: (name -> value -> bool) attrs
|
|
anyAttrs = pred: attrs:
|
|
any (attr: pred attr.name attr.value) (attrsToList attrs);
|
|
|
|
# countAttrs :: (name -> value -> bool) attrs
|
|
countAttrs = pred: attrs:
|
|
count (attr: pred attr.name attr.value) (attrsToList attrs);
|
|
}
|