void tst_QScriptContext::inheritActivationAndThisObject()
{
QScriptEngine eng;
eng.globalObject().setProperty("myEval", eng.newFunction(myEval));
{
QScriptValue ret = eng.evaluate("var a = 123; myEval('a')");
QVERIFY(ret.isNumber());
QCOMPARE(ret.toInt32(), 123);
}
{
QScriptValue ret = eng.evaluate("(function() { return myEval('this'); }).call(Number)");
QVERIFY(ret.isFunction());
QVERIFY(ret.equals(eng.globalObject().property("Number")));
}
{
QScriptValue ret = eng.evaluate("(function(a) { return myEval('a'); })(123)");
QVERIFY(ret.isNumber());
QCOMPARE(ret.toInt32(), 123);
}
// QT-2219
{
eng.globalObject().setProperty("a", 123);
QScriptValue ret = eng.evaluate("(function() { myEval('var a = 456'); return a; })()");
QVERIFY(ret.isNumber());
QCOMPARE(ret.toInt32(), 456);
QEXPECT_FAIL("", "QT-2219: Wrong activation object is returned from native function's parent context", Continue);
QVERIFY(eng.globalObject().property("a").strictlyEquals(123));
}
}
void tst_QScriptContext::qobjectAsActivationObject()
{
QScriptEngine eng;
QObject object;
QScriptValue scriptObject = eng.newQObject(&object);
QScriptContext *ctx = eng.pushContext();
ctx->setActivationObject(scriptObject);
QVERIFY(ctx->activationObject().equals(scriptObject));
QVERIFY(!scriptObject.property("foo").isValid());
eng.evaluate("function foo() { return 123; }");
{
QScriptValue val = scriptObject.property("foo");
QVERIFY(val.isValid());
QVERIFY(val.isFunction());
}
QVERIFY(!eng.globalObject().property("foo").isValid());
QVERIFY(!scriptObject.property("bar").isValid());
eng.evaluate("var bar = 123");
{
QScriptValue val = scriptObject.property("bar");
QVERIFY(val.isValid());
QVERIFY(val.isNumber());
QCOMPARE(val.toInt32(), 123);
}
QVERIFY(!eng.globalObject().property("bar").isValid());
{
QScriptValue val = eng.evaluate("delete foo");
QVERIFY(val.isBool());
QVERIFY(val.toBool());
QVERIFY(!scriptObject.property("foo").isValid());
}
}
void fromScriptValueEntityReference(const QScriptValue &obj, EntityReference &s)
{
if (obj.isString())
s.ref = obj.toString();
else
{
if (!obj.property("ref").isValid())
LogError("Can't convert QScriptValue to EntityReference! QScriptValue does not contain ref attribute!");
else
{
QScriptValue ref = obj.property("ref");
if (ref.isNull())
s.ref = ""; // Empty the reference
else if (ref.isString())
s.ref = ref.toString();
else if (ref.isQObject())
{
// If the object is an Entity, call EntityReference::Set() with it
Entity* entity = dynamic_cast<Entity*>(ref.toQObject());
s.Set(entity);
}
else if (ref.isNumber() || ref.isVariant())
s.ref = QString::number(ref.toInt32());
else
LogError("Can't convert QScriptValue to EntityReference! Ref attribute is not null, string, a number, or an entity");
}
}
}
int ScriptManager::getTypeOfScript(QString strScriptName)
{
m_pScriptEngine->collectGarbage();
m_pScriptEngine->clearExceptions();
m_pScriptEngine->setGlobalObject(m_globalObjects[strScriptName]);
QScriptValue retValue = m_pScriptEngine->evaluate("getTypeOfScript();");
if(m_pScriptEngine->hasUncaughtException())
{
QMessageBox::critical(g_pWndMain, tr("Visual graph editor"), tr("File: %1\nLine: %2\n%3").arg(strScriptName + ".js").arg(m_pScriptEngine->uncaughtExceptionLineNumber()).arg(m_pScriptEngine->uncaughtException().toString()));
m_globalObjects.remove(strScriptName);
}
else
{
int retValueInt32 = retValue.toInt32();
if(retValueInt32 < 0 || retValueInt32 > 2)
{
m_globalObjects.remove(strScriptName);
return -1;
}
else
return retValueInt32;
}
return -1;
}
int PlugScript::Initialize()
{
QScriptValue value = mScriptEngine.evaluate("2 * 2");
qDebug() << value.toInt32();
return 0;
}
void ByteArrayClass::setProperty(QScriptValue &object,
const QScriptString &name,
uint id, const QScriptValue &value) {
QByteArray *ba = qscriptvalue_cast<QByteArray*>(object.data());
if (!ba)
return;
if (name == length) {
resize(*ba, value.toInt32());
} else {
qint32 pos = id;
if (pos < 0)
return;
if (ba->size() <= pos)
resize(*ba, pos + 1);
(*ba)[pos] = char(value.toInt32());
}
}
QScriptValue PHIEllipseItem::spanAngle( const QScriptValue &v )
{
if ( !isServerItem() ) return scriptEngine()->undefinedValue();
if ( !v.isValid() ) return realSpanAngle();
setSpanAngle( v.toInt32() );
setDirtyFlag( DFDoNotCache );
return self();
}
QScriptValue ByteArrayClass::construct(QScriptContext *ctx, QScriptEngine *) {
ByteArrayClass *cls = qscriptvalue_cast<ByteArrayClass*>(ctx->callee().data());
if (!cls)
return QScriptValue();
QScriptValue arg = ctx->argument(0);
if (arg.instanceOf(ctx->callee()))
return cls->newInstance(qscriptvalue_cast<QByteArray>(arg));
int size = arg.toInt32();
return cls->newInstance(size);
}
void qColorFromScriptValue(const QScriptValue& object, QColor& color) {
if (object.isNumber()) {
color.setRgb(object.toUInt32());
} else if (object.isString()) {
color.setNamedColor(object.toString());
} else {
QScriptValue alphaValue = object.property("alpha");
color.setRgb(object.property("red").toInt32(), object.property("green").toInt32(), object.property("blue").toInt32(),
alphaValue.isNumber() ? alphaValue.toInt32() : 255);
}
}
void TimerClass::setProperty(QScriptValue &object,
const QScriptString &name,
uint /*id*/, const QScriptValue &value) {
QTimer *timer = qscriptvalue_cast<QTimer*>(object.data());
qDebug() << "Value after de-varianting setProperty: " << timer << name;
if (!timer)
return;
if (name == _interval) {
timer->setInterval(value.toInt32());
} else if (name == _singleShot) {
timer->setSingleShot(value.toBoolean());
}
}
QScriptValue post_data_list_class::construct(QScriptContext *ctx, QScriptEngine *eng)
{
post_data_list_class *cls = qscriptvalue_cast<post_data_list_class*>(ctx->callee().data());
if (!cls)
return QScriptValue();
QScriptValue arg = ctx->argument(0);
if (arg.instanceOf(ctx->callee()))
return cls->newInstance(qscriptvalue_cast<http_data_list>(arg));
int size = arg.toInt32();
return cls->newInstance();
}
QScriptValue UniversalInputDialogScript::get(const QScriptValue& id){
if (id.isNumber()) {
int i = id.toInt32();
if (i < 0 || i > properties.size()) return QScriptValue();
return engine->newVariant(properties[i].valueToQVariant());
}
if (id.isString()) {
QString sid = id.toString();
foreach (const ManagedProperty& mp, properties)
if (mp.name == sid)
return engine->newVariant(mp.valueToQVariant());
return QScriptValue();
}
void AnimVariantMap::animVariantMapFromScriptValue(const QScriptValue& source) {
if (QThread::currentThread() != source.engine()->thread()) {
qCWarning(animation) << "Cannot examine Javacript object from non-script thread" << QThread::currentThread();
Q_ASSERT(false);
return;
}
// POTENTIAL OPTIMIZATION: cache the types we've seen. I.e, keep a dictionary mapping property names to an enumeration of types.
// Whenever we identify a new outbound type in animVariantMapToScriptValue above, or a new inbound type in the code that follows here,
// we would enter it into the dictionary. Then switch on that type here, with the code that follow being executed only if
// the type is not known. One problem with that is that there is no checking that two different script use the same name differently.
QScriptValueIterator property(source);
// Note: QScriptValueIterator iterates only over source's own properties. It does not follow the prototype chain.
while (property.hasNext()) {
property.next();
QScriptValue value = property.value();
if (value.isBool()) {
set(property.name(), value.toBool());
} else if (value.isString()) {
set(property.name(), value.toString());
} else if (value.isNumber()) {
int asInteger = value.toInt32();
float asFloat = value.toNumber();
if (asInteger == asFloat) {
set(property.name(), asInteger);
} else {
set(property.name(), asFloat);
}
} else { // Try to get x,y,z and possibly w
if (value.isObject()) {
QScriptValue x = value.property("x");
if (x.isNumber()) {
QScriptValue y = value.property("y");
if (y.isNumber()) {
QScriptValue z = value.property("z");
if (z.isNumber()) {
QScriptValue w = value.property("w");
if (w.isNumber()) {
set(property.name(), glm::quat(w.toNumber(), x.toNumber(), y.toNumber(), z.toNumber()));
} else {
set(property.name(), glm::vec3(x.toNumber(), y.toNumber(), z.toNumber()));
}
continue; // we got either a vector or quaternion object, so don't fall through to warning
}
}
}
}
qCWarning(animation) << "Ignoring unrecognized data" << value.toString() << "for animation property" << property.name();
Q_ASSERT(false);
}
}
}
void tst_QScriptContext::lineNumber()
{
QScriptEngine eng;
QScriptValue result = eng.evaluate("try { eval(\"foo = 123;\\n this[is{a{syntax|error@#$%@#% \"); } catch (e) { e.lineNumber; }", "foo.qs", 123);
QVERIFY(!eng.hasUncaughtException());
QVERIFY(result.isNumber());
QCOMPARE(result.toInt32(), 2);
result = eng.evaluate("foo = 123;\n bar = 42\n0 = 0");
QVERIFY(eng.hasUncaughtException());
QCOMPARE(eng.uncaughtExceptionLineNumber(), 3);
QCOMPARE(result.property("lineNumber").toInt32(), 3);
}
/// Special scripting function that registers a timer event. Note: Functions must be passed
/// quoted, otherwise they will be inlined! If a third parameter is passed, this must be an
/// object, which is then passed to the timer. If the object is dead, the timer stops.
static QScriptValue js_setTimer(QScriptContext *context, QScriptEngine *engine)
{
QString funcName = context->argument(0).toString();
QScriptValue ms = context->argument(1);
int player = engine->globalObject().property("me").toInt32();
timerNode node(engine, funcName, player, ms.toInt32());
if (context->argumentCount() == 3)
{
QScriptValue obj = context->argument(2);
node.baseobj = obj.property("id").toInt32();
}
node.type = TIMER_REPEAT;
timers.push_back(node);
return QScriptValue();
}
static QScriptValue js_orderDroidLoc(QScriptContext *context, QScriptEngine *)
{
QScriptValue droidVal = context->argument(0);
int id = droidVal.property("id").toInt32();
int player = droidVal.property("player").toInt32();
QScriptValue orderVal = context->argument(1);
int x = context->argument(2).toInt32();
int y = context->argument(3).toInt32();
DROID_ORDER order = (DROID_ORDER)orderVal.toInt32();
DROID *psDroid = IdToDroid(id, player);
SCRIPT_ASSERT(context, psDroid, "Droid id %d not found belonging to player %d", id, player);
SCRIPT_ASSERT(context, worldOnMap(x, y), "Outside map bounds (%d, %d)", x, y);
orderDroidLoc(psDroid, order, x, y, ModeQueue);
return QScriptValue();
}
QScriptValue ScriptRunner::setInterval(QScriptContext *context, QScriptEngine *engine)
{
ScriptRunner * me = (ScriptRunner *) engine->parent();
QScriptValue error;
if (!me->argCount(context, error, 2))
return error;
QScriptValue func = context->argument(0);
if (!me->maybeThrowArgumentError(context, error, func.isFunction()))
return error;
QScriptValue ms = context->argument(1);
if (!me->maybeThrowArgumentError(context, error, ms.isNumber()))
return error;
return me->setTimeout(func, ms.toInt32(), context->parentContext()->thisObject(), true);
}
enum SetResponse ScriptablePrivate::callSet(const ParameterList & params)
{
loadScriptEngine();
enum SetResponse returnValue = NoError;
if (_engine)
{
QScriptValue tmp = _engine->globalObject()
.property("set")
.call(QScriptValue(),
QScriptValueList() << ParameterListtoScriptValue(_engine, params));
returnValue = (enum SetResponse)tmp.toInt32();
}
return returnValue;
}
static QScriptValue DEFINE_CUSTOM_OBJECT(QScriptContext *context, QScriptEngine *engine)
{
QScriptValue a = context->argument(0);
QScriptValue b = context->argument(1);
QScriptValue c = context->argument(2);
scriptType_t v;
v.desc = a.toString();
v.name = b.toString();
v.guiType = c.toInt32();
scriptNewTypes.append(v);
return QScriptValue();
}
QScriptValue ScriptSleep(QScriptContext *context, QScriptEngine *engine)
{
FoxEngine * eng = (FoxEngine *)engine;
QScriptValue a;
int args = context->argumentCount();
if(args == 1)
{
a = context->argument(0);
boost::this_thread::sleep(boost::posix_time::milliseconds(a.toInt32()));
}
else
{
eng->emitError("Sleep Function Error - Invalid Argument Number");
}
return a;
}
QScriptValue ScriptRunner::clearTimeout(QScriptContext *context, QScriptEngine *engine)
{
ScriptRunner * me = (ScriptRunner *) engine->parent();
QScriptValue error;
if (!me->argCount(context, error, 1))
return error;
QScriptValue id = context->argument(0);
if (!me->maybeThrowArgumentError(context, error, id.isNumber()))
return error;
int int_id = id.toInt32();
QTimer * ptr = me->m_timer_ptrs.value(int_id, NULL);
me->m_timer_ptrs.remove(int_id);
me->m_script_timers.remove(ptr);
delete ptr;
return QScriptValue();
}
static QScriptValue js_getDerrick(QScriptContext *context, QScriptEngine *engine)
{
BASE_OBJECT *psObj = NULL;
QScriptValue param = context->argument(0);
int i = param.toInt32();
if (i < (int)derricks.size())
{
const int x = derricks[i].x;
const int y = derricks[i].y;
MAPTILE *psTile = worldTile(x, y);
if (psTile)
{
psObj = psTile->psObject;
}
}
return convStructure(psObj, engine);
}
Address AddressValidator::toAddress( const QString& string, AddressType* addressType) const
{
Address address;
QString expression = string.trimmed();
if( addressType )
{
const AddressType type =
expression.startsWith(QLatin1Char('+')) ? RelativeForwards :
expression.startsWith(QLatin1Char('-')) ? RelativeBackwards :
/* else */ AbsoluteAddress;
if( type != AbsoluteAddress )
expression.remove( 0, 1 );
*addressType = type;
}
if( mCodecId == ExpressionCoding )
{
QScriptEngine evaluator;
QScriptValue value = evaluator.evaluate( expression );
address = value.toInt32();
qCDebug(LOG_KASTEN_OKTETA_GUI) << "expression " << expression << " evaluated to: " << address;
if( evaluator.hasUncaughtException() )
{
qCWarning(LOG_KASTEN_OKTETA_GUI) << "evaluation error: " << evaluator.uncaughtExceptionBacktrace();
if( addressType )
*addressType = InvalidAddressType;
}
}
else
{
const bool isHexadecimal = ( mCodecId == HexadecimalCoding );
const int base = isHexadecimal ? 16 : 10;
address = expression.toInt( 0, base );
}
return address;
}
QScriptValue notificationsSend(QScriptContext *ctxt, QScriptEngine *e)
{
if (ctxt->argumentCount() < 1)
return e->undefinedValue();
QScriptValue arg = ctxt->argument(0);
if (arg.isNumber() && ctxt->argumentCount() > 1) {
NotificationRequest request;
request.setType(static_cast<Notification::Type>(arg.toInt32()));
request.setObject(ctxt->argument(1).toQObject());
if (ctxt->argumentCount() > 2)
request.setText(ctxt->argument(2).toString());
return e->newQObject(request.send());
} else if (arg.isString()) {
return e->newQObject(Notification::send(arg.toString()));
} else if (arg.isObject()) {
Message msg = qscriptvalue_cast<Message>(arg);
return e->newQObject(Notification::send(msg));
}
return e->undefinedValue();
}
void SaveFlagsfromScriptValue(const QScriptValue &obj, enum SaveFlags &en)
{
if (obj.isNumber())
en = (enum SaveFlags)obj.toInt32();
else if (obj.isString())
{
if (obj.toString() == "CHECK")
en = CHECK;
else if (obj.toString() == "CHANGEONE")
en = CHANGEONE;
else if (obj.toString() == "CHANGEALL")
en = CHANGEALL;
else
qWarning("string %s could not be converted to SaveFlags",
qPrintable(obj.toString()));
}
else
qWarning("object %s could not be converted to SaveFlags",
qPrintable(obj.toString()));
}
QScriptValue ArrayBufferClass::construct(QScriptContext* context, QScriptEngine* engine) {
ArrayBufferClass* cls = qscriptvalue_cast<ArrayBufferClass*>(context->callee().data());
if (!cls) {
// return if callee (function called) is not of type ArrayBuffer
return QScriptValue();
}
QScriptValue arg = context->argument(0);
if (!arg.isValid() || !arg.isNumber()) {
return QScriptValue();
}
quint32 size = arg.toInt32();
QScriptValue newObject = cls->newInstance(size);
if (context->isCalledAsConstructor()) {
// if called with keyword new, replace this object.
context->setThisObject(newObject);
return engine->undefinedValue();
}
return newObject;
}
void QSqlErrorTypefromScriptValue(const QScriptValue &obj, enum QSqlError::ErrorType &p)
{
p = (enum QSqlError::ErrorType)obj.toInt32();
}
void QtWindowModalityfromScriptValue(const QScriptValue &obj, enum Qt::WindowModality &en)
{
en = (enum Qt::WindowModality)obj.toInt32();
}
void ParameterGroupTypesfromScriptValue(const QScriptValue &obj, enum ParameterGroup::ParameterGroupTypes &en)
{
en = (enum ParameterGroup::ParameterGroupTypes)obj.toInt32();
}
void SetResponsefromScriptValue(const QScriptValue &obj, enum SetResponse &sr)
{
sr = (enum SetResponse)obj.toInt32();
}
