The big rename for modules. Still some details remaining.

git-svn-id: https://svn.kvirc.de/svn/trunk/kvirc@5284 17fca916-40b9-46aa-a4ea-0a15b648b75c

1 files changed, 398 insertions, 0 deletions

diff --git a/src/modules/objects/KvsObject_popupMenu.cpp b/src/modules/objects/KvsObject_popupMenu.cpp
new file mode 100644
index 000000000..25cc28cac
--- /dev/null
+++ b/src/modules/objects/KvsObject_popupMenu.cpp
@@ -0,0 +1,398 @@
+//=============================================================================
+//
+//   File : KvsObject_popupMenu.cpp
+//   Creation date : Fri Mar 18 21:30:48 CEST 2005
+//   by Tonino Imbesi(Grifisx) and Alessandro Carbone(Noldor)
+//
+//   This file is part of the KVIrc irc client distribution
+//   Copyright (C) 2005-2008 Alessandro Carbone (elfonol at gmail dot com)
+//
+//   This program is FREE software. You can redistribute it and/or
+//   modify it under the terms of the GNU General Public License
+//   as published by the Free Software Foundation; either version 2
+//   of the License, or (at your opinion) any later version.
+//
+//   This program is distributed in the HOPE that it will be USEFUL,
+//   but WITHOUT ANY WARRANTY; without even the implied warranty of
+//   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+//   See the GNU General Public License for more details.
+//
+//   You should have received a copy of the GNU General Public License
+//   along with this program. If not, write to the Free Software Foundation,
+//   Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+//
+//=============================================================================
+
+
+#include "KvsObject_popupMenu.h"
+
+#include "KviError.h"
+#include "kvi_debug.h"
+#include "KviLocale.h"
+#include "KviIconManager.h"
+#include "KviTalPopupMenu.h"
+
+#include <QCursor>
+#include <QMenu>
+#include <QAction>
+
+
+
+/*
+	@doc:   popupmenu
+	@keyterms:
+		popupmenu object class,
+	@title:
+		popupmenu class
+	@type:
+		class
+	@short:
+		Provides a popup menu.
+	@inherits:
+		[class]object[/class]
+		[class]widget[/class]
+	@description:
+		This widget can be used to display a popup menu.Technically, a popup menu consists of a list of menu items.[br]
+		You add items with insertItem(). An item is either a string. In addition, items can have an optional icon drawn on the very left side.[br]
+	@functions:
+		!fn: $insertItem(<text:string>,[icon_id:string])
+		Inserts menu items into a popup menu with optional icon and return the popup identifier.
+                !fn: $addMenu(<popupmenu:hobject,[idx:uinteger])
+                Add a popupmenu.
+                With the optional parameter idx the popup will be inserted.
+		!fn: $setTitle(<text:string>)
+		Sets the popupmenu title to text.
+		!fn: $exec([<widget:objects>,<x:uinteger>,<y:integer>])
+		If called without paramaters show the popup menu at the current pointer position.[br]
+		With the optional parameters show the popup menu at the coordinate x,y widget parameter relative.
+		!fn: $removeItem(<popup_id:Uinteger>)
+		Removes the menu item that has the identifier id.
+		!fn: $removeItemAt(<index:uinteger>)
+		Removes the menu item at position index.
+		!fn: $insertSeparator(<index:uinteger>)
+		Inserts a separator at position index.[br]
+		If the index is negative the separator becomes the last menu item.
+		!fn: $activatedEvent(<popup_id:uinteger>)
+		This function is called when a menu item and return the the item id.[br]
+		The default implementation emits the [classfnc]$activated[/classfnc]() signal.
+		!fn: $highligthtedEvent(<popup_id:uinteger>)
+		This function is called when a menu item is highlighted and return the item id.[br]
+		The default implementation emits the [classfnc]$highlighted[/classfnc]() signal.
+	@signals:
+		!sg: $activated()
+		This signal is emitted by the default implementation of [classfnc]$activatedEvent[/classfnc]().
+		!sg: $highlighted()
+		This signal is emitted by the default implementation of [classfnc]$highlightedEvent[/classfnc]().
+		[br]
+	@examples:
+		[example]
+		// first we define a class inherited from popupmenu
+		class(menu,popupmenu)
+		{
+			constructor()
+			{
+				// we store the item's id for checkit in activatedEvent
+				@%tile_id=@$insertItem("Tile",118)
+				@%cascade_id=@$insertItem("Cascade",115)
+				@$insertSeparator(3)
+				@%closeactw_id=@$insertItem("Close Active Window",08)
+				@%closeallw_id=@$insertItem("Close All Window",58)
+			}
+			activatedEvent()
+			{
+				// now we emit a signals to the relative to the user choice
+				%id=$0
+				if (%id==@%tile_id) @$emit("tile")
+				else if(%id==@%cascade_id) @$emit("cascade")
+				else if (%id==@%closeactw_id) @$emit("closeactive")
+				else @$emit("closeallwindows")
+				// deleting the popup
+				delete $$
+			}
+		}
+		class (ws,widget)[br]
+		{
+			#In the constructor we create everything that belong to the single widget.
+			constructor()
+			{
+				#Here we generate a loop to create our labels inside the widget.
+				%lay=$new(layout,$$)
+				// we use a vbox to managing labels in vertical orientation
+				%vb=$new(vbox,$$)
+				// then add the vbox to the main layout
+				%lay->$addWidget(%vb,0,0)
+				// let's create our colorful labels
+				for(%i=0;%i<15;%i++)
+				{
+					@%label=$new(label,%vb)
+					@%label->$settext("Another class by N\&G")
+					#We set our foreground's colors using the hex array in a random way.
+					@%label->$setforegroundcolor($array($rand(255),$rand(255),$rand(255)))
+				}
+			}
+			customContextMenuRequestedEvent()
+			{
+				#We create  the popupmenu relative to this widget at runtime.
+				%p=$new(menu,$$)
+				objects.connect %p tile @$parent tile
+				objects.connect %p cascade @$parent cascade
+				objects.connect %p closeactive @$parent closeactivewindow
+				objects.connect %p closeallwindows @$parent closeallwindows
+				%p->$exec($$,$($0+10),$($1+10))
+			}
+		}
+		// we create the workspace widget
+		%Workspace=$new(workspace)
+		// we use as space as we have
+		%size[]=%Workspace->$screenResolution()
+		// resize it
+		%Workspace->$resize(%size[0],%size[1])
+		// then create 20 subwidget
+		for(%i=0;%i<20;%i++)
+		{
+			%w=$new(ws,%Workspace)
+			// let's add avery widget to the workspace
+			%Workspace->$addSubWindow(%w)
+			// then "shake it" a little bit around :-)
+			%w->$move($rand($(%size[0]-50)),$rand($(%size[1]-50)))
+		}
+		// reimplement closeEvent to delete all this :-)
+		privateimpl(%Workspace,closeEvent)
+		{
+			delete $$
+		}
+		#Let's show!
+		%Workspace->$show()
+		[/example]
+*/
+
+static QHash<int,QAction*> actionsDict;
+static int iIdentifier=0;
+
+
+static int addActionToDict(QAction *pAction)
+{
+    actionsDict.insert(iIdentifier,pAction);
+    iIdentifier++;
+    return (iIdentifier-1);
+}
+static void removeMenuAllActions(QMenu *pMenu)
+{
+    QList<QAction*> pActionsList=pMenu->actions();
+    QList<QAction*> pActionsListDictValues=actionsDict.values();
+    for(int i=0;i<pActionsList.count();i++)
+    {
+        int iIdx=pActionsListDictValues.indexOf(pActionsList.at(i));
+        if (iIdx>=0) actionsDict.remove(actionsDict.key(pActionsList.at(i)));
+    }
+}
+
+static QAction* getAction(int idx)
+{
+    return actionsDict.value(idx);
+}
+static void removeAction(int idx)
+{
+    actionsDict.remove(idx);
+}
+
+
+KVSO_BEGIN_REGISTERCLASS(KvsObject_popupMenu,"popupmenu","widget")
+	KVSO_REGISTER_HANDLER_BY_NAME(KvsObject_popupMenu,insertItem)
+	KVSO_REGISTER_HANDLER_BY_NAME(KvsObject_popupMenu,setTitle)
+	KVSO_REGISTER_HANDLER_BY_NAME(KvsObject_popupMenu,exec)
+	KVSO_REGISTER_HANDLER_BY_NAME(KvsObject_popupMenu,insertSeparator)
+	KVSO_REGISTER_HANDLER_BY_NAME(KvsObject_popupMenu,removeItem)
+        KVSO_REGISTER_HANDLER_BY_NAME(KvsObject_popupMenu,addMenu)
+
+	// events
+	KVSO_REGISTER_HANDLER_BY_NAME(KvsObject_popupMenu,highlightedEvent)
+	KVSO_REGISTER_HANDLER_BY_NAME(KvsObject_popupMenu,activatedEvent)
+
+KVSO_END_REGISTERCLASS(KvsObject_popupMenu)
+
+KVSO_BEGIN_CONSTRUCTOR(KvsObject_popupMenu,KvsObject_widget)
+
+KVSO_END_CONSTRUCTOR(KvsObject_popupMenu)
+
+
+KVSO_BEGIN_DESTRUCTOR(KvsObject_popupMenu)
+
+KVSO_END_CONSTRUCTOR(KvsObject_popupMenu)
+
+bool KvsObject_popupMenu::init(KviKvsRunTimeContext *,KviKvsVariantList *)
+{
+        SET_OBJECT(QMenu)
+	connect(widget(),SIGNAL(triggered(QAction *)),this,SLOT(slottriggered(QAction *)));
+        connect(widget(),SIGNAL(destroyed(QObject *)),this,SLOT(aboutToDie(QObject *)));
+	connect(widget(),SIGNAL(highlighted(int)),this,SLOT(slothighlighted(int)));
+	return true;
+}
+
+KVSO_CLASS_FUNCTION(popupMenu,insertItem)
+{
+	CHECK_INTERNAL_POINTER(widget())
+	QString szItem,szIcon;
+	KVSO_PARAMETERS_BEGIN(c)
+		KVSO_PARAMETER("text",KVS_PT_STRING,0,szItem)
+		KVSO_PARAMETER("icon_id",KVS_PT_STRING,KVS_PF_OPTIONAL,szIcon)
+	KVSO_PARAMETERS_END(c)
+	QPixmap *pix = 0;
+        QAction * pAction = 0;
+	if(!szIcon.isEmpty())
+	{
+		pix = g_pIconManager->getImage(szIcon);
+                if (pix) pAction=((QMenu *)widget())->addAction(*pix,szItem);
+		else c->warning(__tr2qs_ctx("Icon '%Q' doesn't exist","objects"),&szIcon);
+	}
+	else
+                pAction=((QMenu *)widget())->addAction(szItem);
+        int identifier=addActionToDict(pAction);
+        c->returnValue()->setInteger((kvs_int_t)identifier);
+	return true;
+}
+
+KVSO_CLASS_FUNCTION(popupMenu,setTitle)
+{
+	QString szTitle;
+	KVSO_PARAMETERS_BEGIN(c)
+		KVSO_PARAMETER("title",KVS_PT_STRING,0,szTitle)
+	KVSO_PARAMETERS_END(c)
+	if(!widget())return true;
+	((QMenu *)widget())->setTitle(szTitle);
+
+	return true;
+}
+
+KVSO_CLASS_FUNCTION(popupMenu,exec)
+{
+	CHECK_INTERNAL_POINTER(widget())
+	if(!c->params()->count())
+	{
+		((QMenu *)widget())->exec(QCursor::pos());
+		return true;
+	}
+
+	KviKvsObject *pObject;
+	kvs_uint_t iX,iY;
+	QString szLabel,szIcon;
+	kvs_hobject_t hObject;
+	KVSO_PARAMETERS_BEGIN(c)
+		KVSO_PARAMETER("widget",KVS_PT_HOBJECT,0,hObject)
+		KVSO_PARAMETER("x",KVS_PT_UNSIGNEDINTEGER,0,iX)
+		KVSO_PARAMETER("y",KVS_PT_UNSIGNEDINTEGER,0,iY)
+	KVSO_PARAMETERS_END(c)
+	pObject=KviKvsKernel::instance()->objectController()->lookupObject(hObject);
+	CHECK_HOBJECT_IS_WIDGET(pObject)
+	((QMenu *)widget())->exec(((QWidget *)(pObject->object()))->mapToGlobal(QPoint(iX,iY)) );
+
+	return true;
+}
+
+
+
+KVSO_CLASS_FUNCTION(popupMenu,addMenu)
+{
+        CHECK_INTERNAL_POINTER(widget())
+        KviKvsObject *pObject;
+        kvs_uint_t iIdx;
+        kvs_hobject_t hObject;
+        KVSO_PARAMETERS_BEGIN(c)
+                KVSO_PARAMETER("popupmenu",KVS_PT_HOBJECT,0,hObject)
+                KVSO_PARAMETER("index",KVS_PT_UNSIGNEDINTEGER,KVS_PF_OPTIONAL,iIdx)
+        KVSO_PARAMETERS_END(c)
+        pObject=KviKvsKernel::instance()->objectController()->lookupObject(hObject);
+        if (!pObject)\
+        {
+            c->warning(__tr2qs_ctx("Popup menu parameter is not an object","objects"));\
+            return true;
+        }
+        if (!pObject->object())\
+        {
+            c->warning(__tr2qs_ctx("Popup menu parameter is not a valid object","objects"));\
+            return true;\
+        }
+        if(!pObject->inheritsClass("popupmenu"))\
+        {\
+            c->warning(__tr2qs_ctx("Popupmenu object required","objects"));\
+            return true;\
+        }
+        QAction *pAction;
+        if(iIdx)
+        {
+            QAction *pActionBefore=actionsDict[iIdx];
+            pAction=((QMenu *)widget())->insertMenu(pActionBefore,(QMenu*)pObject->object());
+        }
+        else pAction=((QMenu *)widget())->addMenu((QMenu*)pObject->object());
+        int identifier=addActionToDict(pAction);
+        c->returnValue()->setInteger((kvs_int_t)identifier);
+        identifier++;
+        return true;
+}
+
+KVSO_CLASS_FUNCTION(popupMenu,removeItem)
+{
+	CHECK_INTERNAL_POINTER(widget())
+        kvs_int_t iIdx;
+	KVSO_PARAMETERS_BEGIN(c)
+                KVSO_PARAMETER("item_id",KVS_PT_INTEGER,0,iIdx)
+	KVSO_PARAMETERS_END(c)
+        QAction * pAction=getAction(iIdx);
+        if(pAction)
+	{
+                ((QMenu *)widget())->removeAction(pAction);
+                removeAction(iIdx);
+	}
+	return true;
+}
+
+KVSO_CLASS_FUNCTION(popupMenu,insertSeparator)
+{
+	CHECK_INTERNAL_POINTER(widget())
+	kvs_uint_t iIndex;
+	KVSO_PARAMETERS_BEGIN(c)
+		KVSO_PARAMETER("index",KVS_PT_UNSIGNEDINTEGER,0,iIndex)
+	KVSO_PARAMETERS_END(c)
+        QAction * pAction=getAction(iIndex);
+        if(pAction)((QMenu *)widget())->insertSeparator(pAction);
+	return true;
+}
+
+void KvsObject_popupMenu::slothighlighted(int i)
+{
+	KviKvsVariantList params(new KviKvsVariant((kvs_int_t)i));
+	callFunction(this,"highlightedEvent",&params);
+}
+void KvsObject_popupMenu::aboutToDie(QObject *pObject)
+{
+        qDebug("Removing popup from kvs dict");
+        removeMenuAllActions((QMenu *)pObject);
+}
+KVSO_CLASS_FUNCTION(popupMenu,highlightedEvent)
+{
+	emitSignal("highlighted",c,c->params());
+	return true;
+}
+
+void KvsObject_popupMenu::slottriggered(QAction *a)
+{
+	QHashIterator<int, QAction *> i(actionsDict);
+	while (i.hasNext())
+	{
+                i.next();
+                if (i.value()== a) break;
+        }
+        KviKvsVariantList params(new KviKvsVariant((kvs_int_t)i.key()));
+	callFunction(this,"activatedEvent",&params);
+}
+
+KVSO_CLASS_FUNCTION(popupMenu,activatedEvent)
+{
+	emitSignal("activated",c,c->params());
+	return true;
+}
+
+
+#ifndef COMPILE_USE_STANDALONE_MOC_SOURCES
+#include "m_KvsObject_popupMenu.moc"
+#endif //!COMPILE_USE_STANDALONE_MOC_SOURCES