Mercurial > dwm-meillo
annotate wm.c @ 13:5cc5e55a132d
added protocol killing stuff
| author | Anselm R. Garbe <garbeam@wmii.de> |
|---|---|
| date | Tue, 11 Jul 2006 16:14:22 +0200 |
| parents | 703255003abb |
| children | 5c078b66347b |
| rev | line source |
|---|---|
| 0 | 1 /* |
| 2 * (C)opyright MMVI Anselm R. Garbe <garbeam at gmail dot com> | |
| 3 * See LICENSE file for license details. | |
| 4 */ | |
| 5 | |
| 6 #include <stdarg.h> | |
| 7 #include <stdio.h> | |
| 8 #include <stdlib.h> | |
| 9 | |
| 10 #include <X11/cursorfont.h> | |
| 11 #include <X11/Xatom.h> | |
| 12 #include <X11/Xproto.h> | |
| 13 | |
| 14 #include "wm.h" | |
| 15 | |
|
3
e969f3575b7a
several new changes, made gridmenu working
Anselm R. Garbe <garbeam@wmii.de>
parents:
2
diff
changeset
|
16 /* X structs */ |
| 0 | 17 Display *dpy; |
| 5 | 18 Window root, barwin; |
|
13
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
19 Atom wm_atom[WMLast], net_atom[NetLast]; |
| 0 | 20 Cursor cursor[CurLast]; |
| 5 | 21 XRectangle rect, barrect; |
| 22 Bool running = True; | |
|
13
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
23 Bool sel_screen; |
|
3
e969f3575b7a
several new changes, made gridmenu working
Anselm R. Garbe <garbeam@wmii.de>
parents:
2
diff
changeset
|
24 |
| 7 | 25 char *bartext, tag[256]; |
|
13
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
26 int screen; |
|
3
e969f3575b7a
several new changes, made gridmenu working
Anselm R. Garbe <garbeam@wmii.de>
parents:
2
diff
changeset
|
27 |
|
e969f3575b7a
several new changes, made gridmenu working
Anselm R. Garbe <garbeam@wmii.de>
parents:
2
diff
changeset
|
28 Brush brush = {0}; |
|
10
703255003abb
changed how manage client works
Anselm R. Garbe <garbeam@wmii.de>
parents:
9
diff
changeset
|
29 Client *clients = NULL; |
|
13
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
30 Client *stack = NULL; |
| 0 | 31 |
| 32 static Bool other_wm_running; | |
|
10
703255003abb
changed how manage client works
Anselm R. Garbe <garbeam@wmii.de>
parents:
9
diff
changeset
|
33 static char version[] = "gridwm - " VERSION ", (C)opyright MMVI Anselm R. Garbe\n"; |
| 0 | 34 static int (*x_error_handler) (Display *, XErrorEvent *); |
| 35 | |
| 36 static void | |
| 37 usage() | |
| 38 { | |
| 39 fputs("usage: gridwm [-v]\n", stderr); | |
| 40 exit(1); | |
| 41 } | |
| 42 | |
| 43 static void | |
| 44 scan_wins() | |
| 45 { | |
| 46 unsigned int i, num; | |
| 47 Window *wins; | |
| 48 XWindowAttributes wa; | |
| 49 Window d1, d2; | |
| 50 | |
| 51 if(XQueryTree(dpy, root, &d1, &d2, &wins, &num)) { | |
| 52 for(i = 0; i < num; i++) { | |
| 53 if(!XGetWindowAttributes(dpy, wins[i], &wa)) | |
| 54 continue; | |
| 55 if(wa.override_redirect || XGetTransientForHint(dpy, wins[i], &d1)) | |
| 56 continue; | |
| 57 if(wa.map_state == IsViewable) | |
|
10
703255003abb
changed how manage client works
Anselm R. Garbe <garbeam@wmii.de>
parents:
9
diff
changeset
|
58 manage(wins[i], &wa); |
| 0 | 59 } |
| 60 } | |
| 61 if(wins) | |
| 62 XFree(wins); | |
| 63 } | |
| 64 | |
|
13
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
65 static int |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
66 win_property(Window w, Atom a, Atom t, long l, unsigned char **prop) |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
67 { |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
68 Atom real; |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
69 int format; |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
70 unsigned long res, extra; |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
71 int status; |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
72 |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
73 status = XGetWindowProperty(dpy, w, a, 0L, l, False, t, &real, &format, |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
74 &res, &extra, prop); |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
75 |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
76 if(status != Success || *prop == 0) { |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
77 return 0; |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
78 } |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
79 if(res == 0) { |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
80 free((void *) *prop); |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
81 } |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
82 return res; |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
83 } |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
84 |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
85 int |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
86 win_proto(Window w) |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
87 { |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
88 Atom *protocols; |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
89 long res; |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
90 int protos = 0; |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
91 int i; |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
92 |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
93 res = win_property(w, wm_atom[WMProtocols], XA_ATOM, 20L, |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
94 ((unsigned char **) &protocols)); |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
95 if(res <= 0) { |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
96 return protos; |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
97 } |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
98 for(i = 0; i < res; i++) { |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
99 if(protocols[i] == wm_atom[WMDelete]) |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
100 protos |= WM_PROTOCOL_DELWIN; |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
101 } |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
102 free((char *) protocols); |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
103 return protos; |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
104 } |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
105 |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
106 void |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
107 send_message(Window w, Atom a, long value) |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
108 { |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
109 XEvent e; |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
110 |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
111 e.type = ClientMessage; |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
112 e.xclient.window = w; |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
113 e.xclient.message_type = a; |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
114 e.xclient.format = 32; |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
115 e.xclient.data.l[0] = value; |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
116 e.xclient.data.l[1] = CurrentTime; |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
117 XSendEvent(dpy, w, False, NoEventMask, &e); |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
118 XFlush(dpy); |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
119 } |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
120 |
| 0 | 121 /* |
| 122 * There's no way to check accesses to destroyed windows, thus | |
| 123 * those cases are ignored (especially on UnmapNotify's). | |
| 124 * Other types of errors call Xlib's default error handler, which | |
| 125 * calls exit(). | |
| 126 */ | |
|
10
703255003abb
changed how manage client works
Anselm R. Garbe <garbeam@wmii.de>
parents:
9
diff
changeset
|
127 int |
| 0 | 128 error_handler(Display *dpy, XErrorEvent *error) |
| 129 { | |
| 130 if(error->error_code == BadWindow | |
| 131 || (error->request_code == X_SetInputFocus | |
| 132 && error->error_code == BadMatch) | |
| 133 || (error->request_code == X_PolyText8 | |
| 134 && error->error_code == BadDrawable) | |
| 135 || (error->request_code == X_PolyFillRectangle | |
| 136 && error->error_code == BadDrawable) | |
| 137 || (error->request_code == X_PolySegment | |
| 138 && error->error_code == BadDrawable) | |
| 139 || (error->request_code == X_ConfigureWindow | |
| 140 && error->error_code == BadMatch) | |
| 141 || (error->request_code == X_GrabKey | |
| 142 && error->error_code == BadAccess)) | |
| 143 return 0; | |
| 144 fprintf(stderr, "gridwm: fatal error: request code=%d, error code=%d\n", | |
| 145 error->request_code, error->error_code); | |
| 146 return x_error_handler(dpy, error); /* may call exit() */ | |
| 147 } | |
| 148 | |
| 149 /* | |
| 150 * Startup Error handler to check if another window manager | |
| 151 * is already running. | |
| 152 */ | |
| 153 static int | |
| 154 startup_error_handler(Display *dpy, XErrorEvent *error) | |
| 155 { | |
| 156 other_wm_running = True; | |
| 157 return -1; | |
| 158 } | |
| 159 | |
| 160 static void | |
| 161 cleanup() | |
| 162 { | |
| 163 /* | |
| 164 Client *c; | |
| 165 for(c=client; c; c=c->next) | |
| 166 reparent_client(c, root, c->sel->rect.x, c->sel->rect.y); | |
| 167 XSetInputFocus(dpy, PointerRoot, RevertToPointerRoot, CurrentTime); | |
| 168 */ | |
| 169 } | |
| 170 | |
| 171 int | |
| 172 main(int argc, char *argv[]) | |
| 173 { | |
| 174 int i; | |
| 175 XSetWindowAttributes wa; | |
| 176 unsigned int mask; | |
| 177 Window w; | |
| 5 | 178 XEvent ev; |
| 0 | 179 |
| 180 /* command line args */ | |
| 181 for(i = 1; (i < argc) && (argv[i][0] == '-'); i++) { | |
| 182 switch (argv[i][1]) { | |
| 183 case 'v': | |
| 184 fprintf(stdout, "%s", version); | |
| 185 exit(0); | |
| 186 break; | |
| 187 default: | |
| 188 usage(); | |
| 189 break; | |
| 190 } | |
| 191 } | |
| 192 | |
| 193 dpy = XOpenDisplay(0); | |
| 194 if(!dpy) | |
| 195 error("gridwm: cannot connect X server\n"); | |
| 196 | |
| 197 screen = DefaultScreen(dpy); | |
| 198 root = RootWindow(dpy, screen); | |
| 199 | |
| 200 /* check if another WM is already running */ | |
| 201 other_wm_running = False; | |
| 202 XSetErrorHandler(startup_error_handler); | |
| 203 /* this causes an error if some other WM is running */ | |
| 204 XSelectInput(dpy, root, SubstructureRedirectMask); | |
|
3
e969f3575b7a
several new changes, made gridmenu working
Anselm R. Garbe <garbeam@wmii.de>
parents:
2
diff
changeset
|
205 XFlush(dpy); |
| 0 | 206 |
| 207 if(other_wm_running) | |
| 208 error("gridwm: another window manager is already running\n"); | |
| 209 | |
| 210 rect.x = rect.y = 0; | |
| 211 rect.width = DisplayWidth(dpy, screen); | |
| 212 rect.height = DisplayHeight(dpy, screen); | |
| 213 sel_screen = XQueryPointer(dpy, root, &w, &w, &i, &i, &i, &i, &mask); | |
| 214 | |
| 215 XSetErrorHandler(0); | |
| 216 x_error_handler = XSetErrorHandler(error_handler); | |
| 217 | |
| 218 /* init atoms */ | |
|
13
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
219 wm_atom[WMProtocols] = XInternAtom(dpy, "WM_PROTOCOLS", False); |
|
5cc5e55a132d
added protocol killing stuff
Anselm R. Garbe <garbeam@wmii.de>
parents:
10
diff
changeset
|
220 wm_atom[WMDelete] = XInternAtom(dpy, "WM_DELETE_WINDOW", False); |
| 0 | 221 net_atom[NetSupported] = XInternAtom(dpy, "_NET_SUPPORTED", False); |
| 222 net_atom[NetWMName] = XInternAtom(dpy, "_NET_WM_NAME", False); | |
| 223 | |
| 224 XChangeProperty(dpy, root, net_atom[NetSupported], XA_ATOM, 32, | |
| 225 PropModeReplace, (unsigned char *) net_atom, NetLast); | |
| 226 | |
| 227 | |
| 228 /* init cursors */ | |
| 229 cursor[CurNormal] = XCreateFontCursor(dpy, XC_left_ptr); | |
| 230 cursor[CurResize] = XCreateFontCursor(dpy, XC_sizing); | |
| 231 cursor[CurMove] = XCreateFontCursor(dpy, XC_fleur); | |
| 232 | |
| 8 | 233 update_keys(); |
| 0 | 234 |
| 5 | 235 brush.drawable = XCreatePixmap(dpy, root, rect.width, rect.height, |
| 0 | 236 DefaultDepth(dpy, screen)); |
| 5 | 237 brush.gc = XCreateGC(dpy, root, 0, 0); |
| 238 | |
| 239 /* style */ | |
| 240 loadcolors(dpy, screen, &brush, BGCOLOR, FGCOLOR, BORDERCOLOR); | |
| 241 loadfont(dpy, &brush.font, FONT); | |
| 242 | |
| 243 wa.override_redirect = 1; | |
| 244 wa.background_pixmap = ParentRelative; | |
| 245 wa.event_mask = ExposureMask; | |
| 246 | |
| 247 barrect = rect; | |
| 248 barrect.height = labelheight(&brush.font); | |
| 249 barrect.y = rect.height - barrect.height; | |
| 250 barwin = XCreateWindow(dpy, root, barrect.x, barrect.y, | |
| 251 barrect.width, barrect.height, 0, DefaultDepth(dpy, screen), | |
| 252 CopyFromParent, DefaultVisual(dpy, screen), | |
| 253 CWOverrideRedirect | CWBackPixmap | CWEventMask, &wa); | |
| 7 | 254 bartext = NULL; |
| 5 | 255 XDefineCursor(dpy, barwin, cursor[CurNormal]); |
| 256 XMapRaised(dpy, barwin); | |
| 257 draw_bar(); | |
| 0 | 258 |
|
9
d567f430a81d
fixed several stuff (gridwm gets better and better)
Anselm R. Garbe <garbeam@wmii.de>
parents:
8
diff
changeset
|
259 wa.event_mask = SubstructureRedirectMask | EnterWindowMask \ |
|
d567f430a81d
fixed several stuff (gridwm gets better and better)
Anselm R. Garbe <garbeam@wmii.de>
parents:
8
diff
changeset
|
260 | LeaveWindowMask; |
| 0 | 261 wa.cursor = cursor[CurNormal]; |
| 262 XChangeWindowAttributes(dpy, root, CWEventMask | CWCursor, &wa); | |
| 263 | |
| 5 | 264 scan_wins(); |
|
3
e969f3575b7a
several new changes, made gridmenu working
Anselm R. Garbe <garbeam@wmii.de>
parents:
2
diff
changeset
|
265 |
| 5 | 266 while(running) { |
| 267 XNextEvent(dpy, &ev); | |
| 268 if(handler[ev.type]) | |
| 269 (handler[ev.type]) (&ev); /* call handler */ | |
| 270 } | |
| 0 | 271 |
| 272 cleanup(); | |
| 273 XCloseDisplay(dpy); | |
| 274 | |
| 275 return 0; | |
| 276 } |