{ nixpkgs, services, system, useBackdoor ? false }: let pkgs = import nixpkgs { config = {}; inherit system; }; in with pkgs; with import ../lib/qemu-flags.nix; rec { inherit pkgs; # Build a virtual network from an attribute set `{ machine1 = # config1; ... machineN = configN; }', where `machineX' is the # hostname and `configX' is a NixOS system configuration. The # result is a script that starts a QEMU instance for each virtual # machine. Each machine is given an arbitrary IP address in the # virtual network. buildVirtualNetwork = { nodes }: let nodes_ = lib.mapAttrs (n: buildVM nodes_) (assignIPAddresses nodes); in stdenv.mkDerivation { name = "vms"; buildCommand = '' ensureDir $out/vms ${ lib.concatMapStrings (vm: '' ln -sn ${vm.config.system.build.vm} $out/vms/${vm.config.networking.hostName} '' ) (lib.attrValues nodes_) } ensureDir $out/bin cat > $out/bin/run-vms <