forked from mirrors/nixpkgs
4dac9e5814
machine can now declare an option `virtualisation.vlans' that causes
it to have network interfaces connected to each listed virtual
network. For instance,
virtualisation.vlans = [ 1 2 ];
causes the machine to have two interfaces (in addition to eth0, used
by the test driver to control the machine): eth1 connected to
network 1 with IP address 192.168.1.<i>, and eth2 connected to
network 2 with address 192.168.2.<i> (where <i> is the index of the
machine in the `nodes' attribute set). On the other hand,
virtualisation.vlans = [ 2 ];
causes the machine to only have an eth1 connected to network 2 with
address 192.168.2.<i>. So each virtual network <n> is assigned the
IP range 192.168.<n>.0/24.
Each virtual network is implemented using a separate multicast
address on the host, so guests really cannot talk to networks to
which they are not connected.
* Added a simple NAT test to demonstrate this.
* Added an option `virtualisation.qemu.options' to specify QEMU
command-line options. Used to factor out some commonality between
the test driver script and the interactive test script.
svn path=/nixos/trunk/; revision=21928
56 lines
1.6 KiB
Nix
56 lines
1.6 KiB
Nix
# This is a simple distributed test involving a topology with two
|
|
# separate virtual networks - the "inside" and the "outside" - with a
|
|
# client on the inside network, a server on the outside network, and a
|
|
# router connected to both that performs Network Address Translation
|
|
# for the client.
|
|
|
|
{ pkgs, ... }:
|
|
|
|
{
|
|
|
|
nodes =
|
|
{ client =
|
|
{ config, pkgs, ... }:
|
|
{ virtualisation.vlans = [ 1 ];
|
|
networking.defaultGateway = "192.168.1.2"; # !!! ugly
|
|
};
|
|
|
|
router =
|
|
{ config, pkgs, ... }:
|
|
{ virtualisation.vlans = [ 2 1 ];
|
|
environment.systemPackages = [ pkgs.iptables ];
|
|
};
|
|
|
|
server =
|
|
{ config, pkgs, ... }:
|
|
{ virtualisation.vlans = [ 2 ];
|
|
services.httpd.enable = true;
|
|
services.httpd.adminAddr = "foo@example.org";
|
|
};
|
|
};
|
|
|
|
testScript =
|
|
''
|
|
startAll;
|
|
|
|
# The router should have access to the server.
|
|
$server->waitForJob("httpd");
|
|
$router->mustSucceed("curl --fail http://server/ >&2");
|
|
|
|
# But the client shouldn't be able to reach the server.
|
|
$client->mustFail("curl --fail --connect-timeout 5 http://server/ >&2");
|
|
|
|
# Enable NAT on the router.
|
|
$router->mustSucceed(
|
|
"iptables -t nat -F",
|
|
"iptables -t nat -A POSTROUTING -s 192.168.1.0/24 -d 192.168.1.0/24 -j ACCEPT",
|
|
"iptables -t nat -A POSTROUTING -s 192.168.1.0/24 -j SNAT --to-source 192.168.2.2", # !!! ugly
|
|
"echo 1 > /proc/sys/net/ipv4/ip_forward"
|
|
);
|
|
|
|
# Now the client should be able to connect.
|
|
$client->mustSucceed("curl --fail http://server/ >&2");
|
|
'';
|
|
|
|
}
|