2009-09-10 16:49:16 +01:00
|
|
|
# This module declares the options to define a *display manager*, the
|
2017-02-10 02:25:03 +00:00
|
|
|
# program responsible for handling X logins (such as xdm, gdb, or
|
2009-09-10 16:49:16 +01:00
|
|
|
# SLiM). The display manager allows the user to select a *session
|
|
|
|
# type*. When the user logs in, the display manager starts the
|
|
|
|
# *session script* ("xsession" below) to launch the selected session
|
|
|
|
# type. The session type defines two things: the *desktop manager*
|
|
|
|
# (e.g., KDE, Gnome or a plain xterm), and optionally the *window
|
|
|
|
# manager* (e.g. kwin or twm).
|
|
|
|
|
2014-04-14 15:26:48 +01:00
|
|
|
{ config, lib, pkgs, ... }:
|
2009-09-10 16:49:16 +01:00
|
|
|
|
2014-04-14 15:26:48 +01:00
|
|
|
with lib;
|
2009-01-25 15:49:08 +00:00
|
|
|
|
|
|
|
let
|
2009-09-10 16:49:16 +01:00
|
|
|
|
2009-01-25 15:49:08 +00:00
|
|
|
cfg = config.services.xserver;
|
2009-09-10 13:37:33 +01:00
|
|
|
xorg = pkgs.xorg;
|
2009-01-25 15:49:08 +00:00
|
|
|
|
2014-11-30 19:49:19 +00:00
|
|
|
fontconfig = config.fonts.fontconfig;
|
|
|
|
xresourcesXft = pkgs.writeText "Xresources-Xft" ''
|
2015-02-01 22:18:48 +00:00
|
|
|
${optionalString (fontconfig.dpi != 0) ''Xft.dpi: ${toString fontconfig.dpi}''}
|
2014-11-30 19:49:19 +00:00
|
|
|
Xft.antialias: ${if fontconfig.antialias then "1" else "0"}
|
|
|
|
Xft.rgba: ${fontconfig.subpixel.rgba}
|
|
|
|
Xft.lcdfilter: lcd${fontconfig.subpixel.lcdfilter}
|
|
|
|
Xft.hinting: ${if fontconfig.hinting.enable then "1" else "0"}
|
|
|
|
Xft.autohint: ${if fontconfig.hinting.autohint then "1" else "0"}
|
|
|
|
Xft.hintstyle: hint${fontconfig.hinting.style}
|
|
|
|
'';
|
|
|
|
|
2009-01-25 15:49:08 +00:00
|
|
|
# file provided by services.xserver.displayManager.session.script
|
2009-09-10 16:49:16 +01:00
|
|
|
xsession = wm: dm: pkgs.writeScript "xsession"
|
|
|
|
''
|
2015-11-29 00:18:59 +00:00
|
|
|
#! ${pkgs.bash}/bin/bash
|
2009-09-10 16:49:16 +01:00
|
|
|
|
2017-02-12 23:09:24 +00:00
|
|
|
# Handle being called by SDDM.
|
|
|
|
if test "''${1:0:1}" = / ; then eval exec $1 $2 ; fi
|
|
|
|
|
2016-05-24 20:29:22 +01:00
|
|
|
${optionalString cfg.displayManager.logToJournal ''
|
|
|
|
if [ -z "$_DID_SYSTEMD_CAT" ]; then
|
2016-07-17 17:29:46 +01:00
|
|
|
_DID_SYSTEMD_CAT=1 exec ${config.systemd.package}/bin/systemd-cat -t xsession -- "$0" "$@"
|
2016-05-24 20:29:22 +01:00
|
|
|
fi
|
|
|
|
''}
|
|
|
|
|
2012-11-05 22:07:53 +00:00
|
|
|
. /etc/profile
|
2011-08-12 11:04:43 +01:00
|
|
|
cd "$HOME"
|
|
|
|
|
2009-09-13 14:34:52 +01:00
|
|
|
# The first argument of this script is the session type.
|
|
|
|
sessionType="$1"
|
2010-08-08 15:05:32 +01:00
|
|
|
if [ "$sessionType" = default ]; then sessionType=""; fi
|
2009-09-13 14:34:52 +01:00
|
|
|
|
2016-05-24 20:29:22 +01:00
|
|
|
${optionalString (!cfg.displayManager.job.logsXsession && !cfg.displayManager.logToJournal) ''
|
2009-09-13 14:34:52 +01:00
|
|
|
exec > ~/.xsession-errors 2>&1
|
|
|
|
''}
|
2009-09-10 16:49:16 +01:00
|
|
|
|
2015-06-22 17:08:29 +01:00
|
|
|
${optionalString cfg.startDbusSession ''
|
|
|
|
if test -z "$DBUS_SESSION_BUS_ADDRESS"; then
|
2015-10-13 13:33:08 +01:00
|
|
|
exec ${pkgs.dbus.dbus-launch} --exit-with-session "$0" "$sessionType"
|
2009-11-21 22:14:01 +00:00
|
|
|
fi
|
|
|
|
''}
|
|
|
|
|
2011-07-26 19:16:24 +01:00
|
|
|
# Start PulseAudio if enabled.
|
2013-07-23 18:04:40 +01:00
|
|
|
${optionalString (config.hardware.pulseaudio.enable) ''
|
|
|
|
${optionalString (!config.hardware.pulseaudio.systemWide)
|
2015-10-08 10:51:10 +01:00
|
|
|
"${config.hardware.pulseaudio.package.out}/bin/pulseaudio --start"
|
2013-07-23 18:04:40 +01:00
|
|
|
}
|
2011-07-26 19:16:24 +01:00
|
|
|
|
|
|
|
# Publish access credentials in the root window.
|
2015-10-08 10:51:10 +01:00
|
|
|
${config.hardware.pulseaudio.package.out}/bin/pactl load-module module-x11-publish "display=$DISPLAY"
|
2011-07-26 19:16:24 +01:00
|
|
|
''}
|
|
|
|
|
2015-02-25 13:29:24 +00:00
|
|
|
# Tell systemd about our $DISPLAY. This is needed by the
|
|
|
|
# ssh-agent unit.
|
|
|
|
${config.systemd.package}/bin/systemctl --user import-environment DISPLAY
|
|
|
|
|
2009-09-13 14:34:52 +01:00
|
|
|
# Load X defaults.
|
2014-11-30 19:49:19 +00:00
|
|
|
${xorg.xrdb}/bin/xrdb -merge ${xresourcesXft}
|
2014-11-07 20:21:21 +00:00
|
|
|
if test -e ~/.Xresources; then
|
|
|
|
${xorg.xrdb}/bin/xrdb -merge ~/.Xresources
|
|
|
|
elif test -e ~/.Xdefaults; then
|
2009-09-13 14:34:52 +01:00
|
|
|
${xorg.xrdb}/bin/xrdb -merge ~/.Xdefaults
|
2009-09-10 16:49:16 +01:00
|
|
|
fi
|
|
|
|
|
2013-08-26 15:04:42 +01:00
|
|
|
# Speed up application start by 50-150ms according to
|
|
|
|
# http://kdemonkey.blogspot.nl/2008/04/magic-trick.html
|
2016-11-26 10:18:01 +00:00
|
|
|
rm -rf "$HOME/.compose-cache"
|
|
|
|
mkdir "$HOME/.compose-cache"
|
2013-08-26 15:04:42 +01:00
|
|
|
|
2015-09-28 14:14:44 +01:00
|
|
|
# Work around KDE errors when a user first logs in and
|
|
|
|
# .local/share doesn't exist yet.
|
2016-11-26 10:18:01 +00:00
|
|
|
mkdir -p "$HOME/.local/share"
|
2015-09-28 14:14:44 +01:00
|
|
|
|
2016-05-24 20:29:22 +01:00
|
|
|
unset _DID_SYSTEMD_CAT
|
|
|
|
|
2012-03-16 01:29:51 +00:00
|
|
|
${cfg.displayManager.sessionCommands}
|
|
|
|
|
2014-01-02 10:32:27 +00:00
|
|
|
# Allow the user to execute commands at the beginning of the X session.
|
|
|
|
if test -f ~/.xprofile; then
|
|
|
|
source ~/.xprofile
|
|
|
|
fi
|
|
|
|
|
2009-09-13 14:34:52 +01:00
|
|
|
# Allow the user to setup a custom session type.
|
2009-10-15 09:27:51 +01:00
|
|
|
if test -x ~/.xsession; then
|
|
|
|
exec ~/.xsession
|
|
|
|
else
|
|
|
|
if test "$sessionType" = "custom"; then
|
|
|
|
sessionType="" # fall-thru if there is no ~/.xsession
|
|
|
|
fi
|
2009-09-13 14:34:52 +01:00
|
|
|
fi
|
2009-09-10 16:49:16 +01:00
|
|
|
|
2009-09-13 14:34:52 +01:00
|
|
|
# The session type is "<desktop-manager> + <window-manager>", so
|
2009-09-10 16:49:16 +01:00
|
|
|
# extract those.
|
2009-09-13 14:34:52 +01:00
|
|
|
windowManager="''${sessionType##* + }"
|
2009-09-10 16:49:16 +01:00
|
|
|
: ''${windowManager:=${cfg.windowManager.default}}
|
2009-09-13 14:34:52 +01:00
|
|
|
desktopManager="''${sessionType% + *}"
|
2009-09-10 16:49:16 +01:00
|
|
|
: ''${desktopManager:=${cfg.desktopManager.default}}
|
|
|
|
|
|
|
|
# Start the window manager.
|
|
|
|
case $windowManager in
|
|
|
|
${concatMapStrings (s: ''
|
|
|
|
(${s.name})
|
|
|
|
${s.start}
|
|
|
|
;;
|
|
|
|
'') wm}
|
|
|
|
(*) echo "$0: Window manager '$windowManager' not found.";;
|
|
|
|
esac
|
|
|
|
|
|
|
|
# Start the desktop manager.
|
|
|
|
case $desktopManager in
|
|
|
|
${concatMapStrings (s: ''
|
|
|
|
(${s.name})
|
|
|
|
${s.start}
|
|
|
|
;;
|
|
|
|
'') dm}
|
|
|
|
(*) echo "$0: Desktop manager '$desktopManager' not found.";;
|
|
|
|
esac
|
|
|
|
|
2016-09-20 08:21:08 +01:00
|
|
|
${optionalString cfg.updateDbusEnvironment ''
|
|
|
|
${lib.getBin pkgs.dbus}/bin/dbus-update-activation-environment --systemd --all
|
2016-04-14 10:28:10 +01:00
|
|
|
''}
|
|
|
|
|
2009-09-10 16:49:16 +01:00
|
|
|
test -n "$waitPID" && wait "$waitPID"
|
|
|
|
exit 0
|
|
|
|
'';
|
|
|
|
|
2015-09-01 08:42:08 +01:00
|
|
|
mkDesktops = names: pkgs.runCommand "desktops"
|
|
|
|
{ # trivial derivation
|
|
|
|
preferLocalBuild = true;
|
|
|
|
allowSubstitutes = false;
|
|
|
|
}
|
2009-09-10 16:49:16 +01:00
|
|
|
''
|
2016-11-26 10:18:01 +00:00
|
|
|
mkdir -p "$out"
|
2009-09-10 16:49:16 +01:00
|
|
|
${concatMapStrings (n: ''
|
|
|
|
cat - > "$out/${n}.desktop" << EODESKTOP
|
|
|
|
[Desktop Entry]
|
|
|
|
Version=1.0
|
|
|
|
Type=XSession
|
|
|
|
TryExec=${cfg.displayManager.session.script}
|
|
|
|
Exec=${cfg.displayManager.session.script} '${n}'
|
2015-06-16 12:20:20 +01:00
|
|
|
X-GDM-BypassXsession=true
|
2009-09-10 16:49:16 +01:00
|
|
|
Name=${n}
|
|
|
|
Comment=
|
|
|
|
EODESKTOP
|
|
|
|
'') names}
|
|
|
|
'';
|
2009-04-13 11:57:36 +01:00
|
|
|
|
2009-01-25 15:49:08 +00:00
|
|
|
in
|
|
|
|
|
|
|
|
{
|
|
|
|
|
2009-09-10 16:49:16 +01:00
|
|
|
options = {
|
2009-01-25 15:49:08 +00:00
|
|
|
|
2009-09-10 16:49:16 +01:00
|
|
|
services.xserver.displayManager = {
|
2009-01-25 15:49:08 +00:00
|
|
|
|
2009-09-10 16:49:16 +01:00
|
|
|
xauthBin = mkOption {
|
2013-10-30 16:37:45 +00:00
|
|
|
internal = true;
|
2009-09-10 16:49:16 +01:00
|
|
|
default = "${xorg.xauth}/bin/xauth";
|
|
|
|
description = "Path to the <command>xauth</command> program used by display managers.";
|
|
|
|
};
|
2009-01-25 15:49:08 +00:00
|
|
|
|
2009-09-10 16:49:16 +01:00
|
|
|
xserverBin = mkOption {
|
2013-10-30 16:37:45 +00:00
|
|
|
type = types.path;
|
2009-09-10 16:49:16 +01:00
|
|
|
description = "Path to the X server used by display managers.";
|
|
|
|
};
|
|
|
|
|
|
|
|
xserverArgs = mkOption {
|
2013-10-30 16:37:45 +00:00
|
|
|
type = types.listOf types.str;
|
2009-09-10 16:49:16 +01:00
|
|
|
default = [];
|
2014-12-22 20:00:32 +00:00
|
|
|
example = [ "-ac" "-logverbose" "-verbose" "-nolisten tcp" ];
|
2009-09-10 16:49:16 +01:00
|
|
|
description = "List of arguments for the X server.";
|
|
|
|
};
|
|
|
|
|
2012-03-16 01:29:51 +00:00
|
|
|
sessionCommands = mkOption {
|
2013-10-30 16:37:45 +00:00
|
|
|
type = types.lines;
|
2012-03-16 01:29:51 +00:00
|
|
|
default = "";
|
|
|
|
example =
|
|
|
|
''
|
|
|
|
xmessage "Hello World!" &
|
|
|
|
'';
|
|
|
|
description = "Shell commands executed just before the window or desktop manager is started.";
|
|
|
|
};
|
|
|
|
|
2015-03-10 01:04:40 +00:00
|
|
|
hiddenUsers = mkOption {
|
|
|
|
type = types.listOf types.str;
|
|
|
|
default = [ "nobody" ];
|
|
|
|
description = ''
|
|
|
|
A list of users which will not be shown in the display manager.
|
|
|
|
'';
|
|
|
|
};
|
|
|
|
|
2009-09-10 16:49:16 +01:00
|
|
|
session = mkOption {
|
|
|
|
default = [];
|
2013-10-30 15:19:07 +00:00
|
|
|
example = literalExample
|
|
|
|
''
|
|
|
|
[ { manage = "desktop";
|
|
|
|
name = "xterm";
|
|
|
|
start = '''
|
|
|
|
''${pkgs.xterm}/bin/xterm -ls &
|
|
|
|
waitPID=$!
|
|
|
|
''';
|
|
|
|
}
|
|
|
|
]
|
|
|
|
'';
|
2009-09-10 16:49:16 +01:00
|
|
|
description = ''
|
|
|
|
List of sessions supported with the command used to start each
|
|
|
|
session. Each session script can set the
|
|
|
|
<varname>waitPID</varname> shell variable to make this script
|
|
|
|
wait until the end of the user session. Each script is used
|
|
|
|
to define either a windows manager or a desktop manager. These
|
|
|
|
can be differentiated by setting the attribute
|
|
|
|
<varname>manage</varname> either to <literal>"window"</literal>
|
|
|
|
or <literal>"desktop"</literal>.
|
|
|
|
|
|
|
|
The list of desktop manager and window manager should appear
|
|
|
|
inside the display manager with the desktop manager name
|
|
|
|
followed by the window manager name.
|
|
|
|
'';
|
|
|
|
apply = list: rec {
|
|
|
|
wm = filter (s: s.manage == "window") list;
|
|
|
|
dm = filter (s: s.manage == "desktop") list;
|
2010-08-08 15:05:32 +01:00
|
|
|
names = flip concatMap dm
|
|
|
|
(d: map (w: d.name + optionalString (w.name != "none") (" + " + w.name))
|
|
|
|
(filter (w: d.name != "none" || w.name != "none") wm));
|
2009-09-10 16:49:16 +01:00
|
|
|
desktops = mkDesktops names;
|
|
|
|
script = xsession wm dm;
|
2009-01-25 15:49:08 +00:00
|
|
|
};
|
2009-09-10 16:49:16 +01:00
|
|
|
};
|
2009-01-25 15:49:08 +00:00
|
|
|
|
2013-10-15 16:22:30 +01:00
|
|
|
job = {
|
2011-09-14 19:20:50 +01:00
|
|
|
|
2013-10-15 16:22:30 +01:00
|
|
|
preStart = mkOption {
|
|
|
|
type = types.lines;
|
|
|
|
default = "";
|
|
|
|
example = "rm -f /var/log/my-display-manager.log";
|
|
|
|
description = "Script executed before the display manager is started.";
|
|
|
|
};
|
|
|
|
|
|
|
|
execCmd = mkOption {
|
2013-10-30 10:02:04 +00:00
|
|
|
type = types.str;
|
2014-08-27 22:41:15 +01:00
|
|
|
example = literalExample ''
|
|
|
|
"''${pkgs.slim}/bin/slim"
|
|
|
|
'';
|
2013-10-15 16:22:30 +01:00
|
|
|
description = "Command to start the display manager.";
|
|
|
|
};
|
|
|
|
|
|
|
|
environment = mkOption {
|
2013-10-30 16:37:45 +00:00
|
|
|
type = types.attrsOf types.unspecified;
|
2013-10-15 16:22:30 +01:00
|
|
|
default = {};
|
2014-08-27 22:41:15 +01:00
|
|
|
example = { SLIM_CFGFILE = "/etc/slim.conf"; };
|
2013-10-15 16:22:30 +01:00
|
|
|
description = "Additional environment variables needed by the display manager.";
|
|
|
|
};
|
|
|
|
|
|
|
|
logsXsession = mkOption {
|
|
|
|
type = types.bool;
|
|
|
|
default = false;
|
|
|
|
description = ''
|
|
|
|
Whether the display manager redirects the
|
|
|
|
output of the session script to
|
|
|
|
<filename>~/.xsession-errors</filename>.
|
|
|
|
'';
|
2009-09-10 16:49:16 +01:00
|
|
|
};
|
2011-09-14 19:20:50 +01:00
|
|
|
|
2009-01-25 15:49:08 +00:00
|
|
|
};
|
2009-09-10 16:49:16 +01:00
|
|
|
|
2016-05-24 20:29:22 +01:00
|
|
|
logToJournal = mkOption {
|
|
|
|
type = types.bool;
|
|
|
|
default = true;
|
|
|
|
description = ''
|
|
|
|
By default, the stdout/stderr of sessions is written
|
|
|
|
to <filename>~/.xsession-errors</filename>. When this option
|
|
|
|
is enabled, it will instead be written to the journal.
|
|
|
|
'';
|
|
|
|
};
|
|
|
|
|
2009-01-25 15:49:08 +00:00
|
|
|
};
|
2011-09-14 19:20:50 +01:00
|
|
|
|
2009-01-25 15:49:08 +00:00
|
|
|
};
|
2009-09-10 16:49:16 +01:00
|
|
|
|
2014-09-18 15:12:36 +01:00
|
|
|
config = {
|
2015-10-17 23:53:13 +01:00
|
|
|
services.xserver.displayManager.xserverBin = "${xorg.xorgserver.out}/bin/X";
|
2014-09-18 15:12:36 +01:00
|
|
|
};
|
|
|
|
|
2016-02-28 09:35:43 +00:00
|
|
|
imports = [
|
2016-03-26 23:01:43 +00:00
|
|
|
(mkRemovedOptionModule [ "services" "xserver" "displayManager" "desktopManagerHandlesLidAndPower" ]
|
|
|
|
"The option is no longer necessary because all display managers have already delegated lid management to systemd.")
|
2016-02-28 09:35:43 +00:00
|
|
|
];
|
|
|
|
|
2009-01-25 15:49:08 +00:00
|
|
|
}
|