bscpkgs/garlic/stages/experiment.nix
Rodrigo Arias Mallo 8bc5656461 tools: recursive getExperiment
It allows getExperimentStage to be called from any stage above the
experiment.
2020-11-20 15:34:14 +01:00

60 lines
1.1 KiB
Nix

{
stdenv
, garlicTools
}:
{
units
}:
with stdenv.lib;
with garlicTools;
let
unitsString = builtins.concatStringsSep "\n"
(map (x: "${stageProgram x}") units);
unitsLinks = builtins.concatStringsSep "\n"
(map (x: "ln -s ../${baseNameOf x} ${baseNameOf x}") units);
in
stdenv.mkDerivation {
name = "experiment";
phases = [ "installPhase" ];
preferLocalBuild = true;
dontPatchShebangs = true;
inherit units;
isExperiment = true;
installPhase = ''
cat > $out << EOF
#!/bin/sh
if [ -z "\$GARLIC_OUT" ]; then
>&2 echo "GARLIC_OUT not defined, aborting"
exit 1
fi
cd "\$GARLIC_OUT"
export GARLIC_EXPERIMENT=$(basename $out)
if [ -e "\$GARLIC_EXPERIMENT" ]; then
>&2 echo "skipping, experiment exists: \$(pwd)/\$GARLIC_EXPERIMENT"
exit 0
fi
mkdir -p "\$GARLIC_EXPERIMENT"
cd "\$GARLIC_EXPERIMENT"
${unitsLinks}
echo "Running experiment \$GARLIC_EXPERIMENT"
# This is an experiment formed by the following units:
${unitsString}
EOF
chmod +x $out
'';
}