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
  21 enum {
  22     SESSION_ADDED,
  23     SESSION_REMOVED,
  24     STOPPED,
  25     LAST_SIGNAL
  26 };
  27 static guint signals[LAST_SIGNAL] = { 0 };
  28
  29 struct SeatPrivate
  30 {
  31     /* Configuration for this seat */
  32     GHashTable *properties;
  33
  34     /* TRUE if able to switch users */
  35     gboolean can_switch;
  36
  37     /* TRUE if display server can be shared for sessions */
  38     gboolean share_display_server;
  39
  40     /* The display servers on this seat */
  41     GList *display_servers;
  42
  43     /* The sessions on this seat */
  44     GList *sessions;
  45
  46     /* The session to set active when it starts */
  47     Session *session_to_activate;
  48
  49     /* TRUE if stopping this seat (waiting for displays to stop) */
  50     gboolean stopping;
  51
  52     /* TRUE if stopped */
  53     gboolean stopped;
  54 };
  55
  56 /* PAM services to use */
  57 #define GREETER_SERVICE   "lightdm-greeter"
  58 #define USER_SERVICE      "lightdm"
  59 #define AUTOLOGIN_SERVICE "lightdm-autologin"
  60
  61 G_DEFINE_TYPE (Seat, seat, G_TYPE_OBJECT);
  62
  63 typedef struct
  64 {
  65     const gchar *name;
  66     GType type;
  67 } SeatModule;
  68 static GHashTable *seat_modules = NULL;
  69
  70 // FIXME: Make a get_display_server() that re-uses display servers if supported
  71 static DisplayServer *create_display_server (Seat *seat);
  72 static Greeter *create_greeter_session (Seat *seat);
  73
  74 void
  75 seat_register_module (const gchar *name, GType type)
  76 {
  77     SeatModule *module;
  78
  79     if (!seat_modules)
  80         seat_modules = g_hash_table_new_full (g_str_hash, g_str_equal, g_free, NULL);
  81
  82     g_debug ("Registered seat module %s", name);
  83
  84     module = g_malloc0 (sizeof (SeatModule));
  85     module->name = g_strdup (name);
  86     module->type = type;
  87     g_hash_table_insert (seat_modules, g_strdup (name), module);
  88 }
  89
  90 Seat *
  91 seat_new (const gchar *module_name)
  92 {
  93     Seat *seat;
  94     SeatModule *m = NULL;
  95
  96     g_return_val_if_fail (module_name != NULL, NULL);
  97
  98     if (seat_modules)
  99         m = g_hash_table_lookup (seat_modules, module_name);
 100     if (!m)
 101         return NULL;
 102
 103     seat = g_object_new (m->type, NULL);
 104
 105     return seat;
 106 }
 107
 108 void
 109 seat_set_property (Seat *seat, const gchar *name, const gchar *value)
 110 {
 111     g_return_if_fail (seat != NULL);
 112     g_hash_table_insert (seat->priv->properties, g_strdup (name), g_strdup (value));
 113 }
 114
 115 const gchar *
 116 seat_get_string_property (Seat *seat, const gchar *name)
 117 {
 118     g_return_val_if_fail (seat != NULL, NULL);
 119     return g_hash_table_lookup (seat->priv->properties, name);
 120 }
 121
 122 gboolean
 123 seat_get_boolean_property (Seat *seat, const gchar *name)
 124 {
 125     return g_strcmp0 (seat_get_string_property (seat, name), "true") == 0;
 126 }
 127
 128 gint
 129 seat_get_integer_property (Seat *seat, const gchar *name)
 130 {
 131     const gchar *value;
 132
 133     value = seat_get_string_property (seat, name);
 134     return value ? atoi (value) : 0;
 135 }
 136
 137 void
 138 seat_set_can_switch (Seat *seat, gboolean can_switch)
 139 {
 140     g_return_if_fail (seat != NULL);
 141
 142     seat->priv->can_switch = can_switch;
 143 }
 144
 145 void
 146 seat_set_share_display_server (Seat *seat, gboolean share_display_server)
 147 {
 148     g_return_if_fail (seat != NULL);
 149
 150     seat->priv->share_display_server = share_display_server;
 151 }
 152
 153 gboolean
 154 seat_start (Seat *seat)
 155 {
 156     g_return_val_if_fail (seat != NULL, FALSE);
 157
 158     SEAT_GET_CLASS (seat)->setup (seat);
 159     return SEAT_GET_CLASS (seat)->start (seat);
 160 }
 161
 162 GList *
 163 seat_get_sessions (Seat *seat)
 164 {
 165     g_return_val_if_fail (seat != NULL, NULL);
 166     return seat->priv->sessions;
 167 }
 168
 169 void
 170 seat_set_active_session (Seat *seat, Session *session)
 171 {
 172     GList *link;
 173
 174     g_return_if_fail (seat != NULL);
 175
 176     SEAT_GET_CLASS (seat)->set_active_session (seat, session);
 177
 178     /* Stop any greeters */
 179     for (link = seat->priv->sessions; link; link = link->next)
 180     {
 181         Session *s = link->data;
 182
 183         if (s == session || session_get_is_stopping (s))
 184             continue;
 185
 186         if (IS_GREETER (s))
 187         {
 188             g_debug ("Stopping greeter");
 189             session_stop (s);
 190         }
 191     }
 192 }
 193
 194 Session *
 195 seat_get_active_session (Seat *seat)
 196 {
 197     g_return_val_if_fail (seat != NULL, NULL);
 198     return SEAT_GET_CLASS (seat)->get_active_session (seat);
 199 }
 200
 201 gboolean
 202 seat_get_can_switch (Seat *seat)
 203 {
 204     g_return_val_if_fail (seat != NULL, FALSE);
 205     return seat->priv->can_switch;
 206 }
 207
 208 gboolean
 209 seat_get_allow_guest (Seat *seat)
 210 {
 211     g_return_val_if_fail (seat != NULL, FALSE);
 212     return seat_get_boolean_property (seat, "allow-guest") && guest_account_is_installed ();
 213 }
 214
 215 gboolean
 216 seat_get_greeter_allow_guest (Seat *seat)
 217 {
 218     g_return_val_if_fail (seat != NULL, FALSE);
 219     return seat_get_allow_guest (seat) && seat_get_boolean_property (seat, "greeter-allow-guest");
 220 }
 221
 222 static gboolean
 223 run_script (Seat *seat, DisplayServer *display_server, const gchar *script_name, User *user)
 224 {
 225     Process *script;
 226     gboolean result = FALSE;
 227
 228     script = process_new ();
 229
 230     process_set_command (script, script_name);
 231
 232     /* Set POSIX variables */
 233     process_set_clear_environment (script, TRUE);
 234     process_set_env (script, "SHELL", "/bin/sh");
 235
 236     /* Variables required for regression tests */
 237     if (g_getenv ("LIGHTDM_TEST_ROOT"))
 238     {
 239         process_set_env (script, "LIGHTDM_TEST_ROOT", g_getenv ("LIGHTDM_TEST_ROOT"));
 240         process_set_env (script, "LD_PRELOAD", g_getenv ("LD_PRELOAD"));
 241         process_set_env (script, "LD_LIBRARY_PATH", g_getenv ("LD_LIBRARY_PATH"));
 242         process_set_env (script, "PATH", g_getenv ("PATH"));
 243     }
 244     else
 245         process_set_env (script, "PATH", "/usr/local/bin:/usr/bin:/bin");
 246
 247     if (user)
 248     {
 249         process_set_env (script, "USER", user_get_name (user));
 250         process_set_env (script, "LOGNAME", user_get_name (user));
 251         process_set_env (script, "HOME", user_get_home_directory (user));
 252     }
 253     else
 254         process_set_env (script, "HOME", "/");
 255
 256     SEAT_GET_CLASS (seat)->run_script (seat, display_server, script);
 257
 258     if (process_start (script, TRUE))
 259     {
 260         int exit_status;
 261
 262         exit_status = process_get_exit_status (script);
 263         if (WIFEXITED (exit_status))
 264         {
 265             g_debug ("Exit status of %s: %d", script_name, WEXITSTATUS (exit_status));
 266             result = WEXITSTATUS (exit_status) == EXIT_SUCCESS;
 267         }
 268     }
 269
 270     g_object_unref (script);
 271
 272     return result;
 273 }
 274
 275 static void
 276 seat_real_run_script (Seat *seat, DisplayServer *display_server, Process *process)
 277 {
 278 }
 279
 280 static void
 281 emit_upstart_signal (const gchar *signal)
 282 {
 283     g_return_if_fail (signal != NULL);
 284     g_return_if_fail (signal[0] != 0);
 285
 286     if (getuid () != 0)
 287         return;
 288
 289     gchar *cmd = g_strdup_printf ("initctl -q emit %s DISPLAY_MANAGER=lightdm", signal);
 290     g_spawn_command_line_async (cmd, NULL); /* OK if it fails, probably not installed */
 291     g_free (cmd);
 292 }
 293
 294 static void
 295 check_stopped (Seat *seat)
 296 {
 297     if (seat->priv->stopping &&
 298         !seat->priv->stopped &&
 299         g_list_length (seat->priv->display_servers) == 0 &&
 300         g_list_length (seat->priv->sessions) == 0)
 301     {
 302         seat->priv->stopped = TRUE;
 303         g_debug ("Seat stopped");
 304         g_signal_emit (seat, signals[STOPPED], 0);
 305     }
 306 }
 307
 308 static void
 309 display_server_stopped_cb (DisplayServer *display_server, Seat *seat)
 310 {
 311     GList *link;
 312     Session *active_session;
 313
 314     g_debug ("Display server stopped");
 315
 316     g_signal_handlers_disconnect_matched (display_server, G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, seat);
 317     seat->priv->display_servers = g_list_remove (seat->priv->display_servers, display_server);
 318
 319     if (seat->priv->stopping)
 320     {
 321         check_stopped (seat);
 322         g_object_unref (display_server);
 323         return;
 324     }
 325
 326     /* Stop all sessions on this display server */
 327     for (link = seat->priv->sessions; link; link = link->next)
 328     {
 329         Session *session = link->data;
 330
 331         if (session_get_display_server (session) != display_server || session_get_is_stopping (session))
 332             continue;
 333
 334         /* Stop seat if this is the only display server and it failed to start a greeter */
 335         if (IS_GREETER (session) &&
 336             !session_get_is_started (session) &&
 337             g_list_length (seat->priv->display_servers) == 0)
 338         {
 339             g_debug ("Stopping seat, greeter display server failed to start");
 340             seat_stop (seat);
 341         }
 342
 343         g_debug ("Stopping session");
 344         session_stop (session);
 345     }
 346
 347     /* If we were the active session, switch to a greeter */
 348     active_session = seat_get_active_session (seat);
 349     if (!active_session || session_get_display_server (active_session) == display_server)
 350     {
 351         g_debug ("Active display server stopped, starting greeter");
 352         seat_switch_to_greeter (seat);
 353     }
 354
 355     g_object_unref (display_server);
 356 }
 357
 358 static void
 359 start_session (Seat *seat, Session *session)
 360 {
 361     Greeter *greeter_session;
 362
 363     if (session_start (session))
 364         return;
 365
 366     if (IS_GREETER (session))
 367     {
 368         g_debug ("Failed to start greeter");
 369         display_server_stop (session_get_display_server (session));
 370         return;
 371     }
 372
 373     g_debug ("Failed to start session, starting greeter");
 374     greeter_session = create_greeter_session (seat);
 375     if (seat->priv->session_to_activate)
 376         g_object_unref (seat->priv->session_to_activate);
 377     seat->priv->session_to_activate = g_object_ref (greeter_session);
 378     // FIXME: Only if can re-use
 379     session_set_display_server (SESSION (greeter_session), session_get_display_server (session));
 380
 381     start_session (seat, SESSION (greeter_session));
 382 }
 383
 384 static void
 385 run_session (Seat *seat, Session *session)
 386 {
 387     const gchar *script;
 388
 389     if (IS_GREETER (session))
 390         script = seat_get_string_property (seat, "greeter-setup-script");
 391     else
 392         script = seat_get_string_property (seat, "session-setup-script");
 393     if (script && !run_script (seat, session_get_display_server (session), script, NULL))
 394     {
 395         Greeter *greeter_session;
 396
 397         g_debug ("Switching to greeter due to failed setup script");
 398
 399         // FIXME: Only if can share servers
 400
 401         greeter_session = create_greeter_session (seat);
 402         if (seat->priv->session_to_activate)
 403             g_object_unref (seat->priv->session_to_activate);
 404         seat->priv->session_to_activate = g_object_ref (greeter_session);
 405         session_set_display_server (SESSION (greeter_session), session_get_display_server (session));
 406
 407         start_session (seat, SESSION (greeter_session));
 408
 409         /* Stop failed session */
 410         session_stop (session);
 411     }
 412     else
 413     {
 414         session_run (session);
 415
 416         // FIXME: Wait until the session is ready
 417
 418         if (session == seat->priv->session_to_activate)
 419         {
 420             seat_set_active_session (seat, session);
 421             g_object_unref (seat->priv->session_to_activate);
 422             seat->priv->session_to_activate = NULL;
 423         }
 424     }
 425 }
 426
 427 static void
 428 session_authentication_complete_cb (Session *session, Seat *seat)
 429 {
 430     if (session_get_is_authenticated (session))
 431     {
 432         g_debug ("Session authenticated, running command");
 433         run_session (seat, session);
 434     }
 435     else if (!IS_GREETER (session))
 436     {
 437         Greeter *greeter_session;
 438
 439         g_debug ("Switching to greeter due to failed authentication");
 440
 441         // FIXME: Only if can share servers
 442
 443         greeter_session = create_greeter_session (seat);
 444         if (seat->priv->session_to_activate)
 445             g_object_unref (seat->priv->session_to_activate);
 446         seat->priv->session_to_activate = g_object_ref (greeter_session);
 447         if (session_get_is_guest (session))
 448             greeter_set_hint (greeter_session, "select-guest", "true");
 449         else
 450             greeter_set_hint (greeter_session, "select-user", session_get_username (session));
 451         session_set_display_server (SESSION (greeter_session), session_get_display_server (session));
 452
 453         start_session (seat, SESSION (greeter_session));
 454
 455         /* Stop failed session */
 456         session_stop (session);
 457     }
 458     else
 459     {
 460         g_debug ("Stopping session that failed authentication");
 461         session_stop (session);
 462     }
 463 }
 464
 465 static void
 466 session_stopped_cb (Session *session, Seat *seat)
 467 {
 468     DisplayServer *display_server;
 469
 470     g_debug ("Session stopped");
 471
 472     display_server = session_get_display_server (session);
 473
 474     /* Cleanup */
 475     if (!IS_GREETER (session))
 476     {
 477         const gchar *script;
 478         script = seat_get_string_property (seat, "session-cleanup-script");
 479         if (script)
 480             run_script (seat, display_server, script, session_get_user (session));
 481     }
 482
 483     g_signal_handlers_disconnect_matched (session, G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, seat);
 484     seat->priv->sessions = g_list_remove (seat->priv->sessions, session);
 485
 486     /* We were waiting for this session, but it didn't start :( */
 487     // FIXME: Start a greeter on this?
 488     if (session == seat->priv->session_to_activate)
 489     {
 490         g_object_unref (seat->priv->session_to_activate);
 491         seat->priv->session_to_activate = NULL;
 492     }
 493
 494     if (seat->priv->stopping)
 495     {
 496         check_stopped (seat);
 497         g_object_unref (session);
 498         return;
 499     }
 500
 501     /* If this is the greeter session then re-use this display server */
 502     if (IS_GREETER (session) && seat->priv->share_display_server &&
 503         greeter_get_start_session (GREETER (session)))
 504     {
 505         GList *link;
 506
 507         for (link = seat->priv->sessions; link; link = link->next)
 508         {
 509             Session *s = link->data;
 510
 511             /* Skip this session and sessions on other display servers */
 512             if (s == session || session_get_display_server (s) != display_server || session_get_is_stopping (s))
 513                 continue;
 514
 515             if (session_get_is_authenticated (s))
 516             {
 517                 g_debug ("Greeter stopped, running session");
 518                 run_session (seat, s);
 519             }
 520             else
 521             {
 522                 g_debug ("Greeter stopped, starting session authentication");
 523                 start_session (seat, s);
 524             }
 525             break;
 526         }
 527     }
 528     /* If this is the greeter and nothing else is running then stop the seat */
 529     else if (IS_GREETER (session) &&
 530         !greeter_get_start_session (GREETER (session)) &&
 531         g_list_length (seat->priv->display_servers) == 1 &&
 532         g_list_nth_data (seat->priv->display_servers, 0) == display_server)
 533     {
 534         g_debug ("Stopping seat, failed to start a greeter");
 535         seat_stop (seat);
 536     }
 537     /* If we were the active session, switch to a greeter */
 538     else if (!IS_GREETER (session) && session == seat_get_active_session (seat))
 539     {
 540         g_debug ("Active session stopped, starting greeter");
 541         seat_switch_to_greeter (seat);
 542     }
 543
 544     /* Stop the display server if no-longer required */
 545     if (display_server && !display_server_get_is_stopping (display_server))
 546     {
 547         GList *link;
 548         int n_sessions = 0;
 549
 550         for (link = seat->priv->sessions; link; link = link->next)
 551         {
 552             Session *s = link->data;
 553             if (s == session)
 554                 continue;
 555             if (session_get_display_server (s) == display_server)
 556                 n_sessions++;
 557         }
 558         if (n_sessions == 0)
 559         {
 560             g_debug ("Stopping display server, no sessions require it");
 561             display_server_stop (display_server);
 562         }
 563     }
 564
 565     g_object_unref (session);
 566 }
 567
 568 static void
 569 set_session_env (Session *session)
 570 {
 571     /* Variables required for regression tests */
 572     if (g_getenv ("LIGHTDM_TEST_ROOT"))
 573     {
 574         session_set_env (session, "LIGHTDM_TEST_ROOT", g_getenv ("LIGHTDM_TEST_ROOT"));
 575         session_set_env (session, "DBUS_SYSTEM_BUS_ADDRESS", g_getenv ("DBUS_SYSTEM_BUS_ADDRESS"));
 576         session_set_env (session, "DBUS_SESSION_BUS_ADDRESS", g_getenv ("DBUS_SESSION_BUS_ADDRESS"));
 577         session_set_env (session, "LD_PRELOAD", g_getenv ("LD_PRELOAD"));
 578         session_set_env (session, "LD_LIBRARY_PATH", g_getenv ("LD_LIBRARY_PATH"));
 579         session_set_env (session, "GI_TYPELIB_PATH", g_getenv ("GI_TYPELIB_PATH"));
 580     }
 581 }
 582
 583 static Session *
 584 create_session (Seat *seat, gboolean autostart)
 585 {
 586     Session *session;
 587
 588     session = SEAT_GET_CLASS (seat)->create_session (seat);
 589     seat->priv->sessions = g_list_append (seat->priv->sessions, session);
 590     if (autostart)
 591         g_signal_connect (session, "authentication-complete", G_CALLBACK (session_authentication_complete_cb), seat);
 592     g_signal_connect (session, "stopped", G_CALLBACK (session_stopped_cb), seat);
 593
 594     set_session_env (session);
 595
 596     return session;
 597 }
 598
 599 static gchar **
 600 get_session_argv_from_filename (const gchar *filename, const gchar *session_wrapper)
 601 {
 602     GKeyFile *session_desktop_file;
 603     gboolean result;
 604     int argc;
 605     gchar *command = NULL, **argv, *path;
 606     GError *error = NULL;
 607
 608     /* Read the command from the .desktop file */
 609     session_desktop_file = g_key_file_new ();
 610     result = g_key_file_load_from_file (session_desktop_file, filename, G_KEY_FILE_NONE, &error);
 611     if (error)
 612         g_debug ("Failed to load session file %s: %s", filename, error->message);
 613     g_clear_error (&error);
 614     if (result)
 615     {
 616         command = g_key_file_get_string (session_desktop_file, G_KEY_FILE_DESKTOP_GROUP, G_KEY_FILE_DESKTOP_KEY_EXEC, NULL);
 617         if (!command)
 618             g_debug ("No command in session file %s", filename);
 619     }
 620     g_key_file_free (session_desktop_file);
 621
 622     if (!command)
 623         return NULL;
 624
 625     /* If configured, run sessions through a wrapper */
 626     if (session_wrapper)
 627     {
 628         argv = g_malloc (sizeof (gchar *) * 3);
 629         path = g_find_program_in_path (session_wrapper);
 630         argv[0] = path ? path : g_strdup (session_wrapper);
 631         argv[1] = command;
 632         argv[2] = NULL;
 633         return argv;
 634     }
 635
 636     /* Split command into an array listing and make command absolute */
 637     result = g_shell_parse_argv (command, &argc, &argv, &error);
 638     if (error)
 639         g_debug ("Invalid session command '%s': %s", command, error->message);
 640     g_clear_error (&error);
 641     g_free (command);
 642     if (!result)
 643         return NULL;
 644     path = g_find_program_in_path (argv[0]);
 645     if (path)
 646     {
 647         g_free (argv[0]);
 648         argv[0] = path;
 649     }
 650
 651     return argv;
 652 }
 653
 654 static gchar **
 655 get_session_argv (const gchar *sessions_dir, const gchar *session_name, const gchar *session_wrapper)
 656 {
 657     gchar **dirs, **argv;
 658     int i;
 659
 660     g_return_val_if_fail (sessions_dir != NULL, NULL);
 661     g_return_val_if_fail (session_name != NULL, NULL);
 662
 663     dirs = g_strsplit (sessions_dir, ":", -1);
 664     for (i = 0; dirs[i]; i++)
 665     {
 666         gchar *filename, *path;
 667
 668         filename = g_strdup_printf ("%s.desktop", session_name);
 669         path = g_build_filename (dirs[i], filename, NULL);
 670         g_free (filename);
 671         argv = get_session_argv_from_filename (path, session_wrapper);
 672         g_free (path);
 673         if (argv)
 674             break;
 675     }
 676     g_strfreev (dirs);
 677
 678     return argv;
 679 }
 680
 681 static Session *
 682 create_user_session (Seat *seat, const gchar *username)
 683 {
 684     User *user;
 685     gchar *sessions_dir, **argv;
 686     const gchar *session_name;
 687     Session *session;
 688
 689     user = accounts_get_user_by_name (username);
 690     if (!user)
 691     {
 692         g_debug ("Can't login unknown user '%s'", username);
 693         return NULL;
 694     }
 695
 696     session_name = user_get_xsession (user);
 697     g_object_unref (user);
 698     if (!session_name)
 699         session_name = seat_get_string_property (seat, "user-session");
 700     sessions_dir = config_get_string (config_get_instance (), "LightDM", "sessions-directory");
 701     argv = get_session_argv (sessions_dir, session_name, seat_get_string_property (seat, "session-wrapper"));
 702     g_free (sessions_dir);
 703     if (!argv)
 704     {
 705         g_debug ("Can't find session '%s'", seat_get_string_property (seat, "user-session"));
 706         return NULL;
 707     }
 708
 709     session = create_session (seat, TRUE);
 710     session_set_pam_service (session, AUTOLOGIN_SERVICE);
 711     session_set_username (session, username);
 712     session_set_do_authenticate (session, TRUE);
 713     session_set_argv (session, argv);
 714
 715     return session;
 716 }
 717
 718 static Session *
 719 create_guest_session (Seat *seat)
 720 {
 721     gchar *sessions_dir, **argv;
 722     Session *session;
 723
 724     sessions_dir = config_get_string (config_get_instance (), "LightDM", "sessions-directory");
 725     argv = get_session_argv (sessions_dir,
 726                              seat_get_string_property (seat, "user-session"),
 727                              seat_get_string_property (seat, "session-wrapper"));
 728     g_free (sessions_dir);
 729     if (!argv)
 730     {
 731         g_debug ("Can't find session '%s'", seat_get_string_property (seat, "user-session"));
 732         return NULL;
 733     }
 734
 735     session = create_session (seat, TRUE);
 736     session_set_do_authenticate (session, TRUE);
 737     session_set_is_guest (session, TRUE);
 738     session_set_argv (session, argv);
 739
 740     return session;
 741 }
 742
 743 static Session *
 744 greeter_create_session_cb (Greeter *greeter, Seat *seat)
 745 {
 746     Session *session;
 747
 748     session = create_session (seat, FALSE);
 749     session_set_display_server (session, session_get_display_server (SESSION (greeter)));
 750
 751     return g_object_ref (session);
 752 }
 753
 754 static void
 755 prepend_argv (gchar ***argv, const gchar *value)
 756 {
 757     gchar **old_argv, **new_argv;
 758     gint i;
 759
 760     old_argv = *argv;
 761     new_argv = g_malloc (sizeof (gchar *) * (g_strv_length (*argv) + 2));
 762     new_argv[0] = g_strdup (value);
 763     for (i = 0; old_argv[i]; i++)
 764         new_argv[i + 1] = old_argv[i];
 765     new_argv[i + 1] = NULL;
 766
 767     g_free (*argv);
 768     *argv = new_argv;
 769 }
 770
 771 static Session *
 772 find_user_session (Seat *seat, const gchar *username)
 773 {
 774     GList *link;
 775
 776     if (!username)
 777         return NULL;
 778
 779     for (link = seat->priv->sessions; link; link = link->next)
 780     {
 781         Session *session = link->data;
 782
 783         if (!session_get_is_stopping (session) && strcmp (session_get_username (session), username) == 0)
 784             return session;
 785     }
 786
 787     return NULL;
 788 }
 789
 790 static gboolean
 791 greeter_start_session_cb (Greeter *greeter, SessionType type, const gchar *session_name, Seat *seat)
 792 {
 793     Session *session, *existing_session;
 794     const gchar *username;
 795     User *user;
 796     gchar *sessions_dir = NULL;
 797     gchar **argv;
 798
 799     /* Get the session to use */
 800     if (greeter_get_guest_authenticated (greeter))
 801     {
 802         session = create_guest_session (seat);
 803         if (seat->priv->session_to_activate)
 804             g_object_unref (seat->priv->session_to_activate);
 805         seat->priv->session_to_activate = g_object_ref (session);
 806         session_set_pam_service (session, AUTOLOGIN_SERVICE);
 807     }
 808     else
 809         session = greeter_get_authentication_session (greeter);
 810
 811     /* Return to existing session if it is open */
 812     username = session_get_username (session);
 813     existing_session = find_user_session (seat, username);
 814     if (existing_session && session != existing_session)
 815     {
 816         g_debug ("Returning to existing user session %s", username);
 817         session_stop (session);
 818         seat_set_active_session (seat, existing_session);
 819         return TRUE;
 820     }
 821
 822     /* Get session command to run */
 823     switch (type)
 824     {
 825     case SESSION_TYPE_LOCAL:
 826         sessions_dir = config_get_string (config_get_instance (), "LightDM", "sessions-directory");
 827         break;
 828     case SESSION_TYPE_REMOTE:
 829         sessions_dir = config_get_string (config_get_instance (), "LightDM", "remote-sessions-directory");
 830         break;
 831     }
 832     user = session_get_user (session);
 833     if (!session_name && user)
 834         session_name = user_get_xsession (user);
 835     if (!session_name)
 836         session_name = seat_get_string_property (seat, "user-session");
 837     if (user)
 838         user_set_xsession (session_get_user (session), session_name);
 839     argv = get_session_argv (sessions_dir, session_name, seat_get_string_property (seat, "session-wrapper"));
 840     g_free (sessions_dir);
 841
 842     if (!argv)
 843     {
 844         g_debug ("Can't find session '%s'", seat_get_string_property (seat, "user-session"));
 845         return FALSE;
 846     }
 847
 848     session_set_argv (session, argv);
 849     g_strfreev (argv);
 850
 851     /* If no session information found, then can't start the session */
 852     if (!argv)
 853     {
 854         g_debug ("Can't find greeter session '%s'", session_name);
 855         return FALSE;
 856     }
 857
 858     /* If can re-use the display server, stop the greeter first */
 859     if (seat->priv->share_display_server)
 860     {
 861         /* Run on the same display server after the greeter has stopped */
 862         session_set_display_server (session, session_get_display_server (SESSION (greeter)));
 863
 864         g_debug ("Stopping greeter");
 865         session_stop (SESSION (greeter));
 866
 867         return TRUE;
 868     }
 869     /* Otherwise start a new display server for this session */
 870     else
 871     {
 872         DisplayServer *display_server;
 873
 874         display_server = create_display_server (seat);
 875         if (!display_server_start (display_server))
 876             return FALSE;
 877
 878         session_set_display_server (session, display_server);
 879
 880         return TRUE;
 881     }
 882 }
 883
 884 static Greeter *
 885 create_greeter_session (Seat *seat)
 886 {
 887     gchar *sessions_dir, **argv;
 888     Greeter *greeter_session;
 889     gchar *greeter_user;
 890     const gchar *greeter_wrapper;
 891
 892     sessions_dir = config_get_string (config_get_instance (), "LightDM", "greeters-directory");
 893     argv = get_session_argv (sessions_dir,
 894                              seat_get_string_property (seat, "greeter-session"),
 895                              seat_get_string_property (seat, "session-wrapper"));
 896     g_free (sessions_dir);
 897     if (!argv)
 898         return NULL;
 899
 900     greeter_wrapper = seat_get_string_property (seat, "greeter-wrapper");
 901     if (greeter_wrapper)
 902     {
 903         gchar *path;
 904         path = g_find_program_in_path (greeter_wrapper);
 905         prepend_argv (&argv, path ? path : greeter_wrapper);
 906         g_free (path);
 907     }
 908
 909     greeter_session = SEAT_GET_CLASS (seat)->create_greeter_session (seat);
 910     seat->priv->sessions = g_list_append (seat->priv->sessions, SESSION (greeter_session));
 911     g_signal_connect (greeter_session, "authentication-complete", G_CALLBACK (session_authentication_complete_cb), seat);
 912     g_signal_connect (greeter_session, "stopped", G_CALLBACK (session_stopped_cb), seat);
 913
 914     set_session_env (SESSION (greeter_session));
 915
 916     session_set_pam_service (SESSION (greeter_session), GREETER_SERVICE);
 917     greeter_user = config_get_string (config_get_instance (), "LightDM", "greeter-user");
 918     session_set_username (SESSION (greeter_session), greeter_user);
 919     g_free (greeter_user);
 920     session_set_argv (SESSION (greeter_session), argv);
 921
 922     greeter_set_pam_services (greeter_session, USER_SERVICE, AUTOLOGIN_SERVICE);
 923     greeter_set_allow_guest (greeter_session, seat_get_allow_guest (seat));
 924     g_signal_connect (greeter_session, "create-session", G_CALLBACK (greeter_create_session_cb), seat);
 925     g_signal_connect (greeter_session, "start-session", G_CALLBACK (greeter_start_session_cb), seat);
 926
 927     return greeter_session;
 928 }
 929
 930 static void
 931 display_server_ready_cb (DisplayServer *display_server, Seat *seat)
 932 {
 933     const gchar *script;
 934     GList *link;
 935     gboolean used_display_server = FALSE;
 936
 937     /* Run setup script */
 938     script = seat_get_string_property (seat, "display-setup-script");
 939     if (script && !run_script (seat, display_server, script, NULL))
 940     {
 941         g_debug ("Stopping display server due to failed setup script");
 942         display_server_stop (display_server);
 943         return;
 944     }
 945
 946     emit_upstart_signal ("login-session-start");
 947
 948     /* Start the sessions waiting for this display server */
 949     for (link = seat->priv->sessions; link; link = link->next)
 950     {
 951         Session *session = link->data;
 952
 953         if (session_get_display_server (session) != display_server || session_get_is_stopping (session))
 954             continue;
 955
 956         if (session_get_is_authenticated (session))
 957         {
 958             g_debug ("Display server ready, running session");
 959             run_session (seat, session);
 960         }
 961         else
 962         {
 963             g_debug ("Display server ready, starting session authentication");
 964             start_session (seat, session);
 965         }
 966         used_display_server = TRUE;
 967     }
 968
 969     if (!used_display_server)
 970     {
 971         g_debug ("Stopping not required display server");
 972         display_server_stop (display_server);
 973     }
 974 }
 975
 976 static DisplayServer *
 977 create_display_server (Seat *seat)
 978 {
 979     DisplayServer *display_server;
 980
 981     display_server = SEAT_GET_CLASS (seat)->create_display_server (seat);
 982     seat->priv->display_servers = g_list_append (seat->priv->display_servers, display_server);
 983     g_signal_connect (display_server, "ready", G_CALLBACK (display_server_ready_cb), seat);
 984     g_signal_connect (display_server, "stopped", G_CALLBACK (display_server_stopped_cb), seat);
 985
 986     return display_server;
 987 }
 988
 989 static Greeter *
 990 find_greeter_session (Seat *seat)
 991 {
 992     GList *link;
 993
 994     for (link = seat->priv->sessions; link; link = link->next)
 995     {
 996         Session *session = link->data;
 997         if (!session_get_is_stopping (session) && IS_GREETER (session))
 998             return GREETER (session);
 999     }
1000
1001     return NULL;
1002 }
1003
1004 gboolean
1005 seat_switch_to_greeter (Seat *seat)
1006 {
1007     Greeter *greeter_session;
1008     DisplayServer *display_server;
1009
1010     g_return_val_if_fail (seat != NULL, FALSE);
1011
1012     if (!seat->priv->can_switch)
1013         return FALSE;
1014
1015     /* Switch to greeter if one open (shouldn't be though) */
1016     greeter_session = find_greeter_session (seat);
1017     if (greeter_session)
1018     {
1019         g_debug ("Switching to existing greeter");
1020         seat_set_active_session (seat, SESSION (greeter_session));
1021         return TRUE;
1022     }
1023
1024     greeter_session = create_greeter_session (seat);
1025     if (seat->priv->session_to_activate)
1026         g_object_unref (seat->priv->session_to_activate);
1027     seat->priv->session_to_activate = g_object_ref (greeter_session);
1028
1029     display_server = create_display_server (seat);
1030     session_set_display_server (SESSION (greeter_session), display_server);
1031     if (!display_server_start (display_server))
1032         return FALSE;
1033
1034     return TRUE;
1035 }
1036
1037 gboolean
1038 seat_switch_to_user (Seat *seat, const gchar *username, const gchar *session_name)
1039 {
1040     Session *session;
1041     DisplayServer *display_server;
1042
1043     g_return_val_if_fail (seat != NULL, FALSE);
1044     g_return_val_if_fail (username != NULL, FALSE);
1045
1046     if (!seat->priv->can_switch)
1047         return FALSE;
1048
1049     g_debug ("Switching to user %s", username);
1050
1051     session = find_user_session (seat, username);
1052     if (session)
1053     {
1054         g_debug ("Switching to existing user session %s", username);
1055         seat_set_active_session (seat, session);
1056         return TRUE;
1057     }
1058
1059     session = create_user_session (seat, username);
1060     if (seat->priv->session_to_activate)
1061         g_object_unref (seat->priv->session_to_activate);
1062     seat->priv->session_to_activate = g_object_ref (session);
1063     session_set_pam_service (session, USER_SERVICE);
1064
1065     display_server = create_display_server (seat);
1066     session_set_display_server (session, display_server);
1067     if (!display_server_start (display_server))
1068         return FALSE;
1069
1070     return FALSE;
1071 }
1072
1073 static Session *
1074 find_guest_session (Seat *seat)
1075 {
1076     GList *link;
1077
1078     for (link = seat->priv->sessions; link; link = link->next)
1079     {
1080         Session *session = link->data;
1081         if (!session_get_is_stopping (session) && session_get_is_guest (session))
1082             return session;
1083     }
1084
1085     return NULL;
1086 }
1087
1088 gboolean
1089 seat_switch_to_guest (Seat *seat, const gchar *session_name)
1090 {
1091     Session *session;
1092     DisplayServer *display_server;
1093     GList *link;
1094
1095     g_return_val_if_fail (seat != NULL, FALSE);
1096
1097     if (!seat->priv->can_switch || !seat_get_allow_guest (seat))
1098         return FALSE;
1099
1100     /* Switch to session if one open */
1101     session = find_guest_session (seat);
1102     if (session)
1103     {
1104         g_debug ("Switching to existing guest account %s", session_get_username (session));
1105         seat_set_active_session (seat, session);
1106         return TRUE;
1107     }
1108
1109     display_server = create_display_server (seat);
1110     if (!display_server_start (display_server))
1111         return FALSE;
1112
1113     session = create_guest_session (seat);
1114     if (seat->priv->session_to_activate)
1115         g_object_unref (seat->priv->session_to_activate);
1116     seat->priv->session_to_activate = g_object_ref (session);
1117     session_set_pam_service (session, AUTOLOGIN_SERVICE);
1118     session_set_display_server (session, display_server);
1119
1120     return TRUE;
1121 }
1122
1123 gboolean
1124 seat_lock (Seat *seat, const gchar *username)
1125 {
1126     Greeter *greeter_session;
1127     DisplayServer *display_server;
1128
1129     g_return_val_if_fail (seat != NULL, FALSE);
1130
1131     if (!seat->priv->can_switch)
1132         return FALSE;
1133
1134     g_debug ("Locking seat");
1135
1136     /* Switch to greeter if one open (shouldn't be though) */
1137     greeter_session = find_greeter_session (seat);
1138     if (greeter_session)
1139     {
1140         g_debug ("Switching to existing greeter");
1141         seat_set_active_session (seat, SESSION (greeter_session));
1142         return TRUE;
1143     }
1144
1145     display_server = create_display_server (seat);
1146     if (!display_server_start (display_server))
1147         return FALSE;
1148
1149     greeter_session = create_greeter_session (seat);
1150     if (seat->priv->session_to_activate)
1151         g_object_unref (seat->priv->session_to_activate);
1152     seat->priv->session_to_activate = g_object_ref (greeter_session);
1153     greeter_set_hint (greeter_session, "lock-screen", "true");
1154     if (username)
1155         greeter_set_hint (greeter_session, "select-user", username);
1156     session_set_display_server (SESSION (greeter_session), display_server);
1157
1158     return TRUE;
1159 }
1160
1161 void
1162 seat_stop (Seat *seat)
1163 {
1164     g_return_if_fail (seat != NULL);
1165
1166     if (seat->priv->stopping)
1167         return;
1168
1169     g_debug ("Stopping seat");
1170     seat->priv->stopping = TRUE;
1171     SEAT_GET_CLASS (seat)->stop (seat);
1172 }
1173
1174 gboolean
1175 seat_get_is_stopping (Seat *seat)
1176 {
1177     g_return_val_if_fail (seat != NULL, FALSE);
1178     return seat->priv->stopping;
1179 }
1180
1181 static void
1182 seat_real_setup (Seat *seat)
1183 {
1184 }
1185
1186 static gboolean
1187 seat_real_start (Seat *seat)
1188 {
1189     const gchar *autologin_username;
1190     int autologin_timeout;
1191     gboolean autologin_guest;
1192     gboolean autologin_in_background;
1193     const gchar *user_session;
1194     Session *session = NULL;
1195     DisplayServer *display_server;
1196     User *user;
1197     gchar *sessions_dir;
1198     const gchar *wrapper = NULL;
1199     const gchar *session_name = NULL;
1200
1201     g_debug ("Starting seat");
1202
1203     display_server = create_display_server (seat);
1204
1205     /* Get autologin settings */
1206     autologin_username = seat_get_string_property (seat, "autologin-user");
1207     if (g_strcmp0 (autologin_username, "") == 0)
1208         autologin_username = NULL;
1209     autologin_timeout = seat_get_integer_property (seat, "autologin-user-timeout");
1210     autologin_guest = seat_get_boolean_property (seat, "autologin-guest");
1211     autologin_in_background = seat_get_boolean_property (seat, "autologin-in-background");
1212
1213     /* Autologin if configured */
1214     if (autologin_timeout == 0 || autologin_in_background)
1215     {
1216         if (autologin_guest)
1217         {
1218             session = create_guest_session (seat);
1219             if (seat->priv->session_to_activate)
1220                 g_object_unref (seat->priv->session_to_activate);
1221             seat->priv->session_to_activate = g_object_ref (session);
1222             session_set_pam_service (session, AUTOLOGIN_SERVICE);
1223         }
1224         else if (autologin_username != NULL)
1225         {
1226             session = create_user_session (seat, autologin_username);
1227             if (seat->priv->session_to_activate)
1228                 g_object_unref (seat->priv->session_to_activate);
1229             seat->priv->session_to_activate = g_object_ref (session);
1230             session_set_pam_service (session, AUTOLOGIN_SERVICE);
1231         }
1232
1233         /* Load in background if required */
1234         if (autologin_in_background && session)
1235         {
1236             DisplayServer *background_display_server;
1237
1238             background_display_server = create_display_server (seat);
1239             session_set_display_server (session, background_display_server);
1240             if (!display_server_start (background_display_server))
1241                 return FALSE;
1242
1243             /* Start a greeter as well */
1244             session = NULL;
1245         }
1246     }
1247
1248     /* Fallback to a greeter */
1249     if (!session)
1250     {
1251         Greeter *greeter_session;
1252
1253         greeter_session = create_greeter_session (seat);
1254         if (seat->priv->session_to_activate)
1255             g_object_unref (seat->priv->session_to_activate);
1256         seat->priv->session_to_activate = g_object_ref (greeter_session);
1257         session = SESSION (greeter_session);
1258
1259         if (autologin_timeout)
1260         {
1261             gchar *value;
1262
1263             value = g_strdup_printf ("%d", autologin_timeout);
1264             greeter_set_hint (greeter_session, "autologin-timeout", value);
1265             g_free (value);
1266             if (autologin_username)
1267                 greeter_set_hint (greeter_session, "autologin-user", autologin_username);
1268             if (autologin_guest)
1269                 greeter_set_hint (greeter_session, "autologin-guest", "true");
1270         }
1271     }
1272
1273     /* Fail if can't start a session */
1274     if (!session)
1275     {
1276         seat_stop (seat);
1277         return FALSE;
1278     }
1279
1280     /* Start display server to show session on */
1281     session_set_display_server (session, display_server);
1282     if (!display_server_start (display_server))
1283         return FALSE;
1284
1285     return TRUE;
1286 }
1287
1288 static void
1289 seat_real_set_active_session (Seat *seat, Session *session)
1290 {
1291 }
1292
1293 static Session *
1294 seat_real_get_active_session (Seat *seat)
1295 {
1296     return NULL;
1297 }
1298
1299 static void
1300 seat_real_stop (Seat *seat)
1301 {
1302     GList *list, *link;
1303
1304     check_stopped (seat);
1305     if (seat->priv->stopped)
1306         return;
1307
1308     /* Stop all the display servers and sessions on the seat. Copy the list as
1309      * it might be modified if a display server / session stops during this loop */
1310     list = g_list_copy (seat->priv->display_servers);
1311     for (link = list; link; link = link->next)
1312     {
1313         DisplayServer *display_server = link->data;
1314         if (!display_server_get_is_stopping (display_server))
1315         {
1316             g_debug ("Stopping display server");
1317             display_server_stop (display_server);
1318         }
1319     }
1320     g_list_free (list);
1321     list = g_list_copy (seat->priv->sessions);
1322     for (link = list; link; link = link->next)
1323     {
1324         Session *session = link->data;
1325         if (!session_get_is_stopping (session))
1326         {
1327             g_debug ("Stopping session");
1328             session_stop (session);
1329         }
1330     }
1331     g_list_free (list);
1332 }
1333
1334 static void
1335 seat_init (Seat *seat)
1336 {
1337     seat->priv = G_TYPE_INSTANCE_GET_PRIVATE (seat, SEAT_TYPE, SeatPrivate);
1338     seat->priv->properties = g_hash_table_new_full (g_str_hash, g_str_equal, g_free, g_free);
1339     seat->priv->share_display_server = TRUE;
1340 }
1341
1342 static void
1343 seat_finalize (GObject *object)
1344 {
1345     Seat *self;
1346     GList *link;
1347
1348     self = SEAT (object);
1349
1350     g_hash_table_unref (self->priv->properties);
1351     for (link = self->priv->display_servers; link; link = link->next)
1352     {
1353         DisplayServer *display_server = link->data;
1354         g_signal_handlers_disconnect_matched (display_server, G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, self);
1355     }
1356     g_list_free_full (self->priv->display_servers, g_object_unref);
1357     for (link = self->priv->sessions; link; link = link->next)
1358     {
1359         Session *session = link->data;
1360         g_signal_handlers_disconnect_matched (session, G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, self);
1361     }
1362     g_list_free_full (self->priv->sessions, g_object_unref);
1363     if (self->priv->session_to_activate)
1364         g_object_unref (self->priv->session_to_activate);
1365
1366     G_OBJECT_CLASS (seat_parent_class)->finalize (object);
1367 }
1368
1369 static void
1370 seat_class_init (SeatClass *klass)
1371 {
1372     GObjectClass *object_class = G_OBJECT_CLASS (klass);
1373
1374     klass->setup = seat_real_setup;
1375     klass->start = seat_real_start;
1376     klass->set_active_session = seat_real_set_active_session;
1377     klass->get_active_session = seat_real_get_active_session;
1378     klass->run_script = seat_real_run_script;
1379     klass->stop = seat_real_stop;
1380
1381     object_class->finalize = seat_finalize;
1382
1383     g_type_class_add_private (klass, sizeof (SeatPrivate));
1384
1385     signals[SESSION_ADDED] =
1386         g_signal_new ("session-added",
1387                       G_TYPE_FROM_CLASS (klass),
1388                       G_SIGNAL_RUN_LAST,
1389                       G_STRUCT_OFFSET (SeatClass, session_added),
1390                       NULL, NULL,
1391                       g_cclosure_marshal_VOID__OBJECT,
1392                       G_TYPE_NONE, 1, SESSION_TYPE);
1393     signals[SESSION_REMOVED] =
1394         g_signal_new ("session-removed",
1395                       G_TYPE_FROM_CLASS (klass),
1396                       G_SIGNAL_RUN_LAST,
1397                       G_STRUCT_OFFSET (SeatClass, session_removed),
1398                       NULL, NULL,
1399                       g_cclosure_marshal_VOID__OBJECT,
1400                       G_TYPE_NONE, 1, SESSION_TYPE);
1401     signals[STOPPED] =
1402         g_signal_new ("stopped",
1403                       G_TYPE_FROM_CLASS (klass),
1404                       G_SIGNAL_RUN_LAST,
1405                       G_STRUCT_OFFSET (SeatClass, stopped),
1406                       NULL, NULL,
1407                       g_cclosure_marshal_VOID__VOID,
1408                       G_TYPE_NONE, 0);
1409 }