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