src/seat.c

   1 /*
   2  * Copyright (C) 2010-2011 Robert Ancell.
   3  * Author: Robert Ancell <robert.ancell@canonical.com>
   4  *
   5  * This program is free software: you can redistribute it and/or modify it under
   6  * the terms of the GNU General Public License as published by the Free Software
   7  * Foundation, either version 3 of the License, or (at your option) any later
   8  * version. See http://www.gnu.org/copyleft/gpl.html the full text of the
   9  * license.
  10  */
  11
  12 #include <stdlib.h>
  13 #include <string.h>
  14 #include <sys/wait.h>
  15
  16 #include "seat.h"
  17 #include "configuration.h"
  18 #include "guest-account.h"
  19 #include "greeter-session.h"
  20 #include "session-config.h"
  21
  22 enum {
  23     SESSION_ADDED,
  24     RUNNING_USER_SESSION,
  25     SESSION_REMOVED,
  26     STOPPED,
  27     LAST_SIGNAL
  28 };
  29 static guint signals[LAST_SIGNAL] = { 0 };
  30
  31 struct SeatPrivate
  32 {
  33     /* XDG name for this seat */
  34     gchar *name;
  35
  36     /* Configuration for this seat */
  37     GHashTable *properties;
  38
  39     /* TRUE if this seat can run multiple sessions at once */
  40     gboolean supports_multi_session;
  41
  42     /* TRUE if display server can be shared for sessions */
  43     gboolean share_display_server;
  44
  45     /* The display servers on this seat */
  46     GList *display_servers;
  47
  48     /* The sessions on this seat */
  49     GList *sessions;
  50
  51     /* The last session set to active */
  52     Session *active_session;
  53
  54     /* The session belonging to the active greeter user */
  55     Session *next_session;
  56
  57     /* The session to set active when it starts */
  58     Session *session_to_activate;
  59
  60     /* TRUE once we have started */
  61     gboolean started;
  62
  63     /* TRUE if stopping this seat (waiting for displays to stop) */
  64     gboolean stopping;
  65
  66     /* TRUE if stopped */
  67     gboolean stopped;
  68
  69     /* The greeter to be started to replace the current one */
  70     GreeterSession *replacement_greeter;
  71 };
  72
  73 static void seat_logger_iface_init (LoggerInterface *iface);
  74
  75 G_DEFINE_TYPE_WITH_CODE (Seat, seat, G_TYPE_OBJECT,
  76                          G_IMPLEMENT_INTERFACE (
  77                              LOGGER_TYPE, seat_logger_iface_init));
  78
  79 typedef struct
  80 {
  81     gchar *name;
  82     GType type;
  83 } SeatModule;
  84 static GHashTable *seat_modules = NULL;
  85
  86 // FIXME: Make a get_display_server() that re-uses display servers if supported
  87 static DisplayServer *create_display_server (Seat *seat, Session *session);
  88 static GreeterSession *create_greeter_session (Seat *seat);
  89 static void start_session (Seat *seat, Session *session);
  90
  91 static void
  92 free_seat_module (gpointer data)
  93 {
  94     SeatModule *module = data;
  95     g_free (module->name);
  96     g_free (module);
  97 }
  98
  99 void
 100 seat_register_module (const gchar *name, GType type)
 101 {
 102     SeatModule *module;
 103
 104     if (!seat_modules)
 105         seat_modules = g_hash_table_new_full (g_str_hash, g_str_equal, free_seat_module, NULL);
 106
 107     g_debug ("Registered seat module %s", name);
 108
 109     module = g_malloc0 (sizeof (SeatModule));
 110     module->name = g_strdup (name);
 111     module->type = type;
 112     g_hash_table_insert (seat_modules, g_strdup (name), module);
 113 }
 114
 115 Seat *
 116 seat_new (const gchar *module_name, const gchar *name)
 117 {
 118     Seat *seat;
 119     SeatModule *m = NULL;
 120
 121     g_return_val_if_fail (module_name != NULL, NULL);
 122
 123     if (seat_modules)
 124         m = g_hash_table_lookup (seat_modules, module_name);
 125     if (!m)
 126         return NULL;
 127
 128     seat = g_object_new (m->type, NULL);
 129     seat->priv->name = g_strdup (name);
 130
 131     return seat;
 132 }
 133
 134 void
 135 seat_set_property (Seat *seat, const gchar *name, const gchar *value)
 136 {
 137     g_return_if_fail (seat != NULL);
 138     g_hash_table_insert (seat->priv->properties, g_strdup (name), g_strdup (value));
 139 }
 140
 141 const gchar *
 142 seat_get_string_property (Seat *seat, const gchar *name)
 143 {
 144     g_return_val_if_fail (seat != NULL, NULL);
 145     return g_hash_table_lookup (seat->priv->properties, name);
 146 }
 147
 148 gchar **
 149 seat_get_string_list_property (Seat *seat, const gchar *name)
 150 {
 151     g_return_val_if_fail (seat != NULL, NULL);
 152     return g_strsplit (g_hash_table_lookup (seat->priv->properties, name), ";", 0);
 153 }
 154
 155 gboolean
 156 seat_get_boolean_property (Seat *seat, const gchar *name)
 157 {
 158     const gchar *value;
 159     gint i, length = 0;
 160
 161     value = seat_get_string_property (seat, name);
 162     if (!value)
 163         return FALSE;
 164
 165     /* Count the number of non-whitespace characters */
 166     for (i = 0; value[i]; i++)
 167         if (!g_ascii_isspace (value[i]))
 168             length = i + 1;
 169
 170     return strncmp (value, "true", MAX (length, 4)) == 0;
 171 }
 172
 173 gint
 174 seat_get_integer_property (Seat *seat, const gchar *name)
 175 {
 176     const gchar *value;
 177
 178     value = seat_get_string_property (seat, name);
 179     return value ? atoi (value) : 0;
 180 }
 181
 182 const gchar *
 183 seat_get_name (Seat *seat)
 184 {
 185     return seat->priv->name;
 186 }
 187
 188 void
 189 seat_set_supports_multi_session (Seat *seat, gboolean supports_multi_session)
 190 {
 191     g_return_if_fail (seat != NULL);
 192     seat->priv->supports_multi_session = supports_multi_session;
 193 }
 194
 195 void
 196 seat_set_share_display_server (Seat *seat, gboolean share_display_server)
 197 {
 198     g_return_if_fail (seat != NULL);
 199     seat->priv->share_display_server = share_display_server;
 200 }
 201
 202 gboolean
 203 seat_start (Seat *seat)
 204 {
 205     g_return_val_if_fail (seat != NULL, FALSE);
 206
 207     l_debug (seat, "Starting");
 208
 209     SEAT_GET_CLASS (seat)->setup (seat);
 210     seat->priv->started = SEAT_GET_CLASS (seat)->start (seat);
 211
 212     return seat->priv->started;
 213 }
 214
 215 GList *
 216 seat_get_sessions (Seat *seat)
 217 {
 218     g_return_val_if_fail (seat != NULL, NULL);
 219     return seat->priv->sessions;
 220 }
 221
 222 static gboolean
 223 set_greeter_idle (gpointer greeter)
 224 {
 225     greeter_idle (GREETER (greeter));
 226     return FALSE;
 227 }
 228
 229 void
 230 seat_set_active_session (Seat *seat, Session *session)
 231 {
 232     GList *link;
 233
 234     g_return_if_fail (seat != NULL);
 235
 236     SEAT_GET_CLASS (seat)->set_active_session (seat, session);
 237
 238     /* Stop any greeters */
 239     for (link = seat->priv->sessions; link; link = link->next)
 240     {
 241         Session *s = link->data;
 242
 243         if (s == session || session_get_is_stopping (s))
 244             continue;
 245
 246         if (IS_GREETER_SESSION (s))
 247         {
 248             Greeter *greeter = greeter_session_get_greeter (GREETER_SESSION (s));
 249             if (greeter_get_resettable (greeter))
 250             {
 251                 if (seat->priv->active_session == s)
 252                 {
 253                     l_debug (seat, "Idling greeter");
 254                     /* Do this in an idle callback, because we might very well
 255                        be in the middle of responding to a START_SESSION
 256                        request by a greeter.  So they won't expect an IDLE
 257                        call during that.  Plus, this isn't time-sensitive. */
 258                     g_idle_add (set_greeter_idle, greeter);
 259                 }
 260             }
 261             else
 262             {
 263                 l_debug (seat, "Stopping greeter");
 264                 session_stop (s);
 265             }
 266         }
 267     }
 268
 269     /* Lock previous sessions */
 270     if (seat->priv->active_session && session != seat->priv->active_session && !IS_GREETER_SESSION (seat->priv->active_session))
 271         session_lock (seat->priv->active_session);
 272
 273     session_activate (session);
 274     g_clear_object (&seat->priv->active_session);
 275     seat->priv->active_session = g_object_ref (session);
 276 }
 277
 278 Session *
 279 seat_get_active_session (Seat *seat)
 280 {
 281     g_return_val_if_fail (seat != NULL, NULL);
 282     return SEAT_GET_CLASS (seat)->get_active_session (seat);
 283 }
 284
 285 Session *
 286 seat_get_next_session (Seat *seat)
 287 {
 288     g_return_val_if_fail (seat != NULL, NULL);
 289     return seat->priv->next_session;
 290 }
 291
 292 /**
 293  * Obtains the active session which lightdm expects to be active.
 294  *
 295  * This function is different from seat_get_active_session() in that the
 296  * later (in the case of xlocal seats) dynamically finds the session that is
 297  * really active (based on the active VT), whereas this function returns the
 298  * session that lightdm activated last by itself, which may not be the actual
 299  * active session (i.e. VT changes).
 300  */
 301 Session *
 302 seat_get_expected_active_session (Seat *seat)
 303 {
 304     g_return_val_if_fail (seat != NULL, NULL);
 305     return seat->priv->active_session;
 306 }
 307
 308 /**
 309  * Sets the active session which lightdm expects to be active.
 310  *
 311  * This function is different from seat_set_active_session() in that the
 312  * later performs an actual session activation, whereas this function just
 313  * updates the active session after the session has been activated by some
 314  * means external to lightdm (i.e. VT changes).
 315  */
 316 void
 317 seat_set_externally_activated_session (Seat *seat, Session *session)
 318 {
 319     g_return_if_fail (seat != NULL);
 320     g_clear_object (&seat->priv->active_session);
 321     seat->priv->active_session = g_object_ref (session);
 322 }
 323
 324 Session *
 325 seat_find_session_by_login1_id (Seat *seat, const gchar *login1_session_id)
 326 {
 327     GList *session_link;
 328
 329     for (session_link = seat->priv->sessions; session_link; session_link = session_link->next)
 330     {
 331         Session *session = session_link->data;
 332         if (g_strcmp0 (login1_session_id, session_get_login1_session_id (session)) == 0)
 333             return session;
 334     }
 335
 336     return NULL;
 337 }
 338
 339 gboolean
 340 seat_get_can_switch (Seat *seat)
 341 {
 342     g_return_val_if_fail (seat != NULL, FALSE);
 343     return seat_get_boolean_property (seat, "allow-user-switching") && seat->priv->supports_multi_session;
 344 }
 345
 346 gboolean
 347 seat_get_allow_guest (Seat *seat)
 348 {
 349     g_return_val_if_fail (seat != NULL, FALSE);
 350     return seat_get_boolean_property (seat, "allow-guest") && guest_account_is_installed ();
 351 }
 352
 353 static gboolean
 354 run_script (Seat *seat, DisplayServer *display_server, const gchar *script_name, User *user)
 355 {
 356     Process *script;
 357     gboolean result = FALSE;
 358
 359     script = process_new (NULL, NULL);
 360
 361     process_set_command (script, script_name);
 362
 363     /* Set POSIX variables */
 364     process_set_clear_environment (script, TRUE);
 365     process_set_env (script, "SHELL", "/bin/sh");
 366
 367     /* Variables required for regression tests */
 368     if (g_getenv ("LIGHTDM_TEST_ROOT"))
 369     {
 370         process_set_env (script, "LIGHTDM_TEST_ROOT", g_getenv ("LIGHTDM_TEST_ROOT"));
 371         process_set_env (script, "LD_PRELOAD", g_getenv ("LD_PRELOAD"));
 372         process_set_env (script, "LD_LIBRARY_PATH", g_getenv ("LD_LIBRARY_PATH"));
 373         process_set_env (script, "PATH", g_getenv ("PATH"));
 374     }
 375     else
 376         process_set_env (script, "PATH", "/usr/local/bin:/usr/bin:/bin");
 377
 378     if (user)
 379     {
 380         process_set_env (script, "USER", user_get_name (user));
 381         process_set_env (script, "LOGNAME", user_get_name (user));
 382         process_set_env (script, "HOME", user_get_home_directory (user));
 383     }
 384     else
 385         process_set_env (script, "HOME", "/");
 386
 387     SEAT_GET_CLASS (seat)->run_script (seat, display_server, script);
 388
 389     if (process_start (script, TRUE))
 390     {
 391         int exit_status;
 392
 393         exit_status = process_get_exit_status (script);
 394         if (WIFEXITED (exit_status))
 395         {
 396             l_debug (seat, "Exit status of %s: %d", script_name, WEXITSTATUS (exit_status));
 397             result = WEXITSTATUS (exit_status) == EXIT_SUCCESS;
 398         }
 399     }
 400
 401     g_object_unref (script);
 402
 403     return result;
 404 }
 405
 406 static void
 407 seat_real_run_script (Seat *seat, DisplayServer *display_server, Process *process)
 408 {
 409 }
 410
 411 static void
 412 emit_upstart_signal (const gchar *signal)
 413 {
 414     g_return_if_fail (signal != NULL);
 415     g_return_if_fail (signal[0] != 0);
 416     GSubprocess *p;
 417
 418     if (getuid () != 0)
 419         return;
 420
 421     /* OK if it fails, probably not installed or not running upstart */
 422     p = g_subprocess_new (G_SUBPROCESS_FLAGS_STDERR_SILENCE, NULL, "initctl", "-q", "emit", signal, "DISPLAY_MANAGER=lightdm", NULL);
 423     g_object_unref (p);
 424 }
 425
 426 static void
 427 check_stopped (Seat *seat)
 428 {
 429     if (seat->priv->stopping &&
 430         !seat->priv->stopped &&
 431         g_list_length (seat->priv->display_servers) == 0 &&
 432         g_list_length (seat->priv->sessions) == 0)
 433     {
 434         seat->priv->stopped = TRUE;
 435         l_debug (seat, "Stopped");
 436         g_signal_emit (seat, signals[STOPPED], 0);
 437     }
 438 }
 439
 440 static void
 441 display_server_stopped_cb (DisplayServer *display_server, Seat *seat)
 442 {
 443     const gchar *script;
 444     GList *list, *link;
 445     Session *active_session;
 446
 447     l_debug (seat, "Display server stopped");
 448
 449     /* Run a script right after stopping the display server */
 450     script = seat_get_string_property (seat, "display-stopped-script");
 451     if (script)
 452         run_script (seat, NULL, script, NULL);
 453
 454     g_signal_handlers_disconnect_matched (display_server, G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, seat);
 455     seat->priv->display_servers = g_list_remove (seat->priv->display_servers, display_server);
 456
 457     if (seat->priv->stopping || !seat->priv->started)
 458     {
 459         check_stopped (seat);
 460         g_object_unref (display_server);
 461         return;
 462     }
 463
 464     /* Stop all sessions on this display server */
 465     list = g_list_copy (seat->priv->sessions);
 466     for (link = list; link; link = link->next)
 467         g_object_ref (link->data);
 468     for (link = list; link; link = link->next)
 469     {
 470         Session *session = link->data;
 471
 472         if (session_get_display_server (session) != display_server || session_get_is_stopping (session))
 473             continue;
 474
 475         /* Stop seat if this is the only display server and it failed to start a greeter */
 476         if (IS_GREETER_SESSION (session) &&
 477             !session_get_is_started (session) &&
 478             g_list_length (seat->priv->display_servers) == 0)
 479         {
 480             l_debug (seat, "Stopping; greeter display server failed to start");
 481             seat_stop (seat);
 482         }
 483
 484         l_debug (seat, "Stopping session");
 485         session_stop (session);
 486     }
 487     g_list_free_full (list, g_object_unref);
 488
 489     if (!seat->priv->stopping)
 490     {
 491         /* If we were the active session, switch to a greeter */
 492         active_session = seat_get_active_session (seat);
 493         if (!active_session || session_get_display_server (active_session) == display_server)
 494         {
 495             l_debug (seat, "Active display server stopped, starting greeter");
 496             if (!seat_switch_to_greeter (seat))
 497             {
 498                 l_debug (seat, "Stopping; failed to start a greeter");
 499                 seat_stop (seat);
 500             }
 501         }
 502     }
 503
 504     g_object_unref (display_server);
 505 }
 506
 507 static gboolean
 508 can_share_display_server (Seat *seat, DisplayServer *display_server)
 509 {
 510     return seat->priv->share_display_server && display_server_get_can_share (display_server);
 511 }
 512
 513 static GreeterSession *
 514 find_greeter_session (Seat *seat)
 515 {
 516     GList *link;
 517
 518     for (link = seat->priv->sessions; link; link = link->next)
 519     {
 520         Session *session = link->data;
 521         if (!session_get_is_stopping (session) && IS_GREETER_SESSION (session))
 522             return GREETER_SESSION (session);
 523     }
 524
 525     return NULL;
 526 }
 527
 528 static GreeterSession *
 529 find_resettable_greeter (Seat *seat)
 530 {
 531     GList *link;
 532
 533     for (link = seat->priv->sessions; link; link = link->next)
 534     {
 535         Session *session = link->data;
 536         if (!session_get_is_stopping (session) && IS_GREETER_SESSION (session) &&
 537             greeter_get_resettable (greeter_session_get_greeter (GREETER_SESSION (session))))
 538             return GREETER_SESSION (session);
 539     }
 540
 541     return NULL;
 542 }
 543
 544 static void
 545 set_greeter_hints (Seat *seat, Greeter *greeter)
 546 {
 547     greeter_clear_hints (greeter);
 548     greeter_set_hint (greeter, "default-session", seat_get_string_property (seat, "user-session"));
 549     greeter_set_hint (greeter, "hide-users", seat_get_boolean_property (seat, "greeter-hide-users") ? "true" : "false");
 550     greeter_set_hint (greeter, "show-manual-login", seat_get_boolean_property (seat, "greeter-show-manual-login") ? "true" : "false");
 551     greeter_set_hint (greeter, "show-remote-login", seat_get_boolean_property (seat, "greeter-show-remote-login") ? "true" : "false");
 552     greeter_set_hint (greeter, "has-guest-account", seat_get_allow_guest (seat) && seat_get_boolean_property (seat, "greeter-allow-guest") ? "true" : "false");
 553 }
 554
 555 static void
 556 switch_to_greeter_from_failed_session (Seat *seat, Session *session)
 557 {
 558     GreeterSession *greeter_session;
 559     Greeter *greeter;
 560     gboolean existing = FALSE;
 561
 562     /* Switch to greeter if one open */
 563     greeter_session = find_resettable_greeter (seat);
 564     if (greeter_session)
 565     {
 566         l_debug (seat, "Switching to existing greeter");
 567         set_greeter_hints (seat, greeter_session_get_greeter (greeter_session));
 568         existing = TRUE;
 569     }
 570     else
 571     {
 572         greeter_session = create_greeter_session (seat);
 573     }
 574     greeter = greeter_session_get_greeter (greeter_session);
 575
 576     if (session_get_is_guest (session))
 577         greeter_set_hint (greeter, "select-guest", "true");
 578     else
 579         greeter_set_hint (greeter, "select-user", session_get_username (session));
 580
 581     if (existing)
 582     {
 583         greeter_reset (greeter);
 584         seat_set_active_session (seat, SESSION (greeter_session));
 585     }
 586     else
 587     {
 588         g_clear_object (&seat->priv->session_to_activate);
 589         seat->priv->session_to_activate = g_object_ref (greeter_session);
 590
 591         if (can_share_display_server (seat, session_get_display_server (session)))
 592             session_set_display_server (SESSION (greeter_session), session_get_display_server (session));
 593         else
 594         {
 595             DisplayServer *display_server;
 596
 597             display_server = create_display_server (seat, session);
 598             session_set_display_server (session, display_server);
 599             if (!display_server_start (display_server))
 600             {
 601                 l_debug (seat, "Failed to start display server for greeter");
 602                 seat_stop (seat);
 603             }
 604         }
 605
 606         start_session (seat, SESSION (greeter_session));
 607     }
 608
 609     /* Stop failed session */
 610     session_stop (session);
 611 }
 612
 613 static void
 614 start_session (Seat *seat, Session *session)
 615 {
 616     /* Use system location for greeter log file */
 617     if (IS_GREETER_SESSION (session))
 618     {
 619         gchar *log_dir, *filename, *log_filename;
 620         gboolean backup_logs;
 621
 622         log_dir = config_get_string (config_get_instance (), "LightDM", "log-directory");
 623         filename = g_strdup_printf ("%s-greeter.log", display_server_get_name (session_get_display_server (session)));
 624         log_filename = g_build_filename (log_dir, filename, NULL);
 625         g_free (log_dir);
 626         g_free (filename);
 627         backup_logs = config_get_boolean (config_get_instance (), "LightDM", "backup-logs");
 628         session_set_log_file (session, log_filename, backup_logs ? LOG_MODE_BACKUP_AND_TRUNCATE : LOG_MODE_APPEND);
 629         g_free (log_filename);
 630     }
 631
 632     if (session_start (session))
 633         return;
 634
 635     if (IS_GREETER_SESSION (session))
 636     {
 637         l_debug (seat, "Failed to start greeter");
 638         display_server_stop (session_get_display_server (session));
 639         return;
 640     }
 641
 642     l_debug (seat, "Failed to start session, starting greeter");
 643     switch_to_greeter_from_failed_session (seat, session);
 644 }
 645
 646 static void
 647 run_session (Seat *seat, Session *session)
 648 {
 649     const gchar *script;
 650
 651     if (IS_GREETER_SESSION (session))
 652         script = seat_get_string_property (seat, "greeter-setup-script");
 653     else
 654         script = seat_get_string_property (seat, "session-setup-script");
 655     if (script && !run_script (seat, session_get_display_server (session), script, session_get_user (session)))
 656     {
 657         l_debug (seat, "Switching to greeter due to failed setup script");
 658         switch_to_greeter_from_failed_session (seat, session);
 659         return;
 660     }
 661
 662     if (!IS_GREETER_SESSION (session))
 663     {
 664         g_signal_emit (seat, signals[RUNNING_USER_SESSION], 0, session);
 665         emit_upstart_signal ("desktop-session-start");
 666     }
 667
 668     session_run (session);
 669
 670     // FIXME: Wait until the session is ready
 671
 672     if (session == seat->priv->session_to_activate)
 673     {
 674         seat_set_active_session (seat, session);
 675         g_clear_object (&seat->priv->session_to_activate);
 676     }
 677     else if (seat->priv->active_session)
 678     {
 679         /* Multiple sessions can theoretically be on the same VT (especially
 680            if using Mir).  If a new session appears on an existing active VT,
 681            logind will mark it as active, while ConsoleKit will re-mark the
 682            oldest session as active.  In either case, that may not be the
 683            session that we want to be active.  So let's be explicit and
 684            re-activate the correct session whenever a new session starts.
 685            There's no harm to do this in seats that enforce separate VTs. */
 686         session_activate (seat->priv->active_session);
 687     }
 688 }
 689
 690 static Session *
 691 find_user_session (Seat *seat, const gchar *username, Session *ignore_session)
 692 {
 693     GList *link;
 694
 695     if (!username)
 696         return NULL;
 697
 698     for (link = seat->priv->sessions; link; link = link->next)
 699     {
 700         Session *session = link->data;
 701
 702         if (session == ignore_session)
 703             continue;
 704
 705         if (!session_get_is_stopping (session) && g_strcmp0 (session_get_username (session), username) == 0)
 706             return session;
 707     }
 708
 709     return NULL;
 710 }
 711
 712 static void
 713 greeter_active_username_changed_cb (Greeter *greeter, GParamSpec *pspec, Seat *seat)
 714 {
 715     Session *session;
 716
 717     session = find_user_session (seat, greeter_get_active_username (greeter), seat->priv->active_session);
 718
 719     g_clear_object (&seat->priv->next_session);
 720     seat->priv->next_session = session ? g_object_ref (session) : NULL;
 721
 722     SEAT_GET_CLASS (seat)->set_next_session (seat, session);
 723 }
 724
 725 static void
 726 session_authentication_complete_cb (Session *session, Seat *seat)
 727 {
 728     if (session_get_is_authenticated (session))
 729     {
 730         Session *s;
 731
 732         s = find_user_session (seat, session_get_username (session), session);
 733         if (s)
 734         {
 735             l_debug (seat, "Session authenticated, switching to existing user session");
 736             seat_set_active_session (seat, s);
 737             session_stop (session);
 738         }
 739         else
 740         {
 741             l_debug (seat, "Session authenticated, running command");
 742             run_session (seat, session);
 743         }
 744     }
 745     else if (!IS_GREETER_SESSION (session))
 746     {
 747         l_debug (seat, "Switching to greeter due to failed authentication");
 748         switch_to_greeter_from_failed_session (seat, session);
 749     }
 750     else
 751     {
 752         l_debug (seat, "Stopping session that failed authentication");
 753         session_stop (session);
 754     }
 755 }
 756
 757 static void
 758 session_stopped_cb (Session *session, Seat *seat)
 759 {
 760     DisplayServer *display_server;
 761
 762     l_debug (seat, "Session stopped");
 763
 764     g_signal_handlers_disconnect_matched (session, G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, seat);
 765     seat->priv->sessions = g_list_remove (seat->priv->sessions, session);
 766     if (session == seat->priv->active_session)
 767         g_clear_object (&seat->priv->active_session);
 768     if (session == seat->priv->next_session)
 769         g_clear_object (&seat->priv->next_session);
 770     if (session == seat->priv->session_to_activate)
 771         g_clear_object (&seat->priv->session_to_activate);
 772
 773     display_server = session_get_display_server (session);
 774     if (!display_server)
 775     {
 776         g_object_unref (session);
 777         return;
 778     }
 779
 780     /* Cleanup */
 781     if (!IS_GREETER_SESSION (session))
 782     {
 783         const gchar *script;
 784         script = seat_get_string_property (seat, "session-cleanup-script");
 785         if (script)
 786             run_script (seat, display_server, script, session_get_user (session));
 787     }
 788
 789     /* We were waiting for this session, but it didn't start :( */
 790     // FIXME: Start a greeter on this?
 791     if (session == seat->priv->session_to_activate)
 792         g_clear_object (&seat->priv->session_to_activate);
 793
 794     if (seat->priv->stopping)
 795     {
 796         check_stopped (seat);
 797         g_object_unref (session);
 798         return;
 799     }
 800
 801     /* If there is a pending replacement greeter, start it */
 802     if (IS_GREETER_SESSION (session) && seat->priv->replacement_greeter)
 803     {
 804         GreeterSession *replacement_greeter = seat->priv->replacement_greeter;
 805         seat->priv->replacement_greeter = NULL;
 806
 807         if (session_get_is_authenticated (SESSION (replacement_greeter)))
 808         {
 809             l_debug (seat, "Greeter stopped, running session");
 810             run_session (seat, SESSION (replacement_greeter));
 811         }
 812         else
 813         {
 814             l_debug (seat, "Greeter stopped, starting session authentication");
 815             start_session (seat, SESSION (replacement_greeter));
 816         }
 817
 818         g_object_unref (replacement_greeter);
 819     }
 820     /* If this is the greeter session then re-use this display server */
 821     else if (IS_GREETER_SESSION (session) &&
 822         can_share_display_server (seat, display_server) &&
 823         greeter_get_start_session (greeter_session_get_greeter (GREETER_SESSION (session))))
 824     {
 825         GList *link;
 826
 827         for (link = seat->priv->sessions; link; link = link->next)
 828         {
 829             Session *s = link->data;
 830
 831             /* Skip this session and sessions on other display servers */
 832             if (s == session || session_get_display_server (s) != display_server || session_get_is_stopping (s))
 833                 continue;
 834
 835             if (session_get_is_authenticated (s))
 836             {
 837                 l_debug (seat, "Greeter stopped, running session");
 838                 run_session (seat, s);
 839             }
 840             else
 841             {
 842                 l_debug (seat, "Greeter stopped, starting session authentication");
 843                 start_session (seat, s);
 844             }
 845             break;
 846         }
 847     }
 848     /* If this is the greeter and nothing else is running then stop the seat */
 849     else if (IS_GREETER_SESSION (session) &&
 850         !greeter_get_start_session (greeter_session_get_greeter (GREETER_SESSION (session))) &&
 851         g_list_length (seat->priv->display_servers) == 1 &&
 852         g_list_nth_data (seat->priv->display_servers, 0) == display_server)
 853     {
 854         l_debug (seat, "Stopping; failed to start a greeter");
 855         seat_stop (seat);
 856     }
 857     /* If we were the active session, switch to a greeter */
 858     else if (!IS_GREETER_SESSION (session) && session == seat_get_active_session (seat))
 859     {
 860         l_debug (seat, "Active session stopped, starting greeter");
 861         if (!seat_switch_to_greeter (seat))
 862         {
 863             l_debug (seat, "Stopping; failed to start a greeter");
 864             seat_stop (seat);
 865         }
 866     }
 867
 868     /* Stop the display server if no-longer required */
 869     if (display_server && !display_server_get_is_stopping (display_server))
 870     {
 871         GList *link;
 872         int n_sessions = 0;
 873
 874         for (link = seat->priv->sessions; link; link = link->next)
 875         {
 876             Session *s = link->data;
 877             if (s == session)
 878                 continue;
 879             if (session_get_display_server (s) == display_server)
 880                 n_sessions++;
 881         }
 882         if (n_sessions == 0)
 883         {
 884             l_debug (seat, "Stopping display server, no sessions require it");
 885             display_server_stop (display_server);
 886         }
 887     }
 888
 889     g_signal_emit (seat, signals[SESSION_REMOVED], 0, session);
 890     g_object_unref (session);
 891 }
 892
 893 static void
 894 set_session_env (Session *session)
 895 {
 896     /* Connect using the session bus */
 897     if (getuid () != 0)
 898     {
 899         if (g_getenv ("DBUS_SESSION_BUS_ADDRESS"))
 900             session_set_env (session, "DBUS_SESSION_BUS_ADDRESS", g_getenv ("DBUS_SESSION_BUS_ADDRESS"));
 901         session_set_env (session, "LDM_BUS", "SESSION");
 902         if (g_getenv ("LD_PRELOAD"))
 903             session_set_env (session, "LD_PRELOAD", g_getenv ("LD_PRELOAD"));
 904         if (g_getenv ("LD_LIBRARY_PATH"))
 905             session_set_env (session, "LD_LIBRARY_PATH", g_getenv ("LD_LIBRARY_PATH"));
 906         if (g_getenv ("PATH"))
 907             session_set_env (session, "PATH", g_getenv ("PATH"));
 908     }
 909
 910     /* Variables required for regression tests */
 911     if (g_getenv ("LIGHTDM_TEST_ROOT"))
 912     {
 913         session_set_env (session, "LIGHTDM_TEST_ROOT", g_getenv ("LIGHTDM_TEST_ROOT"));
 914         session_set_env (session, "DBUS_SYSTEM_BUS_ADDRESS", g_getenv ("DBUS_SYSTEM_BUS_ADDRESS"));
 915         session_set_env (session, "DBUS_SESSION_BUS_ADDRESS", g_getenv ("DBUS_SESSION_BUS_ADDRESS"));
 916         session_set_env (session, "LD_PRELOAD", g_getenv ("LD_PRELOAD"));
 917         session_set_env (session, "LD_LIBRARY_PATH", g_getenv ("LD_LIBRARY_PATH"));
 918         session_set_env (session, "GI_TYPELIB_PATH", g_getenv ("GI_TYPELIB_PATH"));
 919     }
 920 }
 921
 922 static Session *
 923 create_session (Seat *seat, gboolean autostart)
 924 {
 925     Session *session;
 926
 927     session = SEAT_GET_CLASS (seat)->create_session (seat);
 928     seat->priv->sessions = g_list_append (seat->priv->sessions, session);
 929     if (autostart)
 930         g_signal_connect (session, SESSION_SIGNAL_AUTHENTICATION_COMPLETE, G_CALLBACK (session_authentication_complete_cb), seat);
 931     g_signal_connect (session, SESSION_SIGNAL_STOPPED, G_CALLBACK (session_stopped_cb), seat);
 932
 933     set_session_env (session);
 934
 935     g_signal_emit (seat, signals[SESSION_ADDED], 0, session);
 936
 937     return session;
 938 }
 939
 940 static gchar **
 941 get_session_argv (Seat *seat, SessionConfig *session_config, const gchar *session_wrapper)
 942 {
 943     gboolean result;
 944     int argc;
 945     gchar **argv, *path;
 946     GError *error = NULL;
 947
 948     /* If configured, run sessions through a wrapper */
 949     if (session_wrapper)
 950     {
 951         argv = g_malloc (sizeof (gchar *) * 3);
 952         path = g_find_program_in_path (session_wrapper);
 953         argv[0] = path ? path : g_strdup (session_wrapper);
 954         argv[1] = g_strdup (session_config_get_command (session_config));
 955         argv[2] = NULL;
 956         return argv;
 957     }
 958
 959     /* Split command into an array listing and make command absolute */
 960     result = g_shell_parse_argv (session_config_get_command (session_config), &argc, &argv, &error);
 961     if (error)
 962         l_debug (seat, "Invalid session command '%s': %s", session_config_get_command (session_config), error->message);
 963     g_clear_error (&error);
 964     if (!result)
 965         return NULL;
 966     path = g_find_program_in_path (argv[0]);
 967     if (path)
 968     {
 969         g_free (argv[0]);
 970         argv[0] = path;
 971     }
 972
 973     return argv;
 974 }
 975
 976 static SessionConfig *
 977 find_session_config (Seat *seat, const gchar *sessions_dir, const gchar *session_name)
 978 {
 979     gchar **dirs;
 980     SessionConfig *session_config = NULL;
 981     int i;
 982     GError *error = NULL;
 983
 984     g_return_val_if_fail (sessions_dir != NULL, NULL);
 985     g_return_val_if_fail (session_name != NULL, NULL);
 986
 987     dirs = g_strsplit (sessions_dir, ":", -1);
 988     for (i = 0; dirs[i]; i++)
 989     {
 990         gchar *filename, *path;
 991         const gchar *default_session_type = "x";
 992
 993         if (strcmp (dirs[i], WAYLAND_SESSIONS_DIR) == 0)
 994             default_session_type = "wayland";
 995
 996         filename = g_strdup_printf ("%s.desktop", session_name);
 997         path = g_build_filename (dirs[i], filename, NULL);
 998         g_free (filename);
 999         session_config = session_config_new_from_file (path, default_session_type, &error);
1000         g_free (path);
1001         if (session_config)
1002             break;
1003
1004         if (dirs[i+1] == NULL)
1005             l_debug (seat, "Failed to find session configuration %s", session_name);
1006         g_clear_error (&error);
1007     }
1008     g_strfreev (dirs);
1009
1010     return session_config;
1011 }
1012
1013 static void
1014 configure_session (Session *session, SessionConfig *config, const gchar *session_name, const gchar *language)
1015 {
1016     gchar **desktop_names;
1017
1018     session_set_config (session, config);
1019     session_set_env (session, "XDG_SESSION_DESKTOP", session_name);
1020     session_set_env (session, "DESKTOP_SESSION", session_name);
1021     session_set_env (session, "GDMSESSION", session_name);
1022     desktop_names = session_config_get_desktop_names (config);
1023     if (desktop_names)
1024     {
1025         gchar *value;
1026         value = g_strjoinv (":", desktop_names);
1027         session_set_env (session, "XDG_CURRENT_DESKTOP", value);
1028         g_free (value);
1029     }
1030     if (language && language[0] != '\0')
1031     {
1032         session_set_env (session, "LANG", language);
1033         session_set_env (session, "GDM_LANG", language);
1034     }
1035 }
1036
1037 static Session *
1038 create_user_session (Seat *seat, const gchar *username, gboolean autostart)
1039 {
1040     User *user;
1041     gchar *sessions_dir;
1042     const gchar *session_name, *language;
1043     SessionConfig *session_config;
1044     Session *session = NULL;
1045
1046     l_debug (seat, "Creating user session");
1047
1048     /* Load user preferences */
1049     user = accounts_get_user_by_name (username);
1050     if (!user)
1051     {
1052         l_debug (seat, "Can't login unknown user '%s'", username);
1053         return NULL;
1054     }
1055     session_name = user_get_xsession (user);
1056     language = user_get_language (user);
1057
1058     /* Override session for autologin if configured */
1059     if (autostart)
1060     {
1061         const gchar *autologin_session_name = seat_get_string_property (seat, "autologin-session");
1062         if (autologin_session_name)
1063             session_name = autologin_session_name;
1064     }
1065
1066     if (!session_name)
1067         session_name = seat_get_string_property (seat, "user-session");
1068     sessions_dir = config_get_string (config_get_instance (), "LightDM", "sessions-directory");
1069     session_config = find_session_config (seat, sessions_dir, session_name);
1070     g_free (sessions_dir);
1071     if (session_config)
1072     {
1073         gchar **argv;
1074
1075         session = create_session (seat, autostart);
1076         configure_session (session, session_config, session_name, language);
1077         session_set_username (session, username);
1078         session_set_do_authenticate (session, TRUE);
1079         argv = get_session_argv (seat, session_config, seat_get_string_property (seat, "session-wrapper"));
1080         session_set_argv (session, argv);
1081         g_strfreev (argv);
1082         g_object_unref (session_config);
1083     }
1084     else
1085         l_debug (seat, "Can't find session '%s'", session_name);
1086
1087     g_object_unref (user);
1088
1089     return session;
1090 }
1091
1092 static void
1093 prepend_argv (gchar ***argv, const gchar *value)
1094 {
1095     gchar **old_argv, **new_argv;
1096     gint i;
1097
1098     old_argv = *argv;
1099     new_argv = g_malloc (sizeof (gchar *) * (g_strv_length (*argv) + 2));
1100     new_argv[0] = g_strdup (value);
1101     for (i = 0; old_argv[i]; i++)
1102         new_argv[i + 1] = old_argv[i];
1103     new_argv[i + 1] = NULL;
1104
1105     g_free (*argv);
1106     *argv = new_argv;
1107 }
1108
1109 static Session *
1110 create_guest_session (Seat *seat, const gchar *session_name)
1111 {
1112     const gchar *guest_wrapper;
1113     gchar *sessions_dir, **argv;
1114     SessionConfig *session_config;
1115     Session *session;
1116
1117     if (!session_name)
1118         session_name = seat_get_string_property (seat, "guest-session");
1119     if (!session_name)
1120         session_name = seat_get_string_property (seat, "user-session");
1121     sessions_dir = config_get_string (config_get_instance (), "LightDM", "sessions-directory");
1122     session_config = find_session_config (seat, sessions_dir, session_name);
1123     g_free (sessions_dir);
1124     if (!session_config)
1125     {
1126         l_debug (seat, "Can't find session '%s'", session_name);
1127         return NULL;
1128     }
1129
1130     session = create_session (seat, TRUE);
1131     configure_session (session, session_config, session_name, NULL);
1132     session_set_do_authenticate (session, TRUE);
1133     session_set_is_guest (session, TRUE);
1134     argv = get_session_argv (seat, session_config, seat_get_string_property (seat, "session-wrapper"));
1135     guest_wrapper = seat_get_string_property (seat, "guest-wrapper");
1136     if (guest_wrapper)
1137     {
1138         gchar *path;
1139         path = g_find_program_in_path (guest_wrapper);
1140         prepend_argv (&argv, path ? path : guest_wrapper);
1141         g_free (path);
1142     }
1143
1144     session_set_argv (session, argv);
1145     g_strfreev (argv);
1146     g_object_unref (session_config);
1147
1148     return session;
1149 }
1150
1151 // FIXME: This is inefficient and we already know the greeter session when we set the callbacks...
1152 static Session *
1153 get_greeter_session (Seat *seat, Greeter *greeter)
1154 {
1155     GList *link;
1156
1157     /* Stop any greeters */
1158     for (link = seat->priv->sessions; link; link = link->next)
1159     {
1160         Session *session = link->data;
1161
1162         if (IS_GREETER_SESSION (session) && greeter_session_get_greeter (GREETER_SESSION (session)))
1163             return session;
1164     }
1165
1166     return NULL;
1167 }
1168
1169 static Session *
1170 greeter_create_session_cb (Greeter *greeter, Seat *seat)
1171 {
1172     Session *greeter_session, *session;
1173
1174     greeter_session = get_greeter_session (seat, greeter);
1175     session = create_session (seat, FALSE);
1176     session_set_config (session, session_get_config (greeter_session));
1177     session_set_display_server (session, session_get_display_server (greeter_session));
1178
1179     return g_object_ref (session);
1180 }
1181
1182 static gboolean
1183 greeter_start_session_cb (Greeter *greeter, SessionType type, const gchar *session_name, Seat *seat)
1184 {
1185     Session *session, *existing_session, *greeter_session;
1186     const gchar *username;
1187     DisplayServer *display_server;
1188
1189     /* Get the session to use */
1190     if (greeter_get_guest_authenticated (greeter))
1191     {
1192         session = create_guest_session (seat, session_name);
1193         if (!session)
1194             return FALSE;
1195         session_set_pam_service (session, seat_get_string_property (seat, "pam-autologin-service"));
1196     }
1197     else
1198     {
1199         const gchar *language = NULL;
1200         SessionConfig *session_config;
1201         User *user;
1202         gchar *sessions_dir = NULL;
1203         gchar **argv;
1204
1205         session = greeter_get_authentication_session (greeter);
1206
1207         /* Get session command to run */
1208         switch (type)
1209         {
1210         case SESSION_TYPE_LOCAL:
1211             sessions_dir = config_get_string (config_get_instance (), "LightDM", "sessions-directory");
1212             break;
1213         case SESSION_TYPE_REMOTE:
1214             sessions_dir = config_get_string (config_get_instance (), "LightDM", "remote-sessions-directory");
1215             break;
1216         }
1217
1218         /* Load user preferences */
1219         user = session_get_user (session);
1220         if (user)
1221         {
1222             if (!session_name)
1223                 session_name = user_get_xsession (user);
1224             language = user_get_language (user);
1225         }
1226
1227         if (!session_name)
1228             session_name = seat_get_string_property (seat, "user-session");
1229         if (user)
1230             user_set_xsession (session_get_user (session), session_name);
1231
1232         session_config = find_session_config (seat, sessions_dir, session_name);
1233         g_free (sessions_dir);
1234         if (!session_config)
1235         {
1236             l_debug (seat, "Can't find session '%s'", session_name);
1237             return FALSE;
1238         }
1239
1240         configure_session (session, session_config, session_name, language);
1241         argv = get_session_argv (seat, session_config, seat_get_string_property (seat, "session-wrapper"));
1242         session_set_argv (session, argv);
1243         g_strfreev (argv);
1244         g_object_unref (session_config);
1245     }
1246
1247     /* Switch to this session when it is ready */
1248     g_clear_object (&seat->priv->session_to_activate);
1249     seat->priv->session_to_activate = g_object_ref (session);
1250
1251     /* Return to existing session if it is open */
1252     username = session_get_username (session);
1253     existing_session = find_user_session (seat, username, NULL);
1254     if (existing_session && session != existing_session)
1255     {
1256         l_debug (seat, "Returning to existing user session %s", username);
1257         session_stop (session);
1258         session_unlock (existing_session);
1259         seat_set_active_session (seat, existing_session);
1260         return TRUE;
1261     }
1262
1263     /* If can re-use the display server, stop the greeter first */
1264     greeter_session = get_greeter_session (seat, greeter);
1265     display_server = session_get_display_server (greeter_session);
1266     if (!greeter_get_resettable (greeter) &&
1267         can_share_display_server (seat, display_server) &&
1268         strcmp (display_server_get_session_type (display_server), session_get_session_type (session)) == 0)
1269     {
1270         l_debug (seat, "Stopping greeter; display server will be re-used for user session");
1271
1272         /* Run on the same display server after the greeter has stopped */
1273         session_set_display_server (session, display_server);
1274
1275         /* Stop the greeter */
1276         session_stop (greeter_session);
1277
1278         return TRUE;
1279     }
1280     /* Otherwise start a new display server for this session */
1281     else
1282     {
1283         display_server = create_display_server (seat, session);
1284         session_set_display_server (session, display_server);
1285         if (!display_server_start (display_server))
1286         {
1287             l_debug (seat, "Failed to start display server for new session");
1288             return FALSE;
1289         }
1290
1291         return TRUE;
1292     }
1293 }
1294
1295 static GreeterSession *
1296 create_greeter_session (Seat *seat)
1297 {
1298     gchar *sessions_dir, **argv;
1299     SessionConfig *session_config;
1300     GreeterSession *greeter_session;
1301     Greeter *greeter;
1302     const gchar *greeter_wrapper;
1303     const gchar *autologin_username;
1304     int autologin_timeout;
1305     gboolean autologin_guest;
1306
1307     l_debug (seat, "Creating greeter session");
1308
1309     sessions_dir = config_get_string (config_get_instance (), "LightDM", "greeters-directory");
1310     session_config = find_session_config (seat, sessions_dir, seat_get_string_property (seat, "greeter-session"));
1311     g_free (sessions_dir);
1312     if (!session_config)
1313         return NULL;
1314
1315     argv = get_session_argv (seat, session_config, NULL);
1316     greeter_wrapper = seat_get_string_property (seat, "greeter-wrapper");
1317     if (greeter_wrapper)
1318     {
1319         gchar *path;
1320         path = g_find_program_in_path (greeter_wrapper);
1321         prepend_argv (&argv, path ? path : greeter_wrapper);
1322         g_free (path);
1323     }
1324
1325     greeter_session = SEAT_GET_CLASS (seat)->create_greeter_session (seat);
1326     greeter = greeter_session_get_greeter (greeter_session);
1327     session_set_config (SESSION (greeter_session), session_config);
1328     seat->priv->sessions = g_list_append (seat->priv->sessions, SESSION (greeter_session));
1329     g_signal_connect (greeter, GREETER_SIGNAL_ACTIVE_USERNAME_CHANGED, G_CALLBACK (greeter_active_username_changed_cb), seat);
1330     g_signal_connect (greeter_session, SESSION_SIGNAL_AUTHENTICATION_COMPLETE, G_CALLBACK (session_authentication_complete_cb), seat);
1331     g_signal_connect (greeter_session, SESSION_SIGNAL_STOPPED, G_CALLBACK (session_stopped_cb), seat);
1332
1333     set_session_env (SESSION (greeter_session));
1334     session_set_env (SESSION (greeter_session), "XDG_SESSION_CLASS", "greeter");
1335
1336     session_set_pam_service (SESSION (greeter_session), seat_get_string_property (seat, "pam-greeter-service"));
1337     if (getuid () == 0)
1338     {
1339         gchar *greeter_user;
1340         greeter_user = config_get_string (config_get_instance (), "LightDM", "greeter-user");
1341         session_set_username (SESSION (greeter_session), greeter_user);
1342         g_free (greeter_user);
1343     }
1344     else
1345     {
1346         /* In test mode run the greeter as ourself */
1347         session_set_username (SESSION (greeter_session), user_get_name (accounts_get_current_user ()));
1348     }
1349     session_set_argv (SESSION (greeter_session), argv);
1350     g_strfreev (argv);
1351
1352     greeter_set_pam_services (greeter,
1353                               seat_get_string_property (seat, "pam-service"),
1354                               seat_get_string_property (seat, "pam-autologin-service"));
1355     g_signal_connect (greeter, GREETER_SIGNAL_CREATE_SESSION, G_CALLBACK (greeter_create_session_cb), seat);
1356     g_signal_connect (greeter, GREETER_SIGNAL_START_SESSION, G_CALLBACK (greeter_start_session_cb), seat);
1357
1358     /* Set hints to greeter */
1359     greeter_set_allow_guest (greeter, seat_get_allow_guest (seat));
1360     set_greeter_hints (seat, greeter);
1361
1362     /* Configure for automatic login */
1363     autologin_username = seat_get_string_property (seat, "autologin-user");
1364     if (g_strcmp0 (autologin_username, "") == 0)
1365         autologin_username = NULL;
1366     autologin_timeout = seat_get_integer_property (seat, "autologin-user-timeout");
1367     autologin_guest = seat_get_boolean_property (seat, "autologin-guest");
1368     if (autologin_timeout > 0)
1369     {
1370         gchar *value;
1371
1372         value = g_strdup_printf ("%d", autologin_timeout);
1373         greeter_set_hint (greeter, "autologin-timeout", value);
1374         g_free (value);
1375         if (autologin_username)
1376             greeter_set_hint (greeter, "autologin-user", autologin_username);
1377         if (autologin_guest)
1378             greeter_set_hint (greeter, "autologin-guest", "true");
1379     }
1380
1381     g_object_unref (session_config);
1382
1383     return greeter_session;
1384 }
1385
1386 static Session *
1387 find_session_for_display_server (Seat *seat, DisplayServer *display_server)
1388 {
1389     GList *link;
1390
1391     for (link = seat->priv->sessions; link; link = link->next)
1392     {
1393         Session *session = link->data;
1394         if (session_get_display_server (session) == display_server && !session_get_is_stopping (session))
1395             return session;
1396     }
1397
1398     return NULL;
1399 }
1400
1401 static void
1402 display_server_ready_cb (DisplayServer *display_server, Seat *seat)
1403 {
1404     const gchar *script;
1405     Session *session;
1406
1407     /* Run setup script */
1408     script = seat_get_string_property (seat, "display-setup-script");
1409     if (script && !run_script (seat, display_server, script, NULL))
1410     {
1411         l_debug (seat, "Stopping display server due to failed setup script");
1412         display_server_stop (display_server);
1413         return;
1414     }
1415
1416     emit_upstart_signal ("login-session-start");
1417
1418     /* Start the session waiting for this display server */
1419     session = find_session_for_display_server (seat, display_server);
1420     if (session)
1421     {
1422         if (session_get_is_authenticated (session))
1423         {
1424             l_debug (seat, "Display server ready, running session");
1425             run_session (seat, session);
1426         }
1427         else
1428         {
1429             l_debug (seat, "Display server ready, starting session authentication");
1430             start_session (seat, session);
1431         }
1432     }
1433     else
1434     {
1435         l_debug (seat, "Stopping not required display server");
1436         display_server_stop (display_server);
1437     }
1438 }
1439
1440 static DisplayServer *
1441 create_display_server (Seat *seat, Session *session)
1442 {
1443     DisplayServer *display_server;
1444
1445     l_debug (seat, "Creating display server of type %s", session_get_session_type (session));
1446
1447     display_server = SEAT_GET_CLASS (seat)->create_display_server (seat, session);
1448     if (!display_server)
1449         return NULL;
1450
1451     seat->priv->display_servers = g_list_append (seat->priv->display_servers, display_server);
1452     g_signal_connect (display_server, DISPLAY_SERVER_SIGNAL_READY, G_CALLBACK (display_server_ready_cb), seat);
1453     g_signal_connect (display_server, DISPLAY_SERVER_SIGNAL_STOPPED, G_CALLBACK (display_server_stopped_cb), seat);
1454
1455     return display_server;
1456 }
1457
1458 gboolean
1459 seat_switch_to_greeter (Seat *seat)
1460 {
1461     GreeterSession *greeter_session;
1462     DisplayServer *display_server;
1463
1464     g_return_val_if_fail (seat != NULL, FALSE);
1465
1466     if (!seat_get_can_switch (seat))
1467         return FALSE;
1468
1469     /* Switch to greeter if one open */
1470     greeter_session = find_greeter_session (seat);
1471     if (greeter_session)
1472     {
1473         l_debug (seat, "Switching to existing greeter");
1474         seat_set_active_session (seat, SESSION (greeter_session));
1475         return TRUE;
1476     }
1477
1478     greeter_session = create_greeter_session (seat);
1479     if (!greeter_session)
1480         return FALSE;
1481
1482     g_clear_object (&seat->priv->session_to_activate);
1483     seat->priv->session_to_activate = g_object_ref (greeter_session);
1484
1485     display_server = create_display_server (seat, SESSION (greeter_session));
1486     session_set_display_server (SESSION (greeter_session), display_server);
1487
1488     return display_server_start (display_server);
1489 }
1490
1491 static void
1492 switch_authentication_complete_cb (Session *session, Seat *seat)
1493 {
1494     GreeterSession *greeter_session;
1495     Greeter *greeter;
1496     DisplayServer *display_server;
1497     gboolean existing = FALSE;
1498
1499     /* If authenticated, then unlock existing session or start new one */
1500     if (session_get_is_authenticated (session))
1501     {
1502         Session *s;
1503
1504         s = find_user_session (seat, session_get_username (session), session);
1505         if (s)
1506         {
1507             l_debug (seat, "Session authenticated, switching to existing user session");
1508             session_unlock (s);
1509             seat_set_active_session (seat, s);
1510             session_stop (session);
1511         }
1512         else
1513         {
1514             l_debug (seat, "Session authenticated, starting display server");
1515             g_clear_object (&seat->priv->session_to_activate);
1516             seat->priv->session_to_activate = g_object_ref (session);
1517             display_server = create_display_server (seat, session);
1518             session_set_display_server (session, display_server);
1519             display_server_start (display_server);
1520         }
1521
1522         return;
1523     }
1524
1525     session_stop (session);
1526
1527     /* See if we already have a greeter up and reuse it if so */
1528     greeter_session = find_resettable_greeter (seat);
1529     if (greeter_session)
1530     {
1531         l_debug (seat, "Switching to existing greeter to authenticate session");
1532         set_greeter_hints (seat, greeter_session_get_greeter (greeter_session));
1533         existing = TRUE;
1534     }
1535     else
1536     {
1537         l_debug (seat, "Starting greeter to authenticate session");
1538         greeter_session = create_greeter_session (seat);
1539     }
1540     greeter = greeter_session_get_greeter (greeter_session);
1541
1542     if (session_get_is_guest (session))
1543         greeter_set_hint (greeter, "select-guest", "true");
1544     else
1545         greeter_set_hint (greeter, "select-user", session_get_username (session));
1546
1547     if (existing)
1548     {
1549         greeter_reset (greeter);
1550         seat_set_active_session (seat, SESSION (greeter_session));
1551     }
1552     else
1553     {
1554         g_clear_object (&seat->priv->session_to_activate);
1555         seat->priv->session_to_activate = g_object_ref (greeter_session);
1556
1557         display_server = create_display_server (seat, SESSION (greeter_session));
1558         session_set_display_server (SESSION (greeter_session), display_server);
1559         display_server_start (display_server);
1560     }
1561 }
1562
1563 gboolean
1564 seat_switch_to_user (Seat *seat, const gchar *username, const gchar *session_name)
1565 {
1566     Session *session;
1567
1568     g_return_val_if_fail (seat != NULL, FALSE);
1569     g_return_val_if_fail (username != NULL, FALSE);
1570
1571     if (!seat_get_can_switch (seat))
1572         return FALSE;
1573
1574     /* If we're already on this session, then ignore */
1575     session = find_user_session (seat, username, NULL);
1576     if (session && session == seat->priv->active_session)
1577         return TRUE;
1578
1579     l_debug (seat, "Switching to user %s", username);
1580
1581     /* Attempt to authenticate them */
1582     session = create_user_session (seat, username, FALSE);
1583     g_signal_connect (session, SESSION_SIGNAL_AUTHENTICATION_COMPLETE, G_CALLBACK (switch_authentication_complete_cb), seat);
1584     session_set_pam_service (session, seat_get_string_property (seat, "pam-service"));
1585
1586     return session_start (session);
1587 }
1588
1589 static Session *
1590 find_guest_session (Seat *seat)
1591 {
1592     GList *link;
1593
1594     for (link = seat->priv->sessions; link; link = link->next)
1595     {
1596         Session *session = link->data;
1597         if (!session_get_is_stopping (session) && session_get_is_guest (session))
1598             return session;
1599     }
1600
1601     return NULL;
1602 }
1603
1604 gboolean
1605 seat_switch_to_guest (Seat *seat, const gchar *session_name)
1606 {
1607     Session *session;
1608     DisplayServer *display_server;
1609
1610     g_return_val_if_fail (seat != NULL, FALSE);
1611
1612     if (!seat_get_can_switch (seat) || !seat_get_allow_guest (seat))
1613         return FALSE;
1614
1615     /* Switch to session if one open */
1616     session = find_guest_session (seat);
1617     if (session)
1618     {
1619         l_debug (seat, "Switching to existing guest account %s", session_get_username (session));
1620         seat_set_active_session (seat, session);
1621         return TRUE;
1622     }
1623
1624     session = create_guest_session (seat, session_name);
1625     if (!session)
1626         return FALSE;
1627
1628     display_server = create_display_server (seat, session);
1629
1630     g_clear_object (&seat->priv->session_to_activate);
1631     seat->priv->session_to_activate = g_object_ref (session);
1632     session_set_pam_service (session, seat_get_string_property (seat, "pam-autologin-service"));
1633     session_set_display_server (session, display_server);
1634
1635     return display_server_start (display_server);
1636 }
1637
1638 gboolean
1639 seat_lock (Seat *seat, const gchar *username)
1640 {
1641     GreeterSession *greeter_session;
1642     Greeter *greeter;
1643     DisplayServer *display_server = NULL;
1644     gboolean reset_existing = FALSE;
1645     gboolean reuse_xserver = FALSE;
1646
1647     g_return_val_if_fail (seat != NULL, FALSE);
1648
1649     if (!seat_get_can_switch (seat))
1650         return FALSE;
1651
1652     // FIXME: If already locked then don't bother...
1653
1654     l_debug (seat, "Locking");
1655
1656     /* Switch to greeter we can reuse */
1657     greeter_session = find_resettable_greeter (seat);
1658     if (greeter_session)
1659     {
1660         l_debug (seat, "Switching to existing greeter");
1661         set_greeter_hints (seat, greeter_session_get_greeter (greeter_session));
1662         reset_existing = TRUE;
1663     }
1664     else
1665     {
1666         /* If the existing greeter can't be reused, stop it and reuse its display server */
1667         greeter_session = find_greeter_session (seat);
1668         if (greeter_session)
1669         {
1670             display_server = session_get_display_server (SESSION (greeter_session));
1671             if (!session_get_is_stopping (SESSION (greeter_session)))
1672             {
1673                 l_debug (seat, "Stopping session");
1674                 session_stop (SESSION (greeter_session));
1675             }
1676             reuse_xserver = TRUE;
1677         }
1678
1679         greeter_session = create_greeter_session (seat);
1680         if (!greeter_session)
1681             return FALSE;
1682     }
1683     greeter = greeter_session_get_greeter (greeter_session);
1684
1685     greeter_set_hint (greeter, "lock-screen", "true");
1686     if (username)
1687         greeter_set_hint (greeter, "select-user", username);
1688
1689     if (reset_existing)
1690     {
1691         greeter_reset (greeter);
1692         seat_set_active_session (seat, SESSION (greeter_session));
1693         return TRUE;
1694     }
1695     else
1696     {
1697         if (!reuse_xserver)
1698             display_server = create_display_server (seat, SESSION (greeter_session));
1699         session_set_display_server (SESSION (greeter_session), display_server);
1700
1701         g_clear_object (&seat->priv->session_to_activate);
1702         seat->priv->session_to_activate = g_object_ref (greeter_session);
1703
1704         if (reuse_xserver)
1705         {
1706             g_clear_object (&seat->priv->replacement_greeter);
1707             seat->priv->replacement_greeter = g_object_ref (greeter_session);
1708             return TRUE;
1709         }
1710         else
1711             return display_server_start (display_server);
1712     }
1713 }
1714
1715 void
1716 seat_stop (Seat *seat)
1717 {
1718     g_return_if_fail (seat != NULL);
1719
1720     if (seat->priv->stopping)
1721         return;
1722
1723     l_debug (seat, "Stopping");
1724     seat->priv->stopping = TRUE;
1725     SEAT_GET_CLASS (seat)->stop (seat);
1726 }
1727
1728 gboolean
1729 seat_get_is_stopping (Seat *seat)
1730 {
1731     g_return_val_if_fail (seat != NULL, FALSE);
1732     return seat->priv->stopping;
1733 }
1734
1735 static void
1736 seat_real_setup (Seat *seat)
1737 {
1738 }
1739
1740 static gboolean
1741 seat_real_start (Seat *seat)
1742 {
1743     const gchar *autologin_username;
1744     int autologin_timeout;
1745     gboolean autologin_guest;
1746     gboolean autologin_in_background;
1747     Session *session = NULL, *background_session = NULL;
1748
1749     /* Get autologin settings */
1750     autologin_username = seat_get_string_property (seat, "autologin-user");
1751     if (g_strcmp0 (autologin_username, "") == 0)
1752         autologin_username = NULL;
1753     autologin_timeout = seat_get_integer_property (seat, "autologin-user-timeout");
1754     autologin_guest = seat_get_boolean_property (seat, "autologin-guest");
1755     autologin_in_background = seat_get_boolean_property (seat, "autologin-in-background");
1756
1757     /* Autologin if configured */
1758     if (autologin_timeout == 0 || autologin_in_background)
1759     {
1760         if (autologin_guest)
1761             session = create_guest_session (seat, NULL);
1762         else if (autologin_username != NULL)
1763             session = create_user_session (seat, autologin_username, TRUE);
1764
1765         if (session)
1766             session_set_pam_service (session, seat_get_string_property (seat, "pam-autologin-service"));
1767
1768         /* Load in background if required */
1769         if (autologin_in_background && session)
1770         {
1771             background_session = session;
1772             session = NULL;
1773         }
1774
1775         if (session)
1776         {
1777             DisplayServer *display_server;
1778
1779             g_clear_object (&seat->priv->session_to_activate);
1780             seat->priv->session_to_activate = g_object_ref (session);
1781
1782             display_server = create_display_server (seat, session);
1783             session_set_display_server (session, display_server);
1784             if (!display_server || !display_server_start (display_server))
1785             {
1786                 l_debug (seat, "Can't create display server for automatic login");
1787                 session_stop (session);
1788                 if (display_server)
1789                     display_server_stop (display_server);
1790                 session = NULL;
1791             }
1792         }
1793     }
1794
1795     /* Fallback to a greeter */
1796     if (!session)
1797     {
1798         GreeterSession *greeter_session;
1799         DisplayServer *display_server;
1800
1801         greeter_session = create_greeter_session (seat);
1802         if (!greeter_session)
1803         {
1804             l_debug (seat, "Failed to create greeter session");
1805             return FALSE;
1806         }
1807
1808         g_clear_object (&seat->priv->session_to_activate);
1809         seat->priv->session_to_activate = g_object_ref (greeter_session);
1810         session = SESSION (greeter_session);
1811
1812         display_server = create_display_server (seat, session);
1813         session_set_display_server (session, display_server);
1814         if (!display_server || !display_server_start (display_server))
1815         {
1816             l_debug (seat, "Can't create display server for greeter");
1817             session_stop (session);
1818             if (display_server)
1819                 display_server_stop (display_server);
1820             session = NULL;
1821         }
1822     }
1823
1824     /* Fail if can't start a session */
1825     if (!session)
1826     {
1827         seat_stop (seat);
1828         return FALSE;
1829     }
1830
1831     /* Start background session */
1832     if (background_session)
1833     {
1834         DisplayServer *background_display_server;
1835
1836         background_display_server = create_display_server (seat, background_session);
1837         session_set_display_server (background_session, background_display_server);
1838         if (!display_server_start (background_display_server))
1839             l_warning (seat, "Failed to start display server for background session");
1840     }
1841
1842     return TRUE;
1843 }
1844
1845 static GreeterSession *
1846 seat_real_create_greeter_session (Seat *seat)
1847 {
1848     return greeter_session_new ();
1849 }
1850
1851 static Session *
1852 seat_real_create_session (Seat *seat)
1853 {
1854     return session_new ();
1855 }
1856
1857 static void
1858 seat_real_set_active_session (Seat *seat, Session *session)
1859 {
1860 }
1861
1862 static void
1863 seat_real_set_next_session (Seat *seat, Session *session)
1864 {
1865 }
1866
1867 static Session *
1868 seat_real_get_active_session (Seat *seat)
1869 {
1870     return NULL;
1871 }
1872
1873 static void
1874 seat_real_stop (Seat *seat)
1875 {
1876     GList *list, *link;
1877
1878     check_stopped (seat);
1879     if (seat->priv->stopped)
1880         return;
1881
1882     /* Stop all the display servers and sessions on the seat. Copy the list as
1883      * it might be modified if a display server / session stops during this loop */
1884     list = g_list_copy (seat->priv->display_servers);
1885     for (link = list; link; link = link->next)
1886         g_object_ref (link->data);
1887     for (link = list; link; link = link->next)
1888     {
1889         DisplayServer *display_server = link->data;
1890         if (!display_server_get_is_stopping (display_server))
1891         {
1892             l_debug (seat, "Stopping display server");
1893             display_server_stop (display_server);
1894         }
1895     }
1896     g_list_free_full (list, g_object_unref);
1897     list = g_list_copy (seat->priv->sessions);
1898     for (link = list; link; link = link->next)
1899         g_object_ref (link->data);
1900     for (link = list; link; link = link->next)
1901     {
1902         Session *session = link->data;
1903         if (!session_get_is_stopping (session))
1904         {
1905             l_debug (seat, "Stopping session");
1906             session_stop (session);
1907         }
1908     }
1909     g_list_free_full (list, g_object_unref);
1910 }
1911
1912 static void
1913 seat_init (Seat *seat)
1914 {
1915     seat->priv = G_TYPE_INSTANCE_GET_PRIVATE (seat, SEAT_TYPE, SeatPrivate);
1916     seat->priv->properties = g_hash_table_new_full (g_str_hash, g_str_equal, g_free, g_free);
1917     seat->priv->share_display_server = TRUE;
1918 }
1919
1920 static void
1921 seat_finalize (GObject *object)
1922 {
1923     Seat *self = SEAT (object);
1924     GList *link;
1925
1926     g_free (self->priv->name);
1927     g_hash_table_unref (self->priv->properties);
1928     for (link = self->priv->display_servers; link; link = link->next)
1929     {
1930         DisplayServer *display_server = link->data;
1931         g_signal_handlers_disconnect_matched (display_server, G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, self);
1932     }
1933     g_list_free_full (self->priv->display_servers, g_object_unref);
1934     for (link = self->priv->sessions; link; link = link->next)
1935     {
1936         Session *session = link->data;
1937         g_signal_handlers_disconnect_matched (session, G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, self);
1938     }
1939     g_list_free_full (self->priv->sessions, g_object_unref);
1940     g_clear_object (&self->priv->active_session);
1941     g_clear_object (&self->priv->next_session);
1942     g_clear_object (&self->priv->session_to_activate);
1943     g_clear_object (&self->priv->replacement_greeter);
1944
1945     G_OBJECT_CLASS (seat_parent_class)->finalize (object);
1946 }
1947
1948 static void
1949 seat_class_init (SeatClass *klass)
1950 {
1951     GObjectClass *object_class = G_OBJECT_CLASS (klass);
1952
1953     klass->setup = seat_real_setup;
1954     klass->start = seat_real_start;
1955     klass->create_greeter_session = seat_real_create_greeter_session;
1956     klass->create_session = seat_real_create_session;
1957     klass->set_active_session = seat_real_set_active_session;
1958     klass->get_active_session = seat_real_get_active_session;
1959     klass->set_next_session = seat_real_set_next_session;
1960     klass->run_script = seat_real_run_script;
1961     klass->stop = seat_real_stop;
1962
1963     object_class->finalize = seat_finalize;
1964
1965     g_type_class_add_private (klass, sizeof (SeatPrivate));
1966
1967     signals[SESSION_ADDED] =
1968         g_signal_new (SEAT_SIGNAL_SESSION_ADDED,
1969                       G_TYPE_FROM_CLASS (klass),
1970                       G_SIGNAL_RUN_LAST,
1971                       G_STRUCT_OFFSET (SeatClass, session_added),
1972                       NULL, NULL,
1973                       NULL,
1974                       G_TYPE_NONE, 1, SESSION_TYPE);
1975     signals[RUNNING_USER_SESSION] =
1976         g_signal_new (SEAT_SIGNAL_RUNNING_USER_SESSION,
1977                       G_TYPE_FROM_CLASS (klass),
1978                       G_SIGNAL_RUN_LAST,
1979                       G_STRUCT_OFFSET (SeatClass, running_user_session),
1980                       NULL, NULL,
1981                       NULL,
1982                       G_TYPE_NONE, 1, SESSION_TYPE);
1983     signals[SESSION_REMOVED] =
1984         g_signal_new (SEAT_SIGNAL_SESSION_REMOVED,
1985                       G_TYPE_FROM_CLASS (klass),
1986                       G_SIGNAL_RUN_LAST,
1987                       G_STRUCT_OFFSET (SeatClass, session_removed),
1988                       NULL, NULL,
1989                       NULL,
1990                       G_TYPE_NONE, 1, SESSION_TYPE);
1991     signals[STOPPED] =
1992         g_signal_new (SEAT_SIGNAL_STOPPED,
1993                       G_TYPE_FROM_CLASS (klass),
1994                       G_SIGNAL_RUN_LAST,
1995                       G_STRUCT_OFFSET (SeatClass, stopped),
1996                       NULL, NULL,
1997                       NULL,
1998                       G_TYPE_NONE, 0);
1999 }
2000
2001 static gint
2002 seat_real_logprefix (Logger *self, gchar *buf, gulong buflen)
2003 {
2004     return g_snprintf (buf, buflen, "Seat %s: ", SEAT (self)->priv->name);
2005 }
2006
2007 static void
2008 seat_logger_iface_init (LoggerInterface *iface)
2009 {
2010     iface->logprefix = &seat_real_logprefix;
2011 }