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             // FIXME: Can modify sessions
 965             start_session (seat, session);
 966         }
 967         used_display_server = TRUE;
 968     }
 969
 970     if (!used_display_server)
 971     {
 972         g_debug ("Stopping not required display server");
 973         display_server_stop (display_server);
 974     }
 975 }
 976
 977 static DisplayServer *
 978 create_display_server (Seat *seat)
 979 {
 980     DisplayServer *display_server;
 981
 982     display_server = SEAT_GET_CLASS (seat)->create_display_server (seat);
 983     seat->priv->display_servers = g_list_append (seat->priv->display_servers, display_server);
 984     g_signal_connect (display_server, "ready", G_CALLBACK (display_server_ready_cb), seat);
 985     g_signal_connect (display_server, "stopped", G_CALLBACK (display_server_stopped_cb), seat);
 986
 987     return display_server;
 988 }
 989
 990 static Greeter *
 991 find_greeter_session (Seat *seat)
 992 {
 993     GList *link;
 994
 995     for (link = seat->priv->sessions; link; link = link->next)
 996     {
 997         Session *session = link->data;
 998         if (!session_get_is_stopping (session) && IS_GREETER (session))
 999             return GREETER (session);
1000     }
1001
1002     return NULL;
1003 }
1004
1005 gboolean
1006 seat_switch_to_greeter (Seat *seat)
1007 {
1008     Greeter *greeter_session;
1009     DisplayServer *display_server;
1010
1011     g_return_val_if_fail (seat != NULL, FALSE);
1012
1013     if (!seat->priv->can_switch)
1014         return FALSE;
1015
1016     /* Switch to greeter if one open (shouldn't be though) */
1017     greeter_session = find_greeter_session (seat);
1018     if (greeter_session)
1019     {
1020         g_debug ("Switching to existing greeter");
1021         seat_set_active_session (seat, SESSION (greeter_session));
1022         return TRUE;
1023     }
1024
1025     greeter_session = create_greeter_session (seat);
1026     if (seat->priv->session_to_activate)
1027         g_object_unref (seat->priv->session_to_activate);
1028     seat->priv->session_to_activate = g_object_ref (greeter_session);
1029
1030     display_server = create_display_server (seat);
1031     session_set_display_server (SESSION (greeter_session), display_server);
1032     if (!display_server_start (display_server))
1033         return FALSE;
1034
1035     return TRUE;
1036 }
1037
1038 gboolean
1039 seat_switch_to_user (Seat *seat, const gchar *username, const gchar *session_name)
1040 {
1041     Session *session;
1042     DisplayServer *display_server;
1043
1044     g_return_val_if_fail (seat != NULL, FALSE);
1045     g_return_val_if_fail (username != NULL, FALSE);
1046
1047     if (!seat->priv->can_switch)
1048         return FALSE;
1049
1050     g_debug ("Switching to user %s", username);
1051
1052     session = find_user_session (seat, username);
1053     if (session)
1054     {
1055         g_debug ("Switching to existing user session %s", username);
1056         seat_set_active_session (seat, session);
1057         return TRUE;
1058     }
1059
1060     session = create_user_session (seat, username);
1061     if (seat->priv->session_to_activate)
1062         g_object_unref (seat->priv->session_to_activate);
1063     seat->priv->session_to_activate = g_object_ref (session);
1064     session_set_pam_service (session, USER_SERVICE);
1065
1066     display_server = create_display_server (seat);
1067     session_set_display_server (session, display_server);
1068     if (!display_server_start (display_server))
1069         return FALSE;
1070
1071     return FALSE;
1072 }
1073
1074 static Session *
1075 find_guest_session (Seat *seat)
1076 {
1077     GList *link;
1078
1079     for (link = seat->priv->sessions; link; link = link->next)
1080     {
1081         Session *session = link->data;
1082         if (!session_get_is_stopping (session) && session_get_is_guest (session))
1083             return session;
1084     }
1085
1086     return NULL;
1087 }
1088
1089 gboolean
1090 seat_switch_to_guest (Seat *seat, const gchar *session_name)
1091 {
1092     Session *session;
1093     DisplayServer *display_server;
1094     GList *link;
1095
1096     g_return_val_if_fail (seat != NULL, FALSE);
1097
1098     if (!seat->priv->can_switch || !seat_get_allow_guest (seat))
1099         return FALSE;
1100
1101     /* Switch to session if one open */
1102     session = find_guest_session (seat);
1103     if (session)
1104     {
1105         g_debug ("Switching to existing guest account %s", session_get_username (session));
1106         seat_set_active_session (seat, session);
1107         return TRUE;
1108     }
1109
1110     display_server = create_display_server (seat);
1111     if (!display_server_start (display_server))
1112         return FALSE;
1113
1114     session = create_guest_session (seat);
1115     if (seat->priv->session_to_activate)
1116         g_object_unref (seat->priv->session_to_activate);
1117     seat->priv->session_to_activate = g_object_ref (session);
1118     session_set_pam_service (session, AUTOLOGIN_SERVICE);
1119     session_set_display_server (session, display_server);
1120
1121     return TRUE;
1122 }
1123
1124 gboolean
1125 seat_lock (Seat *seat, const gchar *username)
1126 {
1127     Greeter *greeter_session;
1128     DisplayServer *display_server;
1129
1130     g_return_val_if_fail (seat != NULL, FALSE);
1131
1132     if (!seat->priv->can_switch)
1133         return FALSE;
1134
1135     g_debug ("Locking seat");
1136
1137     /* Switch to greeter if one open (shouldn't be though) */
1138     greeter_session = find_greeter_session (seat);
1139     if (greeter_session)
1140     {
1141         g_debug ("Switching to existing greeter");
1142         seat_set_active_session (seat, SESSION (greeter_session));
1143         return TRUE;
1144     }
1145
1146     display_server = create_display_server (seat);
1147     if (!display_server_start (display_server))
1148         return FALSE;
1149
1150     greeter_session = create_greeter_session (seat);
1151     if (seat->priv->session_to_activate)
1152         g_object_unref (seat->priv->session_to_activate);
1153     seat->priv->session_to_activate = g_object_ref (greeter_session);
1154     greeter_set_hint (greeter_session, "lock-screen", "true");
1155     if (username)
1156         greeter_set_hint (greeter_session, "select-user", username);
1157     session_set_display_server (SESSION (greeter_session), display_server);
1158
1159     return TRUE;
1160 }
1161
1162 void
1163 seat_stop (Seat *seat)
1164 {
1165     g_return_if_fail (seat != NULL);
1166
1167     if (seat->priv->stopping)
1168         return;
1169
1170     g_debug ("Stopping seat");
1171     seat->priv->stopping = TRUE;
1172     SEAT_GET_CLASS (seat)->stop (seat);
1173 }
1174
1175 gboolean
1176 seat_get_is_stopping (Seat *seat)
1177 {
1178     g_return_val_if_fail (seat != NULL, FALSE);
1179     return seat->priv->stopping;
1180 }
1181
1182 static void
1183 seat_real_setup (Seat *seat)
1184 {
1185 }
1186
1187 static gboolean
1188 seat_real_start (Seat *seat)
1189 {
1190     const gchar *autologin_username;
1191     int autologin_timeout;
1192     gboolean autologin_guest;
1193     gboolean autologin_in_background;
1194     const gchar *user_session;
1195     Session *session = NULL;
1196     DisplayServer *display_server;
1197     User *user;
1198     gchar *sessions_dir;
1199     const gchar *wrapper = NULL;
1200     const gchar *session_name = NULL;
1201
1202     g_debug ("Starting seat");
1203
1204     display_server = create_display_server (seat);
1205
1206     /* Get autologin settings */
1207     autologin_username = seat_get_string_property (seat, "autologin-user");
1208     if (g_strcmp0 (autologin_username, "") == 0)
1209         autologin_username = NULL;
1210     autologin_timeout = seat_get_integer_property (seat, "autologin-user-timeout");
1211     autologin_guest = seat_get_boolean_property (seat, "autologin-guest");
1212     autologin_in_background = seat_get_boolean_property (seat, "autologin-in-background");
1213
1214     /* Autologin if configured */
1215     if (autologin_timeout == 0 || autologin_in_background)
1216     {
1217         if (autologin_guest)
1218         {
1219             session = create_guest_session (seat);
1220             if (seat->priv->session_to_activate)
1221                 g_object_unref (seat->priv->session_to_activate);
1222             seat->priv->session_to_activate = g_object_ref (session);
1223             session_set_pam_service (session, AUTOLOGIN_SERVICE);
1224         }
1225         else if (autologin_username != NULL)
1226         {
1227             session = create_user_session (seat, autologin_username);
1228             if (seat->priv->session_to_activate)
1229                 g_object_unref (seat->priv->session_to_activate);
1230             seat->priv->session_to_activate = g_object_ref (session);
1231             session_set_pam_service (session, AUTOLOGIN_SERVICE);
1232         }
1233
1234         /* Load in background if required */
1235         if (autologin_in_background && session)
1236         {
1237             DisplayServer *background_display_server;
1238
1239             background_display_server = create_display_server (seat);
1240             session_set_display_server (session, background_display_server);
1241             if (!display_server_start (background_display_server))
1242                 return FALSE;
1243
1244             /* Start a greeter as well */
1245             session = NULL;
1246         }
1247     }
1248
1249     /* Fallback to a greeter */
1250     if (!session)
1251     {
1252         Greeter *greeter_session;
1253
1254         greeter_session = create_greeter_session (seat);
1255         if (seat->priv->session_to_activate)
1256             g_object_unref (seat->priv->session_to_activate);
1257         seat->priv->session_to_activate = g_object_ref (greeter_session);
1258         session = SESSION (greeter_session);
1259
1260         if (autologin_timeout)
1261         {
1262             gchar *value;
1263
1264             value = g_strdup_printf ("%d", autologin_timeout);
1265             greeter_set_hint (greeter_session, "autologin-timeout", value);
1266             g_free (value);
1267             if (autologin_username)
1268                 greeter_set_hint (greeter_session, "autologin-user", autologin_username);
1269             if (autologin_guest)
1270                 greeter_set_hint (greeter_session, "autologin-guest", "true");
1271         }
1272     }
1273
1274     /* Fail if can't start a session */
1275     if (!session)
1276     {
1277         seat_stop (seat);
1278         return FALSE;
1279     }
1280
1281     /* Start display server to show session on */
1282     session_set_display_server (session, display_server);
1283     if (!display_server_start (display_server))
1284         return FALSE;
1285
1286     return TRUE;
1287 }
1288
1289 static void
1290 seat_real_set_active_session (Seat *seat, Session *session)
1291 {
1292 }
1293
1294 static Session *
1295 seat_real_get_active_session (Seat *seat)
1296 {
1297     return NULL;
1298 }
1299
1300 static void
1301 seat_real_stop (Seat *seat)
1302 {
1303     GList *list, *link;
1304
1305     check_stopped (seat);
1306     if (seat->priv->stopped)
1307         return;
1308
1309     /* Stop all the display servers and sessions on the seat. Copy the list as
1310      * it might be modified if a display server / session stops during this loop */
1311     list = g_list_copy (seat->priv->display_servers);
1312     for (link = list; link; link = link->next)
1313     {
1314         DisplayServer *display_server = link->data;
1315         if (!display_server_get_is_stopping (display_server))
1316         {
1317             g_debug ("Stopping display server");
1318             display_server_stop (display_server);
1319         }
1320     }
1321     g_list_free (list);
1322     list = g_list_copy (seat->priv->sessions);
1323     for (link = list; link; link = link->next)
1324     {
1325         Session *session = link->data;
1326         if (!session_get_is_stopping (session))
1327         {
1328             g_debug ("Stopping session");
1329             session_stop (session);
1330         }
1331     }
1332     g_list_free (list);
1333 }
1334
1335 static void
1336 seat_init (Seat *seat)
1337 {
1338     seat->priv = G_TYPE_INSTANCE_GET_PRIVATE (seat, SEAT_TYPE, SeatPrivate);
1339     seat->priv->properties = g_hash_table_new_full (g_str_hash, g_str_equal, g_free, g_free);
1340     seat->priv->share_display_server = TRUE;
1341 }
1342
1343 static void
1344 seat_finalize (GObject *object)
1345 {
1346     Seat *self;
1347     GList *link;
1348
1349     self = SEAT (object);
1350
1351     g_hash_table_unref (self->priv->properties);
1352     for (link = self->priv->display_servers; link; link = link->next)
1353     {
1354         DisplayServer *display_server = link->data;
1355         g_signal_handlers_disconnect_matched (display_server, G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, self);
1356     }
1357     g_list_free_full (self->priv->display_servers, g_object_unref);
1358     for (link = self->priv->sessions; link; link = link->next)
1359     {
1360         Session *session = link->data;
1361         g_signal_handlers_disconnect_matched (session, G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, self);
1362     }
1363     g_list_free_full (self->priv->sessions, g_object_unref);
1364     if (self->priv->session_to_activate)
1365         g_object_unref (self->priv->session_to_activate);
1366
1367     G_OBJECT_CLASS (seat_parent_class)->finalize (object);
1368 }
1369
1370 static void
1371 seat_class_init (SeatClass *klass)
1372 {
1373     GObjectClass *object_class = G_OBJECT_CLASS (klass);
1374
1375     klass->setup = seat_real_setup;
1376     klass->start = seat_real_start;
1377     klass->set_active_session = seat_real_set_active_session;
1378     klass->get_active_session = seat_real_get_active_session;
1379     klass->run_script = seat_real_run_script;
1380     klass->stop = seat_real_stop;
1381
1382     object_class->finalize = seat_finalize;
1383
1384     g_type_class_add_private (klass, sizeof (SeatPrivate));
1385
1386     signals[SESSION_ADDED] =
1387         g_signal_new ("session-added",
1388                       G_TYPE_FROM_CLASS (klass),
1389                       G_SIGNAL_RUN_LAST,
1390                       G_STRUCT_OFFSET (SeatClass, session_added),
1391                       NULL, NULL,
1392                       g_cclosure_marshal_VOID__OBJECT,
1393                       G_TYPE_NONE, 1, SESSION_TYPE);
1394     signals[SESSION_REMOVED] =
1395         g_signal_new ("session-removed",
1396                       G_TYPE_FROM_CLASS (klass),
1397                       G_SIGNAL_RUN_LAST,
1398                       G_STRUCT_OFFSET (SeatClass, session_removed),
1399                       NULL, NULL,
1400                       g_cclosure_marshal_VOID__OBJECT,
1401                       G_TYPE_NONE, 1, SESSION_TYPE);
1402     signals[STOPPED] =
1403         g_signal_new ("stopped",
1404                       G_TYPE_FROM_CLASS (klass),
1405                       G_SIGNAL_RUN_LAST,
1406                       G_STRUCT_OFFSET (SeatClass, stopped),
1407                       NULL, NULL,
1408                       g_cclosure_marshal_VOID__VOID,
1409                       G_TYPE_NONE, 0);
1410 }