src/seat-unity.c

   1 /*
   2  * Copyright (C) 2012-2013 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 <string.h>
  13 #include <fcntl.h>
  14 #include <errno.h>
  15 #include <glib/gstdio.h>
  16
  17 #include "seat-unity.h"
  18 #include "configuration.h"
  19 #include "unity-system-compositor.h"
  20 #include "x-server-local.h"
  21 #include "mir-server.h"
  22 #include "vt.h"
  23 #include "plymouth.h"
  24
  25 struct SeatUnityPrivate
  26 {
  27     /* System compositor */
  28     UnitySystemCompositor *compositor;
  29
  30     /* X server being used for XDMCP */
  31     XServerLocal *xdmcp_x_server;
  32
  33     /* Next Mir ID to use for a Mir sessions, X server and greeters */
  34     gint next_session_id;
  35     gint next_x_server_id;
  36     gint next_greeter_id;
  37
  38     /* The currently visible session */
  39     Session *active_session;
  40     DisplayServer *active_display_server;
  41 };
  42
  43 G_DEFINE_TYPE (SeatUnity, seat_unity, SEAT_TYPE);
  44
  45 static XServerLocal *create_x_server (Seat *seat);
  46
  47 static void
  48 seat_unity_setup (Seat *seat)
  49 {
  50     seat_set_supports_multi_session (seat, TRUE);
  51     SEAT_CLASS (seat_unity_parent_class)->setup (seat);
  52 }
  53
  54 static void
  55 check_stopped (SeatUnity *seat)
  56 {
  57     if (!seat->priv->compositor && !seat->priv->xdmcp_x_server)
  58         SEAT_CLASS (seat_unity_parent_class)->stop (SEAT (seat));
  59 }
  60
  61 static void
  62 xdmcp_x_server_stopped_cb (DisplayServer *display_server, Seat *seat)
  63 {
  64     l_debug (seat, "XDMCP X server stopped");
  65
  66     g_signal_handlers_disconnect_matched (SEAT_UNITY (seat)->priv->xdmcp_x_server, G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, seat);
  67     SEAT_UNITY (seat)->priv->xdmcp_x_server = NULL;
  68
  69     g_object_unref (display_server);
  70
  71     if (seat_get_is_stopping (seat))
  72         check_stopped (SEAT_UNITY (seat));
  73     else
  74         seat_stop (seat);
  75 }
  76
  77 static void
  78 compositor_ready_cb (UnitySystemCompositor *compositor, SeatUnity *seat)
  79 {
  80     const gchar *xdmcp_manager = NULL;
  81
  82     l_debug (seat, "Compositor ready");
  83
  84     /* If running as an XDMCP client then just start an X server */
  85     xdmcp_manager = seat_get_string_property (SEAT (seat), "xdmcp-manager");
  86     if (xdmcp_manager)
  87     {
  88         const gchar *key_name = NULL;
  89         gint port = 0;
  90
  91         seat->priv->xdmcp_x_server = create_x_server (SEAT (seat));
  92         x_server_local_set_xdmcp_server (seat->priv->xdmcp_x_server, xdmcp_manager);
  93         port = seat_get_integer_property (SEAT (seat), "xdmcp-port");
  94         if (port > 0)
  95             x_server_local_set_xdmcp_port (seat->priv->xdmcp_x_server, port);
  96         key_name = seat_get_string_property (SEAT (seat), "xdmcp-key");
  97         if (key_name)
  98         {
  99             gchar *path;
 100             GKeyFile *keys;
 101             gboolean result;
 102             GError *error = NULL;
 103
 104             path = g_build_filename (config_get_directory (config_get_instance ()), "keys.conf", NULL);
 105
 106             keys = g_key_file_new ();
 107             result = g_key_file_load_from_file (keys, path, G_KEY_FILE_NONE, &error);
 108             if (error)
 109                 l_debug (seat, "Error getting key %s", error->message);
 110             g_clear_error (&error);
 111
 112             if (result)
 113             {
 114                 gchar *key = NULL;
 115
 116                 if (g_key_file_has_key (keys, "keyring", key_name, NULL))
 117                     key = g_key_file_get_string (keys, "keyring", key_name, NULL);
 118                 else
 119                     l_debug (seat, "Key %s not defined", key_name);
 120
 121                 if (key)
 122                     x_server_local_set_xdmcp_key (seat->priv->xdmcp_x_server, key);
 123                 g_free (key);
 124             }
 125
 126             g_free (path);
 127             g_key_file_free (keys);
 128         }
 129
 130         g_signal_connect (seat->priv->xdmcp_x_server, DISPLAY_SERVER_SIGNAL_STOPPED, G_CALLBACK (xdmcp_x_server_stopped_cb), seat);
 131         if (!display_server_start (DISPLAY_SERVER (seat->priv->xdmcp_x_server)))
 132             seat_stop (SEAT (seat));
 133     }
 134
 135     SEAT_CLASS (seat_unity_parent_class)->start (SEAT (seat));
 136 }
 137
 138 static void
 139 compositor_stopped_cb (UnitySystemCompositor *compositor, SeatUnity *seat)
 140 {
 141     l_debug (seat, "Compositor stopped");
 142
 143     g_object_unref (seat->priv->compositor);
 144     seat->priv->compositor = NULL;
 145
 146     if (seat_get_is_stopping (SEAT (seat)))
 147         check_stopped (seat);
 148     else
 149         seat_stop (SEAT (seat));
 150 }
 151
 152 static gboolean
 153 seat_unity_start (Seat *seat)
 154 {
 155     gint vt = -1;
 156     int timeout;
 157
 158     /* Replace Plymouth if it is running */
 159     if (plymouth_get_is_active () && plymouth_has_active_vt ())
 160     {
 161         gint active_vt = vt_get_active ();
 162         if (active_vt >= vt_get_min ())
 163         {
 164             vt = active_vt;
 165             plymouth_quit (TRUE);
 166         }
 167         else
 168             l_debug (seat, "Plymouth is running on VT %d, but this is less than the configured minimum of %d so not replacing it", active_vt, vt_get_min ());
 169     }
 170     if (plymouth_get_is_active ())
 171         plymouth_quit (FALSE);
 172     if (vt < 0)
 173         vt = vt_can_multi_seat () ? vt_get_unused () : 0;
 174     if (vt < 0)
 175     {
 176         l_debug (seat, "Failed to get a VT to run on");
 177         return FALSE;
 178     }
 179
 180     timeout = seat_get_integer_property (SEAT (seat), "unity-compositor-timeout");
 181     if (timeout <= 0)
 182         timeout = 60;
 183
 184     SEAT_UNITY (seat)->priv->compositor = unity_system_compositor_new ();
 185     g_signal_connect (SEAT_UNITY (seat)->priv->compositor, DISPLAY_SERVER_SIGNAL_READY, G_CALLBACK (compositor_ready_cb), seat);
 186     g_signal_connect (SEAT_UNITY (seat)->priv->compositor, DISPLAY_SERVER_SIGNAL_STOPPED, G_CALLBACK (compositor_stopped_cb), seat);
 187     unity_system_compositor_set_command (SEAT_UNITY (seat)->priv->compositor, seat_get_string_property (SEAT (seat), "unity-compositor-command"));
 188     unity_system_compositor_set_vt (SEAT_UNITY (seat)->priv->compositor, vt);
 189     unity_system_compositor_set_timeout (SEAT_UNITY (seat)->priv->compositor, timeout);
 190
 191     return display_server_start (DISPLAY_SERVER (SEAT_UNITY (seat)->priv->compositor));
 192 }
 193
 194 static XServerLocal *
 195 create_x_server (Seat *seat)
 196 {
 197     XServerLocal *x_server;
 198     const gchar *command = NULL, *layout = NULL, *config_file = NULL;
 199     gboolean allow_tcp;
 200     gchar *id;
 201
 202     l_debug (seat, "Starting X server on Unity compositor");
 203
 204     x_server = x_server_local_new ();
 205
 206     command = seat_get_string_property (seat, "xmir-command");
 207     /* Fall back to using X if Xmir is not available as this was the previous way XMir worked */
 208     if (strcmp (command, "Xmir") == 0 && !g_find_program_in_path ("Xmir"))
 209         command = seat_get_string_property (seat, "xserver-command");
 210     x_server_local_set_command (x_server, command);
 211
 212     id = g_strdup_printf ("x-%d", SEAT_UNITY (seat)->priv->next_x_server_id);
 213     SEAT_UNITY (seat)->priv->next_x_server_id++;
 214     x_server_local_set_mir_id (x_server, id);
 215     x_server_local_set_mir_socket (x_server, unity_system_compositor_get_socket (SEAT_UNITY (seat)->priv->compositor));
 216     g_free (id);
 217
 218     layout = seat_get_string_property (seat, "xserver-layout");
 219     if (layout)
 220         x_server_local_set_layout (x_server, layout);
 221
 222     x_server_local_set_xdg_seat (x_server, seat_get_name (seat));
 223
 224     config_file = seat_get_string_property (seat, "xserver-config");
 225     if (config_file)
 226         x_server_local_set_config (x_server, config_file);
 227
 228     allow_tcp = seat_get_boolean_property (seat, "xserver-allow-tcp");
 229     x_server_local_set_allow_tcp (x_server, allow_tcp);
 230
 231     return x_server;
 232 }
 233
 234 static DisplayServer *
 235 create_mir_server (Seat *seat)
 236 {
 237     MirServer *mir_server;
 238
 239     mir_server = mir_server_new ();
 240     mir_server_set_parent_socket (mir_server, unity_system_compositor_get_socket (SEAT_UNITY (seat)->priv->compositor));
 241
 242     return DISPLAY_SERVER (mir_server);
 243 }
 244
 245 static DisplayServer *
 246 seat_unity_create_display_server (Seat *seat, Session *session)
 247 {
 248     const gchar *session_type;
 249
 250     session_type = session_get_session_type (session);
 251     if (strcmp (session_type, "x") == 0)
 252         return DISPLAY_SERVER (create_x_server (seat));
 253     else if (strcmp (session_type, "mir") == 0)
 254         return create_mir_server (seat);
 255     else
 256     {
 257         l_warning (seat, "Can't create unsupported display server '%s'", session_type);
 258         return NULL;
 259     }
 260 }
 261
 262 static Greeter *
 263 seat_unity_create_greeter_session (Seat *seat)
 264 {
 265     Greeter *greeter_session;
 266     gchar *id;
 267     gint vt;
 268
 269     greeter_session = SEAT_CLASS (seat_unity_parent_class)->create_greeter_session (seat);
 270     session_set_env (SESSION (greeter_session), "XDG_SEAT", seat_get_name (seat));
 271
 272     id = g_strdup_printf ("greeter-%d", SEAT_UNITY (seat)->priv->next_greeter_id);
 273     SEAT_UNITY (seat)->priv->next_greeter_id++;
 274     session_set_env (SESSION (greeter_session), "MIR_SERVER_NAME", id);
 275     g_free (id);
 276
 277     vt = display_server_get_vt (DISPLAY_SERVER (SEAT_UNITY (seat)->priv->compositor));
 278     if (vt >= 0)
 279     {
 280         gchar *value = g_strdup_printf ("%d", vt);
 281         session_set_env (SESSION (greeter_session), "XDG_VTNR", value);
 282         g_free (value);
 283     }
 284
 285     return greeter_session;
 286 }
 287
 288 static Session *
 289 seat_unity_create_session (Seat *seat)
 290 {
 291     Session *session;
 292     gchar *id;
 293     gint vt;
 294
 295     session = SEAT_CLASS (seat_unity_parent_class)->create_session (seat);
 296     session_set_env (session, "XDG_SEAT", seat_get_name (seat));
 297
 298     id = g_strdup_printf ("session-%d", SEAT_UNITY (seat)->priv->next_session_id);
 299     SEAT_UNITY (seat)->priv->next_session_id++;
 300     session_set_env (session, "MIR_SERVER_NAME", id);
 301     g_free (id);
 302
 303     vt = display_server_get_vt (DISPLAY_SERVER (SEAT_UNITY (seat)->priv->compositor));
 304     if (vt >= 0)
 305     {
 306         gchar *value = g_strdup_printf ("%d", vt);
 307         session_set_env (SESSION (session), "XDG_VTNR", value);
 308         g_free (value);
 309     }
 310
 311     return session;
 312 }
 313
 314 static void
 315 seat_unity_set_active_session (Seat *seat, Session *session)
 316 {
 317     DisplayServer *display_server;
 318
 319     if (session == SEAT_UNITY (seat)->priv->active_session)
 320         return;
 321     SEAT_UNITY (seat)->priv->active_session = g_object_ref (session);
 322
 323     display_server = session_get_display_server (session);
 324     if (SEAT_UNITY (seat)->priv->active_display_server != display_server)
 325     {
 326         const gchar *id = NULL;
 327
 328         SEAT_UNITY (seat)->priv->active_display_server = g_object_ref (display_server);
 329
 330         if (IS_X_SERVER_LOCAL (display_server))
 331             id = x_server_local_get_mir_id (X_SERVER_LOCAL (display_server));
 332         else
 333             id = session_get_env (session, "MIR_SERVER_NAME");
 334
 335         if (id)
 336         {
 337             l_debug (seat, "Switching to Mir session %s", id);
 338             unity_system_compositor_set_active_session (SEAT_UNITY (seat)->priv->compositor, id);
 339         }
 340         else
 341             l_warning (seat, "Failed to work out session ID");
 342     }
 343
 344     SEAT_CLASS (seat_unity_parent_class)->set_active_session (seat, session);
 345 }
 346
 347 static Session *
 348 seat_unity_get_active_session (Seat *seat)
 349 {
 350     return SEAT_UNITY (seat)->priv->active_session;
 351 }
 352
 353 static void
 354 seat_unity_set_next_session (Seat *seat, Session *session)
 355 {
 356     DisplayServer *display_server;
 357     const gchar *id = NULL;
 358
 359     if (!session)
 360         return;
 361
 362     display_server = session_get_display_server (session);
 363
 364     if (IS_X_SERVER_LOCAL (display_server))
 365         id = x_server_local_get_mir_id (X_SERVER_LOCAL (display_server));
 366     else
 367         id = session_get_env (session, "MIR_SERVER_NAME");
 368
 369     if (id)
 370     {
 371         l_debug (seat, "Marking Mir session %s as the next session", id);
 372         unity_system_compositor_set_next_session (SEAT_UNITY (seat)->priv->compositor, id);
 373     }
 374     else
 375     {
 376         l_debug (seat, "Failed to work out session ID to mark");
 377     }
 378
 379     SEAT_CLASS (seat_unity_parent_class)->set_next_session (seat, session);
 380 }
 381
 382 static void
 383 seat_unity_run_script (Seat *seat, DisplayServer *display_server, Process *script)
 384 {
 385     if (IS_X_SERVER_LOCAL (display_server))
 386     {
 387         XServerLocal *x_server;
 388         const gchar *path;
 389
 390         x_server = X_SERVER_LOCAL (display_server);
 391         path = x_server_local_get_authority_file_path (x_server);
 392         process_set_env (script, "DISPLAY", x_server_get_address (X_SERVER (x_server)));
 393         process_set_env (script, "XAUTHORITY", path);
 394     }
 395
 396     SEAT_CLASS (seat_unity_parent_class)->run_script (seat, display_server, script);
 397 }
 398
 399 static void
 400 seat_unity_stop (Seat *seat)
 401 {
 402     /* Stop the compositor first */
 403     if (SEAT_UNITY (seat)->priv->compositor)
 404         display_server_stop (DISPLAY_SERVER (SEAT_UNITY (seat)->priv->compositor));
 405
 406     /* Stop the XDMCP X server first */
 407     if (SEAT_UNITY (seat)->priv->xdmcp_x_server)
 408         display_server_stop (DISPLAY_SERVER (SEAT_UNITY (seat)->priv->xdmcp_x_server));
 409
 410     check_stopped (SEAT_UNITY (seat));
 411 }
 412
 413 static void
 414 seat_unity_init (SeatUnity *seat)
 415 {
 416     seat->priv = G_TYPE_INSTANCE_GET_PRIVATE (seat, SEAT_UNITY_TYPE, SeatUnityPrivate);
 417 }
 418
 419 static void
 420 seat_unity_finalize (GObject *object)
 421 {
 422     SeatUnity *seat = SEAT_UNITY (object);
 423
 424     if (seat->priv->compositor)
 425         g_object_unref (seat->priv->compositor);
 426     if (seat->priv->xdmcp_x_server)
 427     {
 428         g_signal_handlers_disconnect_matched (seat->priv->xdmcp_x_server, G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, seat);
 429         g_object_unref (seat->priv->xdmcp_x_server);
 430     }
 431     if (seat->priv->active_session)
 432         g_object_unref (seat->priv->active_session);
 433     if (seat->priv->active_display_server)
 434         g_object_unref (seat->priv->active_display_server);
 435
 436     G_OBJECT_CLASS (seat_unity_parent_class)->finalize (object);
 437 }
 438
 439 static void
 440 seat_unity_class_init (SeatUnityClass *klass)
 441 {
 442     GObjectClass *object_class = G_OBJECT_CLASS (klass);
 443     SeatClass *seat_class = SEAT_CLASS (klass);
 444
 445     object_class->finalize = seat_unity_finalize;
 446     seat_class->setup = seat_unity_setup;
 447     seat_class->start = seat_unity_start;
 448     seat_class->create_display_server = seat_unity_create_display_server;
 449     seat_class->create_greeter_session = seat_unity_create_greeter_session;
 450     seat_class->create_session = seat_unity_create_session;
 451     seat_class->set_active_session = seat_unity_set_active_session;
 452     seat_class->get_active_session = seat_unity_get_active_session;
 453     seat_class->set_next_session = seat_unity_set_next_session;
 454     seat_class->run_script = seat_unity_run_script;
 455     seat_class->stop = seat_unity_stop;
 456
 457     g_type_class_add_private (klass, sizeof (SeatUnityPrivate));
 458 }