71 lines
2.5 KiB
Nix
71 lines
2.5 KiB
Nix
let
|
|
pkgs = import /var/cache/nixpkgs-update/updatescript/nixpkgs { };
|
|
in
|
|
# code in the following let block was copied from nixos/nixpkgs under
|
|
# the MIT License
|
|
let
|
|
inherit (pkgs) lib;
|
|
|
|
/* Remove duplicate elements from the list based on some extracted value. O(n^2) complexity.
|
|
*/
|
|
nubOn = f: list:
|
|
if list == [ ] then
|
|
[ ]
|
|
else
|
|
let
|
|
x = lib.head list;
|
|
xs = lib.filter (p: f x != f p) (lib.drop 1 list);
|
|
in
|
|
[ x ] ++ nubOn f xs;
|
|
|
|
/* Recursively find all packages (derivations) in `pkgs` matching `cond` predicate.
|
|
|
|
Type: packagesWithPath :: AttrPath → (AttrPath → derivation → bool) → AttrSet → List<AttrSet{attrPath :: str; package :: derivation; }>
|
|
AttrPath :: [str]
|
|
|
|
The packages will be returned as a list of named pairs comprising of:
|
|
- attrPath: stringified attribute path (based on `rootPath`)
|
|
- package: corresponding derivation
|
|
*/
|
|
packagesWithPath = rootPath: cond: pkgs:
|
|
let
|
|
packagesWithPathInner = path: pathContent:
|
|
let
|
|
result = builtins.tryEval pathContent;
|
|
|
|
dedupResults = lst: nubOn ({ package, attrPath }: package.updateScript) (lib.concatLists lst);
|
|
in
|
|
if result.success then
|
|
let
|
|
evaluatedPathContent = result.value;
|
|
in
|
|
if lib.isDerivation evaluatedPathContent then
|
|
lib.optional (cond path evaluatedPathContent) { attrPath = lib.concatStringsSep "." path; package = evaluatedPathContent; }
|
|
else if lib.isAttrs evaluatedPathContent then
|
|
# If user explicitly points to an attrSet or it is marked for recursion, we recur.
|
|
if path == rootPath || evaluatedPathContent.recurseForDerivations or false || evaluatedPathContent.recurseForRelease or false then
|
|
dedupResults (lib.mapAttrsToList (name: elem: packagesWithPathInner (path ++ [ name ]) elem) evaluatedPathContent)
|
|
else [ ]
|
|
else [ ]
|
|
else [ ];
|
|
in
|
|
packagesWithPathInner rootPath pkgs;
|
|
|
|
/* Recursively find all packages (derivations) in `pkgs` matching `cond` predicate.
|
|
*/
|
|
packagesWith = packagesWithPath [ ];
|
|
|
|
/* Recursively find all packages in `pkgs` with updateScript matching given predicate.
|
|
*/
|
|
packagesWithUpdateScriptMatchingPredicate = cond:
|
|
packagesWith (path: pkg: builtins.hasAttr "updateScript" pkg && cond path pkg);
|
|
|
|
in
|
|
|
|
let
|
|
|
|
allPackagesWithUpdateScript = packagesWithUpdateScriptMatchingPredicate (_path: _package: true) pkgs;
|
|
|
|
in
|
|
|
|
lib.concatMapStrings (p: "${p.attrPath} 0 1\n") allPackagesWithUpdateScript
|