2014-11-06 22:32:17 +00:00
|
|
|
|
{ supportedSystems, packageSet ? (import ./all-packages.nix) }:
|
2013-03-26 12:12:25 +00:00
|
|
|
|
|
2015-03-20 16:05:30 +00:00
|
|
|
|
with import ../../lib;
|
|
|
|
|
|
2010-03-09 10:33:31 +00:00
|
|
|
|
rec {
|
|
|
|
|
|
2013-01-17 22:41:37 +00:00
|
|
|
|
# Ensure that we don't build packages marked as unfree.
|
2014-11-06 22:32:17 +00:00
|
|
|
|
allPackages = args: packageSet (args // {
|
2013-01-17 22:41:37 +00:00
|
|
|
|
config.allowUnfree = false;
|
|
|
|
|
});
|
|
|
|
|
|
2015-03-20 16:05:30 +00:00
|
|
|
|
pkgs = pkgsFor "x86_64-linux";
|
2010-03-09 10:33:31 +00:00
|
|
|
|
|
2013-03-26 10:02:29 +00:00
|
|
|
|
|
|
|
|
|
/* !!! Hack: poor man's memoisation function. Necessary to prevent
|
2010-05-25 10:35:14 +00:00
|
|
|
|
Nixpkgs from being evaluated again and again for every
|
|
|
|
|
job/platform pair. */
|
|
|
|
|
pkgsFor = system:
|
|
|
|
|
if system == "x86_64-linux" then pkgs_x86_64_linux
|
|
|
|
|
else if system == "i686-linux" then pkgs_i686_linux
|
|
|
|
|
else if system == "x86_64-darwin" then pkgs_x86_64_darwin
|
2012-03-08 12:52:00 +00:00
|
|
|
|
else if system == "x86_64-freebsd" then pkgs_x86_64_freebsd
|
2010-05-25 10:35:14 +00:00
|
|
|
|
else if system == "i686-freebsd" then pkgs_i686_freebsd
|
|
|
|
|
else if system == "i686-cygwin" then pkgs_i686_cygwin
|
|
|
|
|
else abort "unsupported system type: ${system}";
|
|
|
|
|
|
|
|
|
|
pkgs_x86_64_linux = allPackages { system = "x86_64-linux"; };
|
|
|
|
|
pkgs_i686_linux = allPackages { system = "i686-linux"; };
|
|
|
|
|
pkgs_x86_64_darwin = allPackages { system = "x86_64-darwin"; };
|
2012-03-08 12:52:00 +00:00
|
|
|
|
pkgs_x86_64_freebsd = allPackages { system = "x86_64-freebsd"; };
|
2010-05-25 10:35:14 +00:00
|
|
|
|
pkgs_i686_freebsd = allPackages { system = "i686-freebsd"; };
|
|
|
|
|
pkgs_i686_cygwin = allPackages { system = "i686-cygwin"; };
|
|
|
|
|
|
2013-03-26 10:02:29 +00:00
|
|
|
|
|
2010-05-25 10:35:14 +00:00
|
|
|
|
/* The working or failing mails for cross builds will be sent only to
|
2010-03-09 10:33:31 +00:00
|
|
|
|
the following maintainers, as most package maintainers will not be
|
|
|
|
|
interested in the result of cross building a package. */
|
2015-03-20 16:05:30 +00:00
|
|
|
|
crossMaintainers = [ maintainers.viric ];
|
2010-03-09 10:33:31 +00:00
|
|
|
|
|
2013-03-26 10:02:29 +00:00
|
|
|
|
|
2015-03-20 16:05:30 +00:00
|
|
|
|
toJob = x: if isAttrs x then x else
|
2015-01-06 10:37:40 +00:00
|
|
|
|
{ type = "job"; systems = x; };
|
2010-03-09 10:33:31 +00:00
|
|
|
|
|
2013-03-26 10:02:29 +00:00
|
|
|
|
|
2013-03-26 10:24:05 +00:00
|
|
|
|
/* Build a package on the given set of platforms. The function `f'
|
|
|
|
|
is called for each supported platform with Nixpkgs for that
|
|
|
|
|
platform as an argument . We return an attribute set containing
|
|
|
|
|
a derivation for each supported platform, i.e. ‘{ x86_64-linux =
|
|
|
|
|
f pkgs_x86_64_linux; i686-linux = f pkgs_i686_linux; ... }’. */
|
2015-03-20 16:05:30 +00:00
|
|
|
|
testOn = systems: f: genAttrs
|
|
|
|
|
(filter (x: elem x supportedSystems) systems)
|
2013-03-26 10:24:05 +00:00
|
|
|
|
(system: f (pkgsFor system));
|
2010-03-09 10:33:31 +00:00
|
|
|
|
|
2013-03-26 10:02:29 +00:00
|
|
|
|
|
|
|
|
|
/* Similar to the testOn function, but with an additional
|
|
|
|
|
'crossSystem' parameter for allPackages, defining the target
|
|
|
|
|
platform for cross builds. */
|
2010-03-09 10:33:31 +00:00
|
|
|
|
testOnCross = crossSystem: systems: f: {system ? builtins.currentSystem}:
|
2015-03-20 16:05:30 +00:00
|
|
|
|
if elem system systems
|
2013-03-26 10:02:29 +00:00
|
|
|
|
then f (allPackages { inherit system crossSystem; })
|
|
|
|
|
else {};
|
|
|
|
|
|
2010-03-09 10:33:31 +00:00
|
|
|
|
|
|
|
|
|
/* Map an attribute of the form `foo = [platforms...]' to `testOn
|
|
|
|
|
[platforms...] (pkgs: pkgs.foo)'. */
|
2015-03-20 16:05:30 +00:00
|
|
|
|
mapTestOn = mapAttrsRecursiveCond
|
2015-01-06 10:52:12 +00:00
|
|
|
|
(as: as.type or "" != "job")
|
2010-03-09 10:33:31 +00:00
|
|
|
|
(path: value:
|
|
|
|
|
let
|
|
|
|
|
job = toJob value;
|
2015-03-20 16:05:30 +00:00
|
|
|
|
getPkg = pkgs: getAttrFromPath path pkgs;
|
2010-03-09 10:33:31 +00:00
|
|
|
|
in testOn job.systems getPkg);
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* Similar to the testOn function, but with an additional 'crossSystem'
|
|
|
|
|
* parameter for allPackages, defining the target platform for cross builds,
|
2012-12-28 18:08:19 +00:00
|
|
|
|
* and triggering the build of the host derivation (cross built - crossDrv). */
|
2015-03-20 16:05:30 +00:00
|
|
|
|
mapTestOnCross = crossSystem: mapAttrsRecursiveCond
|
2015-01-06 10:52:12 +00:00
|
|
|
|
(as: as.type or "" != "job")
|
2010-03-09 10:33:31 +00:00
|
|
|
|
(path: value:
|
|
|
|
|
let
|
|
|
|
|
job = toJob value;
|
2015-03-20 16:05:30 +00:00
|
|
|
|
getPkg = pkgs: addMetaAttrs { maintainers = crossMaintainers; }
|
|
|
|
|
(getAttrFromPath path pkgs);
|
2010-03-09 10:33:31 +00:00
|
|
|
|
in testOnCross crossSystem job.systems getPkg);
|
|
|
|
|
|
2013-03-26 10:02:29 +00:00
|
|
|
|
|
2010-03-09 10:33:31 +00:00
|
|
|
|
/* Find all packages that have a meta.platforms field listing the
|
|
|
|
|
supported platforms. */
|
2012-11-29 13:10:49 +00:00
|
|
|
|
packagesWithMetaPlatform = attrSet:
|
2015-03-20 16:05:30 +00:00
|
|
|
|
let pairs = concatMap
|
2013-03-26 10:02:29 +00:00
|
|
|
|
(x:
|
|
|
|
|
let pair = builtins.tryEval
|
|
|
|
|
(let
|
2015-03-20 16:05:30 +00:00
|
|
|
|
attrVal = attrSet.${x};
|
2013-03-26 10:02:29 +00:00
|
|
|
|
in
|
|
|
|
|
{ val = processPackage attrVal;
|
|
|
|
|
attrVal = attrVal;
|
2015-03-20 16:05:30 +00:00
|
|
|
|
attrValIsAttrs = isAttrs attrVal;
|
2013-03-26 10:02:29 +00:00
|
|
|
|
});
|
|
|
|
|
success = (builtins.tryEval pair.value.attrVal).success;
|
|
|
|
|
in
|
2015-03-20 16:05:30 +00:00
|
|
|
|
optional (success && pair.value.attrValIsAttrs && pair.value.val != [])
|
2013-03-26 10:02:29 +00:00
|
|
|
|
{ name = x; value = pair.value.val; })
|
2015-03-20 16:05:30 +00:00
|
|
|
|
(attrNames attrSet);
|
2013-03-26 10:02:29 +00:00
|
|
|
|
in
|
2015-03-20 16:05:30 +00:00
|
|
|
|
listToAttrs pairs;
|
2013-03-26 10:02:29 +00:00
|
|
|
|
|
2012-11-29 13:10:49 +00:00
|
|
|
|
|
2010-03-09 10:33:31 +00:00
|
|
|
|
# May fail as much as it wishes, we will catch the error.
|
2012-11-29 13:10:49 +00:00
|
|
|
|
processPackage = attrSet:
|
2015-03-20 16:05:30 +00:00
|
|
|
|
if attrSet.recurseForDerivations or false || attrSet.recurseForRelease or false then
|
2010-03-09 10:33:31 +00:00
|
|
|
|
packagesWithMetaPlatform attrSet
|
2014-09-03 11:02:45 +00:00
|
|
|
|
else if attrSet.meta.broken or false then
|
|
|
|
|
[]
|
2010-03-09 10:33:31 +00:00
|
|
|
|
else
|
2013-11-04 22:31:08 +00:00
|
|
|
|
attrSet.meta.hydraPlatforms or (attrSet.meta.platforms or []);
|
2010-03-09 10:33:31 +00:00
|
|
|
|
|
2013-03-26 10:02:29 +00:00
|
|
|
|
|
2010-03-09 10:33:31 +00:00
|
|
|
|
/* Common platform groups on which to test packages. */
|
2015-03-20 16:05:30 +00:00
|
|
|
|
inherit (platforms) unix linux darwin cygwin allBut all mesaPlatforms;
|
2010-03-09 10:33:31 +00:00
|
|
|
|
|
|
|
|
|
/* Platform groups for specific kinds of applications. */
|
|
|
|
|
x11Supported = linux;
|
|
|
|
|
gtkSupported = linux;
|
2012-11-29 13:10:49 +00:00
|
|
|
|
ghcSupported = linux;
|
2010-03-09 10:33:31 +00:00
|
|
|
|
|
|
|
|
|
}
|