forked from mirrors/nixpkgs
102 lines
2.6 KiB
Nix
102 lines
2.6 KiB
Nix
{ runCommand
|
|
, stdenv
|
|
, storeDir ? builtins.storeDir
|
|
, writeScript
|
|
, singularity
|
|
, writeReferencesToFile
|
|
, bash
|
|
, vmTools
|
|
, gawk
|
|
, utillinux
|
|
, e2fsprogs }:
|
|
|
|
rec {
|
|
shellScript = name: text:
|
|
writeScript name ''
|
|
#!${stdenv.shell}
|
|
set -e
|
|
${text}
|
|
'';
|
|
|
|
mkLayer = {
|
|
name,
|
|
contents ? [],
|
|
}:
|
|
runCommand "singularity-layer-${name}" {
|
|
inherit contents;
|
|
} ''
|
|
mkdir $out
|
|
for f in $contents ; do
|
|
cp -ra $f $out/
|
|
done
|
|
'';
|
|
|
|
buildImage = {
|
|
name,
|
|
contents ? [],
|
|
diskSize ? 1024,
|
|
runScript ? "#!${stdenv.shell}\nexec /bin/sh",
|
|
runAsRoot ? null,
|
|
extraSpace ? 0
|
|
}:
|
|
let layer = mkLayer {
|
|
inherit name;
|
|
contents = contents ++ [ bash runScriptFile ];
|
|
};
|
|
runAsRootFile = shellScript "run-as-root.sh" runAsRoot;
|
|
runScriptFile = shellScript "run-script.sh" runScript;
|
|
result = vmTools.runInLinuxVM (
|
|
runCommand "singularity-image-${name}.img" {
|
|
buildInputs = [ singularity e2fsprogs utillinux gawk ];
|
|
layerClosure = writeReferencesToFile layer;
|
|
preVM = vmTools.createEmptyImage {
|
|
size = diskSize;
|
|
fullName = "singularity-run-disk";
|
|
};
|
|
}
|
|
''
|
|
rm -rf $out
|
|
mkdir disk
|
|
mkfs -t ext3 -b 4096 /dev/${vmTools.hd}
|
|
mount /dev/${vmTools.hd} disk
|
|
cd disk
|
|
mkdir proc sys dev
|
|
|
|
# Run root script
|
|
${stdenv.lib.optionalString (runAsRoot != null) ''
|
|
mkdir -p ./${storeDir}
|
|
mount --rbind ${storeDir} ./${storeDir}
|
|
unshare -imnpuf --mount-proc chroot ./ ${runAsRootFile}
|
|
umount -R ./${storeDir}
|
|
''}
|
|
|
|
# Build /bin and copy across closure
|
|
mkdir -p bin nix/store
|
|
for f in $(cat $layerClosure) ; do
|
|
cp -ar $f ./$f
|
|
done
|
|
|
|
for c in ${toString contents} ; do
|
|
for f in $c/bin/* ; do
|
|
if [ ! -e bin/$(basename $f) ] ; then
|
|
ln -s $f bin/
|
|
fi
|
|
done
|
|
done
|
|
|
|
# Create runScript
|
|
ln -s ${runScriptFile} singularity
|
|
|
|
# Fill out .singularity.d
|
|
mkdir -p .singularity.d/env
|
|
touch .singularity.d/env/94-appsbase.sh
|
|
|
|
cd ..
|
|
mkdir -p /var/singularity/mnt/{container,final,overlay,session,source}
|
|
echo "root:x:0:0:System administrator:/root:/bin/sh" > /etc/passwd
|
|
singularity build $out ./disk
|
|
'');
|
|
|
|
in result;
|
|
}
|