| 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 |  |