diff options
Diffstat (limited to 'tdeui/twindowlistmenu.cpp')
| -rw-r--r-- | tdeui/twindowlistmenu.cpp | 257 |
1 files changed, 257 insertions, 0 deletions
diff --git a/tdeui/twindowlistmenu.cpp b/tdeui/twindowlistmenu.cpp new file mode 100644 index 000000000..1334abd6e --- /dev/null +++ b/tdeui/twindowlistmenu.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 <twin.h> +#include <twinmodule.h> + +#include <klocale.h> +#include <kstringhandler.h> + +#include <netwm.h> +#include <kapplication.h> +#include <kstyle.h> +#include <dcopclient.h> + +#undef Bool +#include "twindowlistmenu.h" +#include "twindowlistmenu.moc" + +static TQCString twinName() { + TQCString appname; + int screen_number = DefaultScreen(qt_xdisplay()); + if (screen_number == 0) + appname = "twin"; + else + appname.sprintf("twin-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) +{ + twin_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 = twin_module->numberOfDesktops(); + int cd = twin_module->currentDesktop(); + WId active_window = twin_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 = twin_module->windows().begin(); + it != twin_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(twin_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(twinName(), "KWinInterface", "unclutterDesktop()", TQString("")); +} + +void KWindowListMenu::slotCascadeWindows() +{ + kapp->dcopClient()->send(twinName(), "KWinInterface", "cascadeDesktop()", TQString("")); +} + +void KWindowListMenu::virtual_hook( int id, void* data ) +{ KPopupMenu::virtual_hook( id, data ); } + +#endif // Q_WS_X11 + |