+void OBScreen::changeDesktop(long desktop)
+{
+ assert(desktop >= 0 && desktop < _num_desktops);
+
+ if (!(desktop >= 0 && desktop < _num_desktops)) return;
+
+ printf("Moving to desktop %ld\n", desktop);
+
+ long old = _desktop;
+
+ _desktop = desktop;
+ Openbox::instance->property()->set(_info->rootWindow(),
+ otk::OBProperty::net_current_desktop,
+ otk::OBProperty::Atom_Cardinal,
+ _desktop);
+
+ if (old == _desktop) return;
+
+ OBClient::List::iterator it, end = clients.end();
+ for (it = clients.begin(); it != end; ++it) {
+ if ((*it)->desktop() == old) {
+ (*it)->frame->hide();
+ } else if ((*it)->desktop() == _desktop) {
+ (*it)->frame->show();
+ }
+ }
+
+ // force the callbacks to fire
+ if (!Openbox::instance->focusedClient())
+ Openbox::instance->setFocusedClient(0);
+}
+
+void OBScreen::changeNumDesktops(long num)
+{
+ assert(num > 0);
+
+ if (!(num > 0)) return;
+
+ // XXX: move windows on desktops that will no longer exist!
+
+ _num_desktops = num;
+ Openbox::instance->property()->set(_info->rootWindow(),
+ otk::OBProperty::net_number_of_desktops,
+ otk::OBProperty::Atom_Cardinal,
+ _num_desktops);
+
+ // set the viewport hint
+ unsigned long *viewport = new unsigned long[_num_desktops * 2];
+ memset(viewport, 0, sizeof(unsigned long) * _num_desktops * 2);
+ Openbox::instance->property()->set(_info->rootWindow(),
+ otk::OBProperty::net_desktop_viewport,
+ otk::OBProperty::Atom_Cardinal,
+ viewport, _num_desktops * 2);
+ delete [] viewport;
+
+ // update the work area hint
+ changeWorkArea();
+}
+
+
+void OBScreen::updateDesktopNames()
+{
+ const otk::OBProperty *property = Openbox::instance->property();
+
+ unsigned long num = (unsigned) -1;
+
+ if (!property->get(_info->rootWindow(),
+ otk::OBProperty::net_desktop_names,
+ otk::OBProperty::utf8, &num, &_desktop_names))
+ _desktop_names.clear();
+ while ((long)_desktop_names.size() < _num_desktops)
+ _desktop_names.push_back("Unnamed");
+}
+
+
+void OBScreen::setDesktopName(long i, const std::string &name)
+{
+ assert(i >= 0);
+
+ if (i >= _num_desktops) return;
+
+ const otk::OBProperty *property = Openbox::instance->property();
+
+ otk::OBProperty::StringVect newnames = _desktop_names;
+ newnames[i] = name;
+ property->set(_info->rootWindow(), otk::OBProperty::net_desktop_names,
+ otk::OBProperty::utf8, newnames);
+}
+
+
+void OBScreen::propertyHandler(const XPropertyEvent &e)
+{
+ otk::OtkEventHandler::propertyHandler(e);
+
+ const otk::OBProperty *property = Openbox::instance->property();
+
+ // compress changes to a single property into a single change
+ XEvent ce;
+ while (XCheckTypedEvent(otk::OBDisplay::display, e.type, &ce)) {
+ // XXX: it would be nice to compress ALL changes to a property, not just
+ // changes in a row without other props between.
+ if (ce.xproperty.atom != e.atom) {
+ XPutBackEvent(otk::OBDisplay::display, &ce);
+ break;
+ }
+ }
+
+ if (e.atom == property->atom(otk::OBProperty::net_desktop_names))
+ updateDesktopNames();
+}
+
+
+void OBScreen::clientMessageHandler(const XClientMessageEvent &e)
+{
+ otk::OtkEventHandler::clientMessageHandler(e);
+
+ if (e.format != 32) return;
+
+ const otk::OBProperty *property = Openbox::instance->property();
+
+ if (e.message_type == property->atom(otk::OBProperty::net_current_desktop)) {
+ changeDesktop(e.data.l[0]);
+ } else if (e.message_type ==
+ property->atom(otk::OBProperty::net_number_of_desktops)) {
+ changeNumDesktops(e.data.l[0]);
+ }
+ // XXX: so many client messages to handle here! ..or not.. they go to clients
+}
+
+
+void OBScreen::mapRequestHandler(const XMapRequestEvent &e)
+{
+ otk::OtkEventHandler::mapRequestHandler(e);
+
+#ifdef DEBUG
+ printf("MapRequest for 0x%lx\n", e.window);
+#endif // DEBUG
+
+ /*
+ MapRequest events come here even after the window exists instead of going
+ right to the client window, because of how they are sent and their struct
+ layout.
+ */
+ OBClient *c = Openbox::instance->findClient(e.window);
+
+ if (c) {
+ // send a net_active_window message
+ XEvent ce;
+ ce.xclient.type = ClientMessage;
+ ce.xclient.message_type =
+ Openbox::instance->property()->atom(otk::OBProperty::net_active_window);
+ ce.xclient.display = otk::OBDisplay::display;
+ ce.xclient.window = c->window();
+ ce.xclient.format = 32;
+ ce.xclient.data.l[0] = 0l;
+ ce.xclient.data.l[1] = 0l;
+ ce.xclient.data.l[2] = 0l;
+ ce.xclient.data.l[3] = 0l;
+ ce.xclient.data.l[4] = 0l;
+ XSendEvent(otk::OBDisplay::display, _info->rootWindow(), false,
+ SubstructureRedirectMask | SubstructureNotifyMask,
+ &ce);
+ } else
+ manageWindow(e.window);
+}