Added KDE3 version of kvirc

git-svn-id: svn://anonsvn.kde.org/home/kde/branches/trinity/applications/kvirc@1095341 283d02a7-25f6-0310-bc7c-ecb5cbfe19da

6 files changed, 1207 insertions, 0 deletions

diff --git a/src/modules/addon/Makefile.am b/src/modules/addon/Makefile.am
new file mode 100644
index 00000000..e232b8ff
--- /dev/null
+++ b/src/modules/addon/Makefile.am
@@ -0,0 +1,22 @@
+###############################################################################
+# KVirc IRC client Makefile - 10.03.2000 Szymon Stefanek <[email protected]>
+###############################################################################
+
+SUBDIRS = pics
+
+AM_CPPFLAGS = -I$(SS_TOPSRCDIR)/src/kvilib/include/ -I$(SS_TOPSRCDIR)/src/kvirc/include/ \
+$(SS_INCDIRS) $(SS_CPPFLAGS) -DGLOBAL_KVIRC_DIR=\"$(globalkvircdir)\"
+
+pluglib_LTLIBRARIES      = libkviaddon.la
+
+libkviaddon_la_LDFLAGS = -module -avoid-version $(SS_LDFLAGS) $(SS_LIBDIRS)
+
+libkviaddon_la_SOURCES = libkviaddon.cpp managementdialog.cpp
+nodist_libkviaddon_la_SOURCES = moc_managementdialog.cpp
+
+libkviaddon_la_LIBADD  = $(SS_LIBLINK) ../../kvilib/build/libkvilib.la
+
+noinst_HEADERS= managementdialog.h
+
+moc_managementdialog.cpp: managementdialog.h
+	$(SS_QT_MOC) $< -o $@
diff --git a/src/modules/addon/libkviaddon.cpp b/src/modules/addon/libkviaddon.cpp
new file mode 100644
index 00000000..a7cd4b88
--- /dev/null
+++ b/src/modules/addon/libkviaddon.cpp
@@ -0,0 +1,659 @@
+///////////////////////////////////////////////////////////////////////////////
+//
+//   File : libkviaddon.cpp
+//   Creation date : Tue 31 Mar 01:02:12 2005 GMT by Szymon Stefanek
+//
+//   This toolbar 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 "kvi_module.h"
+#include "kvi_kvs_scriptaddonmanager.h"
+#include "kvi_locale.h"
+#include "kvi_qstring.h"
+#include "kvi_parameterlist.h"
+#include "kvi_cmdformatter.h"
+#include "kvi_qstring.h"
+#include "kvi_error.h"
+#include "kvi_out.h"
+#include "kvi_iconmanager.h"
+#include "kvi_mirccntrl.h"
+#include "kvi_config.h"
+#include "kvi_sourcesdate.h"
+#include "kvi_miscutils.h"
+
+#include "managementdialog.h"
+
+
+
+QRect g_rectManagementDialogGeometry(0,0,0,0);
+
+/*
+	@doc: addon.exists
+	@type:
+		function
+	@title:
+		$addon.exists
+	@short:
+		Checks if an addon is currently installed
+	@syntax:
+		<boolean> $addon.exists(<id:string>[,<version:string>])
+	@description:
+		Returns 1 if the addon with the specified <id> is currently installed
+		and 0 otherwise. If <version> is specified then any addon with 
+		a version lower than <version> is ignored (so you can effectively
+		check if a greater or equal version is present).
+*/
+
+static bool addon_kvs_fnc_exists(KviKvsModuleFunctionCall * c)
+{ 
+	QString szId;
+	QString szVersion;
+	KVSM_PARAMETERS_BEGIN(c)
+		KVSM_PARAMETER("id",KVS_PT_NONEMPTYSTRING,0,szId)
+		KVSM_PARAMETER("version",KVS_PT_STRING,KVS_PF_OPTIONAL,szVersion)
+	KVSM_PARAMETERS_END(c)
+
+	KviKvsScriptAddon * a = KviKvsScriptAddonManager::instance()->findAddon(szId);
+	if(a)
+	{
+		if(szVersion.isEmpty())
+		{
+			c->returnValue()->setBoolean(true);
+		} else {
+			c->returnValue()->setBoolean(KviMiscUtils::compareVersions(a->version(),szVersion) < 0);
+		}
+	} else {
+		c->returnValue()->setBoolean(false);
+	}
+	return true;
+}
+
+/*
+	@doc: addon.version
+	@type:
+		function
+	@title:
+		$addon.version
+	@short:
+		Returns the version of an installed addon
+	@syntax:
+		<string> $addon.version(<id:string>)
+	@description:
+		Returns the version of the currently installed addon with the
+		specified <id>. If the addon with the given <id> does not exist
+		then an empty string is returned.
+*/
+
+static bool addon_kvs_fnc_version(KviKvsModuleFunctionCall * c)
+{ 
+	QString szId;
+	KVSM_PARAMETERS_BEGIN(c)
+		KVSM_PARAMETER("id",KVS_PT_NONEMPTYSTRING,0,szId)
+	KVSM_PARAMETERS_END(c)
+
+	KviKvsScriptAddon * a = KviKvsScriptAddonManager::instance()->findAddon(szId);
+	if(a)
+	{
+		c->returnValue()->setString(a->version());
+	} else {
+		c->returnValue()->setNothing();
+	}
+	return true;
+}
+
+/*
+	@doc: addon.list
+	@type:
+		command
+	@title:
+		addon.list
+	@short:
+		Lists the installed addons
+	@syntax:
+		addon.list
+	@description:
+		Lists the currently installed addons
+	@seealso:
+		[cmd]addon.register[/cmd]
+*/
+
+static bool addon_kvs_cmd_list(KviKvsModuleCommandCall * c)
+{
+	KviPointerHashTable<QString,KviKvsScriptAddon> * da = KviKvsScriptAddonManager::instance()->addonDict();
+
+	int cnt = 0;
+	KviPointerHashTableIterator<QString,KviKvsScriptAddon> it(*da);
+	while(KviKvsScriptAddon * a = it.current())
+	{
+		c->window()->output(KVI_OUT_SYSTEMMESSAGE,__tr2qs("%cAddon id %Q, version %Q%c"),KVI_TEXT_BOLD,&(a->name()),&(a->version()),KVI_TEXT_BOLD);
+		c->window()->output(KVI_OUT_SYSTEMMESSAGE,__tr2qs("Name: %Q"),&(a->visibleName()));
+		c->window()->output(KVI_OUT_SYSTEMMESSAGE,__tr2qs("Description: %Q"),&(a->description()));
+	
+		++it;
+		cnt++;
+	}
+
+	c->window()->output(KVI_OUT_SYSTEMMESSAGE,__tr2qs("Total: %d addons installed"),cnt);
+	return true;
+}
+
+/*
+	@doc: addon.uninstall
+	@type:
+		command
+	@title:
+		addon.uninstall
+	@short:
+		Uninstalls an addon
+	@syntax:
+		addon.uninstall [-q] [-n] <id:string>
+	@switches:
+		!sw: -n | --no-callback
+			Doesn't call the uninstall callback but only removes the
+			registration entry.
+		!sw: -q | --quiet
+			Makes the command run quietly
+	@description:
+		Uninstalls the specified addon by executing its uninstall callback function.
+		It also removes the addon's registration entry.
+		If the -n switch is specified the the uninstall callback is not called,
+		only the registration entry is removed.
+	@seealso:
+		[cmd]addon.register[/cmd]
+*/
+
+static bool addon_kvs_cmd_uninstall(KviKvsModuleCommandCall * c)
+{
+	QString szName;
+	KVSM_PARAMETERS_BEGIN(c)
+		KVSM_PARAMETER("name",KVS_PT_NONEMPTYSTRING,0,szName)
+	KVSM_PARAMETERS_END(c)
+
+	KviKvsScriptAddon * a = KviKvsScriptAddonManager::instance()->findAddon(szName);
+	if(a)
+	{
+		if(!c->switches()->find('q',"quiet"))
+			c->window()->output(KVI_OUT_SYSTEMMESSAGE,__tr2qs("Uninstalling existing addon version %Q"),&(a->version()));
+
+		// uninstall the existing version
+		KviKvsScriptAddonManager::instance()->unregisterAddon(szName,c->window(),!c->switches()->find('n',"no-callback"));
+	} else {
+		if(!c->switches()->find('q',"quiet"))
+			c->warning(__tr2qs("The addon \"%1\" does not exist").arg(szName));
+	}
+
+	return true;
+}
+
+/*
+	@doc: addon.configure
+	@type:
+		command
+	@title:
+		addon.configure
+	@short:
+		Executes a addon's configuration callback
+	@syntax:
+		addon.configure [-q] <id:string>
+	@switches:
+		!sw: -q | --quiet
+			Makes the command run quietly
+	@description:
+		Executes the configuration callback of the specified addon.
+	@seealso:
+		[cmd]addon.register[/cmd]
+		[cmd]addon.setconfigurecallback[/cmd]
+*/
+
+static bool addon_kvs_cmd_configure(KviKvsModuleCommandCall * c)
+{
+	QString szName;
+	KVSM_PARAMETERS_BEGIN(c)
+		KVSM_PARAMETER("name",KVS_PT_NONEMPTYSTRING,0,szName)
+	KVSM_PARAMETERS_END(c)
+
+	KviKvsScriptAddon * a = KviKvsScriptAddonManager::instance()->findAddon(szName);
+	if(a)
+	{
+		QString ss = a->configureCallbackCode();
+		if(ss.isEmpty())
+		{
+			if(!c->switches()->find('q',"quiet"))
+				c->warning(__tr2qs("The addon \"%1\" has no configure callback set").arg(szName));
+		} else {
+			a->executeConfigureCallback(c->window());
+		}
+	} else {
+		if(!c->switches()->find('q',"quiet"))
+			c->warning(__tr2qs("The addon \"%1\" does not exist").arg(szName));
+	}
+
+	return true;
+}
+
+/*
+	@doc: addon.help
+	@type:
+		command
+	@title:
+		addon.help
+	@short:
+		Executes a addon's help callback
+	@syntax:
+		addon.help [-q] <id:string>
+	@switches:
+		!sw: -q | --quiet
+			Makes the command run quietly
+	@description:
+		Executes the help callback of the specified addon.
+		It will usually display the addon's documentation in the help viewer.
+	@seealso:
+		[cmd]addon.register[/cmd]
+		[cmd]addon.sethelpcallback[/cmd]
+*/
+
+static bool addon_kvs_cmd_help(KviKvsModuleCommandCall * c)
+{
+	QString szName;
+	KVSM_PARAMETERS_BEGIN(c)
+		KVSM_PARAMETER("name",KVS_PT_NONEMPTYSTRING,0,szName)
+	KVSM_PARAMETERS_END(c)
+
+	KviKvsScriptAddon * a = KviKvsScriptAddonManager::instance()->findAddon(szName);
+	if(a)
+	{
+		QString ss = a->helpCallbackCode();
+		if(ss.isEmpty())
+		{
+			if(!c->switches()->find('q',"quiet"))
+				c->warning(__tr2qs("The addon \"%1\" has no help callback set").arg(szName));
+		} else {
+			a->executeHelpCallback(c->window());
+		}
+	} else {
+		if(!c->switches()->find('q',"quiet"))
+			c->warning(__tr2qs("The addon \"%1\" does not exist").arg(szName));
+	}
+
+	return true;
+}
+
+/*
+	@doc: addon.setconfigurecallback
+	@type:
+		command
+	@title:
+		addon.setconfigurecallback
+	@short:
+		Sets a addon's configuration callback
+	@syntax:
+		addon.setconfigurecallback [-q] (<id:string>)
+		{
+			<configure_callback>
+		}
+	@switches:
+		!sw: -q
+			Makes the command run quietly
+	@description:
+		Sets the configure callback for the specified addon.
+		The configure callback will be called by the user either by the
+		means of [cmd]addon.configure[/cmd] or by accessing the
+		proper function via GUI.
+	@seealso:
+		[cmd]addon.register[/cmd]
+		[cmd]addon.configure[/cmd]
+*/
+
+static bool addon_kvs_cmd_setconfigurecallback(KviKvsModuleCallbackCommandCall * c)
+{
+	QString szName;
+
+	KVSM_PARAMETERS_BEGIN(c)
+		KVSM_PARAMETER("name",KVS_PT_NONEMPTYSTRING,0,szName)
+	KVSM_PARAMETERS_END(c)
+
+	KviKvsScriptAddon * a = KviKvsScriptAddonManager::instance()->findAddon(szName);
+	if(a)
+	{
+		a->setConfigureCallback(c->callback()->code());
+	} else {
+		if(!c->switches()->find('q',"quiet"))
+			c->warning(__tr2qs("The addon \"%1\" does not exist").arg(szName));
+	}
+	
+	return true;
+}
+
+/*
+	@doc: addon.sethelpcallback
+	@type:
+		command
+	@title:
+		addon.sethelpcallback
+	@short:
+		Sets a addon's configuration callback
+	@syntax:
+		addon.sethelpcallback(<id:string>)
+		{
+			<configure_callback>
+		}
+	@switches:
+		!sw: -q
+			Makes the command run quietly
+	@description:
+		Sets the help callback for the specified addon.
+		The help callback will be called by the user either by the
+		means of [cmd]addon.help[/cmd] or by accessing the
+		proper function via GUI. It should display some sort
+		of addon documentation, usually in the help browser.
+	@seealso:
+		[cmd]addon.register[/cmd]
+		[cmd]addon.help[/cmd]
+*/
+
+static bool addon_kvs_cmd_sethelpcallback(KviKvsModuleCallbackCommandCall * c)
+{
+	QString szName;
+
+	KVSM_PARAMETERS_BEGIN(c)
+		KVSM_PARAMETER("name",KVS_PT_NONEMPTYSTRING,0,szName)
+	KVSM_PARAMETERS_END(c)
+
+	KviKvsScriptAddon * a = KviKvsScriptAddonManager::instance()->findAddon(szName);
+	if(a)
+	{
+		a->setHelpCallback(c->callback()->code());
+	} else {
+		if(!c->switches()->find('q',"quiet"))
+			c->warning(__tr2qs("The addon \"%1\" does not exist").arg(szName));
+	}
+	
+	return true;
+}
+
+/*
+	@doc: addon.register
+	@type:
+		command
+	@title:
+		addon.register
+	@short:
+		Registers a script-based addon
+	@syntax:
+		addon.register [-f] [-n] [-q] (<id:string>,<version:string>,<visible_name:string>,<description:string>,<minkvircverion:string>[,<iconid:string>])
+		{
+			<uninstall callback>
+		}
+	@switches:
+		!sw: -f | --force
+			Registers the addon even if an addon with the same <id> and
+			a higher version already exists. The usage of this flag
+			is highly discouraged (i.e. use it only for debugging purposes
+			on your own machine).
+		!sw: -n | --no-uninstall
+			Performs no uninstallation of existing versions of the addon:
+			it simply replaces the registration entry with the new data.
+			Again, do NOT use this switch if not for debugging purposes
+			and on your own machine.
+		!sw: -q | --quiet
+			Makes the command run quietly
+	@description:
+		[p]
+		Registers a script-based addon.
+		[/p]
+		[p]
+		The registration process allows to "show" the addon in the script-addon manager
+		dialog and provides a standard way for the user to manage and uninstall the addons.
+		You simply register your addon BEFORE attempting to install it.
+		[/p]
+		[p]
+		A script-based addon is a set of scripts, icons, translations and possibly
+		other data files that add functionality to the KVIrc program.
+		The script-based addons are often simply called "scripts" and
+		we will adhere to that naming in certain parts of the documentation too.
+		[/p]
+		[p]
+		Each script-based addon (a set of scripts) is identified by an UNIQUE
+		<id>. Two addons with the same <id> can't co-exist in the same
+		KVIrc installation (so be sure to choose a token characteristic enough
+		to avoid collisions with others). The <id> itself is used only for
+		identification purposes and the user will almost always see the <visible_name>
+		instead, which can contain the [fnc]$tr[/fnc] function that will handle
+		the translation for it.
+		[/p]
+		[p]
+		Each addon has also a <version> which is a string in the form x.y.z
+		where x, y and z are numbers (yes.. that's the standard major-minor-patch level
+		version numbering scheme). A <version> of 2.4.23 is greater than 2.4.3
+		even if 2.4.3 comes after when compared as a string.
+		When an addon with a greater or equal version is installed over
+		an addon with a lower version, the lower one gets uninstalled first.
+		Installing a lower version over a greater one is not possible, unless
+		the lower versioned one is uninstalled first.
+		[/p]
+		[p]
+		<description> is another, possibly translated, string that will
+		be presented to the user in the addon management dialog.
+		[/p]
+		[p]
+		<minkvircversion> is the minimum KVIrc version required for the
+		addon to run. If the version of the running KVIrc executable
+		is lower than the requested one then the command will abort with an error.
+		If you want to completly ignore the KVIrc versioning (don't do it),
+		use "0.0.0" here. If you need fine tuning on cvs features you may add also
+		the sources date tag at the end of the required version string (e.g 3.2.1.20060303).
+		[/p]
+		[p]
+		<iconid> is the [doc:image_id]image identifier[/doc] of the icon
+		that will be displayed in the addon management dialog.
+		If not specified, a default icon will be used.
+		[/p]
+		[p]
+		The <uninstall_callback> is a snippet of code that should
+		wipe out the addon from the system. It is ALWAYS a good practice
+		to write a complete uninstallation procedure (think that YOU like
+		to be able to completly uninstall a program that you don't use anymore).
+		The <uninstall_callback> will be called by KVIrc when the addon
+		uninstallation is requested, either explicitly by using the GUI or the
+		command [cmd]addon.uninstall[/cmd], or implicitly by installing
+		a newer version of the addon (upgrading).
+		[/p]
+		[p]
+		If the user security rules don't allow your addon to be installed
+		or a higher version of a addon with the same name already exists
+		the command will fail with an error (aborting your whole intallation addon).
+		If you don't want to fail with an error but handle it gracefully instead
+		then you should use [fnc]$addon.exists()[/fnc] to check if a
+		addon with the same name and a greater version already exists.
+		You can't gracefully handle security error conditions: your installation
+		will be always aborted with an error in this case.
+		[/p]
+		[p]
+		The addon can also have a configuration callback settable with [cmd]addon.setconfigurecallback[/cmd]
+		and a help callback settable with [cmd]addon.sethelpcallback[/cmd]. The first
+		will usually display a configuration dialog, the second will display
+		some sort of addon's documentation, usually in the help browser.
+		[/p]
+		[p]
+		The registration process uninstalls any previous addon version
+		by executing its uninstall callback routine. This is another reason for that
+		you should call addon.register BEFORE you attempt to install your addon.
+		Failing to do that may cause your old uninstalled to wipe out your newly
+		installed files or code.
+		[/p]
+	@seealso:
+		[cmd]addon.uninstall[/cmd], [fnc]$addon.exists[/fnc],
+		[cmd]addon.setconfigurecallback[/cmd], [cmd]addon.configure[/cmd],
+		[cmd]addon.sethelpcallback[/cmd], [cmd]addon.help[/cmd]
+	@examples:
+		[example]
+		
+		[/example]
+*/
+
+static bool addon_kvs_cmd_register(KviKvsModuleCallbackCommandCall * c)
+{
+	KviKvsScriptAddonRegistrationData rd;
+	QString szMinKVIrcVersion;
+
+	KVSM_PARAMETERS_BEGIN(c)
+		KVSM_PARAMETER("name",KVS_PT_NONEMPTYSTRING,0,(rd.szName))
+		KVSM_PARAMETER("version",KVS_PT_NONEMPTYSTRING,0,(rd.szVersion))
+		KVSM_PARAMETER_IGNORED("visible_text")
+		KVSM_PARAMETER_IGNORED("description")
+		KVSM_PARAMETER("min_kvirc_version",KVS_PT_NONEMPTYSTRING,0,szMinKVIrcVersion)
+		KVSM_PARAMETER("icon_id",KVS_PT_STRING,KVS_PF_OPTIONAL,(rd.szIconId))
+	KVSM_PARAMETERS_END(c)
+
+
+	if(!(c->getParameterCode(2,rd.szVisibleNameScript) && c->getParameterCode(3,rd.szDescriptionScript)))
+	{
+		c->error(__tr2qs("Internal error: call a head-shrinker"));
+		return false;
+	}
+
+	if(c->callback())
+		rd.szUninstallCallbackScript = c->callback()->code();
+
+	if(!KviMiscUtils::isValidVersionString(rd.szVersion))
+	{
+		c->error(__tr2qs("The specified version \"%Q\" is not a valid version string"),&(rd.szVersion));
+		return false;
+	}
+
+	if(!KviMiscUtils::isValidVersionString(szMinKVIrcVersion))
+	{
+		c->error(__tr2qs("The specified KVIrc version \"%Q\" is not a valid version string"),&szMinKVIrcVersion);
+		return false;
+	}
+
+	if(KviMiscUtils::compareVersions(szMinKVIrcVersion,KVI_VERSION "." KVI_SOURCES_DATE) < 0)
+	{
+		c->error(__tr2qs("This KVIrc executable is too old to run this addon (minimum version required is %Q)"),&szMinKVIrcVersion);
+		return false;
+	}
+
+	if(!c->switches()->find('q',"quiet"))
+		c->window()->output(KVI_OUT_SYSTEMMESSAGE,__tr2qs("Attempting to register addon \"%Q\" with version %Q"),&(rd.szName),&(rd.szVersion));
+
+	KviKvsScriptAddon * a = KviKvsScriptAddonManager::instance()->findAddon(rd.szName);
+	if(a)
+	{
+		// the same addon already exists
+		if(KviMiscUtils::compareVersions(a->version(),rd.szVersion) < 0)
+		{
+			// and it has a higher version...
+			// complain unless -f is used
+			if(!c->switches()->find('f',"force"))
+			{
+				c->error(__tr2qs("The script addon \"%Q\" already exists with version %Q which is higher than %Q"),&(rd.szName),&(a->version()),&(rd.szVersion));
+				return false;
+			}
+		}
+
+		if(!c->switches()->find('q',"quiet"))
+			c->window()->output(KVI_OUT_SYSTEMMESSAGE,__tr2qs("Uninstalling existing addon version %Q"),&(a->version()));
+
+		// uninstall the existing version
+		KviKvsScriptAddonManager::instance()->unregisterAddon(rd.szName,c->window(),!c->switches()->find('n',"no-uninstall"));
+	}
+
+	if(!KviKvsScriptAddonManager::instance()->registerAddon(&rd))
+	{
+		c->error(__tr2qs("Script registration failed"));
+		return false;
+	}
+
+	if(!c->switches()->find('q',"quiet"))
+		c->window()->output(KVI_OUT_SYSTEMMESSAGE,__tr2qs("Script succesfully registered"));
+
+	return true;
+}
+
+/*
+	@doc: addon.dialog
+	@type:
+		command
+	@title:
+		addon.dialog
+	@short:
+		Shows the addon addon management editor
+	@syntax:
+		addon.dialog
+	@description:
+		Shows the addon addon management editor
+*/
+
+static bool addon_kvs_cmd_dialog(KviKvsModuleCommandCall * c)
+{
+	KviScriptManagementDialog::display();
+	return true;
+}
+
+static bool addon_module_init(KviModule *m)
+{
+	KVSM_REGISTER_FUNCTION(m,"exists",addon_kvs_fnc_exists);
+	KVSM_REGISTER_FUNCTION(m,"version",addon_kvs_fnc_version);
+
+	KVSM_REGISTER_SIMPLE_COMMAND(m,"dialog",addon_kvs_cmd_dialog);
+	KVSM_REGISTER_SIMPLE_COMMAND(m,"list",addon_kvs_cmd_list);
+	KVSM_REGISTER_SIMPLE_COMMAND(m,"uninstall",addon_kvs_cmd_uninstall);
+	KVSM_REGISTER_SIMPLE_COMMAND(m,"configure",addon_kvs_cmd_configure);
+	KVSM_REGISTER_SIMPLE_COMMAND(m,"help",addon_kvs_cmd_help);
+	
+	KVSM_REGISTER_CALLBACK_COMMAND(m,"setconfigurecallback",addon_kvs_cmd_setconfigurecallback);
+	KVSM_REGISTER_CALLBACK_COMMAND(m,"sethelpcallback",addon_kvs_cmd_sethelpcallback);
+	KVSM_REGISTER_CALLBACK_COMMAND(m,"register",addon_kvs_cmd_register);
+
+	QString szBuf;
+	m->getDefaultConfigFileName(szBuf);
+	KviConfig cfg(szBuf,KviConfig::Read);
+	g_rectManagementDialogGeometry = cfg.readRectEntry("EditorGeometry",QRect(10,10,390,440));
+
+	return true;
+}
+
+static bool addon_module_cleanup(KviModule *m)
+{
+	KviScriptManagementDialog::cleanup();
+
+	QString szBuf;
+	m->getDefaultConfigFileName(szBuf);
+	KviConfig cfg(szBuf,KviConfig::Write);
+	cfg.writeEntry("EditorGeometry",g_rectManagementDialogGeometry);
+
+	return true;
+}
+
+static bool addon_module_can_unload(KviModule * m)
+{
+	return (!KviScriptManagementDialog::instance());
+}
+
+
+KVIRC_MODULE(
+	"addon",                                                      // module name
+	"1.0.0",                                                        // module version
+	"Copyright (C) 2005 Szymon Stefanek (pragma at kvirc dot net)", // author & (C)
+	"Script management functions for the KVS engine",
+	addon_module_init,
+	addon_module_can_unload,
+	0,
+	addon_module_cleanup
+)
diff --git a/src/modules/addon/managementdialog.cpp b/src/modules/addon/managementdialog.cpp
new file mode 100644
index 00000000..a6765587
--- /dev/null
+++ b/src/modules/addon/managementdialog.cpp
@@ -0,0 +1,403 @@
+//=============================================================================
+//
+//   File : managementdialog.cpp
+//   Created on Fri 08 Apr 2005 14:54:56 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 "managementdialog.h"
+
+#include "kvi_listview.h"
+#include "kvi_locale.h"
+#include "kvi_frame.h"
+#include "kvi_iconmanager.h"
+#include "kvi_kvs_scriptaddonmanager.h"
+#include "kvi_window.h"
+
+#include "kvi_filedialog.h"
+#include "kvi_fileutils.h"
+#include "kvi_kvs_script.h"
+#include "kvi_sourcesdate.h"
+
+#include <qpushbutton.h>
+#include <qlayout.h>
+#include <qapplication.h>
+#include <qtooltip.h>
+#include <qlineedit.h>
+#include <qlabel.h>
+#include <qmessagebox.h>
+#include <qframe.h>
+#include "kvi_tal_scrollview.h"
+#ifdef COMPILE_USE_QT4
+	#include <q3header.h>
+
+#else
+	#include <qheader.h>
+#endif
+#include "kvi_draganddrop.h"
+#include <qpainter.h>
+#include <qpixmap.h>
+#include <qmessagebox.h>
+#include <qevent.h>
+
+KviScriptManagementDialog * KviScriptManagementDialog::m_pInstance = 0;
+extern QRect g_rectManagementDialogGeometry;
+
+
+#define LVI_ICON_SIZE 32
+#define LVI_BORDER 4
+#define LVI_SPACING 8
+#define LVI_MINIMUM_TEXT_WIDTH 300
+#define LVI_MINIMUM_CELL_WIDTH (LVI_MINIMUM_TEXT_WIDTH + LVI_BORDER + LVI_ICON_SIZE + LVI_SPACING + LVI_BORDER)
+
+KviScriptAddonListViewItem::KviScriptAddonListViewItem(KviTalListView * v,KviKvsScriptAddon * a)
+: KviTalListViewItem(v,"")
+{
+	m_pAddon = new KviKvsScriptAddon(*a);
+	m_pListView = v;
+	QString t = "<nobr><b>";
+	t += a->visibleName();
+	t += "</b> [";
+	t += a->version();
+	t += "]";
+	t += " <font color=\"#a0a0a0\">[";
+	t += a->name();
+	t += "]</font></nobr>";
+	t += "<br><nobr><font size=\"-1\">";
+	t += a->description();
+	t += "</font></nobr>";
+	m_szKey = a->visibleName().upper();
+#ifdef COMPILE_USE_QT4
+	m_pText = new QTextDocument();
+	m_pText->setHtml(t);
+	m_pText->setDefaultFont(v->font());
+#else
+	m_pText = new QSimpleRichText(t,v->font());
+#endif
+
+	QPixmap * p = a->icon();
+	m_pIcon = p ? new QPixmap(*p) : new QPixmap(LVI_ICON_SIZE,LVI_ICON_SIZE);
+}
+
+KviScriptAddonListViewItem::~KviScriptAddonListViewItem()
+{
+	delete m_pIcon;
+	delete m_pText;
+	delete m_pAddon;
+}
+
+QString KviScriptAddonListViewItem::key(int,bool) const
+{
+	return m_szKey;
+}
+
+void KviScriptAddonListViewItem::setup()
+{
+	KviTalListViewItem::setup();
+	int iWidth = m_pListView->visibleWidth();
+	if(iWidth < LVI_MINIMUM_CELL_WIDTH)iWidth = LVI_MINIMUM_CELL_WIDTH;
+	iWidth -= LVI_BORDER + LVI_ICON_SIZE + LVI_SPACING + LVI_BORDER;
+	
+	#ifdef COMPILE_USE_QT4 
+	int iHeight = m_pText->size().height() + (2 * LVI_BORDER);
+	#else
+	m_pText->setWidth(iWidth);
+	int iHeight = m_pText->height() + (2 * LVI_BORDER);
+	#endif
+	if(iHeight < (LVI_ICON_SIZE + (2 * LVI_BORDER)))iHeight = LVI_ICON_SIZE + (2 * LVI_BORDER);
+	setHeight(iHeight+2);
+}
+
+void KviScriptAddonListViewItem::paintCell(QPainter * p,const QColorGroup & cg,int column,int width,int align)
+{
+	#ifdef COMPILE_USE_QT4
+	if (isSelected())
+	{
+		QColor col(m_pListView->palette().highlight());
+		col.setAlpha(127);
+		p->setBrush(col);
+		p->drawRect(0, 0, m_pListView->visibleWidth(), height());
+	}
+	p->drawPixmap(LVI_BORDER,LVI_BORDER,*m_pIcon);
+	int afterIcon = LVI_BORDER + LVI_ICON_SIZE + LVI_SPACING;
+	int www = m_pListView->visibleWidth() - (afterIcon + LVI_BORDER);
+	p->translate(afterIcon,LVI_BORDER);
+	m_pText->setPageSize(QSizeF(www,height() - (LVI_BORDER * 2)));
+	m_pText->drawContents(p);
+	#else
+	p->drawPixmap(LVI_BORDER,LVI_BORDER,*m_pIcon);
+	int afterIcon = LVI_BORDER + LVI_ICON_SIZE + LVI_SPACING;
+	int www = m_pListView->visibleWidth() - (afterIcon + LVI_BORDER);
+	m_pText->setWidth(www);
+	if(isSelected())
+	{
+		QColorGroup cg2(cg);
+		cg2.setColor(QColorGroup::HighlightedText,cg.text());
+	
+		m_pText->draw(p,afterIcon,LVI_BORDER,QRect(afterIcon,LVI_BORDER,www,height() - (LVI_BORDER * 2)),cg2);
+	} else {
+		m_pText->draw(p,afterIcon,LVI_BORDER,QRect(afterIcon,LVI_BORDER,www,height() - (LVI_BORDER * 2)),cg);
+	}
+	#endif
+}
+
+
+
+
+
+
+
+KviScriptAddonListView::KviScriptAddonListView(QWidget * pParent)
+: KviListView(pParent)
+{
+	QPixmap * p = g_pIconManager->getImage("kvi_dialog_addons.png");
+	if(p)setBackgroundOverlayPixmap(p,Qt::AlignRight | Qt::AlignBottom);
+
+	setSelectionMode(Single);
+	header()->hide();
+	int iWidth = visibleWidth();
+	if(iWidth < LVI_MINIMUM_CELL_WIDTH)iWidth = LVI_MINIMUM_CELL_WIDTH;
+	addColumn("",iWidth);
+	setSorting(0,true);
+}
+
+KviScriptAddonListView::~KviScriptAddonListView()
+{
+}
+
+void KviScriptAddonListView::resizeEvent(QResizeEvent * e)
+{
+	KviListView::resizeEvent(e);
+	int iWidth = visibleWidth();
+	if(iWidth < LVI_MINIMUM_CELL_WIDTH)iWidth = LVI_MINIMUM_CELL_WIDTH;
+	setColumnWidth(0,iWidth);
+}
+
+
+KviScriptManagementDialog::KviScriptManagementDialog(QWidget * p)
+: QDialog(p,"" /*,WType_TopLevel | WStyle_Customize | WStyle_Title | WStyle_StaysOnTop | WStyle_DialogBorder*/)
+{
+	setCaption(__tr2qs("Manage Script-Based Addons"));
+	setIcon(*(g_pIconManager->getSmallIcon(KVI_SMALLICON_ADDONS)));
+	setModal(true);
+
+	m_pInstance = this;
+
+	QGridLayout * g = new QGridLayout(this,11,3,4,5);
+	
+	/*QLabel * lb = new QLabel(this);
+	lb->setFrameStyle(QFrame::WinPanel | QFrame::Sunken);
+
+	g->addMultiCellWidget(lb,0,10,0,0);
+	QPixmap * pix = g_pIconManager->getImage("kvi_dialog_addons.png");
+	if(pix)
+	{
+		lb->setPixmap(*pix);
+		lb->setFixedWidth(pix->width());
+	}
+	lb->setBackgroundColor(Qt::black);
+	lb->setAlignment(Qt::AlignBottom | Qt::AlignRight);
+	*/
+	m_pListView = new KviScriptAddonListView(this);
+	g->addMultiCellWidget(m_pListView,0,10,1,1);
+
+	m_pConfigureButton = new QPushButton(__tr2qs("Configure"),this);
+	connect(m_pConfigureButton,SIGNAL(clicked()),this,SLOT(configureScript()));
+	g->addWidget(m_pConfigureButton,0,2);
+
+	m_pHelpButton = new QPushButton(__tr2qs("Show Help"),this);
+	connect(m_pHelpButton,SIGNAL(clicked()),this,SLOT(showScriptHelp()));
+	g->addWidget(m_pHelpButton,1,2);
+
+	g->addRowSpacing(2,40);
+
+	m_pUninstallButton = new QPushButton(__tr2qs("Uninstall"),this);
+	connect(m_pUninstallButton,SIGNAL(clicked()),this,SLOT(uninstallScript()));
+	g->addWidget(m_pUninstallButton,3,2);
+
+	g->addRowSpacing(4,15);
+
+	QFrame *f = new QFrame(this);
+	f->setFrameStyle(QFrame::HLine | QFrame::Sunken);
+	g->addWidget(f,5,2);
+	
+	g->addRowSpacing(6,15);
+
+	m_pInstallButton = new QPushButton(__tr2qs("Install Addon..."),this);
+	connect(m_pInstallButton,SIGNAL(clicked()),this,SLOT(installScript()));
+	g->addWidget(m_pInstallButton,7,2);
+
+	m_pGetScriptsButton = new QPushButton(__tr2qs("More Addons..."),this);
+	connect(m_pGetScriptsButton,SIGNAL(clicked()),this,SLOT(getMoreScripts()));
+	g->addWidget(m_pGetScriptsButton,8,2);
+
+	QPushButton * b = new QPushButton(__tr2qs("Close"),this);
+	connect(b,SIGNAL(clicked()),this,SLOT(closeClicked()));
+	g->addWidget(b,10,2);
+
+	g->setRowStretch(9,1);
+	g->setColStretch(1,1);
+
+	fillListView();
+
+	currentChanged(0);
+	connect(m_pListView,SIGNAL(currentChanged(KviTalListViewItem *)),this,SLOT(currentChanged(KviTalListViewItem *)));
+	//currentToolBarChanged();
+
+	if(g_rectManagementDialogGeometry.y() < 5)
+	{
+		g_rectManagementDialogGeometry.setY(5);
+	}
+	resize(g_rectManagementDialogGeometry.width(),
+		g_rectManagementDialogGeometry.height());
+	move(g_rectManagementDialogGeometry.x(),
+		g_rectManagementDialogGeometry.y());
+}
+
+KviScriptManagementDialog::~KviScriptManagementDialog()
+{
+	g_rectManagementDialogGeometry = QRect(pos().x(),pos().y(),size().width(),size().height());
+
+	//KviActionManager::instance()->customizeToolBarsDialogDestroyed();
+	m_pInstance = 0;
+}
+
+void KviScriptManagementDialog::fillListView()
+{
+	m_pListView->clear();
+	KviPointerHashTable<QString,KviKvsScriptAddon> * d = KviKvsScriptAddonManager::instance()->addonDict();
+	if(!d)return;
+	KviPointerHashTableIterator<QString,KviKvsScriptAddon> it(*d);
+	KviScriptAddonListViewItem * item;
+	while(KviKvsScriptAddon * a = it.current())
+	{
+		item = new KviScriptAddonListViewItem(m_pListView,a);
+		++it;
+	}
+}
+
+void KviScriptManagementDialog::currentChanged(KviTalListViewItem *)
+{
+	KviScriptAddonListViewItem * it = (KviScriptAddonListViewItem *)m_pListView->currentItem();
+	if(!it)
+	{
+		m_pConfigureButton->setEnabled(false);
+		m_pUninstallButton->setEnabled(false);
+		m_pHelpButton->setEnabled(false);
+	} else {
+		m_pConfigureButton->setEnabled(!(it->addon()->configureCallbackCode().isEmpty()));
+		m_pHelpButton->setEnabled(!(it->addon()->helpCallbackCode().isEmpty()));
+		m_pUninstallButton->setEnabled(true);
+	}
+}
+
+void KviScriptManagementDialog::showScriptHelp()
+{
+	KviScriptAddonListViewItem * it = (KviScriptAddonListViewItem *)m_pListView->currentItem();
+	if(!it)return;
+	if(it->addon()->helpCallbackCode().isEmpty())return;
+	it->addon()->executeHelpCallback(g_pActiveWindow);
+}
+
+void KviScriptManagementDialog::configureScript()
+{
+	KviScriptAddonListViewItem * it = (KviScriptAddonListViewItem *)m_pListView->currentItem();
+	if(!it)return;
+	if(it->addon()->configureCallbackCode().isEmpty())return;
+	it->addon()->executeConfigureCallback(g_pActiveWindow);
+}
+
+void KviScriptManagementDialog::uninstallScript()
+{
+	KviScriptAddonListViewItem * it = (KviScriptAddonListViewItem *)m_pListView->currentItem();
+	if(!it)return;
+
+	QString txt = "<p>";
+	txt += __tr2qs("Do you really want to uninstall the addon \"%1\" ?").arg(it->addon()->visibleName());
+	txt += "</p>";
+	
+	if(QMessageBox::question(this,
+		__tr2qs("Confirm addon uninstallation"),txt,__tr2qs("&Yes"),__tr2qs("&No"),0,1) != 0)return;
+
+	KviKvsScriptAddonManager::instance()->unregisterAddon(it->addon()->name(),g_pActiveWindow);
+	
+	fillListView();
+	currentChanged(0);
+}
+
+void KviScriptManagementDialog::getMoreScripts()
+{
+	KviKvsScript::run("openurl http://www.kvirc.net/?id=addons&version=" KVI_VERSION "." KVI_SOURCES_DATE,g_pActiveWindow);
+}
+
+void KviScriptManagementDialog::installScript()
+{
+	QString buffer;
+
+	if(!KviFileDialog::askForOpenFileName(buffer,__tr2qs("Please select the addon installation file"),QString::null,"install.kvs",false,true))return;
+
+	buffer.replace("\\","\\\\");
+
+	QString szCmd = "parse \"";
+	szCmd += buffer;
+	szCmd += "\"";
+
+	KviKvsScript::run(szCmd,g_pActiveWindow);
+
+	fillListView();
+	currentChanged(0);
+
+	m_pListView->publicUpdateContents();
+	//m_pListView->triggerUpdate();
+}
+
+void KviScriptManagementDialog::showEvent(QShowEvent * e)
+{
+//	QRect r = parentWidget() ? parentWidget()->rect() : QApplication::desktop()->rect();
+//	int x = (r.width() - width()) / 2;
+//	int y = (r.height() - height()) / 2;
+//	move(x,y);
+}
+
+void KviScriptManagementDialog::closeClicked()
+{
+	delete this;
+}
+
+void KviScriptManagementDialog::cleanup()
+{
+	if(!m_pInstance)return;
+	delete m_pInstance;
+	m_pInstance = 0;
+}
+
+void KviScriptManagementDialog::display()
+{
+	if(m_pInstance)return;
+	m_pInstance = new KviScriptManagementDialog(g_pFrame);
+	m_pInstance->show();
+}
+
+void KviScriptManagementDialog::closeEvent(QCloseEvent * e)
+{
+	e->ignore();
+	delete this;
+}
+
diff --git a/src/modules/addon/managementdialog.h b/src/modules/addon/managementdialog.h
new file mode 100644
index 00000000..0abbb4f9
--- /dev/null
+++ b/src/modules/addon/managementdialog.h
@@ -0,0 +1,114 @@
+#ifndef _MANAGEMENTDIALOG_H_
+#define _MANAGEMENTDIALOG_H_
+//=============================================================================
+//
+//   File : managementdialog.h
+//   Created on Fri 08 Apr 2005 14:54:56 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 <qdialog.h>
+
+#include "kvi_listview.h"
+#include "kvi_settings.h"
+#include <qwidget.h>
+#include <qlabel.h>
+#include <qdialog.h>
+#include <qcolor.h>
+#include "kvi_tal_listview.h"
+
+class QPushButton;
+class QPixmap;
+class KviKvsScriptAddon;
+
+#ifdef COMPILE_USE_QT4
+	#include <QTextDocument>
+#else
+	#include <qsimplerichtext.h>
+#endif
+
+class KviScriptAddonListViewItem : public KviTalListViewItem
+{
+public:
+	KviScriptAddonListViewItem(KviTalListView * v,KviKvsScriptAddon * a);
+	~KviScriptAddonListViewItem();
+protected:
+	KviKvsScriptAddon * m_pAddon;
+#ifdef COMPILE_USE_QT4
+	QTextDocument * m_pText;
+#else
+	QSimpleRichText * m_pText;
+#endif	
+	QPixmap * m_pIcon;
+	KviTalListView * m_pListView;
+	QString m_szKey;
+public:
+	KviKvsScriptAddon * addon(){ return m_pAddon; };
+protected:
+	virtual QString key(int,bool) const;
+	virtual void paintCell(QPainter * p,const QColorGroup & cg,int column,int width,int align);
+	virtual void setup();
+};
+
+class KviScriptAddonListView : public KviListView
+{
+	Q_OBJECT
+public:
+	KviScriptAddonListView(QWidget * pParent);
+	~KviScriptAddonListView();
+protected:
+	virtual void resizeEvent(QResizeEvent * e);
+};
+
+class KviScriptManagementDialog : public QDialog
+{
+	Q_OBJECT
+protected:
+	KviScriptManagementDialog(QWidget * p);
+public:
+	~KviScriptManagementDialog();
+protected:
+	KviScriptAddonListView * m_pListView;
+	static KviScriptManagementDialog * m_pInstance;
+	QPushButton * m_pUninstallButton;
+	QPushButton * m_pConfigureButton;
+	QPushButton * m_pHelpButton;
+	QPushButton * m_pInstallButton;
+	QPushButton * m_pGetScriptsButton;
+public:
+	static KviScriptManagementDialog * instance(){ return m_pInstance; };
+	static void display();
+	static void cleanup();
+protected:
+	void fillListView();
+	virtual void showEvent(QShowEvent * e);
+	virtual void closeEvent(QCloseEvent *e);
+protected slots:
+	void currentChanged(KviTalListViewItem *i);
+	void closeClicked();
+	void showScriptHelp();
+	void configureScript();
+	void uninstallScript();
+	void getMoreScripts();
+	void installScript();
+};
+
+
+#endif //!_MANAGEMENTDIALOG_H_
diff --git a/src/modules/addon/pics/Makefile.am b/src/modules/addon/pics/Makefile.am
new file mode 100644
index 00000000..726f519d
--- /dev/null
+++ b/src/modules/addon/pics/Makefile.am
@@ -0,0 +1,9 @@
+###############################################################################
+# KVirc IRC client Makefile - 10.03.2000 Szymon Stefanek <[email protected]>
+###############################################################################
+
+tmpdir = $(picsdir)
+
+tmp_DATA= kvi_dialog_addons.png
+
+EXTRA_DIST = $(tmp_DATA)
diff --git a/src/modules/addon/pics/kvi_dialog_addons.png b/src/modules/addon/pics/kvi_dialog_addons.png
new file mode 100644
index 00000000..6cfa53d9
--- /dev/null
+++ b/src/modules/addon/pics/kvi_dialog_addons.png