1 | /****************************************************************************
|
---|
2 | **
|
---|
3 | ** Copyright (C) 2010 Nokia Corporation and/or its subsidiary(-ies).
|
---|
4 | ** All rights reserved.
|
---|
5 | ** Contact: Nokia Corporation ([email protected])
|
---|
6 | **
|
---|
7 | ** This file is part of the QtScript module of the Qt Toolkit.
|
---|
8 | **
|
---|
9 | ** $QT_BEGIN_LICENSE:LGPL-ONLY$
|
---|
10 | ** GNU Lesser General Public License Usage
|
---|
11 | ** This file may be used under the terms of the GNU Lesser
|
---|
12 | ** General Public License version 2.1 as published by the Free Software
|
---|
13 | ** Foundation and appearing in the file LICENSE.LGPL included in the
|
---|
14 | ** packaging of this file. Please review the following information to
|
---|
15 | ** ensure the GNU Lesser General Public License version 2.1 requirements
|
---|
16 | ** will be met: http://www.gnu.org/licenses/old-licenses/lgpl-2.1.html.
|
---|
17 | **
|
---|
18 | ** If you have questions regarding the use of this file, please contact
|
---|
19 | ** Nokia at [email protected].
|
---|
20 | ** $QT_END_LICENSE$
|
---|
21 | **
|
---|
22 | ****************************************************************************/
|
---|
23 |
|
---|
24 | #include "config.h"
|
---|
25 | #include "qscriptvariant_p.h"
|
---|
26 |
|
---|
27 | #include "../api/qscriptengine.h"
|
---|
28 | #include "../api/qscriptengine_p.h"
|
---|
29 |
|
---|
30 | #include "Error.h"
|
---|
31 | #include "PrototypeFunction.h"
|
---|
32 | #include "JSString.h"
|
---|
33 |
|
---|
34 | namespace JSC
|
---|
35 | {
|
---|
36 | QT_USE_NAMESPACE
|
---|
37 | ASSERT_CLASS_FITS_IN_CELL(QScript::QVariantPrototype);
|
---|
38 | }
|
---|
39 |
|
---|
40 | QT_BEGIN_NAMESPACE
|
---|
41 |
|
---|
42 | namespace QScript
|
---|
43 | {
|
---|
44 |
|
---|
45 | QVariantDelegate::QVariantDelegate(const QVariant &value)
|
---|
46 | : m_value(value)
|
---|
47 | {
|
---|
48 | }
|
---|
49 |
|
---|
50 | QVariantDelegate::~QVariantDelegate()
|
---|
51 | {
|
---|
52 | }
|
---|
53 |
|
---|
54 | QVariant &QVariantDelegate::value()
|
---|
55 | {
|
---|
56 | return m_value;
|
---|
57 | }
|
---|
58 |
|
---|
59 | void QVariantDelegate::setValue(const QVariant &value)
|
---|
60 | {
|
---|
61 | m_value = value;
|
---|
62 | }
|
---|
63 |
|
---|
64 | QScriptObjectDelegate::Type QVariantDelegate::type() const
|
---|
65 | {
|
---|
66 | return Variant;
|
---|
67 | }
|
---|
68 |
|
---|
69 | static JSC::JSValue JSC_HOST_CALL variantProtoFuncValueOf(JSC::ExecState *exec, JSC::JSObject*,
|
---|
70 | JSC::JSValue thisValue, const JSC::ArgList&)
|
---|
71 | {
|
---|
72 | QScriptEnginePrivate *engine = scriptEngineFromExec(exec);
|
---|
73 | thisValue = engine->toUsableValue(thisValue);
|
---|
74 | if (!thisValue.inherits(&QScriptObject::info))
|
---|
75 | return throwError(exec, JSC::TypeError);
|
---|
76 | QScriptObjectDelegate *delegate = static_cast<QScriptObject*>(JSC::asObject(thisValue))->delegate();
|
---|
77 | if (!delegate || (delegate->type() != QScriptObjectDelegate::Variant))
|
---|
78 | return throwError(exec, JSC::TypeError);
|
---|
79 | const QVariant &v = static_cast<QVariantDelegate*>(delegate)->value();
|
---|
80 | switch (v.type()) {
|
---|
81 | case QVariant::Invalid:
|
---|
82 | return JSC::jsUndefined();
|
---|
83 | case QVariant::String:
|
---|
84 | return JSC::jsString(exec, v.toString());
|
---|
85 |
|
---|
86 | case QVariant::Int:
|
---|
87 | return JSC::jsNumber(exec, v.toInt());
|
---|
88 |
|
---|
89 | case QVariant::Bool:
|
---|
90 | return JSC::jsBoolean(v.toBool());
|
---|
91 |
|
---|
92 | case QVariant::Double:
|
---|
93 | return JSC::jsNumber(exec, v.toDouble());
|
---|
94 |
|
---|
95 | // case QVariant::Char:
|
---|
96 | // return JSC::jsNumber(exec, v.toChar().unicode());
|
---|
97 |
|
---|
98 | case QVariant::UInt:
|
---|
99 | return JSC::jsNumber(exec, v.toUInt());
|
---|
100 |
|
---|
101 | default:
|
---|
102 | ;
|
---|
103 | }
|
---|
104 | return thisValue;
|
---|
105 | }
|
---|
106 |
|
---|
107 | static JSC::JSValue JSC_HOST_CALL variantProtoFuncToString(JSC::ExecState *exec, JSC::JSObject *callee,
|
---|
108 | JSC::JSValue thisValue, const JSC::ArgList &args)
|
---|
109 | {
|
---|
110 | QScriptEnginePrivate *engine = scriptEngineFromExec(exec);
|
---|
111 | thisValue = engine->toUsableValue(thisValue);
|
---|
112 | if (!thisValue.inherits(&QScriptObject::info))
|
---|
113 | return throwError(exec, JSC::TypeError, "This object is not a QVariant");
|
---|
114 | QScriptObjectDelegate *delegate = static_cast<QScriptObject*>(JSC::asObject(thisValue))->delegate();
|
---|
115 | if (!delegate || (delegate->type() != QScriptObjectDelegate::Variant))
|
---|
116 | return throwError(exec, JSC::TypeError, "This object is not a QVariant");
|
---|
117 | const QVariant &v = static_cast<QVariantDelegate*>(delegate)->value();
|
---|
118 | JSC::UString result;
|
---|
119 | JSC::JSValue value = variantProtoFuncValueOf(exec, callee, thisValue, args);
|
---|
120 | if (value.isObject()) {
|
---|
121 | result = v.toString();
|
---|
122 | if (result.isEmpty() && !v.canConvert(QVariant::String)) {
|
---|
123 | result = "QVariant(";
|
---|
124 | result += v.typeName();
|
---|
125 | result += ")";
|
---|
126 | }
|
---|
127 | } else {
|
---|
128 | result = value.toString(exec);
|
---|
129 | }
|
---|
130 | return JSC::jsString(exec, result);
|
---|
131 | }
|
---|
132 |
|
---|
133 | bool QVariantDelegate::compareToObject(QScriptObject *, JSC::ExecState *exec, JSC::JSObject *o2)
|
---|
134 | {
|
---|
135 | const QVariant &variant1 = value();
|
---|
136 | return variant1 == scriptEngineFromExec(exec)->scriptValueFromJSCValue(o2).toVariant();
|
---|
137 | }
|
---|
138 |
|
---|
139 | QVariantPrototype::QVariantPrototype(JSC::ExecState* exec, WTF::PassRefPtr<JSC::Structure> structure,
|
---|
140 | JSC::Structure* prototypeFunctionStructure)
|
---|
141 | : QScriptObject(structure)
|
---|
142 | {
|
---|
143 | setDelegate(new QVariantDelegate(QVariant()));
|
---|
144 |
|
---|
145 | putDirectFunction(exec, new (exec) JSC::PrototypeFunction(exec, prototypeFunctionStructure, 0, exec->propertyNames().toString, variantProtoFuncToString), JSC::DontEnum);
|
---|
146 | putDirectFunction(exec, new (exec) JSC::PrototypeFunction(exec, prototypeFunctionStructure, 0, exec->propertyNames().valueOf, variantProtoFuncValueOf), JSC::DontEnum);
|
---|
147 | }
|
---|
148 |
|
---|
149 |
|
---|
150 | } // namespace QScript
|
---|
151 |
|
---|
152 | QT_END_NAMESPACE
|
---|