1
1
/****************************************************************************
3
3
** Copyright (C) 2009 Nokia Corporation and/or its subsidiary(-ies).
4
** All rights reserved.
4
5
** Contact: Nokia Corporation (qt-info@nokia.com)
6
7
** This file is part of the QtSCriptTools module of the Qt Toolkit.
8
9
** $QT_BEGIN_LICENSE:LGPL$
10
** Licensees holding valid Qt Commercial licenses may use this file in
11
** accordance with the Qt Commercial License Agreement provided with the
12
** Software or, alternatively, in accordance with the terms contained in
13
** a written agreement between you and Nokia.
10
** No Commercial Usage
11
** This file contains pre-release code and may not be distributed.
12
** You may use this file in accordance with the terms and conditions
13
** contained in the Technology Preview License Agreement accompanying
15
16
** GNU Lesser General Public License Usage
16
17
** Alternatively, this file may be used under the terms of the GNU Lesser
20
21
** ensure the GNU Lesser General Public License version 2.1 requirements
21
22
** will be met: http://www.gnu.org/licenses/old-licenses/lgpl-2.1.html.
23
** In addition, as a special exception, Nokia gives you certain
24
** additional rights. These rights are described in the Nokia Qt LGPL
25
** Exception version 1.0, included in the file LGPL_EXCEPTION.txt in this
28
** GNU General Public License Usage
29
** Alternatively, this file may be used under the terms of the GNU
30
** General Public License version 3.0 as published by the Free Software
31
** Foundation and appearing in the file LICENSE.GPL included in the
32
** packaging of this file. Please review the following information to
33
** ensure the GNU General Public License version 3.0 requirements will be
34
** met: http://www.gnu.org/copyleft/gpl.html.
36
** If you are unsure which license is appropriate for your use, please
37
** contact the sales department at http://www.qtsoftware.com/contact.
24
** In addition, as a special exception, Nokia gives you certain additional
25
** rights. These rights are described in the Nokia Qt LGPL Exception
26
** version 1.1, included in the file LGPL_EXCEPTION.txt in this package.
28
** If you have questions regarding the use of this file, please contact
29
** Nokia at qt-info@nokia.com.
38
38
** $QT_END_LICENSE$
40
40
****************************************************************************/
99
99
QScriptDebuggerCommandExecutor::~QScriptDebuggerCommandExecutor()
103
static bool isPrefixOf(const QString &prefix, const QString &what)
105
return ((what.length() > prefix.length())
106
&& what.startsWith(prefix));
105
110
Applies the given \a command to the given \a backend.
107
112
QScriptDebuggerResponse QScriptDebuggerCommandExecutor::execute(
108
QScriptDebuggerBackend *backend,
109
const QScriptDebuggerCommand &command)
113
QScriptDebuggerBackend *backend,
114
const QScriptDebuggerCommand &command)
111
116
QScriptDebuggerResponse response;
112
117
switch (command.type()) {
300
305
response.setResult(qVariantFromValue(backend->contextsCheckpoint()));
308
case QScriptDebuggerCommand::GetPropertyExpressionValue: {
309
QScriptContext *ctx = backend->context(command.contextIndex());
310
int lineNumber = command.lineNumber();
311
QVariant attr = command.attribute(QScriptDebuggerCommand::UserAttribute);
312
QStringList path = attr.toStringList();
313
if (!ctx || path.isEmpty())
315
QScriptContextInfo ctxInfo(ctx);
316
if (ctx->callee().isValid()
317
&& ((lineNumber < ctxInfo.functionStartLineNumber())
318
|| (lineNumber > ctxInfo.functionEndLineNumber()))) {
321
QScriptValueList objects;
323
if (path.at(0) == QLatin1String("this")) {
324
objects.append(ctx->thisObject());
327
objects << ctx->scopeChain();
329
for (int i = 0; i < objects.size(); ++i) {
330
QScriptValue val = objects.at(i);
331
for (int j = pathIndex; val.isValid() && (j < path.size()); ++j) {
332
val = val.property(path.at(j));
335
bool hadException = (ctx->state() == QScriptContext::ExceptionState);
336
QString str = val.toString();
337
if (!hadException && backend->engine()->hasUncaughtException())
338
backend->engine()->clearExceptions();
339
response.setResult(str);
345
case QScriptDebuggerCommand::GetCompletions: {
346
QScriptContext *ctx = backend->context(command.contextIndex());
347
QVariant attr = command.attribute(QScriptDebuggerCommand::UserAttribute);
348
QStringList path = attr.toStringList();
349
if (!ctx || path.isEmpty())
351
QScriptValueList objects;
352
QString prefix = path.last();
353
QSet<QString> matches;
354
if (path.size() > 1) {
355
const QString &topLevelIdent = path.at(0);
357
if (topLevelIdent == QLatin1String("this")) {
358
obj = ctx->thisObject();
360
QScriptValueList scopeChain;
361
scopeChain = ctx->scopeChain();
362
for (int i = 0; i < scopeChain.size(); ++i) {
363
QScriptValue oo = scopeChain.at(i).property(topLevelIdent);
370
for (int i = 1; obj.isObject() && (i < path.size()-1); ++i)
371
obj = obj.property(path.at(i));
375
objects << ctx->scopeChain();
376
QStringList keywords;
377
keywords.append(QString::fromLatin1("this"));
378
keywords.append(QString::fromLatin1("true"));
379
keywords.append(QString::fromLatin1("false"));
380
keywords.append(QString::fromLatin1("null"));
381
for (int i = 0; i < keywords.size(); ++i) {
382
const QString &kwd = keywords.at(i);
383
if (isPrefixOf(prefix, kwd))
388
for (int i = 0; i < objects.size(); ++i) {
389
QScriptValue obj = objects.at(i);
390
while (obj.isObject()) {
391
QScriptValueIterator it(obj);
392
while (it.hasNext()) {
394
QString propertyName = it.name();
395
if (isPrefixOf(prefix, propertyName))
396
matches.insert(propertyName);
398
obj = obj.prototype();
401
QStringList matchesList = matches.toList();
402
qStableSort(matchesList);
403
response.setResult(matchesList);
303
406
case QScriptDebuggerCommand::NewScriptObjectSnapshot: {
304
407
int id = backend->newScriptObjectSnapshot();
305
408
response.setResult(id);