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