Added old abandoned KDE3 version of koffice

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

1 files changed, 248 insertions, 0 deletions

diff --git a/lib/kross/main/manager.cpp b/lib/kross/main/manager.cpp
new file mode 100644
index 00000000..cdb4d363
--- /dev/null
+++ b/lib/kross/main/manager.cpp
@@ -0,0 +1,248 @@
+/***************************************************************************
+ * manager.cpp
+ * This file is part of the KDE project
+ * copyright (C)2004-2005 by Sebastian Sauer (mail@dipe.org)
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) 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
+ * Library General Public License for more details.
+ * You should have received a copy of the GNU Library General Public License
+ * along with this program; see the file COPYING.  If not, write to
+ * the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ ***************************************************************************/
+
+#include "manager.h"
+
+#include "../api/interpreter.h"
+//#include "../api/qtobject.h"
+#include "../api/eventslot.h"
+#include "../api/eventsignal.h"
+//#include "../api/script.h"
+
+#include "krossconfig.h"
+#include "scriptcontainer.h"
+
+#include <qobject.h>
+#include <qfile.h>
+#include <qregexp.h>
+
+#include <klibloader.h>
+#include <klocale.h>
+#include <kstaticdeleter.h>
+
+extern "C"
+{
+    typedef Kross::Api::Object* (*def_module_func)(Kross::Api::Manager*);
+}
+
+using namespace Kross::Api;
+
+namespace Kross { namespace Api {
+
+    /// @internal
+    class ManagerPrivate
+    {
+        public:
+            /// List of \a InterpreterInfo instances.
+            QMap<QString, InterpreterInfo*> interpreterinfos;
+
+            /// Loaded modules.
+            QMap<QString, Module::Ptr> modules;
+    };
+
+    /**
+     * The Manager-singleton instance is NULL by default till the
+     * Manager::scriptManager() method got called first time.
+     */
+    static KSharedPtr<Manager> m_manager = KSharedPtr<Manager>(0);
+
+}}
+
+Manager* Manager::scriptManager()
+{
+    if(! m_manager.data()) {
+        // Create the Manager-singleton on demand.
+        m_manager = KSharedPtr<Manager>( new Manager() );
+    }
+
+    // and finally return the singleton.
+    return m_manager.data();
+}
+
+Manager::Manager()
+    : MainModule("Kross") // the manager has the name "Kross"
+    , d( new ManagerPrivate() )
+{
+#ifdef KROSS_PYTHON_LIBRARY
+    QString pythonlib = QFile::encodeName( KLibLoader::self()->findLibrary(KROSS_PYTHON_LIBRARY) );
+    if(! pythonlib.isEmpty()) { // If the Kross Python plugin exists we offer it as supported scripting language.
+        InterpreterInfo::Option::Map pythonoptions;
+        pythonoptions.replace("restricted",
+            new InterpreterInfo::Option("Restricted", "Restricted Python interpreter", QVariant(false,0))
+        );
+        d->interpreterinfos.replace("python",
+            new InterpreterInfo("python",
+                pythonlib, // library
+                "*.py", // file filter-wildcard
+                QStringList() << /* "text/x-python" << */ "application/x-python", // mimetypes
+                pythonoptions // options
+            )
+        );
+    }
+#endif
+#ifdef KROSS_RUBY_LIBRARY
+    QString rubylib = QFile::encodeName( KLibLoader::self()->findLibrary(KROSS_RUBY_LIBRARY) );
+    if(! rubylib.isEmpty()) { // If the Kross Ruby plugin exists we offer it as supported scripting language.
+      InterpreterInfo::Option::Map rubyoptions;
+      rubyoptions.replace("safelevel",
+                          new InterpreterInfo::Option("safelevel", "Level of safety of the Ruby interpreter", QVariant(0)) // 0 -> unsafe, 4 -> very safe
+                           );
+      d->interpreterinfos.replace("ruby",
+                                  new InterpreterInfo("ruby",
+                                      rubylib, // library
+                                      "*.rb", // file filter-wildcard
+                                      QStringList() << /* "text/x-ruby" << */ "application/x-ruby", // mimetypes
+                                      rubyoptions // options
+                                                     )
+                                 );
+    } else {
+        krossdebug("Ruby interpreter for kross in unavailable");
+    }
+#endif
+}
+
+Manager::~Manager()
+{
+    for(QMap<QString, InterpreterInfo*>::Iterator it = d->interpreterinfos.begin(); it != d->interpreterinfos.end(); ++it)
+        delete it.data();
+    delete d;
+}
+
+QMap<QString, InterpreterInfo*> Manager::getInterpreterInfos()
+{
+    return d->interpreterinfos;
+}
+
+bool Manager::hasInterpreterInfo(const QString& interpretername) const
+{
+    return d->interpreterinfos.contains(interpretername);
+}
+
+InterpreterInfo* Manager::getInterpreterInfo(const QString& interpretername)
+{
+    return d->interpreterinfos[interpretername];
+}
+
+const QString Manager::getInterpreternameForFile(const QString& file)
+{
+    QRegExp rx;
+    rx.setWildcard(true);
+    for(QMap<QString, InterpreterInfo*>::Iterator it = d->interpreterinfos.begin(); it != d->interpreterinfos.end(); ++it) {
+        rx.setPattern((*it)->getWildcard());
+        if( file.find(rx) >= 0 )
+            return (*it)->getInterpretername();
+    }
+    return QString::null;
+}
+
+ScriptContainer::Ptr Manager::getScriptContainer(const QString& scriptname)
+{
+    //TODO at the moment we don't share ScriptContainer instances.
+
+    //if(d->m_scriptcontainers.contains(scriptname))
+    //    return d->m_scriptcontainers[scriptname];
+    ScriptContainer* scriptcontainer = new ScriptContainer(scriptname);
+    //ScriptContainer script(this, scriptname);
+    //d->m_scriptcontainers.replace(scriptname, scriptcontainer);
+
+    return scriptcontainer;
+}
+
+Interpreter* Manager::getInterpreter(const QString& interpretername)
+{
+    setException(0); // clear previous exceptions
+
+    if(! d->interpreterinfos.contains(interpretername)) {
+        setException( new Exception(i18n("No such interpreter '%1'").arg(interpretername)) );
+        return 0;
+    }
+
+    return d->interpreterinfos[interpretername]->getInterpreter();
+}
+
+const QStringList Manager::getInterpreters()
+{
+    QStringList list;
+
+    QMap<QString, InterpreterInfo*>::Iterator it( d->interpreterinfos.begin() );
+    for(; it != d->interpreterinfos.end(); ++it)
+        list << it.key();
+
+//list << "TestCase";
+
+    return  list;
+}
+
+bool Manager::addModule(Module::Ptr module)
+{
+    QString name = module->getName();
+    //if( d->modules.contains(name) ) return false;
+    d->modules.replace(name, module);
+    return true;
+}
+
+Module::Ptr Manager::loadModule(const QString& modulename)
+{
+    Module::Ptr module = 0;
+
+    if(d->modules.contains(modulename)) {
+        module = d->modules[modulename];
+        if(module)
+            return module;
+        else
+            krossdebug( QString("Manager::loadModule(%1) =======> Modulename registered, but module is invalid!").arg(modulename) );
+    }
+
+    KLibLoader* loader = KLibLoader::self();
+    KLibrary* lib = loader->globalLibrary( modulename.latin1() );
+    if(! lib) {
+        krosswarning( QString("Failed to load module '%1': %2").arg(modulename).arg(loader->lastErrorMessage()) );
+        return 0;
+    }
+    krossdebug( QString("Successfully loaded module '%1'").arg(modulename) );
+
+    def_module_func func;
+    func = (def_module_func) lib->symbol("init_module");
+
+    if(! func) {
+        krosswarning( QString("Failed to determinate init function in module '%1'").arg(modulename) );
+        return 0;
+    }
+
+    try {
+        module = (Kross::Api::Module*) (func)(this);
+    }
+    catch(Kross::Api::Exception::Ptr e) {
+        krosswarning( e->toString() );
+        module = 0;
+    }
+    lib->unload();
+
+    if(! module) {
+        krosswarning( QString("Failed to load module '%1'").arg(modulename) );
+        return 0;
+    }
+
+    // Don't remember module cause we like to have freeing it handled by the caller.
+    //d->modules.replace(modulename, module);
+
+    //krossdebug( QString("Kross::Api::Manager::loadModule modulename='%1' module='%2'").arg(modulename).arg(module->toString()) );
+    return module;
+}
+