141 lines
		
	
	
		
			5.2 KiB
		
	
	
	
		
			Nix
		
	
	
	
	
	
			
		
		
	
	
			141 lines
		
	
	
		
			5.2 KiB
		
	
	
	
		
			Nix
		
	
	
	
	
	
| { supportedSystems }:
 | ||
| 
 | ||
| rec {
 | ||
| 
 | ||
|   # Ensure that we don't build packages marked as unfree.
 | ||
|   allPackages = args: import ./all-packages.nix (args // {
 | ||
|     config.allowUnfree = false;
 | ||
|   });
 | ||
| 
 | ||
|   pkgs = allPackages { system = "x86_64-linux"; };
 | ||
| 
 | ||
| 
 | ||
|   /* !!! Hack: poor man's memoisation function.  Necessary to prevent
 | ||
|      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
 | ||
|     else if system == "x86_64-freebsd" then pkgs_x86_64_freebsd
 | ||
|     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"; };
 | ||
|   pkgs_x86_64_freebsd = allPackages { system = "x86_64-freebsd"; };
 | ||
|   pkgs_i686_freebsd = allPackages { system = "i686-freebsd"; };
 | ||
|   pkgs_i686_cygwin = allPackages { system = "i686-cygwin"; };
 | ||
| 
 | ||
| 
 | ||
|   /* The working or failing mails for cross builds will be sent only to
 | ||
|      the following maintainers, as most package maintainers will not be
 | ||
|      interested in the result of cross building a package. */
 | ||
|   crossMaintainers = with pkgs.lib.maintainers; [ viric ];
 | ||
| 
 | ||
| 
 | ||
|   /* Set the Hydra scheduling priority for a job.  The default
 | ||
|      priority (10) should be used for most jobs.  A different priority
 | ||
|      should only be used for a few particularly interesting jobs (in
 | ||
|      terms of giving feedback to developers), such as stdenv. */
 | ||
|   prio = level: job: toJob job // { schedulingPriority = level; };
 | ||
| 
 | ||
| 
 | ||
|   toJob = x: if builtins.isAttrs x then x else
 | ||
|     { type = "job"; systems = x; schedulingPriority = 10; };
 | ||
| 
 | ||
| 
 | ||
|   /* 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; ... }’. */
 | ||
|   testOn = systems: f: pkgs.lib.genAttrs
 | ||
|     (pkgs.lib.filter (x: pkgs.lib.elem x supportedSystems) systems)
 | ||
|     (system: f (pkgsFor system));
 | ||
| 
 | ||
| 
 | ||
|   /* Similar to the testOn function, but with an additional
 | ||
|      'crossSystem' parameter for allPackages, defining the target
 | ||
|      platform for cross builds. */
 | ||
|   testOnCross = crossSystem: systems: f: {system ? builtins.currentSystem}:
 | ||
|     if pkgs.lib.elem system systems
 | ||
|     then f (allPackages { inherit system crossSystem; })
 | ||
|     else {};
 | ||
| 
 | ||
| 
 | ||
|   /* Map an attribute of the form `foo = [platforms...]'  to `testOn
 | ||
|      [platforms...] (pkgs: pkgs.foo)'. */
 | ||
|   mapTestOn = pkgs.lib.mapAttrsRecursiveCond
 | ||
|     (as: !(as ? type && as.type == "job"))
 | ||
|     (path: value:
 | ||
|       let
 | ||
|         job = toJob value;
 | ||
|         getPkg = pkgs:
 | ||
|           pkgs.lib.addMetaAttrs { schedulingPriority = toString job.schedulingPriority; }
 | ||
|           (pkgs.lib.getAttrFromPath path pkgs);
 | ||
|       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,
 | ||
|    * and triggering the build of the host derivation (cross built - crossDrv). */
 | ||
|   mapTestOnCross = crossSystem: pkgs.lib.mapAttrsRecursiveCond
 | ||
|     (as: !(as ? type && as.type == "job"))
 | ||
|     (path: value:
 | ||
|       let
 | ||
|         job = toJob value;
 | ||
|         getPkg = pkgs: (pkgs.lib.addMetaAttrs {
 | ||
|             schedulingPriority = toString job.schedulingPriority;
 | ||
|             maintainers = crossMaintainers;
 | ||
|           }
 | ||
|           (pkgs.lib.getAttrFromPath path pkgs));
 | ||
|       in testOnCross crossSystem job.systems getPkg);
 | ||
| 
 | ||
| 
 | ||
|   /* Find all packages that have a meta.platforms field listing the
 | ||
|      supported platforms. */
 | ||
|   packagesWithMetaPlatform = attrSet:
 | ||
|     let pairs = pkgs.lib.concatMap
 | ||
|       (x:
 | ||
|         let pair = builtins.tryEval
 | ||
|               (let
 | ||
|                  attrVal = (builtins.getAttr x attrSet);
 | ||
|                in
 | ||
|                  { val = processPackage attrVal;
 | ||
|                    attrVal = attrVal;
 | ||
|                    attrValIsAttrs = builtins.isAttrs attrVal;
 | ||
|                  });
 | ||
|             success = (builtins.tryEval pair.value.attrVal).success;
 | ||
|         in
 | ||
|         pkgs.lib.optional (success && pair.value.attrValIsAttrs && pair.value.val != [])
 | ||
|           { name = x; value = pair.value.val; })
 | ||
|       (builtins.attrNames attrSet);
 | ||
|     in
 | ||
|       builtins.listToAttrs pairs;
 | ||
| 
 | ||
| 
 | ||
|   # May fail as much as it wishes, we will catch the error.
 | ||
|   processPackage = attrSet:
 | ||
|     if attrSet ? recurseForDerivations && attrSet.recurseForDerivations then
 | ||
|       packagesWithMetaPlatform attrSet
 | ||
|     else if attrSet ? recurseForRelease && attrSet.recurseForRelease then
 | ||
|       packagesWithMetaPlatform attrSet
 | ||
|     else
 | ||
|       if attrSet ? meta && attrSet.meta ? platforms
 | ||
|         then attrSet.meta.platforms
 | ||
|         else [];
 | ||
| 
 | ||
| 
 | ||
|   /* Common platform groups on which to test packages. */
 | ||
|   inherit (pkgs.lib.platforms) unix linux darwin cygwin allBut all mesaPlatforms;
 | ||
| 
 | ||
|   /* Platform groups for specific kinds of applications. */
 | ||
|   x11Supported = linux;
 | ||
|   gtkSupported = linux;
 | ||
|   ghcSupported = linux;
 | ||
| 
 | ||
| }
 | 
