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