mirror of
https://github.com/NixOS/nixpkgs.git
synced 2024-11-25 16:33:15 +00:00
vm: Remove runInWindowsVM implementation
Originally this was meant to support other Windows versions than just Windows XP, but before I actually got a chance to implement this I left the project that I implemented this for. The code has been broken for years now and I highly doubt anyone is interested in resurrecting this (including me), so in order to make this less of a maintenance burden for everybody, let's remove it. Signed-off-by: aszlig <aszlig@nix.build>
This commit is contained in:
aszlig
parent
66acfa3d16
commit
1152978cda
@ -1196,4 +1196,4 @@ rec {
|
||||
`debDistros' sets. */
|
||||
diskImages = lib.mapAttrs (name: f: f {}) diskImageFuns;
|
||||
|
||||
} // import ./windows pkgs
|
||||
}
|
||||
|
||||
@ -1,83 +0,0 @@
|
||||
{ stdenv, fetchurl, vmTools, writeScript, writeText, runCommand, makeInitrd
|
||||
, python, perl, coreutils, dosfstools, gzip, mtools, netcat-gnu, openssh, qemu
|
||||
, samba, socat, vde2, cdrkit, pathsFromGraph, gnugrep
|
||||
}:
|
||||
|
||||
{ isoFile, productKey, arch ? null }:
|
||||
|
||||
with stdenv.lib;
|
||||
|
||||
let
|
||||
controller = import ./controller {
|
||||
inherit stdenv writeScript vmTools makeInitrd;
|
||||
inherit samba vde2 openssh socat netcat-gnu coreutils gzip gnugrep;
|
||||
};
|
||||
|
||||
mkCygwinImage = import ./cygwin-iso {
|
||||
inherit stdenv fetchurl runCommand python perl cdrkit pathsFromGraph;
|
||||
arch = let
|
||||
defaultArch = if stdenv.is64bit then "x86_64" else "i686";
|
||||
in if arch == null then defaultArch else arch;
|
||||
};
|
||||
|
||||
installer = import ./install {
|
||||
inherit controller mkCygwinImage;
|
||||
inherit stdenv runCommand openssh qemu writeText dosfstools mtools;
|
||||
};
|
||||
in rec {
|
||||
installedVM = installer {
|
||||
inherit isoFile productKey;
|
||||
};
|
||||
|
||||
runInVM = img: attrs: controller (attrs // {
|
||||
inherit (installedVM) sshKey;
|
||||
qemuArgs = attrs.qemuArgs or [] ++ [
|
||||
"-boot order=c"
|
||||
"-drive file=${img},index=0,media=disk"
|
||||
];
|
||||
});
|
||||
|
||||
runAndSuspend = let
|
||||
drives = {
|
||||
s = {
|
||||
source = "nixstore";
|
||||
target = "/nix/store";
|
||||
};
|
||||
x = {
|
||||
source = "xchg";
|
||||
target = "/tmp/xchg";
|
||||
};
|
||||
};
|
||||
|
||||
genDriveCmds = letter: { source, target }: [
|
||||
"net use ${letter}: '\\\\192.168.0.2\\${source}' /persistent:yes"
|
||||
"mkdir -p '${target}'"
|
||||
"mount -o bind '/cygdrive/${letter}' '${target}'"
|
||||
"echo '/cygdrive/${letter} ${target} none bind 0 0' >> /etc/fstab"
|
||||
];
|
||||
in runInVM "winvm.img" {
|
||||
command = concatStringsSep " && " ([
|
||||
"net config server /autodisconnect:-1"
|
||||
] ++ concatLists (mapAttrsToList genDriveCmds drives));
|
||||
suspendTo = "state.gz";
|
||||
};
|
||||
|
||||
suspendedVM = stdenv.mkDerivation {
|
||||
name = "cygwin-suspended-vm";
|
||||
buildCommand = ''
|
||||
${qemu}/bin/qemu-img create \
|
||||
-b "${installedVM}/disk.img" \
|
||||
-f qcow2 winvm.img
|
||||
${runAndSuspend}
|
||||
mkdir -p "$out"
|
||||
cp winvm.img "$out/disk.img"
|
||||
cp state.gz "$out/state.gz"
|
||||
'';
|
||||
};
|
||||
|
||||
resumeAndRun = command: runInVM "${suspendedVM}/disk.img" {
|
||||
resumeFrom = "${suspendedVM}/state.gz";
|
||||
qemuArgs = singleton "-snapshot";
|
||||
inherit command;
|
||||
};
|
||||
}
|
||||
@ -1,263 +0,0 @@
|
||||
{ stdenv, writeScript, vmTools, makeInitrd
|
||||
, samba, vde2, openssh, socat, netcat-gnu, coreutils, gnugrep, gzip
|
||||
, runtimeShell
|
||||
}:
|
||||
|
||||
{ sshKey
|
||||
, qemuArgs ? []
|
||||
, command ? "sync"
|
||||
, suspendTo ? null
|
||||
, resumeFrom ? null
|
||||
, installMode ? false
|
||||
}:
|
||||
|
||||
with stdenv.lib;
|
||||
|
||||
let
|
||||
preInitScript = writeScript "preinit.sh" ''
|
||||
#!${vmTools.initrdUtils}/bin/ash -e
|
||||
export PATH=${vmTools.initrdUtils}/bin
|
||||
mount -t proc none /proc
|
||||
mount -t sysfs none /sys
|
||||
for arg in $(cat /proc/cmdline); do
|
||||
if [ "x''${arg#command=}" != "x$arg" ]; then
|
||||
command="''${arg#command=}"
|
||||
fi
|
||||
done
|
||||
|
||||
for i in $(cat ${modulesClosure}/insmod-list); do
|
||||
insmod $i
|
||||
done
|
||||
|
||||
mkdir -p /dev /fs
|
||||
|
||||
mount -t tmpfs none /dev
|
||||
mknod /dev/null c 1 3
|
||||
mknod /dev/zero c 1 5
|
||||
mknod /dev/random c 1 8
|
||||
mknod /dev/urandom c 1 9
|
||||
mknod /dev/tty c 5 0
|
||||
|
||||
ifconfig lo up
|
||||
ifconfig eth0 up 192.168.0.2
|
||||
|
||||
mount -t tmpfs none /fs
|
||||
mkdir -p /fs/nix/store /fs/xchg /fs/dev /fs/sys /fs/proc /fs/etc /fs/tmp
|
||||
|
||||
mount -o bind /dev /fs/dev
|
||||
mount -t sysfs none /fs/sys
|
||||
mount -t proc none /fs/proc
|
||||
|
||||
mount -t 9p \
|
||||
-o trans=virtio,version=9p2000.L,cache=loose \
|
||||
store /fs/nix/store
|
||||
|
||||
mount -t 9p \
|
||||
-o trans=virtio,version=9p2000.L \
|
||||
xchg /fs/xchg
|
||||
|
||||
echo root:x:0:0::/root:/bin/false > /fs/etc/passwd
|
||||
|
||||
set +e
|
||||
chroot /fs $command $out
|
||||
echo $? > /fs/xchg/in-vm-exit
|
||||
|
||||
poweroff -f
|
||||
'';
|
||||
|
||||
initrd = makeInitrd {
|
||||
contents = singleton {
|
||||
object = preInitScript;
|
||||
symlink = "/init";
|
||||
};
|
||||
};
|
||||
|
||||
loopForever = "while :; do ${coreutils}/bin/sleep 1; done";
|
||||
|
||||
initScript = writeScript "init.sh" (''
|
||||
#!${runtimeShell}
|
||||
${coreutils}/bin/cp -L "${sshKey}" /ssh.key
|
||||
${coreutils}/bin/chmod 600 /ssh.key
|
||||
'' + (if installMode then ''
|
||||
echo -n "Waiting for Windows installation to finish..."
|
||||
while ! ${netcat-gnu}/bin/netcat -z 192.168.0.1 22; do
|
||||
echo -n .
|
||||
# Print a dot every 10 seconds only to shorten line length.
|
||||
${coreutils}/bin/sleep 10
|
||||
done
|
||||
${coreutils}/bin/touch /xchg/waiting_done
|
||||
echo " success."
|
||||
# Loop forever, because this VM is going to be killed.
|
||||
${loopForever}
|
||||
'' else ''
|
||||
${coreutils}/bin/mkdir -p /etc/samba /etc/samba/private \
|
||||
/var/lib/samba /var/log /var/run
|
||||
${coreutils}/bin/cat > /etc/samba/smb.conf <<CONFIG
|
||||
[global]
|
||||
security = user
|
||||
map to guest = Bad User
|
||||
guest account = root
|
||||
workgroup = cygwin
|
||||
netbios name = controller
|
||||
server string = %h
|
||||
log level = 1
|
||||
max log size = 1000
|
||||
log file = /var/log/samba.log
|
||||
|
||||
[nixstore]
|
||||
path = /nix/store
|
||||
writable = yes
|
||||
guest ok = yes
|
||||
|
||||
[xchg]
|
||||
path = /xchg
|
||||
writable = yes
|
||||
guest ok = yes
|
||||
CONFIG
|
||||
|
||||
${samba}/sbin/nmbd -D
|
||||
${samba}/sbin/smbd -D
|
||||
|
||||
echo -n "Waiting for Windows VM to become available..."
|
||||
while ! ${netcat-gnu}/bin/netcat -z 192.168.0.1 22; do
|
||||
echo -n .
|
||||
${coreutils}/bin/sleep 1
|
||||
done
|
||||
${coreutils}/bin/touch /xchg/waiting_done
|
||||
echo " success."
|
||||
|
||||
${openssh}/bin/ssh \
|
||||
-o UserKnownHostsFile=/dev/null \
|
||||
-o StrictHostKeyChecking=no \
|
||||
-i /ssh.key \
|
||||
-l Administrator \
|
||||
192.168.0.1 -- ${lib.escapeShellArg command}
|
||||
'') + optionalString (suspendTo != null) ''
|
||||
${coreutils}/bin/touch /xchg/suspend_now
|
||||
${loopForever}
|
||||
'');
|
||||
|
||||
kernelAppend = concatStringsSep " " [
|
||||
"panic=1"
|
||||
"loglevel=4"
|
||||
"console=tty1"
|
||||
"console=ttyS0"
|
||||
"command=${initScript}"
|
||||
];
|
||||
|
||||
controllerQemuArgs = concatStringsSep " " (maybeKvm64 ++ [
|
||||
"-pidfile $CTRLVM_PIDFILE"
|
||||
"-nographic"
|
||||
"-no-reboot"
|
||||
"-virtfs local,path=/nix/store,security_model=none,mount_tag=store"
|
||||
"-virtfs local,path=$XCHG_DIR,security_model=none,mount_tag=xchg"
|
||||
"-kernel ${modulesClosure.kernel}/bzImage"
|
||||
"-initrd ${initrd}/initrd"
|
||||
"-append \"${kernelAppend}\""
|
||||
"-net nic,vlan=0,macaddr=52:54:00:12:01:02,model=virtio"
|
||||
"-net vde,vlan=0,sock=$QEMU_VDE_SOCKET"
|
||||
]);
|
||||
|
||||
maybeKvm64 = optional (stdenv.hostPlatform.system == "x86_64-linux") "-cpu kvm64";
|
||||
|
||||
cygwinQemuArgs = concatStringsSep " " (maybeKvm64 ++ [
|
||||
"-monitor unix:$MONITOR_SOCKET,server,nowait"
|
||||
"-pidfile $WINVM_PIDFILE"
|
||||
"-nographic"
|
||||
"-net nic,vlan=0,macaddr=52:54:00:12:01:01"
|
||||
"-net vde,vlan=0,sock=$QEMU_VDE_SOCKET"
|
||||
"-rtc base=2010-01-01,clock=vm"
|
||||
] ++ qemuArgs ++ optionals (resumeFrom != null) [
|
||||
"-incoming 'exec: ${gzip}/bin/gzip -c -d \"${resumeFrom}\"'"
|
||||
]);
|
||||
|
||||
modulesClosure = overrideDerivation vmTools.modulesClosure (o: {
|
||||
rootModules = o.rootModules ++ singleton "virtio_net";
|
||||
});
|
||||
|
||||
preVM = ''
|
||||
(set; declare -p) > saved-env
|
||||
XCHG_DIR="$(${coreutils}/bin/mktemp -d nix-vm.XXXXXXXXXX --tmpdir)"
|
||||
${coreutils}/bin/mv saved-env "$XCHG_DIR/"
|
||||
|
||||
eval "$preVM"
|
||||
|
||||
QEMU_VDE_SOCKET="$(pwd)/vde.ctl"
|
||||
MONITOR_SOCKET="$(pwd)/monitor"
|
||||
WINVM_PIDFILE="$(pwd)/winvm.pid"
|
||||
CTRLVM_PIDFILE="$(pwd)/ctrlvm.pid"
|
||||
${vde2}/bin/vde_switch -s "$QEMU_VDE_SOCKET" --dirmode 0700 &
|
||||
echo 'alive?' | ${socat}/bin/socat - \
|
||||
UNIX-CONNECT:$QEMU_VDE_SOCKET/ctl,retry=20
|
||||
'';
|
||||
|
||||
vmExec = ''
|
||||
${vmTools.qemuProg} ${controllerQemuArgs} &
|
||||
${vmTools.qemuProg} ${cygwinQemuArgs} &
|
||||
echo -n "Waiting for VMs to start up..."
|
||||
timeout=60
|
||||
while ! test -e "$WINVM_PIDFILE" -a -e "$CTRLVM_PIDFILE"; do
|
||||
timeout=$(($timeout - 1))
|
||||
echo -n .
|
||||
if test $timeout -le 0; then
|
||||
echo " timed out."
|
||||
exit 1
|
||||
fi
|
||||
${coreutils}/bin/sleep 1
|
||||
done
|
||||
echo " done."
|
||||
'';
|
||||
|
||||
checkDropOut = ''
|
||||
if ! test -e "$XCHG_DIR/waiting_done" &&
|
||||
! kill -0 $(< "$WINVM_PIDFILE"); then
|
||||
echo "Windows VM has dropped out early, bailing out!" >&2
|
||||
exit 1
|
||||
fi
|
||||
'';
|
||||
|
||||
toMonitor = "${socat}/bin/socat - UNIX-CONNECT:$MONITOR_SOCKET";
|
||||
|
||||
postVM = if suspendTo != null then ''
|
||||
while ! test -e "$XCHG_DIR/suspend_now"; do
|
||||
${checkDropOut}
|
||||
${coreutils}/bin/sleep 1
|
||||
done
|
||||
${toMonitor} <<CMD
|
||||
stop
|
||||
migrate_set_speed 4095m
|
||||
migrate "exec:${gzip}/bin/gzip -c > '${suspendTo}'"
|
||||
CMD
|
||||
echo -n "Waiting for memory dump to finish..."
|
||||
while ! echo info migrate | ${toMonitor} | \
|
||||
${gnugrep}/bin/grep -qi '^migration *status: *complete'; do
|
||||
${coreutils}/bin/sleep 1
|
||||
echo -n .
|
||||
done
|
||||
echo " done."
|
||||
echo quit | ${toMonitor}
|
||||
wait $(< "$WINVM_PIDFILE")
|
||||
eval "$postVM"
|
||||
exit 0
|
||||
'' else if installMode then ''
|
||||
wait $(< "$WINVM_PIDFILE")
|
||||
eval "$postVM"
|
||||
exit 0
|
||||
'' else ''
|
||||
while kill -0 $(< "$CTRLVM_PIDFILE"); do
|
||||
${checkDropOut}
|
||||
done
|
||||
if ! test -e "$XCHG_DIR/in-vm-exit"; then
|
||||
echo "Virtual machine didn't produce an exit code."
|
||||
exit 1
|
||||
fi
|
||||
eval "$postVM"
|
||||
exit $(< "$XCHG_DIR/in-vm-exit")
|
||||
'';
|
||||
|
||||
in writeScript "run-cygwin-vm.sh" ''
|
||||
#!${stdenv.shell} -e
|
||||
${preVM}
|
||||
${vmExec}
|
||||
${postVM}
|
||||
''
|
||||
@ -1,56 +0,0 @@
|
||||
{ stdenv, fetchurl, runCommand, python, perl, xorriso, pathsFromGraph
|
||||
, arch ? "x86_64"
|
||||
}:
|
||||
|
||||
{ packages ? []
|
||||
, mirror ? "http://ftp.gwdg.de/pub/linux/sources.redhat.com/cygwin"
|
||||
, extraContents ? []
|
||||
}:
|
||||
|
||||
let
|
||||
cygPkgList = if arch == "x86_64" then fetchurl {
|
||||
url = "${mirror}/x86_64/setup.ini";
|
||||
sha256 = "0arrxvxbl85l82iy648snx5cl952w791p45p0dfg1xpiaf96cbkj";
|
||||
} else fetchurl {
|
||||
url = "${mirror}/x86/setup.ini";
|
||||
sha256 = "1fayx34868vd5h2nah7chiw65sl3i9qzrwvs7lrlv2h8k412vb69";
|
||||
};
|
||||
|
||||
cygwinCross = (import ../../../../.. {
|
||||
localSystem = stdenv.hostPlatform;
|
||||
crossSystem = {
|
||||
libc = "msvcrt";
|
||||
platform = {};
|
||||
inherit arch;
|
||||
config = "${arch}-w64-mingw32";
|
||||
};
|
||||
}).windows.cygwinSetup;
|
||||
|
||||
makeCygwinClosure = { packages, packageList }: let
|
||||
expr = import (runCommand "cygwin.nix" { buildInputs = [ python ]; } ''
|
||||
python ${./mkclosure.py} "${packages}" ${toString packageList} > "$out"
|
||||
'');
|
||||
gen = { url, hash }: {
|
||||
source = fetchurl {
|
||||
url = "${mirror}/${url}";
|
||||
sha512 = hash;
|
||||
};
|
||||
target = url;
|
||||
};
|
||||
in map gen expr;
|
||||
|
||||
in import ../../../../../nixos/lib/make-iso9660-image.nix {
|
||||
inherit stdenv perl xorriso pathsFromGraph;
|
||||
syslinux = null;
|
||||
contents = [
|
||||
{ source = "${cygwinCross}/bin/setup.exe";
|
||||
target = "setup.exe";
|
||||
}
|
||||
{ source = cygPkgList;
|
||||
target = "setup.ini";
|
||||
}
|
||||
] ++ makeCygwinClosure {
|
||||
packages = cygPkgList;
|
||||
packageList = packages;
|
||||
} ++ extraContents;
|
||||
}
|
||||
@ -1,78 +0,0 @@
|
||||
# Ugliest Python code I've ever written. -- aszlig
|
||||
import sys
|
||||
|
||||
def get_plist(path):
|
||||
in_pack = False
|
||||
in_str = False
|
||||
current_key = None
|
||||
buf = ""
|
||||
packages = {}
|
||||
package_name = None
|
||||
package_attrs = {}
|
||||
with open(path, 'r') as setup:
|
||||
for line in setup:
|
||||
if in_str and line.rstrip().endswith('"'):
|
||||
package_attrs[current_key] = buf + line.rstrip()[:-1]
|
||||
in_str = False
|
||||
continue
|
||||
elif in_str:
|
||||
buf += line
|
||||
continue
|
||||
|
||||
if line.startswith('@'):
|
||||
in_pack = True
|
||||
package_name = line[1:].strip()
|
||||
package_attrs = {}
|
||||
elif in_pack and ':' in line:
|
||||
key, value = line.split(':', 1)
|
||||
if value.lstrip().startswith('"'):
|
||||
if value.lstrip()[1:].rstrip().endswith('"'):
|
||||
value = value.strip().strip('"')
|
||||
else:
|
||||
in_str = True
|
||||
current_key = key.strip().lower()
|
||||
buf = value.lstrip()[1:]
|
||||
continue
|
||||
package_attrs[key.strip().lower()] = value.strip()
|
||||
elif in_pack:
|
||||
in_pack = False
|
||||
packages[package_name] = package_attrs
|
||||
return packages
|
||||
|
||||
def main():
|
||||
packages = get_plist(sys.argv[1])
|
||||
to_include = set()
|
||||
|
||||
def traverse(package):
|
||||
to_include.add(package)
|
||||
attrs = packages.get(package, {})
|
||||
deps = attrs.get('requires', '').split()
|
||||
for new_dep in set(deps) - to_include:
|
||||
traverse(new_dep)
|
||||
|
||||
map(traverse, sys.argv[2:])
|
||||
|
||||
sys.stdout.write('[\n')
|
||||
for package, attrs in packages.iteritems():
|
||||
if package not in to_include:
|
||||
cats = [c.lower() for c in attrs.get('category', '').split()]
|
||||
if 'base' not in cats:
|
||||
continue
|
||||
|
||||
install_line = attrs.get('install')
|
||||
if install_line is None:
|
||||
continue
|
||||
|
||||
url, size, hash = install_line.split(' ', 2)
|
||||
|
||||
pack = [
|
||||
' {',
|
||||
' url = "{0}";'.format(url),
|
||||
' hash = "{0}";'.format(hash),
|
||||
' }',
|
||||
];
|
||||
sys.stdout.write('\n'.join(pack) + '\n')
|
||||
sys.stdout.write(']\n')
|
||||
|
||||
if __name__ == '__main__':
|
||||
main()
|
||||
@ -1,44 +0,0 @@
|
||||
#note: the hardcoded /bin/sh is required for the VM's cygwin shell
|
||||
pkgs:
|
||||
|
||||
let
|
||||
bootstrapper = import ./bootstrap.nix {
|
||||
inherit (pkgs) stdenv vmTools writeScript writeText runCommand makeInitrd;
|
||||
inherit (pkgs) coreutils dosfstools gzip mtools netcat-gnu openssh qemu samba;
|
||||
inherit (pkgs) socat vde2 fetchurl python perl cdrkit pathsFromGraph;
|
||||
inherit (pkgs) gnugrep;
|
||||
};
|
||||
|
||||
builder = ''
|
||||
source /tmp/xchg/saved-env 2> /dev/null || true
|
||||
export NIX_STORE=/nix/store
|
||||
export NIX_BUILD_TOP=/tmp
|
||||
export TMPDIR=/tmp
|
||||
export PATH=/empty
|
||||
cd "$NIX_BUILD_TOP"
|
||||
exec $origBuilder $origArgs
|
||||
'';
|
||||
|
||||
in {
|
||||
runInWindowsVM = drv: pkgs.lib.overrideDerivation drv (attrs: let
|
||||
bootstrap = bootstrapper attrs.windowsImage;
|
||||
in {
|
||||
requiredSystemFeatures = [ "kvm" ];
|
||||
builder = pkgs.stdenv.shell;
|
||||
args = ["-e" (bootstrap.resumeAndRun builder)];
|
||||
windowsImage = bootstrap.suspendedVM;
|
||||
origArgs = attrs.args;
|
||||
origBuilder = if attrs.builder == attrs.stdenv.shell
|
||||
then "/bin/sh"
|
||||
else attrs.builder;
|
||||
|
||||
postHook = ''
|
||||
PATH=/usr/bin:/bin:/usr/sbin:/sbin
|
||||
SHELL=/bin/sh
|
||||
eval "$origPostHook"
|
||||
'';
|
||||
|
||||
origPostHook = attrs.postHook or "";
|
||||
fixupPhase = ":";
|
||||
});
|
||||
}
|
||||
@ -1,74 +0,0 @@
|
||||
{ stdenv, runCommand, openssh, qemu, controller, mkCygwinImage
|
||||
, writeText, dosfstools, mtools
|
||||
}:
|
||||
|
||||
{ isoFile
|
||||
, productKey
|
||||
}:
|
||||
|
||||
let
|
||||
bootstrapAfterLogin = runCommand "bootstrap.sh" {} ''
|
||||
cat > "$out" <<EOF
|
||||
mkdir -p ~/.ssh
|
||||
cat > ~/.ssh/authorized_keys <<PUBKEY
|
||||
$(cat "${cygwinSshKey}/key.pub")
|
||||
PUBKEY
|
||||
ssh-host-config -y -c 'binmode ntsec' -w dummy
|
||||
cygrunsrv -S sshd
|
||||
shutdown -s 5
|
||||
EOF
|
||||
'';
|
||||
|
||||
cygwinSshKey = stdenv.mkDerivation {
|
||||
name = "snakeoil-ssh-cygwin";
|
||||
buildCommand = ''
|
||||
mkdir -p "$out"
|
||||
${openssh}/bin/ssh-keygen -t ecdsa -f "$out/key" -N ""
|
||||
'';
|
||||
};
|
||||
|
||||
sshKey = "${cygwinSshKey}/key";
|
||||
|
||||
packages = [ "openssh" "shutdown" ];
|
||||
|
||||
floppyCreator = import ./unattended-image.nix {
|
||||
inherit stdenv writeText dosfstools mtools;
|
||||
};
|
||||
|
||||
instfloppy = floppyCreator {
|
||||
cygwinPackages = packages;
|
||||
inherit productKey;
|
||||
};
|
||||
|
||||
cygiso = mkCygwinImage {
|
||||
inherit packages;
|
||||
extraContents = stdenv.lib.singleton {
|
||||
source = bootstrapAfterLogin;
|
||||
target = "bootstrap.sh";
|
||||
};
|
||||
};
|
||||
|
||||
installController = controller {
|
||||
inherit sshKey;
|
||||
installMode = true;
|
||||
qemuArgs = [
|
||||
"-boot order=c,once=d"
|
||||
"-drive file=${instfloppy},readonly,index=0,if=floppy"
|
||||
"-drive file=winvm.img,index=0,media=disk"
|
||||
"-drive file=${isoFile},index=1,media=cdrom"
|
||||
"-drive file=${cygiso}/iso/cd.iso,index=2,media=cdrom"
|
||||
];
|
||||
};
|
||||
|
||||
in stdenv.mkDerivation {
|
||||
name = "cygwin-base-vm";
|
||||
buildCommand = ''
|
||||
${qemu}/bin/qemu-img create -f qcow2 winvm.img 2G
|
||||
${installController}
|
||||
mkdir -p "$out"
|
||||
cp winvm.img "$out/disk.img"
|
||||
'';
|
||||
passthru = {
|
||||
inherit sshKey;
|
||||
};
|
||||
}
|
||||
@ -1,123 +0,0 @@
|
||||
{ stdenv, writeText, dosfstools, mtools }:
|
||||
|
||||
{ productKey
|
||||
, shExecAfterwards ? "E:\\bootstrap.sh"
|
||||
, cygwinRoot ? "C:\\cygwin"
|
||||
, cygwinSetup ? "E:\\setup.exe"
|
||||
, cygwinRepository ? "E:\\"
|
||||
, cygwinPackages ? [ "openssh" ]
|
||||
}:
|
||||
|
||||
let
|
||||
afterSetup = [
|
||||
cygwinSetup
|
||||
"-L -n -q"
|
||||
"-l ${cygwinRepository}"
|
||||
"-R ${cygwinRoot}"
|
||||
"-C base"
|
||||
] ++ map (p: "-P ${p}") cygwinPackages;
|
||||
|
||||
winXpUnattended = writeText "winnt.sif" ''
|
||||
[Data]
|
||||
AutoPartition = 1
|
||||
AutomaticUpdates = 0
|
||||
MsDosInitiated = 0
|
||||
UnattendedInstall = Yes
|
||||
|
||||
[Unattended]
|
||||
DUDisable = Yes
|
||||
DriverSigningPolicy = Ignore
|
||||
Hibernation = No
|
||||
OemPreinstall = No
|
||||
OemSkipEula = Yes
|
||||
Repartition = Yes
|
||||
TargetPath = \WINDOWS
|
||||
UnattendMode = FullUnattended
|
||||
UnattendSwitch = Yes
|
||||
WaitForReboot = No
|
||||
|
||||
[GuiUnattended]
|
||||
AdminPassword = "nopasswd"
|
||||
AutoLogon = Yes
|
||||
AutoLogonCount = 1
|
||||
OEMSkipRegional = 1
|
||||
OemSkipWelcome = 1
|
||||
ServerWelcome = No
|
||||
TimeZone = 85
|
||||
|
||||
[UserData]
|
||||
ComputerName = "cygwin"
|
||||
FullName = "cygwin"
|
||||
OrgName = ""
|
||||
ProductKey = "${productKey}"
|
||||
|
||||
[Networking]
|
||||
InstallDefaultComponents = Yes
|
||||
|
||||
[Identification]
|
||||
JoinWorkgroup = cygwin
|
||||
|
||||
[NetAdapters]
|
||||
PrimaryAdapter = params.PrimaryAdapter
|
||||
|
||||
[params.PrimaryAdapter]
|
||||
InfID = *
|
||||
|
||||
[params.MS_MSClient]
|
||||
|
||||
[NetProtocols]
|
||||
MS_TCPIP = params.MS_TCPIP
|
||||
|
||||
[params.MS_TCPIP]
|
||||
AdapterSections=params.MS_TCPIP.PrimaryAdapter
|
||||
|
||||
[params.MS_TCPIP.PrimaryAdapter]
|
||||
DHCP = No
|
||||
IPAddress = 192.168.0.1
|
||||
SpecificTo = PrimaryAdapter
|
||||
SubnetMask = 255.255.255.0
|
||||
WINS = No
|
||||
|
||||
; Turn off all components
|
||||
[Components]
|
||||
${stdenv.lib.concatMapStrings (comp: "${comp} = Off\n") [
|
||||
"AccessOpt" "Appsrv_console" "Aspnet" "BitsServerExtensionsISAPI"
|
||||
"BitsServerExtensionsManager" "Calc" "Certsrv" "Certsrv_client"
|
||||
"Certsrv_server" "Charmap" "Chat" "Clipbook" "Cluster" "Complusnetwork"
|
||||
"Deskpaper" "Dialer" "Dtcnetwork" "Fax" "Fp_extensions" "Fp_vdir_deploy"
|
||||
"Freecell" "Hearts" "Hypertrm" "IEAccess" "IEHardenAdmin" "IEHardenUser"
|
||||
"Iis_asp" "Iis_common" "Iis_ftp" "Iis_inetmgr" "Iis_internetdataconnector"
|
||||
"Iis_nntp" "Iis_serversideincludes" "Iis_smtp" "Iis_webdav" "Iis_www"
|
||||
"Indexsrv_system" "Inetprint" "Licenseserver" "Media_clips" "Media_utopia"
|
||||
"Minesweeper" "Mousepoint" "Msmq_ADIntegrated" "Msmq_Core"
|
||||
"Msmq_HTTPSupport" "Msmq_LocalStorage" "Msmq_MQDSService"
|
||||
"Msmq_RoutingSupport" "Msmq_TriggersService" "Msnexplr" "Mswordpad"
|
||||
"Netcis" "Netoc" "OEAccess" "Objectpkg" "Paint" "Pinball" "Pop3Admin"
|
||||
"Pop3Service" "Pop3Srv" "Rec" "Reminst" "Rootautoupdate" "Rstorage" "SCW"
|
||||
"Sakit_web" "Solitaire" "Spider" "TSWebClient" "Templates"
|
||||
"TerminalServer" "UDDIAdmin" "UDDIDatabase" "UDDIWeb" "Vol" "WMAccess"
|
||||
"WMPOCM" "WbemMSI" "Wms" "Wms_admin_asp" "Wms_admin_mmc" "Wms_isapi"
|
||||
"Wms_server" "Zonegames"
|
||||
]}
|
||||
|
||||
[WindowsFirewall]
|
||||
Profiles = WindowsFirewall.TurnOffFirewall
|
||||
|
||||
[WindowsFirewall.TurnOffFirewall]
|
||||
Mode = 0
|
||||
|
||||
[SetupParams]
|
||||
UserExecute = "${stdenv.lib.concatStringsSep " " afterSetup}"
|
||||
|
||||
[GuiRunOnce]
|
||||
Command0 = "${cygwinRoot}\bin\bash -l ${shExecAfterwards}"
|
||||
'';
|
||||
|
||||
in stdenv.mkDerivation {
|
||||
name = "unattended-floppy.img";
|
||||
buildCommand = ''
|
||||
dd if=/dev/zero of="$out" count=1440 bs=1024
|
||||
${dosfstools}/sbin/mkfs.msdos "$out"
|
||||
${mtools}/bin/mcopy -i "$out" "${winXpUnattended}" ::winnt.sif
|
||||
'';
|
||||
}
|
||||
Loading…
Reference in New Issue
Block a user