blob: d29b060b9e5a518aa278414d8e211d6c30efe580 [file] [log] [blame]
/****************************************************************************
**
** Copyright (C) 2016 The Qt Company Ltd.
** Contact: https://www.qt.io/licensing/
**
** This file is part of the QtQml module of the Qt Toolkit.
**
** $QT_BEGIN_LICENSE:LGPL$
** Commercial License Usage
** Licensees holding valid commercial Qt licenses may use this file in
** accordance with the commercial license agreement provided with the
** Software or, alternatively, in accordance with the terms contained in
** a written agreement between you and The Qt Company. For licensing terms
** and conditions see https://www.qt.io/terms-conditions. For further
** information use the contact form at https://www.qt.io/contact-us.
**
** GNU Lesser General Public License Usage
** Alternatively, this file may be used under the terms of the GNU Lesser
** General Public License version 3 as published by the Free Software
** Foundation and appearing in the file LICENSE.LGPL3 included in the
** packaging of this file. Please review the following information to
** ensure the GNU Lesser General Public License version 3 requirements
** will be met: https://www.gnu.org/licenses/lgpl-3.0.html.
**
** GNU General Public License Usage
** Alternatively, this file may be used under the terms of the GNU
** General Public License version 2.0 or (at your option) the GNU General
** Public license version 3 or any later version approved by the KDE Free
** Qt Foundation. The licenses are as published by the Free Software
** Foundation and appearing in the file LICENSE.GPL2 and LICENSE.GPL3
** included in the packaging of this file. Please review the following
** information to ensure the GNU General Public License requirements will
** be met: https://www.gnu.org/licenses/gpl-2.0.html and
** https://www.gnu.org/licenses/gpl-3.0.html.
**
** $QT_END_LICENSE$
**
****************************************************************************/
#include <qv4runtime_p.h>
#include <qv4propertykey_p.h>
#include <qv4string_p.h>
#include <qv4symbol_p.h>
#include <qv4object_p.h>
#include <qv4objectproto_p.h>
#include <private/qv4mm_p.h>
#include <wtf/MathExtras.h>
using namespace QV4;
int Value::toUInt16() const
{
if (integerCompatible())
return (ushort)(uint)integerValue();
double number = toNumber();
double D16 = 65536.0;
if ((number >= 0 && number < D16))
return static_cast<ushort>(number);
if (!std::isfinite(number))
return +0;
double d = ::floor(::fabs(number));
if (std::signbit(number))
d = -d;
number = ::fmod(d , D16);
if (number < 0)
number += D16;
return (unsigned short)number;
}
bool Value::toBooleanImpl(Value val)
{
if (val.isManagedOrUndefined()) {
Heap::Base *b = val.m();
if (!b)
return false;
if (b->internalClass->vtable->isString)
return static_cast<Heap::String *>(b)->length() > 0;
return true;
}
// double
double d = val.doubleValue();
return d && !std::isnan(d);
}
double Value::toNumberImpl(Value val)
{
switch (val.type()) {
case QV4::Value::Undefined_Type:
return std::numeric_limits<double>::quiet_NaN();
case QV4::Value::Managed_Type:
if (String *s = val.stringValue())
return RuntimeHelpers::stringToNumber(s->toQString());
if (val.isSymbol()) {
Managed &m = static_cast<Managed &>(val);
m.engine()->throwTypeError();
return 0;
}
{
Q_ASSERT(val.isObject());
Scope scope(val.objectValue()->engine());
ScopedValue protectThis(scope, val);
ScopedValue prim(scope, RuntimeHelpers::toPrimitive(val, NUMBER_HINT));
if (scope.engine->hasException)
return 0;
return prim->toNumber();
}
case QV4::Value::Null_Type:
case QV4::Value::Boolean_Type:
case QV4::Value::Integer_Type:
return val.int_32();
default: // double
Q_UNREACHABLE();
}
}
QString Value::toQStringNoThrow() const
{
switch (type()) {
case Value::Empty_Type:
Q_ASSERT(!"empty Value encountered");
Q_UNREACHABLE();
case Value::Undefined_Type:
return QStringLiteral("undefined");
case Value::Null_Type:
return QStringLiteral("null");
case Value::Boolean_Type:
if (booleanValue())
return QStringLiteral("true");
else
return QStringLiteral("false");
case Value::Managed_Type:
if (String *s = stringValue())
return s->toQString();
if (Symbol *s = symbolValue())
return s->descriptiveString();
{
Q_ASSERT(isObject());
Scope scope(objectValue()->engine());
ScopedValue ex(scope);
bool caughtException = false;
ScopedValue prim(scope, RuntimeHelpers::toPrimitive(*this, STRING_HINT));
if (scope.hasException()) {
ex = scope.engine->catchException();
caughtException = true;
} else if (prim->isPrimitive()) {
return prim->toQStringNoThrow();
}
// Can't nest try/catch due to CXX ABI limitations for foreign exception nesting.
if (caughtException) {
ScopedValue prim(scope, RuntimeHelpers::toPrimitive(ex, STRING_HINT));
if (scope.hasException()) {
ex = scope.engine->catchException();
} else if (prim->isPrimitive()) {
return prim->toQStringNoThrow();
}
}
return QString();
}
case Value::Integer_Type: {
QString str;
RuntimeHelpers::numberToString(&str, (double)int_32(), 10);
return str;
}
default: { // double
QString str;
RuntimeHelpers::numberToString(&str, doubleValue(), 10);
return str;
}
} // switch
}
QString Value::toQString() const
{
switch (type()) {
case Value::Empty_Type:
Q_ASSERT(!"empty Value encountered");
Q_UNREACHABLE();
case Value::Undefined_Type:
return QStringLiteral("undefined");
case Value::Null_Type:
return QStringLiteral("null");
case Value::Boolean_Type:
if (booleanValue())
return QStringLiteral("true");
else
return QStringLiteral("false");
case Value::Managed_Type:
if (String *s = stringValue()) {
return s->toQString();
} else if (isSymbol()) {
static_cast<const Managed *>(this)->engine()->throwTypeError();
return QString();
} else {
Q_ASSERT(isObject());
Scope scope(objectValue()->engine());
ScopedValue prim(scope, RuntimeHelpers::toPrimitive(*this, STRING_HINT));
return prim->toQString();
}
case Value::Integer_Type: {
QString str;
RuntimeHelpers::numberToString(&str, (double)int_32(), 10);
return str;
}
default: { // double
QString str;
RuntimeHelpers::numberToString(&str, doubleValue(), 10);
return str;
}
} // switch
}
QV4::PropertyKey Value::toPropertyKey(ExecutionEngine *e) const
{
if (isInteger() && int_32() >= 0)
return PropertyKey::fromArrayIndex(static_cast<uint>(int_32()));
if (isStringOrSymbol()) {
Scope scope(e);
ScopedStringOrSymbol s(scope, this);
return s->toPropertyKey();
}
Scope scope(e);
ScopedValue v(scope, RuntimeHelpers::toPrimitive(*this, STRING_HINT));
if (!v->isStringOrSymbol())
v = v->toString(e);
if (e->hasException)
return PropertyKey::invalid();
ScopedStringOrSymbol s(scope, v);
return s->toPropertyKey();
}
bool Value::sameValue(Value other) const {
if (_val == other._val)
return true;
String *s = stringValue();
String *os = other.stringValue();
if (s && os)
return s->isEqualTo(os);
if (isInteger() && other.isDouble())
return int_32() ? (double(int_32()) == other.doubleValue())
: (other.doubleValue() == 0 && !std::signbit(other.doubleValue()));
if (isDouble() && other.isInteger())
return other.int_32() ? (doubleValue() == double(other.int_32()))
: (doubleValue() == 0 && !std::signbit(doubleValue()));
return false;
}
bool Value::sameValueZero(Value other) const {
if (_val == other._val)
return true;
String *s = stringValue();
String *os = other.stringValue();
if (s && os)
return s->isEqualTo(os);
if (isInteger() && other.isDouble())
return double(int_32()) == other.doubleValue();
if (isDouble() && other.isInteger())
return other.int_32() == doubleValue();
if (isDouble() && other.isDouble()) {
if (doubleValue() == 0 && other.doubleValue() == 0) {
return true;
}
}
return false;
}
Heap::String *Value::toString(ExecutionEngine *e, Value val)
{
return RuntimeHelpers::convertToString(e, val);
}
Heap::Object *Value::toObject(ExecutionEngine *e, Value val)
{
return RuntimeHelpers::convertToObject(e, val);
}
uint Value::asArrayLength(bool *ok) const
{
*ok = true;
if (isInteger()) {
if (int_32() >= 0) {
return (uint)int_32();
} else {
*ok = false;
return UINT_MAX;
}
}
if (isNumber()) {
double d = doubleValue();
uint idx = (uint)d;
if (idx != d) {
*ok = false;
return UINT_MAX;
}
return idx;
}
if (String *s = stringValue())
return s->toUInt(ok);
uint idx = toUInt32();
double d = toNumber();
if (d != idx) {
*ok = false;
return UINT_MAX;
}
return idx;
}