mirror of
https://github.com/NixOS/nixpkgs.git
synced 2024-11-16 06:45:16 +01:00
1f7455cf0d
Default getfacl behavior is to remove leading slash on absolute paths in its header printed to stdout. Before the header it will also print a message about it... Switches -p -or --absolute-names can turn this off and remove some noise from our tests logs.
55 lines
1.5 KiB
Nix
55 lines
1.5 KiB
Nix
import ./make-test.nix ({ pkgs, ...} :
|
|
|
|
{
|
|
name = "pantheon";
|
|
meta = with pkgs.stdenv.lib.maintainers; {
|
|
maintainers = [ worldofpeace ];
|
|
};
|
|
|
|
machine = { ... }:
|
|
|
|
{
|
|
imports = [ ./common/user-account.nix ];
|
|
|
|
services.xserver.enable = true;
|
|
services.xserver.desktopManager.pantheon.enable = true;
|
|
|
|
virtualisation.memorySize = 1024;
|
|
};
|
|
|
|
enableOCR = true;
|
|
|
|
testScript = { nodes, ... }: let
|
|
user = nodes.machine.config.users.users.alice;
|
|
in ''
|
|
startAll;
|
|
|
|
# Wait for display manager to start
|
|
$machine->waitForText(qr/${user.description}/);
|
|
$machine->screenshot("lightdm");
|
|
|
|
# Log in
|
|
$machine->sendChars("${user.password}\n");
|
|
$machine->waitForFile("/home/alice/.Xauthority");
|
|
$machine->succeed("xauth merge ~alice/.Xauthority");
|
|
|
|
# Check if "pantheon-shell" components actually start
|
|
$machine->waitUntilSucceeds("pgrep gala");
|
|
$machine->waitForWindow(qr/gala/);
|
|
$machine->waitUntilSucceeds("pgrep wingpanel");
|
|
$machine->waitForWindow("wingpanel");
|
|
$machine->waitUntilSucceeds("pgrep plank");
|
|
$machine->waitForWindow(qr/plank/);
|
|
|
|
# Check that logging in has given the user ownership of devices.
|
|
$machine->succeed("getfacl -p /dev/snd/timer | grep -q alice");
|
|
|
|
# Open elementary terminal
|
|
$machine->execute("su - alice -c 'DISPLAY=:0.0 io.elementary.terminal &'");
|
|
$machine->waitForWindow(qr/io.elementary.terminal/);
|
|
|
|
# Take a screenshot of the desktop
|
|
$machine->sleep(20);
|
|
$machine->screenshot("screen");
|
|
'';
|
|
})
|