2015-07-12 10:09:40 +00:00
|
|
|
import ./make-test.nix ({ pkgs, ...} : {
|
2014-06-28 14:04:49 +00:00
|
|
|
name = "xfce";
|
2015-07-12 10:09:40 +00:00
|
|
|
meta = with pkgs.stdenv.lib.maintainers; {
|
2019-02-22 15:14:13 +00:00
|
|
|
maintainers = [ eelco shlevy ];
|
2015-07-12 10:09:40 +00:00
|
|
|
};
|
2011-03-11 17:00:10 +00:00
|
|
|
|
2011-09-14 18:20:50 +00:00
|
|
|
machine =
|
2018-07-20 20:56:59 +00:00
|
|
|
{ pkgs, ... }:
|
2011-03-11 17:00:10 +00:00
|
|
|
|
2013-09-04 11:05:09 +00:00
|
|
|
{ imports = [ ./common/user-account.nix ];
|
2011-03-17 14:04:47 +00:00
|
|
|
|
|
|
|
services.xserver.enable = true;
|
2011-03-11 17:00:10 +00:00
|
|
|
|
|
|
|
services.xserver.displayManager.auto.enable = true;
|
|
|
|
services.xserver.displayManager.auto.user = "alice";
|
2011-09-14 18:20:50 +00:00
|
|
|
|
2011-03-11 17:00:10 +00:00
|
|
|
services.xserver.desktopManager.xfce.enable = true;
|
2016-04-12 17:12:28 +00:00
|
|
|
|
|
|
|
environment.systemPackages = [ pkgs.xorg.xmessage ];
|
2019-09-10 02:14:03 +00:00
|
|
|
|
|
|
|
hardware.pulseaudio.enable = true; # needed for the factl test, /dev/snd/* exists without them but udev doesn't care then
|
2019-09-10 02:17:45 +00:00
|
|
|
|
|
|
|
virtualisation.memorySize = 1024;
|
2011-03-11 17:00:10 +00:00
|
|
|
};
|
|
|
|
|
|
|
|
testScript =
|
|
|
|
''
|
2014-01-22 19:23:56 +00:00
|
|
|
$machine->waitForX;
|
2016-04-12 17:12:47 +00:00
|
|
|
$machine->waitForFile("/home/alice/.Xauthority");
|
|
|
|
$machine->succeed("xauth merge ~alice/.Xauthority");
|
2011-09-22 08:27:29 +00:00
|
|
|
$machine->waitForWindow(qr/xfce4-panel/);
|
2011-03-11 17:00:10 +00:00
|
|
|
$machine->sleep(10);
|
2011-08-08 17:16:49 +00:00
|
|
|
|
|
|
|
# Check that logging in has given the user ownership of devices.
|
|
|
|
$machine->succeed("getfacl /dev/snd/timer | grep -q alice");
|
2011-09-14 18:20:50 +00:00
|
|
|
|
2013-06-23 11:13:03 +00:00
|
|
|
$machine->succeed("su - alice -c 'DISPLAY=:0.0 xfce4-terminal &'");
|
2011-03-11 17:00:10 +00:00
|
|
|
$machine->waitForWindow(qr/Terminal/);
|
|
|
|
$machine->sleep(10);
|
|
|
|
$machine->screenshot("screen");
|
2016-04-12 17:12:28 +00:00
|
|
|
|
|
|
|
# Ensure that the X server does proper access control.
|
|
|
|
$machine->mustFail("su - bob -c 'DISPLAY=:0.0 xmessage Foo'");
|
|
|
|
$machine->mustFail("su - bob -c 'DISPLAY=:0 xmessage Foo'");
|
2011-03-11 17:00:10 +00:00
|
|
|
'';
|
2015-07-12 10:09:40 +00:00
|
|
|
})
|