1 files changed, 276 insertions, 0 deletions
diff --git a/src/modules/objects/class_doctwindow.cpp b/src/modules/objects/class_doctwindow.cpp
new file mode 100644
index 00000000..296a192b
--- /dev/null
+++ b/src/modules/objects/class_doctwindow.cpp
@@ -0,0 +1,276 @@
+//=============================================================================
+//
+//   File : class_doctwindow.cpp
+//   Created on Thu 29 Dec 2005 23:45:11 by Szymon Stefanek
+//
+//   This file is part of the KVIrc IRC Client distribution
+//   Copyright (C) 2005 Szymon Stefanek <pragma at kvirc dot net>
+//
+//   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 "class_doctwindow.h"
+
+#include "kvi_frame.h"
+#include "kvi_locale.h"
+#include "kvi_qstring.h"
+#ifdef COMPILE_USE_QT4
+	#include <TQDockWidget>
+	#define TQT_DOCK_WINDOW TQDockWidget
+#else
+	#include <tqdoctwindow.h>
+	#define TQT_DOCK_WINDOW TQDockWindow
+#endif
+#include <tqlayout.h>
+
+/*
+	@doc: doctwindow
+	@title:
+		doctwindow class
+	@type:
+		class
+	@short:
+		A window dockable to the KVIrc main frame
+	@inherits:
+		[class]object[/class]
+		[class]widget[/class]
+	@description:
+		A window dockable to the KVIrc main frame borders (like a toolbar).
+		The window has an implicit tqlayout that will automatically manage
+		the tqchildren depending on the dock window's orientation.
+	@functions:
+		!fn: $addWidget(<widget:hobject>)
+			Adds <widget> to the internal tqlayout of this dock window.[br]
+			The widget must be a child of this dock window (otherwise strange things may happen).
+		!fn: <string> $orientation()
+			Returns the string "vertical" or "horizontal" depending on the orientation of this dock window.
+		!fn: $setOrientation(<orientation:string>)
+			Forces the orentation of this dock window. <ordientation> must be either "horizontal" or "vertical".[br]
+			Please note that KVIrc sets the orientation automatically when it is moved between the main frame docks by the user.
+		!fn: <bool> $resizeEnabled()
+			Returns $true if resizing of this window is enabled and false otherwise.
+		!fn: $setResizeEnabled(<bEnabled:bool>)
+			Enabled or disabled resizing of this window.
+		!fn: $setAllowedDockAreas(<docks:string>)
+			Sets the allowed main window dock areas for this dock window.[br]
+			<docks> must be a combination of "l","r","t","b","f" and "m".[br]
+			"l" stands for left dock area, "r" stands for right dock area, "t" stands for the top dock areas, "b" stands for the bottom dock area, "f" stands for "floating" and "m" for "minimized".[br]
+			If a flag is present then the related block area is enabled,otherwise it is disabled.
+		!fn: $dock(<dockarea:string>)
+			Docks this dock window to the specified dockarea of the main KVIrc window which can be one of "l" (left dock area), "t" (top dock area), "r" (right dock area), "b" (bottom dock area), "f" (floating) and "m" (minimized).
+*/
+
+
+KVSO_BEGIN_REGISTERCLASS(KviKvsObject_doctwindow,"doctwindow","widget")
+	KVSO_REGISTER_HANDLER(KviKvsObject_doctwindow,"addWidget",function_addWidget)
+	KVSO_REGISTER_HANDLER(KviKvsObject_doctwindow,"orientation",function_orientation)
+	KVSO_REGISTER_HANDLER(KviKvsObject_doctwindow,"setOrientation",function_setOrientation)
+	KVSO_REGISTER_HANDLER(KviKvsObject_doctwindow,"resizeEnabled",function_resizeEnabled)
+	KVSO_REGISTER_HANDLER(KviKvsObject_doctwindow,"setResizeEnabled",function_setResizeEnabled)
+	KVSO_REGISTER_HANDLER(KviKvsObject_doctwindow,"setAllowedDockAreas",function_setAllowedDockAreas)
+	KVSO_REGISTER_HANDLER(KviKvsObject_doctwindow,"dock",function_dock)
+KVSO_END_REGISTERCLASS(KviKvsObject_doctwindow)
+
+
+KVSO_BEGIN_CONSTRUCTOR(KviKvsObject_doctwindow,KviKvsObject_widget)
+KVSO_END_CONSTRUCTOR(KviKvsObject_doctwindow)
+
+
+KVSO_BEGIN_DESTRUCTOR(KviKvsObject_doctwindow)
+KVSO_END_DESTRUCTOR(KviKvsObject_doctwindow)
+
+#define _pDockWindow ((TQT_DOCK_WINDOW *)widget())
+
+bool KviKvsObject_doctwindow::init(KviKvsRunTimeContext * pContext,KviKvsVariantList * pParams)
+{
+#ifdef COMPILE_USE_QT4
+	TQDockWidget * pWidget = new TQDockWidget(g_pFrame);
+	pWidget->setObjectName(getName());
+	setObject(pWidget);
+#else //!COMPILE_USE_QT4
+	setObject(TQT_TQOBJECT(new TQT_DOCK_WINDOW(g_pFrame,getName())),true);
+#endif //!COMPILE_USE_QT4
+	return true;
+}
+
+bool KviKvsObject_doctwindow::function_addWidget(KviKvsObjectFunctionCall *c)
+{
+	kvs_hobject_t hWidget;
+	KVSO_PARAMETERS_BEGIN(c)
+		KVSO_PARAMETER("widget",KVS_PT_HOBJECT,0,hWidget)
+	KVSO_PARAMETERS_END(c)
+
+	if(!widget())return true; // hum ? dead ?
+
+	if(hWidget == (kvs_hobject_t)0)
+	{
+		// null widget ?
+		c->warning(__tr2qs("Can't add a null object"));
+		return true;
+	}
+
+	KviKvsObject * pWidget = KviKvsKernel::instance()->objectController()->lookupObject(hWidget);
+	if(!pWidget)
+	{
+		c->warning(__tr2qs("Invalid object handle passed as parameter (the object is no longer existing ?)"));
+		return true;
+	}
+
+	if(!pWidget->object())
+	{
+		c->warning(__tr2qs("Object in invalid state"));
+		return true;
+	}
+
+	if(!pWidget->object()->isWidgetType())
+	{
+		c->warning(__tr2qs("Can't set a non-widget object to be the main widget of a dock window"));
+		return true;
+	}
+
+	if(((TQWidget *)(pWidget->object()))->parent() != (TQObject *)_pDockWindow)
+	{
+		c->warning(__tr2qs("The added widget is not a child of this dock window"));
+	}
+
+#ifdef COMPILE_USE_QT4
+	_pDockWindow->setWidget((TQWidget *)(pWidget->object()));
+#else //!COMPILE_USE_QT4
+	_pDockWindow->boxLayout()->addWidget((TQWidget *)(pWidget->object()));
+	((TQWidget *)(pWidget->object()))->show();
+#endif //!COMPILE_USE_QT4
+	return true;
+}
+
+bool KviKvsObject_doctwindow::function_orientation(KviKvsObjectFunctionCall * c)
+{
+	if(!widget())return true; // hum ? dead ?
+#ifdef COMPILE_USE_QT4
+	c->returnValue()->setString(TQString("horizontal"));
+#else //!COMPILE_USE_QT4
+	c->returnValue()->setString(_pDockWindow->orientation() == Qt::Horizontal ? TQString("horizontal") : TQString("vertical"));
+#endif //!COMPILE_USE_QT4
+	return true;
+}
+
+bool KviKvsObject_doctwindow::function_setOrientation(KviKvsObjectFunctionCall * c)
+{
+	TQString szOrientation;
+	KVSO_PARAMETERS_BEGIN(c)
+		KVSO_PARAMETER("orientation",KVS_PT_NONEMPTYSTRING,0,szOrientation)
+	KVSO_PARAMETERS_END(c)
+
+	if(!widget())return true; // hum ? dead ?
+#ifndef COMPILE_USE_QT4
+	_pDockWindow->setOrientation(KviTQString::equalCI(szOrientation,"vertical") ? Qt::Vertical : Qt::Horizontal);
+#endif //!COMPILE_USE_QT4
+	return true;
+}
+
+bool KviKvsObject_doctwindow::function_resizeEnabled(KviKvsObjectFunctionCall * c)
+{
+	if(!widget())return true; // hum ? dead ?
+#ifdef COMPILE_USE_QT4
+	c->returnValue()->setBoolean(false);
+#else //!COMPILE_USE_QT4
+	c->returnValue()->setBoolean(_pDockWindow->isResizeEnabled());
+#endif //!COMPILE_USE_QT4
+	return true;
+}
+
+bool KviKvsObject_doctwindow::function_setResizeEnabled(KviKvsObjectFunctionCall * c)
+{
+	bool bResizeEnabled;
+	KVSO_PARAMETERS_BEGIN(c)
+		KVSO_PARAMETER("bEnabled",KVS_PT_BOOL,0,bResizeEnabled)
+	KVSO_PARAMETERS_END(c)
+
+	if(!widget())return true; // hum ? dead ?
+
+#ifndef COMPILE_USE_QT4
+	_pDockWindow->setResizeEnabled(bResizeEnabled);
+#endif //!COMPILE_USE_QT4
+	return true;
+}
+
+bool KviKvsObject_doctwindow::function_setAllowedDockAreas(KviKvsObjectFunctionCall * c)
+{
+	TQString szFlags;
+	KVSO_PARAMETERS_BEGIN(c)
+		KVSO_PARAMETER("docks",KVS_PT_STRING,0,szFlags)
+	KVSO_PARAMETERS_END(c)
+
+	if(!widget())return true; // hum ? dead ?
+
+#ifdef COMPILE_USE_QT4
+	TQt::DockWidgetAreas fAreas = TQt::NoDockWidgetArea;
+	if(szFlags.find('t',false))fAreas |= TQt::TopDockWidgetArea;
+	if(szFlags.find('l',false))fAreas |= TQt::LeftDockWidgetArea;
+	if(szFlags.find('r',false))fAreas |= TQt::RightDockWidgetArea;
+	if(szFlags.find('b',false))fAreas |= TQt::BottomDockWidgetArea;
+	_pDockWindow->setAllowedAreas(fAreas);
+	TQDockWidget::DockWidgetFeatures fFeatures = _pDockWindow->features();
+	if(szFlags.find('f',false))
+		fFeatures |= TQDockWidget::DockWidgetFloatable;
+	else
+		fFeatures &= ~TQDockWidget::DockWidgetFloatable;
+	// no support for minimized dock widgets
+	_pDockWindow->setFeatures(fFeatures);
+#else //!COMPILE_USE_QT4
+	g_pFrame->setDockEnabled(_pDockWindow,TQt::DockTop,szFlags.find('t',false) != -1);
+	g_pFrame->setDockEnabled(_pDockWindow,TQt::DockLeft,szFlags.find('l',false) != -1);
+	g_pFrame->setDockEnabled(_pDockWindow,TQt::DockRight,szFlags.find('r',false) != -1);
+	g_pFrame->setDockEnabled(_pDockWindow,TQt::DockBottom,szFlags.find('b',false) != -1);
+	g_pFrame->setDockEnabled(_pDockWindow,TQt::DockTornOff,szFlags.find('f',false) != -1);
+	g_pFrame->setDockEnabled(_pDockWindow,TQt::DockMinimized,szFlags.find('m',false) != -1);
+#endif //!COMPILE_USE_QT4
+
+	return true;
+}
+
+
+bool KviKvsObject_doctwindow::function_dock(KviKvsObjectFunctionCall * c)
+{
+	TQString szDock;
+	KVSO_PARAMETERS_BEGIN(c)
+		KVSO_PARAMETER("dock",KVS_PT_STRING,0,szDock)
+	KVSO_PARAMETERS_END(c)
+
+	if(!widget())return true; // hum ? dead ?
+#ifdef COMPILE_USE_QT4
+	g_pFrame->removeDockWidget(_pDockWindow);
+	if(szDock.find('m',false) == -1)_pDockWindow->setFloating(false);
+	if(szDock.find('t',false) != -1)g_pFrame->addDockWidget(TQt::TopDockWidgetArea,_pDockWindow);
+	else if(szDock.find('l',false) != -1)g_pFrame->addDockWidget(TQt::LeftDockWidgetArea,_pDockWindow);
+	else if(szDock.find('r',false) != -1)g_pFrame->addDockWidget(TQt::RightDockWidgetArea,_pDockWindow);
+	else if(szDock.find('b',false) != -1)g_pFrame->addDockWidget(TQt::BottomDockWidgetArea,_pDockWindow);
+	else if(szDock.find('f',false) != -1)_pDockWindow->setFloating(true);
+	else if(szDock.find('m',false) != -1)qDebug("Sorry: no support for minimized dock widgets in TQt4");
+	else c->warning(__tr2qs("Invalid dock area specified"));
+	
+#else //!COMPILE_USE_QT4
+	if(szDock.find('t',false) != -1)g_pFrame->moveDockWindow(_pDockWindow,TQt::DockTop,false,100);
+	else if(szDock.find('l',false) != -1)g_pFrame->moveDockWindow(_pDockWindow,TQt::DockLeft,false,100);
+	else if(szDock.find('r',false) != -1)g_pFrame->moveDockWindow(_pDockWindow,TQt::DockRight,false,100);
+	else if(szDock.find('b',false) != -1)g_pFrame->moveDockWindow(_pDockWindow,TQt::DockBottom,false,100);
+	else if(szDock.find('f',false) != -1)g_pFrame->moveDockWindow(_pDockWindow,TQt::DockTornOff,false,100);
+	else if(szDock.find('m',false) != -1)g_pFrame->moveDockWindow(_pDockWindow,TQt::DockMinimized,false,100);
+	else c->warning(__tr2qs("Invalid dock area specified"));
+#endif //!COMPILE_USE_QT4
+	return true;
+}
+
+#include "m_class_doctwindow.moc"