summaryrefslogtreecommitdiffstats
path: root/tdeui/kwindowlistmenu.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'tdeui/kwindowlistmenu.cpp')
-rw-r--r--tdeui/kwindowlistmenu.cpp257
1 files changed, 257 insertions, 0 deletions
diff --git a/tdeui/kwindowlistmenu.cpp b/tdeui/kwindowlistmenu.cpp
new file mode 100644
index 000000000..10538a67c
--- /dev/null
+++ b/tdeui/kwindowlistmenu.cpp
@@ -0,0 +1,257 @@
+/*****************************************************************
+
+Copyright (c) 2000 Matthias Elter <elter@kde.org>
+ Matthias Ettrich <ettrich@kde.org>
+
+Permission is hereby granted, free of charge, to any person obtaining a copy
+of this software and associated documentation files (the "Software"), to deal
+in the Software without restriction, including without limitation the rights
+to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+copies of the Software, and to permit persons to whom the Software is
+furnished to do so, subject to the following conditions:
+
+The above copyright notice and this permission notice shall be included in
+all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+AUTHORS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
+AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
+CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
+******************************************************************/
+
+#include <tqglobal.h>
+
+#ifdef Q_WS_X11
+
+#include "config.h"
+#include <tqpainter.h>
+#include <tqvaluelist.h>
+
+#include <kwin.h>
+#include <kwinmodule.h>
+
+#include <klocale.h>
+#include <kstringhandler.h>
+
+#include <netwm.h>
+#include <kapplication.h>
+#include <kstyle.h>
+#include <dcopclient.h>
+
+#undef Bool
+#include "kwindowlistmenu.h"
+#include "kwindowlistmenu.moc"
+
+static TQCString kwinName() {
+ TQCString appname;
+ int screen_number = DefaultScreen(qt_xdisplay());
+ if (screen_number == 0)
+ appname = "kwin";
+ else
+ appname.sprintf("kwin-screen-%d", screen_number);
+ return appname;
+}
+
+// helper class
+namespace
+{
+class NameSortedInfoList : public TQPtrList<KWin::WindowInfo>
+{
+public:
+ NameSortedInfoList() { setAutoDelete(true); }
+ ~NameSortedInfoList() {}
+
+private:
+ int compareItems( TQPtrCollection::Item s1, TQPtrCollection::Item s2 );
+};
+
+int NameSortedInfoList::compareItems( TQPtrCollection::Item s1, TQPtrCollection::Item s2 )
+{
+ KWin::WindowInfo *i1 = static_cast<KWin::WindowInfo *>(s1);
+ KWin::WindowInfo *i2 = static_cast<KWin::WindowInfo *>(s2);
+ TQString title1, title2;
+ if (i1)
+ title1 = i1->visibleNameWithState().lower();
+ if (i2)
+ title2 = i2->visibleNameWithState().lower();
+ return title1.compare(title2);
+}
+
+} // namespace
+
+KWindowListMenu::KWindowListMenu(TQWidget *parent, const char *name)
+ : KPopupMenu(parent, name)
+{
+ kwin_module = new KWinModule(TQT_TQOBJECT(this));
+
+ connect(this, TQT_SIGNAL(activated(int)), TQT_SLOT(slotExec(int)));
+}
+
+KWindowListMenu::~KWindowListMenu()
+{
+
+}
+
+static bool standaloneDialog( const KWin::WindowInfo* info, const NameSortedInfoList& list )
+{
+ WId group = info->groupLeader();
+ if( group == 0 )
+ {
+ return info->transientFor() == qt_xrootwin();
+ }
+ for( TQPtrListIterator< KWin::WindowInfo > it( list );
+ it.current() != NULL;
+ ++it )
+ if( (*it)->groupLeader() == group )
+ return false;
+ return true;
+}
+
+void KWindowListMenu::init()
+{
+ int i, d;
+ i = 0;
+
+ int nd = kwin_module->numberOfDesktops();
+ int cd = kwin_module->currentDesktop();
+ WId active_window = kwin_module->activeWindow();
+
+ // Make sure the popup is not too wide, otherwise clicking in the middle of kdesktop
+ // wouldn't leave any place for the popup, and release would activate some menu entry.
+ int maxwidth = kapp->desktop()->screenGeometry( this ).width() / 2 - 100;
+
+ clear();
+ map.clear();
+
+ int unclutter = insertItem( i18n("Unclutter Windows"),
+ this, TQT_SLOT( slotUnclutterWindows() ) );
+ int cascade = insertItem( i18n("Cascade Windows"),
+ this, TQT_SLOT( slotCascadeWindows() ) );
+
+ // if we only have one desktop we won't be showing titles, so put a separator in
+ if (nd == 1)
+ {
+ insertSeparator();
+ }
+
+
+ TQValueList<KWin::WindowInfo> windows;
+ for (TQValueList<WId>::ConstIterator it = kwin_module->windows().begin();
+ it != kwin_module->windows().end(); ++it) {
+ windows.append( KWin::windowInfo( *it, NET::WMDesktop ));
+ }
+ bool show_all_desktops_group = ( nd > 1 );
+ for (d = 1; d <= nd + (show_all_desktops_group ? 1 : 0); d++) {
+ bool on_all_desktops = ( d > nd );
+ int items = 0;
+
+ if (!active_window && d == cd)
+ setItemChecked(1000 + d, true);
+
+ NameSortedInfoList list;
+ list.setAutoDelete(true);
+
+ for (TQValueList<KWin::WindowInfo>::ConstIterator it = windows.begin();
+ it != windows.end(); ++it) {
+ if (((*it).desktop() == d) || (on_all_desktops && (*it).onAllDesktops())
+ || (!show_all_desktops_group && (*it).onAllDesktops())) {
+ list.inSort(new KWin::WindowInfo( (*it).win(),
+ NET::WMVisibleName | NET::WMState | NET::XAWMState | NET::WMWindowType,
+ NET::WM2GroupLeader | NET::WM2TransientFor ));
+ }
+ }
+
+ for (KWin::WindowInfo* info = list.first(); info; info = list.next(), ++i)
+ {
+ TQString itemText = KStringHandler::cPixelSqueeze(info->visibleNameWithState(), fontMetrics(), maxwidth);
+ NET::WindowType windowType = info->windowType( NET::NormalMask | NET::DesktopMask
+ | NET::DockMask | NET::ToolbarMask | NET::MenuMask | NET::DialogMask
+ | NET::OverrideMask | NET::TopMenuMask | NET::UtilityMask | NET::SplashMask );
+ if ( (windowType == NET::Normal || windowType == NET::Unknown
+ || (windowType == NET::Dialog && standaloneDialog( info, list )))
+ && !(info->state() & NET::SkipTaskbar) ) {
+ TQPixmap pm = KWin::icon(info->win(), 16, 16, true );
+ items++;
+
+ // ok, we have items on this desktop, let's show the title
+ if ( items == 1 && nd > 1 )
+ {
+ if( !on_all_desktops )
+ insertTitle(kwin_module->desktopName( d ), 1000 + d);
+ else
+ insertTitle(i18n("On All Desktops"), 2000 );
+ }
+
+ // Avoid creating unwanted accelerators.
+ itemText.replace('&', TQString::tqfromLatin1("&&"));
+ insertItem( pm, itemText, i);
+ map.insert(i, info->win());
+ if (info->win() == active_window)
+ setItemChecked(i, true);
+ }
+ }
+
+ if (d == cd)
+ {
+ setItemEnabled(unclutter, items > 0);
+ setItemEnabled(cascade, items > 0);
+ }
+ }
+
+ // no windows?
+ if (i == 0)
+ {
+ if (nd > 1)
+ {
+ // because we don't have any titles, nor a separator
+ insertSeparator();
+ }
+
+ setItemEnabled(insertItem(i18n("No Windows")), false);
+ }
+}
+
+void KWindowListMenu::slotExec(int id)
+{
+ if (id == 2000)
+ ; // do nothing
+ else if (id > 1000)
+ KWin::setCurrentDesktop(id - 1000);
+ else if ( id >= 0 )
+ KWin::forceActiveWindow(map[id]);
+}
+
+// This popup is much more useful from keyboard if it has the active
+// window active by default - however, TQPopupMenu tries hard to resist.
+// TQPopupMenu::popup() resets the active item, so this needs to be
+// called after popup().
+void KWindowListMenu::selectActiveWindow()
+{
+ for( unsigned int i = 0;
+ i < count();
+ ++i )
+ if( isItemChecked( idAt( i )))
+ {
+ setActiveItem( i );
+ break;
+ }
+}
+
+void KWindowListMenu::slotUnclutterWindows()
+{
+ kapp->dcopClient()->send(kwinName(), "KWinInterface", "unclutterDesktop()", TQString(""));
+}
+
+void KWindowListMenu::slotCascadeWindows()
+{
+ kapp->dcopClient()->send(kwinName(), "KWinInterface", "cascadeDesktop()", TQString(""));
+}
+
+void KWindowListMenu::virtual_hook( int id, void* data )
+{ KPopupMenu::virtual_hook( id, data ); }
+
+#endif // Q_WS_X11
+