2 * Copyright (C) 2010-2011 Robert Ancell.
3 * Author: Robert Ancell <robert.ancell@canonical.com>
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
18 #include <glib/gstdio.h>
21 #include "x-server-local.h"
22 #include "configuration.h"
26 struct XServerLocalPrivate
28 /* X server process */
29 Process *x_server_process;
31 /* Command to run the X server */
34 /* Config file to use */
37 /* Server layout to use */
40 /* Value for -seat argument */
43 /* TRUE if TCP/IP connections are allowed */
47 gchar *authority_file;
49 /* XDMCP server to connect to */
52 /* XDMCP port to connect to */
55 /* XDMCP key to use */
58 /* ID to report to Mir */
61 /* Filename of socket Mir is listening on */
64 /* TRUE when received ready signal */
71 /* Background to set */
75 G_DEFINE_TYPE (XServerLocal, x_server_local, X_SERVER_TYPE);
77 static gchar *version = NULL;
78 static guint version_major = 0, version_minor = 0;
79 static GList *display_numbers = NULL;
81 #define XORG_VERSION_PREFIX "X.Org X Server "
84 find_version (const gchar *line)
86 if (!g_str_has_prefix (line, XORG_VERSION_PREFIX))
89 return g_strdup (line + strlen (XORG_VERSION_PREFIX));
93 x_server_local_get_version (void)
103 if (!g_spawn_command_line_sync ("X -version", NULL, &stderr_text, &exit_status, NULL))
105 if (exit_status == EXIT_SUCCESS)
110 lines = g_strsplit (stderr_text, "\n", -1);
111 for (i = 0; lines[i] && !version; i++)
112 version = find_version (lines[i]);
115 g_free (stderr_text);
117 tokens = g_strsplit (version, ".", 3);
118 n_tokens = g_strv_length (tokens);
119 version_major = n_tokens > 0 ? atoi (tokens[0]) : 0;
120 version_minor = n_tokens > 1 ? atoi (tokens[1]) : 0;
127 x_server_local_version_compare (guint major, guint minor)
129 x_server_local_get_version ();
130 if (major == version_major)
131 return version_minor - minor;
133 return version_major - major;
137 display_number_in_use (guint display_number)
144 /* See if we know we are managing a server with that number */
145 for (link = display_numbers; link; link = link->next)
147 guint number = GPOINTER_TO_UINT (link->data);
148 if (number == display_number)
152 /* See if an X server that we don't know of has a lock on that number */
153 path = g_strdup_printf ("/tmp/.X%d-lock", display_number);
154 in_use = g_file_test (path, G_FILE_TEST_EXISTS);
156 /* See if that lock file is valid, ignore it if the contents are invalid or the process doesn't exist */
157 if (in_use && g_file_get_contents (path, &data, NULL, NULL))
161 pid = atoi (g_strstrip (data));
165 if (pid < 0 || (kill (pid, 0) < 0 && errno == ESRCH))
175 x_server_local_get_unused_display_number (void)
179 number = config_get_integer (config_get_instance (), "LightDM", "minimum-display-number");
180 while (display_number_in_use (number))
183 display_numbers = g_list_append (display_numbers, GUINT_TO_POINTER (number));
189 x_server_local_release_display_number (guint display_number)
192 for (link = display_numbers; link; link = link->next)
194 guint number = GPOINTER_TO_UINT (link->data);
195 if (number == display_number)
197 display_numbers = g_list_delete_link (display_numbers, link);
204 x_server_local_new (void)
207 gchar hostname[1024], *number, *name;
210 self = g_object_new (X_SERVER_LOCAL_TYPE, NULL);
212 x_server_set_display_number (X_SERVER (self), x_server_local_get_unused_display_number ());
214 gethostname (hostname, 1024);
215 number = g_strdup_printf ("%d", x_server_get_display_number (X_SERVER (self)));
216 cookie = x_authority_new_cookie (XAUTH_FAMILY_LOCAL, (guint8*) hostname, strlen (hostname), number);
217 x_server_set_authority (X_SERVER (self), cookie);
219 g_object_unref (cookie);
221 name = g_strdup_printf ("x-%d", x_server_get_display_number (X_SERVER (self)));
222 display_server_set_name (DISPLAY_SERVER (self), name);
229 x_server_local_set_command (XServerLocal *server, const gchar *command)
231 g_return_if_fail (server != NULL);
232 g_free (server->priv->command);
233 server->priv->command = g_strdup (command);
237 x_server_local_set_vt (XServerLocal *server, gint vt)
239 g_return_if_fail (server != NULL);
240 if (server->priv->have_vt_ref)
241 vt_unref (server->priv->vt);
242 server->priv->have_vt_ref = FALSE;
243 server->priv->vt = vt;
247 server->priv->have_vt_ref = TRUE;
252 x_server_local_set_config (XServerLocal *server, const gchar *path)
254 g_return_if_fail (server != NULL);
255 g_free (server->priv->config_file);
256 server->priv->config_file = g_strdup (path);
260 x_server_local_set_layout (XServerLocal *server, const gchar *layout)
262 g_return_if_fail (server != NULL);
263 g_free (server->priv->layout);
264 server->priv->layout = g_strdup (layout);
268 x_server_local_set_xdg_seat (XServerLocal *server, const gchar *xdg_seat)
270 g_return_if_fail (server != NULL);
271 g_free (server->priv->xdg_seat);
272 server->priv->xdg_seat = g_strdup (xdg_seat);
276 x_server_local_set_allow_tcp (XServerLocal *server, gboolean allow_tcp)
278 g_return_if_fail (server != NULL);
279 server->priv->allow_tcp = allow_tcp;
283 x_server_local_set_xdmcp_server (XServerLocal *server, const gchar *hostname)
285 g_return_if_fail (server != NULL);
286 g_free (server->priv->xdmcp_server);
287 server->priv->xdmcp_server = g_strdup (hostname);
291 x_server_local_get_xdmcp_server (XServerLocal *server)
293 g_return_val_if_fail (server != NULL, 0);
294 return server->priv->xdmcp_server;
298 x_server_local_set_xdmcp_port (XServerLocal *server, guint port)
300 g_return_if_fail (server != NULL);
301 server->priv->xdmcp_port = port;
305 x_server_local_get_xdmcp_port (XServerLocal *server)
307 g_return_val_if_fail (server != NULL, 0);
308 return server->priv->xdmcp_port;
312 x_server_local_set_xdmcp_key (XServerLocal *server, const gchar *key)
314 g_return_if_fail (server != NULL);
315 g_free (server->priv->xdmcp_key);
316 server->priv->xdmcp_key = g_strdup (key);
317 x_server_set_authority (X_SERVER (server), NULL);
321 x_server_local_set_background (XServerLocal *server, const gchar *background)
323 g_return_if_fail (server != NULL);
324 g_free (server->priv->background);
325 server->priv->background = g_strdup (background);
329 x_server_local_set_mir_id (XServerLocal *server, const gchar *id)
331 g_return_if_fail (server != NULL);
332 g_free (server->priv->mir_id);
333 server->priv->mir_id = g_strdup (id);
336 const gchar *x_server_local_get_mir_id (XServerLocal *server)
338 g_return_val_if_fail (server != NULL, NULL);
339 return server->priv->mir_id;
343 x_server_local_set_mir_socket (XServerLocal *server, const gchar *socket)
345 g_return_if_fail (server != NULL);
346 g_free (server->priv->mir_socket);
347 server->priv->mir_socket = g_strdup (socket);
351 x_server_local_get_vt (DisplayServer *server)
353 g_return_val_if_fail (server != NULL, 0);
354 return X_SERVER_LOCAL (server)->priv->vt;
358 x_server_local_get_authority_file_path (XServerLocal *server)
360 g_return_val_if_fail (server != NULL, 0);
361 return server->priv->authority_file;
365 get_absolute_command (const gchar *command)
368 gchar *absolute_binary, *absolute_command = NULL;
370 tokens = g_strsplit (command, " ", 2);
372 absolute_binary = g_find_program_in_path (tokens[0]);
376 absolute_command = g_strjoin (" ", absolute_binary, tokens[1], NULL);
378 absolute_command = g_strdup (absolute_binary);
380 g_free (absolute_binary);
384 return absolute_command;
388 run_cb (Process *process, gpointer user_data)
392 /* Make input non-blocking */
393 fd = open ("/dev/null", O_RDONLY);
394 dup2 (fd, STDIN_FILENO);
397 /* Set SIGUSR1 to ignore so the X server can indicate it when it is ready */
398 signal (SIGUSR1, SIG_IGN);
402 got_signal_cb (Process *process, int signum, XServerLocal *server)
404 if (signum == SIGUSR1 && !server->priv->got_signal)
406 server->priv->got_signal = TRUE;
407 l_debug (server, "Got signal from X server :%d", x_server_get_display_number (X_SERVER (server)));
409 // FIXME: Check return value
410 DISPLAY_SERVER_CLASS (x_server_local_parent_class)->start (DISPLAY_SERVER (server));
415 stopped_cb (Process *process, XServerLocal *server)
417 l_debug (server, "X server stopped");
419 /* Release VT and display number for re-use */
420 if (server->priv->have_vt_ref)
422 vt_unref (server->priv->vt);
423 server->priv->have_vt_ref = FALSE;
425 x_server_local_release_display_number (x_server_get_display_number (X_SERVER (server)));
427 if (x_server_get_authority (X_SERVER (server)) && server->priv->authority_file)
429 l_debug (server, "Removing X server authority %s", server->priv->authority_file);
431 g_unlink (server->priv->authority_file);
433 g_free (server->priv->authority_file);
434 server->priv->authority_file = NULL;
437 DISPLAY_SERVER_CLASS (x_server_local_parent_class)->stop (DISPLAY_SERVER (server));
441 write_authority_file (XServerLocal *server)
443 XAuthority *authority;
444 GError *error = NULL;
446 authority = x_server_get_authority (X_SERVER (server));
450 /* Get file to write to if have authority */
451 if (!server->priv->authority_file)
453 gchar *run_dir, *dir;
455 run_dir = config_get_string (config_get_instance (), "LightDM", "run-directory");
456 dir = g_build_filename (run_dir, "root", NULL);
458 if (g_mkdir_with_parents (dir, S_IRWXU) < 0)
459 l_warning (server, "Failed to make authority directory %s: %s", dir, strerror (errno));
461 server->priv->authority_file = g_build_filename (dir, x_server_get_address (X_SERVER (server)), NULL);
465 l_debug (server, "Writing X server authority to %s", server->priv->authority_file);
467 x_authority_write (authority, XAUTH_WRITE_MODE_REPLACE, server->priv->authority_file, &error);
469 l_warning (server, "Failed to write authority: %s", error->message);
470 g_clear_error (&error);
474 x_server_local_start (DisplayServer *display_server)
476 XServerLocal *server = X_SERVER_LOCAL (display_server);
478 gchar *filename, *dir, *log_file, *absolute_command;
481 g_return_val_if_fail (server->priv->x_server_process == NULL, FALSE);
483 server->priv->got_signal = FALSE;
485 g_return_val_if_fail (server->priv->command != NULL, FALSE);
487 server->priv->x_server_process = process_new (run_cb, server);
488 process_set_clear_environment (server->priv->x_server_process, TRUE);
489 g_signal_connect (server->priv->x_server_process, PROCESS_SIGNAL_GOT_SIGNAL, G_CALLBACK (got_signal_cb), server);
490 g_signal_connect (server->priv->x_server_process, PROCESS_SIGNAL_STOPPED, G_CALLBACK (stopped_cb), server);
493 filename = g_strdup_printf ("%s.log", display_server_get_name (display_server));
494 dir = config_get_string (config_get_instance (), "LightDM", "log-directory");
495 log_file = g_build_filename (dir, filename, NULL);
496 process_set_log_file (server->priv->x_server_process, log_file, TRUE);
497 l_debug (display_server, "Logging to %s", log_file);
502 absolute_command = get_absolute_command (server->priv->command);
503 if (!absolute_command)
505 l_debug (display_server, "Can't launch X server %s, not found in path", server->priv->command);
506 stopped_cb (server->priv->x_server_process, X_SERVER_LOCAL (server));
509 command = g_string_new (absolute_command);
510 g_free (absolute_command);
512 g_string_append_printf (command, " :%d", x_server_get_display_number (X_SERVER (server)));
514 if (server->priv->config_file)
515 g_string_append_printf (command, " -config %s", server->priv->config_file);
517 if (server->priv->layout)
518 g_string_append_printf (command, " -layout %s", server->priv->layout);
520 if (server->priv->xdg_seat)
521 g_string_append_printf (command, " -seat %s", server->priv->xdg_seat);
523 write_authority_file (server);
524 if (server->priv->authority_file)
525 g_string_append_printf (command, " -auth %s", server->priv->authority_file);
527 /* Setup for running inside Mir */
528 if (server->priv->mir_id)
529 g_string_append_printf (command, " -mir %s", server->priv->mir_id);
531 if (server->priv->mir_socket)
532 g_string_append_printf (command, " -mirSocket %s", server->priv->mir_socket);
534 /* Connect to a remote server using XDMCP */
535 if (server->priv->xdmcp_server != NULL)
537 if (server->priv->xdmcp_port != 0)
538 g_string_append_printf (command, " -port %d", server->priv->xdmcp_port);
539 g_string_append_printf (command, " -query %s", server->priv->xdmcp_server);
540 if (server->priv->xdmcp_key)
541 g_string_append_printf (command, " -cookie %s", server->priv->xdmcp_key);
543 else if (server->priv->allow_tcp)
545 if (x_server_local_version_compare (1, 17) >= 0)
546 g_string_append (command, " -listen tcp");
549 g_string_append (command, " -nolisten tcp");
551 if (server->priv->vt >= 0)
552 g_string_append_printf (command, " vt%d -novtswitch", server->priv->vt);
554 if (server->priv->background)
555 g_string_append_printf (command, " -background %s", server->priv->background);
557 process_set_command (server->priv->x_server_process, command->str);
558 g_string_free (command, TRUE);
560 l_debug (display_server, "Launching X Server");
562 /* If running inside another display then pass through those variables */
563 if (g_getenv ("DISPLAY"))
565 process_set_env (server->priv->x_server_process, "DISPLAY", g_getenv ("DISPLAY"));
566 if (g_getenv ("XAUTHORITY"))
567 process_set_env (server->priv->x_server_process, "XAUTHORITY", g_getenv ("XAUTHORITY"));
571 path = g_build_filename (g_get_home_dir (), ".Xauthority", NULL);
572 process_set_env (server->priv->x_server_process, "XAUTHORITY", path);
577 /* Variable required for regression tests */
578 if (g_getenv ("LIGHTDM_TEST_ROOT"))
580 process_set_env (server->priv->x_server_process, "LIGHTDM_TEST_ROOT", g_getenv ("LIGHTDM_TEST_ROOT"));
581 process_set_env (server->priv->x_server_process, "LD_PRELOAD", g_getenv ("LD_PRELOAD"));
582 process_set_env (server->priv->x_server_process, "LD_LIBRARY_PATH", g_getenv ("LD_LIBRARY_PATH"));
585 result = process_start (server->priv->x_server_process, FALSE);
588 l_debug (display_server, "Waiting for ready signal from X server :%d", x_server_get_display_number (X_SERVER (server)));
591 stopped_cb (server->priv->x_server_process, X_SERVER_LOCAL (server));
597 x_server_local_stop (DisplayServer *server)
599 process_stop (X_SERVER_LOCAL (server)->priv->x_server_process);
603 x_server_local_init (XServerLocal *server)
605 server->priv = G_TYPE_INSTANCE_GET_PRIVATE (server, X_SERVER_LOCAL_TYPE, XServerLocalPrivate);
606 server->priv->vt = -1;
607 server->priv->command = g_strdup ("X");
611 x_server_local_finalize (GObject *object)
615 self = X_SERVER_LOCAL (object);
617 if (self->priv->x_server_process)
619 g_signal_handlers_disconnect_matched (self->priv->x_server_process, G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, self);
620 g_object_unref (self->priv->x_server_process);
622 g_free (self->priv->command);
623 g_free (self->priv->config_file);
624 g_free (self->priv->layout);
625 g_free (self->priv->xdg_seat);
626 g_free (self->priv->xdmcp_server);
627 g_free (self->priv->xdmcp_key);
628 g_free (self->priv->mir_id);
629 g_free (self->priv->mir_socket);
630 g_free (self->priv->authority_file);
631 if (self->priv->have_vt_ref)
632 vt_unref (self->priv->vt);
633 g_free (self->priv->background);
635 G_OBJECT_CLASS (x_server_local_parent_class)->finalize (object);
639 x_server_local_class_init (XServerLocalClass *klass)
641 GObjectClass *object_class = G_OBJECT_CLASS (klass);
642 DisplayServerClass *display_server_class = DISPLAY_SERVER_CLASS (klass);
644 display_server_class->get_vt = x_server_local_get_vt;
645 display_server_class->start = x_server_local_start;
646 display_server_class->stop = x_server_local_stop;
647 object_class->finalize = x_server_local_finalize;
649 g_type_class_add_private (klass, sizeof (XServerLocalPrivate));