]> git.decadent.org.uk Git - ion3.git/blob - ioncore/clientwin.c
Merge commit '20070720' into HEAD
[ion3.git] / ioncore / clientwin.c
1 /*
2  * ion/ioncore/clientwin.c
3  *
4  * Copyright (c) Tuomo Valkonen 1999-2007. 
5  *
6  * See the included file LICENSE for details.
7  */
8
9 #include <string.h>
10 #include <limits.h>
11 #include <ctype.h>
12
13 #include <libtu/objp.h>
14 #include <libtu/minmax.h>
15 #include <libextl/extl.h>
16 #include <libmainloop/defer.h>
17 #include <libmainloop/hooks.h>
18 #include "common.h"
19 #include "global.h"
20 #include "property.h"
21 #include "focus.h"
22 #include "sizehint.h"
23 #include "event.h"
24 #include "clientwin.h"
25 #include "colormap.h"
26 #include "resize.h"
27 #include "attach.h"
28 #include "regbind.h"
29 #include "bindmaps.h"
30 #include "names.h"
31 #include "saveload.h"
32 #include "manage.h"
33 #include "extlconv.h"
34 #include "fullscreen.h"
35 #include "event.h"
36 #include "rootwin.h"
37 #include "activity.h"
38 #include "netwm.h"
39 #include "xwindow.h"
40 #include "bindmaps.h"
41 #include "return.h"
42 #include "conf.h"
43 #include "group.h"
44
45
46 static void set_clientwin_state(WClientWin *cwin, int state);
47 static bool send_clientmsg(Window win, Atom a, Time stmp);
48
49
50 WHook *clientwin_do_manage_alt=NULL;
51 WHook *clientwin_mapped_hook=NULL;
52 WHook *clientwin_unmapped_hook=NULL;
53 WHook *clientwin_property_change_hook=NULL;
54
55
56 /*{{{ Get properties */
57
58
59 void clientwin_get_protocols(WClientWin *cwin)
60 {
61     Atom *protocols=NULL, *p;
62     int n;
63     
64     cwin->flags&=~(CLIENTWIN_P_WM_DELETE|CLIENTWIN_P_WM_TAKE_FOCUS);
65     
66     if(!XGetWMProtocols(ioncore_g.dpy, cwin->win, &protocols, &n))
67         return;
68     
69     for(p=protocols; n; n--, p++){
70         if(*p==ioncore_g.atom_wm_delete)
71             cwin->flags|=CLIENTWIN_P_WM_DELETE;
72         else if(*p==ioncore_g.atom_wm_take_focus)
73             cwin->flags|=CLIENTWIN_P_WM_TAKE_FOCUS;
74     }
75     
76     if(protocols!=NULL)
77         XFree((char*)protocols);
78 }
79
80
81 static WSizePolicy get_sizepolicy_winprop(WClientWin *cwin,
82                                           const char *propname,
83                                           WSizePolicy value)
84 {
85     char *szplcy;
86
87     if(extl_table_gets_s(cwin->proptab, propname, &szplcy)){
88         string2sizepolicy(szplcy, &value);
89         free(szplcy);
90     }
91     return value;
92 }
93
94
95 #define SIZEHINT_PROPS (CLIENTWIN_PROP_MAXSIZE|   \
96                         CLIENTWIN_PROP_MINSIZE|   \
97                         CLIENTWIN_PROP_ASPECT|    \
98                         CLIENTWIN_PROP_RSZINC|    \
99                         CLIENTWIN_PROP_I_MAXSIZE| \
100                         CLIENTWIN_PROP_I_MINSIZE| \
101                         CLIENTWIN_PROP_I_ASPECT|  \
102                         CLIENTWIN_PROP_I_RSZINC)
103
104
105 #define DO_SZH(NAME, FLAG, IFLAG, SZHFLAG, W, H, C)  \
106     if(extl_table_is_bool_set(tab, "ignore_" NAME)){ \
107         cwin->flags|=IFLAG;                          \
108     }else if(extl_table_gets_t(tab, NAME, &tab2)){   \
109         if(extl_table_gets_i(tab2, "w", &i1) &&      \
110            extl_table_gets_i(tab2, "h", &i2)){       \
111             cwin->size_hints.W=i1;                   \
112             cwin->size_hints.H=i2;                   \
113             C                                        \
114             cwin->size_hints.flags|=SZHFLAG;         \
115             cwin->flags|=FLAG;                       \
116         }                                            \
117         extl_unref_table(tab2);                      \
118     }
119
120
121 static void clientwin_get_winprops(WClientWin *cwin)
122 {
123     ExtlTab tab, tab2;
124     char *s;
125     int i1, i2;
126     
127     tab=ioncore_get_winprop(cwin);
128     
129     cwin->proptab=tab;
130     
131     if(tab==extl_table_none())
132         return;
133
134     if(extl_table_is_bool_set(tab, "transparent"))
135         cwin->flags|=CLIENTWIN_PROP_TRANSPARENT;
136
137     if(extl_table_is_bool_set(tab, "acrobatic"))
138         cwin->flags|=CLIENTWIN_PROP_ACROBATIC;
139     
140     DO_SZH("max_size", CLIENTWIN_PROP_MAXSIZE, CLIENTWIN_PROP_I_MAXSIZE,
141            PMaxSize, max_width, max_height, );
142            
143     DO_SZH("min_size", CLIENTWIN_PROP_MINSIZE, CLIENTWIN_PROP_I_MINSIZE,
144            PMinSize, min_width, min_height, );
145            
146     DO_SZH("resizeinc", CLIENTWIN_PROP_RSZINC, CLIENTWIN_PROP_I_RSZINC,
147            PResizeInc, width_inc, height_inc, );
148
149     DO_SZH("aspect", CLIENTWIN_PROP_ASPECT, CLIENTWIN_PROP_I_ASPECT,
150            PAspect, min_aspect.x, min_aspect.y, 
151            { cwin->size_hints.max_aspect.x=i1;
152              cwin->size_hints.max_aspect.y=i2;
153            });
154            
155     if(extl_table_is_bool_set(tab, "ignore_cfgrq"))
156         cwin->flags|=CLIENTWIN_PROP_IGNORE_CFGRQ;
157
158     if(extl_table_gets_s(tab, "orientation", &s)){
159         if(strcmp(s, "vertical")==0)
160             cwin->flags|=CLIENTWIN_PROP_O_VERT;
161         else if(strcmp(s, "horizontal")==0)
162             cwin->flags|=CLIENTWIN_PROP_O_HORIZ;
163         free(s);
164     }
165 }
166
167
168 void clientwin_get_size_hints(WClientWin *cwin)
169 {
170     XSizeHints tmp=cwin->size_hints;
171     
172     xwindow_get_sizehints(cwin->win, &(cwin->size_hints));
173     
174     if(cwin->flags&CLIENTWIN_PROP_I_MAXSIZE){
175         cwin->size_hints.flags&=~PMaxSize;
176     }else if(cwin->flags&CLIENTWIN_PROP_MAXSIZE){
177         cwin->size_hints.max_width=tmp.max_width;
178         cwin->size_hints.max_height=tmp.max_height;
179         cwin->size_hints.flags|=PMaxSize;
180     }
181     
182     if(cwin->flags&CLIENTWIN_PROP_I_MINSIZE){
183         cwin->size_hints.flags&=~PMinSize;
184     }else if(cwin->flags&CLIENTWIN_PROP_MINSIZE){
185         cwin->size_hints.min_width=tmp.min_width;
186         cwin->size_hints.min_height=tmp.min_height;
187         cwin->size_hints.flags|=PMinSize;
188     }
189     
190     if(cwin->flags&CLIENTWIN_PROP_I_ASPECT){
191         cwin->size_hints.flags&=~PAspect;
192     }else if(cwin->flags&CLIENTWIN_PROP_ASPECT){
193         cwin->size_hints.min_aspect=tmp.min_aspect;
194         cwin->size_hints.max_aspect=tmp.max_aspect;
195         cwin->size_hints.flags|=PAspect;
196     }
197     
198     if(cwin->flags&CLIENTWIN_PROP_I_RSZINC){
199         cwin->size_hints.flags&=~PResizeInc;
200     }else if(cwin->flags&CLIENTWIN_PROP_RSZINC){
201         cwin->size_hints.width_inc=tmp.width_inc;
202         cwin->size_hints.height_inc=tmp.height_inc;
203         cwin->size_hints.flags|=PResizeInc;
204     }
205 }
206
207
208 void clientwin_get_set_name(WClientWin *cwin)
209 {
210     char **list=NULL;
211     int n=0;
212     
213     if(ioncore_g.use_mb)
214         list=netwm_get_name(cwin);
215
216     if(list==NULL){
217         list=xwindow_get_text_property(cwin->win, XA_WM_NAME, &n);
218     }else{
219         cwin->flags|=CLIENTWIN_USE_NET_WM_NAME;
220     }
221
222     if(list==NULL){
223         /* Special condition kludge: property exists, but couldn't
224          * be converted to a string list.
225          */
226         clientwin_set_name(cwin, (n==-1 ? "???" : NULL));
227     }else{
228         clientwin_set_name(cwin, *list);
229         XFreeStringList(list);
230     }
231 }
232
233
234 /* Some standard winprops */
235
236
237 bool clientwin_get_switchto(const WClientWin *cwin)
238 {
239     bool b;
240     
241     if(ioncore_g.opmode==IONCORE_OPMODE_INIT)
242         return FALSE;
243     
244     if(extl_table_gets_b(cwin->proptab, "switchto", &b))
245         return b;
246     
247     return ioncore_g.switchto_new;
248 }
249
250
251 int clientwin_get_transient_mode(const WClientWin *cwin)
252 {
253     char *s;
254     int mode=TRANSIENT_MODE_NORMAL;
255     
256     if(extl_table_gets_s(cwin->proptab, "transient_mode", &s)){
257         if(strcmp(s, "current")==0)
258             mode=TRANSIENT_MODE_CURRENT;
259         else if(strcmp(s, "off")==0)
260             mode=TRANSIENT_MODE_OFF;
261         free(s);
262     }
263     return mode;
264 }
265
266
267 /*}}}*/
268
269
270 /*{{{ Manage/create */
271
272
273 static void configure_cwin_bw(Window win, int bw)
274 {
275     XWindowChanges wc;
276     ulong wcmask=CWBorderWidth;
277     
278     wc.border_width=bw;
279     XConfigureWindow(ioncore_g.dpy, win, wcmask, &wc);
280 }
281
282
283 static void set_sane_gravity(Window win)
284 {
285     XSetWindowAttributes attr;
286     
287     attr.win_gravity=NorthWestGravity;
288     
289     XChangeWindowAttributes(ioncore_g.dpy, win,
290                             CWWinGravity, &attr);
291 }
292
293
294 static bool clientwin_init(WClientWin *cwin, WWindow *par, Window win,
295                            XWindowAttributes *attr)
296 {
297     WFitParams fp;
298
299     cwin->flags=0;
300     cwin->win=win;
301     cwin->state=WithdrawnState;
302     
303     fp.g.x=attr->x;
304     fp.g.y=attr->y;
305     fp.g.w=attr->width;
306     fp.g.h=attr->height;
307     fp.mode=REGION_FIT_EXACT;
308     
309     /* The idiot who invented special server-supported window borders that
310      * are not accounted for in the window size should be "taken behind a
311      * sauna".
312      */
313     cwin->orig_bw=attr->border_width;
314     configure_cwin_bw(cwin->win, 0);
315     if(cwin->orig_bw!=0 && cwin->size_hints.flags&PWinGravity){
316         fp.g.x+=xgravity_deltax(cwin->size_hints.win_gravity, 
317                                -cwin->orig_bw, -cwin->orig_bw);
318         fp.g.y+=xgravity_deltay(cwin->size_hints.win_gravity, 
319                                -cwin->orig_bw, -cwin->orig_bw);
320     }
321     
322     set_sane_gravity(cwin->win);
323
324     cwin->n_cmapwins=0;
325     cwin->cmap=attr->colormap;
326     cwin->cmaps=NULL;
327     cwin->cmapwins=NULL;
328     cwin->n_cmapwins=0;
329     cwin->event_mask=IONCORE_EVENTMASK_CLIENTWIN;
330
331     region_init(&(cwin->region), par, &fp);
332
333     cwin->region.flags|=REGION_GRAB_ON_PARENT;
334     region_add_bindmap(&cwin->region, ioncore_clientwin_bindmap);
335         
336     XSelectInput(ioncore_g.dpy, win, cwin->event_mask);
337
338     clientwin_register(cwin);
339     clientwin_get_set_name(cwin);
340     clientwin_get_colormaps(cwin);
341     clientwin_get_protocols(cwin);
342     clientwin_get_winprops(cwin);
343     clientwin_get_size_hints(cwin);
344     
345     XSaveContext(ioncore_g.dpy, win, ioncore_g.win_context, (XPointer)cwin);
346     XAddToSaveSet(ioncore_g.dpy, win);
347
348     return TRUE;
349 }
350
351
352 static WClientWin *create_clientwin(WWindow *par, Window win,
353                                     XWindowAttributes *attr)
354 {
355     CREATEOBJ_IMPL(WClientWin, clientwin, (p, par, win, attr));
356 }
357
358
359
360 WClientWin *clientwin_get_transient_for(const WClientWin *cwin)
361 {
362     Window tforwin;
363     WClientWin *tfor=NULL;
364     
365     if(clientwin_get_transient_mode(cwin)!=TRANSIENT_MODE_NORMAL)
366         return NULL;
367
368     if(!XGetTransientForHint(ioncore_g.dpy, cwin->win, &tforwin))
369         return NULL;
370     
371     if(tforwin==None)
372         return NULL;
373     
374     tfor=XWINDOW_REGION_OF_T(tforwin, WClientWin);
375     
376     if(tfor==cwin){
377         warn(TR("The transient_for hint for \"%s\" points to itself."),
378              region_name((WRegion*)cwin));
379     }else if(tfor==NULL){
380         if(xwindow_region_of(tforwin)!=NULL){
381             warn(TR("Client window \"%s\" has broken transient_for hint. "
382                     "(\"Extended WM hints\" multi-parent brain damage?)"),
383                  region_name((WRegion*)cwin));
384         }
385     }else if(!region_same_rootwin((WRegion*)cwin, (WRegion*)tfor)){
386         warn(TR("The transient_for window for \"%s\" is not on the same "
387                 "screen."), region_name((WRegion*)cwin));
388     }else{
389         return tfor;
390     }
391     
392     return NULL;
393 }
394
395
396 static bool postmanage_check(WClientWin *cwin, XWindowAttributes *attr)
397 {
398     /* Check that the window exists. The previous check and selectinput
399      * do not seem to catch all cases of window destroyal.
400      */
401     XSync(ioncore_g.dpy, False);
402     
403     if(XGetWindowAttributes(ioncore_g.dpy, cwin->win, attr))
404         return TRUE;
405     
406     warn(TR("Window %#x disappeared."), cwin->win);
407     
408     return FALSE;
409 }
410
411
412 static bool do_manage_mrsh(bool (*fn)(WClientWin *cwin, WManageParams *pm),
413                            void **p)
414 {
415     return fn((WClientWin*)p[0], (WManageParams*)p[1]);
416 }
417
418
419
420 static bool do_manage_mrsh_extl(ExtlFn fn, void **p)
421 {
422     WClientWin *cwin=(WClientWin*)p[0];
423     WManageParams *mp=(WManageParams*)p[1];
424     ExtlTab t=manageparams_to_table(mp);
425     bool ret=FALSE;
426     
427     extl_call(fn, "ot", "b", cwin, t, &ret);
428     
429     extl_unref_table(t);
430     
431     return (ret && REGION_MANAGER(cwin)!=NULL);
432 }
433
434
435 /* This is called when a window is mapped on the root window.
436  * We want to check if we should manage the window and how and
437  * act appropriately.
438  */
439 WClientWin* ioncore_manage_clientwin(Window win, bool maprq)
440 {
441     WRootWin *rootwin;
442     WClientWin *cwin=NULL;
443     XWindowAttributes attr;
444     XWMHints *hints;
445     int init_state=NormalState;
446     WManageParams param=MANAGEPARAMS_INIT;
447     void *mrshpm[2];
448
449     param.dockapp=FALSE;
450     
451 again:
452     /* Is the window already being managed? */
453     cwin=XWINDOW_REGION_OF_T(win, WClientWin);
454     if(cwin!=NULL)
455         return cwin;
456     
457     /* Select for UnmapNotify and DestroyNotify as the
458      * window might get destroyed or unmapped in the meanwhile.
459      */
460     xwindow_unmanaged_selectinput(win, StructureNotifyMask);
461
462     
463     /* Is it a dockapp?
464      */
465     hints=XGetWMHints(ioncore_g.dpy, win);
466
467     if(hints!=NULL && hints->flags&StateHint)
468         init_state=hints->initial_state;
469     
470     if(!param.dockapp && init_state==WithdrawnState && 
471        hints->flags&IconWindowHint && hints->icon_window!=None){
472         /* The dockapp might be displaying its "main" window if no
473          * wm that understands dockapps has been managing it.
474          */
475         if(!maprq)
476             XUnmapWindow(ioncore_g.dpy, win);
477         
478         xwindow_unmanaged_selectinput(win, 0);
479         
480         /* Copy WM_CLASS as _ION_DOCKAPP_HACK */
481         {
482             char **p=NULL;
483             int n=0;
484             
485             p=xwindow_get_text_property(win, XA_WM_CLASS, &n);
486             
487             if(p!=NULL){
488                 xwindow_set_text_property(hints->icon_window, 
489                                           ioncore_g.atom_dockapp_hack,
490                                           (const char **)p, n);
491                 XFreeStringList(p);
492             }else{
493                 const char *pdummy[2]={"unknowndockapp", "UnknownDockapp"};
494                 xwindow_set_text_property(hints->icon_window, 
495                                           ioncore_g.atom_dockapp_hack,
496                                           pdummy, 2);
497             }
498         }
499         
500         /* It is a dockapp, do everything again from the beginning, now
501          * with the icon window.
502          */
503         win=hints->icon_window;
504         param.dockapp=TRUE;
505         goto again;
506     }
507     
508     if(hints!=NULL)
509         XFree((void*)hints);
510
511     if(!XGetWindowAttributes(ioncore_g.dpy, win, &attr)){
512         if(maprq)
513             warn(TR("Window %#x disappeared."), win);
514         goto fail2;
515     }
516     
517     attr.width=maxof(attr.width, 1);
518     attr.height=maxof(attr.height, 1);
519
520     /* Do we really want to manage it? */
521     if(!param.dockapp && (attr.override_redirect || 
522         (!maprq && attr.map_state!=IsViewable))){
523         goto fail2;
524     }
525
526     /* Find root window */
527     FOR_ALL_ROOTWINS(rootwin){
528         if(WROOTWIN_ROOT(rootwin)==attr.root)
529             break;
530     }
531
532     if(rootwin==NULL){
533         warn(TR("Unable to find a matching root window!"));
534         goto fail2;
535     }
536
537     /* Allocate and initialize */
538     cwin=create_clientwin((WWindow*)rootwin, win, &attr);
539     
540     if(cwin==NULL){
541         warn_err();
542         goto fail2;
543     }
544
545     param.geom=REGION_GEOM(cwin);
546     param.maprq=maprq;
547     param.switchto=(init_state!=IconicState && clientwin_get_switchto(cwin));
548     param.jumpto=extl_table_is_bool_set(cwin->proptab, "jumpto");
549     param.gravity=(cwin->size_hints.flags&PWinGravity
550                    ? cwin->size_hints.win_gravity
551                    : ForgetGravity);
552     param.tfor=clientwin_get_transient_for(cwin);
553     
554     if(!extl_table_gets_b(cwin->proptab, "userpos", &param.userpos))
555         param.userpos=(cwin->size_hints.flags&USPosition);
556     
557     if(cwin->flags&SIZEHINT_PROPS){
558         /* If size hints have been messed with, readjust requested geometry
559          * here. If programs themselves give incompatible geometries and
560          * things don't look good then, it's their fault.
561          */
562         region_size_hints_correct((WRegion*)cwin, &param.geom.w, &param.geom.h,
563                                   FALSE);
564     }
565
566     mrshpm[0]=cwin;
567     mrshpm[1]=&param;
568         
569     if(!hook_call_alt(clientwin_do_manage_alt, &mrshpm, 
570                       (WHookMarshall*)do_manage_mrsh,
571                       (WHookMarshallExtl*)do_manage_mrsh_extl)){
572         warn(TR("Unable to manage client window %#x."), win);
573         goto failure;
574     }
575     
576     if(ioncore_g.opmode==IONCORE_OPMODE_NORMAL &&
577        !region_is_fully_mapped((WRegion*)cwin) && 
578        !region_skip_focus((WRegion*)cwin)){
579         region_set_activity((WRegion*)cwin, SETPARAM_SET);
580     }
581     
582     if(postmanage_check(cwin, &attr)){
583         if(param.jumpto && ioncore_g.focus_next==NULL)
584             region_goto((WRegion*)cwin);
585         hook_call_o(clientwin_mapped_hook, (Obj*)cwin);
586         return cwin;
587     }
588
589 failure:
590     clientwin_destroyed(cwin);
591     return NULL;
592
593 fail2:
594     xwindow_unmanaged_selectinput(win, 0);
595     return NULL;
596 }
597
598
599 void clientwin_tfor_changed(WClientWin *cwin)
600 {
601 #if 0
602     WManageParams param=MANAGEPARAMS_INIT;
603     bool succeeded=FALSE;
604     param.tfor=clientwin_get_transient_for(cwin);
605     if(param.tfor==NULL)
606         return;
607     
608     region_rootpos((WRegion*)cwin, &(param.geom.x), &(param.geom.y));
609     param.geom.w=REGION_GEOM(cwin).w;
610     param.geom.h=REGION_GEOM(cwin).h;
611     param.maprq=FALSE;
612     param.userpos=FALSE;
613     param.switchto=region_may_control_focus((WRegion*)cwin);
614     param.jumpto=extl_table_is_bool_set(cwin->proptab, "jumpto");
615     param.gravity=ForgetGravity;
616     
617     CALL_ALT_B(succeeded, clientwin_do_manage_alt, (cwin, &param));
618     warn("WM_TRANSIENT_FOR changed for \"%s\".",
619          region_name((WRegion*)cwin));
620 #else
621     warn(TR("Changes is WM_TRANSIENT_FOR property are unsupported."));
622 #endif        
623 }
624
625
626 /*}}}*/
627
628
629 /*{{{ Unmanage/destroy */
630
631
632 static bool reparent_root(WClientWin *cwin)
633 {
634     XWindowAttributes attr;
635     WWindow *par;
636     Window dummy;
637     int x=0, y=0;
638     
639     if(!XGetWindowAttributes(ioncore_g.dpy, cwin->win, &attr))
640         return FALSE;
641     
642     par=REGION_PARENT(cwin);
643     
644     if(par==NULL){
645         x=REGION_GEOM(cwin).x;
646         y=REGION_GEOM(cwin).y;
647     }else{
648         int dr=REGION_GEOM(par).w-REGION_GEOM(cwin).w-REGION_GEOM(cwin).x;
649         int db=REGION_GEOM(par).h-REGION_GEOM(cwin).h-REGION_GEOM(cwin).y;
650         dr=maxof(dr, 0);
651         db=maxof(db, 0);
652         
653         XTranslateCoordinates(ioncore_g.dpy, par->win, attr.root, 0, 0, 
654                               &x, &y, &dummy);
655
656         x-=xgravity_deltax(cwin->size_hints.win_gravity, 
657                            maxof(0, REGION_GEOM(cwin).x), dr);
658         y-=xgravity_deltay(cwin->size_hints.win_gravity, 
659                            maxof(0, REGION_GEOM(cwin).y), db);
660     }
661     
662     XReparentWindow(ioncore_g.dpy, cwin->win, attr.root, x, y);
663     
664     return TRUE;
665 }
666
667
668 void clientwin_deinit(WClientWin *cwin)
669 {
670     WRegion *reg;
671     
672     if(cwin->win!=None){
673         region_pointer_focus_hack(&cwin->region);
674
675         xwindow_unmanaged_selectinput(cwin->win, 0);
676         XUnmapWindow(ioncore_g.dpy, cwin->win);
677         
678         if(cwin->orig_bw!=0)
679             configure_cwin_bw(cwin->win, cwin->orig_bw);
680         
681         if(reparent_root(cwin)){
682             if(ioncore_g.opmode==IONCORE_OPMODE_DEINIT){
683                 XMapWindow(ioncore_g.dpy, cwin->win);
684                 /* Make sure the topmost window has focus; it doesn't really
685                  * matter which one has as long as some has.
686                  */
687                 xwindow_do_set_focus(cwin->win);
688             }else{
689                 set_clientwin_state(cwin, WithdrawnState);
690                 netwm_delete_state(cwin);
691             }
692         }
693         
694         XRemoveFromSaveSet(ioncore_g.dpy, cwin->win);
695         XDeleteContext(ioncore_g.dpy, cwin->win, ioncore_g.win_context);
696     }
697     
698     clientwin_clear_colormaps(cwin);
699     
700     region_deinit((WRegion*)cwin);
701 }
702
703
704
705 static bool mrsh_u_c(WHookDummy *fn, void *param)
706 {
707     fn(*(Window*)param);
708     return TRUE;
709 }
710
711 static bool mrsh_u_extl(ExtlFn fn, void *param)
712 {
713     double d=*(Window*)param;
714     extl_call(fn, "d", NULL, d);
715     return TRUE;
716 }
717
718 static void clientwin_do_unmapped(WClientWin *cwin, Window win)
719 {
720     cwin->flags|=CLIENTWIN_UNMAP_RQ;
721     
722     /* First try a graceful chain-dispose */
723     if(!region_rqdispose((WRegion*)cwin)){
724         /* But force dispose anyway */
725         region_dispose((WRegion*)cwin);
726     }
727     
728     hook_call(clientwin_unmapped_hook, &win, mrsh_u_c, mrsh_u_extl);
729 }
730
731 /* Used when the window was unmapped */
732 void clientwin_unmapped(WClientWin *cwin)
733 {
734     clientwin_do_unmapped(cwin, cwin->win);
735 }
736
737
738 /* Used when the window was deastroyed */
739 void clientwin_destroyed(WClientWin *cwin)
740 {
741     Window win=cwin->win;
742     XRemoveFromSaveSet(ioncore_g.dpy, cwin->win);
743     XDeleteContext(ioncore_g.dpy, cwin->win, ioncore_g.win_context);
744     xwindow_unmanaged_selectinput(cwin->win, 0);
745     cwin->win=None;
746     clientwin_do_unmapped(cwin, win);
747 }
748
749
750 /*}}}*/
751
752
753 /*{{{ Kill/close */
754
755
756 static bool send_clientmsg(Window win, Atom a, Time stmp)
757 {
758     XClientMessageEvent ev;
759     
760     ev.type=ClientMessage;
761     ev.window=win;
762     ev.message_type=ioncore_g.atom_wm_protocols;
763     ev.format=32;
764     ev.data.l[0]=a;
765     ev.data.l[1]=stmp;
766     
767     return (XSendEvent(ioncore_g.dpy, win, False, 0L, (XEvent*)&ev)!=0);
768 }
769
770
771 /*EXTL_DOC
772  * Attempt to kill (with \code{XKillWindow}) the client that owns 
773  * the X window correspoding to \var{cwin}.
774  */
775 EXTL_EXPORT_MEMBER
776 void clientwin_kill(WClientWin *cwin)
777 {
778     XKillClient(ioncore_g.dpy, cwin->win);
779 }
780
781
782 void clientwin_rqclose(WClientWin *cwin, bool relocate_ignored)
783 {
784     /* Ignore relocate parameter -- client windows can always be 
785      * destroyed by the application in any case, so way may just as
786      * well assume relocate is always set.
787      */
788     
789     if(cwin->flags&CLIENTWIN_P_WM_DELETE){
790         send_clientmsg(cwin->win, ioncore_g.atom_wm_delete, 
791                        ioncore_get_timestamp());
792     }else{
793         warn(TR("Client does not support the WM_DELETE protocol."));
794     }
795 }
796
797
798 /*}}}*/
799
800
801 /*{{{ State (hide/show) */
802
803
804 static void set_clientwin_state(WClientWin *cwin, int state)
805 {
806     if(cwin->state!=state){
807         cwin->state=state;
808         xwindow_set_state_property(cwin->win, state);
809     }
810 }
811
812
813 static void hide_clientwin(WClientWin *cwin)
814 {
815     region_pointer_focus_hack(&cwin->region);
816
817     if(cwin->flags&CLIENTWIN_PROP_ACROBATIC){
818         XMoveWindow(ioncore_g.dpy, cwin->win,
819                     -2*REGION_GEOM(cwin).w, -2*REGION_GEOM(cwin).h);
820         return;
821     }
822     
823     set_clientwin_state(cwin, IconicState);
824     XSelectInput(ioncore_g.dpy, cwin->win,
825                  cwin->event_mask&~(StructureNotifyMask|EnterWindowMask));
826     XUnmapWindow(ioncore_g.dpy, cwin->win);
827     XSelectInput(ioncore_g.dpy, cwin->win, cwin->event_mask);
828 }
829
830
831 static void show_clientwin(WClientWin *cwin)
832 {
833     if(cwin->flags&CLIENTWIN_PROP_ACROBATIC){
834         XMoveWindow(ioncore_g.dpy, cwin->win,
835                     REGION_GEOM(cwin).x, REGION_GEOM(cwin).y);
836         if(cwin->state==NormalState)
837             return;
838     }
839     
840     XSelectInput(ioncore_g.dpy, cwin->win,
841                  cwin->event_mask&~(StructureNotifyMask|EnterWindowMask));
842     XMapWindow(ioncore_g.dpy, cwin->win);
843     XSelectInput(ioncore_g.dpy, cwin->win, cwin->event_mask);
844     set_clientwin_state(cwin, NormalState);
845 }
846
847
848 /*}}}*/
849
850
851 /*{{{ Resize/reparent/reconf helpers */
852
853
854 void clientwin_notify_rootpos(WClientWin *cwin, int rootx, int rooty)
855 {
856     XEvent ce;
857     Window win;
858     
859     if(cwin==NULL)
860         return;
861     
862     win=cwin->win;
863     
864     ce.xconfigure.type=ConfigureNotify;
865     ce.xconfigure.event=win;
866     ce.xconfigure.window=win;
867     ce.xconfigure.x=rootx-cwin->orig_bw;
868     ce.xconfigure.y=rooty-cwin->orig_bw;
869     ce.xconfigure.width=REGION_GEOM(cwin).w;
870     ce.xconfigure.height=REGION_GEOM(cwin).h;
871     ce.xconfigure.border_width=cwin->orig_bw;
872     ce.xconfigure.above=None;
873     ce.xconfigure.override_redirect=False;
874     
875     XSelectInput(ioncore_g.dpy, win, cwin->event_mask&~StructureNotifyMask);
876     XSendEvent(ioncore_g.dpy, win, False, StructureNotifyMask, &ce);
877     XSelectInput(ioncore_g.dpy, win, cwin->event_mask);
878 }
879
880
881 static void sendconfig_clientwin(WClientWin *cwin)
882 {
883     int rootx, rooty;
884     
885     region_rootpos(&cwin->region, &rootx, &rooty);
886     clientwin_notify_rootpos(cwin, rootx, rooty);
887 }
888
889
890 static void do_reparent_clientwin(WClientWin *cwin, Window win, int x, int y)
891 {
892     XSelectInput(ioncore_g.dpy, cwin->win,
893                  cwin->event_mask&~StructureNotifyMask);
894     XReparentWindow(ioncore_g.dpy, cwin->win, win, x, y);
895     XSelectInput(ioncore_g.dpy, cwin->win, cwin->event_mask);
896 }
897
898
899 static void convert_geom(const WFitParams *fp, 
900                          WClientWin *cwin, WRectangle *geom)
901 {
902     WFitParams fptmp=*fp;
903     WSizePolicy szplcy=SIZEPOLICY_FULL_EXACT;
904     
905     /*if(cwin->szplcy!=SIZEPOLICY_DEFAULT)
906         szplcy=cwin->szplcy;*/
907     
908     sizepolicy(&szplcy, (WRegion*)cwin, NULL, REGION_RQGEOM_WEAK_ALL, &fptmp);
909     
910     *geom=fptmp.g;
911 }
912
913
914 /*}}}*/
915
916
917 /*{{{ Region dynfuns */
918
919
920 static bool clientwin_fitrep(WClientWin *cwin, WWindow *np, 
921                              const WFitParams *fp)
922 {
923     WRectangle geom;
924     bool changes;
925     int w, h;
926
927     if(np!=NULL && !region_same_rootwin((WRegion*)cwin, (WRegion*)np))
928         return FALSE;
929     
930     if(fp->mode&REGION_FIT_WHATEVER){
931         geom.x=fp->g.x;
932         geom.y=fp->g.y;
933         geom.w=REGION_GEOM(cwin).w;
934         geom.h=REGION_GEOM(cwin).h;
935     }else{
936         geom=fp->g;
937     }
938     
939     changes=(REGION_GEOM(cwin).x!=geom.x ||
940              REGION_GEOM(cwin).y!=geom.y ||
941              REGION_GEOM(cwin).w!=geom.w ||
942              REGION_GEOM(cwin).h!=geom.h);
943     
944     REGION_GEOM(cwin)=geom;
945     
946     if(np==NULL && !changes)
947         return TRUE;
948     
949     if(np!=NULL){
950         region_unset_parent((WRegion*)cwin);
951         do_reparent_clientwin(cwin, np->win, geom.x, geom.y);
952         region_set_parent((WRegion*)cwin, np);
953         sendconfig_clientwin(cwin);
954         
955         if(!REGION_IS_FULLSCREEN(cwin))
956             cwin->flags&=~CLIENTWIN_FS_RQ;
957
958         netwm_update_state(cwin);
959     }
960     
961     w=maxof(1, geom.w);
962     h=maxof(1, geom.h);
963     
964     if(cwin->flags&CLIENTWIN_PROP_ACROBATIC && !REGION_IS_MAPPED(cwin)){
965         XMoveResizeWindow(ioncore_g.dpy, cwin->win,
966                           -2*REGION_GEOM(cwin).w, -2*REGION_GEOM(cwin).h, 
967                           w, h);
968     }else{
969         XMoveResizeWindow(ioncore_g.dpy, cwin->win, geom.x, geom.y, w, h);
970     }
971     
972     cwin->flags&=~CLIENTWIN_NEED_CFGNTFY;
973     
974     return TRUE;
975 }
976
977
978 static void clientwin_map(WClientWin *cwin)
979 {
980     show_clientwin(cwin);
981     REGION_MARK_MAPPED(cwin);
982 }
983
984
985 static void clientwin_unmap(WClientWin *cwin)
986 {
987     hide_clientwin(cwin);
988     REGION_MARK_UNMAPPED(cwin);
989 }
990
991
992 static void clientwin_do_set_focus(WClientWin *cwin, bool warp)
993 {
994     if(cwin->flags&CLIENTWIN_P_WM_TAKE_FOCUS){
995         Time stmp=ioncore_get_timestamp();
996         send_clientmsg(cwin->win, ioncore_g.atom_wm_take_focus, stmp);
997     }
998
999     region_finalise_focusing((WRegion*)cwin, cwin->win, warp);
1000     
1001     XSync(ioncore_g.dpy, 0);
1002 }
1003
1004
1005 void clientwin_restack(WClientWin *cwin, Window other, int mode)
1006 {
1007     xwindow_restack(cwin->win, other, mode);
1008 }
1009        
1010
1011 void clientwin_stacking(WClientWin *cwin, Window *bottomret, Window *topret)
1012 {
1013     *bottomret=cwin->win;
1014     *topret=cwin->win;
1015 }
1016
1017
1018 static Window clientwin_x_window(WClientWin *cwin)
1019 {
1020     return cwin->win;
1021 }
1022
1023
1024 static void clientwin_activated(WClientWin *cwin)
1025 {
1026     clientwin_install_colormap(cwin);
1027 }
1028
1029
1030 static void clientwin_size_hints(WClientWin *cwin, WSizeHints *hints_ret)
1031 {
1032     if(cwin->flags&CLIENTWIN_FS_RQ){
1033         /* Do not use size hints, when full screen mode has been
1034          * requested by the client window itself.
1035          */
1036         sizehints_clear(hints_ret);
1037     }else{
1038         xsizehints_to_sizehints(&cwin->size_hints, hints_ret);
1039     }
1040 }
1041
1042
1043 static int clientwin_orientation(WClientWin *cwin)
1044 {
1045     return (cwin->flags&CLIENTWIN_PROP_O_VERT
1046             ? REGION_ORIENTATION_VERTICAL
1047             : (cwin->flags&CLIENTWIN_PROP_O_HORIZ
1048                ? REGION_ORIENTATION_HORIZONTAL
1049                : REGION_ORIENTATION_NONE));
1050 }
1051
1052
1053 /*}}}*/
1054
1055
1056 /*{{{ Identity & lookup */
1057
1058
1059 /*EXTL_DOC
1060  * Returns a table containing the properties \code{WM_CLASS} (table entries
1061  * \var{instance} and \var{class}) and  \code{WM_WINDOW_ROLE} (\var{role})
1062  * properties for \var{cwin}. If a property is not set, the corresponding 
1063  * field(s) are unset in the  table.
1064  */
1065 EXTL_SAFE
1066 EXTL_EXPORT_MEMBER
1067 ExtlTab clientwin_get_ident(WClientWin *cwin)
1068 {
1069     char **p=NULL, **p2=NULL, *wrole=NULL;
1070     int n=0, n2=0, n3=0, tmp=0;
1071     Window tforwin=None;
1072     ExtlTab tab;
1073     bool dockapp_hack=FALSE;
1074     
1075     p=xwindow_get_text_property(cwin->win, XA_WM_CLASS, &n);
1076     
1077     p2=xwindow_get_text_property(cwin->win, ioncore_g.atom_dockapp_hack, &n2);
1078     
1079     dockapp_hack=(n2>0);
1080     
1081     if(p==NULL){
1082         /* Some dockapps do actually have WM_CLASS, so use it. */
1083         p=p2;
1084         n=n2;
1085         p2=NULL;
1086     }
1087     
1088     wrole=xwindow_get_string_property(cwin->win, ioncore_g.atom_wm_window_role, 
1089                                       &n3);
1090     
1091     tab=extl_create_table();
1092     if(n>=2 && p[1]!=NULL)
1093         extl_table_sets_s(tab, "class", p[1]);
1094     if(n>=1 && p[0]!=NULL)
1095         extl_table_sets_s(tab, "instance", p[0]);
1096     if(wrole!=NULL)
1097         extl_table_sets_s(tab, "role", wrole);
1098     
1099     if(XGetTransientForHint(ioncore_g.dpy, cwin->win, &tforwin) 
1100        && tforwin!=None){
1101         extl_table_sets_b(tab, "is_transient", TRUE);
1102     }
1103     
1104     if(dockapp_hack)
1105         extl_table_sets_b(tab, "is_dockapp", TRUE);
1106     
1107     if(p!=NULL)
1108         XFreeStringList(p);
1109     if(p2!=NULL)
1110         XFreeStringList(p2);
1111     if(wrole!=NULL)
1112         free(wrole);
1113     
1114     return tab;
1115 }
1116
1117
1118 /*}}}*/
1119
1120
1121 /*{{{ ConfigureRequest */
1122
1123
1124 static bool check_fs_cfgrq(WClientWin *cwin, XConfigureRequestEvent *ev)
1125 {
1126     /* check full screen request */
1127     if((ev->value_mask&(CWWidth|CWHeight))==(CWWidth|CWHeight)){
1128         WRegion *grp=region_groupleader_of((WRegion*)cwin);
1129         WScreen *scr=clientwin_fullscreen_chkrq(cwin, ev->width, ev->height);
1130         
1131         if(scr!=NULL && REGION_MANAGER(grp)!=(WRegion*)scr){
1132             bool sw=clientwin_fullscreen_may_switchto(cwin);
1133             
1134             cwin->flags|=CLIENTWIN_FS_RQ;
1135             
1136             if(!region_fullscreen_scr(grp, scr, sw))
1137                 cwin->flags&=~CLIENTWIN_FS_RQ;
1138                 
1139             return TRUE;
1140         }
1141     }
1142
1143     return FALSE;
1144 }
1145
1146
1147 static bool check_normal_cfgrq(WClientWin *cwin, XConfigureRequestEvent *ev)
1148 {
1149     if(ev->value_mask&(CWX|CWY|CWWidth|CWHeight)){
1150         WRQGeomParams rq=RQGEOMPARAMS_INIT;
1151         int gdx=0, gdy=0;
1152
1153         rq.flags=REGION_RQGEOM_WEAK_ALL|REGION_RQGEOM_ABSOLUTE;
1154         
1155         if(cwin->size_hints.flags&PWinGravity){
1156             rq.flags|=REGION_RQGEOM_GRAVITY;
1157             rq.gravity=cwin->size_hints.win_gravity;
1158         }
1159         
1160         /* Do I need to insert another disparaging comment on the person who
1161          * invented special server-supported window borders that are not 
1162          * accounted for in the window size? Keep it simple, stupid!
1163          */
1164         if(cwin->size_hints.flags&PWinGravity){
1165             gdx=xgravity_deltax(cwin->size_hints.win_gravity, 
1166                                -cwin->orig_bw, -cwin->orig_bw);
1167             gdy=xgravity_deltay(cwin->size_hints.win_gravity, 
1168                                -cwin->orig_bw, -cwin->orig_bw);
1169         }
1170         
1171         region_rootpos((WRegion*)cwin, &(rq.geom.x), &(rq.geom.y));
1172         rq.geom.w=REGION_GEOM(cwin).w;
1173         rq.geom.h=REGION_GEOM(cwin).h;
1174         
1175         if(ev->value_mask&CWWidth){
1176             /* If x was not changed, keep reference point where it was */
1177             if(cwin->size_hints.flags&PWinGravity){
1178                 rq.geom.x+=xgravity_deltax(cwin->size_hints.win_gravity, 0,
1179                                            ev->width-rq.geom.w);
1180             }
1181             rq.geom.w=maxof(ev->width, 1);
1182             rq.flags&=~REGION_RQGEOM_WEAK_W;
1183         }
1184         if(ev->value_mask&CWHeight){
1185             /* If y was not changed, keep reference point where it was */
1186             if(cwin->size_hints.flags&PWinGravity){
1187                 rq.geom.y+=xgravity_deltay(cwin->size_hints.win_gravity, 0,
1188                                            ev->height-rq.geom.h);
1189             }
1190             rq.geom.h=maxof(ev->height, 1);
1191             rq.flags&=~REGION_RQGEOM_WEAK_H;
1192         }
1193         if(ev->value_mask&CWX){
1194             rq.geom.x=ev->x+gdx;
1195             rq.flags&=~REGION_RQGEOM_WEAK_X;
1196         }
1197         if(ev->value_mask&CWY){
1198             rq.geom.y=ev->y+gdy;
1199             rq.flags&=~REGION_RQGEOM_WEAK_Y;
1200         }
1201         
1202         region_rqgeom((WRegion*)cwin, &rq, NULL);
1203         
1204         return TRUE;
1205     }
1206     
1207     return FALSE;
1208 }
1209
1210
1211 void clientwin_handle_configure_request(WClientWin *cwin,
1212                                         XConfigureRequestEvent *ev)
1213 {
1214     if(ev->value_mask&CWBorderWidth)
1215         cwin->orig_bw=ev->border_width;
1216     
1217     cwin->flags|=CLIENTWIN_NEED_CFGNTFY;
1218
1219     if(!(cwin->flags&CLIENTWIN_PROP_IGNORE_CFGRQ)){
1220         if(!check_fs_cfgrq(cwin, ev))
1221             check_normal_cfgrq(cwin, ev);
1222     }
1223
1224     if(cwin->flags&CLIENTWIN_NEED_CFGNTFY){
1225         sendconfig_clientwin(cwin);
1226         cwin->flags&=~CLIENTWIN_NEED_CFGNTFY;
1227     }
1228 }
1229
1230
1231 /*}}}*/
1232
1233
1234 /*{{{ Kludges */
1235
1236
1237 /*EXTL_DOC
1238  * Attempts to fix window size problems with non-ICCCM compliant
1239  * programs.
1240  */
1241 EXTL_EXPORT_MEMBER
1242 void clientwin_nudge(WClientWin *cwin)
1243 {
1244     XResizeWindow(ioncore_g.dpy, cwin->win, 
1245                   2*REGION_GEOM(cwin).w, 2*REGION_GEOM(cwin).h);
1246     XFlush(ioncore_g.dpy);
1247     XResizeWindow(ioncore_g.dpy, cwin->win, 
1248                   REGION_GEOM(cwin).w, REGION_GEOM(cwin).h);
1249 }
1250
1251
1252 /*}}}*/
1253
1254
1255 /*{{{ Misc. */
1256
1257
1258 /*EXTL_DOC
1259  * Return the X window id for the client window.
1260  */
1261 EXTL_SAFE
1262 EXTL_EXPORT_MEMBER
1263 double clientwin_xid(WClientWin *cwin)
1264 {
1265     return cwin->win;
1266 }
1267
1268
1269 /*}}}*/
1270
1271
1272 /*{{{ Save/load */
1273
1274
1275 static int last_checkcode=1;
1276
1277
1278 static ExtlTab clientwin_get_configuration(WClientWin *cwin)
1279 {
1280     int chkc=0;
1281     ExtlTab tab;
1282     SMCfgCallback *cfg_cb;
1283     SMAddCallback *add_cb;
1284     
1285     tab=region_get_base_configuration((WRegion*)cwin);
1286
1287     extl_table_sets_d(tab, "windowid", (double)(cwin->win));
1288     
1289     if(last_checkcode!=0){
1290         chkc=last_checkcode++;
1291         xwindow_set_integer_property(cwin->win, ioncore_g.atom_checkcode, 
1292                                      chkc);
1293         extl_table_sets_i(tab, "checkcode", chkc);
1294     }
1295
1296     ioncore_get_sm_callbacks(&add_cb, &cfg_cb);
1297     
1298     if(cfg_cb!=NULL)
1299         cfg_cb(cwin, tab);
1300     
1301     return tab;
1302 }
1303
1304
1305 WRegion *clientwin_load(WWindow *par, const WFitParams *fp, ExtlTab tab)
1306 {
1307     double wind=0;
1308     Window win=None;
1309     int chkc=0, real_chkc=0;
1310     WClientWin *cwin=NULL;
1311     XWindowAttributes attr;
1312     WRectangle rg;
1313     bool got_chkc=FALSE;
1314     
1315     if(!extl_table_gets_d(tab, "windowid", &wind) ||
1316        !extl_table_gets_i(tab, "checkcode", &chkc)){
1317         return NULL;
1318     }
1319     
1320     win=(Window)wind;
1321
1322     if(XWINDOW_REGION_OF(win)!=NULL){
1323         warn("Client window %x already managed.", win);
1324         return NULL;
1325     }
1326
1327     got_chkc=xwindow_get_integer_property(win, ioncore_g.atom_checkcode, 
1328                                           &real_chkc);
1329     
1330     if(!got_chkc || real_chkc!=chkc){
1331         ioncore_clientwin_load_missing();
1332         return NULL;
1333     }
1334
1335     /* Found it! */
1336     
1337     if(!XGetWindowAttributes(ioncore_g.dpy, win, &attr)){
1338         warn(TR("Window %#x disappeared."), win);
1339         return NULL;
1340     }
1341     
1342     if(attr.override_redirect || 
1343        (ioncore_g.opmode==IONCORE_OPMODE_INIT && attr.map_state!=IsViewable)){
1344         warn(TR("Saved client window does not want to be managed."));
1345         return NULL;
1346     }
1347     
1348     cwin=create_clientwin(par, win, &attr);
1349     
1350     if(cwin==NULL)
1351         return FALSE;
1352     
1353     /* Reparent and resize taking limits set by size hints into account */
1354     convert_geom(fp, cwin, &rg);
1355     REGION_GEOM(cwin)=rg;
1356     do_reparent_clientwin(cwin, par->win, rg.x, rg.y);
1357     XResizeWindow(ioncore_g.dpy, win, maxof(1, rg.w), maxof(1, rg.h));
1358     
1359     if(!postmanage_check(cwin, &attr)){
1360         clientwin_destroyed(cwin);
1361         return NULL;
1362     }
1363     
1364     return (WRegion*)cwin;
1365 }
1366
1367
1368 /*}}}*/
1369
1370
1371 /*{{{ Dynfuntab and class info */
1372
1373
1374 static DynFunTab clientwin_dynfuntab[]={
1375     {(DynFun*)region_fitrep,
1376      (DynFun*)clientwin_fitrep},
1377
1378     {region_map,
1379      clientwin_map},
1380     
1381     {region_unmap,
1382      clientwin_unmap},
1383     
1384     {region_do_set_focus, 
1385      clientwin_do_set_focus},
1386     
1387     {region_notify_rootpos, 
1388      clientwin_notify_rootpos},
1389     
1390     {region_restack, 
1391      clientwin_restack},
1392
1393     {region_stacking, 
1394      clientwin_stacking},
1395     
1396     {(DynFun*)region_xwindow, 
1397      (DynFun*)clientwin_x_window},
1398     
1399     {region_activated, 
1400      clientwin_activated},
1401     
1402     {region_size_hints, 
1403      clientwin_size_hints},
1404      
1405     {(DynFun*)region_orientation, 
1406      (DynFun*)clientwin_orientation},
1407     
1408     {(DynFun*)region_rqclose, 
1409      (DynFun*)clientwin_rqclose},
1410     
1411     {(DynFun*)region_get_configuration,
1412      (DynFun*)clientwin_get_configuration},
1413
1414     END_DYNFUNTAB
1415 };
1416
1417
1418 EXTL_EXPORT
1419 IMPLCLASS(WClientWin, WRegion, clientwin_deinit, clientwin_dynfuntab);
1420
1421
1422 /*}}}*/