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

   1 // -*- mode: C++; indent-tabs-mode: nil; c-basic-offset: 2; -*-
   2
   3 #include "config.h"
   4
   5 extern "C" {
   6 #ifdef    HAVE_UNISTD_H
   7 #  include <sys/types.h>
   8 #  include <unistd.h>
   9 #endif // HAVE_UNISTD_H
  10
  11 #include "gettext.h"
  12 #define _(str) gettext(str)
  13 }
  14
  15 #include "screen.hh"
  16 #include "client.hh"
  17 #include "openbox.hh"
  18 #include "frame.hh"
  19 #include "bindings.hh"
  20 #include "python.hh"
  21 #include "otk/display.hh"
  22 #include "otk/property.hh"
  23
  24 #include <vector>
  25 #include <algorithm>
  26 #include <cstdio>
  27 #include <cstring>
  28
  29 static bool running;
  30 static int anotherWMRunning(Display *display, XErrorEvent *) {
  31   printf(_("Another window manager already running on display %s.\n"),
  32          DisplayString(display));
  33   running = true;
  34   return -1;
  35 }
  36
  37
  38 namespace ob {
  39
  40
  41 Screen::Screen(int screen)
  42   : _number(screen)
  43 {
  44   assert(screen >= 0); assert(screen < ScreenCount(**otk::display));
  45   _info = otk::display->screenInfo(screen);
  46
  47   ::running = false;
  48   XErrorHandler old = XSetErrorHandler(::anotherWMRunning);
  49   XSelectInput(**otk::display, _info->rootWindow(),
  50                Screen::event_mask);
  51   XSync(**otk::display, false);
  52   XSetErrorHandler(old);
  53
  54   _managed = !::running;
  55   if (! _managed) return; // was unable to manage the screen
  56
  57 #ifdef DEBUG
  58   printf(_("Managing screen %d: visual 0x%lx, depth %d\n"),
  59          _number, XVisualIDFromVisual(_info->visual()), _info->depth());
  60 #endif
  61
  62   otk::Property::set(_info->rootWindow(), otk::Property::atoms.openbox_pid,
  63                      otk::Property::atoms.cardinal, (unsigned long) getpid());
  64
  65   // set the mouse cursor for the root window (the default cursor)
  66   XDefineCursor(**otk::display, _info->rootWindow(),
  67                 openbox->cursors().session);
  68
  69   // XXX: initialize the screen's style
  70   /*
  71   otk::ustring stylepath;
  72   python_get_string("THEME", &stylepath);
  73   otk::Configuration sconfig(false);
  74   sconfig.setFile(otk::expandTilde(stylepath.c_str()));
  75   if (!sconfig.load()) {
  76     sconfig.setFile(otk::expandTilde(DEFAULTSTYLE));
  77     if (!sconfig.load()) {
  78       printf(_("Unable to load default style: %s. Aborting.\n"), DEFAULTSTYLE);
  79       ::exit(1);
  80     }
  81   }
  82   _style.load(sconfig);
  83   */
  84   otk::display->renderControl(_number)->
  85     drawRoot(*otk::RenderStyle::style(_number)->rootColor());
  86
  87   // set up notification of netwm support
  88   changeSupportedAtoms();
  89
  90   // Set the netwm properties for geometry
  91   unsigned long geometry[] = { _info->size().width(),
  92                                _info->size().height() };
  93   otk::Property::set(_info->rootWindow(),
  94                      otk::Property::atoms.net_desktop_geometry,
  95                      otk::Property::atoms.cardinal, geometry, 2);
  96
  97   // Set the net_desktop_names property
  98   std::vector<otk::ustring> names;
  99   python_get_stringlist("DESKTOP_NAMES", &names);
 100   otk::Property::set(_info->rootWindow(),
 101                      otk::Property::atoms.net_desktop_names,
 102                      otk::Property::utf8, names);
 103   // the above set() will cause the updateDesktopNames to fire right away so
 104   // we have a list of desktop names
 105
 106   _desktop = 0;
 107
 108   if (!python_get_long("NUMBER_OF_DESKTOPS", &_num_desktops))
 109     _num_desktops = 1;
 110   changeNumDesktops(_num_desktops); // set the hint
 111
 112   changeDesktop(0); // set the hint
 113
 114   // create the window which gets focus when no clients get it
 115   XSetWindowAttributes attr;
 116   attr.override_redirect = true;
 117   _focuswindow = XCreateWindow(**otk::display, _info->rootWindow(),
 118                                -100, -100, 1, 1, 0, 0, InputOnly,
 119                                _info->visual(), CWOverrideRedirect, &attr);
 120   XMapRaised(**otk::display, _focuswindow);
 121
 122   // these may be further updated if any pre-existing windows are found in
 123   // the manageExising() function
 124   changeClientList();  // initialize the client lists, which will be empty
 125   calcArea();          // initialize the available working area
 126
 127   // register this class as the event handler for the root window
 128   openbox->registerHandler(_info->rootWindow(), this);
 129
 130   // call the python Startup callbacks
 131   EventData data(_number, 0, EventAction::Startup, 0);
 132   openbox->bindings()->fireEvent(&data);
 133 }
 134
 135
 136 Screen::~Screen()
 137 {
 138   if (! _managed) return;
 139
 140   XSelectInput(**otk::display, _info->rootWindow(), NoEventMask);
 141
 142   // unmanage all windows
 143   while (!clients.empty())
 144     unmanageWindow(clients.front());
 145
 146   // call the python Shutdown callbacks
 147   EventData data(_number, 0, EventAction::Shutdown, 0);
 148   openbox->bindings()->fireEvent(&data);
 149
 150   XDestroyWindow(**otk::display, _focuswindow);
 151   XDestroyWindow(**otk::display, _supportwindow);
 152 }
 153
 154
 155 void Screen::manageExisting()
 156 {
 157   unsigned int i, j, nchild;
 158   Window r, p, *children;
 159   XQueryTree(**otk::display, _info->rootWindow(), &r, &p,
 160              &children, &nchild);
 161
 162   // preen the window list of all icon windows... for better dockapp support
 163   for (i = 0; i < nchild; i++) {
 164     if (children[i] == None) continue;
 165
 166     XWMHints *wmhints = XGetWMHints(**otk::display,
 167                                     children[i]);
 168
 169     if (wmhints) {
 170       if ((wmhints->flags & IconWindowHint) &&
 171           (wmhints->icon_window != children[i])) {
 172         for (j = 0; j < nchild; j++) {
 173           if (children[j] == wmhints->icon_window) {
 174             children[j] = None;
 175             break;
 176           }
 177         }
 178       }
 179
 180       XFree(wmhints);
 181     }
 182   }
 183
 184   // manage shown windows
 185   for (i = 0; i < nchild; ++i) {
 186     if (children[i] == None)
 187       continue;
 188
 189     XWindowAttributes attrib;
 190     if (XGetWindowAttributes(**otk::display, children[i], &attrib)) {
 191       if (attrib.override_redirect) continue;
 192
 193       if (attrib.map_state != IsUnmapped) {
 194         manageWindow(children[i]);
 195       }
 196     }
 197   }
 198
 199   XFree(children);
 200 }
 201
 202
 203 void Screen::updateStrut()
 204 {
 205   _strut.left = _strut.right = _strut.top = _strut.bottom = 0;
 206
 207   ClientList::iterator it, end = clients.end();
 208   for (it = clients.begin(); it != end; ++it) {
 209     const otk::Strut &s = (*it)->strut();
 210     _strut.left = std::max(_strut.left, s.left);
 211     _strut.right = std::max(_strut.right, s.right);
 212     _strut.top = std::max(_strut.top, s.top);
 213     _strut.bottom = std::max(_strut.bottom, s.bottom);
 214   }
 215   calcArea();
 216 }
 217
 218
 219 void Screen::calcArea()
 220 {
 221   otk::Rect old_area = _area;
 222
 223 /*
 224 #ifdef    XINERAMA
 225   // reset to the full areas
 226   if (isXineramaActive())
 227     xineramaUsableArea = getXineramaAreas();
 228 #endif // XINERAMA
 229 */
 230
 231   _area = otk::Rect(_strut.left, _strut.top,
 232                     _info->size().width() - (_strut.left + _strut.right),
 233                     _info->size().height() - (_strut.top + _strut.bottom));
 234
 235 /*
 236 #ifdef    XINERAMA
 237   if (isXineramaActive()) {
 238     // keep each of the ximerama-defined areas inside the strut
 239     RectList::iterator xit, xend = xineramaUsableArea.end();
 240     for (xit = xineramaUsableArea.begin(); xit != xend; ++xit) {
 241       if (xit->x() < usableArea.x()) {
 242         xit->setX(usableArea.x());
 243         xit->setWidth(xit->width() - usableArea.x());
 244       }
 245       if (xit->y() < usableArea.y()) {
 246         xit->setY(usableArea.y());
 247         xit->setHeight(xit->height() - usableArea.y());
 248       }
 249       if (xit->x() + xit->width() > usableArea.width())
 250         xit->setWidth(usableArea.width() - xit->x());
 251       if (xit->y() + xit->height() > usableArea.height())
 252         xit->setHeight(usableArea.height() - xit->y());
 253     }
 254   }
 255 #endif // XINERAMA
 256 */
 257
 258   if (old_area != _area) {
 259     // the area has changed, adjust all the maximized windows
 260     ClientList::iterator it, end = clients.end();
 261     for (it = clients.begin(); it != end; ++it)
 262       (*it)->remaximize();
 263   }
 264
 265   changeWorkArea();
 266 }
 267
 268
 269 void Screen::changeSupportedAtoms()
 270 {
 271   // create the netwm support window
 272   _supportwindow = XCreateSimpleWindow(**otk::display,
 273                                        _info->rootWindow(),
 274                                        0, 0, 1, 1, 0, 0, 0);
 275
 276   // set supporting window
 277   otk::Property::set(_info->rootWindow(),
 278                      otk::Property::atoms.net_supporting_wm_check,
 279                      otk::Property::atoms.window, _supportwindow);
 280
 281   //set properties on the supporting window
 282   otk::Property::set(_supportwindow, otk::Property::atoms.net_wm_name,
 283                      otk::Property::utf8, "Openbox");
 284   otk::Property::set(_supportwindow,
 285                      otk::Property::atoms.net_supporting_wm_check,
 286                      otk::Property::atoms.window, _supportwindow);
 287
 288
 289   Atom supported[] = {
 290     otk::Property::atoms.net_current_desktop,
 291     otk::Property::atoms.net_number_of_desktops,
 292     otk::Property::atoms.net_desktop_geometry,
 293     otk::Property::atoms.net_desktop_viewport,
 294     otk::Property::atoms.net_active_window,
 295     otk::Property::atoms.net_workarea,
 296     otk::Property::atoms.net_client_list,
 297     otk::Property::atoms.net_client_list_stacking,
 298     otk::Property::atoms.net_desktop_names,
 299     otk::Property::atoms.net_close_window,
 300     otk::Property::atoms.net_wm_name,
 301     otk::Property::atoms.net_wm_visible_name,
 302     otk::Property::atoms.net_wm_icon_name,
 303     otk::Property::atoms.net_wm_visible_icon_name,
 304 /*
 305     otk::Property::atoms.net_wm_desktop,
 306 */
 307     otk::Property::atoms.net_wm_strut,
 308     otk::Property::atoms.net_wm_window_type,
 309     otk::Property::atoms.net_wm_window_type_desktop,
 310     otk::Property::atoms.net_wm_window_type_dock,
 311     otk::Property::atoms.net_wm_window_type_toolbar,
 312     otk::Property::atoms.net_wm_window_type_menu,
 313     otk::Property::atoms.net_wm_window_type_utility,
 314     otk::Property::atoms.net_wm_window_type_splash,
 315     otk::Property::atoms.net_wm_window_type_dialog,
 316     otk::Property::atoms.net_wm_window_type_normal,
 317 /*
 318     otk::Property::atoms.net_wm_moveresize,
 319     otk::Property::atoms.net_wm_moveresize_size_topleft,
 320     otk::Property::atoms.net_wm_moveresize_size_topright,
 321     otk::Property::atoms.net_wm_moveresize_size_bottomleft,
 322     otk::Property::atoms.net_wm_moveresize_size_bottomright,
 323     otk::Property::atoms.net_wm_moveresize_move,
 324 */
 325     otk::Property::atoms.net_wm_allowed_actions,
 326     otk::Property::atoms.net_wm_action_move,
 327     otk::Property::atoms.net_wm_action_resize,
 328     otk::Property::atoms.net_wm_action_minimize,
 329     otk::Property::atoms.net_wm_action_shade,
 330 /*    otk::Property::atoms.net_wm_action_stick,*/
 331     otk::Property::atoms.net_wm_action_maximize_horz,
 332     otk::Property::atoms.net_wm_action_maximize_vert,
 333     otk::Property::atoms.net_wm_action_fullscreen,
 334     otk::Property::atoms.net_wm_action_change_desktop,
 335     otk::Property::atoms.net_wm_action_close,
 336
 337     otk::Property::atoms.net_wm_state,
 338     otk::Property::atoms.net_wm_state_modal,
 339     otk::Property::atoms.net_wm_state_maximized_vert,
 340     otk::Property::atoms.net_wm_state_maximized_horz,
 341     otk::Property::atoms.net_wm_state_shaded,
 342     otk::Property::atoms.net_wm_state_skip_taskbar,
 343     otk::Property::atoms.net_wm_state_skip_pager,
 344     otk::Property::atoms.net_wm_state_hidden,
 345     otk::Property::atoms.net_wm_state_fullscreen,
 346     otk::Property::atoms.net_wm_state_above,
 347     otk::Property::atoms.net_wm_state_below,
 348   };
 349   const int num_supported = sizeof(supported)/sizeof(Atom);
 350
 351   otk::Property::set(_info->rootWindow(), otk::Property::atoms.net_supported,
 352                      otk::Property::atoms.atom, supported, num_supported);
 353 }
 354
 355
 356 void Screen::changeClientList()
 357 {
 358   Window *windows;
 359   unsigned int size = clients.size();
 360
 361   // create an array of the window ids
 362   if (size > 0) {
 363     Window *win_it;
 364
 365     windows = new Window[size];
 366     win_it = windows;
 367     ClientList::const_iterator it = clients.begin();
 368     const ClientList::const_iterator end = clients.end();
 369     for (; it != end; ++it, ++win_it)
 370       *win_it = (*it)->window();
 371   } else
 372     windows = (Window*) 0;
 373
 374   otk::Property::set(_info->rootWindow(), otk::Property::atoms.net_client_list,
 375                      otk::Property::atoms.window, windows, size);
 376
 377   if (size)
 378     delete [] windows;
 379
 380   changeStackingList();
 381 }
 382
 383
 384 void Screen::changeStackingList()
 385 {
 386   Window *windows;
 387   unsigned int size = _stacking.size();
 388
 389   assert(size == clients.size()); // just making sure.. :)
 390
 391
 392   // create an array of the window ids (from bottom to top, reverse order!)
 393   if (size > 0) {
 394     Window *win_it;
 395
 396     windows = new Window[size];
 397     win_it = windows;
 398     ClientList::const_reverse_iterator it = _stacking.rbegin();
 399     const ClientList::const_reverse_iterator end = _stacking.rend();
 400     for (; it != end; ++it, ++win_it)
 401       *win_it = (*it)->window();
 402   } else
 403     windows = (Window*) 0;
 404
 405   otk::Property::set(_info->rootWindow(),
 406                      otk::Property::atoms.net_client_list_stacking,
 407                      otk::Property::atoms.window, windows, size);
 408
 409   if (size)
 410     delete [] windows;
 411 }
 412
 413
 414 void Screen::changeWorkArea() {
 415   unsigned long *dims = new unsigned long[4 * _num_desktops];
 416   for (long i = 0; i < _num_desktops; ++i) {
 417     dims[(i * 4) + 0] = _area.x();
 418     dims[(i * 4) + 1] = _area.y();
 419     dims[(i * 4) + 2] = _area.width();
 420     dims[(i * 4) + 3] = _area.height();
 421   }
 422   otk::Property::set(_info->rootWindow(), otk::Property::atoms.net_workarea,
 423                      otk::Property::atoms.cardinal, dims, 4 * _num_desktops);
 424   delete [] dims;
 425 }
 426
 427
 428 void Screen::manageWindow(Window window)
 429 {
 430   Client *client = 0;
 431   XWMHints *wmhint;
 432   XSetWindowAttributes attrib_set;
 433   XEvent e;
 434   XWindowAttributes attrib;
 435
 436   otk::display->grab();
 437
 438   // check if it has already been unmapped by the time we started mapping
 439   // the grab does a sync so we don't have to here
 440   if (XCheckTypedWindowEvent(**otk::display, window, DestroyNotify, &e) ||
 441       XCheckTypedWindowEvent(**otk::display, window, UnmapNotify, &e)) {
 442     XPutBackEvent(**otk::display, &e);
 443
 444     otk::display->ungrab();
 445     return; // don't manage it
 446   }
 447
 448   if (!XGetWindowAttributes(**otk::display, window, &attrib) ||
 449       attrib.override_redirect) {
 450     otk::display->ungrab();
 451     return; // don't manage it
 452   }
 453
 454   // is the window a docking app
 455   if ((wmhint = XGetWMHints(**otk::display, window))) {
 456     if ((wmhint->flags & StateHint) &&
 457         wmhint->initial_state == WithdrawnState) {
 458       //slit->addClient(w); // XXX: make dock apps work!
 459
 460       otk::display->ungrab();
 461       XFree(wmhint);
 462       return;
 463     }
 464     XFree(wmhint);
 465   }
 466
 467   // choose the events we want to receive on the CLIENT window
 468   attrib_set.event_mask = Client::event_mask;
 469   attrib_set.do_not_propagate_mask = Client::no_propagate_mask;
 470   XChangeWindowAttributes(**otk::display, window,
 471                           CWEventMask|CWDontPropagate, &attrib_set);
 472
 473   // create the Client class, which gets all of the hints on the window
 474   client = new Client(_number, window);
 475   // register for events
 476   openbox->registerHandler(window, client);
 477   // add to the wm's map
 478   openbox->addClient(window, client);
 479
 480   // we dont want a border on the client
 481   client->toggleClientBorder(false);
 482
 483   // specify that if we exit, the window should not be destroyed and should be
 484   // reparented back to root automatically
 485   XChangeSaveSet(**otk::display, window, SetModeInsert);
 486
 487   // create the decoration frame for the client window
 488   client->frame = new Frame(client);
 489   // register the plate for events (map req's)
 490   // this involves removing itself from the handler list first, since it is
 491   // auto added to the list, being a widget. we won't get any events on the
 492   // plate except for events for the client (SubstructureRedirectMask)
 493   openbox->clearHandler(client->frame->plate());
 494   openbox->registerHandler(client->frame->plate(), client);
 495
 496   // add to the wm's map
 497   Window *w = client->frame->allWindows();
 498   for (unsigned int i = 0; w[i]; ++i)
 499     openbox->addClient(w[i], client);
 500   delete [] w;
 501
 502   // reparent the client to the frame
 503   client->frame->grabClient();
 504
 505   if (openbox->state() != Openbox::State_Starting) {
 506     // position the window intelligenty .. hopefully :)
 507     // call the python PLACEWINDOW binding
 508     EventData data(_number, client, EventAction::PlaceWindow, 0);
 509     openbox->bindings()->fireEvent(&data);
 510   }
 511
 512   EventData ddata(_number, client, EventAction::DisplayingWindow, 0);
 513   openbox->bindings()->fireEvent(&ddata);
 514
 515   // if on the current desktop.. (or all desktops)
 516   if (client->desktop() == _desktop ||
 517       client->desktop() == (signed)0xffffffff) {
 518     client->frame->show();
 519   }
 520
 521   client->applyStartupState();
 522
 523   otk::display->ungrab();
 524
 525   // add to the screen's list
 526   clients.push_back(client);
 527   // once the client is in the list, update our strut to include the new
 528   // client's (it is good that this happens after window placement!)
 529   updateStrut();
 530   // this puts into the stacking order, then raises it
 531   _stacking.push_back(client);
 532   raiseWindow(client);
 533   // update the root properties
 534   changeClientList();
 535
 536   openbox->bindings()->grabButtons(true, client);
 537
 538   EventData ndata(_number, client, EventAction::NewWindow, 0);
 539   openbox->bindings()->fireEvent(&ndata);
 540
 541 #ifdef DEBUG
 542   printf("Managed window 0x%lx frame 0x%lx\n",
 543          window, client->frame->window());
 544 #endif
 545 }
 546
 547
 548 void Screen::unmanageWindow(Client *client)
 549 {
 550   Frame *frame = client->frame;
 551
 552   // call the python CLOSEWINDOW binding
 553   EventData data(_number, client, EventAction::CloseWindow, 0);
 554   openbox->bindings()->fireEvent(&data);
 555
 556   openbox->bindings()->grabButtons(false, client);
 557
 558   // remove from the wm's map
 559   openbox->removeClient(client->window());
 560   Window *w = frame->allWindows();
 561   for (unsigned int i = 0; w[i]; ++i)
 562     openbox->addClient(w[i], client);
 563   delete [] w;
 564   // unregister for handling events
 565   openbox->clearHandler(client->window());
 566
 567   // remove the window from our save set
 568   XChangeSaveSet(**otk::display, client->window(), SetModeDelete);
 569
 570   // we dont want events no more
 571   XSelectInput(**otk::display, client->window(), NoEventMask);
 572
 573   frame->hide();
 574
 575   // give the client its border back
 576   client->toggleClientBorder(true);
 577
 578   // reparent the window out of the frame
 579   frame->releaseClient();
 580
 581 #ifdef DEBUG
 582   Window framewin = client->frame->window();
 583 #endif
 584   delete client->frame;
 585   client->frame = 0;
 586
 587   // remove from the stacking order
 588   _stacking.remove(client);
 589
 590   // remove from the screen's list
 591   clients.remove(client);
 592
 593   // once the client is out of the list, update our strut to remove it's
 594   // influence
 595   updateStrut();
 596
 597   // unset modal before dropping our focus
 598   client->_modal = false;
 599
 600   // unfocus the client (calls the focus callbacks)
 601   client->unfocus();
 602
 603 #ifdef DEBUG
 604   printf("Unmanaged window 0x%lx frame 0x%lx\n", client->window(), framewin);
 605 #endif
 606
 607   delete client;
 608
 609   // update the root properties
 610   changeClientList();
 611 }
 612
 613 void Screen::lowerWindow(Client *client)
 614 {
 615   Window wins[2];  // only ever restack 2 windows.
 616
 617   assert(!_stacking.empty()); // this would be bad
 618
 619   ClientList::iterator it = --_stacking.end();
 620   const ClientList::iterator end = _stacking.begin();
 621
 622   if (client->modal() && client->transientFor()) {
 623     // don't let a modal window lower below its transient_for
 624     it = std::find(_stacking.begin(), _stacking.end(), client->transientFor());
 625     assert(it != _stacking.end());
 626
 627     wins[0] = (it == _stacking.begin() ? _focuswindow :
 628                ((*(--ClientList::const_iterator(it)))->frame->window()));
 629     wins[1] = client->frame->window();
 630     if (wins[0] == wins[1]) return; // already right above the window
 631
 632     _stacking.remove(client);
 633     _stacking.insert(it, client);
 634   } else {
 635     for (; it != end && (*it)->layer() < client->layer(); --it);
 636     if (*it == client) return;          // already the bottom, return
 637
 638     wins[0] = (*it)->frame->window();
 639     wins[1] = client->frame->window();
 640
 641     _stacking.remove(client);
 642     _stacking.insert(++it, client);
 643   }
 644
 645   XRestackWindows(**otk::display, wins, 2);
 646   changeStackingList();
 647 }
 648
 649 void Screen::raiseWindow(Client *client)
 650 {
 651   Window wins[2];  // only ever restack 2 windows.
 652
 653   assert(!_stacking.empty()); // this would be bad
 654
 655   Client *m = client->findModalChild();
 656   // if we have a modal child, raise it instead, we'll go along tho later
 657   if (m) raiseWindow(m);
 658
 659   // remove the client before looking so we can't run into ourselves
 660   _stacking.remove(client);
 661
 662   ClientList::iterator it = _stacking.begin();
 663   const ClientList::iterator end = _stacking.end();
 664
 665   // the stacking list is from highest to lowest
 666 //  for (;it != end, ++it) {
 667 //    if ((*it)->layer() <= client->layer() && m != *it) break;
 668 //  }
 669   for (; it != end && ((*it)->layer() > client->layer() || m == *it); ++it);
 670
 671   /*
 672     if our new position is the top, we want to stack under the _focuswindow
 673     otherwise, we want to stack under the previous window in the stack.
 674   */
 675   wins[0] = (it == _stacking.begin() ? _focuswindow :
 676              ((*(--ClientList::const_iterator(it)))->frame->window()));
 677   wins[1] = client->frame->window();
 678
 679   _stacking.insert(it, client);
 680
 681   XRestackWindows(**otk::display, wins, 2);
 682
 683   changeStackingList();
 684 }
 685
 686 void Screen::changeDesktop(long desktop)
 687 {
 688   if (!(desktop >= 0 && desktop < _num_desktops)) return;
 689
 690   printf("Moving to desktop %ld\n", desktop);
 691
 692   long old = _desktop;
 693
 694   _desktop = desktop;
 695   otk::Property::set(_info->rootWindow(),
 696                      otk::Property::atoms.net_current_desktop,
 697                      otk::Property::atoms.cardinal, _desktop);
 698
 699   if (old == _desktop) return;
 700
 701   ClientList::iterator it, end = clients.end();
 702   for (it = clients.begin(); it != end; ++it) {
 703     if ((*it)->desktop() == old) {
 704       (*it)->frame->hide();
 705     } else if ((*it)->desktop() == _desktop) {
 706       (*it)->frame->show();
 707     }
 708   }
 709
 710   // force the callbacks to fire
 711   if (!openbox->focusedClient())
 712     openbox->setFocusedClient(0);
 713 }
 714
 715 void Screen::changeNumDesktops(long num)
 716 {
 717   assert(num > 0);
 718
 719   if (!(num > 0)) return;
 720
 721   // move windows on desktops that will no longer exist!
 722   ClientList::iterator it, end = clients.end();
 723   for (it = clients.begin(); it != end; ++it) {
 724     int d = (*it)->desktop();
 725     if (d >= num && !(d == (signed) 0xffffffff ||
 726                       d == Client::ICONIC_DESKTOP)) {
 727       XEvent ce;
 728       ce.xclient.type = ClientMessage;
 729       ce.xclient.message_type = otk::Property::atoms.net_wm_desktop;
 730       ce.xclient.display = **otk::display;
 731       ce.xclient.window = (*it)->window();
 732       ce.xclient.format = 32;
 733       ce.xclient.data.l[0] = num - 1;
 734       XSendEvent(**otk::display, _info->rootWindow(), False,
 735                  SubstructureNotifyMask | SubstructureRedirectMask, &ce);
 736     }
 737   }
 738
 739   _num_desktops = num;
 740   otk::Property::set(_info->rootWindow(),
 741                      otk::Property::atoms.net_number_of_desktops,
 742                      otk::Property::atoms.cardinal, _num_desktops);
 743
 744   // set the viewport hint
 745   unsigned long *viewport = new unsigned long[_num_desktops * 2];
 746   memset(viewport, 0, sizeof(unsigned long) * _num_desktops * 2);
 747   otk::Property::set(_info->rootWindow(),
 748                      otk::Property::atoms.net_desktop_viewport,
 749                      otk::Property::atoms.cardinal,
 750                      viewport, _num_desktops * 2);
 751   delete [] viewport;
 752
 753   // update the work area hint
 754   changeWorkArea();
 755
 756   // change our desktop if we're on one that no longer exists!
 757   if (_desktop >= num)
 758     changeDesktop(num - 1);
 759 }
 760
 761
 762 void Screen::updateDesktopNames()
 763 {
 764   unsigned long num = (unsigned) -1;
 765
 766   if (!otk::Property::get(_info->rootWindow(),
 767                           otk::Property::atoms.net_desktop_names,
 768                           otk::Property::utf8, &num, &_desktop_names))
 769     _desktop_names.clear();
 770   while ((long)_desktop_names.size() < _num_desktops)
 771     _desktop_names.push_back("Unnamed");
 772 }
 773
 774
 775 void Screen::setDesktopName(long i, const otk::ustring &name)
 776 {
 777   assert(i >= 0);
 778
 779   if (i >= _num_desktops) return;
 780
 781   otk::Property::StringVect newnames = _desktop_names;
 782   newnames[i] = name;
 783   otk::Property::set(_info->rootWindow(),
 784                      otk::Property::atoms.net_desktop_names,
 785                      otk::Property::utf8, newnames);
 786 }
 787
 788
 789 void Screen::installColormap(bool install) const
 790 {
 791   if (install)
 792     XInstallColormap(**otk::display, _info->colormap());
 793   else
 794     XUninstallColormap(**otk::display, _info->colormap());
 795 }
 796
 797
 798 void Screen::propertyHandler(const XPropertyEvent &e)
 799 {
 800   otk::EventHandler::propertyHandler(e);
 801
 802   // compress changes to a single property into a single change
 803   XEvent ce;
 804   while (XCheckTypedWindowEvent(**otk::display, _info->rootWindow(),
 805                                 e.type, &ce)) {
 806     // XXX: it would be nice to compress ALL changes to a property, not just
 807     //      changes in a row without other props between.
 808     if (ce.xproperty.atom != e.atom) {
 809       XPutBackEvent(**otk::display, &ce);
 810       break;
 811     }
 812   }
 813
 814   if (e.atom == otk::Property::atoms.net_desktop_names)
 815     updateDesktopNames();
 816 }
 817
 818
 819 void Screen::clientMessageHandler(const XClientMessageEvent &e)
 820 {
 821   otk::EventHandler::clientMessageHandler(e);
 822
 823   if (e.format != 32) return;
 824
 825   if (e.message_type == otk::Property::atoms.net_current_desktop) {
 826     changeDesktop(e.data.l[0]);
 827   } else if (e.message_type == otk::Property::atoms.net_number_of_desktops) {
 828     changeNumDesktops(e.data.l[0]);
 829   }
 830 }
 831
 832
 833 void Screen::mapRequestHandler(const XMapRequestEvent &e)
 834 {
 835   otk::EventHandler::mapRequestHandler(e);
 836
 837 #ifdef    DEBUG
 838   printf("MapRequest for 0x%lx\n", e.window);
 839 #endif // DEBUG
 840
 841   Client *c = openbox->findClient(e.window);
 842   if (c) {
 843 #ifdef DEBUG
 844     printf("DEBUG: MAP REQUEST CAUGHT IN SCREEN. IGNORED.\n");
 845 #endif
 846   } else
 847     manageWindow(e.window);
 848 }
 849
 850 }