public/nixpkgs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

* Another distributed regression test, a network consisting of a Quake

Browse Source 
3 server and two clients.  The clients connect to the server and do
  nothing (except getting blown by the bots).  After a few seconds we
  verify that the clients indeed connected successfully, and make a
  screenshot of the X displays of the clients.

svn path=/nixos/trunk/; revision=16951
This commit is contained in:
Eelco Dolstra 2009-09-03 00:04:43 +00:00
parent c6d4282f25
commit a27680ea17
1 changed files with 34 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

44
tests/quake3.nix
View File

@ -8,15 +8,29 @@ with import ../lib/build-vms.nix { inherit nixos nixpkgs services system; };
rec { rec {
client =
{ config, pkgs, ... }:
{ services.xserver.enable = true;
services.xserver.driSupport = true;
environment.systemPackages = [ pkgs.scrot pkgs.icewm pkgs.quake3demo ];
};
nodes = nodes =
{ client = { server =
{ config, pkgs, ... }: { config, pkgs, ... }:
{ services.xserver.enable = true; { jobs = pkgs.lib.singleton
services.xserver.driSupport = true; { name = "quake3-server";
startOn = "startup";
environment.systemPackages = [ pkgs.scrot pkgs.xorg.twm pkgs.quake3demo ]; exec =
"${pkgs.quake3demo}/bin/quake3 '+set dedicated 1' '+set g_gametype 0' " +
"'+map q3dm7' '+addbot grunt' '+addbot daemia' 2> /tmp/log";
};
}; };
client1 = client;
client2 = client;
}; };
vms = buildVirtualNetwork { inherit nodes; }; vms = buildVirtualNetwork { inherit nodes; };
@ -25,15 +39,25 @@ rec {
'' ''
startAll; startAll;
$client->waitForFile("/tmp/.X11-unix/X0"); $server->waitForJob("quake3-server");
$client1->waitForFile("/tmp/.X11-unix/X0");
$client2->waitForFile("/tmp/.X11-unix/X0");
sleep 20; sleep 20;
print STDERR $client->execute("DISPLAY=:0.0 quake3 &"); 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;
sleep 20; $server->mustSucceed("grep -q 'Foo.*entered the game' /tmp/log");
$server->mustSucceed("grep -q 'Bar.*entered the game' /tmp/log");
print STDERR $client->execute("DISPLAY=:0.0 scrot /hostfs/$ENV{out}/screen.png");
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");
''; '';
} }