2012-04-19 20:56:35 +02:00
|
|
|
# Miscellaneous small tests that don't warrant their own VM run.
|
|
|
|
|
|
|
|
{ pkgs, ... }:
|
|
|
|
|
|
|
|
{
|
|
|
|
|
2012-06-12 16:05:11 +02:00
|
|
|
machine =
|
|
|
|
{ config, pkgs, ... }:
|
|
|
|
{ swapDevices = pkgs.lib.mkOverride 0
|
|
|
|
[ { device = "/root/swapfile"; size = 128; } ];
|
|
|
|
};
|
2012-04-19 20:56:35 +02:00
|
|
|
|
|
|
|
testScript =
|
|
|
|
''
|
|
|
|
subtest "nixos-version", sub {
|
2013-07-17 19:24:27 +02:00
|
|
|
$machine->succeed("[ `nixos-version | wc -w` = 2 ]");
|
2012-04-19 20:56:35 +02:00
|
|
|
};
|
|
|
|
|
2013-05-14 15:17:58 +02:00
|
|
|
subtest "nixos-rebuild", sub {
|
|
|
|
$machine->succeed("nixos-rebuild --help | grep 'Usage:'");
|
|
|
|
};
|
|
|
|
|
2012-04-20 14:55:09 +02:00
|
|
|
# Sanity check for uid/gid assignment.
|
|
|
|
subtest "users-groups", sub {
|
|
|
|
$machine->succeed("[ `id -u messagebus` = 4 ]");
|
|
|
|
$machine->succeed("[ `id -g messagebus` = 4 ]");
|
|
|
|
$machine->succeed("[ `getent group users` = 'users:x:100:' ]");
|
|
|
|
};
|
|
|
|
|
2012-04-19 20:56:35 +02:00
|
|
|
# Regression test for GMP aborts on QEMU.
|
|
|
|
subtest "gmp", sub {
|
|
|
|
$machine->succeed("expr 1 + 2");
|
|
|
|
};
|
2012-06-12 16:05:11 +02:00
|
|
|
|
|
|
|
# Test that the swap file got created.
|
|
|
|
subtest "swapfile", sub {
|
2012-10-04 18:34:44 +02:00
|
|
|
$machine->waitForUnit("root-swapfile.swap");
|
2012-06-12 16:05:11 +02:00
|
|
|
$machine->succeed("ls -l /root/swapfile | grep 134217728");
|
|
|
|
};
|
2013-03-27 17:20:41 +01:00
|
|
|
|
|
|
|
# Test whether kernel.poweroff_cmd is set.
|
|
|
|
subtest "poweroff_cmd", sub {
|
|
|
|
$machine->succeed("[ -x \"\$(cat /proc/sys/kernel/poweroff_cmd)\" ]")
|
|
|
|
};
|
2013-09-17 16:16:59 +02:00
|
|
|
|
|
|
|
# Test whether the blkio controller is properly enabled.
|
|
|
|
subtest "blkio-cgroup", sub {
|
|
|
|
$machine->succeed("[ -n \"\$(cat /sys/fs/cgroup/blkio/blkio.sectors)\" ]")
|
|
|
|
};
|
2013-09-22 16:44:41 +02:00
|
|
|
|
|
|
|
# Test whether we have a reboot record in wtmp.
|
|
|
|
subtest "reboot-wtmp", sub {
|
|
|
|
$machine->succeed("last | grep reboot >&2");
|
|
|
|
};
|
2012-04-19 20:56:35 +02:00
|
|
|
'';
|
|
|
|
|
|
|
|
}
|