879 lines
22 KiB
C
879 lines
22 KiB
C
/*
|
|
* Copyright © 2011 Intel Corporation
|
|
*
|
|
* Permission to use, copy, modify, distribute, and sell this software and
|
|
* its documentation for any purpose is hereby granted without fee, provided
|
|
* that the above copyright notice appear in all copies and that both that
|
|
* copyright notice and this permission notice appear in supporting
|
|
* documentation, and that the name of the copyright holders not be used in
|
|
* advertising or publicity pertaining to distribution of the software
|
|
* without specific, written prior permission. The copyright holders make
|
|
* no representations about the suitability of this software for any
|
|
* purpose. It is provided "as is" without express or implied warranty.
|
|
*
|
|
* THE COPYRIGHT HOLDERS DISCLAIM ALL WARRANTIES WITH REGARD TO THIS
|
|
* SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND
|
|
* FITNESS, IN NO EVENT SHALL THE COPYRIGHT HOLDERS BE LIABLE FOR ANY
|
|
* SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER
|
|
* RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF
|
|
* CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN
|
|
* CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
|
*/
|
|
|
|
#define _GNU_SOURCE
|
|
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include <sys/socket.h>
|
|
#include <sys/un.h>
|
|
#include <fcntl.h>
|
|
#include <errno.h>
|
|
#include <unistd.h>
|
|
#include <signal.h>
|
|
|
|
#include <xcb/xcb.h>
|
|
|
|
#include <wayland-server.h>
|
|
|
|
#include "compositor.h"
|
|
#include "xserver-server-protocol.h"
|
|
|
|
/*
|
|
* TODO:
|
|
* - Clean X socket and lock file on exit
|
|
* - Nuke lock file if process doesn't exist.
|
|
*
|
|
* WM TODO:
|
|
* - Send take focus, hook into wlsc_surface_activate.
|
|
*/
|
|
|
|
struct xserver {
|
|
struct wl_resource resource;
|
|
};
|
|
|
|
struct wlsc_xserver {
|
|
struct wl_display *wl_display;
|
|
struct wl_event_loop *loop;
|
|
struct wl_event_source *sigchld_source;
|
|
int abstract_fd;
|
|
struct wl_event_source *abstract_source;
|
|
int unix_fd;
|
|
struct wl_event_source *unix_source;
|
|
int display;
|
|
struct wlsc_process process;
|
|
struct wl_resource *resource;
|
|
struct wl_client *client;
|
|
struct wlsc_wm *wm;
|
|
};
|
|
|
|
struct wlsc_wm {
|
|
xcb_connection_t *conn;
|
|
struct wl_event_source *source;
|
|
xcb_screen_t *screen;
|
|
struct wl_hash_table *window_hash;
|
|
struct {
|
|
xcb_atom_t wm_protocols;
|
|
xcb_atom_t wm_take_focus;
|
|
xcb_atom_t wm_delete_window;
|
|
xcb_atom_t net_wm_name;
|
|
xcb_atom_t net_wm_icon;
|
|
xcb_atom_t net_wm_state;
|
|
xcb_atom_t net_wm_state_fullscreen;
|
|
xcb_atom_t net_wm_user_time;
|
|
xcb_atom_t net_wm_icon_name;
|
|
xcb_atom_t utf8_string;
|
|
} atom;
|
|
};
|
|
|
|
struct wlsc_wm_window {
|
|
xcb_window_t id;
|
|
struct wlsc_surface *surface;
|
|
struct wl_listener surface_destroy_listener;
|
|
};
|
|
|
|
static struct wlsc_wm_window *
|
|
get_wm_window(struct wlsc_surface *surface);
|
|
|
|
static void
|
|
wlsc_wm_handle_configure_request(struct wlsc_wm *wm, xcb_generic_event_t *event)
|
|
{
|
|
xcb_configure_request_event_t *configure_request =
|
|
(xcb_configure_request_event_t *) event;
|
|
uint32_t values[16];
|
|
int i = 0;
|
|
|
|
fprintf(stderr, "XCB_CONFIGURE_REQUEST\n");
|
|
|
|
if (configure_request->value_mask & XCB_CONFIG_WINDOW_X)
|
|
values[i++] = configure_request->x;
|
|
if (configure_request->value_mask & XCB_CONFIG_WINDOW_Y)
|
|
values[i++] = configure_request->y;
|
|
if (configure_request->value_mask & XCB_CONFIG_WINDOW_WIDTH)
|
|
values[i++] = configure_request->width;
|
|
if (configure_request->value_mask & XCB_CONFIG_WINDOW_HEIGHT)
|
|
values[i++] = configure_request->height;
|
|
if (configure_request->value_mask & XCB_CONFIG_WINDOW_BORDER_WIDTH)
|
|
values[i++] = configure_request->border_width;
|
|
if (configure_request->value_mask & XCB_CONFIG_WINDOW_SIBLING)
|
|
values[i++] = configure_request->sibling;
|
|
if (configure_request->value_mask & XCB_CONFIG_WINDOW_STACK_MODE)
|
|
values[i++] = configure_request->stack_mode;
|
|
|
|
xcb_configure_window(wm->conn,
|
|
configure_request->window,
|
|
configure_request->value_mask, values);
|
|
}
|
|
|
|
static const char *
|
|
get_atom_name(xcb_connection_t *c, xcb_atom_t atom)
|
|
{
|
|
xcb_get_atom_name_cookie_t cookie;
|
|
xcb_get_atom_name_reply_t *reply;
|
|
xcb_generic_error_t *e;
|
|
static char buffer[64];
|
|
|
|
cookie = xcb_get_atom_name (c, atom);
|
|
reply = xcb_get_atom_name_reply (c, cookie, &e);
|
|
snprintf(buffer, sizeof buffer, "%.*s",
|
|
xcb_get_atom_name_name_length (reply),
|
|
xcb_get_atom_name_name (reply));
|
|
free(reply);
|
|
|
|
return buffer;
|
|
}
|
|
|
|
static void
|
|
wlsc_wm_get_properties(struct wlsc_wm *wm, xcb_window_t window)
|
|
{
|
|
xcb_generic_error_t *e;
|
|
xcb_get_property_reply_t *reply;
|
|
void *value;
|
|
int i;
|
|
|
|
struct {
|
|
xcb_atom_t atom;
|
|
xcb_get_property_cookie_t cookie;
|
|
} props[] = {
|
|
{ XCB_ATOM_WM_CLASS, },
|
|
{ XCB_ATOM_WM_TRANSIENT_FOR },
|
|
{ wm->atom.wm_protocols, },
|
|
{ wm->atom.net_wm_name, },
|
|
};
|
|
|
|
for (i = 0; i < ARRAY_LENGTH(props); i++)
|
|
props[i].cookie =
|
|
xcb_get_property (wm->conn,
|
|
0, /* delete */
|
|
window,
|
|
props[i].atom,
|
|
XCB_ATOM_ANY,
|
|
0, 2048);
|
|
|
|
for (i = 0; i < ARRAY_LENGTH(props); i++) {
|
|
reply = xcb_get_property_reply(wm->conn, props[i].cookie, &e);
|
|
value = xcb_get_property_value(reply);
|
|
|
|
fprintf(stderr, "property %s, type %d, format %d, "
|
|
"length %d (value_len %d), value \"%.*s\"\n",
|
|
get_atom_name(wm->conn, props[i].atom),
|
|
reply->type, reply->format,
|
|
xcb_get_property_value_length(reply),
|
|
reply->value_len, reply->value_len,
|
|
reply->type ? (char *) value : "(nil)");
|
|
|
|
free(reply);
|
|
}
|
|
}
|
|
|
|
static void
|
|
wlsc_wm_activate(struct wlsc_wm *wm,
|
|
struct wlsc_wm_window *window, xcb_timestamp_t time)
|
|
{
|
|
xcb_client_message_event_t client_message;
|
|
|
|
client_message.response_type = XCB_CLIENT_MESSAGE;
|
|
client_message.format = 32;
|
|
client_message.window = window->id;
|
|
client_message.type = wm->atom.wm_protocols;
|
|
client_message.data.data32[0] = wm->atom.wm_take_focus;
|
|
client_message.data.data32[1] = XCB_TIME_CURRENT_TIME;
|
|
|
|
xcb_send_event(wm->conn, 0, window->id,
|
|
XCB_EVENT_MASK_SUBSTRUCTURE_REDIRECT,
|
|
(char *) &client_message);
|
|
|
|
xcb_set_input_focus (wm->conn,
|
|
XCB_INPUT_FOCUS_POINTER_ROOT, window->id, time);
|
|
}
|
|
|
|
WL_EXPORT void
|
|
wlsc_xserver_surface_activate(struct wlsc_surface *surface)
|
|
{
|
|
struct wlsc_wm_window *window = get_wm_window(surface);
|
|
struct wlsc_xserver *wxs = surface->compositor->wxs;
|
|
|
|
if (window)
|
|
wlsc_wm_activate(wxs->wm, window, XCB_TIME_CURRENT_TIME);
|
|
else if (wxs && wxs->wm)
|
|
xcb_set_input_focus (wxs->wm->conn,
|
|
XCB_INPUT_FOCUS_POINTER_ROOT,
|
|
XCB_NONE,
|
|
XCB_TIME_CURRENT_TIME);
|
|
}
|
|
|
|
static void
|
|
wlsc_wm_handle_map_request(struct wlsc_wm *wm, xcb_generic_event_t *event)
|
|
{
|
|
xcb_map_request_event_t *map_request =
|
|
(xcb_map_request_event_t *) event;
|
|
uint32_t values[1];
|
|
|
|
fprintf(stderr, "XCB_MAP_REQUEST\n");
|
|
|
|
wlsc_wm_get_properties(wm, map_request->window);
|
|
values[0] = XCB_EVENT_MASK_PROPERTY_CHANGE;
|
|
xcb_change_window_attributes(wm->conn, map_request->window,
|
|
XCB_CW_EVENT_MASK, values);
|
|
|
|
xcb_map_window(wm->conn, map_request->window);
|
|
}
|
|
|
|
static void
|
|
wlsc_wm_handle_map_notify(struct wlsc_wm *wm, xcb_generic_event_t *event)
|
|
{
|
|
xcb_map_notify_event_t *map_notify =
|
|
(xcb_map_notify_event_t *) event;
|
|
struct wlsc_wm_window *window;
|
|
|
|
fprintf(stderr, "XCB_MAP_NOTIFY\n");
|
|
|
|
wlsc_wm_get_properties(wm, map_notify->window);
|
|
|
|
window = wl_hash_table_lookup(wm->window_hash, map_notify->window);
|
|
wlsc_wm_activate(wm, window, XCB_TIME_CURRENT_TIME);
|
|
}
|
|
|
|
static void
|
|
wlsc_wm_handle_property_notify(struct wlsc_wm *wm, xcb_generic_event_t *event)
|
|
{
|
|
xcb_property_notify_event_t *property_notify =
|
|
(xcb_property_notify_event_t *) event;
|
|
|
|
if (property_notify->atom == XCB_ATOM_WM_CLASS) {
|
|
fprintf(stderr, "wm_class changed\n");
|
|
} else if (property_notify->atom == XCB_ATOM_WM_TRANSIENT_FOR) {
|
|
fprintf(stderr, "wm_transient_for changed\n");
|
|
} else if (property_notify->atom == wm->atom.wm_protocols) {
|
|
fprintf(stderr, "wm_protocols changed\n");
|
|
} else if (property_notify->atom == wm->atom.net_wm_name) {
|
|
fprintf(stderr, "_net_wm_name changed\n");
|
|
} else if (property_notify->atom == wm->atom.net_wm_user_time) {
|
|
fprintf(stderr, "_net_wm_user_time changed\n");
|
|
} else if (property_notify->atom == wm->atom.net_wm_icon_name) {
|
|
fprintf(stderr, "_net_wm_icon_name changed\n");
|
|
} else if (property_notify->atom == XCB_ATOM_WM_NAME) {
|
|
fprintf(stderr, "wm_name changed\n");
|
|
} else if (property_notify->atom == XCB_ATOM_WM_ICON_NAME) {
|
|
fprintf(stderr, "wm_icon_name changed\n");
|
|
} else {
|
|
fprintf(stderr, "XCB_PROPERTY_NOTIFY: "
|
|
"unhandled property change: %s\n",
|
|
get_atom_name(wm->conn, property_notify->atom));
|
|
}
|
|
}
|
|
|
|
static void
|
|
wlsc_wm_handle_create_notify(struct wlsc_wm *wm, xcb_generic_event_t *event)
|
|
{
|
|
xcb_create_notify_event_t *create_notify =
|
|
(xcb_create_notify_event_t *) event;
|
|
struct wlsc_wm_window *window;
|
|
|
|
fprintf(stderr, "XCB_CREATE_NOTIFY, win %d\n", create_notify->window);
|
|
|
|
window = malloc(sizeof *window);
|
|
if (window == NULL) {
|
|
fprintf(stderr, "failed to allocate window\n");
|
|
return;
|
|
}
|
|
|
|
window->id = create_notify->window;
|
|
wl_hash_table_insert(wm->window_hash, window->id, window);
|
|
|
|
fprintf(stderr, "created window %p\n", window);
|
|
}
|
|
|
|
static void
|
|
wlsc_wm_handle_destroy_notify(struct wlsc_wm *wm, xcb_generic_event_t *event)
|
|
{
|
|
xcb_destroy_notify_event_t *destroy_notify =
|
|
(xcb_destroy_notify_event_t *) event;
|
|
struct wlsc_wm_window *window;
|
|
|
|
fprintf(stderr, "XCB_DESTROY_NOTIFY, win %d\n",
|
|
destroy_notify->window);
|
|
|
|
window = wl_hash_table_lookup(wm->window_hash, destroy_notify->window);
|
|
if (window == NULL) {
|
|
fprintf(stderr, "destroy notify for unknow window %d\n",
|
|
destroy_notify->window);
|
|
return;
|
|
}
|
|
|
|
fprintf(stderr, "destroy window %p\n", window);
|
|
wl_hash_table_remove(wm->window_hash, window->id);
|
|
free(window);
|
|
}
|
|
|
|
static int
|
|
wlsc_wm_handle_event(int fd, uint32_t mask, void *data)
|
|
{
|
|
struct wlsc_wm *wm = data;
|
|
xcb_generic_event_t *event;
|
|
int count = 0;
|
|
|
|
while (event = xcb_poll_for_event(wm->conn), event != NULL) {
|
|
switch (event->response_type) {
|
|
case XCB_CREATE_NOTIFY:
|
|
wlsc_wm_handle_create_notify(wm, event);
|
|
break;
|
|
case XCB_MAP_REQUEST:
|
|
wlsc_wm_handle_map_request(wm, event);
|
|
break;
|
|
case XCB_MAP_NOTIFY:
|
|
wlsc_wm_handle_map_notify(wm, event);
|
|
break;
|
|
case XCB_UNMAP_NOTIFY:
|
|
fprintf(stderr, "XCB_UNMAP_NOTIFY\n");
|
|
break;
|
|
case XCB_CONFIGURE_REQUEST:
|
|
wlsc_wm_handle_configure_request(wm, event);
|
|
break;
|
|
case XCB_CONFIGURE_NOTIFY:
|
|
fprintf(stderr, "XCB_CONFIGURE_NOTIFY\n");
|
|
break;
|
|
case XCB_DESTROY_NOTIFY:
|
|
wlsc_wm_handle_destroy_notify(wm, event);
|
|
break;
|
|
case XCB_MAPPING_NOTIFY:
|
|
fprintf(stderr, "XCB_MAPPING_NOTIFY\n");
|
|
break;
|
|
case XCB_PROPERTY_NOTIFY:
|
|
wlsc_wm_handle_property_notify(wm, event);
|
|
break;
|
|
default:
|
|
fprintf(stderr, "Unhandled event %d\n",
|
|
event->response_type);
|
|
break;
|
|
}
|
|
free(event);
|
|
count++;
|
|
}
|
|
|
|
xcb_flush(wm->conn);
|
|
|
|
return count;
|
|
}
|
|
|
|
static void
|
|
wxs_wm_get_resources(struct wlsc_wm *wm)
|
|
{
|
|
|
|
#define F(field) offsetof(struct wlsc_wm, field)
|
|
|
|
static const struct { const char *name; int offset; } atoms[] = {
|
|
{ "WM_PROTOCOLS", F(atom.wm_protocols) },
|
|
{ "WM_TAKE_FOCUS", F(atom.wm_take_focus) },
|
|
{ "WM_DELETE_WINDOW", F(atom.wm_delete_window) },
|
|
{ "_NET_WM_NAME", F(atom.net_wm_name) },
|
|
{ "_NET_WM_ICON", F(atom.net_wm_icon) },
|
|
{ "_NET_WM_STATE", F(atom.net_wm_state) },
|
|
{ "_NET_WM_STATE_FULLSCREEN", F(atom.net_wm_state_fullscreen) },
|
|
{ "_NET_WM_USER_TIME", F(atom.net_wm_user_time) },
|
|
{ "_NET_WM_ICON_NAME", F(atom.net_wm_icon_name) },
|
|
{ "UTF8_STRING", F(atom.utf8_string) },
|
|
};
|
|
|
|
xcb_intern_atom_cookie_t cookies[ARRAY_LENGTH(atoms)];
|
|
xcb_intern_atom_reply_t *reply;
|
|
int i;
|
|
|
|
for (i = 0; i < ARRAY_LENGTH(atoms); i++)
|
|
cookies[i] = xcb_intern_atom (wm->conn, 0,
|
|
strlen(atoms[i].name),
|
|
atoms[i].name);
|
|
|
|
for (i = 0; i < ARRAY_LENGTH(atoms); i++) {
|
|
reply = xcb_intern_atom_reply (wm->conn, cookies[i], NULL);
|
|
*(xcb_atom_t *) ((char *) wm + atoms[i].offset) = reply->atom;
|
|
free(reply);
|
|
}
|
|
}
|
|
|
|
static struct wlsc_wm *
|
|
wlsc_wm_create(struct wlsc_xserver *wxs)
|
|
{
|
|
struct wlsc_wm *wm;
|
|
struct wl_event_loop *loop;
|
|
xcb_screen_iterator_t s;
|
|
uint32_t values[1];
|
|
int sv[2];
|
|
|
|
wm = malloc(sizeof *wm);
|
|
if (wm == NULL)
|
|
return NULL;
|
|
|
|
wm->window_hash = wl_hash_table_create();
|
|
if (wm->window_hash == NULL) {
|
|
free(wm);
|
|
return NULL;
|
|
}
|
|
|
|
if (socketpair(AF_UNIX, SOCK_STREAM | SOCK_CLOEXEC, 0, sv) < 0) {
|
|
fprintf(stderr, "socketpair failed\n");
|
|
wl_hash_table_destroy(wm->window_hash);
|
|
free(wm);
|
|
return NULL;
|
|
}
|
|
|
|
wl_resource_post_event(wxs->resource, XSERVER_CLIENT, sv[1]);
|
|
wl_client_flush(wxs->resource->client);
|
|
close(sv[1]);
|
|
|
|
/* xcb_connect_to_fd takes ownership of the fd. */
|
|
wm->conn = xcb_connect_to_fd(sv[0], NULL);
|
|
if (xcb_connection_has_error(wm->conn)) {
|
|
fprintf(stderr, "xcb_connect_to_fd failed\n");
|
|
close(sv[0]);
|
|
wl_hash_table_destroy(wm->window_hash);
|
|
free(wm);
|
|
return NULL;
|
|
}
|
|
|
|
s = xcb_setup_roots_iterator(xcb_get_setup(wm->conn));
|
|
wm->screen = s.data;
|
|
|
|
loop = wl_display_get_event_loop(wxs->wl_display);
|
|
wm->source =
|
|
wl_event_loop_add_fd(loop, sv[0],
|
|
WL_EVENT_READABLE,
|
|
wlsc_wm_handle_event, wm);
|
|
wl_event_source_check(wm->source);
|
|
|
|
wxs_wm_get_resources(wm);
|
|
|
|
values[0] =
|
|
XCB_EVENT_MASK_STRUCTURE_NOTIFY |
|
|
XCB_EVENT_MASK_RESIZE_REDIRECT |
|
|
XCB_EVENT_MASK_SUBSTRUCTURE_NOTIFY |
|
|
XCB_EVENT_MASK_SUBSTRUCTURE_REDIRECT |
|
|
XCB_EVENT_MASK_PROPERTY_CHANGE;
|
|
xcb_change_window_attributes(wm->conn, wm->screen->root,
|
|
XCB_CW_EVENT_MASK, values);
|
|
|
|
xcb_flush(wm->conn);
|
|
fprintf(stderr, "created wm\n");
|
|
|
|
return wm;
|
|
}
|
|
|
|
static void
|
|
wlsc_wm_destroy(struct wlsc_wm *wm)
|
|
{
|
|
/* FIXME: Free windows in hash. */
|
|
wl_hash_table_destroy(wm->window_hash);
|
|
xcb_disconnect(wm->conn);
|
|
wl_event_source_remove(wm->source);
|
|
free(wm);
|
|
}
|
|
|
|
static int
|
|
wlsc_xserver_handle_event(int listen_fd, uint32_t mask, void *data)
|
|
{
|
|
struct wlsc_xserver *mxs = data;
|
|
char display[8], s[8], logfile[32];
|
|
int sv[2], flags;
|
|
|
|
if (socketpair(AF_UNIX, SOCK_STREAM | SOCK_CLOEXEC, 0, sv) < 0) {
|
|
fprintf(stderr, "socketpair failed\n");
|
|
return 1;
|
|
}
|
|
|
|
mxs->process.pid = fork();
|
|
switch (mxs->process.pid) {
|
|
case 0:
|
|
/* SOCK_CLOEXEC closes both ends, so we need to unset
|
|
* the flag on the client fd. */
|
|
flags = fcntl(sv[1], F_GETFD);
|
|
if (flags != -1)
|
|
fcntl(sv[1], F_SETFD, flags & ~FD_CLOEXEC);
|
|
|
|
snprintf(s, sizeof s, "%d", sv[1]);
|
|
setenv("WAYLAND_SOCKET", s, 1);
|
|
|
|
snprintf(display, sizeof display, ":%d", mxs->display);
|
|
snprintf(logfile, sizeof logfile,
|
|
"/tmp/x-log-%d", mxs->display);
|
|
|
|
if (execl(XSERVER_PATH,
|
|
XSERVER_PATH,
|
|
display,
|
|
"-wayland",
|
|
"-rootless",
|
|
"-retro",
|
|
"-logfile", logfile,
|
|
"-nolisten", "all",
|
|
"-terminate",
|
|
NULL) < 0)
|
|
fprintf(stderr, "exec failed: %m\n");
|
|
exit(-1);
|
|
|
|
default:
|
|
fprintf(stderr, "forked X server, pid %d\n", mxs->process.pid);
|
|
|
|
close(sv[1]);
|
|
mxs->client = wl_client_create(mxs->wl_display, sv[0]);
|
|
|
|
wlsc_watch_process(&mxs->process);
|
|
|
|
wl_event_source_remove(mxs->abstract_source);
|
|
wl_event_source_remove(mxs->unix_source);
|
|
break;
|
|
|
|
case -1:
|
|
fprintf(stderr, "failed to fork\n");
|
|
break;
|
|
}
|
|
|
|
return 1;
|
|
}
|
|
|
|
static void
|
|
wlsc_xserver_shutdown(struct wlsc_xserver *wxs)
|
|
{
|
|
char path[256];
|
|
|
|
snprintf(path, sizeof path, "/tmp/.X%d-lock", wxs->display);
|
|
unlink(path);
|
|
snprintf(path, sizeof path, "/tmp/.X11-unix/X%d", wxs->display);
|
|
unlink(path);
|
|
close(wxs->abstract_fd);
|
|
wl_event_source_remove(wxs->abstract_source);
|
|
close(wxs->unix_fd);
|
|
wl_event_source_remove(wxs->unix_source);
|
|
wxs->loop = NULL;
|
|
}
|
|
|
|
static void
|
|
wlsc_xserver_cleanup(struct wlsc_process *process, int status)
|
|
{
|
|
struct wlsc_xserver *mxs =
|
|
container_of(process, struct wlsc_xserver, process);
|
|
|
|
mxs->process.pid = 0;
|
|
mxs->client = NULL;
|
|
mxs->resource = NULL;
|
|
|
|
mxs->abstract_source =
|
|
wl_event_loop_add_fd(mxs->loop, mxs->abstract_fd,
|
|
WL_EVENT_READABLE,
|
|
wlsc_xserver_handle_event, mxs);
|
|
|
|
mxs->unix_source =
|
|
wl_event_loop_add_fd(mxs->loop, mxs->unix_fd,
|
|
WL_EVENT_READABLE,
|
|
wlsc_xserver_handle_event, mxs);
|
|
|
|
if (mxs->wm) {
|
|
fprintf(stderr, "xserver exited, code %d\n", status);
|
|
wlsc_wm_destroy(mxs->wm);
|
|
mxs->wm = NULL;
|
|
} else {
|
|
/* If the X server crashes before it binds to the
|
|
* xserver interface, shut down and don't try
|
|
* again. */
|
|
fprintf(stderr, "xserver crashing too fast: %d\n", status);
|
|
wlsc_xserver_shutdown(mxs);
|
|
}
|
|
}
|
|
|
|
static void
|
|
surface_destroy(struct wl_listener *listener,
|
|
struct wl_resource *resource, uint32_t time)
|
|
{
|
|
struct wlsc_wm_window *window =
|
|
container_of(listener,
|
|
struct wlsc_wm_window, surface_destroy_listener);
|
|
|
|
fprintf(stderr, "surface for xid %d destroyed\n", window->id);
|
|
}
|
|
|
|
static struct wlsc_wm_window *
|
|
get_wm_window(struct wlsc_surface *surface)
|
|
{
|
|
struct wl_resource *resource = &surface->surface.resource;
|
|
struct wl_listener *listener;
|
|
|
|
wl_list_for_each(listener, &resource->destroy_listener_list, link) {
|
|
if (listener->func == surface_destroy)
|
|
return container_of(listener,
|
|
struct wlsc_wm_window,
|
|
surface_destroy_listener);
|
|
}
|
|
|
|
return NULL;
|
|
}
|
|
|
|
static void
|
|
xserver_set_window_id(struct wl_client *client, struct wl_resource *resource,
|
|
struct wl_resource *surface_resource, uint32_t id)
|
|
{
|
|
struct wlsc_xserver *wxs = resource->data;
|
|
struct wlsc_wm *wm = wxs->wm;
|
|
struct wl_surface *surface = surface_resource->data;
|
|
struct wlsc_wm_window *window;
|
|
|
|
if (client != wxs->client)
|
|
return;
|
|
|
|
window = wl_hash_table_lookup(wm->window_hash, id);
|
|
if (window == NULL) {
|
|
fprintf(stderr, "set_window_id for unknown window %d\n", id);
|
|
return;
|
|
}
|
|
|
|
fprintf(stderr, "set_window_id %d for surface %p\n", id, surface);
|
|
|
|
window->surface = (struct wlsc_surface *) surface;
|
|
window->surface_destroy_listener.func = surface_destroy;
|
|
wl_list_insert(surface->resource.destroy_listener_list.prev,
|
|
&window->surface_destroy_listener.link);
|
|
}
|
|
|
|
static const struct xserver_interface xserver_implementation = {
|
|
xserver_set_window_id
|
|
};
|
|
|
|
static void
|
|
bind_xserver(struct wl_client *client,
|
|
void *data, uint32_t version, uint32_t id)
|
|
{
|
|
struct wlsc_xserver *wxs = data;
|
|
|
|
/* If it's a different client than the xserver we launched,
|
|
* don't start the wm. */
|
|
if (client != wxs->client)
|
|
return;
|
|
|
|
wxs->resource =
|
|
wl_client_add_object(client, &xserver_interface,
|
|
&xserver_implementation, id, wxs);
|
|
|
|
wxs->wm = wlsc_wm_create(wxs);
|
|
if (wxs->wm == NULL) {
|
|
fprintf(stderr, "failed to create wm\n");
|
|
}
|
|
|
|
wl_resource_post_event(wxs->resource,
|
|
XSERVER_LISTEN_SOCKET, wxs->abstract_fd);
|
|
|
|
wl_resource_post_event(wxs->resource,
|
|
XSERVER_LISTEN_SOCKET, wxs->unix_fd);
|
|
}
|
|
|
|
static int
|
|
bind_to_abstract_socket(int display)
|
|
{
|
|
struct sockaddr_un addr;
|
|
socklen_t size, name_size;
|
|
int fd;
|
|
|
|
fd = socket(PF_LOCAL, SOCK_STREAM | SOCK_CLOEXEC, 0);
|
|
if (fd < 0)
|
|
return -1;
|
|
|
|
addr.sun_family = AF_LOCAL;
|
|
name_size = snprintf(addr.sun_path, sizeof addr.sun_path,
|
|
"%c/tmp/.X11-unix/X%d", 0, display);
|
|
size = offsetof(struct sockaddr_un, sun_path) + name_size;
|
|
if (bind(fd, (struct sockaddr *) &addr, size) < 0) {
|
|
fprintf(stderr, "failed to bind to @%s: %s\n",
|
|
addr.sun_path + 1, strerror(errno));
|
|
close(fd);
|
|
return -1;
|
|
}
|
|
|
|
if (listen(fd, 1) < 0) {
|
|
close(fd);
|
|
return -1;
|
|
}
|
|
|
|
return fd;
|
|
}
|
|
|
|
static int
|
|
bind_to_unix_socket(int display)
|
|
{
|
|
struct sockaddr_un addr;
|
|
socklen_t size, name_size;
|
|
int fd;
|
|
|
|
fd = socket(PF_LOCAL, SOCK_STREAM | SOCK_CLOEXEC, 0);
|
|
if (fd < 0)
|
|
return -1;
|
|
|
|
addr.sun_family = AF_LOCAL;
|
|
name_size = snprintf(addr.sun_path, sizeof addr.sun_path,
|
|
"/tmp/.X11-unix/X%d", display) + 1;
|
|
size = offsetof(struct sockaddr_un, sun_path) + name_size;
|
|
unlink(addr.sun_path);
|
|
if (bind(fd, (struct sockaddr *) &addr, size) < 0) {
|
|
fprintf(stderr, "failed to bind to %s (%s)\n",
|
|
addr.sun_path, strerror(errno));
|
|
close(fd);
|
|
return -1;
|
|
}
|
|
|
|
if (listen(fd, 1) < 0) {
|
|
unlink(addr.sun_path);
|
|
close(fd);
|
|
return -1;
|
|
}
|
|
|
|
return fd;
|
|
}
|
|
|
|
static int
|
|
create_lockfile(int display, char *lockfile, size_t lsize)
|
|
{
|
|
char pid[16], *end;
|
|
int fd, size;
|
|
pid_t other;
|
|
|
|
snprintf(lockfile, lsize, "/tmp/.X%d-lock", display);
|
|
fd = open(lockfile, O_WRONLY | O_CLOEXEC | O_CREAT | O_EXCL, 0444);
|
|
if (fd < 0 && errno == EEXIST) {
|
|
fd = open(lockfile, O_CLOEXEC, O_RDONLY);
|
|
if (fd < 0 || read(fd, pid, 11) != 11) {
|
|
fprintf(stderr, "can't read lock file %s: %s\n",
|
|
lockfile, strerror(errno));
|
|
errno = EEXIST;
|
|
return -1;
|
|
}
|
|
|
|
other = strtol(pid, &end, 0);
|
|
if (end != pid + 10) {
|
|
fprintf(stderr, "can't parse lock file %s\n",
|
|
lockfile);
|
|
errno = EEXIST;
|
|
return -1;
|
|
}
|
|
|
|
if (kill(other, 0) < 0 && errno == ESRCH) {
|
|
/* stale lock file; unlink and try again */
|
|
fprintf(stderr,
|
|
"unlinking stale lock file %s\n", lockfile);
|
|
unlink(lockfile);
|
|
errno = EAGAIN;
|
|
return -1;
|
|
}
|
|
|
|
errno = EEXIST;
|
|
return -1;
|
|
} else if (fd < 0) {
|
|
fprintf(stderr, "failed to create lock file %s: %s\n",
|
|
lockfile, strerror(errno));
|
|
return -1;
|
|
}
|
|
|
|
/* Subtle detail: we use the pid of the wayland
|
|
* compositor, not the xserver in the lock file. */
|
|
size = snprintf(pid, sizeof pid, "%10d\n", getpid());
|
|
if (write(fd, pid, size) != size) {
|
|
unlink(lockfile);
|
|
close(fd);
|
|
return -1;
|
|
}
|
|
|
|
close(fd);
|
|
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
wlsc_xserver_init(struct wlsc_compositor *compositor)
|
|
{
|
|
struct wl_display *display = compositor->wl_display;
|
|
struct wlsc_xserver *mxs;
|
|
char lockfile[256];
|
|
|
|
mxs = malloc(sizeof *mxs);
|
|
memset(mxs, 0, sizeof *mxs);
|
|
|
|
mxs->process.cleanup = wlsc_xserver_cleanup;
|
|
mxs->wl_display = display;
|
|
|
|
mxs->display = 0;
|
|
|
|
retry:
|
|
if (create_lockfile(mxs->display, lockfile, sizeof lockfile) < 0) {
|
|
if (errno == EAGAIN) {
|
|
goto retry;
|
|
} else if (errno == EEXIST) {
|
|
mxs->display++;
|
|
goto retry;
|
|
} else {
|
|
free(mxs);
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
mxs->abstract_fd = bind_to_abstract_socket(mxs->display);
|
|
if (mxs->abstract_fd < 0 && errno == EADDRINUSE) {
|
|
mxs->display++;
|
|
unlink(lockfile);
|
|
goto retry;
|
|
}
|
|
|
|
mxs->unix_fd = bind_to_unix_socket(mxs->display);
|
|
if (mxs->unix_fd < 0) {
|
|
unlink(lockfile);
|
|
close(mxs->abstract_fd);
|
|
free(mxs);
|
|
return -1;
|
|
}
|
|
|
|
fprintf(stderr, "xserver listening on display :%d\n", mxs->display);
|
|
|
|
mxs->loop = wl_display_get_event_loop(display);
|
|
mxs->abstract_source =
|
|
wl_event_loop_add_fd(mxs->loop, mxs->abstract_fd,
|
|
WL_EVENT_READABLE,
|
|
wlsc_xserver_handle_event, mxs);
|
|
mxs->unix_source =
|
|
wl_event_loop_add_fd(mxs->loop, mxs->unix_fd,
|
|
WL_EVENT_READABLE,
|
|
wlsc_xserver_handle_event, mxs);
|
|
|
|
wl_display_add_global(display, &xserver_interface, mxs, bind_xserver);
|
|
|
|
compositor->wxs = mxs;
|
|
|
|
return 0;
|
|
}
|
|
|
|
void
|
|
wlsc_xserver_destroy(struct wlsc_compositor *compositor)
|
|
{
|
|
struct wlsc_xserver *wxs = compositor->wxs;
|
|
|
|
if (!wxs)
|
|
return;
|
|
|
|
if (wxs->loop)
|
|
wlsc_xserver_shutdown(wxs);
|
|
|
|
free(wxs);
|
|
}
|