swissChili | 7babd92 | 2021-12-02 22:46:48 -0800 | [diff] [blame] | 1 | #pragma once |
| 2 | |
| 3 | #include <QList> |
| 4 | #include <QChar> |
| 5 | |
swissChili | c71acc6 | 2021-12-07 08:03:37 -0800 | [diff] [blame] | 6 | template <typename T> |
| 7 | class TokenBase |
| 8 | { |
swissChili | 7babd92 | 2021-12-02 22:46:48 -0800 | [diff] [blame] | 9 | public: |
swissChili | c71acc6 | 2021-12-07 08:03:37 -0800 | [diff] [blame] | 10 | TokenBase(); |
| 11 | TokenBase(const T &other); |
swissChili | 7babd92 | 2021-12-02 22:46:48 -0800 | [diff] [blame] | 12 | |
swissChili | 9dddbf7 | 2021-12-08 23:03:25 -0800 | [diff] [blame] | 13 | TokenBase(QString integer, int base); |
swissChili | c71acc6 | 2021-12-07 08:03:37 -0800 | [diff] [blame] | 14 | explicit TokenBase(QChar symbol); |
| 15 | explicit TokenBase(QString identifier); |
| 16 | explicit TokenBase(QList<T> parenthesized); |
| 17 | TokenBase(char varType, const QString name); |
swissChili | 7babd92 | 2021-12-02 22:46:48 -0800 | [diff] [blame] | 18 | |
swissChili | 1060c0e | 2021-12-09 09:46:42 -0800 | [diff] [blame] | 19 | static T fromInteger(int integer); |
| 20 | |
swissChili | c71acc6 | 2021-12-07 08:03:37 -0800 | [diff] [blame] | 21 | bool operator==(const T &other) const; |
| 22 | bool operator!=(const T &other) const; |
swissChili | 7babd92 | 2021-12-02 22:46:48 -0800 | [diff] [blame] | 23 | |
swissChili | d17b5a1 | 2021-12-05 20:46:42 -0800 | [diff] [blame] | 24 | bool isSym() const; |
| 25 | bool isIdent() const; |
| 26 | bool isParen() const; |
| 27 | bool isVar() const; |
swissChili | 9dddbf7 | 2021-12-08 23:03:25 -0800 | [diff] [blame] | 28 | bool isInteger() const; |
swissChili | 7babd92 | 2021-12-02 22:46:48 -0800 | [diff] [blame] | 29 | |
swissChili | c71acc6 | 2021-12-07 08:03:37 -0800 | [diff] [blame] | 30 | QList<T> parenContent(); |
swissChili | 7babd92 | 2021-12-02 22:46:48 -0800 | [diff] [blame] | 31 | |
swissChili | 3e98c06 | 2021-12-04 22:07:38 -0800 | [diff] [blame] | 32 | char varType() const; |
| 33 | const QString &name() const; |
swissChili | 682e7bc | 2021-12-07 09:04:54 -0800 | [diff] [blame] | 34 | QChar symbol() const; |
swissChili | 9dddbf7 | 2021-12-08 23:03:25 -0800 | [diff] [blame] | 35 | int integer() const; |
swissChili | 3e98c06 | 2021-12-04 22:07:38 -0800 | [diff] [blame] | 36 | |
swissChili | d17b5a1 | 2021-12-05 20:46:42 -0800 | [diff] [blame] | 37 | operator QString() const; |
| 38 | |
swissChili | c71acc6 | 2021-12-07 08:03:37 -0800 | [diff] [blame] | 39 | enum |
| 40 | { |
| 41 | SYM, |
| 42 | IDENT, |
| 43 | PAREN, |
| 44 | VAR, |
swissChili | 9dddbf7 | 2021-12-08 23:03:25 -0800 | [diff] [blame] | 45 | INTEGER, |
swissChili | c71acc6 | 2021-12-07 08:03:37 -0800 | [diff] [blame] | 46 | TOKEN_TYPE_LAST, |
swissChili | 7babd92 | 2021-12-02 22:46:48 -0800 | [diff] [blame] | 47 | }; |
| 48 | |
swissChili | d17b5a1 | 2021-12-05 20:46:42 -0800 | [diff] [blame] | 49 | static QString typeToString(int type); |
| 50 | |
| 51 | int type() const; |
| 52 | |
swissChili | c71acc6 | 2021-12-07 08:03:37 -0800 | [diff] [blame] | 53 | protected: |
swissChili | 7babd92 | 2021-12-02 22:46:48 -0800 | [diff] [blame] | 54 | int _type = 0; |
swissChili | 9dddbf7 | 2021-12-08 23:03:25 -0800 | [diff] [blame] | 55 | int _intVal = 0; |
swissChili | 7babd92 | 2021-12-02 22:46:48 -0800 | [diff] [blame] | 56 | QString _stringVal = ""; |
swissChili | c71acc6 | 2021-12-07 08:03:37 -0800 | [diff] [blame] | 57 | QList<T> _listVal; |
swissChili | e386bc7 | 2022-02-24 21:31:31 -0800 | [diff] [blame] | 58 | QChar _charVal = QChar(0); |
swissChili | 7babd92 | 2021-12-02 22:46:48 -0800 | [diff] [blame] | 59 | }; |
swissChili | 3e98c06 | 2021-12-04 22:07:38 -0800 | [diff] [blame] | 60 | |
swissChili | c8894fa | 2022-04-16 19:21:56 -0700 | [diff] [blame] | 61 | template <typename T> |
| 62 | TokenBase<T>::TokenBase(const T &other) |
| 63 | { |
| 64 | _type = other._type; |
| 65 | _stringVal = other._stringVal; |
| 66 | _listVal = other._listVal; |
| 67 | _charVal = other._charVal; |
| 68 | } |
| 69 | |
| 70 | template <typename T> |
| 71 | TokenBase<T>::TokenBase(QChar symbol) |
| 72 | { |
| 73 | _type = SYM; |
| 74 | _charVal = symbol; |
| 75 | } |
| 76 | |
| 77 | template <typename T> |
| 78 | TokenBase<T>::TokenBase(QString identifier) |
| 79 | { |
| 80 | _type = IDENT; |
| 81 | _stringVal = identifier; |
| 82 | } |
| 83 | |
| 84 | template <typename T> |
| 85 | TokenBase<T>::TokenBase(QList<T> parenthesized) |
| 86 | { |
| 87 | _type = PAREN; |
| 88 | _listVal = std::move(parenthesized); |
| 89 | } |
| 90 | |
| 91 | template <typename T> |
| 92 | TokenBase<T>::TokenBase(QString integer, int base) |
| 93 | { |
| 94 | _type = INTEGER; |
| 95 | _intVal = integer.toInt(nullptr, base); |
| 96 | } |
| 97 | |
| 98 | template <typename T> |
| 99 | T TokenBase<T>::fromInteger(int integer) |
| 100 | { |
| 101 | T tok; |
| 102 | |
| 103 | tok._type = INTEGER; |
| 104 | tok._intVal = integer; |
| 105 | |
| 106 | return tok; |
| 107 | } |
| 108 | |
| 109 | template <typename T> |
| 110 | TokenBase<T>::TokenBase(char varType, const QString name) |
| 111 | { |
| 112 | _type = VAR; |
| 113 | _charVal = varType; |
| 114 | _stringVal = name; |
| 115 | } |
| 116 | |
| 117 | template <typename T> |
| 118 | bool TokenBase<T>::isSym() const |
| 119 | { |
| 120 | return _type == SYM; |
| 121 | } |
| 122 | |
| 123 | template <typename T> |
| 124 | bool TokenBase<T>::isIdent() const |
| 125 | { |
| 126 | return _type == IDENT; |
| 127 | } |
| 128 | |
| 129 | template <typename T> |
| 130 | bool TokenBase<T>::isParen() const |
| 131 | { |
| 132 | return _type == PAREN; |
| 133 | } |
| 134 | template <typename T> |
| 135 | bool TokenBase<T>::isVar() const |
| 136 | { |
| 137 | return _type == VAR; |
| 138 | } |
| 139 | |
| 140 | template <typename T> |
| 141 | bool TokenBase<T>::isInteger() const |
| 142 | { |
| 143 | return _type == INTEGER; |
| 144 | } |
| 145 | |
| 146 | template <typename T> |
| 147 | TokenBase<T>::TokenBase() : TokenBase("Null") |
| 148 | { |
| 149 | } |
| 150 | |
| 151 | template <typename T> |
| 152 | bool TokenBase<T>::operator==(const T &other) const |
| 153 | { |
| 154 | // Why is this needed? Beats me. |
| 155 | if (isInteger() && other.isInteger()) |
| 156 | return _intVal == other._intVal; |
| 157 | |
| 158 | return _type == other._type && |
| 159 | _stringVal == other._stringVal && |
| 160 | _charVal == other._charVal && |
| 161 | _listVal == other._listVal && |
| 162 | _intVal == other._intVal; |
| 163 | } |
| 164 | |
| 165 | template <typename T> |
| 166 | QList<T> TokenBase<T>::parenContent() |
| 167 | { |
| 168 | if (isParen()) |
| 169 | { |
| 170 | return _listVal; |
| 171 | } |
| 172 | else |
| 173 | { |
| 174 | return {}; |
| 175 | } |
| 176 | } |
| 177 | |
| 178 | template <typename T> |
| 179 | int TokenBase<T>::integer() const |
| 180 | { |
| 181 | return _intVal; |
| 182 | } |
| 183 | |
| 184 | template <typename T> |
| 185 | char TokenBase<T>::varType() const |
| 186 | { |
| 187 | return _charVal.toLatin1(); |
| 188 | } |
| 189 | |
| 190 | template <typename T> |
| 191 | const QString &TokenBase<T>::name() const |
| 192 | { |
| 193 | return _stringVal; |
| 194 | } |
| 195 | |
| 196 | template <typename T> |
| 197 | bool TokenBase<T>::operator!=(const T &other) const |
| 198 | { |
| 199 | return !(this->operator==(other)); |
| 200 | } |
| 201 | |
| 202 | template <typename T> |
| 203 | TokenBase<T>::operator QString() const |
| 204 | { |
| 205 | if (isIdent()) |
| 206 | return _stringVal; |
| 207 | if (isSym()) |
| 208 | return _charVal; |
| 209 | if (isVar()) |
| 210 | return QString(_charVal) + "." + _stringVal; |
| 211 | if (isInteger()) |
| 212 | return QString::number(_intVal, 10); |
| 213 | if (isParen()) |
| 214 | { |
| 215 | QStringList parts; |
| 216 | for (const T &tok : _listVal) |
| 217 | { |
| 218 | parts.append(static_cast<QString>(tok)); |
| 219 | } |
| 220 | |
| 221 | return "(" + parts.join(" ") + ")"; |
| 222 | } |
| 223 | |
| 224 | return "Null"; |
| 225 | } |
| 226 | |
| 227 | template <typename T> |
| 228 | int TokenBase<T>::type() const |
| 229 | { |
| 230 | return _type; |
| 231 | } |
| 232 | |
| 233 | template <typename T> |
| 234 | QString TokenBase<T>::typeToString(int type) |
| 235 | { |
| 236 | static const QString typeNames[] = {"SYMBOL", "IDENT", "PAREN", "VAR", "INTEGER"}; |
| 237 | return typeNames[type]; |
| 238 | } |
| 239 | |
| 240 | template <typename T> |
| 241 | QChar TokenBase<T>::symbol() const |
| 242 | { |
| 243 | return _charVal; |
| 244 | } |
| 245 | |
swissChili | c71acc6 | 2021-12-07 08:03:37 -0800 | [diff] [blame] | 246 | class Token : public TokenBase<Token> |
| 247 | { |
| 248 | public: |
swissChili | c8894fa | 2022-04-16 19:21:56 -0700 | [diff] [blame] | 249 | using TokenBase<Token>::TokenBase; |
swissChili | c71acc6 | 2021-12-07 08:03:37 -0800 | [diff] [blame] | 250 | }; |
| 251 | |
swissChili | 3e98c06 | 2021-12-04 22:07:38 -0800 | [diff] [blame] | 252 | using LTok = QList<Token>; |