]> Pileus Git - wmpus/blobdiff - sys-xcb.c
Various icccm and ewmh properties
[wmpus] / sys-xcb.c
index 624576ddc42e8604aaf1ca78db3161d82ebebf6e..9a0111cc9bfff4003b1bd1a09cc719f18466f403 100644 (file)
--- a/sys-xcb.c
+++ b/sys-xcb.c
@@ -49,6 +49,8 @@ struct win_sys {
        xcb_window_t     xcb;    // xcb window id
        xcb_event_mask_t events; // currently watch events
        strut_t          strut;  // toolbar struts
+       state_t          state;  // window state if not mapped
+       int mapped;              // window is managed by wm
        int managed;             // window is managed by wm
 };
 
@@ -60,6 +62,7 @@ static xcb_colormap_t         colormap;
 static xcb_window_t           root;
 static xcb_event_mask_t       events;
 static list_t                *screens;
+static list_t                *struts;
 static void                  *cache;
 static unsigned int           grabbed;
 static int                    running;
@@ -71,6 +74,7 @@ static xcb_pixmap_t           clr_urgent;
 
 static xcb_atom_t             wm_protos;
 static xcb_atom_t             wm_delete;
+static xcb_atom_t             wm_nhints;
 
 /************************
  * Conversion functions *
@@ -242,43 +246,74 @@ static void win_free(win_t *win)
        free(win);
 }
 
+static void win_add_strut(win_t *win)
+{
+       win->type = TYPE_TOOLBAR;
+       for (list_t *cur = screens; cur; cur = cur->next) {
+               win_t   *screen = cur->data;
+               strut_t *strut  = &win->sys->strut;
+               screen->x += strut->left;
+               screen->y += strut->top;
+               screen->w -= strut->left + strut->right;
+               screen->h -= strut->top  + strut->bottom;
+       }
+       struts = list_insert(struts, win);
+
+}
+
+static void win_del_strut(win_t *win)
+{
+       list_t *link = list_find(struts, win);
+       if (!link)
+               return;
+       for (list_t *cur = screens; cur; cur = cur->next) {
+               win_t   *screen = cur->data;
+               strut_t *strut  = &win->sys->strut;
+               screen->x -= strut->left;
+               screen->y -= strut->top;
+               screen->w += strut->left + strut->right;
+               screen->h += strut->top  + strut->bottom;
+       }
+       struts = list_remove(struts, link, 0);
+}
+
 /****************
  * XCB Wrappers *
  ****************/
 
-static void *do_query_tree(xcb_window_t win, xcb_window_t **kids, int *nkids)
+static void *do_query_tree(xcb_window_t xcb, xcb_window_t **kids, int *nkids)
 {
        xcb_query_tree_cookie_t cookie =
-               xcb_query_tree(conn, win);
+               xcb_query_tree(conn, xcb);
        if (!cookie.sequence)
-               return warn("do_query_tree: %d - bad cookie", win), NULL;
+               return warn("do_query_tree: %d - bad cookie", xcb), NULL;
 
        xcb_query_tree_reply_t *reply =
                xcb_query_tree_reply(conn, cookie, NULL);
        if (!reply)
-               return warn("do_query_tree: %d - no reply", win), NULL;
+               return warn("do_query_tree: %d - no reply", xcb), NULL;
 
        *nkids = xcb_query_tree_children_length(reply);
        *kids  = xcb_query_tree_children(reply);
-       printf("do_query_tree: %d - n=%d\n", win, *nkids);
+       printf("do_query_tree: %d - n=%d\n", xcb, *nkids);
        return reply;
 }
 
-static int do_get_geometry(xcb_window_t win,
+static int do_get_geometry(xcb_window_t xcb,
                int *x, int *y, int *w, int *h)
 {
        xcb_get_geometry_cookie_t cookie =
-               xcb_get_geometry(conn, win);
+               xcb_get_geometry(conn, xcb);
        if (!cookie.sequence)
-               return warn("do_get_geometry: %d - bad cookie", win);
+               return warn("do_get_geometry: %d - bad cookie", xcb);
 
        xcb_get_geometry_reply_t *reply =
                xcb_get_geometry_reply(conn, cookie, NULL);
        if (!reply)
-               return warn("do_get_geometry: %d - no reply", win);
+               return warn("do_get_geometry: %d - no reply", xcb);
 
        printf("do_get_geometry: %d - %dx%d @ %d,%d\n",
-                       win, reply->width, reply->height, reply->x, reply->y);
+                       xcb, reply->width, reply->height, reply->x, reply->y);
        *x = reply->x;
        *y = reply->y;
        *w = reply->width;
@@ -287,21 +322,21 @@ static int do_get_geometry(xcb_window_t win,
        return 1;
 }
 
-static int do_get_window_attributes(xcb_window_t win,
+static int do_get_window_attributes(xcb_window_t xcb,
                int *override, int *mapped)
 {
        xcb_get_window_attributes_cookie_t cookie =
-               xcb_get_window_attributes(conn, win);
+               xcb_get_window_attributes(conn, xcb);
        if (!cookie.sequence)
-               return warn("do_get_window_attributes: %d - bad cookie", win);
+               return warn("do_get_window_attributes: %d - bad cookie", xcb);
 
        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);
+               return warn("do_get_window_attributes: %d - no reply ", xcb);
 
        printf("do_get_window_attributes: %d - %d\n",
-                       win, reply->override_redirect);
+                       xcb, reply->override_redirect);
        *override = reply->override_redirect;
        *mapped   = reply->map_state != XCB_MAP_STATE_UNMAPPED;
        free(reply);
@@ -383,6 +418,25 @@ static xcb_atom_t do_intern_atom(const char *name)
        return atom;
 }
 
+static char *do_get_atom_name(xcb_atom_t atom)
+{
+       xcb_get_atom_name_cookie_t cookie =
+               xcb_get_atom_name(conn, atom);
+       if (!cookie.sequence)
+               return warn("do_get_atom_name: bad cookie"), NULL;
+
+       xcb_get_atom_name_reply_t *reply =
+               xcb_get_atom_name_reply(conn, cookie, NULL);
+       if (!reply)
+               return warn("do_get_atom_name: no reply"), NULL;
+
+       char *name = xcb_get_atom_name_name(reply);
+       int len = xcb_get_atom_name_name_length(reply);
+       char *str = strndup(name, len);
+       free(reply);
+       return str;
+}
+
 static int do_ewmh_init_atoms(void)
 {
        xcb_intern_atom_cookie_t *cookies =
@@ -397,10 +451,74 @@ static int do_ewmh_init_atoms(void)
        return status;
 }
 
-static int do_get_strut(xcb_window_t win, strut_t *strut)
+static int do_get_type(xcb_window_t xcb, type_t *type)
+{
+       xcb_get_property_cookie_t cookie =
+               xcb_ewmh_get_wm_window_type(&ewmh, xcb);
+       if (!cookie.sequence)
+               return warn("do_get_type: bad cookie");
+
+       xcb_ewmh_get_atoms_reply_t reply;
+       if (!xcb_ewmh_get_wm_window_type_reply(&ewmh, cookie, &reply, NULL))
+               return warn("do_get_type: no reply");
+
+       type_t prev = *type;
+       for (int i = 0; i < reply.atoms_len; i++) {
+               if (reply.atoms[i] == ewmh._NET_WM_WINDOW_TYPE_DOCK)
+                       *type = TYPE_TOOLBAR;
+               if (reply.atoms[i] == ewmh._NET_WM_WINDOW_TYPE_TOOLBAR)
+                       *type = TYPE_TOOLBAR;
+               if (reply.atoms[i] == ewmh._NET_WM_WINDOW_TYPE_DIALOG)
+                       *type = TYPE_DIALOG;
+       }
+       printf("do_get_type: %d -> %d\n", prev, *type);
+       return 1;
+}
+
+static int do_get_icccm_state(xcb_window_t xcb, state_t *state)
+{
+       xcb_get_property_cookie_t cookie;
+
+       cookie = xcb_icccm_get_wm_normal_hints(conn, xcb);
+       if (!cookie.sequence)
+               return warn("do_get_icccm_state: bad cookie1");
+
+       xcb_size_hints_t sizes;
+       if (!xcb_icccm_get_wm_normal_hints_reply(conn, cookie, &sizes, NULL))
+               return warn("do_get_icccm_state: no sizes");
+
+       state_t prev = *state;
+       printf("do_get_icccm_state: %s -> %s\n",
+                       state_map[prev], state_map[*state]);
+       return 1;
+}
+
+static int do_get_ewmh_state(xcb_window_t xcb, state_t *state)
+{
+       xcb_get_property_cookie_t cookie;
+
+       cookie = xcb_ewmh_get_wm_state(&ewmh, xcb);
+       if (!cookie.sequence)
+               return warn("do_get_ewmh_state: bad cookie2");
+
+       xcb_ewmh_get_atoms_reply_t states;
+       if (!xcb_ewmh_get_wm_state_reply(&ewmh, cookie, &states, NULL))
+               return warn("do_get_ewmh_state: no reply2");
+
+       state_t prev = *state;
+       for (int i = 0; i < states.atoms_len; i++)
+               if (states.atoms[i] == ewmh._NET_WM_STATE_FULLSCREEN)
+                       *state = ST_FULL;
+
+       printf("do_get_ewmh_state: %s -> %s\n",
+                       state_map[prev], state_map[*state]);
+       return 1;
+}
+
+static int do_get_strut(xcb_window_t xcb, strut_t *strut)
 {
        xcb_get_property_cookie_t cookie =
-               xcb_ewmh_get_wm_strut(&ewmh, win);
+               xcb_ewmh_get_wm_strut(&ewmh, xcb);
        if (!cookie.sequence)
                return warn("do_get_strut: bad cookie");
 
@@ -456,7 +574,7 @@ static void do_ungrab_pointer(void)
                xcb_ungrab_pointer(conn, XCB_CURRENT_TIME);
 }
 
-static void do_configure_window(xcb_window_t win,
+static void do_configure_window(xcb_window_t xcb,
                int x, int y, int w, int h,
                int b, int s, int r)
 {
@@ -470,29 +588,29 @@ static void do_configure_window(xcb_window_t win,
                { r, XCB_CONFIG_WINDOW_STACK_MODE   },
        };
 
-       uint16_t mask    = 0;
-       uint32_t list[7] = {};
-       for (int i = 0; i < 7; i++) {
+       uint16_t mask = 0;
+       uint32_t list[countof(table)];
+       for (int i=0,j=0; i < countof(table); i++) {
                if (table[i][0] >= 0) {
-                       list[i] = table[i][0];
-                       mask   |= table[i][1];
+                       list[j++] = table[i][0];
+                       mask     |= table[i][1];
                }
        }
 
-       xcb_configure_window(conn, win, mask, list);
+       xcb_configure_window(conn, xcb, mask, list);
 }
 
-static int do_client_message(xcb_window_t win, xcb_atom_t atom)
+static int do_client_message(xcb_window_t xcb, xcb_atom_t atom)
 {
        /* Get protocols */
        xcb_get_property_cookie_t cookie =
-               xcb_icccm_get_wm_protocols(conn, win, wm_protos);
+               xcb_icccm_get_wm_protocols(conn, xcb, wm_protos);
        if (!cookie.sequence)
-               return warn("do_client_message: %d - bad cookie", win);
+               return warn("do_client_message: %d - bad cookie", xcb);
 
        xcb_icccm_get_wm_protocols_reply_t protos = {};
        if (!xcb_icccm_get_wm_protocols_reply(conn, cookie, &protos, NULL))
-               return warn("do_client_message: %d - no reply", win);
+               return warn("do_client_message: %d - no reply", xcb);
 
        /* Search for the atom */
        int found = 0;
@@ -501,18 +619,18 @@ static int do_client_message(xcb_window_t win, xcb_atom_t atom)
                        found = 1;
        xcb_icccm_get_wm_protocols_reply_wipe(&protos);
        if (!found)
-               return warn("do_client_message: %d - no atom", win);
+               return warn("do_client_message: %d - no atom", xcb);
 
        /* Send the message */
        xcb_client_message_event_t msg = {
                .response_type  = XCB_CLIENT_MESSAGE,
                .format         = 32,
-               .window         = win,
+               .window         = xcb,
                .type           = wm_protos,
                .data.data32[0] = atom,
                .data.data32[1] = XCB_CURRENT_TIME,
        };
-       xcb_send_event(conn, 0, win, XCB_EVENT_MASK_NO_EVENT,
+       xcb_send_event(conn, 0, xcb, XCB_EVENT_MASK_NO_EVENT,
                        (const char *)&msg);
        return 1;
 }
@@ -575,6 +693,8 @@ static void send_state(win_t *win, state_t next)
 {
        if (!win->sys->managed)
                return;
+       if (!win->sys->mapped)
+               return;
        if (win->state == next)
                return;
        state_t prev = win->state;
@@ -672,6 +792,11 @@ static void on_create_notify(xcb_create_notify_event_t *event)
        win->w = event->width;
        win->h = event->height;
 
+       win->sys->state  = ST_SHOW;
+       win->sys->events = XCB_EVENT_MASK_PROPERTY_CHANGE;
+       xcb_change_window_attributes(conn, event->window,
+                       XCB_CW_EVENT_MASK, &win->sys->events);
+
        if (!event->override_redirect)
                send_manage(win, 1);
 }
@@ -695,7 +820,9 @@ static void on_unmap_notify(xcb_unmap_notify_event_t *event)
                        event->window, win);
        if (!win) return;
 
+       win_del_strut(win);
        send_state(win, ST_HIDE);
+       win->sys->mapped = 0;
 }
 
 static void on_map_notify(xcb_map_notify_event_t *event)
@@ -705,7 +832,8 @@ static void on_map_notify(xcb_map_notify_event_t *event)
                        event->window, win);
        if (!win) return;
 
-       send_state(win, ST_SHOW);
+       win->sys->mapped = 1;
+       send_state(win, win->sys->state);
 }
 
 static void on_map_request(xcb_map_request_event_t *event)
@@ -715,14 +843,11 @@ static void on_map_request(xcb_map_request_event_t *event)
                        event->window, win);
        if (!win) return;
 
-       if (do_get_strut(win->sys->xcb, &win->sys->strut))
-               printf("Map: Got a strut!\n");
-       else
-               printf("Map: No struts here!\n");
-
-       send_state(win, ST_SHOW);
+       win->sys->mapped = 1;
+       send_state(win, win->sys->state);
        xcb_map_window(conn, win->sys->xcb);
-       sys_move(win, win->x, win->y, win->w, win->h);
+       if (!win->sys->managed)
+               sys_move(win, win->x, win->y, win->w, win->h);
 }
 
 static void on_configure_request(xcb_configure_request_event_t *event)
@@ -733,6 +858,10 @@ static void on_configure_request(xcb_configure_request_event_t *event)
                        event->width, event->height,
                        event->x, event->y);
        if (!win) return;
+       printf("on_configure_request: xcb=%-8u -> win=%p << %dx%d @ %d,%d\n",
+                       event->window, win,
+                       win->w, win->h,
+                       win->x, win->y);
 
        if (!win->sys->managed) {
                win->x = event->x;
@@ -757,13 +886,74 @@ static void on_configure_request(xcb_configure_request_event_t *event)
                        (const char *)&resp);
 }
 
+static void on_property_notify(xcb_property_notify_event_t *event)
+{
+       win_t *win = win_get(event->window);
+       char *name = do_get_atom_name(event->atom);
+       printf("on_property_notify: xcb=%-8u -> win=%p - %s\n",
+                       event->window, win, name);
+       if (name) free(name);
+       if (!win) return;
+
+       /* Check window type */
+       if (event->atom == ewmh._NET_WM_WINDOW_TYPE)
+               do_get_type(event->window, &win->type);
+
+       /* Check struts */
+       if (event->atom == ewmh._NET_WM_STRUT)
+               if (do_get_strut(win->sys->xcb, &win->sys->strut))
+                       win_add_strut(win);
+
+       /* Check window state */
+       if (event->atom == wm_nhints)
+               if (do_get_icccm_state(event->window, &win->sys->state))
+                       send_state(win, win->sys->state);
+       if (event->atom == ewmh._NET_WM_STATE)
+               if (do_get_ewmh_state(event->window, &win->sys->state))
+                       send_state(win, win->sys->state);
+}
+
 static void on_client_message(xcb_client_message_event_t *event)
 {
-       printf("on_client_message: xcb=%-8u\n", event->window);
+       win_t *win = win_get(event->window);
+       char *name = do_get_atom_name(event->type);
+       printf("on_client_message: xcb=%-8u -> win=%p - %s=[%d,%d,%d,%d]\n",
+                       event->window, win, name,
+                       event->data.data32[0], event->data.data32[1],
+                       event->data.data32[2], event->data.data32[3]);
+       if (name) free(name);
+       if (!win) return;
+
+       /* Exit request */
        if (event->window         == control   &&
            event->type           == wm_protos &&
-           event->data.data32[0] == wm_delete)
+           event->data.data32[0] == wm_delete) {
+               printf("on_client_message: shutdown request");
                running = 0;
+       }
+
+       /* Close request */
+       if (event->type == ewmh._NET_CLOSE_WINDOW) {
+               printf("on_client_message: close request");
+               sys_show(win, ST_CLOSE);
+       }
+
+       /* Fullscreen request  */
+       if ((event->type           == ewmh._NET_WM_STATE) &&
+           (event->data.data32[1] == ewmh._NET_WM_STATE_FULLSCREEN ||
+            event->data.data32[2] == ewmh._NET_WM_STATE_FULLSCREEN)) {
+               printf("on_client_message: fullscreen request");
+               int full = win->state == ST_FULL;
+               switch (event->data.data32[0]) {
+                       case XCB_EWMH_WM_STATE_REMOVE: full  = 0; break;
+                       case XCB_EWMH_WM_STATE_ADD:    full  = 1; break;
+                       case XCB_EWMH_WM_STATE_TOGGLE: full ^= 1; break;
+               }
+               win->sys->state = full ? ST_FULL : ST_SHOW;
+               send_state(win, win->sys->state);
+               sys_show(win, win->sys->state);
+       }
+
 }
 
 /* Generic Event */
@@ -820,6 +1010,9 @@ static void on_event(xcb_generic_event_t *event)
                case XCB_CONFIGURE_REQUEST:
                        on_configure_request((xcb_configure_request_event_t *)event);
                        break;
+               case XCB_PROPERTY_NOTIFY:
+                       on_property_notify((xcb_property_notify_event_t *)event);
+                       break;
                case XCB_CLIENT_MESSAGE:
                        on_client_message((xcb_client_message_event_t *)event);
                        break;
@@ -863,6 +1056,9 @@ void sys_raise(win_t *win)
        uint32_t list = XCB_STACK_MODE_ABOVE;
 
        xcb_configure_window(conn, win->sys->xcb, mask, &list);
+       for (list_t *cur = struts; cur; cur = cur->next)
+               xcb_configure_window(conn,
+                       ((win_t*)cur->data)->sys->xcb, mask, &list);
 }
 
 void sys_focus(win_t *win)
@@ -881,14 +1077,21 @@ void sys_show(win_t *win, state_t state)
        xcb_window_t xcb = win ? win->sys->xcb : root;
 
        /* Find screen */
-       win_t *screen = NULL;
+       win_t full, max;
        if (state == ST_FULL || state == ST_MAX) {
                for (list_t *cur = screens; cur; cur = cur->next) {
-                       screen = cur->data;
-                       if (win->x >= screen->x && win->x <= screen->x+screen->w &&
-                           win->y >= screen->y && win->y <= screen->y+screen->h)
+                       full = max = *(win_t*)cur->data;
+                       if (win->x >= max.x && win->x <= max.x+max.w &&
+                           win->y >= max.y && win->y <= max.y+max.h)
                                break;
                }
+               for (list_t *cur = struts; cur; cur = cur->next) {
+                       strut_t *strut = &((win_t*)cur->data)->sys->strut;
+                       full.x -= strut->left;
+                       full.y -= strut->top;
+                       full.w += strut->left + strut->right;
+                       full.h += strut->top  + strut->bottom;
+               }
        }
 
        /* Change window state */
@@ -907,16 +1110,15 @@ void sys_show(win_t *win, state_t state)
 
                case ST_FULL:
                        xcb_map_window(conn, xcb);
-                       do_configure_window(xcb, screen->x, screen->y, screen->w, screen->h,
+                       do_configure_window(xcb, full.x, full.y, full.w, full.h,
                                        0, -1, XCB_STACK_MODE_ABOVE);
-                       xcb_circulate_window(conn, XCB_CIRCULATE_RAISE_LOWEST, xcb);
                        break;
 
                case ST_MAX:
                        xcb_map_window(conn, xcb);
-                       do_configure_window(xcb, screen->x, screen->y,
-                                       MAX(screen->w - 2*border, 1),
-                                       MAX(screen->h - 2*border, 1),
+                       do_configure_window(xcb, max.x, max.y,
+                                       MAX(max.w - 2*border, 1),
+                                       MAX(max.h - 2*border, 1),
                                        border, -1, XCB_STACK_MODE_ABOVE);
                        break;
 
@@ -939,7 +1141,7 @@ void sys_show(win_t *win, state_t state)
        }
 
        /* Update state */
-       win->state = state;
+       win->sys->state = win->state = state;
 }
 
 void sys_watch(win_t *win, event_t ev, mod_t mod)
@@ -1076,12 +1278,14 @@ void sys_init(void)
        /* Setup X Atoms */
        wm_protos = do_intern_atom("WM_PROTOCOLS");
        wm_delete = do_intern_atom("WM_DELETE_WINDOW");
-       if (!wm_protos || !wm_delete)
+       wm_nhints = do_intern_atom("WM_NORMAL_HINTS");
+       if (!wm_protos || !wm_delete || !wm_nhints)
                error("unable to setup atoms");
 
        /* Setup EWMH connection */
        if (!do_ewmh_init_atoms())
                error("ewmh setup failed");
+       xcb_ewmh_set_supported(&ewmh, 0, 82, &ewmh._NET_SUPPORTED);
 
        /* Set EWMH wm window */
        uint32_t override = 1;
@@ -1126,16 +1330,21 @@ void sys_run(void)
                        if (kids[i] == control)
                                continue;
                        win_t *win = win_new(kids[i]);
+                       if (do_get_strut(win->sys->xcb, &win->sys->strut))
+                               win_add_strut(win);
                        do_get_geometry(kids[i], &win->x, &win->y, &win->w, &win->h);
                        do_get_window_attributes(kids[i], &override, &mapped);
                        printf("  found %-8u %dx%d @ %d,%d --%s%s\n", kids[i],
                                        win->w, win->h, win->x, win->y,
                                        override ? " override" : "",
                                        mapped   ? " mapped"   : "");
-                       if (!override)
-                               send_manage(win, 1);
-                       if (mapped)
-                               send_state(win, ST_SHOW);
+                       state_t state = mapped ? ST_SHOW : ST_HIDE;
+                       win->sys->mapped = mapped;
+                       do_get_type(kids[i], &win->type);
+                       do_get_icccm_state(kids[i], &state);
+                       do_get_ewmh_state(kids[i], &state);
+                       send_manage(win, !override);
+                       send_state(win, state);
                }
                free(reply);
                xcb_flush(conn);