| 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 "qqmljsengine_p.h" |
| 41 | #include "qqmljsglobal_p.h" |
| 42 | |
| 43 | #include <QtCore/private/qnumeric_p.h> |
| 44 | #include <QtCore/qhash.h> |
| 45 | #include <QtCore/qdebug.h> |
| 46 | |
| 47 | QT_BEGIN_NAMESPACE |
| 48 | |
| 49 | namespace QQmlJS { |
| 50 | |
| 51 | static inline int toDigit(char c) |
| 52 | { |
| 53 | if ((c >= '0') && (c <= '9')) |
| 54 | return c - '0'; |
| 55 | else if ((c >= 'a') && (c <= 'z')) |
| 56 | return 10 + c - 'a'; |
| 57 | else if ((c >= 'A') && (c <= 'Z')) |
| 58 | return 10 + c - 'A'; |
| 59 | return -1; |
| 60 | } |
| 61 | |
| 62 | double integerFromString(const char *buf, int size, int radix) |
| 63 | { |
| 64 | if (size == 0) |
| 65 | return qt_qnan(); |
| 66 | |
| 67 | double sign = 1.0; |
| 68 | int i = 0; |
| 69 | if (buf[0] == '+') { |
| 70 | ++i; |
| 71 | } else if (buf[0] == '-') { |
| 72 | sign = -1.0; |
| 73 | ++i; |
| 74 | } |
| 75 | |
| 76 | if (((size-i) >= 2) && (buf[i] == '0')) { |
| 77 | if (((buf[i+1] == 'x') || (buf[i+1] == 'X')) |
| 78 | && (radix < 34)) { |
| 79 | if ((radix != 0) && (radix != 16)) |
| 80 | return 0; |
| 81 | radix = 16; |
| 82 | i += 2; |
| 83 | } else { |
| 84 | if (radix == 0) { |
| 85 | radix = 8; |
| 86 | ++i; |
| 87 | } |
| 88 | } |
| 89 | } else if (radix == 0) { |
| 90 | radix = 10; |
| 91 | } |
| 92 | |
| 93 | int j = i; |
| 94 | for ( ; i < size; ++i) { |
| 95 | int d = toDigit(c: buf[i]); |
| 96 | if ((d == -1) || (d >= radix)) |
| 97 | break; |
| 98 | } |
| 99 | double result; |
| 100 | if (j == i) { |
| 101 | if (!qstrcmp(str1: buf, str2: "Infinity" )) |
| 102 | result = qInf(); |
| 103 | else |
| 104 | result = qt_qnan(); |
| 105 | } else { |
| 106 | result = 0; |
| 107 | double multiplier = 1; |
| 108 | for (--i ; i >= j; --i, multiplier *= radix) |
| 109 | result += toDigit(c: buf[i]) * multiplier; |
| 110 | } |
| 111 | result *= sign; |
| 112 | return result; |
| 113 | } |
| 114 | |
| 115 | Engine::Engine() |
| 116 | : _lexer(nullptr), _directives(nullptr) |
| 117 | { } |
| 118 | |
| 119 | Engine::~Engine() |
| 120 | { } |
| 121 | |
| 122 | void Engine::setCode(const QString &code) |
| 123 | { _code = code; } |
| 124 | |
| 125 | void Engine::(int pos, int len, int line, int col) |
| 126 | { if (len > 0) _comments.append(t: QQmlJS::SourceLocation(pos, len, line, col)); } |
| 127 | |
| 128 | QList<QQmlJS::SourceLocation> Engine::() const |
| 129 | { return _comments; } |
| 130 | |
| 131 | Lexer *Engine::lexer() const |
| 132 | { return _lexer; } |
| 133 | |
| 134 | void Engine::setLexer(Lexer *lexer) |
| 135 | { _lexer = lexer; } |
| 136 | |
| 137 | Directives *Engine::directives() const |
| 138 | { return _directives; } |
| 139 | |
| 140 | void Engine::setDirectives(Directives *directives) |
| 141 | { _directives = directives; } |
| 142 | |
| 143 | MemoryPool *Engine::pool() |
| 144 | { return &_pool; } |
| 145 | |
| 146 | QStringRef Engine::newStringRef(const QString &text) |
| 147 | { |
| 148 | const int pos = _extraCode.length(); |
| 149 | _extraCode += text; |
| 150 | return _extraCode.midRef(position: pos, n: text.length()); |
| 151 | } |
| 152 | |
| 153 | QStringRef Engine::newStringRef(const QChar *chars, int size) |
| 154 | { return newStringRef(text: QString(chars, size)); } |
| 155 | |
| 156 | } // end of namespace QQmlJS |
| 157 | |
| 158 | QT_END_NAMESPACE |
| 159 | |