You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
311 lines
10 KiB
311 lines
10 KiB
/***************************************************************************
|
|
* scriptaction.h
|
|
* This file is part of the KDE project
|
|
* copyright (C) 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.
|
|
***************************************************************************/
|
|
|
|
#ifndef KROSS_API_SCRIPTACTION_H
|
|
#define KROSS_API_SCRIPTACTION_H
|
|
|
|
#include <tqdom.h>
|
|
#include <kaction.h>
|
|
|
|
#include "scriptcontainer.h"
|
|
|
|
namespace Kross { namespace Api {
|
|
|
|
// Forward declarations.
|
|
class ScriptContainer;
|
|
class ScriptActionCollection;
|
|
class ScriptActionPrivate;
|
|
|
|
/**
|
|
* A ScriptAction extends a KAction by providing a wrapper around
|
|
* a \a ScriptContainer to execute scripting code on activation.
|
|
*/
|
|
class ScriptAction
|
|
: public KAction
|
|
, public Kross::Api::ScriptContainer
|
|
{
|
|
Q_OBJECT
|
|
|
|
|
|
/// The name of the interpreter used to execute the scripting code.
|
|
//TQ_PROPERTY(TQString interpretername READ getInterpreterName WRITE setInterpreterName)
|
|
|
|
/// The scripting code which should be executed.
|
|
//TQ_PROPERTY(TQString code READ getCode WRITE setCode)
|
|
|
|
/// The scriptfile which should be executed.
|
|
//TQ_PROPERTY(TQString file READ getFile WRITE setFile)
|
|
|
|
/// The description for this \a ScriptAction .
|
|
TQ_PROPERTY(TQString description READ getDescription WRITE setDescription)
|
|
|
|
public:
|
|
|
|
/// Shared pointer to implement reference-counting.
|
|
typedef KSharedPtr<ScriptAction> Ptr;
|
|
|
|
/// A list of \a ScriptAction instances.
|
|
//typedef TQValueList<ScriptAction::Ptr> List;
|
|
|
|
/**
|
|
* Constructor.
|
|
*
|
|
* \param file The KURL scriptfile this \a ScriptAction
|
|
* points to.
|
|
*/
|
|
explicit ScriptAction(const TQString& file);
|
|
|
|
/**
|
|
* Constructor.
|
|
*
|
|
* \param scriptconfigfile The XML-configurationfile
|
|
* the DOM-element was readed from.
|
|
* \param element The TQDomElement which will be used
|
|
* to setup the \a ScriptAction attributes.
|
|
*/
|
|
explicit ScriptAction(const TQString& scriptconfigfile, const TQDomElement& element);
|
|
|
|
/**
|
|
* Destructor.
|
|
*/
|
|
virtual ~ScriptAction();
|
|
|
|
/**
|
|
* \return the version this script has. Versions are used
|
|
* to be able to manage different versions of the same
|
|
* script. The version is 0 by default if not defined to
|
|
* something else in the rc-file.
|
|
*/
|
|
int version() const;
|
|
|
|
/**
|
|
* \return the description for this \a ScriptAction has.
|
|
*/
|
|
const TQString getDescription() const;
|
|
|
|
/**
|
|
* Set the description \p description for this \a ScriptAction .
|
|
*/
|
|
void setDescription(const TQString& description);
|
|
|
|
/**
|
|
* Set the name of the interpreter which will be used
|
|
* on activation to execute the scripting code.
|
|
*
|
|
* \param name The name of the \a Interpreter . This
|
|
* could be e.g. "python".
|
|
*/
|
|
void setInterpreterName(const TQString& name);
|
|
|
|
/**
|
|
* \return the path of the package this \a ScriptAction
|
|
* belongs to or TQString() if it doesn't belong to
|
|
* any package.
|
|
*/
|
|
const TQString getPackagePath() const;
|
|
|
|
/**
|
|
* \return a list of all kind of logs this \a ScriptAction
|
|
* does remember.
|
|
*/
|
|
const TQStringList& getLogs() const;
|
|
|
|
/**
|
|
* Attach this \a ScriptAction to the \a ScriptActionCollection
|
|
* \p collection .
|
|
*/
|
|
void attach(ScriptActionCollection* collection);
|
|
|
|
/**
|
|
* Detach this \a ScriptAction from the \a ScriptActionCollection
|
|
* \p collection .
|
|
*/
|
|
void detach(ScriptActionCollection* collection);
|
|
|
|
/**
|
|
* Detach this \a ScriptAction from all \a ScriptActionCollection
|
|
* instance his \a ScriptAction is attached to.
|
|
*/
|
|
void detachAll();
|
|
|
|
public slots:
|
|
|
|
/**
|
|
* If the \a ScriptAction got activated the \a ScriptContainer
|
|
* got executed. Once this slot got executed it will emit a
|
|
* \a success() or \a failed() signal.
|
|
*/
|
|
virtual void activate();
|
|
|
|
/**
|
|
* This slot finalizes the \a ScriptContainer and tries to clean
|
|
* any still running script.
|
|
*/
|
|
void finalize();
|
|
|
|
signals:
|
|
|
|
/**
|
|
* This signal got emitted when this action is emitted before execution.
|
|
*/
|
|
void activated(const Kross::Api::ScriptAction*);
|
|
|
|
/**
|
|
* This signal got emitted after this \a ScriptAction got
|
|
* executed successfully.
|
|
*/
|
|
void success();
|
|
|
|
/**
|
|
* This signal got emitted after the try to execute this
|
|
* \a ScriptAction failed. The \p errormessage contains
|
|
* the error message.
|
|
*/
|
|
void failed(const TQString& errormessage, const TQString& tracedetails);
|
|
|
|
private:
|
|
/// Internaly used private d-pointer.
|
|
ScriptActionPrivate* d;
|
|
};
|
|
|
|
/**
|
|
* A collection to store \a ScriptAction shared pointers.
|
|
*
|
|
* A \a ScriptAction instance could be stored within
|
|
* multiple \a ScriptActionCollection instances.
|
|
*/
|
|
class ScriptActionCollection
|
|
{
|
|
private:
|
|
|
|
/**
|
|
* The list of \a ScriptAction shared pointers.
|
|
*/
|
|
TQValueList<ScriptAction::Ptr> m_list;
|
|
|
|
/**
|
|
* A map of \a ScriptAction shared pointers used to access
|
|
* the actions with there name.
|
|
*/
|
|
TQMap<TQCString, ScriptAction::Ptr> m_actions;
|
|
|
|
/**
|
|
* A KActionMenu which could be used to display the
|
|
* content of this \a ScriptActionCollection instance.
|
|
*/
|
|
KActionMenu* m_actionmenu;
|
|
|
|
/**
|
|
* Boolean value used to represent the modified-state. Will
|
|
* be true if this \a ScriptActionCollection is modified
|
|
* aka dirty and e.g. the \a m_actionmenu needs to be
|
|
* updated else its false.
|
|
*/
|
|
bool m_dirty;
|
|
|
|
/**
|
|
* Copy-constructor. The cctor is private cause instances
|
|
* of this class shouldn't be copied. If that changes one
|
|
* day, don't forgot that it's needed to copy the private
|
|
* member variables as well or we may end in dirty
|
|
* crashes :)
|
|
*/
|
|
ScriptActionCollection(const ScriptActionCollection&) {}
|
|
|
|
public:
|
|
|
|
/**
|
|
* Constructor.
|
|
*
|
|
* \param text The text used to display some describing caption.
|
|
* \param ac The KActionCollection which should be used to as
|
|
* initial content for the KActionMenu \a m_actionmenu .
|
|
* \param name The internal name.
|
|
*/
|
|
ScriptActionCollection(const TQString& text, KActionCollection* ac, const char* name)
|
|
: m_actionmenu( new KActionMenu(text, ac, name) )
|
|
, m_dirty(true) {}
|
|
|
|
|
|
/**
|
|
* Destructor.
|
|
*/
|
|
~ScriptActionCollection() {
|
|
for(TQValueList<ScriptAction::Ptr>::Iterator it = m_list.begin(); it != m_list.end(); ++it)
|
|
(*it)->detach(this);
|
|
}
|
|
|
|
/**
|
|
* \return the \a ScriptAction instance which has the name \p name
|
|
* or NULL if there exists no such action.
|
|
*/
|
|
ScriptAction::Ptr action(const TQCString& name) { return m_actions[name]; }
|
|
|
|
/**
|
|
* \return a list of actions.
|
|
*/
|
|
TQValueList<ScriptAction::Ptr> actions() { return m_list; }
|
|
|
|
/**
|
|
* \return the KActionMenu \a m_actionmenu .
|
|
*/
|
|
KActionMenu* actionMenu() { return m_actionmenu; }
|
|
|
|
/**
|
|
* Attach a \a ScriptAction instance to this \a ScriptActionCollection .
|
|
*/
|
|
void attach(ScriptAction::Ptr action) {
|
|
m_dirty = true;
|
|
m_actions[ action->name() ] = action;
|
|
m_list.append(action);
|
|
m_actionmenu->insert(action);
|
|
action->attach(this);
|
|
}
|
|
|
|
/**
|
|
* Detach a \a ScriptAction instance from this \a ScriptActionCollection .
|
|
*/
|
|
void detach(ScriptAction::Ptr action) {
|
|
m_dirty = true;
|
|
m_actions.remove(action->name());
|
|
m_list.remove(action);
|
|
m_actionmenu->remove(action);
|
|
action->detach(this);
|
|
}
|
|
|
|
/**
|
|
* Clear this \a ScriptActionCollection . The collection
|
|
* will be empty and there are no actions attach any longer.
|
|
*/
|
|
void clear() {
|
|
for(TQValueList<ScriptAction::Ptr>::Iterator it = m_list.begin(); it != m_list.end(); ++it) {
|
|
m_actionmenu->remove(*it);
|
|
(*it)->detach(this);
|
|
}
|
|
m_list.clear();
|
|
m_actions.clear();
|
|
}
|
|
|
|
};
|
|
|
|
}}
|
|
|
|
#endif
|
|
|