2019-04-14 05:33:31 +08:00
|
|
|
{ pkgs,
|
|
|
|
diskImage,
|
|
|
|
qemuMem,
|
|
|
|
sshUser ? "user",
|
|
|
|
sshPassword ? "user",
|
|
|
|
}:
|
|
|
|
|
|
|
|
with pkgs;
|
|
|
|
|
|
|
|
let
|
2019-04-18 15:19:42 +08:00
|
|
|
qemu-img = "${qemu_kvm}/bin/qemu-img";
|
2019-04-18 23:34:09 +08:00
|
|
|
runQemu = isolateNetwork: forwardedPorts: extraArgs:
|
2019-04-14 05:33:31 +08:00
|
|
|
let
|
2019-04-15 02:52:09 +08:00
|
|
|
restrict =
|
|
|
|
if isolateNetwork
|
|
|
|
then "on"
|
|
|
|
else "off";
|
2019-04-18 23:34:09 +08:00
|
|
|
nc = "${netcat}/bin/nc";
|
|
|
|
# use netcat instead of `tcp:…` to allow multiple connections
|
|
|
|
guestfwds =
|
|
|
|
builtins.concatStringsSep ""
|
|
|
|
(map ({ listenAddr, targetAddr, port }:
|
|
|
|
",guestfwd=tcp:${listenAddr}:${toString port}-cmd:${nc}\\ ${targetAddr}\\ ${toString port}"
|
|
|
|
) forwardedPorts);
|
2019-04-14 05:33:31 +08:00
|
|
|
args = [
|
|
|
|
"-enable-kvm"
|
|
|
|
"-m" qemuMem
|
|
|
|
"-bios" "${OVMF.fd}/FV/OVMF.fd"
|
2019-04-18 23:34:09 +08:00
|
|
|
"-netdev" "user,id=n1,net=192.168.1.0/24,restrict=${restrict},hostfwd=tcp::2022-:22${guestfwds}"
|
2019-04-15 02:52:09 +08:00
|
|
|
"-device" "e1000,netdev=n1"
|
2019-04-14 05:33:31 +08:00
|
|
|
];
|
|
|
|
argStr = builtins.concatStringsSep " " (args ++ extraArgs);
|
2019-04-18 21:55:02 +08:00
|
|
|
in "${qemu_kvm}/bin/qemu-system-x86_64 ${argStr}";
|
2019-04-14 05:33:31 +08:00
|
|
|
|
|
|
|
sshOpts = "-o StrictHostKeyChecking=accept-new -o UserKnownHostsFile=/tmp/known_hosts";
|
|
|
|
ssh = cmd: ''
|
2019-04-15 07:12:48 +08:00
|
|
|
echo ssh windows '${cmd}'
|
2019-04-14 05:33:31 +08:00
|
|
|
${sshpass}/bin/sshpass -p${sshPassword} -- \
|
|
|
|
${openssh}/bin/ssh -np 2022 ${sshOpts} \
|
|
|
|
${sshUser}@localhost \
|
2019-04-15 07:12:48 +08:00
|
|
|
'${cmd}'
|
2019-04-14 05:33:31 +08:00
|
|
|
'';
|
|
|
|
scp = src: target: ''
|
|
|
|
echo "Copy ${src} to ${target}"
|
|
|
|
${sshpass}/bin/sshpass -p${sshPassword} -- \
|
|
|
|
${openssh}/bin/scp -P 2022 ${sshOpts} \
|
|
|
|
"${src}" "${sshUser}@localhost:${target}"
|
|
|
|
'';
|
|
|
|
|
|
|
|
in
|
|
|
|
{
|
2019-04-15 07:12:48 +08:00
|
|
|
inherit qemu-img runQemu ssh scp;
|
2019-04-18 15:19:42 +08:00
|
|
|
inputs = [ qemu_kvm openssh sshpass ];
|
2019-04-14 05:33:31 +08:00
|
|
|
}
|