+static xcb_connection_t *conn;
+static xcb_key_symbols_t *keysyms;
+static xcb_window_t root;
+static xcb_event_mask_t events;
+static list_t *screens;
+static void *cache;
+
+
+/************************
+ * Conversion functions *
+ ************************/
+
+/* Key presses */
+static struct {
+ event_t ev;
+ xcb_keysym_t sym;
+} keysym_map[] = {
+ { EV_LEFT, 0xFF51 },
+ { EV_RIGHT, 0xFF53 },
+ { EV_UP, 0xFF52 },
+ { EV_DOWN, 0xFF54 },
+ { EV_HOME, 0xFF50 },
+ { EV_END, 0xFF57 },
+ { EV_PAGEUP, 0xFF55 },
+ { EV_PAGEDOWN, 0xFF56 },
+ { EV_F1, 0xFFBE },
+ { EV_F2, 0xFFBF },
+ { EV_F3, 0xFFC0 },
+ { EV_F4, 0xFFC1 },
+ { EV_F5, 0xFFC2 },
+ { EV_F6, 0xFFC3 },
+ { EV_F7, 0xFFC4 },
+ { EV_F8, 0xFFC5 },
+ { EV_F9, 0xFFC6 },
+ { EV_F10, 0xFFC7 },
+ { EV_F11, 0xFFC8 },
+ { EV_F12, 0xFFC9 },
+};
+
+static xcb_keycode_t *event_to_keycodes(event_t ev)
+{
+ xcb_keycode_t *codes = NULL;
+
+ /* Get keysym */
+ xcb_keysym_t keysym = map_get(keysym_map, ev, ev, sym, ev);
+
+ /* Get keycodes */
+ if (!(codes = xcb_key_symbols_get_keycode(keysyms, keysym)))
+ warn("no keycode found for %d->%d", ev, keysym);
+
+ return codes;
+}
+
+static event_t keycode_to_event(xcb_keycode_t code)
+{
+ /* Get keysym */
+ xcb_keysym_t keysym = xcb_key_symbols_get_keysym(keysyms, code, 0);
+
+ /* Get event */
+ return map_get(keysym_map, sym,keysym, ev,keysym);
+}
+
+/* Button presses */
+static event_t button_to_event(xcb_button_t btn)
+{
+ return EV_MOUSE0 + btn;
+}
+
+static xcb_button_t event_to_button(event_t ev)
+{
+ return ev - EV_MOUSE0;
+}
+
+/* Modifier masks */
+static xcb_mod_mask_t mod_to_mask(mod_t mod)
+{
+ xcb_mod_mask_t mask = 0;
+ if (mod.alt) mask |= XCB_MOD_MASK_1;
+ if (mod.ctrl) mask |= XCB_MOD_MASK_CONTROL;
+ if (mod.shift) mask |= XCB_MOD_MASK_SHIFT;
+ if (mod.win) mask |= XCB_MOD_MASK_4;
+ return mask;
+}
+
+static mod_t mask_to_mod(xcb_mod_mask_t mask, int up)
+{
+ mod_t mod = { .up = up };
+ if (mask & XCB_MOD_MASK_1) mod.alt = 1;
+ if (mask & XCB_MOD_MASK_CONTROL) mod.ctrl = 1;
+ if (mask & XCB_MOD_MASK_SHIFT) mod.shift = 1;
+ if (mask & XCB_MOD_MASK_4) mod.win = 1;
+ return mod;
+}
+
+/* Mouse pointers */
+static ptr_t list_to_ptr(int16_t *list)
+{
+ ptr_t ptr = {};
+ ptr.rx = list[0]; // root_x
+ ptr.ry = list[1]; // root_y
+ ptr.x = list[2]; // event_x
+ ptr.y = list[3]; // event_y
+ return ptr;
+}
+
+/********************
+ * Window functions *
+ ********************/
+
+static int win_cmp(const void *_a, const void *_b)
+{
+ const win_t *a = _a;
+ const win_t *b = _b;
+ if (a->sys->xcb < b->sys->xcb) return -1;
+ if (a->sys->xcb > b->sys->xcb) return 1;
+ return 0;
+}
+
+static win_t *win_get(xcb_window_t xcb)
+{
+ win_sys_t sys = { .xcb = xcb };
+ win_t key = { .sys = &sys };
+
+ win_t **win = tfind(&key, &cache, win_cmp);
+
+ if (!win) {
+ warn("no window for %u", xcb);
+ return NULL;
+ }
+
+ return *win;
+}
+
+/****************
+ * XCB Wrappers *
+ ****************/
+
+static int do_query_tree(xcb_window_t win, xcb_window_t **kids)
+{
+ xcb_query_tree_cookie_t cookie =
+ xcb_query_tree(conn, win);
+ if (!cookie.sequence)
+ return warn("do_query_tree: %d - bad cookie", win);
+
+ xcb_query_tree_reply_t *reply =
+ xcb_query_tree_reply(conn, cookie, NULL);
+ if (!reply)
+ return warn("do_query_tree: %d - no reply", win);
+
+ int nkids = xcb_query_tree_children_length(reply);
+ *kids = xcb_query_tree_children(reply);
+ printf("do_query_tree: %d - n=%d\n", win, nkids);
+ return nkids;
+}
+
+static int do_get_geometry(xcb_window_t win,
+ int *x, int *y, int *w, int *h)
+{
+ xcb_get_geometry_cookie_t cookie =
+ xcb_get_geometry(conn, win);
+ if (!cookie.sequence)
+ return warn("do_get_geometry: %d - bad cookie", win);
+
+ xcb_get_geometry_reply_t *reply =
+ xcb_get_geometry_reply(conn, cookie, NULL);
+ if (!reply)
+ return warn("do_get_geometry: %d - no reply", win);
+
+ printf("do_get_geometry: %d - %dx%d @ %d,%d\n",
+ win, reply->width, reply->height, reply->x, reply->y);
+ *x = reply->x;
+ *y = reply->y;
+ *w = reply->width;
+ *h = reply->height;
+ return 1;
+}
+
+static int do_get_window_attributes(xcb_window_t win,
+ int *override, int *mapped)
+{
+ xcb_get_window_attributes_cookie_t cookie =
+ xcb_get_window_attributes(conn, win);
+ if (!cookie.sequence)
+ return warn("do_get_window_attributes: %d - bad cookie", win);
+
+ xcb_get_window_attributes_reply_t *reply =
+ xcb_get_window_attributes_reply(conn, cookie, NULL);
+ if (!reply)
+ return warn("do_get_window_attributes: %d - no reply ", win);
+
+ printf("do_get_window_attributes: %d - %d\n",
+ win, reply->override_redirect);
+ *override = reply->override_redirect;
+ *mapped = reply->map_state != XCB_MAP_STATE_UNMAPPED;
+ return 1;
+}
+
+static int do_xinerama_check(void)
+{
+ const xcb_query_extension_reply_t *data =
+ xcb_get_extension_data(conn, &xcb_xinerama_id);
+ if (!data || !data->present)
+ return warn("do_xinerama_check: no ext");
+
+ xcb_xinerama_is_active_cookie_t cookie =
+ xcb_xinerama_is_active(conn);
+ if (!cookie.sequence)
+ return warn("do_xinerama_check: no cookie");
+
+ xcb_xinerama_is_active_reply_t *reply =
+ xcb_xinerama_is_active_reply(conn, cookie, NULL);
+ if (!reply)
+ warn("do_xinerama_check: no reply");
+
+ printf("do_xinerama_check: %d\n", reply->state);
+ return reply && reply->state;
+}
+
+static int do_query_screens(xcb_xinerama_screen_info_t **info)
+{
+ xcb_xinerama_query_screens_cookie_t cookie =
+ xcb_xinerama_query_screens(conn);
+ if (!cookie.sequence)
+ return warn("do_query_screens: bad cookie");
+
+ xcb_xinerama_query_screens_reply_t *reply =
+ xcb_xinerama_query_screens_reply(conn, cookie, NULL);
+ if (!reply)
+ return warn("do_query_screens: no reply");
+
+ int ninfo = xcb_xinerama_query_screens_screen_info_length(reply);
+ *info = xcb_xinerama_query_screens_screen_info(reply);
+ printf("do_query_screens: %d screens\n", ninfo);
+ return ninfo;
+}
+
+/**********************
+ * X11 Event Handlers *
+ **********************/
+
+/* Specific events */
+static void on_key_event(xcb_key_press_event_t *event, int up)
+{
+ xcb_window_t xcb = event->event == root ?
+ event->child : event->event;
+ win_t *win = win_get(xcb);
+ event_t ev = keycode_to_event(event->detail);
+ mod_t mod = mask_to_mod(event->state, up);
+ ptr_t ptr = list_to_ptr(&event->root_x);
+ printf("on_key_event: xcb=%u -> win=%p\n", xcb, win);
+ wm_handle_event(win, ev, mod, ptr);
+}
+
+static void on_button_event(xcb_button_press_event_t *event, int up)
+{
+ xcb_window_t xcb = event->event == root ?
+ event->child : event->event;
+ win_t *win = win_get(xcb);
+ event_t ev = button_to_event(event->detail);
+ mod_t mod = mask_to_mod(event->state, up);
+ ptr_t ptr = list_to_ptr(&event->root_x);
+ printf("on_button_event: xcb=%u -> win=%p\n", xcb, win);
+
+ if (!wm_handle_event(win, ev, mod, ptr))
+ xcb_allow_events(conn, XCB_ALLOW_REPLAY_POINTER, event->time);
+ else if (!up)
+ xcb_grab_pointer(conn, 1, xcb,
+ XCB_EVENT_MASK_POINTER_MOTION |
+ XCB_EVENT_MASK_BUTTON_RELEASE,
+ XCB_GRAB_MODE_ASYNC,
+ XCB_GRAB_MODE_ASYNC,
+ 0, 0, XCB_CURRENT_TIME);
+ else
+ xcb_ungrab_pointer(conn, XCB_CURRENT_TIME);
+
+}
+
+static void on_motion_notify(xcb_motion_notify_event_t *event)
+{
+ xcb_window_t xcb = event->event == root ?
+ event->child : event->event;
+ win_t *win = win_get(xcb);
+ ptr_t ptr = list_to_ptr(&event->root_x);
+ printf("on_motion_notify: xcb=%u -> win=%p - %d,%d / %d.%d\n", xcb, win,
+ ptr.x, ptr.y, ptr.rx, ptr.ry);
+ wm_handle_ptr(win, ptr);
+}
+
+static void on_create_notify(xcb_create_notify_event_t *event)
+{
+ win_t *win = new0(win_t);
+ win_sys_t *sys = new0(win_sys_t);
+
+ printf("on_create_notify: xcb=%u -> win=%p\n",
+ event->window, win);
+
+ win->x = event->x;
+ win->y = event->y;
+ win->w = event->width;
+ win->h = event->height;
+ win->sys = sys;
+
+ sys->xcb = event->window;
+ sys->override = event->override_redirect;
+
+ tsearch(win, &cache, win_cmp);
+}
+
+static void on_destroy_notify(win_t *win, xcb_destroy_notify_event_t *event)
+{
+ printf("on_destroy_notify: xcb=%u -> win=%p\n",
+ event->window, win);
+
+ tdelete(win, &cache, win_cmp);
+
+ free(win->sys);
+ free(win);
+}
+
+static void on_map_request(win_t *win, xcb_map_request_event_t *event)
+{
+ printf("on_map_request: xcb=%u -> win=%p\n",
+ event->window, win);
+
+ if (!win->sys->override && !win->sys->mapped)
+ wm_insert(win);
+ win->sys->mapped = 1;
+
+ xcb_map_window(conn, win->sys->xcb);
+ sys_move(win, win->x, win->y, win->w, win->h);
+}
+
+static void on_configure_request(win_t *win, xcb_configure_request_event_t *event)
+{
+ printf("on_configure_request: xcb=%u -> win=%p -- %dx%d @ %d,%d\n",
+ event->window, win,
+ event->width, event->height,
+ event->x, event->y);
+
+ win->x = event->x;
+ win->y = event->y;
+ win->w = event->width;
+ win->h = event->height;
+
+ xcb_configure_notify_event_t resp = {
+ .response_type = XCB_CONFIGURE_NOTIFY,
+ .event = win->sys->xcb,
+ .window = win->sys->xcb,
+ .x = win->x,
+ .y = win->y,
+ .width = win->w,
+ .height = win->h,
+ .border_width = border,
+ };
+
+ xcb_send_event(conn, 0, win->sys->xcb,
+ XCB_EVENT_MASK_STRUCTURE_NOTIFY,
+ (const char *)&resp);
+}
+
+/* Generic Event */
+static void on_event(xcb_generic_event_t *event)
+{
+ win_t *win = NULL;
+
+ int type = XCB_EVENT_RESPONSE_TYPE(event);
+ int sent = XCB_EVENT_SENT(event);
+ const char *name = NULL;
+
+ switch (type) {
+ /* Input handling */
+ case XCB_KEY_PRESS:
+ on_key_event((xcb_key_press_event_t *)event, 0);
+ break;
+ case XCB_KEY_RELEASE:
+ on_key_event((xcb_key_release_event_t *)event, 1);
+ break;
+ case XCB_BUTTON_PRESS:
+ on_button_event((xcb_button_press_event_t *)event, 0);
+ break;
+ case XCB_BUTTON_RELEASE:
+ on_button_event((xcb_button_release_event_t *)event, 1);
+ break;
+ case XCB_MOTION_NOTIFY:
+ on_motion_notify((xcb_motion_notify_event_t *)event);
+ break;
+
+ /* Window management */
+ case XCB_CREATE_NOTIFY:
+ on_create_notify((xcb_create_notify_event_t *)event);
+ break;
+ case XCB_DESTROY_NOTIFY:
+ if ((win = win_get(((xcb_destroy_notify_event_t *)event)->window)))
+ on_destroy_notify(win, (xcb_destroy_notify_event_t *)event);
+ break;
+ case XCB_MAP_REQUEST:
+ if ((win = win_get(((xcb_map_request_event_t *)event)->window)))
+ on_map_request(win, (xcb_map_request_event_t *)event);
+ break;
+ case XCB_CONFIGURE_REQUEST:
+ if ((win = win_get(((xcb_configure_request_event_t *)event)->window)))
+ on_configure_request(win, (xcb_configure_request_event_t *)event);
+ break;
+
+ /* Unknown events */
+ default:
+ name = xcb_event_get_label(type);
+ printf("on_event: %d:%02X -> %s\n",
+ !!sent, type, name?:"unknown_event");
+ break;
+ }
+}