ioncore/frame-pointer.c

   1 /*
   2  * ion/ioncore/frame-pointer.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
  11 #include <libtu/objp.h>
  12
  13 #include "common.h"
  14 #include "global.h"
  15 #include "pointer.h"
  16 #include "cursor.h"
  17 #include "focus.h"
  18 #include "attach.h"
  19 #include "resize.h"
  20 #include "grab.h"
  21 #include "frame.h"
  22 #include "framep.h"
  23 #include "frame-pointer.h"
  24 #include "frame-draw.h"
  25 #include "bindmaps.h"
  26 #include "infowin.h"
  27 #include "rectangle.h"
  28 #include "xwindow.h"
  29 #include "names.h"
  30 #include "presize.h"
  31 #include "llist.h"
  32
  33
  34 static int p_tab_x=0, p_tab_y=0, p_tabnum=-1;
  35 static WInfoWin *tabdrag_infowin=NULL;
  36
  37
  38 /*{{{ Frame press */
  39
  40
  41 static WRegion *sub_at_tab(WFrame *frame)
  42 {
  43     return mplex_mx_nth((WMPlex*)frame, p_tabnum);
  44 }
  45
  46
  47 int frame_press(WFrame *frame, XButtonEvent *ev, WRegion **reg_ret)
  48 {
  49     WRegion *sub=NULL;
  50     WRectangle g;
  51
  52     p_tabnum=-1;
  53
  54     window_p_resize_prepare((WWindow*)frame, ev);
  55
  56     /* Check tab */
  57
  58     frame_bar_geom(frame, &g);
  59
  60     /* Borders act like tabs at top of the parent region */
  61     if(REGION_GEOM(frame).y==0){
  62         g.h+=g.y;
  63         g.y=0;
  64     }
  65
  66     if(rectangle_contains(&g, ev->x, ev->y)){
  67         p_tabnum=frame_tab_at_x(frame, ev->x);
  68
  69         region_rootpos((WRegion*)frame, &p_tab_x, &p_tab_y);
  70         p_tab_x+=frame_nth_tab_x(frame, p_tabnum);
  71         p_tab_y+=g.y;
  72
  73         sub=mplex_mx_nth(&(frame->mplex), p_tabnum);
  74
  75         if(reg_ret!=NULL)
  76             *reg_ret=sub;
  77
  78         return FRAME_AREA_TAB;
  79     }else{
  80         WLListIterTmp tmp;
  81         FRAME_MX_FOR_ALL(sub, frame, tmp){
  82             p_tabnum++;
  83             if(sub==FRAME_CURRENT(frame))
  84                 break;
  85         }
  86
  87         if(sub!=NULL){
  88             p_tab_x=ev->x_root-frame_nth_tab_w(frame, p_tabnum)/2;
  89             p_tab_y=ev->y_root-frame->bar_h/2;
  90         }else{
  91             p_tabnum=-1;
  92         }
  93     }
  94
  95
  96     /* Check border */
  97
  98     frame_border_inner_geom(frame, &g);
  99
 100     if(rectangle_contains(&g, ev->x, ev->y))
 101         return FRAME_AREA_CLIENT;
 102
 103     return FRAME_AREA_BORDER;
 104 }
 105
 106
 107 /*}}}*/
 108
 109
 110 /*{{{ Tab drag */
 111
 112
 113 static ExtlExportedFn *tabdrag_safe_fns[]={
 114     (ExtlExportedFn*)&mplex_switch_nth,
 115     (ExtlExportedFn*)&mplex_switch_next,
 116     (ExtlExportedFn*)&mplex_switch_prev,
 117     NULL
 118 };
 119
 120 static ExtlSafelist tabdrag_safelist=EXTL_SAFELIST_INIT(tabdrag_safe_fns);
 121
 122
 123 #define BUTTONS_MASK \
 124     (Button1Mask|Button2Mask|Button3Mask|Button4Mask|Button5Mask)
 125
 126
 127 static bool tabdrag_kbd_handler(WRegion *reg, XEvent *xev)
 128 {
 129     XKeyEvent *ev=&xev->xkey;
 130     WBinding *binding=NULL;
 131     WBindmap **bindptr;
 132
 133     if(ev->type==KeyRelease)
 134         return FALSE;
 135
 136     assert(reg!=NULL);
 137
 138     binding=bindmap_lookup_binding(ioncore_screen_bindmap, BINDING_KEYPRESS,
 139                                    ev->state&~BUTTONS_MASK, ev->keycode);
 140
 141     if(binding!=NULL && binding->func!=extl_fn_none()){
 142         extl_protect(&tabdrag_safelist);
 143         extl_call(binding->func, "o", NULL, region_screen_of(reg));
 144         extl_unprotect(&tabdrag_safelist);
 145     }
 146
 147     return FALSE;
 148 }
 149
 150
 151 static void setup_dragwin(WFrame *frame, uint tab)
 152 {
 153     WRectangle g;
 154     WRootWin *rw;
 155     WFitParams fp;
 156     const char *tab_style=framemode_get_tab_style(frame->mode);
 157
 158     assert(tabdrag_infowin==NULL);
 159
 160     rw=region_rootwin_of((WRegion*)frame);
 161
 162     fp.mode=REGION_FIT_EXACT;
 163     fp.g.x=p_tab_x;
 164     fp.g.y=p_tab_y;
 165     fp.g.w=frame_nth_tab_w(frame, tab);
 166     fp.g.h=frame->bar_h;
 167
 168     tabdrag_infowin=create_infowin((WWindow*)rw, &fp, tab_style);
 169
 170     if(tabdrag_infowin==NULL)
 171         return;
 172
 173     frame_setup_dragwin_style(frame, infowin_stylespec(tabdrag_infowin), tab);
 174
 175     if(frame->titles[tab].text!=NULL){
 176         char *buf=INFOWIN_BUFFER(tabdrag_infowin);
 177         strncpy(buf, frame->titles[tab].text, INFOWIN_BUFFER_LEN-1);
 178         buf[INFOWIN_BUFFER_LEN-1]='\0';
 179     }
 180 }
 181
 182
 183 static void p_tabdrag_motion(WFrame *frame, XMotionEvent *ev,
 184                              int dx, int dy)
 185 {
 186     WRootWin *rootwin=region_rootwin_of((WRegion*)frame);
 187
 188     p_tab_x+=dx;
 189     p_tab_y+=dy;
 190
 191     if(tabdrag_infowin!=NULL){
 192         WRectangle g;
 193         g.x=p_tab_x;
 194         g.y=p_tab_y;
 195         g.w=REGION_GEOM(tabdrag_infowin).w;
 196         g.h=REGION_GEOM(tabdrag_infowin).h;
 197         region_fit((WRegion*)tabdrag_infowin, &g, REGION_FIT_EXACT);
 198     }
 199 }
 200
 201
 202 static void p_tabdrag_begin(WFrame *frame, XMotionEvent *ev,
 203                             int dx, int dy)
 204 {
 205     WRootWin *rootwin=region_rootwin_of((WRegion*)frame);
 206
 207     if(p_tabnum<0)
 208         return;
 209
 210     ioncore_change_grab_cursor(IONCORE_CURSOR_DRAG);
 211
 212     setup_dragwin(frame, p_tabnum);
 213
 214     frame->tab_dragged_idx=p_tabnum;
 215     frame_update_attr_nth(frame, p_tabnum);
 216
 217     frame_draw_bar(frame, FALSE);
 218
 219     p_tabdrag_motion(frame, ev, dx, dy);
 220
 221     if(tabdrag_infowin!=NULL)
 222         window_map((WWindow*)tabdrag_infowin);
 223 }
 224
 225
 226 static WRegion *fnd(Window root, int x, int y)
 227 {
 228     Window win=root;
 229     int dstx, dsty;
 230     WRegion *reg=NULL;
 231     WWindow *w=NULL;
 232     WScreen *scr;
 233
 234     FOR_ALL_SCREENS(scr){
 235         if(region_root_of((WRegion*)scr)==root &&
 236            rectangle_contains(&REGION_GEOM(scr), x, y)){
 237             break;
 238         }
 239     }
 240
 241     w=(WWindow*)scr;
 242
 243     while(w!=NULL){
 244         if(HAS_DYN(w, region_handle_drop))
 245             reg=(WRegion*)w;
 246
 247         if(!XTranslateCoordinates(ioncore_g.dpy, root, w->win,
 248                                   x, y, &dstx, &dsty, &win)){
 249             break;
 250         }
 251
 252         w=XWINDOW_REGION_OF_T(win, WWindow);
 253         /*x=dstx;
 254         y=dsty;*/
 255     }
 256
 257     return reg;
 258 }
 259
 260
 261 static bool drop_ok(WRegion *mgr, WRegion *reg)
 262 {
 263     WRegion *reg2=mgr;
 264     for(reg2=mgr; reg2!=NULL; reg2=region_manager(reg2)){
 265         if(reg2==reg)
 266             goto err;
 267     }
 268
 269     for(reg2=REGION_PARENT_REG(mgr); reg2!=NULL; reg2=REGION_PARENT_REG(reg2)){
 270         if(reg2==reg)
 271             goto err;
 272     }
 273
 274     return TRUE;
 275
 276 err:
 277     warn(TR("Attempt to make region %s manage its ancestor %s."),
 278          region_name(mgr), region_name(reg));
 279     return FALSE;
 280 }
 281
 282
 283 static void tabdrag_deinit(WFrame *frame)
 284 {
 285     int idx=frame->tab_dragged_idx;
 286     frame->tab_dragged_idx=-1;
 287     frame_update_attr_nth(frame, idx);
 288
 289     if(tabdrag_infowin!=NULL){
 290         destroy_obj((Obj*)tabdrag_infowin);
 291         tabdrag_infowin=NULL;
 292     }
 293 }
 294
 295
 296 static void tabdrag_killed(WFrame *frame)
 297 {
 298     tabdrag_deinit(frame);
 299     if(!OBJ_IS_BEING_DESTROYED(frame))
 300         frame_draw_bar(frame, TRUE);
 301 }
 302
 303
 304 static void p_tabdrag_end(WFrame *frame, XButtonEvent *ev)
 305 {
 306     WRegion *sub=NULL;
 307     WRegion *dropped_on;
 308     Window win=None;
 309
 310     sub=sub_at_tab(frame);
 311
 312     tabdrag_deinit(frame);
 313
 314     /* Must be same root window */
 315     if(sub==NULL || ev->root!=region_root_of(sub))
 316         return;
 317
 318     dropped_on=fnd(ev->root, ev->x_root, ev->y_root);
 319
 320     if(dropped_on==NULL || dropped_on==(WRegion*)frame ||
 321        dropped_on==sub || !drop_ok(dropped_on, sub)){
 322         frame_draw_bar(frame, TRUE);
 323         return;
 324     }
 325
 326     if(region_handle_drop(dropped_on, p_tab_x, p_tab_y, sub))
 327         region_goto(dropped_on);
 328     else
 329         frame_draw_bar(frame, TRUE);
 330 }
 331
 332
 333 /*EXTL_DOC
 334  * Start dragging the tab that the user pressed on with the pointing device.
 335  * This function should only be used by binding it to \emph{mpress} or
 336  * \emph{mdrag} action with area \codestr{tab}.
 337  */
 338 EXTL_EXPORT_MEMBER
 339 void frame_p_tabdrag(WFrame *frame)
 340 {
 341     if(p_tabnum<0)
 342         return;
 343
 344     ioncore_set_drag_handlers((WRegion*)frame,
 345                         (WMotionHandler*)p_tabdrag_begin,
 346                         (WMotionHandler*)p_tabdrag_motion,
 347                         (WButtonHandler*)p_tabdrag_end,
 348                         tabdrag_kbd_handler,
 349                         (GrabKilledHandler*)tabdrag_killed);
 350 }
 351
 352
 353 /*}}}*/
 354
 355
 356 /*{{{ switch_tab */
 357
 358
 359 /*EXTL_DOC
 360  * Display the region corresponding to the tab that the user pressed on.
 361  * This function should only be used by binding it to a mouse action.
 362  */
 363 EXTL_EXPORT_MEMBER
 364 void frame_p_switch_tab(WFrame *frame)
 365 {
 366     WRegion *sub;
 367
 368     if(ioncore_pointer_grab_region()!=(WRegion*)frame)
 369         return;
 370
 371     sub=sub_at_tab(frame);
 372
 373     if(sub!=NULL){
 374         bool mcf=region_may_control_focus((WRegion*)frame);
 375         region_goto_flags(sub, (mcf
 376                                 ? REGION_GOTO_FOCUS|REGION_GOTO_NOWARP
 377                                 : 0));
 378     }
 379 }
 380
 381
 382 /*}}}*/
 383