diff options
Diffstat (limited to 'src/declarative/qml/qmlenginedebug.cpp')
| -rw-r--r-- | src/declarative/qml/qmlenginedebug.cpp | 457 |
1 files changed, 0 insertions, 457 deletions
diff --git a/src/declarative/qml/qmlenginedebug.cpp b/src/declarative/qml/qmlenginedebug.cpp deleted file mode 100644 index 654157c..0000000 --- a/src/declarative/qml/qmlenginedebug.cpp +++ /dev/null @@ -1,457 +0,0 @@ -/**************************************************************************** -** -** Copyright (C) 2010 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 <QtCore/qdebug.h> -#include <QtCore/qmetaobject.h> - -QT_BEGIN_NAMESPACE - -QList<QmlEngine *> 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::isQObject(prop.userType())) { - rv.type = QmlObjectProperty::Object; - } else if (QmlMetaType::isList(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)) { - int count = QmlMetaType::listCount(value); - QVariantList contents; - for (int i=0; i<count; i++) - contents << valueContents(QmlMetaType::listAt(value, i)); - return contents; - } else */ - if (QmlMetaType::isQObject(userType)) { - QObject *o = QmlMetaType::toQObject(value); - if (o) { - QString name = o->objectName(); - if (name.isEmpty()) - name = QLatin1String("<unnamed object>"); - return name; - } - } - - return QLatin1String("<unknown value>"); -} - -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<QmlContext*>(children[ii]) || QmlBoundSignal::cast(children[ii])) - --childrenCount; - } - - message << childrenCount << recur; - - QList<QmlObjectProperty> fakeProperties; - - for (int ii = 0; ii < children.count(); ++ii) { - QObject *child = children.at(ii); - if (qobject_cast<QmlContext*>(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<QmlContext *>::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<QmlContext *>::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<QmlEngine *>(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("<undefined>"); - else - result = valueContents(value); - delete exprObj; - } else { - result = QLatin1String("<unknown context>"); - } - - 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 |