1 /* Cycript - Remove Execution Server and Disassembler
2 * Copyright (C) 2009 Jay Freeman (saurik)
5 /* Modified BSD License {{{ */
7 * Redistribution and use in source and binary
8 * forms, with or without modification, are permitted
9 * provided that the following conditions are met:
11 * 1. Redistributions of source code must retain the
12 * above copyright notice, this list of conditions
13 * and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the
15 * above copyright notice, this list of conditions
16 * and the following disclaimer in the documentation
17 * and/or other materials provided with the
19 * 3. The name of the author may not be used to endorse
20 * or promote products derived from this software
21 * without specific prior written permission.
23 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS''
24 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING,
25 * BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
26 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE
28 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
29 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
30 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
31 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
32 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
33 * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
34 * TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
35 * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
36 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
47 #include "location.hh"
48 #include "Pooling.hpp"
50 template <typename Type_>
64 void SetNext(Type_ *next) {
70 virtual void Output(struct CYOutput &out) const = 0;
85 CYOutput(std::ostream &out) :
93 void Check(char value);
96 CYOutput &operator <<(char rhs);
97 CYOutput &operator <<(const char *rhs);
99 _finline CYOutput &operator <<(const CYThing *rhs) {
105 _finline CYOutput &operator <<(const CYThing &rhs) {
111 struct CYPropertyName {
112 virtual void PropertyName(CYOutput &out) const = 0;
116 virtual void ClassName(CYOutput &out, bool object) const = 0;
126 CYWord(const char *word) :
131 const char *Value() const {
135 virtual void Output(CYOutput &out) const;
137 virtual void ClassName(CYOutput &out, bool object) const;
138 virtual void PropertyName(CYOutput &out) const;
141 _finline std::ostream &operator <<(std::ostream &lhs, const CYWord &rhs) {
142 return lhs << rhs.Value();
145 struct CYIdentifier :
148 CYIdentifier(const char *word) :
159 CYLabel(CYIdentifier *name, CYLabel *next) :
160 CYNext<CYLabel>(next),
174 CYNoBrace = (1 << 0),
175 CYNoFunction = (1 << 1),
178 CYNoRightHand = (1 << 4),
179 CYNoDangle = (1 << 5),
180 CYNoBF = (CYNoBrace | CYNoFunction),
193 void AddLabel(CYIdentifier *identifier) {
194 labels_ = new CYLabel(identifier, labels_);
197 bool Single(CYOutput &out, CYFlags flags) const;
198 void Multiple(CYOutput &out, CYFlags flags = CYNoFlags) const;
201 virtual void Output(CYOutput &out, CYFlags flags) const = 0;
207 CYStatement *statements_;
209 CYBlock(CYStatement *statements) :
210 statements_(statements)
214 virtual void Output(CYOutput &out, CYFlags flags) const;
241 std::string filename_;
245 cy::location location_;
246 std::string message_;
249 typedef std::vector<Error> Errors;
251 CYStatement *program_;
256 void ScannerDestroy();
259 CYDriver(const std::string &filename);
262 void SetCondition(Condition condition);
264 void Warning(const cy::location &location, const char *message);
267 struct CYForInitialiser {
268 virtual void For(CYOutput &out) const = 0;
271 struct CYForInInitialiser {
272 virtual void ForIn(CYOutput &out, CYFlags flags) const = 0;
273 virtual const char *ForEachIn() const = 0;
274 virtual void ForEachIn(CYOutput &out) const = 0;
277 struct CYExpression :
278 CYNext<CYExpression>,
284 virtual unsigned Precedence() const = 0;
286 virtual bool RightHand() const {
290 virtual void For(CYOutput &out) const;
291 virtual void ForIn(CYOutput &out, CYFlags flags) const;
293 virtual const char *ForEachIn() const;
294 virtual void ForEachIn(CYOutput &out) const;
296 virtual void Output(CYOutput &out) const;
297 virtual void Output(CYOutput &out, CYFlags flags) const = 0;
298 void Output(CYOutput &out, unsigned precedence, CYFlags flags) const;
300 virtual void ClassName(CYOutput &out, bool object) const;
302 virtual const char *Word() const {
307 #define CYAlphabetic(value) \
308 virtual bool Alphabetic() const { \
312 #define CYPrecedence(value) \
313 virtual unsigned Precedence() const { \
317 #define CYRightHand(value) \
318 virtual bool RightHand() const { \
325 CYExpression *expressions_;
327 CYCompound(CYExpression *expressions) :
328 expressions_(expressions)
332 void AddPrev(CYExpression *expression) {
333 CYExpression *last(expression);
334 while (last->next_ != NULL)
336 last->SetNext(expressions_);
337 expressions_ = expression;
342 void Output(CYOutput &out, CYFlags flags) const;
345 struct CYComprehension :
346 CYNext<CYComprehension>,
349 void Output(CYOutput &out) const;
350 virtual const char *Name() const = 0;
352 virtual void Begin_(CYOutput &out) const = 0;
354 virtual void End_(CYOutput &out) const {
358 struct CYForInComprehension :
364 CYForInComprehension(CYIdentifier *name, CYExpression *set) :
370 virtual const char *Name() const {
371 return name_->Value();
374 virtual void Begin_(CYOutput &out) const;
377 struct CYForEachInComprehension :
383 CYForEachInComprehension(CYIdentifier *name, CYExpression *set) :
389 virtual const char *Name() const {
390 return name_->Value();
393 virtual void Begin_(CYOutput &out) const;
394 virtual void End_(CYOutput &out) const;
397 struct CYIfComprehension :
402 CYIfComprehension(CYExpression *test) :
407 virtual const char *Name() const {
411 virtual void Begin_(CYOutput &out) const;
414 struct CYArrayComprehension :
417 CYExpression *expression_;
418 CYComprehension *comprehensions_;
420 CYArrayComprehension(CYExpression *expression, CYComprehension *comprehensions) :
421 expression_(expression),
422 comprehensions_(comprehensions)
428 virtual void Output(CYOutput &out, CYFlags flags) const;
445 struct CYSelectorPart :
446 CYNext<CYSelectorPart>,
452 CYSelectorPart(CYWord *name, bool value, CYSelectorPart *next) :
453 CYNext<CYSelectorPart>(next),
459 virtual void Output(CYOutput &out) const;
465 CYSelectorPart *name_;
467 CYSelector(CYSelectorPart *name) :
474 virtual void Output(CYOutput &out, CYFlags flags) const;
481 CYRange(uint64_t lo, uint64_t hi) :
486 bool operator [](uint8_t value) const {
487 return !(value >> 7) && (value >> 6 ? hi_ : lo_) >> (value & 0x3f) & 0x1;
490 void operator()(uint8_t value) {
493 (value >> 6 ? hi_ : lo_) |= uint64_t(0x1) << (value & 0x3f);
497 extern CYRange DigitRange_;
498 extern CYRange WordStartRange_;
499 extern CYRange WordEndRange_;
508 CYString(const char *value, size_t size) :
514 CYString(const CYIdentifier *identifier) :
515 value_(identifier->Value()),
516 size_(strlen(value_))
520 const char *Value() const {
524 virtual const char *Word() const;
526 virtual void Output(CYOutput &out, CYFlags flags) const;
527 virtual void PropertyName(CYOutput &out) const;
536 CYNumber(double value) :
541 double Value() const {
545 virtual void Output(CYOutput &out, CYFlags flags) const;
546 virtual void PropertyName(CYOutput &out) const;
554 CYRegEx(const char *value) :
559 const char *Value() const {
563 virtual void Output(CYOutput &out, CYFlags flags) const;
575 virtual void Output(CYOutput &out, CYFlags flags) const;
587 virtual void Output(CYOutput &out, CYFlags flags) const;
593 virtual bool Value() const = 0;
594 virtual void Output(CYOutput &out, CYFlags flags) const;
606 virtual bool Value() const {
620 virtual bool Value() const {
630 CYVariable(CYIdentifier *name) :
638 virtual void Output(CYOutput &out, CYFlags flags) const;
646 CYPrefix(CYExpression *rhs) :
651 virtual bool Alphabetic() const = 0;
652 virtual const char *Operator() const = 0;
654 virtual void Output(CYOutput &out, CYFlags flags) const;
663 CYInfix(CYExpression *lhs, CYExpression *rhs) :
669 void SetLeft(CYExpression *lhs) {
673 virtual bool Alphabetic() const = 0;
674 virtual const char *Operator() const = 0;
676 virtual void Output(CYOutput &out, CYFlags flags) const;
684 CYPostfix(CYExpression *lhs) :
689 virtual const char *Operator() const = 0;
691 virtual void Output(CYOutput &out, CYFlags flags) const;
694 struct CYAssignment :
700 CYAssignment(CYExpression *lhs, CYExpression *rhs) :
706 void SetLeft(CYExpression *lhs) {
710 virtual const char *Operator() const = 0;
712 virtual void Output(CYOutput &out, CYFlags flags) const;
720 CYExpression *value_;
722 CYArgument(CYWord *name, CYExpression *value, CYArgument *next = NULL) :
723 CYNext<CYArgument>(next),
729 void Output(CYOutput &out) const;
748 CYClause(CYExpression *_case, CYStatement *code) :
754 virtual void Output(CYOutput &out) const;
761 CYExpression *value_;
763 CYElement(CYExpression *value, CYElement *next) :
764 CYNext<CYElement>(next),
769 void Output(CYOutput &out) const;
775 CYElement *elements_;
777 CYArray(CYElement *elements) :
782 virtual void Output(CYOutput &out, CYFlags flags) const;
785 struct CYDeclaration :
788 CYIdentifier *identifier_;
789 CYExpression *initialiser_;
791 CYDeclaration(CYIdentifier *identifier, CYExpression *initialiser) :
792 identifier_(identifier),
793 initialiser_(initialiser)
797 virtual void ForIn(CYOutput &out, CYFlags flags) const;
799 virtual const char *ForEachIn() const;
800 virtual void ForEachIn(CYOutput &out) const;
802 virtual void Output(CYOutput &out, CYFlags flags) const;
805 struct CYDeclarations :
806 CYNext<CYDeclarations>,
810 CYDeclaration *declaration_;
812 CYDeclarations(CYDeclaration *declaration, CYDeclarations *next) :
813 CYNext<CYDeclarations>(next),
814 declaration_(declaration)
818 virtual void For(CYOutput &out) const;
820 virtual void Output(CYOutput &out) const;
821 virtual void Output(CYOutput &out, CYFlags flags) const;
827 CYDeclarations *declarations_;
829 CYVar(CYDeclarations *declarations) :
830 declarations_(declarations)
834 virtual void Output(CYOutput &out, CYFlags flags) const;
840 CYDeclarations *declarations_;
841 CYStatement *statements_;
843 CYLet(CYDeclarations *declarations, CYStatement *statements) :
844 declarations_(declarations),
845 statements_(statements)
849 virtual void Output(CYOutput &out, CYFlags flags) const;
855 virtual void Output(CYOutput &out) const;
858 struct CYMessageParameter :
859 CYNext<CYMessageParameter>
865 CYMessageParameter(CYWord *tag, CYExpression *type, CYIdentifier *name) :
878 CYMessageParameter *parameter_;
881 CYMessage(bool instance, CYExpression *type, CYMessageParameter *parameter, CYStatement *body) :
884 parameter_(parameter),
889 virtual void Output(CYOutput &out, bool replace) const;
894 CYExpression *super_;
896 CYMessage *messages_;
898 CYClass(CYClassName *name, CYExpression *super, CYField *fields, CYMessage *messages) :
906 virtual void Output(CYOutput &out, CYFlags flags) const;
909 struct CYClassExpression :
913 CYClassExpression(CYClassName *name, CYExpression *super, CYField *fields, CYMessage *messages) :
914 CYClass(name, super, fields, messages)
920 virtual void Output(CYOutput &out, CYFlags flags) const;
923 struct CYClassStatement :
927 CYClassStatement(CYClassName *name, CYExpression *super, CYField *fields, CYMessage *messages) :
928 CYClass(name, super, fields, messages)
932 virtual void Output(CYOutput &out, CYFlags flags) const;
939 CYMessage *messages_;
941 CYCategory(CYClassName *name, CYMessage *messages) :
947 virtual void Output(CYOutput &out, CYFlags flags) const;
950 struct CYFunctionParameter :
951 CYNext<CYFunctionParameter>,
956 CYFunctionParameter(CYIdentifier *name, CYFunctionParameter *next) :
957 CYNext<CYFunctionParameter>(next),
962 virtual void Output(CYOutput &out) const;
968 CYForInitialiser *initialiser_;
970 CYExpression *increment_;
973 CYFor(CYForInitialiser *initialiser, CYExpression *test, CYExpression *increment, CYStatement *code) :
974 initialiser_(initialiser),
976 increment_(increment),
981 virtual void Output(CYOutput &out, CYFlags flags) const;
987 CYForInInitialiser *initialiser_;
991 CYForIn(CYForInInitialiser *initialiser, CYExpression *set, CYStatement *code) :
992 initialiser_(initialiser),
998 virtual void Output(CYOutput &out, CYFlags flags) const;
1001 struct CYForEachIn :
1004 CYForInInitialiser *initialiser_;
1008 CYForEachIn(CYForInInitialiser *initialiser, CYExpression *set, CYStatement *code) :
1009 initialiser_(initialiser),
1015 virtual void Output(CYOutput &out, CYFlags flags) const;
1022 CYPropertyName *name_;
1023 CYExpression *value_;
1025 CYProperty(CYPropertyName *name, CYExpression *value, CYProperty *next) :
1026 CYNext<CYProperty>(next),
1032 virtual void Output(CYOutput &out) const;
1038 CYProperty *property_;
1040 CYObject(CYProperty *property) :
1045 void Output(CYOutput &out, CYFlags flags) const;
1051 CYIdentifier *name_;
1054 CYCatch(CYIdentifier *name, CYStatement *code) :
1060 virtual void Output(CYOutput &out) const;
1066 CYExpression *self_;
1067 CYArgument *arguments_;
1069 CYSend(CYExpression *self, CYArgument *arguments) :
1071 arguments_(arguments)
1077 virtual void Output(CYOutput &out, CYFlags flags) const;
1083 CYExpression *object_;
1084 CYExpression *property_;
1086 CYMember(CYExpression *object, CYExpression *property) :
1092 void SetLeft(CYExpression *object) {
1097 struct CYDirectMember :
1100 CYDirectMember(CYExpression *object, CYExpression *property) :
1101 CYMember(object, property)
1108 virtual void Output(CYOutput &out, CYFlags flags) const;
1111 struct CYIndirectMember :
1114 CYIndirectMember(CYExpression *object, CYExpression *property) :
1115 CYMember(object, property)
1122 virtual void Output(CYOutput &out, CYFlags flags) const;
1128 CYExpression *constructor_;
1129 CYArgument *arguments_;
1131 CYNew(CYExpression *constructor, CYArgument *arguments) :
1132 constructor_(constructor),
1133 arguments_(arguments)
1137 virtual unsigned Precedence() const {
1138 return arguments_ == NULL ? 2 : 1;
1143 virtual void Output(CYOutput &out, CYFlags flags) const;
1149 CYExpression *function_;
1150 CYArgument *arguments_;
1152 CYCall(CYExpression *function, CYArgument *arguments) :
1153 function_(function),
1154 arguments_(arguments)
1161 virtual void Output(CYOutput &out, CYFlags flags) const;
1167 CYExpression *test_;
1169 CYStatement *false_;
1171 CYIf(CYExpression *test, CYStatement *_true, CYStatement *_false) :
1178 virtual void Output(CYOutput &out, CYFlags flags) const;
1184 CYExpression *test_;
1187 CYDoWhile(CYExpression *test, CYStatement *code) :
1193 virtual void Output(CYOutput &out, CYFlags flags) const;
1199 CYExpression *test_;
1202 CYWhile(CYExpression *test, CYStatement *code) :
1208 virtual void Output(CYOutput &out, CYFlags flags) const;
1212 CYIdentifier *name_;
1213 CYFunctionParameter *parameters_;
1216 CYFunction(CYIdentifier *name, CYFunctionParameter *parameters, CYStatement *body) :
1218 parameters_(parameters),
1223 virtual void Output(CYOutput &out, CYFlags flags) const;
1226 struct CYFunctionExpression :
1230 CYFunctionExpression(CYIdentifier *name, CYFunctionParameter *parameters, CYStatement *body) :
1231 CYFunction(name, parameters, body)
1238 virtual void Output(CYOutput &out, CYFlags flags) const;
1241 struct CYFunctionStatement :
1245 CYFunctionStatement(CYIdentifier *name, CYFunctionParameter *parameters, CYStatement *body) :
1246 CYFunction(name, parameters, body)
1250 virtual void Output(CYOutput &out, CYFlags flags) const;
1256 CYExpression *expression_;
1258 CYExpress(CYExpression *expression) :
1259 expression_(expression)
1263 virtual void Output(CYOutput &out, CYFlags flags) const;
1269 CYIdentifier *label_;
1271 CYContinue(CYIdentifier *label) :
1276 virtual void Output(CYOutput &out, CYFlags flags) const;
1282 CYIdentifier *label_;
1284 CYBreak(CYIdentifier *label) :
1289 virtual void Output(CYOutput &out, CYFlags flags) const;
1295 CYExpression *value_;
1297 CYReturn(CYExpression *value) :
1302 virtual void Output(CYOutput &out, CYFlags flags) const;
1308 virtual void Output(CYOutput &out, CYFlags flags) const;
1316 CYFinally(CYStatement *code) :
1321 virtual void Output(CYOutput &out) const;
1329 CYFinally *finally_;
1331 CYTry(CYStatement *code, CYCatch *_catch, CYFinally *finally) :
1338 virtual void Output(CYOutput &out, CYFlags flags) const;
1344 CYExpression *value_;
1346 CYThrow(CYExpression *value) :
1351 virtual void Output(CYOutput &out, CYFlags flags) const;
1357 CYExpression *scope_;
1360 CYWith(CYExpression *scope, CYStatement *code) :
1366 virtual void Output(CYOutput &out, CYFlags flags) const;
1372 CYExpression *value_;
1375 CYSwitch(CYExpression *value, CYClause *clauses) :
1381 virtual void Output(CYOutput &out, CYFlags flags) const;
1384 struct CYCondition :
1387 CYExpression *test_;
1388 CYExpression *true_;
1389 CYExpression *false_;
1391 CYCondition(CYExpression *test, CYExpression *_true, CYExpression *_false) :
1400 virtual void Output(CYOutput &out, CYFlags flags) const;
1403 struct CYAddressOf :
1406 CYAddressOf(CYExpression *rhs) :
1411 virtual const char *Operator() const {
1418 virtual void Output(CYOutput &out, CYFlags flags) const;
1424 CYIndirect(CYExpression *rhs) :
1429 virtual const char *Operator() const {
1436 virtual void Output(CYOutput &out, CYFlags flags) const;
1439 #define CYPostfix_(op, name) \
1440 struct CY ## name : \
1443 CY ## name(CYExpression *lhs) : \
1450 virtual const char *Operator() const { \
1455 #define CYPrefix_(alphabetic, op, name) \
1456 struct CY ## name : \
1459 CY ## name(CYExpression *rhs) : \
1464 CYAlphabetic(alphabetic) \
1467 virtual const char *Operator() const { \
1472 #define CYInfix_(alphabetic, precedence, op, name) \
1473 struct CY ## name : \
1476 CY ## name(CYExpression *lhs, CYExpression *rhs) : \
1481 CYAlphabetic(alphabetic) \
1482 CYPrecedence(precedence) \
1484 virtual const char *Operator() const { \
1489 #define CYAssignment_(op, name) \
1490 struct CY ## name ## Assign : \
1493 CY ## name ## Assign(CYExpression *lhs, CYExpression *rhs) : \
1494 CYAssignment(lhs, rhs) \
1500 virtual const char *Operator() const { \
1505 CYPostfix_("++", PostIncrement)
1506 CYPostfix_("--", PostDecrement)
1508 CYPrefix_(true, "delete", Delete)
1509 CYPrefix_(true, "void", Void)
1510 CYPrefix_(true, "typeof", TypeOf)
1511 CYPrefix_(false, "++", PreIncrement)
1512 CYPrefix_(false, "--", PreDecrement)
1513 CYPrefix_(false, "-", Negate)
1514 CYPrefix_(false, "~", BitwiseNot)
1515 CYPrefix_(false, "!", LogicalNot)
1517 CYInfix_(false, 5, "*", Multiply)
1518 CYInfix_(false, 5, "/", Divide)
1519 CYInfix_(false, 5, "%", Modulus)
1520 CYInfix_(false, 6, "+", Add)
1521 CYInfix_(false, 6, "-", Subtract)
1522 CYInfix_(false, 7, "<<", ShiftLeft)
1523 CYInfix_(false, 7, ">>", ShiftRightSigned)
1524 CYInfix_(false, 7, ">>>", ShiftRightUnsigned)
1525 CYInfix_(false, 8, "<", Less)
1526 CYInfix_(false, 8, ">", Greater)
1527 CYInfix_(false, 8, "<=", LessOrEqual)
1528 CYInfix_(false, 8, ">=", GreaterOrEqual)
1529 CYInfix_(true, 8, "instanceof", InstanceOf)
1530 CYInfix_(true, 8, "in", In)
1531 CYInfix_(false, 9, "==", Equal)
1532 CYInfix_(false, 9, "!=", NotEqual)
1533 CYInfix_(false, 9, "===", Identical)
1534 CYInfix_(false, 9, "!==", NotIdentical)
1535 CYInfix_(false, 10, "&", BitwiseAnd)
1536 CYInfix_(false, 11, "^", BitwiseXOr)
1537 CYInfix_(false, 12, "|", BitwiseOr)
1538 CYInfix_(false, 13, "&&", LogicalAnd)
1539 CYInfix_(false, 14, "||", LogicalOr)
1541 CYAssignment_("=", )
1542 CYAssignment_("*=", Multiply)
1543 CYAssignment_("/=", Divide)
1544 CYAssignment_("%=", Modulus)
1545 CYAssignment_("+=", Add)
1546 CYAssignment_("-=", Subtract)
1547 CYAssignment_("<<=", ShiftLeft)
1548 CYAssignment_(">>=", ShiftRightSigned)
1549 CYAssignment_(">>>=", ShiftRightUnsigned)
1550 CYAssignment_("&=", BitwiseAnd)
1551 CYAssignment_("^=", BitwiseXOr)
1552 CYAssignment_("|=", BitwiseOr)
1554 #endif/*CYPARSER_HPP*/