Dogcows Code - chaz/openbox/blob - src/client.cc

   1 // -*- mode: C++; indent-tabs-mode: nil; c-basic-offset: 2; -*-
   2
   3 #ifdef HAVE_CONFIG_H
   4 # include "../config.h"
   5 #endif
   6
   7 #include "client.hh"
   8 #include "frame.hh"
   9 #include "screen.hh"
  10 #include "bbscreen.hh"
  11 #include "openbox.hh"
  12 #include "otk/display.hh"
  13 #include "otk/property.hh"
  14
  15 extern "C" {
  16 #include <X11/Xlib.h>
  17 #include <X11/Xutil.h>
  18
  19 #include <assert.h>
  20
  21 #include "gettext.h"
  22 #define _(str) gettext(str)
  23 }
  24
  25 namespace ob {
  26
  27 OBClient::OBClient(int screen, Window window)
  28   : otk::OtkEventHandler(),
  29     _screen(screen), _window(window)
  30 {
  31   assert(screen >= 0);
  32   assert(window);
  33
  34   ignore_unmaps = 0;
  35
  36   // update EVERYTHING the first time!!
  37
  38   // the state is kinda assumed to be normal. is this right? XXX
  39   _wmstate = NormalState;
  40   // no default decors or functions, each has to be enabled
  41   _decorations = _functions = 0;
  42
  43   getArea();
  44   getDesktop();
  45   getType();
  46
  47   // set the decorations and functions
  48   switch (_type) {
  49   case Type_Normal:
  50     // normal windows retain all of the possible decorations and
  51     // functionality
  52     _decorations = Decor_Titlebar | Decor_Handle | Decor_Border |
  53                    Decor_Iconify | Decor_Maximize;
  54     _functions = Func_Resize | Func_Move | Func_Iconify | Func_Maximize;
  55
  56   case Type_Dialog:
  57     // dialogs cannot be maximized
  58     _decorations &= ~Decor_Maximize;
  59     _functions &= ~Func_Maximize;
  60     break;
  61
  62   case Type_Menu:
  63   case Type_Toolbar:
  64   case Type_Utility:
  65     // these windows get less functionality
  66     _decorations &= ~(Decor_Iconify | Decor_Handle);
  67     _functions &= ~(Func_Iconify | Func_Resize);
  68     break;
  69
  70   case Type_Desktop:
  71   case Type_Dock:
  72   case Type_Splash:
  73     // none of these windows are manipulated by the window manager
  74     _decorations = 0;
  75     _functions = 0;
  76     break;
  77   }
  78
  79   getMwmHints(); // this fucks (in good ways) with the decors and functions
  80   getState();
  81   getShaped();
  82
  83   updateProtocols();
  84   updateNormalHints();
  85   updateWMHints();
  86   // XXX: updateTransientFor();
  87   updateTitle();
  88   updateIconTitle();
  89   updateClass();
  90
  91 /*
  92 #ifdef DEBUG
  93   printf("Mapped window: 0x%lx\n"
  94          "  title:         \t%s\t  icon title:    \t%s\n"
  95          "  app name:      \t%s\t\t  class:         \t%s\n"
  96          "  position:      \t%d, %d\t\t  size:          \t%d, %d\n"
  97          "  desktop:       \t%lu\t\t  group:         \t0x%lx\n"
  98          "  type:          \t%d\t\t  min size       \t%d, %d\n"
  99          "  base size      \t%d, %d\t\t  max size       \t%d, %d\n"
 100          "  size incr      \t%d, %d\t\t  gravity        \t%d\n"
 101          "  wm state       \t%ld\t\t  can be focused:\t%s\n"
 102          "  notify focus:  \t%s\t\t  urgent:        \t%s\n"
 103          "  shaped:        \t%s\t\t  modal:         \t%s\n"
 104          "  shaded:        \t%s\t\t  iconic:        \t%s\n"
 105          "  vert maximized:\t%s\t\t  horz maximized:\t%s\n"
 106          "  fullscreen:    \t%s\t\t  floating:      \t%s\n"
 107          "  requested pos: \t%s\n",
 108          _window,
 109          _title.c_str(),
 110          _icon_title.c_str(),
 111          _app_name.c_str(),
 112          _app_class.c_str(),
 113          _area.x(), _area.y(),
 114          _area.width(), _area.height(),
 115          _desktop,
 116          _group,
 117          _type,
 118          _min_x, _min_y,
 119          _base_x, _base_y,
 120          _max_x, _max_y,
 121          _inc_x, _inc_y,
 122          _gravity,
 123          _wmstate,
 124          _can_focus ? "yes" : "no",
 125          _focus_notify ? "yes" : "no",
 126          _urgent ? "yes" : "no",
 127          _shaped ? "yes" : "no",
 128          _modal ? "yes" : "no",
 129          _shaded ? "yes" : "no",
 130          _iconic ? "yes" : "no",
 131          _max_vert ? "yes" : "no",
 132          _max_horz ? "yes" : "no",
 133          _fullscreen ? "yes" : "no",
 134          _floating ? "yes" : "no",
 135          _positioned ? "yes" : "no");
 136 #endif
 137 */
 138 }
 139
 140
 141 OBClient::~OBClient()
 142 {
 143   const otk::OBProperty *property = Openbox::instance->property();
 144
 145   // these values should not be persisted across a window unmapping/mapping
 146   property->erase(_window, otk::OBProperty::net_wm_desktop);
 147   property->erase(_window, otk::OBProperty::net_wm_state);
 148 }
 149
 150
 151 void OBClient::getDesktop()
 152 {
 153   const otk::OBProperty *property = Openbox::instance->property();
 154
 155   // defaults to the current desktop
 156   _desktop = 0; // XXX: change this to the current desktop!
 157
 158   property->get(_window, otk::OBProperty::net_wm_desktop,
 159                 otk::OBProperty::Atom_Cardinal,
 160                 &_desktop);
 161 }
 162
 163
 164 void OBClient::getType()
 165 {
 166   const otk::OBProperty *property = Openbox::instance->property();
 167
 168   _type = (WindowType) -1;
 169
 170   unsigned long *val;
 171   unsigned long num = (unsigned) -1;
 172   if (property->get(_window, otk::OBProperty::net_wm_window_type,
 173                     otk::OBProperty::Atom_Atom,
 174                     &num, &val)) {
 175     // use the first value that we know about in the array
 176     for (unsigned long i = 0; i < num; ++i) {
 177       if (val[i] ==
 178           property->atom(otk::OBProperty::net_wm_window_type_desktop))
 179         _type = Type_Desktop;
 180       else if (val[i] ==
 181                property->atom(otk::OBProperty::net_wm_window_type_dock))
 182         _type = Type_Dock;
 183       else if (val[i] ==
 184                property->atom(otk::OBProperty::net_wm_window_type_toolbar))
 185         _type = Type_Toolbar;
 186       else if (val[i] ==
 187                property->atom(otk::OBProperty::net_wm_window_type_menu))
 188         _type = Type_Menu;
 189       else if (val[i] ==
 190                property->atom(otk::OBProperty::net_wm_window_type_utility))
 191         _type = Type_Utility;
 192       else if (val[i] ==
 193                property->atom(otk::OBProperty::net_wm_window_type_splash))
 194         _type = Type_Splash;
 195       else if (val[i] ==
 196                property->atom(otk::OBProperty::net_wm_window_type_dialog))
 197         _type = Type_Dialog;
 198       else if (val[i] ==
 199                property->atom(otk::OBProperty::net_wm_window_type_normal))
 200         _type = Type_Normal;
 201 //      else if (val[i] ==
 202 //               property->atom(otk::OBProperty::kde_net_wm_window_type_override))
 203 //        mwm_decorations = 0; // prevent this window from getting any decor
 204       // XXX: make this work again
 205     }
 206     delete val;
 207   }
 208
 209   if (_type == (WindowType) -1) {
 210     /*
 211      * the window type hint was not set, which means we either classify ourself
 212      * as a normal window or a dialog, depending on if we are a transient.
 213      */
 214     // XXX: make this code work!
 215     //if (isTransient())
 216     //  _type = Type_Dialog;
 217     //else
 218       _type = Type_Normal;
 219   }
 220 }
 221
 222
 223 void OBClient::getMwmHints()
 224 {
 225   const otk::OBProperty *property = Openbox::instance->property();
 226
 227   unsigned long num;
 228   MwmHints *hints;
 229
 230   num = MwmHints::elements;
 231   if (!property->get(_window, otk::OBProperty::motif_wm_hints,
 232                      otk::OBProperty::motif_wm_hints, &num,
 233                      (unsigned long **)&hints))
 234     return;
 235
 236   if (num < MwmHints::elements) {
 237     delete [] hints;
 238     return;
 239   }
 240
 241   // retrieved the hints
 242   // Mwm Hints are applied subtractively to what has already been chosen for
 243   // decor and functionality
 244
 245   if (hints->flags & MwmFlag_Decorations) {
 246     if (! (hints->decorations & MwmDecor_All)) {
 247       if (! (hints->decorations & MwmDecor_Border))
 248         _decorations &= ~Decor_Border;
 249       if (! (hints->decorations & MwmDecor_Handle))
 250         _decorations &= ~Decor_Handle;
 251       if (! (hints->decorations & MwmDecor_Title))
 252         _decorations &= ~Decor_Titlebar;
 253       if (! (hints->decorations & MwmDecor_Iconify))
 254         _decorations &= ~Decor_Iconify;
 255       if (! (hints->decorations & MwmDecor_Maximize))
 256         _decorations &= ~Decor_Maximize;
 257     }
 258   }
 259
 260   if (hints->flags & MwmFlag_Functions) {
 261     if (! (hints->functions & MwmFunc_All)) {
 262       if (! (hints->functions & MwmFunc_Resize))
 263         _functions &= ~Func_Resize;
 264       if (! (hints->functions & MwmFunc_Move))
 265         _functions &= ~Func_Move;
 266       if (! (hints->functions & MwmFunc_Iconify))
 267         _functions &= ~Func_Iconify;
 268       if (! (hints->functions & MwmFunc_Maximize))
 269         _functions &= ~Func_Maximize;
 270       //if (! (hints->functions & MwmFunc_Close))
 271       //  _functions &= ~Func_Close;
 272     }
 273   }
 274   delete [] hints;
 275 }
 276
 277
 278 void OBClient::getArea()
 279 {
 280   XWindowAttributes wattrib;
 281   Status ret;
 282
 283   ret = XGetWindowAttributes(otk::OBDisplay::display, _window, &wattrib);
 284   assert(ret != BadWindow);
 285
 286   _area.setRect(wattrib.x, wattrib.y, wattrib.width, wattrib.height);
 287   _border_width = wattrib.border_width;
 288 }
 289
 290
 291 void OBClient::getState()
 292 {
 293   const otk::OBProperty *property = Openbox::instance->property();
 294
 295   _modal = _shaded = _max_horz = _max_vert = _fullscreen = _floating = false;
 296
 297   unsigned long *state;
 298   unsigned long num = (unsigned) -1;
 299
 300   if (property->get(_window, otk::OBProperty::net_wm_state,
 301                     otk::OBProperty::Atom_Atom, &num, &state)) {
 302     for (unsigned long i = 0; i < num; ++i) {
 303       if (state[i] == property->atom(otk::OBProperty::net_wm_state_modal))
 304         _modal = true;
 305       else if (state[i] ==
 306                property->atom(otk::OBProperty::net_wm_state_shaded))
 307         _shaded = true;
 308       else if (state[i] ==
 309                property->atom(otk::OBProperty::net_wm_state_fullscreen))
 310         _fullscreen = true;
 311       else if (state[i] ==
 312                property->atom(otk::OBProperty::net_wm_state_maximized_vert))
 313         _max_vert = true;
 314       else if (state[i] ==
 315                property->atom(otk::OBProperty::net_wm_state_maximized_horz))
 316         _max_horz = true;
 317     }
 318
 319     delete [] state;
 320   }
 321 }
 322
 323
 324 void OBClient::getShaped()
 325 {
 326   _shaped = false;
 327 #ifdef   SHAPE
 328   if (otk::OBDisplay::shape()) {
 329     int foo;
 330     unsigned int ufoo;
 331     int s;
 332
 333     XShapeSelectInput(otk::OBDisplay::display, _window, ShapeNotifyMask);
 334
 335     XShapeQueryExtents(otk::OBDisplay::display, _window, &s, &foo,
 336                        &foo, &ufoo, &ufoo, &foo, &foo, &foo, &ufoo, &ufoo);
 337     _shaped = (s != 0);
 338   }
 339 #endif // SHAPE
 340 }
 341
 342
 343 void OBClient::updateProtocols()
 344 {
 345   const otk::OBProperty *property = Openbox::instance->property();
 346
 347   Atom *proto;
 348   int num_return = 0;
 349
 350   _focus_notify = false;
 351   _decorations &= ~Decor_Close;
 352   _functions &= ~Func_Close;
 353
 354   if (XGetWMProtocols(otk::OBDisplay::display, _window, &proto, &num_return)) {
 355     for (int i = 0; i < num_return; ++i) {
 356       if (proto[i] == property->atom(otk::OBProperty::wm_delete_window)) {
 357         _decorations |= Decor_Close;
 358         _functions |= Func_Close;
 359         // XXX: update the decor?
 360       } else if (proto[i] == property->atom(otk::OBProperty::wm_take_focus))
 361         // if this protocol is requested, then the window will be notified
 362         // by the window manager whenever it receives focus
 363         _focus_notify = true;
 364     }
 365     XFree(proto);
 366   }
 367 }
 368
 369
 370 void OBClient::updateNormalHints()
 371 {
 372   XSizeHints size;
 373   long ret;
 374
 375   // defaults
 376   _gravity = NorthWestGravity;
 377   _size_inc.setPoint(1, 1);
 378   _base_size.setPoint(0, 0);
 379   _min_size.setPoint(0, 0);
 380   _max_size.setPoint(INT_MAX, INT_MAX);
 381
 382   // XXX: might want to cancel any interactive resizing of the window at this
 383   // point..
 384
 385   // get the hints from the window
 386   if (XGetWMNormalHints(otk::OBDisplay::display, _window, &size, &ret)) {
 387     _positioned = (size.flags & (PPosition|USPosition));
 388
 389     if (size.flags & PWinGravity)
 390       _gravity = size.win_gravity;
 391
 392     if (size.flags & PMinSize)
 393       _min_size.setPoint(size.min_width, size.min_height);
 394
 395     if (size.flags & PMaxSize)
 396       _max_size.setPoint(size.max_width, size.max_height);
 397
 398     if (size.flags & PBaseSize)
 399       _base_size.setPoint(size.base_width, size.base_height);
 400
 401     if (size.flags & PResizeInc)
 402       _size_inc.setPoint(size.width_inc, size.height_inc);
 403   }
 404 }
 405
 406
 407 void OBClient::updateWMHints()
 408 {
 409   XWMHints *hints;
 410
 411   // assume a window takes input if it doesnt specify
 412   _can_focus = true;
 413   _urgent = false;
 414
 415   if ((hints = XGetWMHints(otk::OBDisplay::display, _window)) != NULL) {
 416     if (hints->flags & InputHint)
 417       _can_focus = hints->input;
 418
 419     if (hints->flags & XUrgencyHint)
 420       _urgent = true;
 421
 422     if (hints->flags & WindowGroupHint) {
 423       if (hints->window_group != _group) {
 424         // XXX: remove from the old group if there was one
 425         _group = hints->window_group;
 426         // XXX: do stuff with the group
 427       }
 428     } else // no group!
 429       _group = None;
 430
 431     XFree(hints);
 432   }
 433 }
 434
 435
 436 void OBClient::updateTitle()
 437 {
 438   const otk::OBProperty *property = Openbox::instance->property();
 439
 440   _title = "";
 441
 442   // try netwm
 443   if (! property->get(_window, otk::OBProperty::net_wm_name,
 444                       otk::OBProperty::utf8, &_title)) {
 445     // try old x stuff
 446     property->get(_window, otk::OBProperty::wm_name,
 447                   otk::OBProperty::ascii, &_title);
 448   }
 449
 450   if (_title.empty())
 451     _title = _("Unnamed Window");
 452 }
 453
 454
 455 void OBClient::updateIconTitle()
 456 {
 457   const otk::OBProperty *property = Openbox::instance->property();
 458
 459   _icon_title = "";
 460
 461   // try netwm
 462   if (! property->get(_window, otk::OBProperty::net_wm_icon_name,
 463                       otk::OBProperty::utf8, &_icon_title)) {
 464     // try old x stuff
 465     property->get(_window, otk::OBProperty::wm_icon_name,
 466                   otk::OBProperty::ascii, &_icon_title);
 467   }
 468
 469   if (_title.empty())
 470     _icon_title = _("Unnamed Window");
 471 }
 472
 473
 474 void OBClient::updateClass()
 475 {
 476   const otk::OBProperty *property = Openbox::instance->property();
 477
 478   // set the defaults
 479   _app_name = _app_class = "";
 480
 481   otk::OBProperty::StringVect v;
 482   unsigned long num = 2;
 483
 484   if (! property->get(_window, otk::OBProperty::wm_class,
 485                       otk::OBProperty::ascii, &num, &v))
 486     return;
 487
 488   if (num > 0) _app_name = v[0];
 489   if (num > 1) _app_class = v[1];
 490 }
 491
 492
 493 void OBClient::propertyHandler(const XPropertyEvent &e)
 494 {
 495   otk::OtkEventHandler::propertyHandler(e);
 496
 497   const otk::OBProperty *property = Openbox::instance->property();
 498
 499   // compress changes to a single property into a single change
 500   XEvent ce;
 501   while (XCheckTypedEvent(otk::OBDisplay::display, e.type, &ce)) {
 502     // XXX: it would be nice to compress ALL changes to a property, not just
 503     //      changes in a row without other props between.
 504     if (ce.xproperty.atom != e.atom) {
 505       XPutBackEvent(otk::OBDisplay::display, &ce);
 506       break;
 507     }
 508   }
 509
 510   if (e.atom == XA_WM_NORMAL_HINTS)
 511     updateNormalHints();
 512   else if (e.atom == XA_WM_HINTS)
 513     updateWMHints();
 514   else if (e.atom == property->atom(otk::OBProperty::net_wm_name) ||
 515            e.atom == property->atom(otk::OBProperty::wm_name))
 516     updateTitle();
 517   else if (e.atom == property->atom(otk::OBProperty::net_wm_icon_name) ||
 518            e.atom == property->atom(otk::OBProperty::wm_icon_name))
 519     updateIconTitle();
 520   else if (e.atom == property->atom(otk::OBProperty::wm_class))
 521     updateClass();
 522   else if (e.atom == property->atom(otk::OBProperty::wm_protocols))
 523     updateProtocols();
 524   // XXX: transient for hint
 525   // XXX: strut hint
 526 }
 527
 528
 529 void OBClient::setWMState(long state)
 530 {
 531   if (state == _wmstate) return; // no change
 532
 533   switch (state) {
 534   case IconicState:
 535     // XXX: cause it to iconify
 536     break;
 537   case NormalState:
 538     // XXX: cause it to uniconify
 539     break;
 540   }
 541   _wmstate = state;
 542 }
 543
 544
 545 void OBClient::setDesktop(long target)
 546 {
 547   assert(target >= 0);
 548   //assert(target == 0xffffffff || target < MAX);
 549
 550   // XXX: move the window to the new desktop
 551   _desktop = target;
 552 }
 553
 554
 555 void OBClient::setState(StateAction action, long data1, long data2)
 556 {
 557   const otk::OBProperty *property = Openbox::instance->property();
 558
 559   if (!(action == State_Add || action == State_Remove ||
 560         action == State_Toggle))
 561     return; // an invalid action was passed to the client message, ignore it
 562
 563   for (int i = 0; i < 2; ++i) {
 564     Atom state = i == 0 ? data1 : data2;
 565
 566     if (! state) continue;
 567
 568     // if toggling, then pick whether we're adding or removing
 569     if (action == State_Toggle) {
 570       if (state == property->atom(otk::OBProperty::net_wm_state_modal))
 571         action = _modal ? State_Remove : State_Add;
 572       else if (state ==
 573                property->atom(otk::OBProperty::net_wm_state_maximized_vert))
 574         action = _max_vert ? State_Remove : State_Add;
 575       else if (state ==
 576                property->atom(otk::OBProperty::net_wm_state_maximized_horz))
 577         action = _max_horz ? State_Remove : State_Add;
 578       else if (state == property->atom(otk::OBProperty::net_wm_state_shaded))
 579         action = _shaded ? State_Remove : State_Add;
 580       else if (state ==
 581                property->atom(otk::OBProperty::net_wm_state_fullscreen))
 582         action = _fullscreen ? State_Remove : State_Add;
 583       else if (state == property->atom(otk::OBProperty::net_wm_state_floating))
 584         action = _floating ? State_Remove : State_Add;
 585     }
 586
 587     if (action == State_Add) {
 588       if (state == property->atom(otk::OBProperty::net_wm_state_modal)) {
 589         if (_modal) continue;
 590         _modal = true;
 591         // XXX: give it focus if another window has focus that shouldnt now
 592       } else if (state ==
 593                  property->atom(otk::OBProperty::net_wm_state_maximized_vert)){
 594         if (_max_vert) continue;
 595         _max_vert = true;
 596         // XXX: resize the window etc
 597       } else if (state ==
 598                  property->atom(otk::OBProperty::net_wm_state_maximized_horz)){
 599         if (_max_horz) continue;
 600         _max_horz = true;
 601         // XXX: resize the window etc
 602       } else if (state ==
 603                  property->atom(otk::OBProperty::net_wm_state_shaded)) {
 604         if (_shaded) continue;
 605         _shaded = true;
 606         // XXX: hide the client window
 607       } else if (state ==
 608                  property->atom(otk::OBProperty::net_wm_state_fullscreen)) {
 609         if (_fullscreen) continue;
 610         _fullscreen = true;
 611         // XXX: raise the window n shit
 612       } else if (state ==
 613                  property->atom(otk::OBProperty::net_wm_state_floating)) {
 614         if (_floating) continue;
 615         _floating = true;
 616         // XXX: raise the window n shit
 617       }
 618
 619     } else { // action == State_Remove
 620       if (state == property->atom(otk::OBProperty::net_wm_state_modal)) {
 621         if (!_modal) continue;
 622         _modal = false;
 623       } else if (state ==
 624                  property->atom(otk::OBProperty::net_wm_state_maximized_vert)){
 625         if (!_max_vert) continue;
 626         _max_vert = false;
 627         // XXX: resize the window etc
 628       } else if (state ==
 629                  property->atom(otk::OBProperty::net_wm_state_maximized_horz)){
 630         if (!_max_horz) continue;
 631         _max_horz = false;
 632         // XXX: resize the window etc
 633       } else if (state ==
 634                  property->atom(otk::OBProperty::net_wm_state_shaded)) {
 635         if (!_shaded) continue;
 636         _shaded = false;
 637         // XXX: show the client window
 638       } else if (state ==
 639                  property->atom(otk::OBProperty::net_wm_state_fullscreen)) {
 640         if (!_fullscreen) continue;
 641         _fullscreen = false;
 642         // XXX: lower the window to its proper layer
 643       } else if (state ==
 644                  property->atom(otk::OBProperty::net_wm_state_floating)) {
 645         if (!_floating) continue;
 646         _floating = false;
 647         // XXX: lower the window to its proper layer
 648       }
 649     }
 650   }
 651 }
 652
 653
 654 void OBClient::clientMessageHandler(const XClientMessageEvent &e)
 655 {
 656   otk::OtkEventHandler::clientMessageHandler(e);
 657
 658   if (e.format != 32) return;
 659
 660   const otk::OBProperty *property = Openbox::instance->property();
 661
 662   if (e.message_type == property->atom(otk::OBProperty::wm_change_state)) {
 663     // compress changes into a single change
 664     bool compress = false;
 665     XEvent ce;
 666     while (XCheckTypedEvent(otk::OBDisplay::display, e.type, &ce)) {
 667       // XXX: it would be nice to compress ALL messages of a type, not just
 668       //      messages in a row without other message types between.
 669       if (ce.xclient.message_type != e.message_type) {
 670         XPutBackEvent(otk::OBDisplay::display, &ce);
 671         break;
 672       }
 673       compress = true;
 674     }
 675     if (compress)
 676       setWMState(ce.xclient.data.l[0]); // use the found event
 677     else
 678       setWMState(e.data.l[0]); // use the original event
 679   } else if (e.message_type ==
 680              property->atom(otk::OBProperty::net_wm_desktop)) {
 681     // compress changes into a single change
 682     bool compress = false;
 683     XEvent ce;
 684     while (XCheckTypedEvent(otk::OBDisplay::display, e.type, &ce)) {
 685       // XXX: it would be nice to compress ALL messages of a type, not just
 686       //      messages in a row without other message types between.
 687       if (ce.xclient.message_type != e.message_type) {
 688         XPutBackEvent(otk::OBDisplay::display, &ce);
 689         break;
 690       }
 691       compress = true;
 692     }
 693     if (compress)
 694       setDesktop(e.data.l[0]); // use the found event
 695     else
 696       setDesktop(e.data.l[0]); // use the original event
 697   }
 698   else if (e.message_type == property->atom(otk::OBProperty::net_wm_state))
 699     // can't compress these
 700     setState((StateAction)e.data.l[0], e.data.l[1], e.data.l[2]);
 701 }
 702
 703
 704 #if defined(SHAPE) || defined(DOXYGEN_IGNORE)
 705 void OBClient::shapeHandler(const XShapeEvent &e)
 706 {
 707   otk::OtkEventHandler::shapeHandler(e);
 708
 709   _shaped = e.shaped;
 710 }
 711 #endif
 712
 713
 714 void OBClient::resize(Corner anchor, int w, int h)
 715 {
 716   w -= _base_size.x();
 717   h -= _base_size.y();
 718
 719   // is the window resizable? if it is not, then don't check its sizes, the
 720   // client can do what it wants and the user can't change it anyhow
 721   if (_min_size.x() <= _max_size.x() && _min_size.y() <= _max_size.y()) {
 722     // smaller than min size or bigger than max size?
 723     if (w < _min_size.x()) w = _min_size.x();
 724     else if (w > _max_size.x()) w = _max_size.x();
 725     if (h < _min_size.y()) h = _min_size.y();
 726     else if (h > _max_size.y()) h = _max_size.y();
 727   }
 728
 729   // keep to the increments
 730   w /= _size_inc.x();
 731   h /= _size_inc.y();
 732
 733   // store the logical size
 734   _logical_size.setPoint(w, h);
 735
 736   w *= _size_inc.x();
 737   h *= _size_inc.y();
 738
 739   w += _base_size.x();
 740   h += _base_size.y();
 741
 742   switch (anchor) {
 743   case TopLeft:
 744     break;
 745   case TopRight:
 746     _area.setX(_area.x() - _area.width() - w);
 747     break;
 748   case BottomLeft:
 749     _area.setY(_area.y() - _area.height() - h);
 750     break;
 751   case BottomRight:
 752     _area.setX(_area.x() - _area.width() - w);
 753     _area.setY(_area.y() - _area.height() - h);
 754     break;
 755   }
 756
 757   _area.setSize(w, h);
 758
 759   // resize the frame to match
 760   frame->adjust();
 761 }
 762
 763
 764 void OBClient::move(int x, int y)
 765 {
 766   _area.setPos(x, y);
 767   // move the frame to be in the requested position
 768   frame->applyGravity();
 769 }
 770
 771
 772 void OBClient::configureRequestHandler(const XConfigureRequestEvent &e)
 773 {
 774   OtkEventHandler::configureRequestHandler(e);
 775
 776   // XXX: if we are iconic (or shaded? (fvwm does that)) ignore the event
 777
 778   if (e.value_mask & CWBorderWidth)
 779     _border_width = e.border_width;
 780
 781     // resize, then move, as specified in the EWMH section 7.7
 782   if (e.value_mask & (CWWidth | CWHeight)) {
 783     int w = (e.value_mask & CWWidth) ? e.width : _area.width();
 784     int h = (e.value_mask & CWHeight) ? e.height : _area.height();
 785
 786     Corner corner;
 787     switch (_gravity) {
 788     case NorthEastGravity:
 789     case EastGravity:
 790       corner = TopRight;
 791       break;
 792     case SouthWestGravity:
 793     case SouthGravity:
 794       corner = BottomLeft;
 795       break;
 796     case SouthEastGravity:
 797       corner = BottomRight;
 798       break;
 799     default:     // NorthWest, Static, etc
 800       corner = TopLeft;
 801     }
 802
 803     resize(corner, w, h);
 804   }
 805
 806   if (e.value_mask & (CWX | CWY)) {
 807     int x = (e.value_mask & CWX) ? e.x : _area.x();
 808     int y = (e.value_mask & CWY) ? e.y : _area.y();
 809     move(x, y);
 810   }
 811
 812   if (e.value_mask & CWStackMode) {
 813     switch (e.detail) {
 814     case Below:
 815     case BottomIf:
 816       // XXX: lower the window
 817       break;
 818
 819     case Above:
 820     case TopIf:
 821     default:
 822       // XXX: raise the window
 823       break;
 824     }
 825   }
 826 }
 827
 828
 829 void OBClient::unmapHandler(const XUnmapEvent &e)
 830 {
 831 #ifdef    DEBUG
 832   printf("UnmapNotify for 0x%lx\n", e.window);
 833 #endif // DEBUG
 834
 835   if (ignore_unmaps) {
 836     ignore_unmaps--;
 837     return;
 838   }
 839
 840   OtkEventHandler::unmapHandler(e);
 841
 842   // this deletes us etc
 843   Openbox::instance->screen(_screen)->unmanageWindow(this);
 844 }
 845
 846
 847 void OBClient::destroyHandler(const XDestroyWindowEvent &e)
 848 {
 849 #ifdef    DEBUG
 850   printf("DestroyNotify for 0x%lx\n", e.window);
 851 #endif // DEBUG
 852
 853   OtkEventHandler::destroyHandler(e);
 854
 855   // this deletes us etc
 856   Openbox::instance->screen(_screen)->unmanageWindow(this);
 857 }
 858
 859
 860 }