mirror of https://github.com/Icinga/icinga2.git
253 lines
8.9 KiB
C++
253 lines
8.9 KiB
C++
/******************************************************************************
|
|
* Icinga 2 *
|
|
* Copyright (C) 2012-2016 Icinga Development Team (https://www.icinga.org/) *
|
|
* *
|
|
* 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 St, Fifth Floor, Boston, MA 02110-1301, USA. *
|
|
******************************************************************************/
|
|
|
|
#ifndef VMOPS_H
|
|
#define VMOPS_H
|
|
|
|
#include "config/i2-config.hpp"
|
|
#include "config/expression.hpp"
|
|
#include "config/configitembuilder.hpp"
|
|
#include "config/applyrule.hpp"
|
|
#include "config/objectrule.hpp"
|
|
#include "base/debuginfo.hpp"
|
|
#include "base/array.hpp"
|
|
#include "base/dictionary.hpp"
|
|
#include "base/function.hpp"
|
|
#include "base/scriptglobal.hpp"
|
|
#include "base/exception.hpp"
|
|
#include "base/convert.hpp"
|
|
#include "base/objectlock.hpp"
|
|
#include <boost/foreach.hpp>
|
|
#include <boost/smart_ptr/make_shared.hpp>
|
|
#include <map>
|
|
#include <vector>
|
|
|
|
namespace icinga
|
|
{
|
|
|
|
class VMOps
|
|
{
|
|
public:
|
|
static inline Value Variable(ScriptFrame& frame, const String& name, const DebugInfo& debugInfo = DebugInfo())
|
|
{
|
|
Value value;
|
|
if (frame.Locals && frame.Locals->Get(name, &value))
|
|
return value;
|
|
else if (frame.Self.IsObject() && frame.Locals != static_cast<Object::Ptr>(frame.Self) && static_cast<Object::Ptr>(frame.Self)->HasOwnField(name))
|
|
return GetField(frame.Self, name, frame.Sandboxed, debugInfo);
|
|
else
|
|
return ScriptGlobal::Get(name);
|
|
}
|
|
|
|
static inline Value ConstructorCall(const Type::Ptr& type, const std::vector<Value>& args, const DebugInfo& debugInfo = DebugInfo())
|
|
{
|
|
if (type->GetName() == "String") {
|
|
if (args.empty())
|
|
return "";
|
|
else if (args.size() == 1)
|
|
return Convert::ToString(args[0]);
|
|
else
|
|
BOOST_THROW_EXCEPTION(ScriptError("Too many arguments for constructor."));
|
|
} else if (type->GetName() == "Number") {
|
|
if (args.empty())
|
|
return 0;
|
|
else if (args.size() == 1)
|
|
return Convert::ToDouble(args[0]);
|
|
else
|
|
BOOST_THROW_EXCEPTION(ScriptError("Too many arguments for constructor."));
|
|
} else if (type->GetName() == "Boolean") {
|
|
if (args.empty())
|
|
return 0;
|
|
else if (args.size() == 1)
|
|
return Convert::ToBool(args[0]);
|
|
else
|
|
BOOST_THROW_EXCEPTION(ScriptError("Too many arguments for constructor."));
|
|
} else if (args.size() == 1 && type->IsAssignableFrom(args[0].GetReflectionType()))
|
|
return args[0];
|
|
else
|
|
return type->Instantiate(args);
|
|
}
|
|
|
|
static inline Value FunctionCall(ScriptFrame& frame, const Value& self, const Function::Ptr& func, const std::vector<Value>& arguments)
|
|
{
|
|
ScriptFrame vframe;
|
|
|
|
if (!self.IsEmpty() || self.IsString())
|
|
vframe.Self = self;
|
|
|
|
return func->Invoke(arguments);
|
|
}
|
|
|
|
static inline Value NewFunction(ScriptFrame& frame, const std::vector<String>& args,
|
|
std::map<String, Expression *> *closedVars, const boost::shared_ptr<Expression>& expression)
|
|
{
|
|
return new Function(boost::bind(&FunctionWrapper, _1, args,
|
|
EvaluateClosedVars(frame, closedVars), expression));
|
|
}
|
|
|
|
static inline Value NewApply(ScriptFrame& frame, const String& type, const String& target, const String& name, const boost::shared_ptr<Expression>& filter,
|
|
const String& package, const String& fkvar, const String& fvvar, const boost::shared_ptr<Expression>& fterm, std::map<String, Expression *> *closedVars,
|
|
bool ignoreOnError, const boost::shared_ptr<Expression>& expression, const DebugInfo& debugInfo = DebugInfo())
|
|
{
|
|
ApplyRule::AddRule(type, target, name, expression, filter, package, fkvar,
|
|
fvvar, fterm, ignoreOnError, debugInfo, EvaluateClosedVars(frame, closedVars));
|
|
|
|
return Empty;
|
|
}
|
|
|
|
static inline Value NewObject(ScriptFrame& frame, bool abstract, const String& type, const String& name, const boost::shared_ptr<Expression>& filter,
|
|
const String& zone, const String& package, bool ignoreOnError, std::map<String, Expression *> *closedVars, const boost::shared_ptr<Expression>& expression, const DebugInfo& debugInfo = DebugInfo())
|
|
{
|
|
ConfigItemBuilder::Ptr item = new ConfigItemBuilder(debugInfo);
|
|
|
|
String checkName = name;
|
|
|
|
if (!abstract) {
|
|
Type::Ptr ptype = Type::GetByName(type);
|
|
|
|
NameComposer *nc = dynamic_cast<NameComposer *>(ptype.get());
|
|
|
|
if (nc)
|
|
checkName = nc->MakeName(name, Dictionary::Ptr());
|
|
}
|
|
|
|
if (!checkName.IsEmpty()) {
|
|
ConfigItem::Ptr oldItem = ConfigItem::GetByTypeAndName(type, checkName);
|
|
|
|
if (oldItem) {
|
|
std::ostringstream msgbuf;
|
|
msgbuf << "Object '" << name << "' of type '" << type << "' re-defined: " << debugInfo << "; previous definition: " << oldItem->GetDebugInfo();
|
|
BOOST_THROW_EXCEPTION(ScriptError(msgbuf.str(), debugInfo));
|
|
}
|
|
}
|
|
|
|
item->SetType(type);
|
|
item->SetName(name);
|
|
|
|
item->AddExpression(new OwnedExpression(expression));
|
|
item->SetAbstract(abstract);
|
|
item->SetScope(EvaluateClosedVars(frame, closedVars));
|
|
item->SetZone(zone);
|
|
item->SetPackage(package);
|
|
item->SetFilter(filter);
|
|
item->SetIgnoreOnError(ignoreOnError);
|
|
item->Compile()->Register();
|
|
|
|
return Empty;
|
|
}
|
|
|
|
static inline ExpressionResult For(ScriptFrame& frame, const String& fkvar, const String& fvvar, const Value& value, Expression *expression, const DebugInfo& debugInfo = DebugInfo())
|
|
{
|
|
if (value.IsObjectType<Array>()) {
|
|
if (!fvvar.IsEmpty())
|
|
BOOST_THROW_EXCEPTION(ScriptError("Cannot use dictionary iterator for array.", debugInfo));
|
|
|
|
Array::Ptr arr = value;
|
|
|
|
for (Array::SizeType i = 0; i < arr->GetLength(); i++) {
|
|
frame.Locals->Set(fkvar, arr->Get(i));
|
|
ExpressionResult res = expression->Evaluate(frame);
|
|
CHECK_RESULT_LOOP(res);
|
|
}
|
|
} else if (value.IsObjectType<Dictionary>()) {
|
|
if (fvvar.IsEmpty())
|
|
BOOST_THROW_EXCEPTION(ScriptError("Cannot use array iterator for dictionary.", debugInfo));
|
|
|
|
Dictionary::Ptr dict = value;
|
|
std::vector<String> keys;
|
|
|
|
{
|
|
ObjectLock olock(dict);
|
|
BOOST_FOREACH(const Dictionary::Pair& kv, dict) {
|
|
keys.push_back(kv.first);
|
|
}
|
|
}
|
|
|
|
BOOST_FOREACH(const String& key, keys) {
|
|
frame.Locals->Set(fkvar, key);
|
|
frame.Locals->Set(fvvar, dict->Get(key));
|
|
ExpressionResult res = expression->Evaluate(frame);
|
|
CHECK_RESULT_LOOP(res);
|
|
}
|
|
} else
|
|
BOOST_THROW_EXCEPTION(ScriptError("Invalid type in for expression: " + value.GetTypeName(), debugInfo));
|
|
|
|
return Empty;
|
|
}
|
|
|
|
static inline Value GetField(const Value& context, const String& field, bool sandboxed = false, const DebugInfo& debugInfo = DebugInfo())
|
|
{
|
|
if (unlikely(context.IsEmpty() && !context.IsString()))
|
|
return Empty;
|
|
|
|
if (unlikely(!context.IsObject()))
|
|
return GetPrototypeField(context, field, true, debugInfo);
|
|
|
|
Object::Ptr object = context;
|
|
|
|
return object->GetFieldByName(field, sandboxed, debugInfo);
|
|
}
|
|
|
|
static inline void SetField(const Object::Ptr& context, const String& field, const Value& value, const DebugInfo& debugInfo = DebugInfo())
|
|
{
|
|
if (!context)
|
|
BOOST_THROW_EXCEPTION(ScriptError("Cannot set field '" + field + "' on a value that is not an object.", debugInfo));
|
|
|
|
return context->SetFieldByName(field, value, debugInfo);
|
|
}
|
|
|
|
private:
|
|
static inline Value FunctionWrapper(const std::vector<Value>& arguments,
|
|
const std::vector<String>& funcargs, const Dictionary::Ptr& closedVars, const boost::shared_ptr<Expression>& expr)
|
|
{
|
|
if (arguments.size() < funcargs.size())
|
|
BOOST_THROW_EXCEPTION(std::invalid_argument("Too few arguments for function"));
|
|
|
|
ScriptFrame *frame = ScriptFrame::GetCurrentFrame();
|
|
|
|
if (closedVars)
|
|
closedVars->CopyTo(frame->Locals);
|
|
|
|
for (std::vector<Value>::size_type i = 0; i < std::min(arguments.size(), funcargs.size()); i++)
|
|
frame->Locals->Set(funcargs[i], arguments[i]);
|
|
|
|
return expr->Evaluate(*frame);
|
|
}
|
|
|
|
static inline Dictionary::Ptr EvaluateClosedVars(ScriptFrame& frame, std::map<String, Expression *> *closedVars)
|
|
{
|
|
Dictionary::Ptr locals;
|
|
|
|
if (closedVars) {
|
|
locals = new Dictionary();
|
|
|
|
typedef std::pair<String, Expression *> ClosedVar;
|
|
BOOST_FOREACH(const ClosedVar& cvar, *closedVars) {
|
|
locals->Set(cvar.first, cvar.second->Evaluate(frame));
|
|
}
|
|
}
|
|
|
|
return locals;
|
|
}
|
|
};
|
|
|
|
}
|
|
|
|
#endif /* VMOPS_H */
|