Script.h

Go to the documentation of this file.

/***************************************************************************
    File                 : Script.h
    Project              : SciDAVis
    --------------------------------------------------------------------
    Copyright            : (C) 2006 by Ion Vasilief, 
                           Tilman Benkert,
                           Knut Franke
    Email (use @ for *)  : ion_vasilief*yahoo.fr, thzs*gmx.net
    Description          : Scripting abstraction layer
                           
 ***************************************************************************/

/***************************************************************************
 *                                                                         *
 *  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 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 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                                           *
 *                                                                         *
 ***************************************************************************/
#ifndef SCRIPT_H
#define SCRIPT_H

#include <QVariant>
#include <QString>
#include <QStringList>
#include <QObject>
#include <QStringList>
#include <QEvent>

#include "customevents.h"
#include "ScriptingEnv.h"

class ApplicationWindow;


class Script : public QObject
{
  Q_OBJECT

  public:
    Script(ScriptingEnv *env, const QString &code, QObject *context=0, const QString &name="<input>")
      : Env(env), Code(code), Name(name), compiled(notCompiled)
      { Env->incref(); Context = context; EmitErrors=true; }
    ~Script() { Env->decref(); }

    const QString code() const { return Code; }
    const QObject* context() const { return Context; }
    const QString name() const { return Name; }
    bool emitErrors() const { return EmitErrors; }
    virtual void addCode(const QString &code) { Code.append(code); compiled = notCompiled; emit codeChanged(); }
    virtual void setCode(const QString &code) { Code=code; compiled = notCompiled; emit codeChanged(); }
    virtual void setContext(QObject *context) { Context = context; compiled = notCompiled; }
    void setName(const QString &name) { Name = name; compiled = notCompiled; }
    void setEmitErrors(bool yes) { EmitErrors = yes; }

  public slots:
    virtual bool compile(bool for_eval=true);
    virtual QVariant eval();
    virtual bool exec();

    // local variables
    virtual bool setQObject(const QObject*, const char*) { return false; }
    virtual bool setInt(int, const char*) { return false; }
    virtual bool setDouble(double, const char*) { return false; }

  signals:
    void codeChanged();
    void error(const QString & message, const QString & scriptName, int lineNumber);
    void print(const QString & output);
    
  protected:
    ScriptingEnv *Env;
    QString Code, Name;
    QObject *Context;
    enum compileStatus { notCompiled, isCompiled, compileErr } compiled;
    bool EmitErrors;

    void emit_error(const QString & message, int lineNumber)
      { if(EmitErrors) emit error(message, Name, lineNumber); }
};

class ScriptingLangManager
{
  public:
    static ScriptingEnv *newEnv(ApplicationWindow *parent);
    static ScriptingEnv *newEnv(const char *name, ApplicationWindow *parent);
    static QStringList languages();
    static int numLanguages();

  private:
    typedef ScriptingEnv*(*ScriptingEnvConstructor)(ApplicationWindow*);
    typedef struct {
      const char *name;
      ScriptingEnvConstructor constructor;
    } ScriptingLang;
    static ScriptingLang langs[];
};

class ScriptingChangeEvent : public QEvent
{
  public:
    ScriptingChangeEvent(ScriptingEnv *e) : QEvent(SCRIPTING_CHANGE_EVENT), env(e) {}
    ScriptingEnv *scriptingEnv() const { return env; }
    Type type() const { return SCRIPTING_CHANGE_EVENT; }
  private:
    ScriptingEnv *env;
};


class scripted
{
  public:
   scripted(ScriptingEnv* env);
   ~scripted();
   void scriptingChangeEvent(ScriptingChangeEvent*);
  protected:
    ScriptingEnv *scriptEnv;
};

#endif