1 /****************************************************************************
2 **
3 ** Copyright (C) 2016 The Qt Company Ltd.
4 ** Contact: https://www.qt.io/licensing/
5 **
6 ** This file is part of the QtQml module of the Qt Toolkit.
7 **
8 ** $QT_BEGIN_LICENSE:LGPL$
9 ** Commercial License Usage
10 ** Licensees holding valid commercial Qt licenses may use this file in
11 ** accordance with the commercial license agreement provided with the
12 ** Software or, alternatively, in accordance with the terms contained in
13 ** a written agreement between you and The Qt Company. For licensing terms
14 ** and conditions see https://www.qt.io/terms-conditions. For further
15 ** information use the contact form at https://www.qt.io/contact-us.
16 **
17 ** GNU Lesser General Public License Usage
18 ** Alternatively, this file may be used under the terms of the GNU Lesser
19 ** General Public License version 3 as published by the Free Software
20 ** Foundation and appearing in the file LICENSE.LGPL3 included in the
21 ** packaging of this file. Please review the following information to
22 ** ensure the GNU Lesser General Public License version 3 requirements
23 ** will be met: https://www.gnu.org/licenses/lgpl-3.0.html.
24 **
25 ** GNU General Public License Usage
26 ** Alternatively, this file may be used under the terms of the GNU
27 ** General Public License version 2.0 or (at your option) the GNU General
28 ** Public license version 3 or any later version approved by the KDE Free
29 ** Qt Foundation. The licenses are as published by the Free Software
30 ** Foundation and appearing in the file LICENSE.GPL2 and LICENSE.GPL3
31 ** included in the packaging of this file. Please review the following
32 ** information to ensure the GNU General Public License requirements will
33 ** be met: https://www.gnu.org/licenses/gpl-2.0.html and
34 ** https://www.gnu.org/licenses/gpl-3.0.html.
35 **
36 ** $QT_END_LICENSE$
37 **
38 ****************************************************************************/
39 
40 #include "qv4booleanobject_p.h"
41 #include "qv4string_p.h"
42 
43 using namespace QV4;
44 
45 DEFINE_OBJECT_VTABLE(BooleanCtor);
46 DEFINE_OBJECT_VTABLE(BooleanObject);
47 
init(QV4::ExecutionContext * scope)48 void Heap::BooleanCtor::init(QV4::ExecutionContext *scope)
49 {
50     Heap::FunctionObject::init(scope, QStringLiteral("Boolean"));
51 }
52 
virtualCallAsConstructor(const FunctionObject * that,const Value * argv,int argc,const Value * newTarget)53 ReturnedValue BooleanCtor::virtualCallAsConstructor(const FunctionObject *that, const Value *argv, int argc, const Value *newTarget)
54 {
55     auto v4 = that->engine();
56     bool n = argc ? argv[0].toBoolean() : false;
57 
58     ReturnedValue o = Encode(v4->newBooleanObject(n));
59     if (!newTarget)
60         return o;
61     Scope scope(v4);
62     ScopedObject obj(scope, o);
63     obj->setProtoFromNewTarget(newTarget);
64     return obj->asReturnedValue();
65 }
66 
virtualCall(const FunctionObject *,const Value *,const Value * argv,int argc)67 ReturnedValue BooleanCtor::virtualCall(const FunctionObject *, const Value *, const Value *argv, int argc)
68 {
69     bool value = argc ? argv[0].toBoolean() : 0;
70     return Encode(value);
71 }
72 
init(ExecutionEngine * engine,Object * ctor)73 void BooleanPrototype::init(ExecutionEngine *engine, Object *ctor)
74 {
75     Scope scope(engine);
76     ScopedObject o(scope);
77     ctor->defineReadonlyConfigurableProperty(engine->id_length(), Value::fromInt32(1));
78     ctor->defineReadonlyProperty(engine->id_prototype(), (o = this));
79     defineDefaultProperty(QStringLiteral("constructor"), (o = ctor));
80     defineDefaultProperty(engine->id_toString(), method_toString);
81     defineDefaultProperty(engine->id_valueOf(), method_valueOf);
82 }
83 
value(const Value * thisObject,bool * exception)84 static bool value(const Value *thisObject, bool *exception)
85 {
86     *exception = false;
87     if (thisObject->isBoolean()) {
88         return thisObject->booleanValue();
89     } else {
90         const BooleanObject *that = thisObject->as<BooleanObject>();
91         if (that)
92             return that->value();
93     }
94     *exception = true;
95     return false;
96 }
97 
method_toString(const FunctionObject * b,const Value * thisObject,const Value *,int)98 ReturnedValue BooleanPrototype::method_toString(const FunctionObject *b, const Value *thisObject, const Value *, int)
99 {
100     bool exception;
101     bool result = ::value(thisObject, &exception);
102     ExecutionEngine *v4 = b->engine();
103     if (exception)
104         return v4->throwTypeError();
105 
106     return (result ? v4->id_true() : v4->id_false())->asReturnedValue();
107 }
108 
method_valueOf(const FunctionObject * b,const Value * thisObject,const Value *,int)109 ReturnedValue BooleanPrototype::method_valueOf(const FunctionObject *b, const Value *thisObject, const Value *, int)
110 {
111     bool exception;
112     bool result = ::value(thisObject, &exception);
113     if (exception) {
114         ExecutionEngine *v4 = b->engine();
115         return v4->throwTypeError();
116     }
117 
118     return Encode(result);
119 }
120