diff options
author | marha <marha@users.sourceforge.net> | 2011-09-12 11:27:51 +0200 |
---|---|---|
committer | marha <marha@users.sourceforge.net> | 2011-09-12 11:27:51 +0200 |
commit | dafebc5bb70303f0b5baf0b087cf4d9a64b5c7f0 (patch) | |
tree | bdf833cc6a4fc9035411779e10dd9e8478201885 /apps/xwininfo/xwininfo.c | |
parent | 0b40f5f4b54453a77f4b09c431f8efc6875da61f (diff) | |
download | vcxsrv-dafebc5bb70303f0b5baf0b087cf4d9a64b5c7f0.tar.gz vcxsrv-dafebc5bb70303f0b5baf0b087cf4d9a64b5c7f0.tar.bz2 vcxsrv-dafebc5bb70303f0b5baf0b087cf4d9a64b5c7f0.zip |
Synchronised line endinge with release branch
Diffstat (limited to 'apps/xwininfo/xwininfo.c')
-rw-r--r-- | apps/xwininfo/xwininfo.c | 3966 |
1 files changed, 1983 insertions, 1983 deletions
diff --git a/apps/xwininfo/xwininfo.c b/apps/xwininfo/xwininfo.c index b1dfb0dc7..af1354d46 100644 --- a/apps/xwininfo/xwininfo.c +++ b/apps/xwininfo/xwininfo.c @@ -1,1983 +1,1983 @@ -/*
- * Copyright (c) 1999, 2010, Oracle and/or its affiliates. All rights reserved.
- *
- * Permission is hereby granted, free of charge, to any person obtaining a
- * copy of this software and associated documentation files (the "Software"),
- * to deal in the Software without restriction, including without limitation
- * the rights to use, copy, modify, merge, publish, distribute, sublicense,
- * and/or sell copies of the Software, and to permit persons to whom the
- * Software is furnished to do so, subject to the following conditions:
- *
- * The above copyright notice and this permission notice (including the next
- * paragraph) shall be included in all copies or substantial portions of the
- * Software.
- *
- * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
- * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
- * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
- * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
- * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
- * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
- * DEALINGS IN THE SOFTWARE.
- */
-/*
-
-Copyright 1987, 1998 The Open Group
-
-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.
-
-The above copyright notice and this permission notice shall be included
-in all copies or substantial portions of the Software.
-
-THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
-OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
-MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT
-OF THIRD PARTY RIGHTS. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR
-HOLDERS INCLUDED IN THIS NOTICE BE LIABLE FOR ANY CLAIM, OR 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.
-
-Except as contained in this notice, the name of a copyright holder
-shall not be used in advertising or otherwise to promote the sale, use
-or other dealings in this Software without prior written authorization
-of the copyright holder.
-
-*/
-
-
-/*
- * xwininfo.c - MIT Project Athena, X Window system window
- * information utility.
- *
- *
- * This program will report all relevant information
- * about a specific window.
- *
- * Author: Mark Lillibridge, MIT Project Athena
- * 16-Jun-87
- */
-
-#include "config.h"
-
-#include <xcb/xcb.h>
-#include <xcb/xproto.h>
-#ifdef USE_XCB_ICCCM
-# include <xcb/xcb_icccm.h>
-#endif
-#include <xcb/shape.h>
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <unistd.h>
-#include <string.h>
-#include <locale.h>
-#ifndef _MSC_VER
-#include <langinfo.h>
-#endif
-#ifdef HAVE_ICONV
-# include <iconv.h>
-#endif
-#include <ctype.h>
-#include <errno.h>
-
-#ifndef HAVE_STRNLEN
-#include "strnlen.h"
-#endif
-
-/* Include routines to handle parsing defaults */
-#include "dsimple.h"
-
-typedef struct {
- long code;
- const char *name;
-} binding;
-
-#ifndef USE_XCB_ICCCM
-/* Once xcb-icccm's API is stable, this should be replaced by
- xcb_size_hints_t & xcb_size_hints_flags_t */
-typedef struct {
- /** User specified flags */
- uint32_t flags;
- /** User-specified position */
- int32_t x, y;
- /** User-specified size */
- int32_t width, height;
- /** Program-specified minimum size */
- int32_t min_width, min_height;
- /** Program-specified maximum size */
- int32_t max_width, max_height;
- /** Program-specified resize increments */
- int32_t width_inc, height_inc;
- /** Program-specified minimum aspect ratios */
- int32_t min_aspect_num, min_aspect_den;
- /** Program-specified maximum aspect ratios */
- int32_t max_aspect_num, max_aspect_den;
- /** Program-specified base size */
- int32_t base_width, base_height;
- /** Program-specified window gravity */
- uint32_t win_gravity;
-} wm_size_hints_t;
-
-# define xcb_size_hints_t wm_size_hints_t
-
-typedef struct {
- /** Marks which fields in this structure are defined */
- int32_t flags;
- /** Does this application rely on the window manager to get keyboard
- input? */
- uint32_t input;
- /** See below */
- int32_t initial_state;
- /** Pixmap to be used as icon */
- xcb_pixmap_t icon_pixmap;
- /** Window to be used as icon */
- xcb_window_t icon_window;
- /** Initial position of icon */
- int32_t icon_x, icon_y;
- /** Icon mask bitmap */
- xcb_pixmap_t icon_mask;
- /* Identifier of related window group */
- xcb_window_t window_group;
-} wm_hints_t;
-
-#define xcb_icccm_wm_hints_t wm_hints_t
-
-enum {
- /* xcb_size_hints_flags_t */
- XCB_ICCCM_SIZE_HINT_US_POSITION = 1 << 0,
- XCB_ICCCM_SIZE_HINT_US_SIZE = 1 << 1,
- XCB_ICCCM_SIZE_HINT_P_POSITION = 1 << 2,
- XCB_ICCCM_SIZE_HINT_P_SIZE = 1 << 3,
- XCB_ICCCM_SIZE_HINT_P_MIN_SIZE = 1 << 4,
- XCB_ICCCM_SIZE_HINT_P_MAX_SIZE = 1 << 5,
- XCB_ICCCM_SIZE_HINT_P_RESIZE_INC = 1 << 6,
- XCB_ICCCM_SIZE_HINT_P_ASPECT = 1 << 7,
- XCB_ICCCM_SIZE_HINT_BASE_SIZE = 1 << 8,
- XCB_ICCCM_SIZE_HINT_P_WIN_GRAVITY = 1 << 9,
- /* xcb_wm_state_t */
- XCB_ICCCM_WM_STATE_WITHDRAWN = 0,
- XCB_ICCCM_WM_STATE_NORMAL = 1,
- XCB_ICCCM_WM_STATE_ICONIC = 3,
- /* xcb_wm_t */
- XCB_ICCCM_WM_HINT_INPUT = (1L << 0),
- XCB_ICCCM_WM_HINT_STATE = (1L << 1),
- XCB_ICCCM_WM_HINT_ICON_PIXMAP = (1L << 2),
- XCB_ICCCM_WM_HINT_ICON_WINDOW = (1L << 3),
- XCB_ICCCM_WM_HINT_ICON_POSITION = (1L << 4),
- XCB_ICCCM_WM_HINT_ICON_MASK = (1L << 5),
- XCB_ICCCM_WM_HINT_WINDOW_GROUP = (1L << 6),
- XCB_ICCCM_WM_HINT_X_URGENCY = (1L << 8)
-};
-
-/* Once xcb-icccm's API is stable, these should be replaced by calls to it */
-# define GET_TEXT_PROPERTY(Dpy, Win, Atom) \
- xcb_get_property (Dpy, False, Win, Atom, XCB_GET_PROPERTY_TYPE_ANY, 0, BUFSIZ)
-# define xcb_icccm_get_wm_name(Dpy, Win) \
- GET_TEXT_PROPERTY(Dpy, Win, XCB_ATOM_WM_NAME)
-
-# define xcb_icccm_get_wm_class(Dpy, Win) \
- xcb_get_property (Dpy, False, Win, XCB_ATOM_WM_CLASS, XCB_ATOM_STRING, 0, BUFSIZ)
-# define xcb_icccm_get_wm_hints(Dpy, Win) \
- xcb_get_property(Dpy, False, Win, XCB_ATOM_WM_HINTS, XCB_ATOM_WM_HINTS, 0, 9)
-
-# define xcb_icccm_get_wm_size_hints(Dpy, Win, Atom) \
- xcb_get_property (Dpy, False, Win, Atom, XCB_ATOM_WM_SIZE_HINTS, 0, 18)
-# define xcb_icccm_get_wm_normal_hints(Dpy, Win) \
- xcb_icccm_get_wm_size_hints(Dpy, Win, XCB_ATOM_WM_NORMAL_HINTS)
-#endif
-
-/* Possibly in xcb-emwh in the future? */
-static xcb_atom_t atom_net_wm_name, atom_utf8_string;
-static xcb_atom_t atom_net_wm_desktop, atom_net_wm_window_type,
- atom_net_wm_state, atom_net_wm_pid, atom_net_frame_extents;
-static xcb_get_property_cookie_t get_net_wm_name (xcb_connection_t *,
- xcb_window_t);
-
-/* Information we keep track of for each window to allow prefetching/reusing */
-struct wininfo {
- xcb_window_t window;
-
- /* cookies for requests we've sent */
- xcb_get_geometry_cookie_t geometry_cookie;
- xcb_get_property_cookie_t net_wm_name_cookie;
- xcb_get_property_cookie_t wm_name_cookie;
- xcb_get_property_cookie_t wm_class_cookie;
- xcb_translate_coordinates_cookie_t trans_coords_cookie;
- xcb_query_tree_cookie_t tree_cookie;
- xcb_get_window_attributes_cookie_t attr_cookie;
- xcb_get_property_cookie_t normal_hints_cookie;
- xcb_get_property_cookie_t hints_cookie;
- xcb_get_property_cookie_t wm_desktop_cookie;
- xcb_get_property_cookie_t wm_window_type_cookie;
- xcb_get_property_cookie_t wm_state_cookie;
- xcb_get_property_cookie_t wm_pid_cookie;
- xcb_get_property_cookie_t wm_client_machine_cookie;
- xcb_get_property_cookie_t frame_extents_cookie;
- xcb_get_property_cookie_t zoom_cookie;
-
- /* cached results from previous requests */
- xcb_get_geometry_reply_t * geometry;
- xcb_get_window_attributes_reply_t * win_attributes;
- xcb_size_hints_t * normal_hints;
-};
-
-static void scale_init (xcb_screen_t *scrn);
-static char *nscale (int, int, int, char *, size_t);
-static char *xscale (int);
-static char *yscale (int);
-static char *bscale (int);
-int main (int, char **);
-static const char *LookupL (long, const binding *);
-static const char *Lookup (int, const binding *);
-static void Display_Window_Id (struct wininfo *, Bool);
-static void Display_Stats_Info (struct wininfo *);
-static void Display_Bits_Info (struct wininfo *);
-static void Display_Event_Mask (long);
-static void Display_Events_Info (struct wininfo *);
-static void Display_Tree_Info (struct wininfo *, int);
-static void display_tree_info_1 (struct wininfo *, int, int);
-static void Display_Hints (xcb_size_hints_t *);
-static void Display_Size_Hints (struct wininfo *);
-static void Display_Window_Shape (xcb_window_t);
-static void Display_WM_Info (struct wininfo *);
-static void wininfo_wipe (struct wininfo *);
-
-static const char *window_id_format = "0x%lx";
-
-#ifdef HAVE_ICONV
-static iconv_t iconv_from_utf8;
-#endif
-static const char *user_encoding;
-static void print_utf8 (const char *, char *, size_t, const char *);
-static void print_friendly_name (const char *, const char *, const char *);
-
-static xcb_connection_t *dpy;
-static xcb_screen_t *screen;
-static xcb_generic_error_t *err;
-
-#ifndef HAVE_STRLCAT
-static size_t strlcat (char *dst, const char *src, size_t dstsize)
-{
- size_t sd = strlen (dst);
- size_t ss = strlen (src);
- size_t s = sd + ss;
-
- if (s < dstsize) {
- strcpy (dst + sd, src);
- } else {
- strncpy (dst + sd, src, dstsize-sd-1);
- dst[dstsize] = '\0';
- }
- return s;
-}
-#endif
-
-/*
- * Report the syntax for calling xwininfo:
- */
-static void
-usage (void)
-{
- fprintf (stderr,
- "usage: %s [-options ...]\n\n"
- "where options include:\n"
- " -help print this message\n"
- " -display host:dpy X server to contact\n"
- " -root use the root window\n"
- " -id windowid use the window with the specified id\n"
- " -name windowname use the window with the specified name\n"
- " -int print window id in decimal\n"
- " -children print parent and child identifiers\n"
- " -tree print children identifiers recursively\n"
- " -stats print window geometry [DEFAULT]\n"
- " -bits print window pixel information\n"
- " -events print events selected for on window\n"
- " -size print size hints\n"
- " -wm print window manager hints\n"
- " -shape print shape extents\n"
- " -frame don't ignore window manager frames\n"
- " -english print sizes in english units\n"
- " -metric print sizes in metric units\n"
- " -all -tree, -stats, -bits, -events, -wm, -size, -shape\n"
- "\n",
- program_name);
- exit (1);
-}
-
-/*
- * pixel to inch, metric converter.
- * Hacked in by Mark W. Eichin <eichin@athena> [eichin:19880619.1509EST]
- *
- * Simply put: replace the old numbers with string print calls.
- * Returning a local string is ok, since we only ever get called to
- * print one x and one y, so as long as they don't collide, they're
- * fine. This is not meant to be a general purpose routine.
- *
- */
-
-static int xp = 0, xmm = 0;
-static int yp = 0, ymm = 0;
-static int bp = 0, bmm = 0;
-static int english = 0, metric = 0;
-
-static void
-scale_init (xcb_screen_t *screen)
-{
- xp = screen->width_in_pixels;
- yp = screen->height_in_pixels;
- xmm = screen->width_in_millimeters;
- ymm = screen->height_in_millimeters;
- bp = xp + yp;
- bmm = xmm + ymm;
-}
-
-#define MILE (5280*12)
-#define YARD (3*12)
-#define FOOT (12)
-
-static char *
-nscale (int n, int np, int nmm, char *nbuf, size_t nbufsize)
-{
- int s;
- snprintf (nbuf, nbufsize, "%d", n);
-
- if (metric||english) {
- s = strlcat (nbuf, " (", nbufsize);
-
- if (metric) {
- snprintf (nbuf+s, nbufsize-s, "%.2f mm%s",
- ((double) n) * nmm/np , english ? "; " : "");
- }
- if (english) {
- double inch_frac;
- Bool printed_anything = False;
- int mi, yar, ft, inr;
-
- inch_frac = ((double) n)*(nmm/25.4)/np;
- inr = (int)inch_frac;
- inch_frac -= (double)inr;
- if (inr >= MILE) {
- mi = inr/MILE;
- inr %= MILE;
- s = strlen (nbuf);
- snprintf (nbuf+s, nbufsize-s, "%d %s(?!?)",
- mi, (mi == 1) ? "mile" : "miles");
- printed_anything = True;
- }
- if (inr >= YARD) {
- yar = inr/YARD;
- inr %= YARD;
- if (printed_anything)
- strlcat (nbuf, ", ", nbufsize);
- s = strlen (nbuf);
- snprintf (nbuf+s, nbufsize-s, "%d %s",
- yar, (yar==1) ? "yard" : "yards");
- printed_anything = True;
- }
- if (inr >= FOOT) {
- ft = inr/FOOT;
- inr %= FOOT;
- if (printed_anything)
- strlcat (nbuf, ", ", nbufsize);
- s = strlen (nbuf);
- snprintf (nbuf+s, nbufsize-s, "%d %s",
- ft, (ft==1) ? "foot" : "feet");
- printed_anything = True;
- }
- if (!printed_anything || inch_frac != 0.0 || inr != 0) {
- if (printed_anything)
- strlcat (nbuf, ", ", nbufsize);
- s = strlen (nbuf);
- snprintf (nbuf+s, nbufsize-s, "%.2f inches", inr+inch_frac);
- }
- }
- strlcat (nbuf, ")", nbufsize);
- }
- return (nbuf);
-}
-
-static char xbuf[BUFSIZ];
-static char *
-xscale (int x)
-{
- return (nscale (x, xp, xmm, xbuf, sizeof(xbuf)));
-}
-
-static char ybuf[BUFSIZ];
-static char *
-yscale (int y)
-{
- return (nscale (y, yp, ymm, ybuf, sizeof(ybuf)));
-}
-
-static char bbuf[BUFSIZ];
-static char *
-bscale (int b)
-{
- return (nscale (b, bp, bmm, bbuf, sizeof(bbuf)));
-}
-
-/* end of pixel to inch, metric converter */
-
-int
-main (int argc, char **argv)
-{
- register int i;
- int tree = 0, stats = 0, bits = 0, events = 0, wm = 0, size = 0, shape = 0;
- int frame = 0, children = 0;
- int pauseatend = 0;
- int use_root = 0;
- xcb_window_t window = 0;
- char *display_name = NULL;
- const char *window_name = NULL;
- struct wininfo wininfo;
- struct wininfo *w = &wininfo;
-
- program_name = argv[0];
-
- if (!setlocale (LC_ALL, ""))
- fprintf (stderr, "%s: can not set locale properly\n", program_name);
-#ifndef _MSC_VER
- user_encoding = nl_langinfo (CODESET);
-#endif
- if (user_encoding == NULL)
- user_encoding = "unknown encoding";
-
- memset (w, 0, sizeof(struct wininfo));
-
- /* Handle our command line arguments */
- for (i = 1; i < argc; i++) {
- if (!strcmp (argv[i], "-help"))
- usage ();
- if (!strcmp (argv[i], "-display") || !strcmp (argv[i], "-d")) {
- if (++i >= argc)
- Fatal_Error("-display requires argument");
- display_name = argv[i];
- continue;
- }
- if (!strcmp (argv[i], "-root")) {
- use_root = 1;
- continue;
- }
- if (!strcmp (argv[i], "-id")) {
- if (++i >= argc)
- Fatal_Error("-id requires argument");
- window = strtoul(argv[i], NULL, 0);
- continue;
- }
- if (!strcmp (argv[i], "-name")) {
- if (++i >= argc)
- Fatal_Error("-name requires argument");
- window_name = argv[i];
- continue;
- }
- if (!strcmp (argv[i], "-int")) {
- window_id_format = "%ld";
- continue;
- }
- if (!strcmp (argv[i], "-children")) {
- children = 1;
- continue;
- }
- if (!strcmp (argv[i], "-tree")) {
- tree = 1;
- continue;
- }
- if (!strcmp (argv[i], "-stats")) {
- stats = 1;
- continue;
- }
- if (!strcmp (argv[i], "-bits")) {
- bits = 1;
- continue;
- }
- if (!strcmp (argv[i], "-events")) {
- events = 1;
- continue;
- }
- if (!strcmp (argv[i], "-wm")) {
- wm = 1;
- continue;
- }
- if (!strcmp (argv[i], "-frame")) {
- frame = 1;
- continue;
- }
- if (!strcmp (argv[i], "-size")) {
- size = 1;
- continue;
- }
- if (!strcmp (argv[i], "-shape")) {
- shape = 1;
- continue;
- }
- if (!strcmp (argv[i], "-english")) {
- english = 1;
- continue;
- }
- if (!strcmp (argv[i], "-metric")) {
- metric = 1;
- continue;
- }
- if (!strcmp (argv[i], "-all")) {
- tree = stats = bits = events = wm = size = shape = 1;
- continue;
- }
- if (!strcmp(argv[i], "-pause")) {
- pauseatend = 1;
- continue;
- }
- usage ();
- }
-
- Setup_Display_And_Screen (display_name, &dpy, &screen);
-
- /* preload atoms we may need later */
- Intern_Atom (dpy, "_NET_WM_NAME");
- Intern_Atom (dpy, "UTF8_STRING");
- if (wm) {
- Intern_Atom (dpy, "_NET_WM_DESKTOP");
- Intern_Atom (dpy, "_NET_WM_WINDOW_TYPE");
- Intern_Atom (dpy, "_NET_WM_STATE");
- Intern_Atom (dpy, "_NET_WM_PID");
- Intern_Atom (dpy, "_NET_FRAME_EXTENTS");
- }
- /* initialize scaling data */
- scale_init(screen);
-
- if (use_root)
- window = screen->root;
- else if (window_name) {
- window = Window_With_Name (dpy, screen->root, window_name);
- if (!window)
- Fatal_Error ("No window with name \"%s\" exists!", window_name);
- }
-
- /* If no window selected on command line, let user pick one the hard way */
- if (!window) {
- printf ("\n"
- "xwininfo: Please select the window about which you\n"
- " would like information by clicking the\n"
- " mouse in that window.\n");
- Intern_Atom (dpy, "_NET_VIRTUAL_ROOTS");
- Intern_Atom (dpy, "WM_STATE");
- window = Select_Window (dpy, screen, !frame);
- }
-
- /*
- * Do the actual displaying as per parameters
- */
- if (!(children || tree || bits || events || wm || size))
- stats = 1;
-
- /*
- * make sure that the window is valid
- */
- {
- xcb_get_geometry_cookie_t gg_cookie =
- xcb_get_geometry (dpy, window);
-
- w->geometry = xcb_get_geometry_reply(dpy, gg_cookie, &err);
-
- if (!w->geometry) {
- char badid[20];
-
- if (err)
- Print_X_Error (dpy, err);
-
- snprintf (badid, sizeof(badid), window_id_format, window);
- Fatal_Error ("No such window with id %s.", badid);
- }
- }
-
- /* Send requests to prefetch data we'll need */
- w->window = window;
- w->net_wm_name_cookie = get_net_wm_name (dpy, window);
- w->wm_name_cookie = xcb_icccm_get_wm_name (dpy, window);
- if (children || tree)
- w->tree_cookie = xcb_query_tree (dpy, window);
- if (stats) {
- w->trans_coords_cookie =
- xcb_translate_coordinates (dpy, window, w->geometry->root,
- -(w->geometry->border_width),
- -(w->geometry->border_width));
- }
- if (stats || bits || events)
- w->attr_cookie = xcb_get_window_attributes (dpy, window);
- if (stats || size)
- w->normal_hints_cookie = xcb_icccm_get_wm_normal_hints (dpy, window);
- if (wm) {
- w->hints_cookie = xcb_icccm_get_wm_hints(dpy, window);
-
- atom_net_wm_desktop = Get_Atom (dpy, "_NET_WM_DESKTOP");
- if (atom_net_wm_desktop) {
- w->wm_desktop_cookie = xcb_get_property
- (dpy, False, window, atom_net_wm_desktop,
- XCB_ATOM_CARDINAL, 0, 4);
- }
-
- atom_net_wm_window_type = Get_Atom (dpy, "_NET_WM_WINDOW_TYPE");
- if (atom_net_wm_window_type) {
- w->wm_window_type_cookie = xcb_get_property
- (dpy, False, window, atom_net_wm_window_type,
- XCB_ATOM_ATOM, 0, BUFSIZ);
- }
-
- atom_net_wm_state = Get_Atom (dpy, "_NET_WM_STATE");
- if (atom_net_wm_state) {
- w->wm_state_cookie = xcb_get_property
- (dpy, False, window, atom_net_wm_state,
- XCB_ATOM_ATOM, 0, BUFSIZ);
- }
-
- atom_net_wm_pid = Get_Atom (dpy, "_NET_WM_PID");
- if (atom_net_wm_pid) {
- w->wm_pid_cookie = xcb_get_property
- (dpy, False, window, atom_net_wm_pid,
- XCB_ATOM_CARDINAL, 0, BUFSIZ);
- w->wm_client_machine_cookie = xcb_get_property
- (dpy, False, window, XCB_ATOM_WM_CLIENT_MACHINE,
- XCB_GET_PROPERTY_TYPE_ANY, 0, BUFSIZ);
- }
-
- atom_net_frame_extents = Get_Atom (dpy, "_NET_FRAME_EXTENTS");
- if (atom_net_frame_extents) {
- w->frame_extents_cookie = xcb_get_property
- (dpy, False, window, atom_net_frame_extents,
- XCB_ATOM_CARDINAL, 0, 4 * 4);
- }
- }
- if (size)
- w->zoom_cookie = xcb_icccm_get_wm_size_hints (dpy, window,
- XCB_ATOM_WM_ZOOM_HINTS);
- xcb_flush (dpy);
-
- printf ("\nxwininfo: Window id: ");
- Display_Window_Id (w, True);
- if (children || tree)
- Display_Tree_Info (w, tree);
- if (stats)
- Display_Stats_Info (w);
- if (bits)
- Display_Bits_Info (w);
- if (events)
- Display_Events_Info (w);
- if (wm)
- Display_WM_Info (w);
- if (size)
- Display_Size_Hints (w);
- if (shape)
- Display_Window_Shape (window);
- printf ("\n");
- if (pauseatend) getchar();
-
- wininfo_wipe (w);
- xcb_disconnect (dpy);
-#ifdef HAVE_ICONV
- if (iconv_from_utf8 && (iconv_from_utf8 != (iconv_t) -1)) {
- iconv_close (iconv_from_utf8);
- }
-#endif
- exit (0);
-}
-
-/* Ensure win_attributes field is filled in */
-static xcb_get_window_attributes_reply_t *
-fetch_win_attributes (struct wininfo *w)
-{
- if (!w->win_attributes) {
- w->win_attributes =
- xcb_get_window_attributes_reply (dpy, w->attr_cookie, &err);
-
- if (!w->win_attributes) {
- Print_X_Error (dpy, err);
- Fatal_Error ("Can't get window attributes.");
- }
- }
- return w->win_attributes;
-}
-
-#ifndef USE_XCB_ICCCM
-static Bool
-wm_size_hints_reply (xcb_connection_t *dpy, xcb_get_property_cookie_t cookie,
- wm_size_hints_t *hints_return, xcb_generic_error_t **err)
-{
- xcb_get_property_reply_t *prop = xcb_get_property_reply (dpy, cookie, err);
- int length;
-
- if (!prop || (prop->type != XCB_ATOM_WM_SIZE_HINTS) ||
- (prop->format != 32)) {
- free (prop);
- return False;
- }
-
- memset (hints_return, 0, sizeof(wm_size_hints_t));
-
- length = xcb_get_property_value_length(prop);
- if (length > sizeof(wm_size_hints_t))
- length = sizeof(wm_size_hints_t);
- memcpy (hints_return, xcb_get_property_value (prop), length);
-
- free (prop);
- return True;
-}
-
-#define xcb_icccm_get_wm_normal_hints_reply wm_size_hints_reply
-#define xcb_icccm_get_wm_size_hints_reply wm_size_hints_reply
-#endif
-
-
-
-/* Ensure normal_hints field is filled in */
-static xcb_size_hints_t *
-fetch_normal_hints (struct wininfo *w, xcb_size_hints_t *hints_return)
-{
- xcb_size_hints_t hints;
-
- if (!w->normal_hints) {
- if (xcb_icccm_get_wm_normal_hints_reply (dpy, w->normal_hints_cookie,
- &hints, NULL)) {
- w->normal_hints = malloc (sizeof(xcb_size_hints_t));
- if (w->normal_hints)
- memcpy(w->normal_hints, &hints, sizeof(xcb_size_hints_t));
- }
- }
- if (hints_return && w->normal_hints)
- memcpy(hints_return, w->normal_hints, sizeof(xcb_size_hints_t));
- return w->normal_hints;
-}
-
-
-/*
- * Lookup: lookup a code in a table.
- */
-static char _lookup_buffer[100];
-
-static const char *
-LookupL (long code, const binding *table)
-{
- const char *name = NULL;
-
- while (table->name) {
- if (table->code == code) {
- name = table->name;
- break;
- }
- table++;
- }
-
- if (name == NULL) {
- snprintf (_lookup_buffer, sizeof(_lookup_buffer),
- "unknown (code = %ld. = 0x%lx)", code, code);
- name = _lookup_buffer;
- }
-
- return (name);
-}
-
-static const char *
-Lookup (int code, const binding *table)
-{
- return LookupL ((long)code, table);
-}
-
-/*
- * Routine to display a window id in dec/hex with name if window has one
- *
- * Requires wininfo members initialized: window, wm_name_cookie
- */
-
-static void
-Display_Window_Id (struct wininfo *w, Bool newline_wanted)
-{
-#ifdef USE_XCB_ICCCM
- xcb_icccm_get_text_property_reply_t wmn_reply;
- uint8_t got_reply = False;
-#endif
- xcb_get_property_reply_t *prop;
- const char *wm_name = NULL;
- unsigned int wm_name_len = 0;
- xcb_atom_t wm_name_encoding = XCB_NONE;
-
- printf (window_id_format, w->window); /* print id # in hex/dec */
-
- if (!w->window) {
- printf (" (none)");
- } else {
- if (w->window == screen->root) {
- printf (" (the root window)");
- }
- /* Get window name if any */
- prop = xcb_get_property_reply (dpy, w->net_wm_name_cookie, NULL);
- if (prop && (prop->type != XCB_NONE)) {
- wm_name = xcb_get_property_value (prop);
- wm_name_len = xcb_get_property_value_length (prop);
- wm_name_encoding = prop->type;
- } else { /* No _NET_WM_NAME, check WM_NAME */
-#ifdef USE_XCB_ICCCM
- got_reply = xcb_icccm_get_wm_name_reply (dpy, w->wm_name_cookie,
- &wmn_reply, NULL);
- if (got_reply) {
- wm_name = wmn_reply.name;
- wm_name_len = wmn_reply.name_len;
- wm_name_encoding = wmn_reply.encoding;
- }
-#else
- prop = xcb_get_property_reply (dpy, w->wm_name_cookie, NULL);
- if (prop && (prop->type != XCB_NONE)) {
- wm_name = xcb_get_property_value (prop);
- wm_name_len = xcb_get_property_value_length (prop);
- wm_name_encoding = prop->type;
- }
-#endif
- }
- if (wm_name_len == 0) {
- printf (" (has no name)");
- } else {
- if (wm_name_encoding == XCB_ATOM_STRING) {
- printf (" \"%.*s\"", wm_name_len, wm_name);
- } else if (wm_name_encoding == atom_utf8_string) {
- print_utf8 (" \"", (char *) wm_name, wm_name_len, "\"");
- } else {
- /* Encodings we don't support, including COMPOUND_TEXT */
- const char *enc_name = Get_Atom_Name (dpy, wm_name_encoding);
- if (enc_name) {
- printf (" (name in unsupported encoding %s)", enc_name);
- } else {
- printf (" (name in unsupported encoding ATOM 0x%x)",
- wm_name_encoding);
- }
- }
- }
-#ifdef USE_XCB_ICCCM
- if (got_reply)
- xcb_icccm_get_text_property_reply_wipe (&wmn_reply);
-#else
- free (prop);
-#endif
- }
-
- if (newline_wanted)
- printf ("\n");
-
- return;
-}
-
-
-/*
- * Display Stats on window
- */
-static const binding _window_classes[] = {
- { XCB_WINDOW_CLASS_INPUT_OUTPUT, "InputOutput" },
- { XCB_WINDOW_CLASS_INPUT_ONLY, "InputOnly" },
- { 0, NULL } };
-
-static const binding _map_states[] = {
- { XCB_MAP_STATE_UNMAPPED, "IsUnMapped" },
- { XCB_MAP_STATE_UNVIEWABLE, "IsUnviewable" },
- { XCB_MAP_STATE_VIEWABLE, "IsViewable" },
- { 0, NULL } };
-
-static const binding _backing_store_states[] = {
- { XCB_BACKING_STORE_NOT_USEFUL, "NotUseful" },
- { XCB_BACKING_STORE_WHEN_MAPPED,"WhenMapped" },
- { XCB_BACKING_STORE_ALWAYS, "Always" },
- { 0, NULL } };
-
-static const binding _bit_gravity_states[] = {
- { XCB_GRAVITY_BIT_FORGET, "ForgetGravity" },
- { XCB_GRAVITY_NORTH_WEST, "NorthWestGravity" },
- { XCB_GRAVITY_NORTH, "NorthGravity" },
- { XCB_GRAVITY_NORTH_EAST, "NorthEastGravity" },
- { XCB_GRAVITY_WEST, "WestGravity" },
- { XCB_GRAVITY_CENTER, "CenterGravity" },
- { XCB_GRAVITY_EAST, "EastGravity" },
- { XCB_GRAVITY_SOUTH_WEST, "SouthWestGravity" },
- { XCB_GRAVITY_SOUTH, "SouthGravity" },
- { XCB_GRAVITY_SOUTH_EAST, "SouthEastGravity" },
- { XCB_GRAVITY_STATIC, "StaticGravity" },
- { 0, NULL }};
-
-static const binding _window_gravity_states[] = {
- { XCB_GRAVITY_WIN_UNMAP, "UnmapGravity" },
- { XCB_GRAVITY_NORTH_WEST, "NorthWestGravity" },
- { XCB_GRAVITY_NORTH, "NorthGravity" },
- { XCB_GRAVITY_NORTH_EAST, "NorthEastGravity" },
- { XCB_GRAVITY_WEST, "WestGravity" },
- { XCB_GRAVITY_CENTER, "CenterGravity" },
- { XCB_GRAVITY_EAST, "EastGravity" },
- { XCB_GRAVITY_SOUTH_WEST, "SouthWestGravity" },
- { XCB_GRAVITY_SOUTH, "SouthGravity" },
- { XCB_GRAVITY_SOUTH_EAST, "SouthEastGravity" },
- { XCB_GRAVITY_STATIC, "StaticGravity" },
- { 0, NULL }};
-
-static const binding _visual_classes[] = {
- { XCB_VISUAL_CLASS_STATIC_GRAY, "StaticGray" },
- { XCB_VISUAL_CLASS_GRAY_SCALE, "GrayScale" },
- { XCB_VISUAL_CLASS_STATIC_COLOR,"StaticColor" },
- { XCB_VISUAL_CLASS_PSEUDO_COLOR,"PseudoColor" },
- { XCB_VISUAL_CLASS_TRUE_COLOR, "TrueColor" },
- { XCB_VISUAL_CLASS_DIRECT_COLOR,"DirectColor" },
- { 0, NULL }};
-
-/*
- * Requires wininfo members initialized:
- * window, geometry, attr_cookie, trans_coords_cookie, normal_hints_cookie
- */
-static void
-Display_Stats_Info (struct wininfo *w)
-{
- xcb_translate_coordinates_reply_t *trans_coords;
- xcb_get_window_attributes_reply_t *win_attributes;
- xcb_size_hints_t hints;
-
- int dw = screen->width_in_pixels, dh = screen->height_in_pixels;
- int rx, ry, xright, ybelow;
- int showright = 0, showbelow = 0;
- xcb_window_t wmframe, parent;
-
- trans_coords =
- xcb_translate_coordinates_reply (dpy, w->trans_coords_cookie, NULL);
- if (!trans_coords)
- Fatal_Error ("Can't get translated coordinates.");
-
- rx = (int16_t)trans_coords->dst_x;
- ry = (int16_t)trans_coords->dst_y;
- free (trans_coords);
-
- xright = (dw - rx - w->geometry->border_width * 2 -
- w->geometry->width);
- ybelow = (dh - ry - w->geometry->border_width * 2 -
- w->geometry->height);
-
-
- printf ("\n");
- printf (" Absolute upper-left X: %s\n", xscale (rx));
- printf (" Absolute upper-left Y: %s\n", yscale (ry));
- printf (" Relative upper-left X: %s\n", xscale (w->geometry->x));
- printf (" Relative upper-left Y: %s\n", yscale (w->geometry->y));
- printf (" Width: %s\n", xscale (w->geometry->width));
- printf (" Height: %s\n", yscale (w->geometry->height));
- printf (" Depth: %d\n", w->geometry->depth);
-
- win_attributes = fetch_win_attributes (w);
-
- printf (" Visual: 0x%lx\n", (unsigned long) win_attributes->visual);
- if (screen)
- {
- xcb_depth_iterator_t depth_iter;
- xcb_visualtype_t *visual_type = NULL;
-
- depth_iter = xcb_screen_allowed_depths_iterator (screen);
- for (; depth_iter.rem; xcb_depth_next (&depth_iter)) {
- xcb_visualtype_iterator_t visual_iter;
-
- visual_iter = xcb_depth_visuals_iterator (depth_iter.data);
- for (; visual_iter.rem; xcb_visualtype_next (&visual_iter)) {
- if (screen->root_visual == visual_iter.data->visual_id) {
- visual_type = visual_iter.data;
- break;
- }
- }
- }
- if (visual_type)
- printf (" Visual Class: %s\n", Lookup (visual_type->_class,
- _visual_classes));
- }
-
- printf (" Border width: %s\n", bscale (w->geometry->border_width));
- printf (" Class: %s\n",
- Lookup (win_attributes->_class, _window_classes));
- printf (" Colormap: 0x%lx (%sinstalled)\n",
- (unsigned long) win_attributes->colormap,
- win_attributes->map_is_installed ? "" : "not ");
- printf (" Bit Gravity State: %s\n",
- Lookup (win_attributes->bit_gravity, _bit_gravity_states));
- printf (" Window Gravity State: %s\n",
- Lookup (win_attributes->win_gravity, _window_gravity_states));
- printf (" Backing Store State: %s\n",
- Lookup (win_attributes->backing_store, _backing_store_states));
- printf (" Save Under State: %s\n",
- win_attributes->save_under ? "yes" : "no");
- printf (" Map State: %s\n",
- Lookup (win_attributes->map_state, _map_states));
- printf (" Override Redirect State: %s\n",
- win_attributes->override_redirect ? "yes" : "no");
- printf (" Corners: +%d+%d -%d+%d -%d-%d +%d-%d\n",
- rx, ry, xright, ry, xright, ybelow, rx, ybelow);
-
- /*
- * compute geometry string that would recreate window
- */
- printf (" -geometry ");
-
- /* compute size in appropriate units */
- if (!fetch_normal_hints (w, &hints))
- hints.flags = 0;
-
- if ((hints.flags & XCB_ICCCM_SIZE_HINT_P_RESIZE_INC) &&
- (hints.width_inc != 0) && (hints.height_inc != 0)) {
- if (hints.flags &
- (XCB_ICCCM_SIZE_HINT_BASE_SIZE|XCB_ICCCM_SIZE_HINT_P_MIN_SIZE)) {
- if (hints.flags & XCB_ICCCM_SIZE_HINT_BASE_SIZE) {
- w->geometry->width -= hints.base_width;
- w->geometry->height -= hints.base_height;
- } else {
- /* ICCCM says MinSize is default for BaseSize */
- w->geometry->width -= hints.min_width;
- w->geometry->height -= hints.min_height;
- }
- }
- printf ("%dx%d", w->geometry->width/hints.width_inc,
- w->geometry->height/hints.height_inc);
- } else
- printf ("%dx%d", w->geometry->width, w->geometry->height);
-
- if (!(hints.flags & XCB_ICCCM_SIZE_HINT_P_WIN_GRAVITY))
- hints.win_gravity = XCB_GRAVITY_NORTH_WEST; /* per ICCCM */
- /* find our window manager frame, if any */
- for (wmframe = parent = w->window; parent != 0 ; wmframe = parent) {
- xcb_query_tree_cookie_t qt_cookie;
- xcb_query_tree_reply_t *tree;
-
- qt_cookie = xcb_query_tree (dpy, wmframe);
- tree = xcb_query_tree_reply (dpy, qt_cookie, &err);
- if (!tree) {
- Print_X_Error (dpy, err);
- Fatal_Error ("Can't query window tree.");
- }
- parent = tree->parent;
- free (tree);
- if (parent == w->geometry->root || !parent)
- break;
- }
- if (wmframe != w->window) {
- /* WM reparented, so find edges of the frame */
- /* Only works for ICCCM-compliant WMs, and then only if the
- window has corner gravity. We would need to know the original width
- of the window to correctly handle the other gravities. */
- xcb_get_geometry_cookie_t geom_cookie;
- xcb_get_geometry_reply_t *frame_geometry;
-
- geom_cookie = xcb_get_geometry (dpy, wmframe);
- frame_geometry = xcb_get_geometry_reply (dpy, geom_cookie, &err);
-
- if (!frame_geometry) {
- Print_X_Error (dpy, err);
- Fatal_Error ("Can't get frame geometry.");
- }
- switch (hints.win_gravity) {
- case XCB_GRAVITY_NORTH_WEST: case XCB_GRAVITY_SOUTH_WEST:
- case XCB_GRAVITY_NORTH_EAST: case XCB_GRAVITY_SOUTH_EAST:
- case XCB_GRAVITY_WEST:
- rx = frame_geometry->x;
- }
- switch (hints.win_gravity) {
- case XCB_GRAVITY_NORTH_WEST: case XCB_GRAVITY_SOUTH_WEST:
- case XCB_GRAVITY_NORTH_EAST: case XCB_GRAVITY_SOUTH_EAST:
- case XCB_GRAVITY_EAST:
- xright = dw - frame_geometry->x - frame_geometry->width -
- (2 * frame_geometry->border_width);
- }
- switch (hints.win_gravity) {
- case XCB_GRAVITY_NORTH_WEST: case XCB_GRAVITY_SOUTH_WEST:
- case XCB_GRAVITY_NORTH_EAST: case XCB_GRAVITY_SOUTH_EAST:
- case XCB_GRAVITY_NORTH:
- ry = frame_geometry->y;
- }
- switch (hints.win_gravity) {
- case XCB_GRAVITY_NORTH_WEST: case XCB_GRAVITY_SOUTH_WEST:
- case XCB_GRAVITY_NORTH_EAST: case XCB_GRAVITY_SOUTH_EAST:
- case XCB_GRAVITY_SOUTH:
- ybelow = dh - frame_geometry->y - frame_geometry->height -
- (2 * frame_geometry->border_width);
- }
- free (frame_geometry);
- }
- /* If edge gravity, offer a corner on that edge (because the application
- programmer cares about that edge), otherwise offer upper left unless
- some other corner is close to an edge of the screen.
- (For corner gravity, assume gravity was set by XWMGeometry.
- For CenterGravity, it doesn't matter.) */
- if (hints.win_gravity == XCB_GRAVITY_EAST ||
- (abs (xright) <= 100 && abs (xright) < abs (rx)
- && hints.win_gravity != XCB_GRAVITY_WEST))
- showright = 1;
- if (hints.win_gravity == XCB_GRAVITY_SOUTH ||
- (abs (ybelow) <= 100 && abs (ybelow) < abs (ry)
- && hints.win_gravity != XCB_GRAVITY_NORTH))
- showbelow = 1;
-
- if (showright)
- printf ("-%d", xright);
- else
- printf ("+%d", rx);
- if (showbelow)
- printf ("-%d", ybelow);
- else
- printf ("+%d", ry);
- printf ("\n");
-}
-
-
-/*
- * Display bits info:
- */
-static const binding _gravities[] = {
- /* WARNING: the first two of these have the same value - see code */
- { XCB_GRAVITY_WIN_UNMAP, "UnMapGravity" },
- { XCB_GRAVITY_BIT_FORGET, "ForgetGravity" },
- { XCB_GRAVITY_NORTH_WEST, "NorthWestGravity" },
- { XCB_GRAVITY_NORTH, "NorthGravity" },
- { XCB_GRAVITY_NORTH_EAST, "NorthEastGravity" },
- { XCB_GRAVITY_WEST, "WestGravity" },
- { XCB_GRAVITY_CENTER, "CenterGravity" },
- { XCB_GRAVITY_EAST, "EastGravity" },
- { XCB_GRAVITY_SOUTH_WEST, "SouthWestGravity" },
- { XCB_GRAVITY_SOUTH, "SouthGravity" },
- { XCB_GRAVITY_SOUTH_EAST, "SouthEastGravity" },
- { XCB_GRAVITY_STATIC, "StaticGravity" },
- { 0, NULL } };
-
-static const binding _backing_store_hint[] = {
- { XCB_BACKING_STORE_NOT_USEFUL, "NotUseful" },
- { XCB_BACKING_STORE_WHEN_MAPPED,"WhenMapped" },
- { XCB_BACKING_STORE_ALWAYS, "Always" },
- { 0, NULL } };
-
-static const binding _bool[] = {
- { 0, "No" },
- { 1, "Yes" },
- { 0, NULL } };
-
-/*
- * Requires wininfo members initialized:
- * window, attr_cookie (or win_attributes)
- */
-static void
-Display_Bits_Info (struct wininfo * w)
-{
- xcb_get_window_attributes_reply_t *win_attributes
- = fetch_win_attributes (w);
-
- printf ("\n");
- printf (" Bit gravity: %s\n",
- Lookup (win_attributes->bit_gravity, _gravities+1));
- printf (" Window gravity: %s\n",
- Lookup (win_attributes->win_gravity, _gravities));
- printf (" Backing-store hint: %s\n",
- Lookup (win_attributes->backing_store, _backing_store_hint));
- printf (" Backing-planes to be preserved: 0x%lx\n",
- (unsigned long) win_attributes->backing_planes);
- printf (" Backing pixel: %ld\n",
- (unsigned long) win_attributes->backing_pixel);
- printf (" Save-unders: %s\n",
- Lookup (win_attributes->save_under, _bool));
-}
-
-
-/*
- * Routine to display all events in an event mask
- */
-static const binding _event_mask_names[] = {
- { XCB_EVENT_MASK_KEY_PRESS, "KeyPress" },
- { XCB_EVENT_MASK_KEY_RELEASE, "KeyRelease" },
- { XCB_EVENT_MASK_BUTTON_PRESS, "ButtonPress" },
- { XCB_EVENT_MASK_BUTTON_RELEASE, "ButtonRelease" },
- { XCB_EVENT_MASK_ENTER_WINDOW, "EnterWindow" },
- { XCB_EVENT_MASK_LEAVE_WINDOW, "LeaveWindow" },
- { XCB_EVENT_MASK_POINTER_MOTION, "PointerMotion" },
- { XCB_EVENT_MASK_POINTER_MOTION_HINT, "PointerMotionHint" },
- { XCB_EVENT_MASK_BUTTON_1_MOTION, "Button1Motion" },
- { XCB_EVENT_MASK_BUTTON_2_MOTION, "Button2Motion" },
- { XCB_EVENT_MASK_BUTTON_3_MOTION, "Button3Motion" },
- { XCB_EVENT_MASK_BUTTON_4_MOTION, "Button4Motion" },
- { XCB_EVENT_MASK_BUTTON_5_MOTION, "Button5Motion" },
- { XCB_EVENT_MASK_BUTTON_MOTION, "ButtonMotion" },
- { XCB_EVENT_MASK_KEYMAP_STATE, "KeymapState" },
- { XCB_EVENT_MASK_EXPOSURE, "Exposure" },
- { XCB_EVENT_MASK_VISIBILITY_CHANGE, "VisibilityChange" },
- { XCB_EVENT_MASK_STRUCTURE_NOTIFY, "StructureNotify" },
- { XCB_EVENT_MASK_RESIZE_REDIRECT, "ResizeRedirect" },
- { XCB_EVENT_MASK_SUBSTRUCTURE_NOTIFY, "SubstructureNotify" },
- { XCB_EVENT_MASK_SUBSTRUCTURE_REDIRECT, "SubstructureRedirect" },
- { XCB_EVENT_MASK_FOCUS_CHANGE, "FocusChange" },
- { XCB_EVENT_MASK_PROPERTY_CHANGE, "PropertyChange" },
- { XCB_EVENT_MASK_COLOR_MAP_CHANGE, "ColormapChange" },
- { XCB_EVENT_MASK_OWNER_GRAB_BUTTON, "OwnerGrabButton" },
- { 0, NULL } };
-
-static void
-Display_Event_Mask (long mask)
-{
- long bit, bit_mask;
-
- for (bit=0, bit_mask=1; bit < sizeof(long)*8; bit++, bit_mask <<= 1)
- if (mask & bit_mask)
- printf (" %s\n",
- LookupL (bit_mask, _event_mask_names));
-}
-
-
-/*
- * Display info on events
- *
- * Requires wininfo members initialized:
- * window, attr_cookie (or win_attributes)
- */
-static void
-Display_Events_Info (struct wininfo *w)
-{
- xcb_get_window_attributes_reply_t *win_attributes
- = fetch_win_attributes (w);
-
- printf ("\n");
- printf (" Someone wants these events:\n");
- Display_Event_Mask (win_attributes->all_event_masks);
-
- printf (" Do not propagate these events:\n");
- Display_Event_Mask (win_attributes->do_not_propagate_mask);
-
- printf (" Override redirection?: %s\n",
- Lookup (win_attributes->override_redirect, _bool));
-}
-
-
- /* left out visual stuff */
- /* left out colormap */
- /* left out map_installed */
-
-
-/*
- * Display root, parent, and (recursively) children information
- * recurse - true to show children information
- *
- * Requires wininfo members initialized: window, tree_cookie
- */
-static void
-Display_Tree_Info (struct wininfo *w, int recurse)
-{
- display_tree_info_1 (w, recurse, 0);
-}
-
-/*
- * level - recursion level
- */
-static void
-display_tree_info_1 (struct wininfo *w, int recurse, int level)
-{
- int i, j;
- unsigned int num_children;
- xcb_query_tree_reply_t *tree;
-
- tree = xcb_query_tree_reply (dpy, w->tree_cookie, &err);
- if (!tree) {
- Print_X_Error (dpy, err);
- Fatal_Error ("Can't query window tree.");
- }
-
- if (level == 0) {
- struct wininfo rw, pw;
- rw.window = tree->root;
- rw.net_wm_name_cookie = get_net_wm_name (dpy, rw.window);
- rw.wm_name_cookie = xcb_icccm_get_wm_name (dpy, rw.window);
- pw.window = tree->parent;
- pw.net_wm_name_cookie = get_net_wm_name (dpy, pw.window);
- pw.wm_name_cookie = xcb_icccm_get_wm_name (dpy, pw.window);
- xcb_flush (dpy);
-
- printf ("\n");
- printf (" Root window id: ");
- Display_Window_Id (&rw, True);
- printf (" Parent window id: ");
- Display_Window_Id (&pw, True);
- }
-
- num_children = xcb_query_tree_children_length (tree);
-
- if (level == 0 || num_children > 0) {
- printf (" ");
- for (j = 0; j < level; j++) printf (" ");
- printf ("%d child%s%s\n", num_children, num_children == 1 ? "" : "ren",
- num_children ? ":" : ".");
- }
-
- if (num_children > 0) {
- xcb_window_t *child_list = xcb_query_tree_children (tree);
- struct wininfo *children
- = calloc (num_children, sizeof(struct wininfo));
-
- if (children == NULL)
- Fatal_Error ("Failed to allocate memory in display_tree_info");
-
- for (i = (int)num_children - 1; i >= 0; i--) {
- struct wininfo *cw = &children[i];
-
- cw->window = child_list[i];
- cw->net_wm_name_cookie = get_net_wm_name (dpy, child_list[i]);
- cw->wm_name_cookie = xcb_icccm_get_wm_name (dpy, child_list[i]);
- cw->wm_class_cookie = xcb_icccm_get_wm_class (dpy, child_list[i]);
- cw->geometry_cookie = xcb_get_geometry (dpy, child_list[i]);
- cw->trans_coords_cookie = xcb_translate_coordinates
- (dpy, child_list[i], tree->root, 0, 0);
- if (recurse)
- cw->tree_cookie = xcb_query_tree (dpy, child_list[i]);
- }
- xcb_flush (dpy);
-
- for (i = (int)num_children - 1; i >= 0; i--) {
- struct wininfo *cw = &children[i];
- Bool got_wm_class = False;
- char *instance_name = NULL, *class_name = NULL;
- int instance_name_len, class_name_len;
-#ifdef USE_XCB_ICCCM
- xcb_icccm_get_wm_class_reply_t classhint;
-#else
- xcb_get_property_reply_t *classprop;
-#endif
- xcb_get_geometry_reply_t *geometry;
-
- printf (" ");
- for (j = 0; j < level; j++) printf (" ");
- Display_Window_Id (cw, False);
- printf (": (");
-
-#ifdef USE_XCB_ICCCM
- if (xcb_icccm_get_wm_class_reply (dpy, cw->wm_class_cookie,
- &classhint, NULL)) {
- got_wm_class = True;
- instance_name = classhint.instance_name;
- class_name = classhint.class_name;
- instance_name_len = strlen(instance_name);
- class_name_len = strlen(class_name);
- }
-#else
- classprop = xcb_get_property_reply
- (dpy, cw->wm_class_cookie, NULL);
- if (classprop) {
- if (classprop->type == XCB_ATOM_STRING &&
- classprop->format == 8) {
- int proplen = xcb_get_property_value_length (classprop);
-
- instance_name = xcb_get_property_value (classprop);
- instance_name_len = strnlen (instance_name, proplen);
- if (instance_name_len < proplen) {
- class_name = instance_name + instance_name_len + 1;
- class_name_len = strnlen
- (class_name, proplen - (instance_name_len + 1));
- } else
- class_name_len = 0;
- got_wm_class = True;
- }
- else
- free (classprop);
- }
-#endif
-
- if (got_wm_class) {
- if (instance_name)
- printf ("\"%.*s\" ", instance_name_len, instance_name);
- else
- printf ("(none) ");
-
- if (class_name)
- printf ("\"%.*s\") ", class_name_len, class_name);
- else
- printf ("(none)) ");
-
-#ifdef USE_XCB_ICCCM
- xcb_icccm_get_wm_class_reply_wipe (&classhint);
-#else
- free (classprop);
-#endif
- } else
- printf (") ");
-
- geometry = xcb_get_geometry_reply(dpy, cw->geometry_cookie, &err);
- if (geometry) {
- xcb_translate_coordinates_reply_t *trans_coords;
-
- printf (" %ux%u+%d+%d", geometry->width, geometry->height,
- geometry->x, geometry->y);
-
- trans_coords = xcb_translate_coordinates_reply
- (dpy, cw->trans_coords_cookie, &err);
-
- if (trans_coords) {
- int16_t abs_x = (int16_t) trans_coords->dst_x;
- int16_t abs_y = (int16_t) trans_coords->dst_y;
- int border = geometry->border_width;
-
- printf (" +%d+%d", abs_x - border, abs_y - border);
- free (trans_coords);
- } else if (err) {
- Print_X_Error (dpy, err);
- }
-
- free (geometry);
- } else if (err) {
- Print_X_Error (dpy, err);
- }
- printf ("\n");
-
- if (recurse)
- display_tree_info_1 (cw, 1, level+1);
-
- wininfo_wipe (cw);
- }
- free (children);
- }
-
- free (tree); /* includes storage for child_list[] */
-}
-
-
-/*
- * Display a set of size hints
- */
-static void
-Display_Hints (xcb_size_hints_t *hints)
-{
- long flags;
-
- flags = hints->flags;
-
- if (flags & XCB_ICCCM_SIZE_HINT_US_POSITION)
- printf (" User supplied location: %s, %s\n",
- xscale (hints->x), yscale (hints->y));
-
- if (flags & XCB_ICCCM_SIZE_HINT_P_POSITION)
- printf (" Program supplied location: %s, %s\n",
- xscale (hints->x), yscale (hints->y));
-
- if (flags & XCB_ICCCM_SIZE_HINT_US_SIZE) {
- printf (" User supplied size: %s by %s\n",
- xscale (hints->width), yscale (hints->height));
- }
-
- if (flags & XCB_ICCCM_SIZE_HINT_P_SIZE)
- printf (" Program supplied size: %s by %s\n",
- xscale (hints->width), yscale (hints->height));
-
- if (flags & XCB_ICCCM_SIZE_HINT_P_MIN_SIZE)
- printf (" Program supplied minimum size: %s by %s\n",
- xscale (hints->min_width), yscale (hints->min_height));
-
- if (flags & XCB_ICCCM_SIZE_HINT_P_MAX_SIZE)
- printf (" Program supplied maximum size: %s by %s\n",
- xscale (hints->max_width), yscale (hints->max_height));
-
- if (flags & XCB_ICCCM_SIZE_HINT_BASE_SIZE) {
- printf (" Program supplied base size: %s by %s\n",
- xscale (hints->base_width), yscale (hints->base_height));
- }
-
- if (flags & XCB_ICCCM_SIZE_HINT_P_RESIZE_INC) {
- printf (" Program supplied x resize increment: %s\n",
- xscale (hints->width_inc));
- printf (" Program supplied y resize increment: %s\n",
- yscale (hints->height_inc));
- if (hints->width_inc != 0 && hints->height_inc != 0) {
- if (flags & XCB_ICCCM_SIZE_HINT_US_SIZE)
- printf (" User supplied size in resize increments: %s by %s\n",
- (xscale (hints->width / hints->width_inc)),
- (yscale (hints->height / hints->height_inc)));
- if (flags & XCB_ICCCM_SIZE_HINT_P_SIZE)
- printf (" Program supplied size in resize increments: %s by %s\n",
- (xscale (hints->width / hints->width_inc)),
- (yscale (hints->height / hints->height_inc)));
- if (flags & XCB_ICCCM_SIZE_HINT_P_MIN_SIZE)
- printf (" Program supplied minimum size in resize increments: %s by %s\n",
- xscale (hints->min_width / hints->width_inc), yscale (hints->min_height / hints->height_inc));
- if (flags & XCB_ICCCM_SIZE_HINT_BASE_SIZE)
- printf (" Program supplied base size in resize increments: %s by %s\n",
- (xscale (hints->base_width / hints->width_inc)),
- (yscale (hints->base_height / hints->height_inc)));
- }
- }
-
- if (flags & XCB_ICCCM_SIZE_HINT_P_ASPECT) {
- printf (" Program supplied min aspect ratio: %s/%s\n",
- xscale (hints->min_aspect_num), yscale (hints->min_aspect_den));
- printf (" Program supplied max aspect ratio: %s/%s\n",
- xscale (hints->max_aspect_num), yscale (hints->max_aspect_den));
- }
-
- if (flags & XCB_ICCCM_SIZE_HINT_P_WIN_GRAVITY) {
- printf (" Program supplied window gravity: %s\n",
- Lookup (hints->win_gravity, _gravities));
- }
-}
-
-
-/*
- * Display Size Hints info
- */
-static void
-Display_Size_Hints (struct wininfo *w)
-{
- xcb_size_hints_t hints;
-
- printf ("\n");
- if (!fetch_normal_hints (w, &hints))
- printf (" No normal window size hints defined\n");
- else {
- printf (" Normal window size hints:\n");
- Display_Hints (&hints);
- }
-
- if (!xcb_icccm_get_wm_size_hints_reply (dpy, w->zoom_cookie, &hints, NULL))
- printf (" No zoom window size hints defined\n");
- else {
- printf (" Zoom window size hints:\n");
- Display_Hints (&hints);
- }
-}
-
-
-static void
-Display_Window_Shape (xcb_window_t window)
-{
- const xcb_query_extension_reply_t *shape_query;
- xcb_shape_query_extents_cookie_t extents_cookie;
- xcb_shape_query_extents_reply_t *extents;
-
- shape_query = xcb_get_extension_data (dpy, &xcb_shape_id);
- if (!shape_query->present)
- return;
-
- printf ("\n");
-
- extents_cookie = xcb_shape_query_extents (dpy, window);
- extents = xcb_shape_query_extents_reply (dpy, extents_cookie, &err);
-
- if (!extents) {
- if (err)
- Print_X_Error (dpy, err);
- else
- {
- printf (" No window shape defined\n");
- printf (" No border shape defined\n");
- }
- return;
- }
-
- if (!extents->bounding_shaped)
- printf (" No window shape defined\n");
- else {
- printf (" Window shape extents: %sx%s",
- xscale (extents->bounding_shape_extents_width),
- yscale (extents->bounding_shape_extents_height));
- printf ("+%s+%s\n",
- xscale (extents->bounding_shape_extents_x),
- yscale (extents->bounding_shape_extents_y));
- }
- if (!extents->clip_shaped)
- printf (" No border shape defined\n");
- else {
- printf (" Border shape extents: %sx%s",
- xscale (extents->clip_shape_extents_width),
- yscale (extents->clip_shape_extents_height));
- printf ("+%s+%s\n",
- xscale (extents->clip_shape_extents_x),
- yscale (extents->clip_shape_extents_y));
- }
-
- free (extents);
-}
-
-/*
- * Display Window Manager Info
- *
- * Requires wininfo members initialized:
- * window, hints_cookie
- */
-static const binding _state_hints[] = {
- { XCB_ICCCM_WM_STATE_WITHDRAWN, "Withdrawn State" },
- { XCB_ICCCM_WM_STATE_NORMAL, "Normal State" },
- { XCB_ICCCM_WM_STATE_ICONIC, "Iconic State" },
-/* xwininfo previously also reported the ZoomState & InactiveState,
- but ICCCM declared those obsolete long ago */
- { 0, NULL } };
-
-#ifndef USE_XCB_ICCCM
-static Bool
-wm_hints_reply (xcb_connection_t *dpy, xcb_get_property_cookie_t cookie,
- wm_hints_t *hints_return, xcb_generic_error_t **err)
-{
- xcb_get_property_reply_t *prop = xcb_get_property_reply (dpy, cookie, err);
- int length;
-
- if (!prop || (prop->type != XCB_ATOM_WM_HINTS) || (prop->format != 32)) {
- free (prop);
- return False;
- }
-
- memset (hints_return, 0, sizeof(wm_hints_t));
-
- length = xcb_get_property_value_length(prop);
- if (length > sizeof(wm_hints_t))
- length = sizeof(wm_hints_t);
- memcpy (hints_return, xcb_get_property_value (prop), length);
-
- free (prop);
- return True;
-}
-
-#define xcb_icccm_get_wm_hints_reply wm_hints_reply
-#endif
-
-static void
-Display_WM_Info (struct wininfo *w)
-{
- xcb_icccm_wm_hints_t wmhints;
- long flags;
- xcb_get_property_reply_t *prop;
- int i;
-
- printf ("\n");
- if (!xcb_icccm_get_wm_hints_reply(dpy, w->hints_cookie, &wmhints, &err))
- {
- printf (" No window manager hints defined\n");
- if (err)
- Print_X_Error (dpy, err);
- flags = 0;
- } else
- flags = wmhints.flags;
-
- printf (" Window manager hints:\n");
-
- if (flags & XCB_ICCCM_WM_HINT_INPUT)
- printf (" Client accepts input or input focus: %s\n",
- Lookup (wmhints.input, _bool));
-
- if (flags & XCB_ICCCM_WM_HINT_ICON_WINDOW) {
- struct wininfo iw;
- iw.window = wmhints.icon_window;
- iw.net_wm_name_cookie = get_net_wm_name (dpy, iw.window);
- iw.wm_name_cookie = xcb_icccm_get_wm_name (dpy, iw.window);
-
- printf (" Icon window id: ");
- Display_Window_Id (&iw, True);
- }
-
- if (flags & XCB_ICCCM_WM_HINT_ICON_POSITION)
- printf (" Initial icon position: %s, %s\n",
- xscale (wmhints.icon_x), yscale (wmhints.icon_y));
-
- if (flags & XCB_ICCCM_WM_HINT_STATE)
- printf (" Initial state is %s\n",
- Lookup (wmhints.initial_state, _state_hints));
-
- if (atom_net_wm_desktop) {
- prop = xcb_get_property_reply (dpy, w->wm_desktop_cookie, NULL);
- if (prop && (prop->type != XCB_NONE)) {
- uint32_t *desktop = xcb_get_property_value (prop);
- if (*desktop == 0xFFFFFFFF) {
- printf (" Displayed on all desktops\n");
- } else {
- printf (" Displayed on desktop %d\n", *desktop);
- }
- }
- free (prop);
- }
-
- if (atom_net_wm_window_type) {
- prop = xcb_get_property_reply (dpy, w->wm_window_type_cookie,
- NULL);
- if (prop && (prop->type != XCB_NONE) && (prop->value_len > 0)) {
- xcb_atom_t *atoms = xcb_get_property_value (prop);
- int atom_count = prop->value_len;
-
- if (atom_count > 0) {
- printf (" Window type:\n");
- for (i = 0; i < atom_count; i++) {
- const char *atom_name = Get_Atom_Name (dpy, atoms[i]);
-
- if (atom_name) {
- print_friendly_name (" %s\n", atom_name,
- "_NET_WM_WINDOW_TYPE_");
- } else {
- printf (" (unresolvable ATOM 0x%x)\n",
- atoms[i]);
- }
- }
- }
- }
- free (prop);
- }
-
- if (atom_net_wm_state) {
- prop = xcb_get_property_reply (dpy, w->wm_state_cookie, NULL);
- if (prop && (prop->type != XCB_NONE) && (prop->value_len > 0)) {
- xcb_atom_t *atoms = xcb_get_property_value (prop);
- int atom_count = prop->value_len;
-
- if (atom_count > 0) {
- printf (" Window state:\n");
- for (i = 0; i < atom_count; i++) {
- const char *atom_name = Get_Atom_Name (dpy, atoms[i]);
-
- if (atom_name) {
- print_friendly_name (" %s\n", atom_name,
- "_NET_WM_STATE_");
- } else {
- printf (" (unresolvable ATOM 0x%x)\n",
- atoms[i]);
- }
- }
- }
- }
- free (prop);
- }
-
- if (atom_net_wm_pid) {
- printf (" Process id: ");
- prop = xcb_get_property_reply (dpy, w->wm_pid_cookie, NULL);
- if (prop && (prop->type == XCB_ATOM_CARDINAL)) {
- uint32_t *pid = xcb_get_property_value (prop);
- printf ("%d", *pid);
- } else {
- printf ("(unknown)");
- }
- free (prop);
-
- prop = xcb_get_property_reply (dpy, w->wm_client_machine_cookie, NULL);
- if (prop && (prop->type == XCB_ATOM_STRING)) {
- const char *hostname = xcb_get_property_value (prop);
- int hostname_len = xcb_get_property_value_length (prop);
- printf (" on host %.*s", hostname_len, hostname);
- }
- printf ("\n");
- free (prop);
- }
-
- if (atom_net_frame_extents) {
- prop = xcb_get_property_reply (dpy, w->frame_extents_cookie, NULL);
- if (prop && (prop->type == XCB_ATOM_CARDINAL)
- && (prop->value_len == 4)) {
- uint32_t *extents = xcb_get_property_value (prop);
-
- printf (" Frame extents: %d, %d, %d, %d\n",
- extents[0], extents[1], extents[2], extents[3]);
- }
- free (prop);
- }
-}
-
-/* Frees all members of a wininfo struct, but not the struct itself */
-static void
-wininfo_wipe (struct wininfo *w)
-{
- free (w->geometry);
- free (w->win_attributes);
- free (w->normal_hints);
-}
-
-/* Gets UTF-8 encoded EMWH property _NET_WM_NAME for a window */
-static xcb_get_property_cookie_t
-get_net_wm_name (xcb_connection_t *dpy, xcb_window_t win)
-{
- if (!atom_net_wm_name)
- atom_net_wm_name = Get_Atom (dpy, "_NET_WM_NAME");
-
- if (!atom_utf8_string)
- atom_utf8_string = Get_Atom (dpy, "UTF8_STRING");
-
- if (atom_net_wm_name && atom_utf8_string)
- return xcb_get_property (dpy, False, win, atom_net_wm_name,
- atom_utf8_string, 0, BUFSIZ);
- else {
- xcb_get_property_cookie_t dummy = { 0 };
- return dummy;
- }
-}
-
-/* [Copied from code added by Yang Zhao to xprop/xprop.c]
- *
- * Validate a string as UTF-8 encoded according to RFC 3629
- *
- * Simply, a unicode code point (up to 21-bits long) is encoded as follows:
- *
- * Char. number range | UTF-8 octet sequence
- * (hexadecimal) | (binary)
- * --------------------+---------------------------------------------
- * 0000 0000-0000 007F | 0xxxxxxx
- * 0000 0080-0000 07FF | 110xxxxx 10xxxxxx
- * 0000 0800-0000 FFFF | 1110xxxx 10xxxxxx 10xxxxxx
- * 0001 0000-0010 FFFF | 11110xxx 10xxxxxx 10xxxxxx 10xxxxxx
- *
- * Validation is done left-to-right, and an error condition, if any, refers to
- * only the left-most problem in the string.
- *
- * Return values:
- * UTF8_VALID: Valid UTF-8 encoded string
- * UTF8_OVERLONG: Using more bytes than needed for a code point
- * UTF8_SHORT_TAIL: Not enough bytes in a multi-byte sequence
- * UTF8_LONG_TAIL: Too many bytes in a multi-byte sequence
- * UTF8_FORBIDDEN_VALUE: Forbidden prefix or code point outside 0x10FFFF
- */
-#define UTF8_VALID 0
-#define UTF8_FORBIDDEN_VALUE 1
-#define UTF8_OVERLONG 2
-#define UTF8_SHORT_TAIL 3
-#define UTF8_LONG_TAIL 4
-static int
-is_valid_utf8 (const char *string, int len)
-{
- unsigned long codepoint;
- int rem, i;
- unsigned char c;
-
- rem = 0;
- for (i = 0; i < len; i++) {
- c = (unsigned char) string[i];
-
- /* Order of type check:
- * - Single byte code point
- * - Non-starting byte of multi-byte sequence
- * - Start of 2-byte sequence
- * - Start of 3-byte sequence
- * - Start of 4-byte sequence
- */
- if (!(c & 0x80)) {
- if (rem > 0) return UTF8_SHORT_TAIL;
- rem = 0;
- codepoint = c;
- } else if ((c & 0xC0) == 0x80) {
- if (rem == 0) return UTF8_LONG_TAIL;
- rem--;
- codepoint |= (c & 0x3F) << (rem * 6);
- if (codepoint == 0) return UTF8_OVERLONG;
- } else if ((c & 0xE0) == 0xC0) {
- if (rem > 0) return UTF8_SHORT_TAIL;
- rem = 1;
- codepoint = (c & 0x1F) << 6;
- if (codepoint == 0) return UTF8_OVERLONG;
- } else if ((c & 0xF0) == 0xE0) {
- if (rem > 0) return UTF8_SHORT_TAIL;
- rem = 2;
- codepoint = (c & 0x0F) << 12;
- } else if ((c & 0xF8) == 0xF0) {
- if (rem > 0) return UTF8_SHORT_TAIL;
- rem = 3;
- codepoint = (c & 0x07) << 18;
- if (codepoint > 0x10FFFF) return UTF8_FORBIDDEN_VALUE;
- } else
- return UTF8_FORBIDDEN_VALUE;
- }
-
- return UTF8_VALID;
-}
-
-/*
- * Converts a UTF-8 encoded string to the current locale encoding,
- * if possible, and prints it, with prefix before and suffix after.
- * Length of the string is specified in bytes, or -1 for going until '\0'
- */
-static void
-print_utf8 (const char *prefix, char *u8str, size_t length, const char *suffix)
-{
- size_t inlen = length;
-
- if (inlen < 0) {
- inlen = strlen (u8str);
- }
-
- if (is_valid_utf8 (u8str, inlen) != UTF8_VALID) {
- printf (" (invalid UTF8_STRING)");
- return;
- }
-
- if (strcmp (user_encoding, "UTF-8") == 0) {
- /* Don't need to convert */
- printf ("%s", prefix);
- fwrite (u8str, 1, inlen, stdout);
- printf ("%s", suffix);
- return;
- }
-
-#ifdef HAVE_ICONV
- if (!iconv_from_utf8) {
- iconv_from_utf8 = iconv_open (user_encoding, "UTF-8");
- }
-
- if (iconv_from_utf8 != (iconv_t) -1) {
- Bool done = True;
- ICONV_CONST char *inp = u8str;
- char convbuf[BUFSIZ];
- int convres;
-
- printf ("%s", prefix);
- do {
- char *outp = convbuf;
- size_t outlen = sizeof(convbuf);
-
- convres = iconv (iconv_from_utf8, &inp, &inlen, &outp, &outlen);
-
- if ((convres == -1) && (errno == E2BIG)) {
- done = False;
- convres = 0;
- }
-
- if (convres == 0) {
- fwrite (convbuf, 1, sizeof(convbuf) - outlen, stdout);
- } else {
- printf (" (failure in conversion from UTF8_STRING to %s)",
- user_encoding);
- }
- } while (!done);
- printf ("%s", suffix);
- } else {
- printf (" (can't load iconv conversion for UTF8_STRING to %s)",
- user_encoding);
- }
-#else
- printf (" (can't convert UTF8_STRING to %s)", user_encoding);
-#endif
-}
-
-/*
- * Takes a string such as an atom name, strips the prefix, converts
- * underscores to spaces, lowercases all but the first letter of each word,
- * and prints it.
- */
-static void
-print_friendly_name (const char *format, const char *string,
- const char *prefix)
-{
- const char *name_start = string;
- char *lowered_name, *n;
- int prefix_len = strlen (prefix);
-
- if (strncmp (name_start, prefix, prefix_len) == 0) {
- name_start += prefix_len;
- }
-
- lowered_name = strdup (name_start);
- if (lowered_name) {
- Bool first = True;
-
- for (n = lowered_name ; *n != 0 ; n++) {
- if (*n == '_') {
- *n = ' ';
- first = True;
- } else if (first) {
- first = False;
- } else {
- *n = tolower(*n);
- }
- }
- name_start = lowered_name;
- }
-
- printf (format, name_start);
- free (lowered_name);
-}
+/* + * Copyright (c) 1999, 2010, Oracle and/or its affiliates. All rights reserved. + * + * Permission is hereby granted, free of charge, to any person obtaining a + * copy of this software and associated documentation files (the "Software"), + * to deal in the Software without restriction, including without limitation + * the rights to use, copy, modify, merge, publish, distribute, sublicense, + * and/or sell copies of the Software, and to permit persons to whom the + * Software is furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice (including the next + * paragraph) shall be included in all copies or substantial portions of the + * Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL + * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING + * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER + * DEALINGS IN THE SOFTWARE. + */ +/* + +Copyright 1987, 1998 The Open Group + +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. + +The above copyright notice and this permission notice shall be included +in all copies or substantial portions of the Software. + +THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS +OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF +MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT +OF THIRD PARTY RIGHTS. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR +HOLDERS INCLUDED IN THIS NOTICE BE LIABLE FOR ANY CLAIM, OR 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. + +Except as contained in this notice, the name of a copyright holder +shall not be used in advertising or otherwise to promote the sale, use +or other dealings in this Software without prior written authorization +of the copyright holder. + +*/ + + +/* + * xwininfo.c - MIT Project Athena, X Window system window + * information utility. + * + * + * This program will report all relevant information + * about a specific window. + * + * Author: Mark Lillibridge, MIT Project Athena + * 16-Jun-87 + */ + +#include "config.h" + +#include <xcb/xcb.h> +#include <xcb/xproto.h> +#ifdef USE_XCB_ICCCM +# include <xcb/xcb_icccm.h> +#endif +#include <xcb/shape.h> + +#include <stdio.h> +#include <stdlib.h> +#include <unistd.h> +#include <string.h> +#include <locale.h> +#ifndef _MSC_VER +#include <langinfo.h> +#endif +#ifdef HAVE_ICONV +# include <iconv.h> +#endif +#include <ctype.h> +#include <errno.h> + +#ifndef HAVE_STRNLEN +#include "strnlen.h" +#endif + +/* Include routines to handle parsing defaults */ +#include "dsimple.h" + +typedef struct { + long code; + const char *name; +} binding; + +#ifndef USE_XCB_ICCCM +/* Once xcb-icccm's API is stable, this should be replaced by + xcb_size_hints_t & xcb_size_hints_flags_t */ +typedef struct { + /** User specified flags */ + uint32_t flags; + /** User-specified position */ + int32_t x, y; + /** User-specified size */ + int32_t width, height; + /** Program-specified minimum size */ + int32_t min_width, min_height; + /** Program-specified maximum size */ + int32_t max_width, max_height; + /** Program-specified resize increments */ + int32_t width_inc, height_inc; + /** Program-specified minimum aspect ratios */ + int32_t min_aspect_num, min_aspect_den; + /** Program-specified maximum aspect ratios */ + int32_t max_aspect_num, max_aspect_den; + /** Program-specified base size */ + int32_t base_width, base_height; + /** Program-specified window gravity */ + uint32_t win_gravity; +} wm_size_hints_t; + +# define xcb_size_hints_t wm_size_hints_t + +typedef struct { + /** Marks which fields in this structure are defined */ + int32_t flags; + /** Does this application rely on the window manager to get keyboard + input? */ + uint32_t input; + /** See below */ + int32_t initial_state; + /** Pixmap to be used as icon */ + xcb_pixmap_t icon_pixmap; + /** Window to be used as icon */ + xcb_window_t icon_window; + /** Initial position of icon */ + int32_t icon_x, icon_y; + /** Icon mask bitmap */ + xcb_pixmap_t icon_mask; + /* Identifier of related window group */ + xcb_window_t window_group; +} wm_hints_t; + +#define xcb_icccm_wm_hints_t wm_hints_t + +enum { + /* xcb_size_hints_flags_t */ + XCB_ICCCM_SIZE_HINT_US_POSITION = 1 << 0, + XCB_ICCCM_SIZE_HINT_US_SIZE = 1 << 1, + XCB_ICCCM_SIZE_HINT_P_POSITION = 1 << 2, + XCB_ICCCM_SIZE_HINT_P_SIZE = 1 << 3, + XCB_ICCCM_SIZE_HINT_P_MIN_SIZE = 1 << 4, + XCB_ICCCM_SIZE_HINT_P_MAX_SIZE = 1 << 5, + XCB_ICCCM_SIZE_HINT_P_RESIZE_INC = 1 << 6, + XCB_ICCCM_SIZE_HINT_P_ASPECT = 1 << 7, + XCB_ICCCM_SIZE_HINT_BASE_SIZE = 1 << 8, + XCB_ICCCM_SIZE_HINT_P_WIN_GRAVITY = 1 << 9, + /* xcb_wm_state_t */ + XCB_ICCCM_WM_STATE_WITHDRAWN = 0, + XCB_ICCCM_WM_STATE_NORMAL = 1, + XCB_ICCCM_WM_STATE_ICONIC = 3, + /* xcb_wm_t */ + XCB_ICCCM_WM_HINT_INPUT = (1L << 0), + XCB_ICCCM_WM_HINT_STATE = (1L << 1), + XCB_ICCCM_WM_HINT_ICON_PIXMAP = (1L << 2), + XCB_ICCCM_WM_HINT_ICON_WINDOW = (1L << 3), + XCB_ICCCM_WM_HINT_ICON_POSITION = (1L << 4), + XCB_ICCCM_WM_HINT_ICON_MASK = (1L << 5), + XCB_ICCCM_WM_HINT_WINDOW_GROUP = (1L << 6), + XCB_ICCCM_WM_HINT_X_URGENCY = (1L << 8) +}; + +/* Once xcb-icccm's API is stable, these should be replaced by calls to it */ +# define GET_TEXT_PROPERTY(Dpy, Win, Atom) \ + xcb_get_property (Dpy, False, Win, Atom, XCB_GET_PROPERTY_TYPE_ANY, 0, BUFSIZ) +# define xcb_icccm_get_wm_name(Dpy, Win) \ + GET_TEXT_PROPERTY(Dpy, Win, XCB_ATOM_WM_NAME) + +# define xcb_icccm_get_wm_class(Dpy, Win) \ + xcb_get_property (Dpy, False, Win, XCB_ATOM_WM_CLASS, XCB_ATOM_STRING, 0, BUFSIZ) +# define xcb_icccm_get_wm_hints(Dpy, Win) \ + xcb_get_property(Dpy, False, Win, XCB_ATOM_WM_HINTS, XCB_ATOM_WM_HINTS, 0, 9) + +# define xcb_icccm_get_wm_size_hints(Dpy, Win, Atom) \ + xcb_get_property (Dpy, False, Win, Atom, XCB_ATOM_WM_SIZE_HINTS, 0, 18) +# define xcb_icccm_get_wm_normal_hints(Dpy, Win) \ + xcb_icccm_get_wm_size_hints(Dpy, Win, XCB_ATOM_WM_NORMAL_HINTS) +#endif + +/* Possibly in xcb-emwh in the future? */ +static xcb_atom_t atom_net_wm_name, atom_utf8_string; +static xcb_atom_t atom_net_wm_desktop, atom_net_wm_window_type, + atom_net_wm_state, atom_net_wm_pid, atom_net_frame_extents; +static xcb_get_property_cookie_t get_net_wm_name (xcb_connection_t *, + xcb_window_t); + +/* Information we keep track of for each window to allow prefetching/reusing */ +struct wininfo { + xcb_window_t window; + + /* cookies for requests we've sent */ + xcb_get_geometry_cookie_t geometry_cookie; + xcb_get_property_cookie_t net_wm_name_cookie; + xcb_get_property_cookie_t wm_name_cookie; + xcb_get_property_cookie_t wm_class_cookie; + xcb_translate_coordinates_cookie_t trans_coords_cookie; + xcb_query_tree_cookie_t tree_cookie; + xcb_get_window_attributes_cookie_t attr_cookie; + xcb_get_property_cookie_t normal_hints_cookie; + xcb_get_property_cookie_t hints_cookie; + xcb_get_property_cookie_t wm_desktop_cookie; + xcb_get_property_cookie_t wm_window_type_cookie; + xcb_get_property_cookie_t wm_state_cookie; + xcb_get_property_cookie_t wm_pid_cookie; + xcb_get_property_cookie_t wm_client_machine_cookie; + xcb_get_property_cookie_t frame_extents_cookie; + xcb_get_property_cookie_t zoom_cookie; + + /* cached results from previous requests */ + xcb_get_geometry_reply_t * geometry; + xcb_get_window_attributes_reply_t * win_attributes; + xcb_size_hints_t * normal_hints; +}; + +static void scale_init (xcb_screen_t *scrn); +static char *nscale (int, int, int, char *, size_t); +static char *xscale (int); +static char *yscale (int); +static char *bscale (int); +int main (int, char **); +static const char *LookupL (long, const binding *); +static const char *Lookup (int, const binding *); +static void Display_Window_Id (struct wininfo *, Bool); +static void Display_Stats_Info (struct wininfo *); +static void Display_Bits_Info (struct wininfo *); +static void Display_Event_Mask (long); +static void Display_Events_Info (struct wininfo *); +static void Display_Tree_Info (struct wininfo *, int); +static void display_tree_info_1 (struct wininfo *, int, int); +static void Display_Hints (xcb_size_hints_t *); +static void Display_Size_Hints (struct wininfo *); +static void Display_Window_Shape (xcb_window_t); +static void Display_WM_Info (struct wininfo *); +static void wininfo_wipe (struct wininfo *); + +static const char *window_id_format = "0x%lx"; + +#ifdef HAVE_ICONV +static iconv_t iconv_from_utf8; +#endif +static const char *user_encoding; +static void print_utf8 (const char *, char *, size_t, const char *); +static void print_friendly_name (const char *, const char *, const char *); + +static xcb_connection_t *dpy; +static xcb_screen_t *screen; +static xcb_generic_error_t *err; + +#ifndef HAVE_STRLCAT +static size_t strlcat (char *dst, const char *src, size_t dstsize) +{ + size_t sd = strlen (dst); + size_t ss = strlen (src); + size_t s = sd + ss; + + if (s < dstsize) { + strcpy (dst + sd, src); + } else { + strncpy (dst + sd, src, dstsize-sd-1); + dst[dstsize] = '\0'; + } + return s; +} +#endif + +/* + * Report the syntax for calling xwininfo: + */ +static void +usage (void) +{ + fprintf (stderr, + "usage: %s [-options ...]\n\n" + "where options include:\n" + " -help print this message\n" + " -display host:dpy X server to contact\n" + " -root use the root window\n" + " -id windowid use the window with the specified id\n" + " -name windowname use the window with the specified name\n" + " -int print window id in decimal\n" + " -children print parent and child identifiers\n" + " -tree print children identifiers recursively\n" + " -stats print window geometry [DEFAULT]\n" + " -bits print window pixel information\n" + " -events print events selected for on window\n" + " -size print size hints\n" + " -wm print window manager hints\n" + " -shape print shape extents\n" + " -frame don't ignore window manager frames\n" + " -english print sizes in english units\n" + " -metric print sizes in metric units\n" + " -all -tree, -stats, -bits, -events, -wm, -size, -shape\n" + "\n", + program_name); + exit (1); +} + +/* + * pixel to inch, metric converter. + * Hacked in by Mark W. Eichin <eichin@athena> [eichin:19880619.1509EST] + * + * Simply put: replace the old numbers with string print calls. + * Returning a local string is ok, since we only ever get called to + * print one x and one y, so as long as they don't collide, they're + * fine. This is not meant to be a general purpose routine. + * + */ + +static int xp = 0, xmm = 0; +static int yp = 0, ymm = 0; +static int bp = 0, bmm = 0; +static int english = 0, metric = 0; + +static void +scale_init (xcb_screen_t *screen) +{ + xp = screen->width_in_pixels; + yp = screen->height_in_pixels; + xmm = screen->width_in_millimeters; + ymm = screen->height_in_millimeters; + bp = xp + yp; + bmm = xmm + ymm; +} + +#define MILE (5280*12) +#define YARD (3*12) +#define FOOT (12) + +static char * +nscale (int n, int np, int nmm, char *nbuf, size_t nbufsize) +{ + int s; + snprintf (nbuf, nbufsize, "%d", n); + + if (metric||english) { + s = strlcat (nbuf, " (", nbufsize); + + if (metric) { + snprintf (nbuf+s, nbufsize-s, "%.2f mm%s", + ((double) n) * nmm/np , english ? "; " : ""); + } + if (english) { + double inch_frac; + Bool printed_anything = False; + int mi, yar, ft, inr; + + inch_frac = ((double) n)*(nmm/25.4)/np; + inr = (int)inch_frac; + inch_frac -= (double)inr; + if (inr >= MILE) { + mi = inr/MILE; + inr %= MILE; + s = strlen (nbuf); + snprintf (nbuf+s, nbufsize-s, "%d %s(?!?)", + mi, (mi == 1) ? "mile" : "miles"); + printed_anything = True; + } + if (inr >= YARD) { + yar = inr/YARD; + inr %= YARD; + if (printed_anything) + strlcat (nbuf, ", ", nbufsize); + s = strlen (nbuf); + snprintf (nbuf+s, nbufsize-s, "%d %s", + yar, (yar==1) ? "yard" : "yards"); + printed_anything = True; + } + if (inr >= FOOT) { + ft = inr/FOOT; + inr %= FOOT; + if (printed_anything) + strlcat (nbuf, ", ", nbufsize); + s = strlen (nbuf); + snprintf (nbuf+s, nbufsize-s, "%d %s", + ft, (ft==1) ? "foot" : "feet"); + printed_anything = True; + } + if (!printed_anything || inch_frac != 0.0 || inr != 0) { + if (printed_anything) + strlcat (nbuf, ", ", nbufsize); + s = strlen (nbuf); + snprintf (nbuf+s, nbufsize-s, "%.2f inches", inr+inch_frac); + } + } + strlcat (nbuf, ")", nbufsize); + } + return (nbuf); +} + +static char xbuf[BUFSIZ]; +static char * +xscale (int x) +{ + return (nscale (x, xp, xmm, xbuf, sizeof(xbuf))); +} + +static char ybuf[BUFSIZ]; +static char * +yscale (int y) +{ + return (nscale (y, yp, ymm, ybuf, sizeof(ybuf))); +} + +static char bbuf[BUFSIZ]; +static char * +bscale (int b) +{ + return (nscale (b, bp, bmm, bbuf, sizeof(bbuf))); +} + +/* end of pixel to inch, metric converter */ + +int +main (int argc, char **argv) +{ + register int i; + int tree = 0, stats = 0, bits = 0, events = 0, wm = 0, size = 0, shape = 0; + int frame = 0, children = 0; + int pauseatend = 0; + int use_root = 0; + xcb_window_t window = 0; + char *display_name = NULL; + const char *window_name = NULL; + struct wininfo wininfo; + struct wininfo *w = &wininfo; + + program_name = argv[0]; + + if (!setlocale (LC_ALL, "")) + fprintf (stderr, "%s: can not set locale properly\n", program_name); +#ifndef _MSC_VER + user_encoding = nl_langinfo (CODESET); +#endif + if (user_encoding == NULL) + user_encoding = "unknown encoding"; + + memset (w, 0, sizeof(struct wininfo)); + + /* Handle our command line arguments */ + for (i = 1; i < argc; i++) { + if (!strcmp (argv[i], "-help")) + usage (); + if (!strcmp (argv[i], "-display") || !strcmp (argv[i], "-d")) { + if (++i >= argc) + Fatal_Error("-display requires argument"); + display_name = argv[i]; + continue; + } + if (!strcmp (argv[i], "-root")) { + use_root = 1; + continue; + } + if (!strcmp (argv[i], "-id")) { + if (++i >= argc) + Fatal_Error("-id requires argument"); + window = strtoul(argv[i], NULL, 0); + continue; + } + if (!strcmp (argv[i], "-name")) { + if (++i >= argc) + Fatal_Error("-name requires argument"); + window_name = argv[i]; + continue; + } + if (!strcmp (argv[i], "-int")) { + window_id_format = "%ld"; + continue; + } + if (!strcmp (argv[i], "-children")) { + children = 1; + continue; + } + if (!strcmp (argv[i], "-tree")) { + tree = 1; + continue; + } + if (!strcmp (argv[i], "-stats")) { + stats = 1; + continue; + } + if (!strcmp (argv[i], "-bits")) { + bits = 1; + continue; + } + if (!strcmp (argv[i], "-events")) { + events = 1; + continue; + } + if (!strcmp (argv[i], "-wm")) { + wm = 1; + continue; + } + if (!strcmp (argv[i], "-frame")) { + frame = 1; + continue; + } + if (!strcmp (argv[i], "-size")) { + size = 1; + continue; + } + if (!strcmp (argv[i], "-shape")) { + shape = 1; + continue; + } + if (!strcmp (argv[i], "-english")) { + english = 1; + continue; + } + if (!strcmp (argv[i], "-metric")) { + metric = 1; + continue; + } + if (!strcmp (argv[i], "-all")) { + tree = stats = bits = events = wm = size = shape = 1; + continue; + } + if (!strcmp(argv[i], "-pause")) { + pauseatend = 1; + continue; + } + usage (); + } + + Setup_Display_And_Screen (display_name, &dpy, &screen); + + /* preload atoms we may need later */ + Intern_Atom (dpy, "_NET_WM_NAME"); + Intern_Atom (dpy, "UTF8_STRING"); + if (wm) { + Intern_Atom (dpy, "_NET_WM_DESKTOP"); + Intern_Atom (dpy, "_NET_WM_WINDOW_TYPE"); + Intern_Atom (dpy, "_NET_WM_STATE"); + Intern_Atom (dpy, "_NET_WM_PID"); + Intern_Atom (dpy, "_NET_FRAME_EXTENTS"); + } + /* initialize scaling data */ + scale_init(screen); + + if (use_root) + window = screen->root; + else if (window_name) { + window = Window_With_Name (dpy, screen->root, window_name); + if (!window) + Fatal_Error ("No window with name \"%s\" exists!", window_name); + } + + /* If no window selected on command line, let user pick one the hard way */ + if (!window) { + printf ("\n" + "xwininfo: Please select the window about which you\n" + " would like information by clicking the\n" + " mouse in that window.\n"); + Intern_Atom (dpy, "_NET_VIRTUAL_ROOTS"); + Intern_Atom (dpy, "WM_STATE"); + window = Select_Window (dpy, screen, !frame); + } + + /* + * Do the actual displaying as per parameters + */ + if (!(children || tree || bits || events || wm || size)) + stats = 1; + + /* + * make sure that the window is valid + */ + { + xcb_get_geometry_cookie_t gg_cookie = + xcb_get_geometry (dpy, window); + + w->geometry = xcb_get_geometry_reply(dpy, gg_cookie, &err); + + if (!w->geometry) { + char badid[20]; + + if (err) + Print_X_Error (dpy, err); + + snprintf (badid, sizeof(badid), window_id_format, window); + Fatal_Error ("No such window with id %s.", badid); + } + } + + /* Send requests to prefetch data we'll need */ + w->window = window; + w->net_wm_name_cookie = get_net_wm_name (dpy, window); + w->wm_name_cookie = xcb_icccm_get_wm_name (dpy, window); + if (children || tree) + w->tree_cookie = xcb_query_tree (dpy, window); + if (stats) { + w->trans_coords_cookie = + xcb_translate_coordinates (dpy, window, w->geometry->root, + -(w->geometry->border_width), + -(w->geometry->border_width)); + } + if (stats || bits || events) + w->attr_cookie = xcb_get_window_attributes (dpy, window); + if (stats || size) + w->normal_hints_cookie = xcb_icccm_get_wm_normal_hints (dpy, window); + if (wm) { + w->hints_cookie = xcb_icccm_get_wm_hints(dpy, window); + + atom_net_wm_desktop = Get_Atom (dpy, "_NET_WM_DESKTOP"); + if (atom_net_wm_desktop) { + w->wm_desktop_cookie = xcb_get_property + (dpy, False, window, atom_net_wm_desktop, + XCB_ATOM_CARDINAL, 0, 4); + } + + atom_net_wm_window_type = Get_Atom (dpy, "_NET_WM_WINDOW_TYPE"); + if (atom_net_wm_window_type) { + w->wm_window_type_cookie = xcb_get_property + (dpy, False, window, atom_net_wm_window_type, + XCB_ATOM_ATOM, 0, BUFSIZ); + } + + atom_net_wm_state = Get_Atom (dpy, "_NET_WM_STATE"); + if (atom_net_wm_state) { + w->wm_state_cookie = xcb_get_property + (dpy, False, window, atom_net_wm_state, + XCB_ATOM_ATOM, 0, BUFSIZ); + } + + atom_net_wm_pid = Get_Atom (dpy, "_NET_WM_PID"); + if (atom_net_wm_pid) { + w->wm_pid_cookie = xcb_get_property + (dpy, False, window, atom_net_wm_pid, + XCB_ATOM_CARDINAL, 0, BUFSIZ); + w->wm_client_machine_cookie = xcb_get_property + (dpy, False, window, XCB_ATOM_WM_CLIENT_MACHINE, + XCB_GET_PROPERTY_TYPE_ANY, 0, BUFSIZ); + } + + atom_net_frame_extents = Get_Atom (dpy, "_NET_FRAME_EXTENTS"); + if (atom_net_frame_extents) { + w->frame_extents_cookie = xcb_get_property + (dpy, False, window, atom_net_frame_extents, + XCB_ATOM_CARDINAL, 0, 4 * 4); + } + } + if (size) + w->zoom_cookie = xcb_icccm_get_wm_size_hints (dpy, window, + XCB_ATOM_WM_ZOOM_HINTS); + xcb_flush (dpy); + + printf ("\nxwininfo: Window id: "); + Display_Window_Id (w, True); + if (children || tree) + Display_Tree_Info (w, tree); + if (stats) + Display_Stats_Info (w); + if (bits) + Display_Bits_Info (w); + if (events) + Display_Events_Info (w); + if (wm) + Display_WM_Info (w); + if (size) + Display_Size_Hints (w); + if (shape) + Display_Window_Shape (window); + printf ("\n"); + if (pauseatend) getchar(); + + wininfo_wipe (w); + xcb_disconnect (dpy); +#ifdef HAVE_ICONV + if (iconv_from_utf8 && (iconv_from_utf8 != (iconv_t) -1)) { + iconv_close (iconv_from_utf8); + } +#endif + exit (0); +} + +/* Ensure win_attributes field is filled in */ +static xcb_get_window_attributes_reply_t * +fetch_win_attributes (struct wininfo *w) +{ + if (!w->win_attributes) { + w->win_attributes = + xcb_get_window_attributes_reply (dpy, w->attr_cookie, &err); + + if (!w->win_attributes) { + Print_X_Error (dpy, err); + Fatal_Error ("Can't get window attributes."); + } + } + return w->win_attributes; +} + +#ifndef USE_XCB_ICCCM +static Bool +wm_size_hints_reply (xcb_connection_t *dpy, xcb_get_property_cookie_t cookie, + wm_size_hints_t *hints_return, xcb_generic_error_t **err) +{ + xcb_get_property_reply_t *prop = xcb_get_property_reply (dpy, cookie, err); + int length; + + if (!prop || (prop->type != XCB_ATOM_WM_SIZE_HINTS) || + (prop->format != 32)) { + free (prop); + return False; + } + + memset (hints_return, 0, sizeof(wm_size_hints_t)); + + length = xcb_get_property_value_length(prop); + if (length > sizeof(wm_size_hints_t)) + length = sizeof(wm_size_hints_t); + memcpy (hints_return, xcb_get_property_value (prop), length); + + free (prop); + return True; +} + +#define xcb_icccm_get_wm_normal_hints_reply wm_size_hints_reply +#define xcb_icccm_get_wm_size_hints_reply wm_size_hints_reply +#endif + + + +/* Ensure normal_hints field is filled in */ +static xcb_size_hints_t * +fetch_normal_hints (struct wininfo *w, xcb_size_hints_t *hints_return) +{ + xcb_size_hints_t hints; + + if (!w->normal_hints) { + if (xcb_icccm_get_wm_normal_hints_reply (dpy, w->normal_hints_cookie, + &hints, NULL)) { + w->normal_hints = malloc (sizeof(xcb_size_hints_t)); + if (w->normal_hints) + memcpy(w->normal_hints, &hints, sizeof(xcb_size_hints_t)); + } + } + if (hints_return && w->normal_hints) + memcpy(hints_return, w->normal_hints, sizeof(xcb_size_hints_t)); + return w->normal_hints; +} + + +/* + * Lookup: lookup a code in a table. + */ +static char _lookup_buffer[100]; + +static const char * +LookupL (long code, const binding *table) +{ + const char *name = NULL; + + while (table->name) { + if (table->code == code) { + name = table->name; + break; + } + table++; + } + + if (name == NULL) { + snprintf (_lookup_buffer, sizeof(_lookup_buffer), + "unknown (code = %ld. = 0x%lx)", code, code); + name = _lookup_buffer; + } + + return (name); +} + +static const char * +Lookup (int code, const binding *table) +{ + return LookupL ((long)code, table); +} + +/* + * Routine to display a window id in dec/hex with name if window has one + * + * Requires wininfo members initialized: window, wm_name_cookie + */ + +static void +Display_Window_Id (struct wininfo *w, Bool newline_wanted) +{ +#ifdef USE_XCB_ICCCM + xcb_icccm_get_text_property_reply_t wmn_reply; + uint8_t got_reply = False; +#endif + xcb_get_property_reply_t *prop; + const char *wm_name = NULL; + unsigned int wm_name_len = 0; + xcb_atom_t wm_name_encoding = XCB_NONE; + + printf (window_id_format, w->window); /* print id # in hex/dec */ + + if (!w->window) { + printf (" (none)"); + } else { + if (w->window == screen->root) { + printf (" (the root window)"); + } + /* Get window name if any */ + prop = xcb_get_property_reply (dpy, w->net_wm_name_cookie, NULL); + if (prop && (prop->type != XCB_NONE)) { + wm_name = xcb_get_property_value (prop); + wm_name_len = xcb_get_property_value_length (prop); + wm_name_encoding = prop->type; + } else { /* No _NET_WM_NAME, check WM_NAME */ +#ifdef USE_XCB_ICCCM + got_reply = xcb_icccm_get_wm_name_reply (dpy, w->wm_name_cookie, + &wmn_reply, NULL); + if (got_reply) { + wm_name = wmn_reply.name; + wm_name_len = wmn_reply.name_len; + wm_name_encoding = wmn_reply.encoding; + } +#else + prop = xcb_get_property_reply (dpy, w->wm_name_cookie, NULL); + if (prop && (prop->type != XCB_NONE)) { + wm_name = xcb_get_property_value (prop); + wm_name_len = xcb_get_property_value_length (prop); + wm_name_encoding = prop->type; + } +#endif + } + if (wm_name_len == 0) { + printf (" (has no name)"); + } else { + if (wm_name_encoding == XCB_ATOM_STRING) { + printf (" \"%.*s\"", wm_name_len, wm_name); + } else if (wm_name_encoding == atom_utf8_string) { + print_utf8 (" \"", (char *) wm_name, wm_name_len, "\""); + } else { + /* Encodings we don't support, including COMPOUND_TEXT */ + const char *enc_name = Get_Atom_Name (dpy, wm_name_encoding); + if (enc_name) { + printf (" (name in unsupported encoding %s)", enc_name); + } else { + printf (" (name in unsupported encoding ATOM 0x%x)", + wm_name_encoding); + } + } + } +#ifdef USE_XCB_ICCCM + if (got_reply) + xcb_icccm_get_text_property_reply_wipe (&wmn_reply); +#else + free (prop); +#endif + } + + if (newline_wanted) + printf ("\n"); + + return; +} + + +/* + * Display Stats on window + */ +static const binding _window_classes[] = { + { XCB_WINDOW_CLASS_INPUT_OUTPUT, "InputOutput" }, + { XCB_WINDOW_CLASS_INPUT_ONLY, "InputOnly" }, + { 0, NULL } }; + +static const binding _map_states[] = { + { XCB_MAP_STATE_UNMAPPED, "IsUnMapped" }, + { XCB_MAP_STATE_UNVIEWABLE, "IsUnviewable" }, + { XCB_MAP_STATE_VIEWABLE, "IsViewable" }, + { 0, NULL } }; + +static const binding _backing_store_states[] = { + { XCB_BACKING_STORE_NOT_USEFUL, "NotUseful" }, + { XCB_BACKING_STORE_WHEN_MAPPED,"WhenMapped" }, + { XCB_BACKING_STORE_ALWAYS, "Always" }, + { 0, NULL } }; + +static const binding _bit_gravity_states[] = { + { XCB_GRAVITY_BIT_FORGET, "ForgetGravity" }, + { XCB_GRAVITY_NORTH_WEST, "NorthWestGravity" }, + { XCB_GRAVITY_NORTH, "NorthGravity" }, + { XCB_GRAVITY_NORTH_EAST, "NorthEastGravity" }, + { XCB_GRAVITY_WEST, "WestGravity" }, + { XCB_GRAVITY_CENTER, "CenterGravity" }, + { XCB_GRAVITY_EAST, "EastGravity" }, + { XCB_GRAVITY_SOUTH_WEST, "SouthWestGravity" }, + { XCB_GRAVITY_SOUTH, "SouthGravity" }, + { XCB_GRAVITY_SOUTH_EAST, "SouthEastGravity" }, + { XCB_GRAVITY_STATIC, "StaticGravity" }, + { 0, NULL }}; + +static const binding _window_gravity_states[] = { + { XCB_GRAVITY_WIN_UNMAP, "UnmapGravity" }, + { XCB_GRAVITY_NORTH_WEST, "NorthWestGravity" }, + { XCB_GRAVITY_NORTH, "NorthGravity" }, + { XCB_GRAVITY_NORTH_EAST, "NorthEastGravity" }, + { XCB_GRAVITY_WEST, "WestGravity" }, + { XCB_GRAVITY_CENTER, "CenterGravity" }, + { XCB_GRAVITY_EAST, "EastGravity" }, + { XCB_GRAVITY_SOUTH_WEST, "SouthWestGravity" }, + { XCB_GRAVITY_SOUTH, "SouthGravity" }, + { XCB_GRAVITY_SOUTH_EAST, "SouthEastGravity" }, + { XCB_GRAVITY_STATIC, "StaticGravity" }, + { 0, NULL }}; + +static const binding _visual_classes[] = { + { XCB_VISUAL_CLASS_STATIC_GRAY, "StaticGray" }, + { XCB_VISUAL_CLASS_GRAY_SCALE, "GrayScale" }, + { XCB_VISUAL_CLASS_STATIC_COLOR,"StaticColor" }, + { XCB_VISUAL_CLASS_PSEUDO_COLOR,"PseudoColor" }, + { XCB_VISUAL_CLASS_TRUE_COLOR, "TrueColor" }, + { XCB_VISUAL_CLASS_DIRECT_COLOR,"DirectColor" }, + { 0, NULL }}; + +/* + * Requires wininfo members initialized: + * window, geometry, attr_cookie, trans_coords_cookie, normal_hints_cookie + */ +static void +Display_Stats_Info (struct wininfo *w) +{ + xcb_translate_coordinates_reply_t *trans_coords; + xcb_get_window_attributes_reply_t *win_attributes; + xcb_size_hints_t hints; + + int dw = screen->width_in_pixels, dh = screen->height_in_pixels; + int rx, ry, xright, ybelow; + int showright = 0, showbelow = 0; + xcb_window_t wmframe, parent; + + trans_coords = + xcb_translate_coordinates_reply (dpy, w->trans_coords_cookie, NULL); + if (!trans_coords) + Fatal_Error ("Can't get translated coordinates."); + + rx = (int16_t)trans_coords->dst_x; + ry = (int16_t)trans_coords->dst_y; + free (trans_coords); + + xright = (dw - rx - w->geometry->border_width * 2 - + w->geometry->width); + ybelow = (dh - ry - w->geometry->border_width * 2 - + w->geometry->height); + + + printf ("\n"); + printf (" Absolute upper-left X: %s\n", xscale (rx)); + printf (" Absolute upper-left Y: %s\n", yscale (ry)); + printf (" Relative upper-left X: %s\n", xscale (w->geometry->x)); + printf (" Relative upper-left Y: %s\n", yscale (w->geometry->y)); + printf (" Width: %s\n", xscale (w->geometry->width)); + printf (" Height: %s\n", yscale (w->geometry->height)); + printf (" Depth: %d\n", w->geometry->depth); + + win_attributes = fetch_win_attributes (w); + + printf (" Visual: 0x%lx\n", (unsigned long) win_attributes->visual); + if (screen) + { + xcb_depth_iterator_t depth_iter; + xcb_visualtype_t *visual_type = NULL; + + depth_iter = xcb_screen_allowed_depths_iterator (screen); + for (; depth_iter.rem; xcb_depth_next (&depth_iter)) { + xcb_visualtype_iterator_t visual_iter; + + visual_iter = xcb_depth_visuals_iterator (depth_iter.data); + for (; visual_iter.rem; xcb_visualtype_next (&visual_iter)) { + if (screen->root_visual == visual_iter.data->visual_id) { + visual_type = visual_iter.data; + break; + } + } + } + if (visual_type) + printf (" Visual Class: %s\n", Lookup (visual_type->_class, + _visual_classes)); + } + + printf (" Border width: %s\n", bscale (w->geometry->border_width)); + printf (" Class: %s\n", + Lookup (win_attributes->_class, _window_classes)); + printf (" Colormap: 0x%lx (%sinstalled)\n", + (unsigned long) win_attributes->colormap, + win_attributes->map_is_installed ? "" : "not "); + printf (" Bit Gravity State: %s\n", + Lookup (win_attributes->bit_gravity, _bit_gravity_states)); + printf (" Window Gravity State: %s\n", + Lookup (win_attributes->win_gravity, _window_gravity_states)); + printf (" Backing Store State: %s\n", + Lookup (win_attributes->backing_store, _backing_store_states)); + printf (" Save Under State: %s\n", + win_attributes->save_under ? "yes" : "no"); + printf (" Map State: %s\n", + Lookup (win_attributes->map_state, _map_states)); + printf (" Override Redirect State: %s\n", + win_attributes->override_redirect ? "yes" : "no"); + printf (" Corners: +%d+%d -%d+%d -%d-%d +%d-%d\n", + rx, ry, xright, ry, xright, ybelow, rx, ybelow); + + /* + * compute geometry string that would recreate window + */ + printf (" -geometry "); + + /* compute size in appropriate units */ + if (!fetch_normal_hints (w, &hints)) + hints.flags = 0; + + if ((hints.flags & XCB_ICCCM_SIZE_HINT_P_RESIZE_INC) && + (hints.width_inc != 0) && (hints.height_inc != 0)) { + if (hints.flags & + (XCB_ICCCM_SIZE_HINT_BASE_SIZE|XCB_ICCCM_SIZE_HINT_P_MIN_SIZE)) { + if (hints.flags & XCB_ICCCM_SIZE_HINT_BASE_SIZE) { + w->geometry->width -= hints.base_width; + w->geometry->height -= hints.base_height; + } else { + /* ICCCM says MinSize is default for BaseSize */ + w->geometry->width -= hints.min_width; + w->geometry->height -= hints.min_height; + } + } + printf ("%dx%d", w->geometry->width/hints.width_inc, + w->geometry->height/hints.height_inc); + } else + printf ("%dx%d", w->geometry->width, w->geometry->height); + + if (!(hints.flags & XCB_ICCCM_SIZE_HINT_P_WIN_GRAVITY)) + hints.win_gravity = XCB_GRAVITY_NORTH_WEST; /* per ICCCM */ + /* find our window manager frame, if any */ + for (wmframe = parent = w->window; parent != 0 ; wmframe = parent) { + xcb_query_tree_cookie_t qt_cookie; + xcb_query_tree_reply_t *tree; + + qt_cookie = xcb_query_tree (dpy, wmframe); + tree = xcb_query_tree_reply (dpy, qt_cookie, &err); + if (!tree) { + Print_X_Error (dpy, err); + Fatal_Error ("Can't query window tree."); + } + parent = tree->parent; + free (tree); + if (parent == w->geometry->root || !parent) + break; + } + if (wmframe != w->window) { + /* WM reparented, so find edges of the frame */ + /* Only works for ICCCM-compliant WMs, and then only if the + window has corner gravity. We would need to know the original width + of the window to correctly handle the other gravities. */ + xcb_get_geometry_cookie_t geom_cookie; + xcb_get_geometry_reply_t *frame_geometry; + + geom_cookie = xcb_get_geometry (dpy, wmframe); + frame_geometry = xcb_get_geometry_reply (dpy, geom_cookie, &err); + + if (!frame_geometry) { + Print_X_Error (dpy, err); + Fatal_Error ("Can't get frame geometry."); + } + switch (hints.win_gravity) { + case XCB_GRAVITY_NORTH_WEST: case XCB_GRAVITY_SOUTH_WEST: + case XCB_GRAVITY_NORTH_EAST: case XCB_GRAVITY_SOUTH_EAST: + case XCB_GRAVITY_WEST: + rx = frame_geometry->x; + } + switch (hints.win_gravity) { + case XCB_GRAVITY_NORTH_WEST: case XCB_GRAVITY_SOUTH_WEST: + case XCB_GRAVITY_NORTH_EAST: case XCB_GRAVITY_SOUTH_EAST: + case XCB_GRAVITY_EAST: + xright = dw - frame_geometry->x - frame_geometry->width - + (2 * frame_geometry->border_width); + } + switch (hints.win_gravity) { + case XCB_GRAVITY_NORTH_WEST: case XCB_GRAVITY_SOUTH_WEST: + case XCB_GRAVITY_NORTH_EAST: case XCB_GRAVITY_SOUTH_EAST: + case XCB_GRAVITY_NORTH: + ry = frame_geometry->y; + } + switch (hints.win_gravity) { + case XCB_GRAVITY_NORTH_WEST: case XCB_GRAVITY_SOUTH_WEST: + case XCB_GRAVITY_NORTH_EAST: case XCB_GRAVITY_SOUTH_EAST: + case XCB_GRAVITY_SOUTH: + ybelow = dh - frame_geometry->y - frame_geometry->height - + (2 * frame_geometry->border_width); + } + free (frame_geometry); + } + /* If edge gravity, offer a corner on that edge (because the application + programmer cares about that edge), otherwise offer upper left unless + some other corner is close to an edge of the screen. + (For corner gravity, assume gravity was set by XWMGeometry. + For CenterGravity, it doesn't matter.) */ + if (hints.win_gravity == XCB_GRAVITY_EAST || + (abs (xright) <= 100 && abs (xright) < abs (rx) + && hints.win_gravity != XCB_GRAVITY_WEST)) + showright = 1; + if (hints.win_gravity == XCB_GRAVITY_SOUTH || + (abs (ybelow) <= 100 && abs (ybelow) < abs (ry) + && hints.win_gravity != XCB_GRAVITY_NORTH)) + showbelow = 1; + + if (showright) + printf ("-%d", xright); + else + printf ("+%d", rx); + if (showbelow) + printf ("-%d", ybelow); + else + printf ("+%d", ry); + printf ("\n"); +} + + +/* + * Display bits info: + */ +static const binding _gravities[] = { + /* WARNING: the first two of these have the same value - see code */ + { XCB_GRAVITY_WIN_UNMAP, "UnMapGravity" }, + { XCB_GRAVITY_BIT_FORGET, "ForgetGravity" }, + { XCB_GRAVITY_NORTH_WEST, "NorthWestGravity" }, + { XCB_GRAVITY_NORTH, "NorthGravity" }, + { XCB_GRAVITY_NORTH_EAST, "NorthEastGravity" }, + { XCB_GRAVITY_WEST, "WestGravity" }, + { XCB_GRAVITY_CENTER, "CenterGravity" }, + { XCB_GRAVITY_EAST, "EastGravity" }, + { XCB_GRAVITY_SOUTH_WEST, "SouthWestGravity" }, + { XCB_GRAVITY_SOUTH, "SouthGravity" }, + { XCB_GRAVITY_SOUTH_EAST, "SouthEastGravity" }, + { XCB_GRAVITY_STATIC, "StaticGravity" }, + { 0, NULL } }; + +static const binding _backing_store_hint[] = { + { XCB_BACKING_STORE_NOT_USEFUL, "NotUseful" }, + { XCB_BACKING_STORE_WHEN_MAPPED,"WhenMapped" }, + { XCB_BACKING_STORE_ALWAYS, "Always" }, + { 0, NULL } }; + +static const binding _bool[] = { + { 0, "No" }, + { 1, "Yes" }, + { 0, NULL } }; + +/* + * Requires wininfo members initialized: + * window, attr_cookie (or win_attributes) + */ +static void +Display_Bits_Info (struct wininfo * w) +{ + xcb_get_window_attributes_reply_t *win_attributes + = fetch_win_attributes (w); + + printf ("\n"); + printf (" Bit gravity: %s\n", + Lookup (win_attributes->bit_gravity, _gravities+1)); + printf (" Window gravity: %s\n", + Lookup (win_attributes->win_gravity, _gravities)); + printf (" Backing-store hint: %s\n", + Lookup (win_attributes->backing_store, _backing_store_hint)); + printf (" Backing-planes to be preserved: 0x%lx\n", + (unsigned long) win_attributes->backing_planes); + printf (" Backing pixel: %ld\n", + (unsigned long) win_attributes->backing_pixel); + printf (" Save-unders: %s\n", + Lookup (win_attributes->save_under, _bool)); +} + + +/* + * Routine to display all events in an event mask + */ +static const binding _event_mask_names[] = { + { XCB_EVENT_MASK_KEY_PRESS, "KeyPress" }, + { XCB_EVENT_MASK_KEY_RELEASE, "KeyRelease" }, + { XCB_EVENT_MASK_BUTTON_PRESS, "ButtonPress" }, + { XCB_EVENT_MASK_BUTTON_RELEASE, "ButtonRelease" }, + { XCB_EVENT_MASK_ENTER_WINDOW, "EnterWindow" }, + { XCB_EVENT_MASK_LEAVE_WINDOW, "LeaveWindow" }, + { XCB_EVENT_MASK_POINTER_MOTION, "PointerMotion" }, + { XCB_EVENT_MASK_POINTER_MOTION_HINT, "PointerMotionHint" }, + { XCB_EVENT_MASK_BUTTON_1_MOTION, "Button1Motion" }, + { XCB_EVENT_MASK_BUTTON_2_MOTION, "Button2Motion" }, + { XCB_EVENT_MASK_BUTTON_3_MOTION, "Button3Motion" }, + { XCB_EVENT_MASK_BUTTON_4_MOTION, "Button4Motion" }, + { XCB_EVENT_MASK_BUTTON_5_MOTION, "Button5Motion" }, + { XCB_EVENT_MASK_BUTTON_MOTION, "ButtonMotion" }, + { XCB_EVENT_MASK_KEYMAP_STATE, "KeymapState" }, + { XCB_EVENT_MASK_EXPOSURE, "Exposure" }, + { XCB_EVENT_MASK_VISIBILITY_CHANGE, "VisibilityChange" }, + { XCB_EVENT_MASK_STRUCTURE_NOTIFY, "StructureNotify" }, + { XCB_EVENT_MASK_RESIZE_REDIRECT, "ResizeRedirect" }, + { XCB_EVENT_MASK_SUBSTRUCTURE_NOTIFY, "SubstructureNotify" }, + { XCB_EVENT_MASK_SUBSTRUCTURE_REDIRECT, "SubstructureRedirect" }, + { XCB_EVENT_MASK_FOCUS_CHANGE, "FocusChange" }, + { XCB_EVENT_MASK_PROPERTY_CHANGE, "PropertyChange" }, + { XCB_EVENT_MASK_COLOR_MAP_CHANGE, "ColormapChange" }, + { XCB_EVENT_MASK_OWNER_GRAB_BUTTON, "OwnerGrabButton" }, + { 0, NULL } }; + +static void +Display_Event_Mask (long mask) +{ + long bit, bit_mask; + + for (bit=0, bit_mask=1; bit < sizeof(long)*8; bit++, bit_mask <<= 1) + if (mask & bit_mask) + printf (" %s\n", + LookupL (bit_mask, _event_mask_names)); +} + + +/* + * Display info on events + * + * Requires wininfo members initialized: + * window, attr_cookie (or win_attributes) + */ +static void +Display_Events_Info (struct wininfo *w) +{ + xcb_get_window_attributes_reply_t *win_attributes + = fetch_win_attributes (w); + + printf ("\n"); + printf (" Someone wants these events:\n"); + Display_Event_Mask (win_attributes->all_event_masks); + + printf (" Do not propagate these events:\n"); + Display_Event_Mask (win_attributes->do_not_propagate_mask); + + printf (" Override redirection?: %s\n", + Lookup (win_attributes->override_redirect, _bool)); +} + + + /* left out visual stuff */ + /* left out colormap */ + /* left out map_installed */ + + +/* + * Display root, parent, and (recursively) children information + * recurse - true to show children information + * + * Requires wininfo members initialized: window, tree_cookie + */ +static void +Display_Tree_Info (struct wininfo *w, int recurse) +{ + display_tree_info_1 (w, recurse, 0); +} + +/* + * level - recursion level + */ +static void +display_tree_info_1 (struct wininfo *w, int recurse, int level) +{ + int i, j; + unsigned int num_children; + xcb_query_tree_reply_t *tree; + + tree = xcb_query_tree_reply (dpy, w->tree_cookie, &err); + if (!tree) { + Print_X_Error (dpy, err); + Fatal_Error ("Can't query window tree."); + } + + if (level == 0) { + struct wininfo rw, pw; + rw.window = tree->root; + rw.net_wm_name_cookie = get_net_wm_name (dpy, rw.window); + rw.wm_name_cookie = xcb_icccm_get_wm_name (dpy, rw.window); + pw.window = tree->parent; + pw.net_wm_name_cookie = get_net_wm_name (dpy, pw.window); + pw.wm_name_cookie = xcb_icccm_get_wm_name (dpy, pw.window); + xcb_flush (dpy); + + printf ("\n"); + printf (" Root window id: "); + Display_Window_Id (&rw, True); + printf (" Parent window id: "); + Display_Window_Id (&pw, True); + } + + num_children = xcb_query_tree_children_length (tree); + + if (level == 0 || num_children > 0) { + printf (" "); + for (j = 0; j < level; j++) printf (" "); + printf ("%d child%s%s\n", num_children, num_children == 1 ? "" : "ren", + num_children ? ":" : "."); + } + + if (num_children > 0) { + xcb_window_t *child_list = xcb_query_tree_children (tree); + struct wininfo *children + = calloc (num_children, sizeof(struct wininfo)); + + if (children == NULL) + Fatal_Error ("Failed to allocate memory in display_tree_info"); + + for (i = (int)num_children - 1; i >= 0; i--) { + struct wininfo *cw = &children[i]; + + cw->window = child_list[i]; + cw->net_wm_name_cookie = get_net_wm_name (dpy, child_list[i]); + cw->wm_name_cookie = xcb_icccm_get_wm_name (dpy, child_list[i]); + cw->wm_class_cookie = xcb_icccm_get_wm_class (dpy, child_list[i]); + cw->geometry_cookie = xcb_get_geometry (dpy, child_list[i]); + cw->trans_coords_cookie = xcb_translate_coordinates + (dpy, child_list[i], tree->root, 0, 0); + if (recurse) + cw->tree_cookie = xcb_query_tree (dpy, child_list[i]); + } + xcb_flush (dpy); + + for (i = (int)num_children - 1; i >= 0; i--) { + struct wininfo *cw = &children[i]; + Bool got_wm_class = False; + char *instance_name = NULL, *class_name = NULL; + int instance_name_len, class_name_len; +#ifdef USE_XCB_ICCCM + xcb_icccm_get_wm_class_reply_t classhint; +#else + xcb_get_property_reply_t *classprop; +#endif + xcb_get_geometry_reply_t *geometry; + + printf (" "); + for (j = 0; j < level; j++) printf (" "); + Display_Window_Id (cw, False); + printf (": ("); + +#ifdef USE_XCB_ICCCM + if (xcb_icccm_get_wm_class_reply (dpy, cw->wm_class_cookie, + &classhint, NULL)) { + got_wm_class = True; + instance_name = classhint.instance_name; + class_name = classhint.class_name; + instance_name_len = strlen(instance_name); + class_name_len = strlen(class_name); + } +#else + classprop = xcb_get_property_reply + (dpy, cw->wm_class_cookie, NULL); + if (classprop) { + if (classprop->type == XCB_ATOM_STRING && + classprop->format == 8) { + int proplen = xcb_get_property_value_length (classprop); + + instance_name = xcb_get_property_value (classprop); + instance_name_len = strnlen (instance_name, proplen); + if (instance_name_len < proplen) { + class_name = instance_name + instance_name_len + 1; + class_name_len = strnlen + (class_name, proplen - (instance_name_len + 1)); + } else + class_name_len = 0; + got_wm_class = True; + } + else + free (classprop); + } +#endif + + if (got_wm_class) { + if (instance_name) + printf ("\"%.*s\" ", instance_name_len, instance_name); + else + printf ("(none) "); + + if (class_name) + printf ("\"%.*s\") ", class_name_len, class_name); + else + printf ("(none)) "); + +#ifdef USE_XCB_ICCCM + xcb_icccm_get_wm_class_reply_wipe (&classhint); +#else + free (classprop); +#endif + } else + printf (") "); + + geometry = xcb_get_geometry_reply(dpy, cw->geometry_cookie, &err); + if (geometry) { + xcb_translate_coordinates_reply_t *trans_coords; + + printf (" %ux%u+%d+%d", geometry->width, geometry->height, + geometry->x, geometry->y); + + trans_coords = xcb_translate_coordinates_reply + (dpy, cw->trans_coords_cookie, &err); + + if (trans_coords) { + int16_t abs_x = (int16_t) trans_coords->dst_x; + int16_t abs_y = (int16_t) trans_coords->dst_y; + int border = geometry->border_width; + + printf (" +%d+%d", abs_x - border, abs_y - border); + free (trans_coords); + } else if (err) { + Print_X_Error (dpy, err); + } + + free (geometry); + } else if (err) { + Print_X_Error (dpy, err); + } + printf ("\n"); + + if (recurse) + display_tree_info_1 (cw, 1, level+1); + + wininfo_wipe (cw); + } + free (children); + } + + free (tree); /* includes storage for child_list[] */ +} + + +/* + * Display a set of size hints + */ +static void +Display_Hints (xcb_size_hints_t *hints) +{ + long flags; + + flags = hints->flags; + + if (flags & XCB_ICCCM_SIZE_HINT_US_POSITION) + printf (" User supplied location: %s, %s\n", + xscale (hints->x), yscale (hints->y)); + + if (flags & XCB_ICCCM_SIZE_HINT_P_POSITION) + printf (" Program supplied location: %s, %s\n", + xscale (hints->x), yscale (hints->y)); + + if (flags & XCB_ICCCM_SIZE_HINT_US_SIZE) { + printf (" User supplied size: %s by %s\n", + xscale (hints->width), yscale (hints->height)); + } + + if (flags & XCB_ICCCM_SIZE_HINT_P_SIZE) + printf (" Program supplied size: %s by %s\n", + xscale (hints->width), yscale (hints->height)); + + if (flags & XCB_ICCCM_SIZE_HINT_P_MIN_SIZE) + printf (" Program supplied minimum size: %s by %s\n", + xscale (hints->min_width), yscale (hints->min_height)); + + if (flags & XCB_ICCCM_SIZE_HINT_P_MAX_SIZE) + printf (" Program supplied maximum size: %s by %s\n", + xscale (hints->max_width), yscale (hints->max_height)); + + if (flags & XCB_ICCCM_SIZE_HINT_BASE_SIZE) { + printf (" Program supplied base size: %s by %s\n", + xscale (hints->base_width), yscale (hints->base_height)); + } + + if (flags & XCB_ICCCM_SIZE_HINT_P_RESIZE_INC) { + printf (" Program supplied x resize increment: %s\n", + xscale (hints->width_inc)); + printf (" Program supplied y resize increment: %s\n", + yscale (hints->height_inc)); + if (hints->width_inc != 0 && hints->height_inc != 0) { + if (flags & XCB_ICCCM_SIZE_HINT_US_SIZE) + printf (" User supplied size in resize increments: %s by %s\n", + (xscale (hints->width / hints->width_inc)), + (yscale (hints->height / hints->height_inc))); + if (flags & XCB_ICCCM_SIZE_HINT_P_SIZE) + printf (" Program supplied size in resize increments: %s by %s\n", + (xscale (hints->width / hints->width_inc)), + (yscale (hints->height / hints->height_inc))); + if (flags & XCB_ICCCM_SIZE_HINT_P_MIN_SIZE) + printf (" Program supplied minimum size in resize increments: %s by %s\n", + xscale (hints->min_width / hints->width_inc), yscale (hints->min_height / hints->height_inc)); + if (flags & XCB_ICCCM_SIZE_HINT_BASE_SIZE) + printf (" Program supplied base size in resize increments: %s by %s\n", + (xscale (hints->base_width / hints->width_inc)), + (yscale (hints->base_height / hints->height_inc))); + } + } + + if (flags & XCB_ICCCM_SIZE_HINT_P_ASPECT) { + printf (" Program supplied min aspect ratio: %s/%s\n", + xscale (hints->min_aspect_num), yscale (hints->min_aspect_den)); + printf (" Program supplied max aspect ratio: %s/%s\n", + xscale (hints->max_aspect_num), yscale (hints->max_aspect_den)); + } + + if (flags & XCB_ICCCM_SIZE_HINT_P_WIN_GRAVITY) { + printf (" Program supplied window gravity: %s\n", + Lookup (hints->win_gravity, _gravities)); + } +} + + +/* + * Display Size Hints info + */ +static void +Display_Size_Hints (struct wininfo *w) +{ + xcb_size_hints_t hints; + + printf ("\n"); + if (!fetch_normal_hints (w, &hints)) + printf (" No normal window size hints defined\n"); + else { + printf (" Normal window size hints:\n"); + Display_Hints (&hints); + } + + if (!xcb_icccm_get_wm_size_hints_reply (dpy, w->zoom_cookie, &hints, NULL)) + printf (" No zoom window size hints defined\n"); + else { + printf (" Zoom window size hints:\n"); + Display_Hints (&hints); + } +} + + +static void +Display_Window_Shape (xcb_window_t window) +{ + const xcb_query_extension_reply_t *shape_query; + xcb_shape_query_extents_cookie_t extents_cookie; + xcb_shape_query_extents_reply_t *extents; + + shape_query = xcb_get_extension_data (dpy, &xcb_shape_id); + if (!shape_query->present) + return; + + printf ("\n"); + + extents_cookie = xcb_shape_query_extents (dpy, window); + extents = xcb_shape_query_extents_reply (dpy, extents_cookie, &err); + + if (!extents) { + if (err) + Print_X_Error (dpy, err); + else + { + printf (" No window shape defined\n"); + printf (" No border shape defined\n"); + } + return; + } + + if (!extents->bounding_shaped) + printf (" No window shape defined\n"); + else { + printf (" Window shape extents: %sx%s", + xscale (extents->bounding_shape_extents_width), + yscale (extents->bounding_shape_extents_height)); + printf ("+%s+%s\n", + xscale (extents->bounding_shape_extents_x), + yscale (extents->bounding_shape_extents_y)); + } + if (!extents->clip_shaped) + printf (" No border shape defined\n"); + else { + printf (" Border shape extents: %sx%s", + xscale (extents->clip_shape_extents_width), + yscale (extents->clip_shape_extents_height)); + printf ("+%s+%s\n", + xscale (extents->clip_shape_extents_x), + yscale (extents->clip_shape_extents_y)); + } + + free (extents); +} + +/* + * Display Window Manager Info + * + * Requires wininfo members initialized: + * window, hints_cookie + */ +static const binding _state_hints[] = { + { XCB_ICCCM_WM_STATE_WITHDRAWN, "Withdrawn State" }, + { XCB_ICCCM_WM_STATE_NORMAL, "Normal State" }, + { XCB_ICCCM_WM_STATE_ICONIC, "Iconic State" }, +/* xwininfo previously also reported the ZoomState & InactiveState, + but ICCCM declared those obsolete long ago */ + { 0, NULL } }; + +#ifndef USE_XCB_ICCCM +static Bool +wm_hints_reply (xcb_connection_t *dpy, xcb_get_property_cookie_t cookie, + wm_hints_t *hints_return, xcb_generic_error_t **err) +{ + xcb_get_property_reply_t *prop = xcb_get_property_reply (dpy, cookie, err); + int length; + + if (!prop || (prop->type != XCB_ATOM_WM_HINTS) || (prop->format != 32)) { + free (prop); + return False; + } + + memset (hints_return, 0, sizeof(wm_hints_t)); + + length = xcb_get_property_value_length(prop); + if (length > sizeof(wm_hints_t)) + length = sizeof(wm_hints_t); + memcpy (hints_return, xcb_get_property_value (prop), length); + + free (prop); + return True; +} + +#define xcb_icccm_get_wm_hints_reply wm_hints_reply +#endif + +static void +Display_WM_Info (struct wininfo *w) +{ + xcb_icccm_wm_hints_t wmhints; + long flags; + xcb_get_property_reply_t *prop; + int i; + + printf ("\n"); + if (!xcb_icccm_get_wm_hints_reply(dpy, w->hints_cookie, &wmhints, &err)) + { + printf (" No window manager hints defined\n"); + if (err) + Print_X_Error (dpy, err); + flags = 0; + } else + flags = wmhints.flags; + + printf (" Window manager hints:\n"); + + if (flags & XCB_ICCCM_WM_HINT_INPUT) + printf (" Client accepts input or input focus: %s\n", + Lookup (wmhints.input, _bool)); + + if (flags & XCB_ICCCM_WM_HINT_ICON_WINDOW) { + struct wininfo iw; + iw.window = wmhints.icon_window; + iw.net_wm_name_cookie = get_net_wm_name (dpy, iw.window); + iw.wm_name_cookie = xcb_icccm_get_wm_name (dpy, iw.window); + + printf (" Icon window id: "); + Display_Window_Id (&iw, True); + } + + if (flags & XCB_ICCCM_WM_HINT_ICON_POSITION) + printf (" Initial icon position: %s, %s\n", + xscale (wmhints.icon_x), yscale (wmhints.icon_y)); + + if (flags & XCB_ICCCM_WM_HINT_STATE) + printf (" Initial state is %s\n", + Lookup (wmhints.initial_state, _state_hints)); + + if (atom_net_wm_desktop) { + prop = xcb_get_property_reply (dpy, w->wm_desktop_cookie, NULL); + if (prop && (prop->type != XCB_NONE)) { + uint32_t *desktop = xcb_get_property_value (prop); + if (*desktop == 0xFFFFFFFF) { + printf (" Displayed on all desktops\n"); + } else { + printf (" Displayed on desktop %d\n", *desktop); + } + } + free (prop); + } + + if (atom_net_wm_window_type) { + prop = xcb_get_property_reply (dpy, w->wm_window_type_cookie, + NULL); + if (prop && (prop->type != XCB_NONE) && (prop->value_len > 0)) { + xcb_atom_t *atoms = xcb_get_property_value (prop); + int atom_count = prop->value_len; + + if (atom_count > 0) { + printf (" Window type:\n"); + for (i = 0; i < atom_count; i++) { + const char *atom_name = Get_Atom_Name (dpy, atoms[i]); + + if (atom_name) { + print_friendly_name (" %s\n", atom_name, + "_NET_WM_WINDOW_TYPE_"); + } else { + printf (" (unresolvable ATOM 0x%x)\n", + atoms[i]); + } + } + } + } + free (prop); + } + + if (atom_net_wm_state) { + prop = xcb_get_property_reply (dpy, w->wm_state_cookie, NULL); + if (prop && (prop->type != XCB_NONE) && (prop->value_len > 0)) { + xcb_atom_t *atoms = xcb_get_property_value (prop); + int atom_count = prop->value_len; + + if (atom_count > 0) { + printf (" Window state:\n"); + for (i = 0; i < atom_count; i++) { + const char *atom_name = Get_Atom_Name (dpy, atoms[i]); + + if (atom_name) { + print_friendly_name (" %s\n", atom_name, + "_NET_WM_STATE_"); + } else { + printf (" (unresolvable ATOM 0x%x)\n", + atoms[i]); + } + } + } + } + free (prop); + } + + if (atom_net_wm_pid) { + printf (" Process id: "); + prop = xcb_get_property_reply (dpy, w->wm_pid_cookie, NULL); + if (prop && (prop->type == XCB_ATOM_CARDINAL)) { + uint32_t *pid = xcb_get_property_value (prop); + printf ("%d", *pid); + } else { + printf ("(unknown)"); + } + free (prop); + + prop = xcb_get_property_reply (dpy, w->wm_client_machine_cookie, NULL); + if (prop && (prop->type == XCB_ATOM_STRING)) { + const char *hostname = xcb_get_property_value (prop); + int hostname_len = xcb_get_property_value_length (prop); + printf (" on host %.*s", hostname_len, hostname); + } + printf ("\n"); + free (prop); + } + + if (atom_net_frame_extents) { + prop = xcb_get_property_reply (dpy, w->frame_extents_cookie, NULL); + if (prop && (prop->type == XCB_ATOM_CARDINAL) + && (prop->value_len == 4)) { + uint32_t *extents = xcb_get_property_value (prop); + + printf (" Frame extents: %d, %d, %d, %d\n", + extents[0], extents[1], extents[2], extents[3]); + } + free (prop); + } +} + +/* Frees all members of a wininfo struct, but not the struct itself */ +static void +wininfo_wipe (struct wininfo *w) +{ + free (w->geometry); + free (w->win_attributes); + free (w->normal_hints); +} + +/* Gets UTF-8 encoded EMWH property _NET_WM_NAME for a window */ +static xcb_get_property_cookie_t +get_net_wm_name (xcb_connection_t *dpy, xcb_window_t win) +{ + if (!atom_net_wm_name) + atom_net_wm_name = Get_Atom (dpy, "_NET_WM_NAME"); + + if (!atom_utf8_string) + atom_utf8_string = Get_Atom (dpy, "UTF8_STRING"); + + if (atom_net_wm_name && atom_utf8_string) + return xcb_get_property (dpy, False, win, atom_net_wm_name, + atom_utf8_string, 0, BUFSIZ); + else { + xcb_get_property_cookie_t dummy = { 0 }; + return dummy; + } +} + +/* [Copied from code added by Yang Zhao to xprop/xprop.c] + * + * Validate a string as UTF-8 encoded according to RFC 3629 + * + * Simply, a unicode code point (up to 21-bits long) is encoded as follows: + * + * Char. number range | UTF-8 octet sequence + * (hexadecimal) | (binary) + * --------------------+--------------------------------------------- + * 0000 0000-0000 007F | 0xxxxxxx + * 0000 0080-0000 07FF | 110xxxxx 10xxxxxx + * 0000 0800-0000 FFFF | 1110xxxx 10xxxxxx 10xxxxxx + * 0001 0000-0010 FFFF | 11110xxx 10xxxxxx 10xxxxxx 10xxxxxx + * + * Validation is done left-to-right, and an error condition, if any, refers to + * only the left-most problem in the string. + * + * Return values: + * UTF8_VALID: Valid UTF-8 encoded string + * UTF8_OVERLONG: Using more bytes than needed for a code point + * UTF8_SHORT_TAIL: Not enough bytes in a multi-byte sequence + * UTF8_LONG_TAIL: Too many bytes in a multi-byte sequence + * UTF8_FORBIDDEN_VALUE: Forbidden prefix or code point outside 0x10FFFF + */ +#define UTF8_VALID 0 +#define UTF8_FORBIDDEN_VALUE 1 +#define UTF8_OVERLONG 2 +#define UTF8_SHORT_TAIL 3 +#define UTF8_LONG_TAIL 4 +static int +is_valid_utf8 (const char *string, int len) +{ + unsigned long codepoint; + int rem, i; + unsigned char c; + + rem = 0; + for (i = 0; i < len; i++) { + c = (unsigned char) string[i]; + + /* Order of type check: + * - Single byte code point + * - Non-starting byte of multi-byte sequence + * - Start of 2-byte sequence + * - Start of 3-byte sequence + * - Start of 4-byte sequence + */ + if (!(c & 0x80)) { + if (rem > 0) return UTF8_SHORT_TAIL; + rem = 0; + codepoint = c; + } else if ((c & 0xC0) == 0x80) { + if (rem == 0) return UTF8_LONG_TAIL; + rem--; + codepoint |= (c & 0x3F) << (rem * 6); + if (codepoint == 0) return UTF8_OVERLONG; + } else if ((c & 0xE0) == 0xC0) { + if (rem > 0) return UTF8_SHORT_TAIL; + rem = 1; + codepoint = (c & 0x1F) << 6; + if (codepoint == 0) return UTF8_OVERLONG; + } else if ((c & 0xF0) == 0xE0) { + if (rem > 0) return UTF8_SHORT_TAIL; + rem = 2; + codepoint = (c & 0x0F) << 12; + } else if ((c & 0xF8) == 0xF0) { + if (rem > 0) return UTF8_SHORT_TAIL; + rem = 3; + codepoint = (c & 0x07) << 18; + if (codepoint > 0x10FFFF) return UTF8_FORBIDDEN_VALUE; + } else + return UTF8_FORBIDDEN_VALUE; + } + + return UTF8_VALID; +} + +/* + * Converts a UTF-8 encoded string to the current locale encoding, + * if possible, and prints it, with prefix before and suffix after. + * Length of the string is specified in bytes, or -1 for going until '\0' + */ +static void +print_utf8 (const char *prefix, char *u8str, size_t length, const char *suffix) +{ + size_t inlen = length; + + if (inlen < 0) { + inlen = strlen (u8str); + } + + if (is_valid_utf8 (u8str, inlen) != UTF8_VALID) { + printf (" (invalid UTF8_STRING)"); + return; + } + + if (strcmp (user_encoding, "UTF-8") == 0) { + /* Don't need to convert */ + printf ("%s", prefix); + fwrite (u8str, 1, inlen, stdout); + printf ("%s", suffix); + return; + } + +#ifdef HAVE_ICONV + if (!iconv_from_utf8) { + iconv_from_utf8 = iconv_open (user_encoding, "UTF-8"); + } + + if (iconv_from_utf8 != (iconv_t) -1) { + Bool done = True; + ICONV_CONST char *inp = u8str; + char convbuf[BUFSIZ]; + int convres; + + printf ("%s", prefix); + do { + char *outp = convbuf; + size_t outlen = sizeof(convbuf); + + convres = iconv (iconv_from_utf8, &inp, &inlen, &outp, &outlen); + + if ((convres == -1) && (errno == E2BIG)) { + done = False; + convres = 0; + } + + if (convres == 0) { + fwrite (convbuf, 1, sizeof(convbuf) - outlen, stdout); + } else { + printf (" (failure in conversion from UTF8_STRING to %s)", + user_encoding); + } + } while (!done); + printf ("%s", suffix); + } else { + printf (" (can't load iconv conversion for UTF8_STRING to %s)", + user_encoding); + } +#else + printf (" (can't convert UTF8_STRING to %s)", user_encoding); +#endif +} + +/* + * Takes a string such as an atom name, strips the prefix, converts + * underscores to spaces, lowercases all but the first letter of each word, + * and prints it. + */ +static void +print_friendly_name (const char *format, const char *string, + const char *prefix) +{ + const char *name_start = string; + char *lowered_name, *n; + int prefix_len = strlen (prefix); + + if (strncmp (name_start, prefix, prefix_len) == 0) { + name_start += prefix_len; + } + + lowered_name = strdup (name_start); + if (lowered_name) { + Bool first = True; + + for (n = lowered_name ; *n != 0 ; n++) { + if (*n == '_') { + *n = ' '; + first = True; + } else if (first) { + first = False; + } else { + *n = tolower(*n); + } + } + name_start = lowered_name; + } + + printf (format, name_start); + free (lowered_name); +} |