nixpkgs-suyu/modules/testing/test-instrumentation.nix
2010-07-18 22:29:40 +00:00

93 lines
2.6 KiB
Nix

# This module allows the test driver to connect to the virtual machine
# via a root shell attached to port 514.
{ config, pkgs, ... }:
with pkgs.lib;
let
# Urgh, `socat' sets the SIGCHLD to ignore. This wreaks havoc with
# some programs.
rootShell = pkgs.writeScript "shell.pl"
''
#! ${pkgs.perl}/bin/perl
$SIG{CHLD} = 'DEFAULT';
print "\n";
exec "/bin/sh";
'';
in
{
config = {
jobs.backdoor =
{ startOn = "ip-up";
stopOn = "never";
script =
''
export USER=root
export HOME=/root
export DISPLAY=:0.0
export GCOV_PREFIX=/tmp/coverage-data
source /etc/profile
cd /tmp
echo "connecting to host..." > /dev/ttyS0
${pkgs.socat}/bin/socat tcp:10.0.2.6:23 exec:${rootShell} 2> /dev/ttyS0 # || poweroff -f
'';
respawn = false;
};
boot.postBootCommands =
''
# Panic on out-of-memory conditions rather than letting the
# OOM killer randomly get rid of processes, since this leads
# to failures that are hard to diagnose.
echo 2 > /proc/sys/vm/panic_on_oom
# Coverage data is written into /tmp/coverage-data. Symlink
# it to the host filesystem so that we don't need to copy it
# on shutdown.
( eval $(cat /proc/cmdline)
mkdir /hostfs/$hostTmpDir/coverage-data
ln -s /hostfs/$hostTmpDir/coverage-data /tmp/coverage-data
)
# Mount debugfs to gain access to the kernel coverage data (if
# available).
mount -t debugfs none /sys/kernel/debug || true
'';
# If the kernel has been built with coverage instrumentation, make
# it available under /proc/gcov.
boot.kernelModules = [ "gcov-proc" ];
# Panic if an error occurs in stage 1 (rather than waiting for
# user intervention).
boot.kernelParams =
[ "console=tty1" "console=ttyS0" "panic=1" "stage1panic" ];
# `xwininfo' is used by the test driver to query open windows.
environment.systemPackages = [ pkgs.xorg.xwininfo ];
# Send all of /var/log/messages to the serial port.
services.syslogd.extraConfig = "*.* /dev/ttyS0";
# Prevent tests from accessing the Internet.
networking.defaultGateway = mkOverride 150 {} "";
networking.nameservers = mkOverride 150 {} [ ];
# Require a patch to the kernel to increase the 15s CIFS timeout.
assertions =
[ { assertion = config.boot.kernelPackages.kernel.features ? cifsTimeout;
message = "VM tests require that the kernel has the CIFS timeout patch.";
}
];
};
}