QScriptValueImpl Object::method_propertyIsEnumerable(QScriptContextPrivate *context, QScriptEnginePrivate *eng, QScriptClassInfo *) { bool result = false; if (context->thisObject().isObject() && (context->argumentCount() > 0)) { QScriptValueImpl arg = context->argument(0); QScriptNameIdImpl *id = 0; if (arg.isString()) id = arg.stringValue(); if (! id || ! id->unique) { QString str = arg.toString(); id = eng->nameId(str); } QScript::Member member; QScriptValueImpl base; QScriptValueImpl self = context->thisObject(); if (self.resolve(id, &member, &base, QScriptValue::ResolveLocal, QScript::Read)) { result = ! member.dontEnum(); if (result) { QScriptValueImpl tmp; base.get(member, &tmp); result = tmp.isValid(); } } } return (QScriptValueImpl(result)); }
/*! Returns the flags of the last property that was jumped over using next() or previous(). \sa value() */ QScriptValue::PropertyFlags QScriptValueIterator::flags() const { Q_D(const QScriptValueIterator); if (d->index == -1) return 0; QScript::Member member; QScriptValuePrivate::valueOf(d->object).member(d->index, &member); if (!member.isValid()) return 0; return QScriptValue::PropertyFlags(member.flags()); }
/*! Removes the last property that was jumped over using next() or previous(). \sa setValue() */ void QScriptValueIterator::remove() { Q_D(const QScriptValueIterator); if (d->index == -1) return; QScript::Member member; QScriptValuePrivate::valueOf(d->object).member(d->index, &member); if (!member.isValid()) return; QScriptValuePrivate::valueOf(d->object).removeMember(member); }
/*! Sets the \a value of the last property that was jumped over using next() or previous(). \sa value(), name() */ void QScriptValueIterator::setValue(const QScriptValue &value) { Q_D(const QScriptValueIterator); if (d->index == -1) return; QScript::Member member; QScriptValuePrivate::valueOf(d->object).member(d->index, &member); if (!member.isValid()) return; QScriptValuePrivate::valueOf(d->object).put(member, QScriptValuePrivate::valueOf(value)); }
/*! Returns the value of the last property that was jumped over using next() or previous(). \sa setValue(), name() */ QScriptValue QScriptValueIterator::value() const { Q_D(const QScriptValueIterator); if (d->index == -1) return QScriptValue(); QScript::Member member; QScriptValuePrivate::valueOf(d->object).member(d->index, &member); if (!member.isValid()) return QScriptValue(); QScriptValueImpl result; QScriptValuePrivate::valueOf(d->object).get(member, &result); return result; }
void QScriptValueIteratorImpl::setValue(const QScriptValueImpl &value) { if (!m_member.isValid()) return; if (m_member.isGetterOrSetter()) { // find and call the setter QScriptValueImpl setter; if (m_member.isObjectProperty() && !m_member.isSetter()) { QScript::Member mb; QScriptObject *obj = m_object.m_object_value; mb.object(m_member.nameId(), obj->memberCount(), 0); if (!obj->findSetter(&mb)) return; m_object.get(mb, &setter); } else { m_object.get(m_member, &setter); } setter.call(m_object, QScriptValueImplList() << value); } else { m_object.put(m_member, value); } }
/*! Returns true if there is at least one item behind the iterator (i.e. the iterator is \e not at the front of the property sequence); otherwise returns false. \sa previous(), hasNext() */ bool QScriptValueIterator::hasPrevious() const { Q_D(const QScriptValueIterator); if ((d->nextIndex != -1) && !d->forward) return true; if (!d->object.isObject()) return false; QScriptValueImpl v = QScriptValuePrivate::valueOf(d->object); int i = d->index; if ((i != -1) && d->forward) ++i; bool found = false; while (! found && --i >= 0) { QScript::Member member; v.member(i, &member); found = member.isValid(); if (found) { QScriptValueImpl vv; v.get(member, &vv); found = vv.isValid(); } } QScriptValueIteratorPrivate *that; that = const_cast<QScriptValueIteratorPrivate*>(d); if (found) { that->forward = false; that->nextIndex = i; return true; } else { that->nextIndex = -1; return false; } }
/*! Returns true if there is at least one item ahead of the iterator (i.e. the iterator is \e not at the back of the property sequence); otherwise returns false. \sa next(), hasPrevious() */ bool QScriptValueIterator::hasNext() const { Q_D(const QScriptValueIterator); if ((d->nextIndex != -1) && d->forward) return true; if (!d->object.isObject()) return false; QScriptValueImpl v = QScriptValuePrivate::valueOf(d->object); int i = d->index; if ((i != -1) && !d->forward) --i; int count = v.memberCount(); bool found = false; while (! found && ++i < count) { QScript::Member member; v.member(i, &member); found = member.isValid(); if (found && (member.isObjectProperty() || v.isArray())) { QScriptValueImpl vv; v.get(member, &vv); found = vv.isValid(); } } QScriptValueIteratorPrivate *that; that = const_cast<QScriptValueIteratorPrivate*>(d); if (found) { that->forward = true; that->nextIndex = i; return true; } else { that->nextIndex = -1; return false; } }
QScriptValueImpl QScriptValueIteratorImpl::value() const { if (!m_member.isValid()) return QScriptValueImpl(); QScriptValueImpl result; m_object.get(m_member, &result); if (m_member.isGetterOrSetter()) { // find and call the getter QScriptValueImpl getter; if (m_member.isObjectProperty() && !m_member.isGetter()) { QScript::Member mb; QScriptObject *obj = m_object.m_object_value; mb.object(m_member.nameId(), obj->memberCount(), 0); if (!obj->findGetter(&mb)) return QScriptValueImpl(); m_object.get(mb, &getter); } else { getter = result; } result = getter.call(m_object); } return result; }
void Enumeration::Instance::next(QScriptContextPrivate *context, QScriptValueImpl *result) { QScriptEnginePrivate *eng = context->engine(); Q_ASSERT(it != 0); it->next(); QScript::Member *member = it->member(); if (member->isObjectProperty() || member->nameId()) eng->newNameId(result, member->nameId()); else if (member->isNativeProperty() && !member->nameId()) *result = QScriptValueImpl(uint(member->id())); else *result = eng->undefinedValue(); }
/*! Returns the name of the last property that was jumped over using next() or previous(). \sa value(), flags() */ QString QScriptValueIterator::name() const { Q_D(const QScriptValueIterator); if (d->index == -1) return QString(); QScript::Member member; QScriptValuePrivate::valueOf(d->object).member(d->index, &member); if (member.isObjectProperty() || member.nameId()) return member.nameId()->s; else if (member.isNativeProperty()) return QScriptEnginePrivate::toString(member.id()); return QString(); }
bool QScriptValueIteratorImpl::acceptsMember(const QScriptValueImpl &o, const QScript::Member &m) const { if (!m.isValid() || (!m_ignoresDontEnum && m.dontEnum()) || (m.isSetter() && !m.isGetter())) { return false; } if (!m_enumerateProto || QScriptEnginePrivate::strictlyEquals(o, m_frontObject)) return true; // make sure it's not a shadowed property QScript::Member dummy; QScriptValueImpl base; QScriptNameIdImpl *id; if (m.nameId()) { id = m.nameId(); } else { QScriptEnginePrivate *eng_p = m_frontObject.engine(); id = eng_p->nameId(QScript::numberToString(m.id())); } m_frontObject.resolve(id, &dummy, &base, QScriptValue::ResolvePrototype, QScript::Read); return QScriptEnginePrivate::strictlyEquals(base, o); }
QDebug &operator<<(QDebug &d, const QScriptValueImpl &object) { d.nospace() << "QScriptValue("; switch (object.type()) { case QScript::InvalidType: d.nospace() << "Invalid)"; return d; case QScript::BooleanType: d.nospace() << "bool=" << object.toBoolean(); break; case QScript::IntegerType: d.nospace() << "int=" << object.toInt32(); break; case QScript::NumberType: d.nospace() << "qsreal=" << object.toNumber(); break; case QScript::LazyStringType: case QScript::StringType: d.nospace() << "string=" << object.toString(); break; case QScript::ReferenceType: d.nospace() << "reference"; break; case QScript::NullType: d.nospace() << "null"; break; case QScript::UndefinedType: d.nospace() << "undefined"; break; case QScript::PointerType: d.nospace() << "pointer"; break; case QScript::ObjectType: d.nospace() << object.classInfo()->name() << ",{"; QScriptObject *od = object.objectValue(); for (int i=0; i<od->memberCount(); ++i) { if (i != 0) d << ","; QScript::Member m; od->member(i, &m); if (m.isValid() && m.isObjectProperty()) { d << object.engine()->toString(m.nameId()); QScriptValueImpl o; od->get(m, &o); d.nospace() << QLatin1String(":") << (o.classInfo() ? o.classInfo()->name() : QLatin1String("?")); } } d.nospace() << "} scope={"; QScriptValueImpl scope = object.scope(); while (scope.isValid()) { Q_ASSERT(scope.isObject()); d.nospace() << " " << scope.objectValue(); scope = scope.scope(); } d.nospace() << "}"; break; } d << ")"; return d; }
void QScriptValueImpl::setProperty(QScriptNameIdImpl *nameId, const QScriptValueImpl &value, const QScriptValue::PropertyFlags &flags) { if (!isObject()) return; QScriptValueImpl base; QScript::Member member; QScriptValue::ResolveFlags mode = QScriptValue::ResolveLocal; // if we are not setting a setter or getter, look in prototype too if (!(flags & (QScriptValue::PropertyGetter | QScriptValue::PropertySetter))) mode |= QScriptValue::ResolvePrototype; if (resolve(nameId, &member, &base, mode, QScript::ReadWrite)) { // we resolved an existing property with that name if (flags & (QScriptValue::PropertyGetter | QScriptValue::PropertySetter)) { // setting the getter or setter of a property in this object if (member.isNativeProperty()) { if (value.isValid()) { qWarning("QScriptValue::setProperty() failed: " "cannot set getter or setter of native property `%s'", qPrintable(nameId->s)); } return; } if (member.isSetter()) { // the property we resolved is a setter if (!(flags & QScriptValue::PropertySetter) && !member.isGetter()) { // find the getter, if not, create one if (!m_object_value->findGetter(&member)) { if (!value.isValid()) return; // don't create property for invalid value createMember(nameId, &member, flags); } } } else if (member.isGetter()) { // the property we resolved is a getter if (!(flags & QScriptValue::PropertyGetter)) { // find the setter, if not, create one if (!m_object_value->findSetter(&member)) { if (!value.isValid()) return; // don't create property for invalid value createMember(nameId, &member, flags); } } } else { // the property is a normal property -- change the flags uint newFlags = flags & ~QScript::Member::InternalRange; newFlags |= QScript::Member::ObjectProperty; member.resetFlags(newFlags); base.m_object_value->m_members[member.id()].resetFlags(newFlags); } Q_ASSERT(member.isValid()); if (!value.isValid()) { // remove the property removeMember(member); return; } } else { // setting the value if (member.isGetterOrSetter()) { // call the setter QScriptValueImpl setter; if (member.isObjectProperty() && !member.isSetter()) { if (!base.m_object_value->findSetter(&member)) { qWarning("QScriptValue::setProperty() failed: " "property '%s' has a getter but no setter", qPrintable(nameId->s)); return; } } base.get(member, &setter); setter.call(*this, QScriptValueImplList() << value); return; } else { if (base.m_object_value != m_object_value) { if (!value.isValid()) return; // don't create property for invalid value createMember(nameId, &member, flags); base = *this; } else { if (!value.isValid()) { // remove the property removeMember(member); return; } } if (flags != QScriptValue::KeepExistingFlags) { // change flags if (member.isNativeProperty()) { qWarning("QScriptValue::setProperty(%s): " "cannot change flags of a native property", qPrintable(nameId->s)); } else { uint newFlags = member.flags() & QScript::Member::InternalRange; newFlags |= flags & ~QScript::Member::InternalRange; base.m_object_value->m_members[member.id()].resetFlags(newFlags); } } } } } else { // property does not exist if (!value.isValid()) return; // don't create property for invalid value createMember(nameId, &member, flags & ~QScript::Member::InternalRange); base = *this; } base.put(member, value); }