/**************************************************************************** ** ** Copyright (C) 2009 Nokia Corporation and/or its subsidiary(-ies). ** All rights reserved. ** Contact: Nokia Corporation (qt-info@nokia.com) ** ** This file is part of the QtDeclarative module of the Qt Toolkit. ** ** $QT_BEGIN_LICENSE:LGPL$ ** No Commercial Usage ** This file contains pre-release code and may not be distributed. ** You may use this file in accordance with the terms and conditions ** contained in the Technology Preview License Agreement accompanying ** this package. ** ** GNU Lesser General Public License Usage ** Alternatively, this file may be used under the terms of the GNU Lesser ** General Public License version 2.1 as published by the Free Software ** Foundation and appearing in the file LICENSE.LGPL included in the ** packaging of this file. Please review the following information to ** ensure the GNU Lesser General Public License version 2.1 requirements ** will be met: http://www.gnu.org/licenses/old-licenses/lgpl-2.1.html. ** ** In addition, as a special exception, Nokia gives you certain additional ** rights. These rights are described in the Nokia Qt LGPL Exception ** version 1.1, included in the file LGPL_EXCEPTION.txt in this package. ** ** If you have questions regarding the use of this file, please contact ** Nokia at qt-info@nokia.com. ** ** ** ** ** ** ** ** ** $QT_END_LICENSE$ ** ****************************************************************************/ #include "qmlenginedebug_p.h" #include "qmlboundsignal_p.h" #include "qmlengine.h" #include "qmlmetatype.h" #include "qmlmetaproperty.h" #include "qmlbinding.h" #include "qmlcontext_p.h" #include "qmlwatcher_p.h" #include #include QT_BEGIN_NAMESPACE QList QmlEngineDebugServer::m_engines; QmlEngineDebugServer::QmlEngineDebugServer(QObject *parent) : QmlDebugService(QLatin1String("QmlEngine"), parent), m_watch(new QmlWatcher(this)) { QObject::connect(m_watch, SIGNAL(propertyChanged(int,int,QMetaProperty,QVariant)), this, SLOT(propertyChanged(int,int,QMetaProperty,QVariant))); } QDataStream &operator<<(QDataStream &ds, const QmlEngineDebugServer::QmlObjectData &data) { ds << data.url << data.lineNumber << data.columnNumber << data.objectName << data.objectType << data.objectId << data.contextId; return ds; } QDataStream &operator>>(QDataStream &ds, QmlEngineDebugServer::QmlObjectData &data) { ds >> data.url >> data.lineNumber >> data.columnNumber >> data.objectName >> data.objectType >> data.objectId >> data.contextId; return ds; } QDataStream &operator<<(QDataStream &ds, const QmlEngineDebugServer::QmlObjectProperty &data) { ds << (int)data.type << data.name << data.value << data.valueTypeName << data.binding << data.hasNotifySignal; return ds; } QDataStream &operator>>(QDataStream &ds, QmlEngineDebugServer::QmlObjectProperty &data) { int type; ds >> type >> data.name >> data.value >> data.valueTypeName >> data.binding >> data.hasNotifySignal; data.type = (QmlEngineDebugServer::QmlObjectProperty::Type)type; return ds; } QmlEngineDebugServer::QmlObjectProperty QmlEngineDebugServer::propertyData(QObject *obj, int propIdx) { QmlObjectProperty rv; QMetaProperty prop = obj->metaObject()->property(propIdx); rv.type = QmlObjectProperty::Unknown; rv.valueTypeName = QString::fromUtf8(prop.typeName()); rv.name = QString::fromUtf8(prop.name()); rv.hasNotifySignal = prop.hasNotifySignal(); QmlAbstractBinding *binding = QmlMetaProperty(obj, rv.name).binding(); if (binding) rv.binding = binding->expression(); QVariant value = prop.read(obj); rv.value = valueContents(value); if (QVariant::Type(prop.userType()) < QVariant::UserType) { rv.type = QmlObjectProperty::Basic; } else if (QmlMetaType::isObject(prop.userType())) { rv.type = QmlObjectProperty::Object; } else if (QmlMetaType::isList(prop.userType()) || QmlMetaType::isQmlList(prop.userType())) { rv.type = QmlObjectProperty::List; } return rv; } QVariant QmlEngineDebugServer::valueContents(const QVariant &value) const { int userType = value.userType(); if (QVariant::Type(userType) < QVariant::UserType) return value; if (QmlMetaType::isList(userType) || QmlMetaType::isQmlList(userType)) { int count = QmlMetaType::listCount(value); QVariantList contents; for (int i=0; iobjectName(); if (name.isEmpty()) name = QLatin1String(""); return name; } } return QLatin1String(""); } void QmlEngineDebugServer::buildObjectDump(QDataStream &message, QObject *object, bool recur) { message << objectData(object); // Some children aren't added to an object until particular properties are read // - e.g. child state objects aren't added until the 'states' property is read - // but this should only affect internal objects that aren't shown by the // debugger anyway. QObjectList children = object->children(); int childrenCount = children.count(); for (int ii = 0; ii < children.count(); ++ii) { if (qobject_cast(children[ii]) || QmlBoundSignal::cast(children[ii])) --childrenCount; } message << childrenCount << recur; QList fakeProperties; for (int ii = 0; ii < children.count(); ++ii) { QObject *child = children.at(ii); if (qobject_cast(child)) continue; QmlBoundSignal *signal = QmlBoundSignal::cast(child); if (signal) { QmlObjectProperty prop; prop.type = QmlObjectProperty::SignalProperty; prop.hasNotifySignal = false; QmlExpression *expr = signal->expression(); if (expr) { prop.value = expr->expression(); QObject *scope = expr->scopeObject(); if (scope) { QString sig = QLatin1String(scope->metaObject()->method(signal->index()).signature()); int lparen = sig.indexOf(QLatin1Char('(')); if (lparen >= 0) { QString methodName = sig.mid(0, lparen); prop.name = QLatin1String("on") + methodName[0].toUpper() + methodName.mid(1); } } } fakeProperties << prop; } else { if (recur) buildObjectDump(message, child, recur); else message << objectData(child); } } message << (object->metaObject()->propertyCount() + fakeProperties.count()); for (int ii = 0; ii < object->metaObject()->propertyCount(); ++ii) message << propertyData(object, ii); for (int ii = 0; ii < fakeProperties.count(); ++ii) message << fakeProperties[ii]; } void QmlEngineDebugServer::buildObjectList(QDataStream &message, QmlContext *ctxt) { QmlContextPrivate *p = (QmlContextPrivate *)QObjectPrivate::get(ctxt); QString ctxtName = ctxt->objectName(); int ctxtId = QmlDebugService::idForObject(ctxt); message << ctxtName << ctxtId; int count = 0; for (QSet::ConstIterator iter = p->childContexts.begin(); iter != p->childContexts.end(); ++iter) { QmlContextPrivate *p = (QmlContextPrivate *)QObjectPrivate::get(*iter); if (p->isInternal) continue; ++count; } message << count; for (QSet::ConstIterator iter = p->childContexts.begin(); iter != p->childContexts.end(); ++iter) { QmlContextPrivate *p = (QmlContextPrivate *)QObjectPrivate::get(*iter); if (p->isInternal) continue; buildObjectList(message, *iter); } // Clean deleted objects for (int ii = 0; ii < p->instances.count(); ++ii) { if (!p->instances.at(ii)) { p->instances.removeAt(ii); --ii; } } message << p->instances.count(); for (int ii = 0; ii < p->instances.count(); ++ii) { message << objectData(p->instances.at(ii)); } } QmlEngineDebugServer::QmlObjectData QmlEngineDebugServer::objectData(QObject *object) { QmlDeclarativeData *ddata = QmlDeclarativeData::get(object); QmlObjectData rv; if (ddata) { rv.url = ddata->outerContext->baseUrl(); rv.lineNumber = ddata->lineNumber; rv.columnNumber = ddata->columnNumber; } else { rv.lineNumber = -1; rv.columnNumber = -1; } rv.objectName = object->objectName(); rv.objectId = QmlDebugService::idForObject(object); rv.contextId = QmlDebugService::idForObject(qmlContext(object)); QmlType *type = QmlMetaType::qmlType(object->metaObject()); if (type) { QString typeName = QLatin1String(type->qmlTypeName()); int lastSlash = typeName.lastIndexOf(QLatin1Char('/')); rv.objectType = lastSlash < 0 ? typeName : typeName.mid(lastSlash+1); } else { rv.objectType = QString::fromUtf8(object->metaObject()->className()); int marker = rv.objectType.indexOf(QLatin1String("_QMLTYPE_")); if (marker != -1) rv.objectType = rv.objectType.left(marker); } return rv; } void QmlEngineDebugServer::messageReceived(const QByteArray &message) { QDataStream ds(message); QByteArray type; ds >> type; //qDebug() << "QmlEngineDebugServer::messageReceived()" << type; if (type == "LIST_ENGINES") { int queryId; ds >> queryId; QByteArray reply; QDataStream rs(&reply, QIODevice::WriteOnly); rs << QByteArray("LIST_ENGINES_R"); rs << queryId << m_engines.count(); for (int ii = 0; ii < m_engines.count(); ++ii) { QmlEngine *engine = m_engines.at(ii); QString engineName = engine->objectName(); int engineId = QmlDebugService::idForObject(engine); rs << engineName << engineId; } sendMessage(reply); } else if (type == "LIST_OBJECTS") { int queryId; int engineId = -1; ds >> queryId >> engineId; QmlEngine *engine = qobject_cast(QmlDebugService::objectForId(engineId)); QByteArray reply; QDataStream rs(&reply, QIODevice::WriteOnly); rs << QByteArray("LIST_OBJECTS_R") << queryId; if (engine) buildObjectList(rs, engine->rootContext()); sendMessage(reply); } else if (type == "FETCH_OBJECT") { int queryId; int objectId; bool recurse; ds >> queryId >> objectId >> recurse; QObject *object = QmlDebugService::objectForId(objectId); QByteArray reply; QDataStream rs(&reply, QIODevice::WriteOnly); rs << QByteArray("FETCH_OBJECT_R") << queryId; if (object) buildObjectDump(rs, object, recurse); sendMessage(reply); } else if (type == "WATCH_OBJECT") { int queryId; int objectId; ds >> queryId >> objectId; bool ok = m_watch->addWatch(queryId, objectId); QByteArray reply; QDataStream rs(&reply, QIODevice::WriteOnly); rs << QByteArray("WATCH_OBJECT_R") << queryId << ok; sendMessage(reply); } else if (type == "WATCH_PROPERTY") { int queryId; int objectId; QByteArray property; ds >> queryId >> objectId >> property; bool ok = m_watch->addWatch(queryId, objectId, property); QByteArray reply; QDataStream rs(&reply, QIODevice::WriteOnly); rs << QByteArray("WATCH_PROPERTY_R") << queryId << ok; sendMessage(reply); } else if (type == "WATCH_EXPR_OBJECT") { int queryId; int debugId; QString expr; ds >> queryId >> debugId >> expr; bool ok = m_watch->addWatch(queryId, debugId, expr); QByteArray reply; QDataStream rs(&reply, QIODevice::WriteOnly); rs << QByteArray("WATCH_EXPR_OBJECT_R") << queryId << ok; sendMessage(reply); } else if (type == "NO_WATCH") { int queryId; ds >> queryId; m_watch->removeWatch(queryId); } else if (type == "EVAL_EXPRESSION") { int queryId; int objectId; QString expr; ds >> queryId >> objectId >> expr; QObject *object = QmlDebugService::objectForId(objectId); QmlContext *context = qmlContext(object); QVariant result; if (object && context) { QmlExpression *exprObj = new QmlExpression(context, expr, object); bool undefined = false; QVariant value = exprObj->value(&undefined); if (undefined) result = QLatin1String(""); else result = valueContents(value); delete exprObj; } else { result = QLatin1String(""); } QByteArray reply; QDataStream rs(&reply, QIODevice::WriteOnly); rs << QByteArray("EVAL_EXPRESSION_R") << queryId << result; sendMessage(reply); } } void QmlEngineDebugServer::propertyChanged(int id, int objectId, const QMetaProperty &property, const QVariant &value) { QByteArray reply; QDataStream rs(&reply, QIODevice::WriteOnly); rs << QByteArray("UPDATE_WATCH") << id << objectId << QByteArray(property.name()) << valueContents(value); sendMessage(reply); } void QmlEngineDebugServer::addEngine(QmlEngine *engine) { Q_ASSERT(engine); Q_ASSERT(!m_engines.contains(engine)); m_engines.append(engine); } void QmlEngineDebugServer::remEngine(QmlEngine *engine) { Q_ASSERT(engine); Q_ASSERT(m_engines.contains(engine)); m_engines.removeAll(engine); } QT_END_NAMESPACE