]> Pileus Git - wmpus/blob - wm-wmii.c
Add Win32 support for tags and multiple monitors
[wmpus] / wm-wmii.c
1 #include <stdio.h>
2 #include <stdlib.h>
3
4 #include "util.h"
5 #include "sys.h"
6 #include "wm.h"
7
8 #define MODKEY alt
9 #define MARGIN 0
10 #define STACK  25
11
12 /* Enums */
13 typedef enum {
14         none, move, resize
15 } drag_t;
16
17 typedef enum {
18         split, stack, max, tab
19 } mode_t;
20
21
22 /* Window structure types */
23 struct win_wm { };
24
25 typedef struct {
26         win_t  *win;
27         int     height;
28 } row_t;
29
30 typedef struct {
31         list_t *rows; // of row_t
32         row_t  *row;
33         int     width;
34         mode_t  mode;
35 } col_t;
36
37 typedef struct {
38         list_t *cols; // of col_t
39         col_t  *col;
40         win_t  *geom;
41 } dpy_t;
42
43 typedef struct {
44         list_t *dpys; // of dpy_t
45         dpy_t  *dpy;
46         int     name;
47 } tag_t;
48
49 typedef struct {
50         list_t *tags; // of tag_t
51         tag_t  *tag;
52         win_t  *root;
53         list_t *screens;
54 } wm_t;
55
56 /* Mouse drag data */
57 static drag_t  move_mode;
58 static list_t *move_lrow;
59 static list_t *move_lcol;
60 static ptr_t   move_prev;
61 static struct { int v, h; } move_dir;
62
63 /* Window management data */
64 static wm_t  *wm;
65 #define wm_win   wm->tag->dpy->col->row->win
66 #define wm_row   wm->tag->dpy->col->row
67 #define wm_col   wm->tag->dpy->col
68 #define wm_dpy   wm->tag->dpy
69 #define wm_tag   wm->tag
70 #define wm_focus (wm_tag && wm_dpy && wm_col && wm_row ? wm_win : NULL)
71
72 #define WIN(l) ((win_t*)(l)->data)
73 #define ROW(l) ((row_t*)(l)->data)
74 #define COL(l) ((col_t*)(l)->data)
75 #define DPY(l) ((dpy_t*)(l)->data)
76 #define TAG(l) ((tag_t*)(l)->data)
77
78 /* Helper functions */
79 static int searchl(tag_t *tag, win_t *target,
80                 list_t **_dpy, list_t **_col, list_t **_row)
81 {
82         for (list_t *dpy =     tag ->dpys; dpy; dpy = dpy->next)
83         for (list_t *col = DPY(dpy)->cols; col; col = col->next)
84         for (list_t *row = COL(col)->rows; row; row = row->next) {
85                 win_t *win = ROW(row)->win;
86                 if (win == target) {
87                         if (_dpy) *_dpy = dpy;
88                         if (_col) *_col = col;
89                         if (_row) *_row = row;
90                         return 1;
91                 }
92         }
93         return 0;
94 }
95
96 static int search(tag_t *tag, win_t *target,
97                 dpy_t **_dpy, col_t **_col, row_t **_row)
98 {
99         list_t *dpy, *col, *row;
100         if (searchl(tag, target, &dpy, &col, &row)) {
101                 if (_dpy) *_dpy = DPY(dpy);
102                 if (_col) *_col = COL(col);
103                 if (_row) *_row = ROW(row);
104                 return 1;
105         }
106         return 0;
107 }
108
109 static void set_mode(win_t *win, mode_t mode)
110 {
111         col_t *col;
112         search(wm_tag, win, NULL, &col, NULL);
113         printf("set_mode: %p, %d -> %d\n",
114                         col, col->mode, mode);
115         col->mode = mode;
116         if (col->mode == split)
117                 for (list_t *cur = col->rows; cur; cur = cur->next) {
118                         row_t *row = cur->data;
119                         row->height = wm_dpy->geom->h;
120                 }
121         wm_update();
122 }
123
124 static void set_focus(win_t *win)
125 {
126         /* - Only grab mouse button on unfocused window,
127          *   this prevents stealing all mouse clicks from client windows,
128          * - A better way may be to re-send mouse clicks to client windows
129          *   using the return value from wm_handle_key */
130         for (int i = key_mouse1; i < key_mouse7; i++) {
131                 if (wm_focus)
132                         sys_watch(wm_focus, i, MOD());
133                 sys_unwatch(win, i, MOD());
134         }
135
136         dpy_t *dpy; col_t *col; row_t *row;
137         if (search(wm_tag, win, &dpy, &col, &row)) {
138                 wm_dpy = dpy;
139                 wm_col = col;
140                 wm_row = row;
141         }
142         sys_focus(win);
143 }
144
145 static void set_move(win_t *win, ptr_t ptr, drag_t drag)
146 {
147         printf("set_move: %d - %p@%d,%d\n",
148                         drag, win, ptr.rx, ptr.ry);
149         move_mode = drag;
150         if (drag == move || drag == resize) {
151                 searchl(wm_tag, win, NULL, &move_lcol, &move_lrow);
152                 move_prev = ptr;
153                 int my = win->y + (win->h/2);
154                 int mx = win->x + (win->w/2);
155                 move_dir.v = ptr.ry < my ? -1 : +1;
156                 move_dir.h = ptr.rx < mx ? -1 : +1;
157         }
158 }
159
160 static void print_txt(void)
161 {
162         for (list_t *ltag = wm->tags; ltag; ltag = ltag->next) {
163                 tag_t *tag = ltag->data;
164                 printf("tag:       <%-9p [%p->%p] >%-9p  -  %d\n",
165                                 ltag->prev, ltag, ltag->data, ltag->next, tag->name);
166         for (list_t *ldpy = tag->dpys; ldpy; ldpy = ldpy->next) {
167                 dpy_t *dpy  = ldpy->data;
168                 win_t *geom = dpy->geom;
169                 printf("  dpy:     <%-9p [%p->%p] >%-9p  -  %d,%d %dx%d\n",
170                                 ldpy->prev, ldpy, ldpy->data, ldpy->next,
171                                 geom->x, geom->y, geom->h, geom->w);
172         for (list_t *lcol = dpy->cols; lcol; lcol = lcol->next) {
173                 col_t *col = lcol->data;
174                 printf("    col:   <%-9p [%p->%p] >%-9p  -  %dpx @ %d !!%p\n",
175                                 lcol->prev, lcol, lcol->data, lcol->next,
176                                 col->width, col->mode, col->row);
177         for (list_t *lrow = col->rows; lrow; lrow = lrow->next) {
178                 row_t *row = lrow->data;
179                 win_t *win = row->win;
180                 printf("      win: <%-9p [%p>>%p] >%-9p  -  %4dpx focus=%d%d\n",
181                                 lrow->prev, lrow, win, lrow->next,
182                                 win->h, col->row == row, wm_focus == win);
183         } } } }
184 }
185
186 static void cut_win(tag_t *tag, win_t *win)
187 {
188         list_t *ldpy, *lcol, *lrow;
189         if (!searchl(tag, win, &ldpy, &lcol, &lrow))
190                 return;
191         col_t  *col  = COL(lcol);
192         dpy_t  *dpy  = DPY(ldpy);
193
194         col->row  = lrow->prev ? lrow->prev->data :
195                     lrow->next ? lrow->next->data : NULL;
196         col->rows = list_remove(col->rows, lrow);
197
198         if (col->rows == NULL && (lcol->next || lcol->prev)) {
199                 dpy->col  = lcol->prev ? lcol->prev->data :
200                             lcol->next ? lcol->next->data : NULL;
201                 dpy->cols = list_remove(dpy->cols, lcol);
202         }
203 }
204
205 static void put_win(win_t *win, dpy_t *dpy, col_t *col)
206 {
207         row_t *row = new0(row_t);
208         row->win = win;
209
210         if (col == NULL) {
211                 col = new0(col_t);
212                 dpy->cols = list_insert(dpy->cols, col);
213         }
214
215         int nrows = list_length(col->rows);
216         if (col->row) {
217                 list_t *prev = list_find(col->rows, col->row);
218                 list_insert_after(prev, row);
219         } else {
220                 col->rows = list_insert(col->rows, row);
221         }
222         wm_tag->dpy           = dpy;
223         wm_tag->dpy->col      = col;
224         wm_tag->dpy->col->row = row;
225
226         row->height = dpy->geom->h / MAX(nrows,1);
227         if (nrows == 0) {
228                 int ncols = list_length(dpy->cols);
229                 col->width = dpy->geom->w / MAX(ncols-1,1);
230         }
231 }
232
233 static void shift_window(win_t *win, int col, int row)
234 {
235         if (!win) return;
236         printf("shift_window: %p - %+d,%+d\n", win, col, row);
237         print_txt();
238         printf("shift_window: >>>\n");
239         list_t *ldpy, *lcol, *lrow;
240         searchl(wm_tag, win, &ldpy, &lcol, &lrow);
241         dpy_t *dpy = ldpy->data;
242         if (row != 0) {
243                 list_t *src = lrow, *dst = NULL;
244                 if (row < 0) dst = src->prev;
245                 if (row > 0) dst = src->next;
246                 if (src && dst) {
247                         printf("swap: %p <-> %p\n", src->data, dst->data);
248                         row_t *tmp = src->data;
249                         src->data = dst->data;
250                         dst->data = tmp;
251                         goto update;
252                 }
253         } else {
254                 int onlyrow = !lrow->prev && !lrow->next;
255                 list_t *src = lcol, *dst = NULL;
256                 if (col < 0) {
257                         if (src->prev) {
258                                 dst = src->prev;
259                         } else if (!onlyrow) {
260                                 dpy->cols = list_insert(dpy->cols, new0(col_t));
261                                 dst = src->prev;
262                         } else if (ldpy->prev) {
263                                 dpy = ldpy->prev->data;
264                                 dst = list_last(dpy->cols);
265                         } else {
266                                 return;
267                         }
268                 }
269                 if (col > 0) {
270                         if (src->next) {
271                                 dst = src->next;
272                         } else if (!onlyrow) {
273                                 dpy->cols = list_append(dpy->cols, new0(col_t));
274                                 dst = src->next;
275                         } else if (ldpy->next) {
276                                 dpy = ldpy->next->data;
277                                 dst = dpy->cols;
278                         } else {
279                                 return;
280                         }
281                 }
282                 cut_win(wm_tag, win);
283                 put_win(win, dpy, dst ? dst->data : NULL);
284                 goto update;
285         }
286 update:
287         print_txt();
288         wm_update();
289 }
290
291 static list_t *get_next(list_t *list, int forward)
292 {
293         list_t *next = forward ? list->next : list->prev;
294         if (next == NULL) {
295                 next = list;
296                 while ((list = forward ? next->prev : next->next))
297                         next = list;
298         }
299         return next;
300 }
301 static void shift_focus(int cols, int rows)
302 {
303         printf("shift_focus: %+d,%+d\n", cols, rows);
304         if (rows != 0 && wm_focus) {
305                 list_t *dpy, *col, *row;
306                 searchl(wm_tag, wm_focus, &dpy, &col, &row);
307                 row_t *next = get_next(row, rows > 0)->data;
308                 set_focus(next->win);
309                 if (COL(col)->mode != split)
310                         wm_update();
311         }
312         if (cols != 0) {
313                 list_t *dpy, *col, *row, *ndpy, *ncol = NULL;
314                 if (wm_focus) {
315                         searchl(wm_tag, wm_focus, &dpy, &col, &row);
316                         ncol = cols > 0 ? col->next : col->prev;
317                 } else {
318                         dpy = list_find(wm_tag->dpys, wm_dpy);
319                 }
320                 if (ncol == NULL) {
321                         ndpy = get_next(dpy, cols > 0);
322                         ncol = cols > 0 ? DPY(ndpy)->cols :
323                                 list_last(DPY(ndpy)->cols);
324                         wm_dpy = ndpy->data;
325                 }
326                 if (ncol && COL(ncol) && COL(ncol)->row)
327                         set_focus(COL(ncol)->row->win);
328                 else
329                         sys_focus(wm->root);
330         }
331 }
332
333 static tag_t *tag_new(list_t *screens, int name)
334 {
335         tag_t *tag = new0(tag_t);
336         tag->name  = name;
337         for (list_t *cur = screens; cur; cur = cur->next) {
338                 dpy_t *dpy  = new0(dpy_t);
339                 dpy->geom = cur->data;
340                 tag->dpys = list_append(tag->dpys, dpy);
341         }
342         tag->dpy  = tag->dpys->data;
343         return tag;
344 }
345
346 static tag_t *tag_find(int name)
347 {
348         tag_t *tag = NULL;
349         for (list_t *cur = wm->tags; cur; cur = cur->next)
350                 if (name == TAG(cur)->name) {
351                         tag = cur->data;
352                         break;
353                 }
354         if (!tag) {
355                 tag = tag_new(wm->screens, name);
356                 wm->tags = list_insert(wm->tags, tag);
357         }
358         return tag;
359 }
360
361 static void tag_set(win_t *win, int name)
362 {
363         printf("tag_set: %p %d\n", win, name);
364         if (wm_tag->name == name)
365                 return;
366         cut_win(wm_tag, win);
367         win_t *focus = wm_focus;
368
369         tag_t *tag = tag_find(name);
370         put_win(win, tag->dpy, tag->dpy->col);
371         set_focus(focus);
372 }
373
374 /* Window management functions */
375 void wm_update_dpy(dpy_t *dpy)
376 {
377         int  x=0,  y=0; // Current window top-left position
378         int tx=0, ty=0; // Total x/y size
379         int mx=0, my=0; // Maximum x/y size (screen size)
380         int       sy=0; // Size of focused stack window
381
382         /* Scale horizontally */
383         x  = dpy->geom->x;
384         mx = dpy->geom->w - (list_length(dpy->cols)+1)*MARGIN;
385         for (list_t *lx = dpy->cols; lx; lx = lx->next)
386                 tx += COL(lx)->width;
387         for (list_t *lx = dpy->cols; lx; lx = lx->next)
388                 COL(lx)->width *= (float)mx / tx;
389
390         /* Scale each column vertically */
391         for (list_t *lx = dpy->cols; lx; lx = lx->next) {
392                 col_t *col = lx->data;
393                 ty = 0;
394                 for (list_t *ly = col->rows; ly; ly = ly->next)
395                         ty += ROW(ly)->height;
396                 y  = dpy->geom->y;
397                 my = dpy->geom->h - (list_length(col->rows)+1)*MARGIN;
398                 sy = my              - (list_length(col->rows)-1)*STACK;
399                 for (list_t *ly = col->rows; ly; ly = ly->next) {
400                         win_t *win = ROW(ly)->win;
401                         win->h = ROW(ly)->height;
402                         int height = 0;
403                         switch (col->mode) {
404                         case split:
405                                 sys_move(win, x+MARGIN, y+MARGIN,
406                                         col->width, win->h * ((float)my / ty));
407                                 height = win->h;
408                                 break;
409                         case stack:
410                                 height = col->row->win == win ? sy : STACK;
411                                 sys_move(win, x+MARGIN, y+MARGIN,
412                                         col->width, height);
413                                 break;
414                         case max:
415                         case tab:
416                                 sys_move(win, x+MARGIN, 0+MARGIN,
417                                         col->width, dpy->geom->h-2*MARGIN);
418                                 if (col->row->win == win)
419                                         sys_raise(win);
420                                 break;
421                         }
422                         y += height + MARGIN;
423                         ROW(ly)->height = win->h;
424                 }
425                 x += col->width + MARGIN;
426         }
427 }
428
429 void wm_update(void)
430 {
431         /* Show/hide tags */
432         for (list_t *ltag =       wm ->tags; ltag; ltag = ltag->next)
433         for (list_t *ldpy = TAG(ltag)->dpys; ldpy; ldpy = ldpy->next)
434         for (list_t *lcol = DPY(ldpy)->cols; lcol; lcol = lcol->next)
435         for (list_t *lrow = COL(lcol)->rows; lrow; lrow = lrow->next)
436                 sys_show(ROW(lrow)->win,
437                         ltag->data == wm_tag ? st_show : st_hide);
438
439         /* Refrsh the display */
440         for (list_t *ldpy = wm_tag->dpys; ldpy; ldpy = ldpy->next)
441                 wm_update_dpy(ldpy->data);
442         if (wm_focus)
443                 set_focus(wm_focus);
444 }
445
446 int wm_handle_key(win_t *win, Key_t key, mod_t mod, ptr_t ptr)
447 {
448         if (!win || win == wm_dpy->geom) return 0;
449         //printf("wm_handle_key: %p - %x %c%c%c%c%c\n", win, key,
450         //      mod.up    ? '^' : 'v',
451         //      mod.alt   ? 'a' : '-',
452         //      mod.ctrl  ? 'c' : '-',
453         //      mod.shift ? 's' : '-',
454         //      mod.win   ? 'w' : '-');
455
456         /* Mouse movement */
457         if (key_mouse0 <= key && key <= key_mouse7 && mod.up)
458                 return set_move(win,ptr,none), 1;
459         else if (key == key_mouse1 && mod.MODKEY)
460                 return set_move(win,ptr,move), 1;
461         else if (key == key_mouse3 && mod.MODKEY)
462                 return set_move(win,ptr,resize), 1;
463
464         /* Only handle key-down */
465         if (mod.up)
466                 return 0;
467
468         /* Misc */
469         if (mod.MODKEY) {
470                 if (key == key_f1) return sys_raise(win), 1;
471                 if (key == key_f2) return set_focus(win), 1;
472                 if (key == key_f3) return sys_show(win, st_show), 1;
473                 if (key == key_f4) return sys_show(win, st_hide), 1;
474                 if (key == key_f5) return wm_update(),    1;
475                 if (key == key_f6) return print_txt(),    1;
476         }
477         if (key_mouse0 <= key && key <= key_mouse7)
478                 sys_raise(win);
479
480         /* Movement commands */
481         if (mod.MODKEY && mod.shift) {
482                 switch (key) {
483                 case 'h': return shift_window(wm_focus,-1, 0), 1;
484                 case 'j': return shift_window(wm_focus, 0,+1), 1;
485                 case 'k': return shift_window(wm_focus, 0,-1), 1;
486                 case 'l': return shift_window(wm_focus,+1, 0), 1;
487                 default: break;
488                 }
489         }
490         else if (mod.MODKEY) {
491                 switch (key) {
492                 case 'h': return shift_focus(-1, 0), 1;
493                 case 'j': return shift_focus( 0,+1), 1;
494                 case 'k': return shift_focus( 0,-1), 1;
495                 case 'l': return shift_focus(+1, 0), 1;
496                 default: break;
497                 }
498         }
499
500         /* Column mode commands */
501         if (mod.MODKEY) {
502                 switch (key) {
503                 case 'd': return set_mode(win, split), 1;
504                 case 's': return set_mode(win, stack), 1;
505                 case 'm': return set_mode(win, max),   1;
506                 case 't': return set_mode(win, tab),   1;
507                 default: break;
508                 }
509         }
510
511         /* Tag switching */
512         if (mod.MODKEY && '0' <= key && key <= '9') {
513                 int name = key - '0';
514                 if (mod.shift) {
515                         tag_set(win, name);
516                 } else {
517                         printf("tag_switch: %d\n", name);
518                         wm_tag = tag_find(name);
519                 }
520                 wm_update();
521         }
522
523         /* Focus change */
524         if (key == key_enter)
525                 return set_focus(win), 1;
526
527         if (key_mouse0 <= key && key <= key_mouse7)
528                 return set_focus(win), 0;
529
530         /* Reset focus after after focus change,
531          * not sure what is causing the focus change in the first place
532          * but preventing that would be a better solution */
533         if (key == key_focus)
534                 sys_focus(wm_focus ?: wm->root);
535
536         return 0;
537 }
538
539 int wm_handle_ptr(win_t *cwin, ptr_t ptr)
540 {
541         //printf("wm_handle_ptr: %p - %d,%d %d,%d (%d) -- \n",
542         //              cwin, ptr.x, ptr.y, ptr.rx, ptr.ry, move_mode);
543
544         if (move_mode == none)
545                 return 0;
546
547         /* Tiling */
548         int dx = ptr.rx - move_prev.rx;
549         int dy = ptr.ry - move_prev.ry;
550         move_prev = ptr;
551         if (move_mode == resize) {
552                 list_t *vert = move_dir.v < 0 ? move_lrow->prev : move_lrow->next;
553                 list_t *horz = move_dir.h < 0 ? move_lcol->prev : move_lcol->next;
554                 if (vert) {
555                         ROW(move_lrow)->height += move_dir.v * dy;
556                         ROW(vert)->height      -= move_dir.v * dy;
557                 }
558                 if (horz) {
559                         COL(move_lcol)->width  += move_dir.h * dx;
560                         COL(horz)->width       -= move_dir.h * dx;
561                 }
562                 wm_update();
563         }
564
565         /* Floating */
566         //win_t *mwin = move_win;
567         //int dx = ptr.rx - move_prev.rx;
568         //int dy = ptr.ry - move_prev.ry;
569         //move_prev = ptr;
570         //if (move_mode == move)
571         //      sys_move(mwin, mwin->x+dx, mwin->y+dy, mwin->w, mwin->h);
572         //else if (move_mode == resize)
573         //      sys_move(mwin, mwin->x, mwin->y, mwin->w+dx, mwin->h+dy);
574
575         return 0;
576 }
577
578 void wm_insert(win_t *win)
579 {
580         printf("wm_insert: %p\n", win);
581         print_txt();
582
583         /* Initialize window */
584         win->wm = new0(win_wm_t);
585         sys_watch(win, key_enter, MOD());
586         sys_watch(win, key_focus, MOD());
587
588         /* Add to screen */
589         put_win(win, wm_dpy, wm_col);
590
591         /* Arrange */
592         wm_update();
593         sys_focus(wm_focus);
594         print_txt();
595 }
596
597 void wm_remove(win_t *win)
598 {
599         printf("wm_remove: %p\n", win);
600         print_txt();
601         for (list_t *tag = wm->tags; tag; tag = tag->next)
602                 cut_win(tag->data, win);
603         if (wm_focus)
604                 sys_focus(wm_focus);
605         else
606                 sys_focus(wm->root);
607         wm_update();
608         print_txt();
609 }
610
611 void wm_init(win_t *root)
612 {
613         printf("wm_init: %p\n", root);
614
615         /* Hack, fix screen order */
616         list_t *screens = sys_info(root);
617         list_t *left  = screens;
618         list_t *right = screens->next;
619         if (left && right && WIN(left)->x > WIN(right)->x) {
620                 void *tmp   = left->data;
621                 left->data  = right->data;
622                 right->data = tmp;
623         }
624
625         wm          = new0(wm_t);
626         wm->root    = root;
627         wm->screens = screens;
628         wm->tag     = tag_new(wm->screens, 1);
629         wm->tags    = list_insert(NULL, wm->tag);
630
631         Key_t keys_e[] = {key_enter, key_focus};
632         Key_t keys_s[] = {'h', 'j', 'k', 'l',
633                 '0', '1', '2', '3', '4', '5', '6', '7', '8', '9'};
634         Key_t keys_m[] = {'h', 'j', 'k', 'l', 'd', 's', 'm', 't',
635                 '0', '1', '2', '3', '4', '5', '6', '7', '8', '9',
636                 /*key_f1, key_f2, key_f3, key_f4,*/ key_f5, key_f6,
637                 key_mouse1, key_mouse3};
638         for (int i = 0; i < countof(keys_e); i++)
639                 sys_watch(root, keys_e[i],  MOD());
640         for (int i = 0; i < countof(keys_m); i++)
641                 sys_watch(root, keys_m[i], MOD(.MODKEY=1));
642         for (int i = 0; i < countof(keys_s); i++)
643                 sys_watch(root, keys_s[i], MOD(.MODKEY=1,.shift=1));
644 }