summaryrefslogtreecommitdiffstats
path: root/kutils/tdecmoduleloader.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'kutils/tdecmoduleloader.cpp')
-rw-r--r--kutils/tdecmoduleloader.cpp302
1 files changed, 302 insertions, 0 deletions
diff --git a/kutils/tdecmoduleloader.cpp b/kutils/tdecmoduleloader.cpp
new file mode 100644
index 000000000..c661ac22f
--- /dev/null
+++ b/kutils/tdecmoduleloader.cpp
@@ -0,0 +1,302 @@
+/*
+ Copyright (c) 1999 Matthias Hoelzer-Kluepfel <hoelzer@kde.org>
+ Copyright (c) 2000 Matthias Elter <elter@kde.org>
+ Copyright (c) 2003,2004 Matthias Kretz <kretz@kde.org>
+ Copyright (c) 2004 Frans Englich <frans.englich@telia.com>
+
+ This file is part of the KDE project
+
+ This library is free software; you can redistribute it and/or
+ modify it under the terms of the GNU Library General Public
+ License version 2, as published by the Free Software Foundation.
+
+ This library 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
+ Library General Public License for more details.
+
+ You should have received a copy of the GNU Library General Public License
+ along with this library; see the file COPYING.LIB. If not, write to
+ the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+ Boston, MA 02110-1301, USA.
+*/
+
+#include <tqfile.h>
+#include <tqlabel.h>
+#include <tqlayout.h>
+
+#include <kapplication.h>
+#include <kdebug.h>
+#include <klocale.h>
+#include <kmessagebox.h>
+#include <kparts/componentfactory.h>
+
+#include "tdecmoduleloader.h"
+
+
+/***************************************************************/
+/**
+ * When something goes wrong in loading the module, this one
+ * jumps in as a "dummy" module.
+ */
+class KCMError : public TDECModule
+{
+ public:
+ KCMError( const TQString& msg, const TQString& details, TQWidget* parent )
+ : TDECModule( parent, "KCMError" )
+ {
+ TQVBoxLayout* topLayout = new TQVBoxLayout( this );
+ topLayout->addWidget( new TQLabel( msg, this ) );
+ topLayout->addWidget( new TQLabel( details, this ) );
+ }
+};
+/***************************************************************/
+
+
+
+
+TDECModule* TDECModuleLoader::load(const TDECModuleInfo &mod, const TQString &libname,
+ KLibLoader *loader, ErrorReporting report, TQWidget * parent,
+ const char * name, const TQStringList & args )
+{
+ // attempt to load modules with ComponentFactory, only if the symbol init_<lib> exists
+ // (this is because some modules, e.g. kcmkio with multiple modules in the library,
+ // cannot be ported to KGenericFactory)
+ KLibrary *lib = loader->library(TQFile::encodeName(libname.arg(mod.library())));
+ if (lib) {
+ TQString initSym("init_");
+ initSym += libname.arg(mod.library());
+
+ if ( lib->hasSymbol(TQFile::encodeName(initSym)) )
+ {
+ KLibFactory *factory = lib->factory();
+ if ( factory )
+ {
+ TDECModule *module = KParts::ComponentFactory::createInstanceFromFactory<TDECModule>( factory, TQT_TQOBJECT(parent), name ? name : mod.handle().latin1(), args );
+ if (module)
+ return module;
+ }
+ // else do a fallback
+ kdDebug(1208) << "Unable to load module using ComponentFactory. Falling back to old loader." << endl;
+ }
+
+ // get the create_ function
+ TQString factory("create_%1");
+ void *create = lib->symbol(TQFile::encodeName(factory.arg(mod.handle())));
+
+ if (create)
+ {
+ // create the module
+ TDECModule* (*func)(TQWidget *, const char *);
+ func = (TDECModule* (*)(TQWidget *, const char *)) create;
+ return func( parent, name ? name : mod.handle().latin1() );
+ }
+ else
+ {
+ TQString libFileName = lib->fileName();
+ lib->unload();
+ return reportError( report, i18n("<qt>There was an error when loading the module '%1'.<br><br>"
+ "The desktop file (%2) as well as the library (%3) was found but "
+ "yet the module could not be loaded properly. Most likely "
+ "the factory declaration was wrong, or the "
+ "create_* function was missing.</qt>")
+ .arg( mod.moduleName() )
+ .arg( mod.fileName() )
+ .arg( libFileName ),
+ TQString::null, parent );
+ }
+
+ lib->unload();
+ }
+ return reportError( report, i18n("The specified library %1 could not be found.")
+ .arg( mod.library() ), TQString::null, parent );
+ return 0;
+}
+
+TDECModule* TDECModuleLoader::loadModule(const TDECModuleInfo &mod, bool withfallback, TQWidget * parent, const char * name, const TQStringList & args )
+{
+ return loadModule( mod, None, withfallback, parent, name, args );
+}
+
+TDECModule* TDECModuleLoader::loadModule(const TDECModuleInfo &mod, ErrorReporting report, bool withfallback, TQWidget * parent, const char * name, const TQStringList & args )
+{
+ /*
+ * Simple libraries as modules are the easiest case:
+ * We just have to load the library and get the module
+ * from the factory.
+ */
+
+ if ( !mod.service() )
+ {
+ if ( mod.moduleName() == "kcmlisa" || mod.moduleName() == "kcmkiolan" )
+ {
+ return reportError( report,
+ i18n("The module %1 could not be found.")
+ .arg( mod.moduleName() ),
+ i18n("<qt><p>The Lisa and lan:/ ioslave modules "
+ "are not installed by default in Kubuntu, because they are obsolete "
+ "and replaced by zeroconf.<br> If you still wish to use them, you "
+ "should install the lisa package from the Universe repository.</p></qt>"),
+ parent );
+ } else {
+ return reportError( report,
+ i18n("The module %1 could not be found.")
+ .arg( mod.moduleName() ),
+ i18n("<qt><p>The diagnostics is:<br>The desktop file %1 could not be found.</p></qt>").arg(mod.fileName()),
+ parent );
+ }
+ }
+
+ if (!mod.library().isEmpty())
+ {
+ // get the library loader instance
+
+ KLibLoader *loader = KLibLoader::self();
+
+ TDECModule *module = load(mod, "kcm_%1", loader, report, parent, name, args );
+ /*
+ * Only try to load libkcm_* if it exists, otherwise KLibLoader::lastErrorMessage would say
+ * "libkcm_foo not found" instead of the real problem with loading kcm_foo.
+ */
+ if (!KLibLoader::findLibrary( TQCString( "libkcm_" ) + TQFile::encodeName( mod.library() ) ).isEmpty() )
+ module = load(mod, "libkcm_%1", loader, report, parent, name, args );
+ if (module)
+ return module;
+ return reportError( report,
+ i18n("The module %1 could not be loaded.")
+ .arg( mod.moduleName() ), TQString::null, parent );
+ }
+
+ /*
+ * Ok, we could not load the library.
+ * Try to run it as an executable.
+ * This must not be done when calling from kcmshell, or you'll
+ * have infinite recursion
+ * (startService calls kcmshell which calls modloader which calls startService...)
+ *
+ */
+ if(withfallback)
+ {
+ TDEApplication::startServiceByDesktopPath(mod.fileName(), TQString::null);
+ }
+ else
+ {
+ return reportError( report,
+ i18n("The module %1 is not a valid configuration module.")
+ .arg( mod.moduleName() ), i18n("<qt><p>The diagnostics is:<br>The desktop file %1 does not specify a library.</qt>").arg(mod.fileName()), parent );
+ }
+
+ return 0;
+}
+
+TDECModule* TDECModuleLoader::loadModule(const TQString &module, TQWidget *parent,
+ const char *name, const TQStringList & args)
+{
+ return loadModule(TDECModuleInfo(module), None, false, parent, name, args);
+}
+
+TDECModule* TDECModuleLoader::loadModule(const TQString &module, ErrorReporting
+ report, TQWidget *parent, const char *name, const TQStringList & args)
+{
+ return loadModule(TDECModuleInfo(module), report, false, parent, name, args);
+}
+
+void TDECModuleLoader::unloadModule(const TDECModuleInfo &mod)
+{
+ // get the library loader instance
+ KLibLoader *loader = KLibLoader::self();
+
+ // try to unload the library
+ TQString libname("libkcm_%1");
+ loader->unloadLibrary(TQFile::encodeName(libname.arg(mod.library())));
+
+ libname = "kcm_%1";
+ loader->unloadLibrary(TQFile::encodeName(libname.arg(mod.library())));
+}
+
+void TDECModuleLoader::showLastLoaderError(TQWidget *parent)
+{
+ KMessageBox::detailedError(parent,
+ i18n("There was an error loading the module."),i18n("<qt><p>The diagnostics is:<br>%1"
+ "<p>Possible reasons:</p><ul><li>An error occurred during your last "
+ "TDE upgrade leaving an orphaned control module<li>You have old third party "
+ "modules lying around.</ul><p>Check these points carefully and try to remove "
+ "the module mentioned in the error message. If this fails, consider contacting "
+ "your distributor or packager.</p></qt>")
+ .arg(KLibLoader::self()->lastErrorMessage()));
+
+}
+
+bool TDECModuleLoader::testModule( const TQString& module )
+{
+ return testModule( TDECModuleInfo( module ) );
+}
+
+bool TDECModuleLoader::testModule( const TDECModuleInfo& module )
+{
+ if (!module.service())
+ {
+ kdDebug(1208) << "Module '" << module.fileName() << "' not found." << endl;
+ return true;
+ }
+
+ bool doLoad = module.service()->property( "X-TDE-Test-Module", TQVariant::Bool ).toBool();
+ if( !doLoad )
+ {
+ return true;
+ }
+ else
+ {
+ /**
+ * If something fails we return true - we can't risk functionality becoming
+ * unavailable because of a buggy test. Furthermore, the error needs to
+ * show so it is discovered. TDECModuleProxy will detect the error and load
+ * a corresponding KCMError.
+ * */
+ KLibLoader* loader = KLibLoader::self();
+ KLibrary* library = loader->library( TQFile::encodeName((TQString("kcm_%1").arg(module.library()))) );
+ if( library )
+ {
+ void *test_func = library->symbol( TQString(TQString("test_%1").arg(module.factoryName())).utf8() );
+ if( test_func )
+ {
+ bool (*func)() = (bool(*)())test_func;
+ if( func() )
+ {
+ return true;
+ }
+ else
+ {
+ return false;
+ }
+ }
+ else
+ {
+ kdDebug(1208) << "The test function for module '" << module.fileName() << "' could not be found." << endl;
+ return true;
+ }
+ }
+ kdDebug(1208) << "The library '" << module.library() << "' could not be found." << endl;
+ return true;
+ }
+}
+
+TDECModule* TDECModuleLoader::reportError( ErrorReporting report, const TQString & text,
+ TQString details, TQWidget * parent )
+{
+ if( details.isNull() )
+ details = i18n("<qt><p>The diagnostics is:<br>%1"
+ "<p>Possible reasons:</p><ul><li>An error occurred during your last "
+ "TDE upgrade leaving an orphaned control module<li>You have old third party "
+ "modules lying around.</ul><p>Check these points carefully and try to remove "
+ "the module mentioned in the error message. If this fails, consider contacting "
+ "your distributor or packager.</p></qt>").arg(KLibLoader::self()->lastErrorMessage());
+ if( report & Dialog )
+ KMessageBox::detailedError( parent, text, details );
+ if( report & Inline )
+ return new KCMError( text, details, parent );
+ return 0;
+}
+
+// vim: ts=2 sw=2 et
+