1/*
2 To run:
3
4 nix-shell maintainers/scripts/update.nix
5
6 See https://nixos.org/manual/nixpkgs/unstable/#var-passthru-updateScript
7*/
8{ package ? null
9, maintainer ? null
10, predicate ? null
11, path ? null
12, max-workers ? null
13, include-overlays ? false
14, keep-going ? null
15, commit ? null
16}:
17
18let
19 pkgs = import ./../../default.nix (
20 if include-overlays == false then
21 { overlays = []; }
22 else if include-overlays == true then
23 { } # Let Nixpkgs include overlays impurely.
24 else { overlays = include-overlays; }
25 );
26
27 inherit (pkgs) lib;
28
29 /* Remove duplicate elements from the list based on some extracted value. O(n^2) complexity.
30 */
31 nubOn = f: list:
32 if list == [] then
33 []
34 else
35 let
36 x = lib.head list;
37 xs = lib.filter (p: f x != f p) (lib.drop 1 list);
38 in
39 [x] ++ nubOn f xs;
40
41 /* Recursively find all packages (derivations) in `pkgs` matching `cond` predicate.
42
43 Type: packagesWithPath :: AttrPath → (AttrPath → derivation → bool) → AttrSet → List<AttrSet{attrPath :: str; package :: derivation; }>
44 AttrPath :: [str]
45
46 The packages will be returned as a list of named pairs comprising of:
47 - attrPath: stringified attribute path (based on `rootPath`)
48 - package: corresponding derivation
49 */
50 packagesWithPath = rootPath: cond: pkgs:
51 let
52 packagesWithPathInner = path: pathContent:
53 let
54 result = builtins.tryEval pathContent;
55
56 somewhatUniqueRepresentant =
57 { package, attrPath }: {
58 inherit (package) updateScript;
59 # Some updaters use the same `updateScript` value for all packages.
60 # Also compare `meta.description`.
61 position = package.meta.position or null;
62 # We cannot always use `meta.position` since it might not be available
63 # or it might be shared among multiple packages.
64 };
65
66 dedupResults = lst: nubOn somewhatUniqueRepresentant (lib.concatLists lst);
67 in
68 if result.success then
69 let
70 evaluatedPathContent = result.value;
71 in
72 if lib.isDerivation evaluatedPathContent then
73 lib.optional (cond path evaluatedPathContent) { attrPath = lib.concatStringsSep "." path; package = evaluatedPathContent; }
74 else if lib.isAttrs evaluatedPathContent then
75 # If user explicitly points to an attrSet or it is marked for recursion, we recur.
76 if path == rootPath || evaluatedPathContent.recurseForDerivations or false || evaluatedPathContent.recurseForRelease or false then
77 dedupResults (lib.mapAttrsToList (name: elem: packagesWithPathInner (path ++ [name]) elem) evaluatedPathContent)
78 else []
79 else []
80 else [];
81 in
82 packagesWithPathInner rootPath pkgs;
83
84 /* Recursively find all packages (derivations) in `pkgs` matching `cond` predicate.
85 */
86 packagesWith = packagesWithPath [];
87
88 /* Recursively find all packages in `pkgs` with updateScript matching given predicate.
89 */
90 packagesWithUpdateScriptMatchingPredicate = cond:
91 packagesWith (path: pkg: builtins.hasAttr "updateScript" pkg && cond path pkg);
92
93 /* Recursively find all packages in `pkgs` with updateScript by given maintainer.
94 */
95 packagesWithUpdateScriptAndMaintainer = maintainer':
96 let
97 maintainer =
98 if ! builtins.hasAttr maintainer' lib.maintainers then
99 builtins.throw "Maintainer with name `${maintainer'} does not exist in `maintainers/maintainer-list.nix`."
100 else
101 builtins.getAttr maintainer' lib.maintainers;
102 in
103 packagesWithUpdateScriptMatchingPredicate (path: pkg:
104 (if builtins.hasAttr "maintainers" pkg.meta
105 then (if builtins.isList pkg.meta.maintainers
106 then builtins.elem maintainer pkg.meta.maintainers
107 else maintainer == pkg.meta.maintainers
108 )
109 else false
110 )
111 );
112
113 /* Recursively find all packages under `path` in `pkgs` with updateScript.
114 */
115 packagesWithUpdateScript = path: pkgs:
116 let
117 prefix = lib.splitString "." path;
118 pathContent = lib.attrByPath prefix null pkgs;
119 in
120 if pathContent == null then
121 builtins.throw "Attribute path `${path}` does not exist."
122 else
123 packagesWithPath prefix (path: pkg: builtins.hasAttr "updateScript" pkg)
124 pathContent;
125
126 /* Find a package under `path` in `pkgs` and require that it has an updateScript.
127 */
128 packageByName = path: pkgs:
129 let
130 package = lib.attrByPath (lib.splitString "." path) null pkgs;
131 in
132 if package == null then
133 builtins.throw "Package with an attribute name `${path}` does not exist."
134 else if ! builtins.hasAttr "updateScript" package then
135 builtins.throw "Package with an attribute name `${path}` does not have a `passthru.updateScript` attribute defined."
136 else
137 { attrPath = path; inherit package; };
138
139 /* List of packages matched based on the CLI arguments.
140 */
141 packages =
142 if package != null then
143 [ (packageByName package pkgs) ]
144 else if predicate != null then
145 packagesWithUpdateScriptMatchingPredicate predicate pkgs
146 else if maintainer != null then
147 packagesWithUpdateScriptAndMaintainer maintainer pkgs
148 else if path != null then
149 packagesWithUpdateScript path pkgs
150 else
151 builtins.throw "No arguments provided.\n\n${helpText}";
152
153 helpText = ''
154 Please run:
155
156 % nix-shell maintainers/scripts/update.nix --argstr maintainer garbas
157
158 to run all update scripts for all packages that lists \`garbas\` as a maintainer
159 and have \`updateScript\` defined, or:
160
161 % nix-shell maintainers/scripts/update.nix --argstr package gnome.nautilus
162
163 to run update script for specific package, or
164
165 % nix-shell maintainers/scripts/update.nix --arg predicate '(path: pkg: pkg.updateScript.name or null == "gnome-update-script")'
166
167 to run update script for all packages matching given predicate, or
168
169 % nix-shell maintainers/scripts/update.nix --argstr path gnome
170
171 to run update script for all package under an attribute path.
172
173 You can also add
174
175 --argstr max-workers 8
176
177 to increase the number of jobs in parallel, or
178
179 --argstr keep-going true
180
181 to continue running when a single update fails.
182
183 You can also make the updater automatically commit on your behalf from updateScripts
184 that support it by adding
185
186 --argstr commit true
187 '';
188
189 /* Transform a matched package into an object for update.py.
190 */
191 packageData = { package, attrPath }: {
192 name = package.name;
193 pname = lib.getName package;
194 oldVersion = lib.getVersion package;
195 updateScript = map builtins.toString (lib.toList (package.updateScript.command or package.updateScript));
196 supportedFeatures = package.updateScript.supportedFeatures or [];
197 attrPath = package.updateScript.attrPath or attrPath;
198 };
199
200 /* JSON file with data for update.py.
201 */
202 packagesJson = pkgs.writeText "packages.json" (builtins.toJSON (map packageData packages));
203
204 optionalArgs =
205 lib.optional (max-workers != null) "--max-workers=${max-workers}"
206 ++ lib.optional (keep-going == "true") "--keep-going"
207 ++ lib.optional (commit == "true") "--commit";
208
209 args = [ packagesJson ] ++ optionalArgs;
210
211in pkgs.stdenv.mkDerivation {
212 name = "nixpkgs-update-script";
213 buildCommand = ''
214 echo ""
215 echo "----------------------------------------------------------------"
216 echo ""
217 echo "Not possible to update packages using \`nix-build\`"
218 echo ""
219 echo "${helpText}"
220 echo "----------------------------------------------------------------"
221 exit 1
222 '';
223 shellHook = ''
224 unset shellHook # do not contaminate nested shells
225 exec ${pkgs.python3.interpreter} ${./update.py} ${builtins.concatStringsSep " " args}
226 '';
227}