2 * Copyright (c) 2009 Marco Peereboom <marco@peereboom.us>
3 * Copyright (c) 2009 Ryan McBride <mcbride@countersiege.com>
5 * Permission to use, copy, modify, and distribute this software for any
6 * purpose with or without fee is hereby granted, provided that the above
7 * copyright notice and this permission notice appear in all copies.
9 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
18 * Copyright (C) 2005-2007 Carsten Haitzler
19 * Copyright (C) 2006-2007 Kim Woelders
21 * Permission is hereby granted, free of charge, to any person obtaining a copy
22 * of this software and associated documentation files (the "Software"), to
23 * deal in the Software without restriction, including without limitation the
24 * rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
25 * sell copies of the Software, and to permit persons to whom the Software is
26 * furnished to do so, subject to the following conditions:
28 * The above copyright notice and this permission notice shall be included in
29 * all copies of the Software, its documentation and marketing & publicity
30 * materials, and acknowledgment shall be given in the documentation, materials
31 * and software packages that this Software was used.
33 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
34 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
35 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
36 * THE AUTHORS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER
37 * IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
38 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
41 * Basic hack mechanism (dlopen etc.) taken from e_hack.c in e17.
49 #include <X11/Xatom.h>
50 #include <X11/Intrinsic.h>
52 /* dlopened libs so we can find the symbols in the real one to call them */
53 static void *lib_xlib = NULL;
54 static void *lib_xtlib = NULL;
56 static Window root = None;
58 static Display *dpy = NULL;
60 /* Find our root window */
69 root = DefaultRootWindow(dpy);
71 s = getenv("ENL_WM_ROOT");
75 sscanf(s, "%lx", &root);
80 typedef Atom (XIA) (Display *display, char *atom_name, Bool
83 typedef int (XCP) (Display *display, Window w, Atom property,
84 Atom type, int format, int mode, unsigned char *data,
87 #define SWM_PROPLEN (16)
89 set_property(Display *dpy, Window id, char *name, char *val)
92 char prop[SWM_PROPLEN];
93 static XIA *xia = NULL;
94 static XCP *xcp = NULL;
96 /* find the real Xlib and the real X function */
98 lib_xlib = dlopen("libX11.so", RTLD_GLOBAL | RTLD_LAZY);
100 xia = (XIA *) dlsym(lib_xlib, "XInternAtom");
102 xcp = (XCP *) dlsym(lib_xlib, "XChangeProperty");
104 /* Try to update the window's workspace property */
105 atom = (*xia)(dpy, name, False);
107 if (snprintf(prop, SWM_PROPLEN, "%s", val) < SWM_PROPLEN)
108 (*xcp)(dpy, id, atom, XA_STRING,
109 8, PropModeReplace, (unsigned char *)prop, SWM_PROPLEN);
112 typedef Window(CWF) (Display * _display, Window _parent, int _x,
113 int _y, unsigned int _width,
114 unsigned int _height,
115 unsigned int _border_width, int _depth,
116 unsigned int _class, Visual * _visual,
117 unsigned long _valuemask,
118 XSetWindowAttributes * _attributes);
120 /* XCreateWindow intercept hack */
122 XCreateWindow(Display * display, Window parent, int x, int y,
123 unsigned int width, unsigned int height,
124 unsigned int border_width,
125 int depth, unsigned int clss, Visual * visual,
126 unsigned long valuemask, XSetWindowAttributes * attributes)
128 static CWF *func = NULL;
132 /* find the real Xlib and the real X function */
134 lib_xlib = dlopen("libX11.so", RTLD_GLOBAL | RTLD_LAZY);
136 func = (CWF *) dlsym(lib_xlib, "XCreateWindow");
140 if (parent == DefaultRootWindow(display))
141 parent = MyRoot(display);
143 id = (*func) (display, parent, x, y, width, height, border_width,
144 depth, clss, visual, valuemask, attributes);
147 if ((env = getenv("_SWM_WS")) != NULL)
148 set_property(display, id, "_SWM_WS", env);
149 if ((env = getenv("_SWM_PID")) != NULL)
150 set_property(display, id, "_SWM_PID", env);
151 if ((env = getenv("_SWM_XTERM_FONTADJ")) != NULL) {
152 unsetenv("_SWM_XTERM_FONTADJ");
159 typedef Window(CSWF) (Display * _display, Window _parent, int _x,
160 int _y, unsigned int _width,
161 unsigned int _height,
162 unsigned int _border_width,
163 unsigned long _border,
164 unsigned long _background);
166 /* XCreateSimpleWindow intercept hack */
168 XCreateSimpleWindow(Display * display, Window parent, int x, int y,
169 unsigned int width, unsigned int height,
170 unsigned int border_width,
171 unsigned long border, unsigned long background)
173 static CSWF *func = NULL;
177 /* find the real Xlib and the real X function */
179 lib_xlib = dlopen("libX11.so", RTLD_GLOBAL | RTLD_LAZY);
181 func = (CSWF *) dlsym(lib_xlib, "XCreateSimpleWindow");
183 if (parent == DefaultRootWindow(display))
184 parent = MyRoot(display);
186 id = (*func) (display, parent, x, y, width, height,
187 border_width, border, background);
190 if ((env = getenv("_SWM_WS")) != NULL)
191 set_property(display, id, "_SWM_WS", env);
192 if ((env = getenv("_SWM_PID")) != NULL)
193 set_property(display, id, "_SWM_PID", env);
194 if ((env = getenv("_SWM_XTERM_FONTADJ")) != NULL) {
195 unsetenv("_SWM_XTERM_FONTADJ");
202 typedef int (RWF) (Display * _display, Window _window, Window _parent,
205 /* XReparentWindow intercept hack */
207 XReparentWindow(Display * display, Window window, Window parent, int x, int y)
209 static RWF *func = NULL;
211 /* find the real Xlib and the real X function */
213 lib_xlib = dlopen("libX11.so", RTLD_GLOBAL | RTLD_LAZY);
215 func = (RWF *) dlsym(lib_xlib, "XReparentWindow");
217 if (parent == DefaultRootWindow(display))
218 parent = MyRoot(display);
220 return (*func) (display, window, parent, x, y);
223 typedef void (ANEF) (XtAppContext app_context, XEvent *event_return);
227 * XtAppNextEvent Intercept Hack
228 * Normally xterm rejects "synthetic" (XSendEvent) events to prevent spoofing.
229 * We don't want to disable this completely, it's insecure. But hook here
230 * and allow these mostly harmless ones that we use to adjust fonts.
233 XtAppNextEvent(XtAppContext app_context, XEvent *event_return)
235 static ANEF *func = NULL;
236 static int kp_add = 0, kp_subtract = 0;
238 /* find the real Xlib and the real X function */
240 lib_xtlib = dlopen("libXt.so", RTLD_GLOBAL | RTLD_LAZY);
242 func = (ANEF *) dlsym(lib_xtlib, "XtAppNextEvent");
244 kp_add = XKeysymToKeycode(dpy, XK_KP_Add);
245 kp_subtract = XKeysymToKeycode(dpy, XK_KP_Subtract);
249 (*func) (app_context, event_return);
251 /* Return here if it's not an Xterm. */
255 /* Allow spoofing of font change keystrokes. */
256 if ((event_return->type == KeyPress ||
257 event_return->type == KeyRelease) &&
258 event_return->xkey.state == ShiftMask &&
259 (event_return->xkey.keycode == kp_add ||
260 event_return->xkey.keycode == kp_subtract))
261 event_return->xkey.send_event = 0;