2009-09-02 23:16:33 +00:00
|
|
|
{ nixos ? ./..
|
|
|
|
, nixpkgs ? /etc/nixos/nixpkgs
|
|
|
|
, services ? /etc/nixos/services
|
|
|
|
, system ? builtins.currentSystem
|
|
|
|
}:
|
|
|
|
|
|
|
|
with import ../lib/build-vms.nix { inherit nixos nixpkgs services system; };
|
|
|
|
|
|
|
|
rec {
|
|
|
|
|
2009-09-03 00:04:43 +00:00
|
|
|
client =
|
|
|
|
{ config, pkgs, ... }:
|
|
|
|
|
|
|
|
{ services.xserver.enable = true;
|
|
|
|
services.xserver.driSupport = true;
|
|
|
|
environment.systemPackages = [ pkgs.scrot pkgs.icewm pkgs.quake3demo ];
|
|
|
|
};
|
|
|
|
|
2009-09-02 23:16:33 +00:00
|
|
|
nodes =
|
2009-09-03 00:04:43 +00:00
|
|
|
{ server =
|
2009-09-02 23:16:33 +00:00
|
|
|
{ config, pkgs, ... }:
|
|
|
|
|
2009-11-05 18:21:09 +00:00
|
|
|
{ jobs.quake3Server =
|
2009-09-03 00:04:43 +00:00
|
|
|
{ name = "quake3-server";
|
|
|
|
startOn = "startup";
|
|
|
|
exec =
|
|
|
|
"${pkgs.quake3demo}/bin/quake3 '+set dedicated 1' '+set g_gametype 0' " +
|
|
|
|
"'+map q3dm7' '+addbot grunt' '+addbot daemia' 2> /tmp/log";
|
|
|
|
};
|
2009-09-02 23:16:33 +00:00
|
|
|
};
|
2009-09-03 00:04:43 +00:00
|
|
|
|
|
|
|
client1 = client;
|
|
|
|
client2 = client;
|
2009-09-02 23:16:33 +00:00
|
|
|
};
|
|
|
|
|
|
|
|
vms = buildVirtualNetwork { inherit nodes; };
|
|
|
|
|
|
|
|
test = runTests vms
|
|
|
|
''
|
|
|
|
startAll;
|
|
|
|
|
2009-09-03 00:04:43 +00:00
|
|
|
$server->waitForJob("quake3-server");
|
|
|
|
$client1->waitForFile("/tmp/.X11-unix/X0");
|
|
|
|
$client2->waitForFile("/tmp/.X11-unix/X0");
|
2009-09-02 23:16:33 +00:00
|
|
|
|
|
|
|
sleep 20;
|
|
|
|
|
2009-09-03 00:04:43 +00:00
|
|
|
print STDERR $client1->execute("DISPLAY=:0.0 icewm &");
|
|
|
|
print STDERR $client1->execute("DISPLAY=:0.0 quake3 '+set r_fullscreen 0' '+set name Foo' '+connect server' &");
|
|
|
|
|
|
|
|
print STDERR $client2->execute("DISPLAY=:0.0 icewm &");
|
|
|
|
print STDERR $client2->execute("DISPLAY=:0.0 quake3 '+set r_fullscreen 0' '+set name Bar' '+connect server' &");
|
|
|
|
|
|
|
|
sleep 40;
|
|
|
|
|
|
|
|
$server->mustSucceed("grep -q 'Foo.*entered the game' /tmp/log");
|
|
|
|
$server->mustSucceed("grep -q 'Bar.*entered the game' /tmp/log");
|
|
|
|
|
|
|
|
print STDERR $client1->execute("DISPLAY=:0.0 scrot /hostfs/$ENV{out}/screen1.png");
|
|
|
|
print STDERR $client2->execute("DISPLAY=:0.0 scrot /hostfs/$ENV{out}/screen2.png");
|
2009-09-02 23:16:33 +00:00
|
|
|
'';
|
|
|
|
|
|
|
|
}
|