X-Git-Url: https://git.saurik.com/cycript.git/blobdiff_plain/e53322782610fa076081d974ac22712107a2fe0e..9777bd50251d7e72c44bfbee7fbad2d8df148e47:/Parser.hpp?ds=sidebyside diff --git a/Parser.hpp b/Parser.hpp index 65806af..aad1d47 100644 --- a/Parser.hpp +++ b/Parser.hpp @@ -1,2 +1,1844 @@ -class CYParser { +/* Cycript - Optimizing JavaScript Compiler/Runtime + * Copyright (C) 2009-2010 Jay Freeman (saurik) +*/ + +/* GNU Lesser General Public License, Version 3 {{{ */ +/* + * Cycript is free software: you can redistribute it and/or modify it under + * the terms of the GNU Lesser General Public License as published by the + * Free Software Foundation, either version 3 of the License, or (at your + * option) any later version. + * + * Cycript is distributed in the hope that it will be useful, but WITHOUT + * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or + * FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public + * License for more details. + * + * You should have received a copy of the GNU Lesser General Public License + * along with Cycript. If not, see . +**/ +/* }}} */ + +#ifndef CYCRIPT_PARSER_HPP +#define CYCRIPT_PARSER_HPP + +#include + +#include +#include +#include +#include + +#include +#include + +#include "location.hh" + +#include "List.hpp" +#include "Pooling.hpp" +#include "Options.hpp" + +class CYContext; + +struct CYThing { + virtual ~CYThing() { + } + + virtual void Output(struct CYOutput &out) const = 0; }; + +struct CYOutput { + std::ostream &out_; + CYOptions &options_; + bool pretty_; + unsigned indent_; + bool right_; + + enum { + NoMode, + NoLetter, + NoPlus, + NoHyphen, + Terminated + } mode_; + + CYOutput(std::ostream &out, CYOptions &options) : + out_(out), + options_(options), + pretty_(false), + indent_(0), + right_(false), + mode_(NoMode) + { + } + + void Check(char value); + void Terminate(); + + CYOutput &operator <<(char rhs); + CYOutput &operator <<(const char *rhs); + + _finline CYOutput &operator <<(const CYThing *rhs) { + if (rhs != NULL) + rhs->Output(*this); + return *this; + } + + _finline CYOutput &operator <<(const CYThing &rhs) { + rhs.Output(*this); + return *this; + } +}; + +struct CYPropertyName { + virtual void PropertyName(CYOutput &out) const = 0; + + virtual ~CYPropertyName() { + } +}; + +struct CYExpression; + +enum CYNeeded { + CYNever = -1, + CYSometimes = 0, + CYAlways = 1, +}; + +enum CYFlags { + CYNoFlags = 0, + CYNoBrace = (1 << 0), + CYNoFunction = (1 << 1), + CYNoIn = (1 << 2), + CYNoCall = (1 << 3), + CYNoRightHand = (1 << 4), + CYNoDangle = (1 << 5), + CYNoInteger = (1 << 6), + CYNoBF = (CYNoBrace | CYNoFunction), +}; + +struct CYStatement : + CYNext +{ + virtual ~CYStatement() { + } + + void Single(CYOutput &out, CYFlags flags) const; + void Multiple(CYOutput &out, CYFlags flags = CYNoFlags) const; + + virtual CYStatement *Collapse(CYContext &context); + virtual CYStatement *Replace(CYContext &context) = 0; + + private: + virtual void Output(CYOutput &out, CYFlags flags) const = 0; +}; + +struct CYStatements { + CYStatement *first_; + CYStatement *last_; + + CYStatements() : + first_(NULL), + last_(NULL) + { + } + + operator CYStatement *() const { + return first_; + } + + CYStatements &operator ->*(CYStatement *next) { + if (next != NULL) + if (first_ == NULL) { + first_ = next; + last_ = next; + } else for (;; last_ = last_->next_) + if (last_->next_ == NULL) { + last_->next_ = next; + last_ = next; + break; + } + return *this; + } +}; + +struct CYClassName { + virtual ~CYClassName() { + } + + virtual CYExpression *ClassName(CYContext &context, bool object) = 0; + virtual void ClassName(CYOutput &out, bool object) const = 0; +}; + +struct CYWord : + CYThing, + CYPropertyName, + CYClassName +{ + const char *word_; + + CYWord(const char *word) : + word_(word) + { + } + + void Set(const char *value) { + word_ = value; + } + + virtual const char *Word() const; + virtual void Output(CYOutput &out) const; + + virtual CYExpression *ClassName(CYContext &context, bool object); + virtual void ClassName(CYOutput &out, bool object) const; + virtual void PropertyName(CYOutput &out) const; +}; + +_finline std::ostream &operator <<(std::ostream &lhs, const CYWord &rhs) { + lhs << &rhs << '='; + return lhs << rhs.Word(); +} + +struct CYIdentifier : + CYNext, + CYWord +{ + CYIdentifier *replace_; + size_t offset_; + size_t usage_; + + CYIdentifier(const char *word) : + CYWord(word), + replace_(NULL), + offset_(0), + usage_(0) + { + } + + virtual const char *Word() const; + CYIdentifier *Replace(CYContext &context); +}; + +struct CYComment : + CYStatement +{ + const char *value_; + + CYComment(const char *value) : + value_(value) + { + } + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYLabel : + CYStatement +{ + CYIdentifier *name_; + CYStatement *statement_; + + CYLabel(CYIdentifier *name, CYStatement *statement) : + name_(name), + statement_(statement) + { + } + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYCStringLess : + std::binary_function +{ + _finline bool operator ()(const char *lhs, const char *rhs) const { + return strcmp(lhs, rhs) < 0; + } +}; + +struct CYIdentifierValueLess : + std::binary_function +{ + _finline bool operator ()(CYIdentifier *lhs, CYIdentifier *rhs) const { + return CYCStringLess()(lhs->Word(), rhs->Word()); + } +}; + +enum CYIdentifierFlags { + CYIdentifierArgument, + CYIdentifierVariable, + CYIdentifierOther, + CYIdentifierMagic, + CYIdentifierCatch, +}; + +typedef std::set CYCStringSet; +typedef std::set CYIdentifierValueSet; +typedef std::map CYIdentifierAddressFlagsMap; + +struct CYIdentifierUsage { + CYIdentifier *identifier_; + size_t usage_; +}; + +typedef std::vector CYIdentifierUsageVector; + +// XXX: strategy pattern, maybe subclass +enum CYScopeType { + CYScopeCatch, + CYScopeFunction, + CYScopeProgram, +}; + +struct CYScope { + CYScopeType type_; + + CYContext &context_; + CYStatement *&statements_; + + CYScope *parent_; + + CYIdentifierAddressFlagsMap internal_; + CYIdentifierValueSet identifiers_; + + CYScope(CYScopeType type, CYContext &context, CYStatement *&statements); + + void Close(); + + void Declare(CYContext &context, CYIdentifier *identifier, CYIdentifierFlags flags); + virtual CYIdentifier *Lookup(CYContext &context, CYIdentifier *identifier); + void Merge(CYContext &context, CYIdentifier *identifier); + void Scope(CYContext &context, CYStatement *&statements); +}; + +struct CYProgram : + CYThing +{ + CYStatement *statements_; + + CYProgram(CYStatement *statements) : + statements_(statements) + { + } + + virtual void Replace(CYContext &context); + virtual void Output(CYOutput &out) const; +}; + +struct CYNonLocal; + +struct CYContext { + CYOptions &options_; + + CYScope *scope_; + CYIdentifierUsageVector rename_; + + CYNonLocal *nonlocal_; + CYNonLocal *nextlocal_; + unsigned unique_; + + CYContext(CYOptions &options) : + options_(options), + scope_(NULL), + nonlocal_(NULL), + nextlocal_(NULL), + unique_(0) + { + } + + virtual ~CYContext() { + } + + template + void ReplaceAll(Type_ *&values) { + Type_ **last(&values); + CYForEach (next, values) { + Replace(*last = next); + last = &(*last)->next_; + } + } + + template + void Replace(Type_ *&value) { + for (;;) if (value == NULL) + break; + else { + Type_ *replace(value->Replace(*this)); + if (replace != value) + value = replace; + else break; + } + } + + void NonLocal(CYStatement *&statements); + CYIdentifier *Unique(); +}; + +struct CYNonLocal { + CYIdentifier *identifier_; + + CYNonLocal() : + identifier_(NULL) + { + } + + CYIdentifier *Target(CYContext &context) { + if (identifier_ == NULL) + identifier_ = context.Unique(); + return identifier_; + } +}; + +struct CYBlock : + CYStatement, + CYThing +{ + CYStatement *statements_; + + CYBlock(CYStatement *statements) : + statements_(statements) + { + } + + operator CYStatement *() const { + return statements_; + } + + void AddPrev(CYStatement *statement) { + CYSetLast(statement, statements_); + statements_ = statement; + } + + virtual CYStatement *Replace(CYContext &context); + + virtual void Output(CYOutput &out) const; + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +enum CYState { + CYClear, + CYRestricted, + CYNewLine +}; + +class CYDriver { + public: + CYState state_; + void *scanner_; + + const char *data_; + size_t size_; + FILE *file_; + + bool strict_; + + enum Condition { + RegExpCondition, + XMLContentCondition, + XMLTagCondition, + }; + + std::string filename_; + + struct Error { + bool warning_; + cy::location location_; + std::string message_; + }; + + typedef std::vector Errors; + + CYProgram *program_; + Errors errors_; + + bool auto_; + + struct Context { + CYExpression *context_; + + Context(CYExpression *context) : + context_(context) + { + } + + typedef std::vector Words; + Words words_; + }; + + typedef std::vector Contexts; + Contexts contexts_; + + CYExpression *context_; + + enum Mode { + AutoNone, + AutoPrimary, + AutoDirect, + AutoIndirect, + AutoMessage + } mode_; + + private: + void ScannerInit(); + void ScannerDestroy(); + + public: + CYDriver(const std::string &filename = ""); + ~CYDriver(); + + Condition GetCondition(); + void SetCondition(Condition condition); + + void PushCondition(Condition condition); + void PopCondition(); + + void Warning(const cy::location &location, const char *message); +}; + +struct CYForInitialiser { + virtual ~CYForInitialiser() { + } + + virtual void For(CYOutput &out) const = 0; + virtual CYExpression *Replace(CYContext &context) = 0; +}; + +struct CYForInInitialiser { + virtual ~CYForInInitialiser() { + } + + virtual void ForIn(CYOutput &out, CYFlags flags) const = 0; + virtual const char *ForEachIn() const = 0; + virtual CYExpression *ForEachIn(CYContext &out) = 0; + virtual CYExpression *Replace(CYContext &context) = 0; +}; + +struct CYNumber; +struct CYString; + +struct CYExpression : + CYNext, + CYForInitialiser, + CYForInInitialiser, + CYClassName, + CYThing +{ + virtual unsigned Precedence() const = 0; + + virtual bool RightHand() const { + return true; + } + + virtual void For(CYOutput &out) const; + virtual void ForIn(CYOutput &out, CYFlags flags) const; + + virtual const char *ForEachIn() const; + virtual CYExpression *ForEachIn(CYContext &out); + + virtual CYExpression *AddArgument(CYContext &context, CYExpression *value); + + virtual void Output(CYOutput &out) const; + virtual void Output(CYOutput &out, CYFlags flags) const = 0; + void Output(CYOutput &out, unsigned precedence, CYFlags flags) const; + + virtual CYExpression *ClassName(CYContext &context, bool object); + virtual void ClassName(CYOutput &out, bool object) const; + + virtual CYExpression *Replace(CYContext &context) = 0; + + virtual CYExpression *Primitive(CYContext &context) { + return this; + } + + virtual CYNumber *Number(CYContext &context) { + return NULL; + } + + virtual CYString *String(CYContext &context) { + return NULL; + } + + virtual const char *Word() const { + return NULL; + } +}; + +#define CYAlphabetic(value) \ + virtual bool Alphabetic() const { \ + return value; \ + } + +#define CYPrecedence(value) \ + static const unsigned Precedence_ = value; \ + virtual unsigned Precedence() const { \ + return Precedence_; \ + } + +#define CYRightHand(value) \ + virtual bool RightHand() const { \ + return value; \ + } + +struct CYCompound : + CYExpression +{ + CYExpression *expressions_; + + CYCompound(CYExpression *expressions = NULL) : + expressions_(expressions) + { + } + + void AddPrev(CYExpression *expression) { + CYSetLast(expression, expressions_); + expressions_ = expression; + } + + CYPrecedence(17) + + virtual CYExpression *Replace(CYContext &context); + void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYFunctionParameter : + CYNext, + CYThing +{ + CYIdentifier *name_; + + CYFunctionParameter(CYIdentifier *name, CYFunctionParameter *next = NULL) : + CYNext(next), + name_(name) + { + } + + virtual CYFunctionParameter *Replace(CYContext &context, CYBlock &code); + virtual void Output(CYOutput &out) const; +}; + +struct CYOptionalFunctionParameter : + CYFunctionParameter +{ + CYExpression *initializer_; + + CYOptionalFunctionParameter(CYIdentifier *name, CYExpression *initializer, CYFunctionParameter *next = NULL) : + CYFunctionParameter(name, next), + initializer_(initializer) + { + } + + virtual CYFunctionParameter *Replace(CYContext &context, CYBlock &code); + virtual void Output(CYOutput &out) const; +}; + +struct CYComprehension : + CYNext, + CYThing +{ + virtual const char *Name() const = 0; + + virtual CYFunctionParameter *Parameter(CYContext &context) const = 0; + CYFunctionParameter *Parameters(CYContext &context) const; + virtual CYStatement *Replace(CYContext &context, CYStatement *statement) const; + virtual void Output(CYOutput &out) const = 0; +}; + +struct CYForInComprehension : + CYComprehension +{ + CYIdentifier *name_; + CYExpression *set_; + + CYForInComprehension(CYIdentifier *name, CYExpression *set) : + name_(name), + set_(set) + { + } + + virtual const char *Name() const { + return name_->Word(); + } + + virtual CYFunctionParameter *Parameter(CYContext &context) const; + virtual CYStatement *Replace(CYContext &context, CYStatement *statement) const; + virtual void Output(CYOutput &out) const; +}; + +struct CYForEachInComprehension : + CYComprehension +{ + CYIdentifier *name_; + CYExpression *set_; + + CYForEachInComprehension(CYIdentifier *name, CYExpression *set) : + name_(name), + set_(set) + { + } + + virtual const char *Name() const { + return name_->Word(); + } + + virtual CYFunctionParameter *Parameter(CYContext &context) const; + virtual CYStatement *Replace(CYContext &context, CYStatement *statement) const; + virtual void Output(CYOutput &out) const; +}; + +struct CYIfComprehension : + CYComprehension +{ + CYExpression *test_; + + CYIfComprehension(CYExpression *test) : + test_(test) + { + } + + virtual const char *Name() const { + return NULL; + } + + virtual CYFunctionParameter *Parameter(CYContext &context) const; + virtual CYStatement *Replace(CYContext &context, CYStatement *statement) const; + virtual void Output(CYOutput &out) const; +}; + +struct CYArrayComprehension : + CYExpression +{ + CYExpression *expression_; + CYComprehension *comprehensions_; + + CYArrayComprehension(CYExpression *expression, CYComprehension *comprehensions) : + expression_(expression), + comprehensions_(comprehensions) + { + } + + CYPrecedence(0) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYLiteral : + CYExpression +{ + CYPrecedence(0) + CYRightHand(false) +}; + +struct CYTrivial : + CYLiteral +{ + virtual CYExpression *Replace(CYContext &context); +}; + +struct CYMagic : + CYExpression +{ + CYPrecedence(0) + CYRightHand(false) +}; + +struct CYRange { + uint64_t lo_; + uint64_t hi_; + + CYRange(uint64_t lo, uint64_t hi) : + lo_(lo), hi_(hi) + { + } + + bool operator [](uint8_t value) const { + return !(value >> 7) && (value >> 6 ? hi_ : lo_) >> (value & 0x3f) & 0x1; + } + + void operator()(uint8_t value) { + if (value >> 7) + return; + (value >> 6 ? hi_ : lo_) |= uint64_t(0x1) << (value & 0x3f); + } +}; + +extern CYRange DigitRange_; +extern CYRange WordStartRange_; +extern CYRange WordEndRange_; + +struct CYString : + CYTrivial, + CYPropertyName +{ + const char *value_; + size_t size_; + + CYString() : + value_(NULL), + size_(0) + { + } + + CYString(const char *value) : + value_(value), + size_(strlen(value)) + { + } + + CYString(const char *value, size_t size) : + value_(value), + size_(size) + { + } + + CYString(const CYWord *word) : + value_(word->Word()), + size_(strlen(value_)) + { + } + + const char *Value() const { + return value_; + } + + virtual const char *Word() const; + + virtual CYNumber *Number(CYContext &context); + virtual CYString *String(CYContext &context); + + CYString *Concat(CYContext &out, CYString *rhs) const; + virtual void Output(CYOutput &out, CYFlags flags) const; + virtual void PropertyName(CYOutput &out) const; +}; + +struct CYNumber : + CYTrivial, + CYPropertyName +{ + double value_; + + CYNumber(double value) : + value_(value) + { + } + + double Value() const { + return value_; + } + + virtual CYNumber *Number(CYContext &context); + virtual CYString *String(CYContext &context); + + virtual void Output(CYOutput &out, CYFlags flags) const; + virtual void PropertyName(CYOutput &out) const; +}; + +struct CYRegEx : + CYTrivial +{ + const char *value_; + + CYRegEx(const char *value) : + value_(value) + { + } + + const char *Value() const { + return value_; + } + + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYNull : + CYWord, + CYTrivial +{ + CYNull() : + CYWord("null") + { + } + + virtual CYNumber *Number(CYContext &context); + virtual CYString *String(CYContext &context); + + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYThis : + CYWord, + CYMagic +{ + CYThis() : + CYWord("this") + { + } + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYBoolean : + CYTrivial +{ + virtual bool Value() const = 0; + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYFalse : + CYWord, + CYBoolean +{ + CYFalse() : + CYWord("false") + { + } + + virtual bool Value() const { + return false; + } + + virtual CYNumber *Number(CYContext &context); + virtual CYString *String(CYContext &context); +}; + +struct CYTrue : + CYWord, + CYBoolean +{ + CYTrue() : + CYWord("true") + { + } + + virtual bool Value() const { + return true; + } + + virtual CYNumber *Number(CYContext &context); + virtual CYString *String(CYContext &context); +}; + +struct CYVariable : + CYExpression +{ + CYIdentifier *name_; + + CYVariable(CYIdentifier *name) : + name_(name) + { + } + + CYVariable(const char *name) : + name_(new($pool) CYIdentifier(name)) + { + } + + CYPrecedence(0) + CYRightHand(false) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYPrefix : + CYExpression +{ + CYExpression *rhs_; + + CYPrefix(CYExpression *rhs) : + rhs_(rhs) + { + } + + virtual bool Alphabetic() const = 0; + virtual const char *Operator() const = 0; + + CYPrecedence(4) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYInfix : + CYExpression +{ + CYExpression *lhs_; + CYExpression *rhs_; + + CYInfix(CYExpression *lhs, CYExpression *rhs) : + lhs_(lhs), + rhs_(rhs) + { + } + + void SetLeft(CYExpression *lhs) { + lhs_ = lhs; + } + + virtual bool Alphabetic() const = 0; + virtual const char *Operator() const = 0; + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYPostfix : + CYExpression +{ + CYExpression *lhs_; + + CYPostfix(CYExpression *lhs) : + lhs_(lhs) + { + } + + virtual const char *Operator() const = 0; + + CYPrecedence(3) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYAssignment : + CYExpression +{ + CYExpression *lhs_; + CYExpression *rhs_; + + CYAssignment(CYExpression *lhs, CYExpression *rhs) : + lhs_(lhs), + rhs_(rhs) + { + } + + void SetLeft(CYExpression *lhs) { + lhs_ = lhs; + } + + virtual const char *Operator() const = 0; + + CYPrecedence(16) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYArgument : + CYNext, + CYThing +{ + CYWord *name_; + CYExpression *value_; + + CYArgument(CYExpression *value, CYArgument *next = NULL) : + CYNext(next), + name_(NULL), + value_(value) + { + } + + CYArgument(CYWord *name, CYExpression *value, CYArgument *next = NULL) : + CYNext(next), + name_(name), + value_(value) + { + } + + void Replace(CYContext &context); + void Output(CYOutput &out) const; +}; + +struct CYBlank : + public CYWord +{ + CYBlank() : + CYWord("") + { + } +}; + +struct CYClause : + CYThing, + CYNext +{ + CYExpression *case_; + CYStatement *statements_; + + CYClause(CYExpression *_case, CYStatement *statements) : + case_(_case), + statements_(statements) + { + } + + void Replace(CYContext &context); + virtual void Output(CYOutput &out) const; +}; + +struct CYElement : + CYNext, + CYThing +{ + CYExpression *value_; + + CYElement(CYExpression *value, CYElement *next) : + CYNext(next), + value_(value) + { + } + + void Replace(CYContext &context); + void Output(CYOutput &out) const; +}; + +struct CYArray : + CYLiteral +{ + CYElement *elements_; + + CYArray(CYElement *elements = NULL) : + elements_(elements) + { + } + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYProperty : + CYNext, + CYThing +{ + CYPropertyName *name_; + CYExpression *value_; + + CYProperty(CYPropertyName *name, CYExpression *value, CYProperty *next = NULL) : + CYNext(next), + name_(name), + value_(value) + { + } + + void Replace(CYContext &context); + virtual void Output(CYOutput &out) const; +}; + +struct CYDeclaration : + CYForInInitialiser +{ + CYIdentifier *identifier_; + CYExpression *initialiser_; + + CYDeclaration(CYIdentifier *identifier, CYExpression *initialiser = NULL) : + identifier_(identifier), + initialiser_(initialiser) + { + } + + virtual void ForIn(CYOutput &out, CYFlags flags) const; + + virtual const char *ForEachIn() const; + virtual CYExpression *ForEachIn(CYContext &out); + + virtual CYExpression *Replace(CYContext &context); + virtual CYAssignment *Assignment(CYContext &context); + + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYDeclarations : + CYNext, + CYThing, + CYForInitialiser +{ + CYDeclaration *declaration_; + + CYDeclarations(CYDeclaration *declaration, CYDeclarations *next = NULL) : + CYNext(next), + declaration_(declaration) + { + } + + virtual void For(CYOutput &out) const; + + virtual CYCompound *Replace(CYContext &context); + CYProperty *Property(CYContext &context); + + virtual void Output(CYOutput &out) const; + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYVar : + CYStatement +{ + CYDeclarations *declarations_; + + CYVar(CYDeclarations *declarations) : + declarations_(declarations) + { + } + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYLet : + CYStatement +{ + CYDeclarations *declarations_; + CYBlock code_; + + CYLet(CYDeclarations *declarations, CYStatement *statements) : + declarations_(declarations), + code_(statements) + { + } + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYFor : + CYStatement +{ + CYForInitialiser *initialiser_; + CYExpression *test_; + CYExpression *increment_; + CYStatement *code_; + + CYFor(CYForInitialiser *initialiser, CYExpression *test, CYExpression *increment, CYStatement *code) : + initialiser_(initialiser), + test_(test), + increment_(increment), + code_(code) + { + } + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYForIn : + CYStatement +{ + CYForInInitialiser *initialiser_; + CYExpression *set_; + CYStatement *code_; + + CYForIn(CYForInInitialiser *initialiser, CYExpression *set, CYStatement *code) : + initialiser_(initialiser), + set_(set), + code_(code) + { + } + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYForEachIn : + CYStatement +{ + CYForInInitialiser *initialiser_; + CYExpression *set_; + CYStatement *code_; + + CYForEachIn(CYForInInitialiser *initialiser, CYExpression *set, CYStatement *code) : + initialiser_(initialiser), + set_(set), + code_(code) + { + } + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYObject : + CYLiteral +{ + CYProperty *properties_; + + CYObject(CYProperty *properties = NULL) : + properties_(properties) + { + } + + virtual CYExpression *Replace(CYContext &context); + void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYMember : + CYExpression +{ + CYExpression *object_; + CYExpression *property_; + + CYMember(CYExpression *object, CYExpression *property) : + object_(object), + property_(property) + { + } + + void SetLeft(CYExpression *object) { + object_ = object; + } + + void Replace_(CYContext &context); +}; + +struct CYDirectMember : + CYMember +{ + CYDirectMember(CYExpression *object, CYExpression *property) : + CYMember(object, property) + { + } + + CYPrecedence(1) + CYRightHand(false) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYIndirectMember : + CYMember +{ + CYIndirectMember(CYExpression *object, CYExpression *property) : + CYMember(object, property) + { + } + + CYPrecedence(1) + CYRightHand(false) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +namespace cy { +namespace Syntax { + +struct New : + CYExpression +{ + CYExpression *constructor_; + CYArgument *arguments_; + + New(CYExpression *constructor, CYArgument *arguments) : + constructor_(constructor), + arguments_(arguments) + { + } + + virtual unsigned Precedence() const { + return arguments_ == NULL ? 2 : 1; + } + + CYRightHand(false) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; + + virtual CYExpression *AddArgument(CYContext &context, CYExpression *value); +}; + +} } + +struct CYCall : + CYExpression +{ + CYExpression *function_; + CYArgument *arguments_; + + CYCall(CYExpression *function, CYArgument *arguments = NULL) : + function_(function), + arguments_(arguments) + { + } + + CYPrecedence(1) + CYRightHand(false) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; + + virtual CYExpression *AddArgument(CYContext &context, CYExpression *value); +}; + +struct CYRubyProc; + +struct CYRubyBlock : + CYExpression +{ + CYExpression *call_; + CYRubyProc *proc_; + + CYRubyBlock(CYExpression *call, CYRubyProc *proc) : + call_(call), + proc_(proc) + { + } + + CYPrecedence(1) + CYRightHand(false) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYIf : + CYStatement +{ + CYExpression *test_; + CYStatement *true_; + CYStatement *false_; + + CYIf(CYExpression *test, CYStatement *_true, CYStatement *_false = NULL) : + test_(test), + true_(_true), + false_(_false) + { + } + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYDoWhile : + CYStatement +{ + CYExpression *test_; + CYStatement *code_; + + CYDoWhile(CYExpression *test, CYStatement *code) : + test_(test), + code_(code) + { + } + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYWhile : + CYStatement +{ + CYExpression *test_; + CYStatement *code_; + + CYWhile(CYExpression *test, CYStatement *code) : + test_(test), + code_(code) + { + } + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +// XXX: this should be split up into CYAnonymousFunction and CYNamedFunction (subclass) +struct CYFunction { + CYIdentifier *name_; + CYFunctionParameter *parameters_; + CYBlock code_; + CYNonLocal *nonlocal_; + + CYFunction(CYIdentifier *name, CYFunctionParameter *parameters, CYStatement *statements) : + name_(name), + parameters_(parameters), + code_(statements), + nonlocal_(NULL) + { + } + + virtual ~CYFunction() { + } + + void Inject(CYContext &context); + virtual void Replace_(CYContext &context, bool outer); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +// XXX: this should be split up into CYAnonymousFunctionExpression and CYNamedFunctionExpression +struct CYFunctionExpression : + CYFunction, + CYExpression +{ + CYFunctionExpression(CYIdentifier *name, CYFunctionParameter *parameters, CYStatement *statements) : + CYFunction(name, parameters, statements) + { + } + + CYPrecedence(0) + CYRightHand(false) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +// XXX: this should derive from CYAnonymousFunctionExpression +struct CYRubyProc : + CYFunctionExpression +{ + CYRubyProc(CYFunctionParameter *parameters, CYStatement *statements) : + CYFunctionExpression(NULL, parameters, statements) + { + } + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +// XXX: this should derive from CYNamedFunction +struct CYFunctionStatement : + CYFunction, + CYStatement +{ + CYFunctionStatement(CYIdentifier *name, CYFunctionParameter *parameters, CYStatement *statements) : + CYFunction(name, parameters, statements) + { + } + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYExpress : + CYStatement +{ + CYExpression *expression_; + + CYExpress(CYExpression *expression) : + expression_(expression) + { + if (expression == NULL) + throw; + } + + virtual CYStatement *Collapse(CYContext &context); + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYContinue : + CYStatement +{ + CYIdentifier *label_; + + CYContinue(CYIdentifier *label) : + label_(label) + { + } + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYBreak : + CYStatement +{ + CYIdentifier *label_; + + CYBreak(CYIdentifier *label) : + label_(label) + { + } + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYReturn : + CYStatement +{ + CYExpression *value_; + + CYReturn(CYExpression *value) : + value_(value) + { + } + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYEmpty : + CYStatement +{ + virtual CYStatement *Collapse(CYContext &context); + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYFinally : + CYThing +{ + CYBlock code_; + + CYFinally(CYStatement *statements) : + code_(statements) + { + } + + void Replace(CYContext &context); + virtual void Output(CYOutput &out) const; +}; + +namespace cy { +namespace Syntax { + +struct Catch : + CYThing +{ + CYIdentifier *name_; + CYBlock code_; + + Catch(CYIdentifier *name, CYStatement *statements) : + name_(name), + code_(statements) + { + } + + void Replace(CYContext &context); + virtual void Output(CYOutput &out) const; +}; + +struct Try : + CYStatement +{ + CYBlock code_; + Catch *catch_; + CYFinally *finally_; + + Try(CYStatement *statements, Catch *_catch, CYFinally *finally) : + code_(statements), + catch_(_catch), + finally_(finally) + { + } + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct Throw : + CYStatement +{ + CYExpression *value_; + + Throw(CYExpression *value = NULL) : + value_(value) + { + } + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +} } + +struct CYWith : + CYStatement +{ + CYExpression *scope_; + CYStatement *code_; + + CYWith(CYExpression *scope, CYStatement *code) : + scope_(scope), + code_(code) + { + } + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYSwitch : + CYStatement +{ + CYExpression *value_; + CYClause *clauses_; + + CYSwitch(CYExpression *value, CYClause *clauses) : + value_(value), + clauses_(clauses) + { + } + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYCondition : + CYExpression +{ + CYExpression *test_; + CYExpression *true_; + CYExpression *false_; + + CYCondition(CYExpression *test, CYExpression *_true, CYExpression *_false) : + test_(test), + true_(_true), + false_(_false) + { + } + + CYPrecedence(15) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYAddressOf : + CYPrefix +{ + CYAddressOf(CYExpression *rhs) : + CYPrefix(rhs) + { + } + + virtual const char *Operator() const { + return "&"; + } + + CYAlphabetic(false) + + virtual CYExpression *Replace(CYContext &context); +}; + +struct CYIndirect : + CYPrefix +{ + CYIndirect(CYExpression *rhs) : + CYPrefix(rhs) + { + } + + virtual const char *Operator() const { + return "*"; + } + + CYAlphabetic(false) + + virtual CYExpression *Replace(CYContext &context); +}; + +#define CYReplace \ + virtual CYExpression *Replace(CYContext &context); + +#define CYPostfix_(op, name, args...) \ + struct CY ## name : \ + CYPostfix \ + { args \ + CY ## name(CYExpression *lhs) : \ + CYPostfix(lhs) \ + { \ + } \ + \ + virtual const char *Operator() const { \ + return op; \ + } \ + }; + +#define CYPrefix_(alphabetic, op, name, args...) \ + struct CY ## name : \ + CYPrefix \ + { args \ + CY ## name(CYExpression *rhs) : \ + CYPrefix(rhs) \ + { \ + } \ + \ + CYAlphabetic(alphabetic) \ + \ + virtual const char *Operator() const { \ + return op; \ + } \ + }; + +#define CYInfix_(alphabetic, precedence, op, name, args...) \ + struct CY ## name : \ + CYInfix \ + { args \ + CY ## name(CYExpression *lhs, CYExpression *rhs) : \ + CYInfix(lhs, rhs) \ + { \ + } \ + \ + CYAlphabetic(alphabetic) \ + CYPrecedence(precedence) \ + \ + virtual const char *Operator() const { \ + return op; \ + } \ + }; + +#define CYAssignment_(op, name, args...) \ + struct CY ## name ## Assign : \ + CYAssignment \ + { args \ + CY ## name ## Assign(CYExpression *lhs, CYExpression *rhs) : \ + CYAssignment(lhs, rhs) \ + { \ + } \ + \ + virtual const char *Operator() const { \ + return op; \ + } \ + }; + +CYPostfix_("++", PostIncrement) +CYPostfix_("--", PostDecrement) + +CYPrefix_(true, "delete", Delete) +CYPrefix_(true, "void", Void) +CYPrefix_(true, "typeof", TypeOf) +CYPrefix_(false, "++", PreIncrement) +CYPrefix_(false, "--", PreDecrement) +CYPrefix_(false, "+", Affirm) +CYPrefix_(false, "-", Negate) +CYPrefix_(false, "~", BitwiseNot) +CYPrefix_(false, "!", LogicalNot) + +CYInfix_(false, 5, "*", Multiply) +CYInfix_(false, 5, "/", Divide) +CYInfix_(false, 5, "%", Modulus) +CYInfix_(false, 6, "+", Add, CYReplace) +CYInfix_(false, 6, "-", Subtract) +CYInfix_(false, 7, "<<", ShiftLeft) +CYInfix_(false, 7, ">>", ShiftRightSigned) +CYInfix_(false, 7, ">>>", ShiftRightUnsigned) +CYInfix_(false, 8, "<", Less) +CYInfix_(false, 8, ">", Greater) +CYInfix_(false, 8, "<=", LessOrEqual) +CYInfix_(false, 8, ">=", GreaterOrEqual) +CYInfix_(true, 8, "instanceof", InstanceOf) +CYInfix_(true, 8, "in", In) +CYInfix_(false, 9, "==", Equal) +CYInfix_(false, 9, "!=", NotEqual) +CYInfix_(false, 9, "===", Identical) +CYInfix_(false, 9, "!==", NotIdentical) +CYInfix_(false, 10, "&", BitwiseAnd) +CYInfix_(false, 11, "^", BitwiseXOr) +CYInfix_(false, 12, "|", BitwiseOr) +CYInfix_(false, 13, "&&", LogicalAnd) +CYInfix_(false, 14, "||", LogicalOr) + +CYAssignment_("=", ) +CYAssignment_("*=", Multiply) +CYAssignment_("/=", Divide) +CYAssignment_("%=", Modulus) +CYAssignment_("+=", Add) +CYAssignment_("-=", Subtract) +CYAssignment_("<<=", ShiftLeft) +CYAssignment_(">>=", ShiftRightSigned) +CYAssignment_(">>>=", ShiftRightUnsigned) +CYAssignment_("&=", BitwiseAnd) +CYAssignment_("^=", BitwiseXOr) +CYAssignment_("|=", BitwiseOr) + +#endif/*CYCRIPT_PARSER_HPP*/