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 } |