1 // -*- mode: C++; indent-tabs-mode: nil; c-basic-offset: 2; -*-
4 # include "../config.h"
10 #include "otk/display.hh"
11 #include "otk/property.hh"
15 #include <X11/Xutil.h>
20 #define _(str) gettext(str)
25 OBClient::OBClient(int screen
, Window window
)
26 : otk::OtkEventHandler(),
27 _screen(screen
), _window(window
)
32 Openbox::instance
->registerHandler(_window
, this);
36 // update EVERYTHING the first time!!
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;
47 // set the decorations and functions
50 // normal windows retain all of the possible decorations and
52 _decorations
= Decor_Titlebar
| Decor_Handle
| Decor_Border
|
53 Decor_Iconify
| Decor_Maximize
;
54 _functions
= Func_Resize
| Func_Move
| Func_Iconify
| Func_Maximize
;
57 // dialogs cannot be maximized
58 _decorations
&= ~Decor_Maximize
;
59 _functions
&= ~Func_Maximize
;
65 // these windows get less functionality
66 _decorations
&= ~(Decor_Iconify
| Decor_Handle
);
67 _functions
&= ~(Func_Iconify
| Func_Resize
);
73 // none of these windows are manipulated by the window manager
79 getMwmHints(); // this fucks (in good ways) with the decors and functions
86 // XXX: updateTransientFor();
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",
113 _area.x(), _area.y(),
114 _area.width(), _area.height(),
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");
141 OBClient::~OBClient()
143 const otk::OBProperty
*property
= Openbox::instance
->property();
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
);
151 void OBClient::getDesktop()
153 const otk::OBProperty
*property
= Openbox::instance
->property();
155 // defaults to the current desktop
156 _desktop
= 0; // XXX: change this to the current desktop!
158 property
->get(_window
, otk::OBProperty::net_wm_desktop
,
159 otk::OBProperty::Atom_Cardinal
,
164 void OBClient::getType()
166 const otk::OBProperty
*property
= Openbox::instance
->property();
168 _type
= (WindowType
) -1;
171 unsigned long num
= (unsigned) -1;
172 if (property
->get(_window
, otk::OBProperty::net_wm_window_type
,
173 otk::OBProperty::Atom_Atom
,
175 // use the first value that we know about in the array
176 for (unsigned long i
= 0; i
< num
; ++i
) {
178 property
->atom(otk::OBProperty::net_wm_window_type_desktop
))
179 _type
= Type_Desktop
;
181 property
->atom(otk::OBProperty::net_wm_window_type_dock
))
184 property
->atom(otk::OBProperty::net_wm_window_type_toolbar
))
185 _type
= Type_Toolbar
;
187 property
->atom(otk::OBProperty::net_wm_window_type_menu
))
190 property
->atom(otk::OBProperty::net_wm_window_type_utility
))
191 _type
= Type_Utility
;
193 property
->atom(otk::OBProperty::net_wm_window_type_splash
))
196 property
->atom(otk::OBProperty::net_wm_window_type_dialog
))
199 property
->atom(otk::OBProperty::net_wm_window_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
209 if (_type
== (WindowType
) -1) {
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.
214 // XXX: make this code work!
216 // _type = Type_Dialog;
223 void OBClient::getMwmHints()
225 const otk::OBProperty
*property
= Openbox::instance
->property();
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
))
236 if (num
< MwmHints::elements
) {
241 // retrieved the hints
242 // Mwm Hints are applied subtractively to what has already been chosen for
243 // decor and functionality
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
;
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;
278 void OBClient::getArea()
280 XWindowAttributes wattrib
;
283 ret
= XGetWindowAttributes(otk::OBDisplay::display
, _window
, &wattrib
);
284 assert(ret
!= BadWindow
);
286 _area
.setRect(wattrib
.x
, wattrib
.y
, wattrib
.width
, wattrib
.height
);
287 _border_width
= wattrib
.border_width
;
291 void OBClient::getState()
293 const otk::OBProperty
*property
= Openbox::instance
->property();
295 _modal
= _shaded
= _max_horz
= _max_vert
= _fullscreen
= _floating
= false;
297 unsigned long *state
;
298 unsigned long num
= (unsigned) -1;
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
))
306 property
->atom(otk::OBProperty::net_wm_state_shaded
))
309 property
->atom(otk::OBProperty::net_wm_state_fullscreen
))
312 property
->atom(otk::OBProperty::net_wm_state_maximized_vert
))
315 property
->atom(otk::OBProperty::net_wm_state_maximized_horz
))
324 void OBClient::getShaped()
328 if (otk::OBDisplay::shape()) {
333 XShapeSelectInput(otk::OBDisplay::display
, _window
, ShapeNotifyMask
);
335 XShapeQueryExtents(otk::OBDisplay::display
, _window
, &s
, &foo
,
336 &foo
, &ufoo
, &ufoo
, &foo
, &foo
, &foo
, &ufoo
, &ufoo
);
343 void OBClient::updateProtocols()
345 const otk::OBProperty
*property
= Openbox::instance
->property();
350 _focus_notify
= false;
351 _decorations
&= ~Decor_Close
;
352 _functions
&= ~Func_Close
;
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;
370 void OBClient::updateNormalHints()
376 _gravity
= NorthWestGravity
;
378 _base_x
= _base_y
= 0;
380 _max_x
= _max_y
= INT_MAX
;
382 // XXX: might want to cancel any interactive resizing of the window at this
385 // get the hints from the window
386 if (XGetWMNormalHints(otk::OBDisplay::display
, _window
, &size
, &ret
)) {
387 _positioned
= (size
.flags
& (PPosition
|USPosition
));
389 if (size
.flags
& PWinGravity
)
390 _gravity
= size
.win_gravity
;
392 if (size
.flags
& PMinSize
) {
393 _min_x
= size
.min_width
;
394 _min_y
= size
.min_height
;
397 if (size
.flags
& PMaxSize
) {
398 _max_x
= size
.max_width
;
399 _max_y
= size
.max_height
;
402 if (size
.flags
& PBaseSize
) {
403 _base_x
= size
.base_width
;
404 _base_y
= size
.base_height
;
407 if (size
.flags
& PResizeInc
) {
408 _inc_x
= size
.width_inc
;
409 _inc_y
= size
.height_inc
;
415 void OBClient::updateWMHints()
419 // assume a window takes input if it doesnt specify
423 if ((hints
= XGetWMHints(otk::OBDisplay::display
, _window
)) != NULL
) {
424 if (hints
->flags
& InputHint
)
425 _can_focus
= hints
->input
;
427 if (hints
->flags
& XUrgencyHint
)
430 if (hints
->flags
& WindowGroupHint
) {
431 if (hints
->window_group
!= _group
) {
432 // XXX: remove from the old group if there was one
433 _group
= hints
->window_group
;
434 // XXX: do stuff with the group
444 void OBClient::updateTitle()
446 const otk::OBProperty
*property
= Openbox::instance
->property();
451 if (! property
->get(_window
, otk::OBProperty::net_wm_name
,
452 otk::OBProperty::utf8
, &_title
)) {
454 property
->get(_window
, otk::OBProperty::wm_name
,
455 otk::OBProperty::ascii
, &_title
);
459 _title
= _("Unnamed Window");
463 void OBClient::updateIconTitle()
465 const otk::OBProperty
*property
= Openbox::instance
->property();
470 if (! property
->get(_window
, otk::OBProperty::net_wm_icon_name
,
471 otk::OBProperty::utf8
, &_icon_title
)) {
473 property
->get(_window
, otk::OBProperty::wm_icon_name
,
474 otk::OBProperty::ascii
, &_icon_title
);
478 _icon_title
= _("Unnamed Window");
482 void OBClient::updateClass()
484 const otk::OBProperty
*property
= Openbox::instance
->property();
487 _app_name
= _app_class
= "";
489 otk::OBProperty::StringVect v
;
490 unsigned long num
= 2;
492 if (! property
->get(_window
, otk::OBProperty::wm_class
,
493 otk::OBProperty::ascii
, &num
, &v
))
496 if (num
> 0) _app_name
= v
[0];
497 if (num
> 1) _app_class
= v
[1];
501 void OBClient::propertyHandler(const XPropertyEvent
&e
)
503 otk::OtkEventHandler::propertyHandler(e
);
505 const otk::OBProperty
*property
= Openbox::instance
->property();
507 // compress changes to a single property into a single change
509 while (XCheckTypedEvent(otk::OBDisplay::display
, e
.type
, &ce
)) {
510 // XXX: it would be nice to compress ALL changes to a property, not just
511 // changes in a row without other props between.
512 if (ce
.xproperty
.atom
!= e
.atom
) {
513 XPutBackEvent(otk::OBDisplay::display
, &ce
);
518 if (e
.atom
== XA_WM_NORMAL_HINTS
)
520 else if (e
.atom
== XA_WM_HINTS
)
522 else if (e
.atom
== property
->atom(otk::OBProperty::net_wm_name
) ||
523 e
.atom
== property
->atom(otk::OBProperty::wm_name
))
525 else if (e
.atom
== property
->atom(otk::OBProperty::net_wm_icon_name
) ||
526 e
.atom
== property
->atom(otk::OBProperty::wm_icon_name
))
528 else if (e
.atom
== property
->atom(otk::OBProperty::wm_class
))
530 else if (e
.atom
== property
->atom(otk::OBProperty::wm_protocols
))
532 // XXX: transient for hint
537 void OBClient::setWMState(long state
)
539 if (state
== _wmstate
) return; // no change
543 // XXX: cause it to iconify
546 // XXX: cause it to uniconify
553 void OBClient::setDesktop(long target
)
556 //assert(target == 0xffffffff || target < MAX);
558 // XXX: move the window to the new desktop
563 void OBClient::setState(StateAction action
, long data1
, long data2
)
565 const otk::OBProperty
*property
= Openbox::instance
->property();
567 if (!(action
== State_Add
|| action
== State_Remove
||
568 action
== State_Toggle
))
569 return; // an invalid action was passed to the client message, ignore it
571 for (int i
= 0; i
< 2; ++i
) {
572 Atom state
= i
== 0 ? data1
: data2
;
574 if (! state
) continue;
576 // if toggling, then pick whether we're adding or removing
577 if (action
== State_Toggle
) {
578 if (state
== property
->atom(otk::OBProperty::net_wm_state_modal
))
579 action
= _modal
? State_Remove
: State_Add
;
581 property
->atom(otk::OBProperty::net_wm_state_maximized_vert
))
582 action
= _max_vert
? State_Remove
: State_Add
;
584 property
->atom(otk::OBProperty::net_wm_state_maximized_horz
))
585 action
= _max_horz
? State_Remove
: State_Add
;
586 else if (state
== property
->atom(otk::OBProperty::net_wm_state_shaded
))
587 action
= _shaded
? State_Remove
: State_Add
;
589 property
->atom(otk::OBProperty::net_wm_state_fullscreen
))
590 action
= _fullscreen
? State_Remove
: State_Add
;
591 else if (state
== property
->atom(otk::OBProperty::net_wm_state_floating
))
592 action
= _floating
? State_Remove
: State_Add
;
595 if (action
== State_Add
) {
596 if (state
== property
->atom(otk::OBProperty::net_wm_state_modal
)) {
597 if (_modal
) continue;
599 // XXX: give it focus if another window has focus that shouldnt now
601 property
->atom(otk::OBProperty::net_wm_state_maximized_vert
)){
602 if (_max_vert
) continue;
604 // XXX: resize the window etc
606 property
->atom(otk::OBProperty::net_wm_state_maximized_horz
)){
607 if (_max_horz
) continue;
609 // XXX: resize the window etc
611 property
->atom(otk::OBProperty::net_wm_state_shaded
)) {
612 if (_shaded
) continue;
614 // XXX: hide the client window
616 property
->atom(otk::OBProperty::net_wm_state_fullscreen
)) {
617 if (_fullscreen
) continue;
619 // XXX: raise the window n shit
621 property
->atom(otk::OBProperty::net_wm_state_floating
)) {
622 if (_floating
) continue;
624 // XXX: raise the window n shit
627 } else { // action == State_Remove
628 if (state
== property
->atom(otk::OBProperty::net_wm_state_modal
)) {
629 if (!_modal
) continue;
632 property
->atom(otk::OBProperty::net_wm_state_maximized_vert
)){
633 if (!_max_vert
) continue;
635 // XXX: resize the window etc
637 property
->atom(otk::OBProperty::net_wm_state_maximized_horz
)){
638 if (!_max_horz
) continue;
640 // XXX: resize the window etc
642 property
->atom(otk::OBProperty::net_wm_state_shaded
)) {
643 if (!_shaded
) continue;
645 // XXX: show the client window
647 property
->atom(otk::OBProperty::net_wm_state_fullscreen
)) {
648 if (!_fullscreen
) continue;
650 // XXX: lower the window to its proper layer
652 property
->atom(otk::OBProperty::net_wm_state_floating
)) {
653 if (!_floating
) continue;
655 // XXX: lower the window to its proper layer
662 void OBClient::clientMessageHandler(const XClientMessageEvent
&e
)
664 otk::OtkEventHandler::clientMessageHandler(e
);
666 if (e
.format
!= 32) return;
668 const otk::OBProperty
*property
= Openbox::instance
->property();
670 if (e
.message_type
== property
->atom(otk::OBProperty::wm_change_state
)) {
671 // compress changes into a single change
672 bool compress
= false;
674 while (XCheckTypedEvent(otk::OBDisplay::display
, e
.type
, &ce
)) {
675 // XXX: it would be nice to compress ALL messages of a type, not just
676 // messages in a row without other message types between.
677 if (ce
.xclient
.message_type
!= e
.message_type
) {
678 XPutBackEvent(otk::OBDisplay::display
, &ce
);
684 setWMState(ce
.xclient
.data
.l
[0]); // use the found event
686 setWMState(e
.data
.l
[0]); // use the original event
687 } else if (e
.message_type
==
688 property
->atom(otk::OBProperty::net_wm_desktop
)) {
689 // compress changes into a single change
690 bool compress
= false;
692 while (XCheckTypedEvent(otk::OBDisplay::display
, e
.type
, &ce
)) {
693 // XXX: it would be nice to compress ALL messages of a type, not just
694 // messages in a row without other message types between.
695 if (ce
.xclient
.message_type
!= e
.message_type
) {
696 XPutBackEvent(otk::OBDisplay::display
, &ce
);
702 setDesktop(e
.data
.l
[0]); // use the found event
704 setDesktop(e
.data
.l
[0]); // use the original event
706 else if (e
.message_type
== property
->atom(otk::OBProperty::net_wm_state
))
707 // can't compress these
708 setState((StateAction
)e
.data
.l
[0], e
.data
.l
[1], e
.data
.l
[2]);
712 #if defined(SHAPE) || defined(DOXYGEN_IGNORE)
713 void OBClient::shapeHandler(const XShapeEvent
&e
)
715 otk::OtkEventHandler::shapeHandler(e
);
722 void OBClient::setArea(const otk::Rect
&area
)