| [04124c4] | 1 | // | 
|---|
|  | 2 | // Cforall Version 1.0.0 Copyright (C) 2019 University of Waterloo | 
|---|
|  | 3 | // | 
|---|
|  | 4 | // The contents of this file are covered under the licence agreement in the | 
|---|
|  | 5 | // file "LICENCE" distributed with Cforall. | 
|---|
|  | 6 | // | 
|---|
|  | 7 | // Pass.hpp -- | 
|---|
|  | 8 | // | 
|---|
|  | 9 | // Author           : Thierry Delisle | 
|---|
| [a86b2ca6] | 10 | // Created On       : Thu May 09 15:37:05 2019 | 
|---|
| [04124c4] | 11 | // Last Modified By : | 
|---|
|  | 12 | // Last Modified On : | 
|---|
|  | 13 | // Update Count     : | 
|---|
|  | 14 | // | 
|---|
|  | 15 |  | 
|---|
| [f47f887] | 16 | #pragma once | 
|---|
| [04124c4] | 17 | // IWYU pragma: private, include "AST/Pass.hpp" | 
|---|
| [f47f887] | 18 |  | 
|---|
|  | 19 | #include <functional> | 
|---|
|  | 20 | #include <list> | 
|---|
|  | 21 | #include <stack> | 
|---|
|  | 22 |  | 
|---|
| [04124c4] | 23 | #include "AST/Fwd.hpp" | 
|---|
|  | 24 | #include "AST/Node.hpp" | 
|---|
| [6d51bd7] | 25 |  | 
|---|
|  | 26 | #include "AST/Attribute.hpp" | 
|---|
| [04124c4] | 27 | #include "AST/Decl.hpp" | 
|---|
| [6d51bd7] | 28 | #include "AST/Expr.hpp" | 
|---|
|  | 29 | #include "AST/Init.hpp" | 
|---|
|  | 30 | #include "AST/Stmt.hpp" | 
|---|
| [8a5530c] | 31 | #include "AST/Type.hpp" | 
|---|
| [6d51bd7] | 32 |  | 
|---|
| [04124c4] | 33 | #include "AST/Visitor.hpp" | 
|---|
|  | 34 |  | 
|---|
| [0e42794] | 35 | #include "AST/SymbolTable.hpp" | 
|---|
| [f47f887] | 36 |  | 
|---|
|  | 37 | // Private prelude header, needed for some of the magic tricks this class pulls off | 
|---|
| [04124c4] | 38 | #include "AST/Pass.proto.hpp" | 
|---|
| [f47f887] | 39 |  | 
|---|
|  | 40 | namespace ast { | 
|---|
|  | 41 | //------------------------------------------------------------------------------------------------- | 
|---|
|  | 42 | // Templated visitor type | 
|---|
|  | 43 | // To use declare a Pass< YOUR VISITOR TYPE > | 
|---|
|  | 44 | // The visitor type should specify the previsit/postvisit for types that are desired. | 
|---|
|  | 45 | // Note: previsit/postvisit must be **public** members | 
|---|
|  | 46 | // | 
|---|
|  | 47 | // Several additional features are available through inheritance | 
|---|
| [73f1b1c] | 48 | // | PureVisitor           - makes the visitor pure, it never modifies nodes in place and always | 
|---|
|  | 49 | //                           clones nodes it needs to make changes to | 
|---|
| [b2a11ba] | 50 | // | WithConstTypeSubstitution - provides polymorphic const TypeSubstitution * typeSubs for the | 
|---|
| [e0e9a0b] | 51 | //                           current expression | 
|---|
|  | 52 | // | WithStmtsToAdd        - provides the ability to insert statements before or after the current | 
|---|
|  | 53 | //                           statement by adding new statements into stmtsToAddBefore or | 
|---|
|  | 54 | //                           stmtsToAddAfter respectively. | 
|---|
|  | 55 | // | WithDeclsToAdd        - provides the ability to insert declarations before or after the | 
|---|
|  | 56 | //                           current declarations by adding new DeclStmt into declsToAddBefore or | 
|---|
|  | 57 | //                           declsToAddAfter respectively. | 
|---|
|  | 58 | // | WithShortCircuiting   - provides the ability to skip visiting child nodes; set visit_children | 
|---|
|  | 59 | //                           to false in pre{visit,visit} to skip visiting children | 
|---|
|  | 60 | // | WithGuards            - provides the ability to save/restore data like a LIFO stack; to save, | 
|---|
|  | 61 | //                           call GuardValue with the variable to save, the variable will | 
|---|
|  | 62 | //                           automatically be restored to its previous value after the | 
|---|
|  | 63 | //                           corresponding postvisit/postmutate teminates. | 
|---|
|  | 64 | // | WithVisitorRef        - provides an pointer to the templated visitor wrapper | 
|---|
|  | 65 | // | WithSymbolTable       - provides symbol table functionality | 
|---|
| [e6b42e7] | 66 | // | 
|---|
|  | 67 | // Other Special Members: | 
|---|
|  | 68 | // | result                - Either a method that takes no parameters or a field. If a method (or | 
|---|
|  | 69 | //                           callable field) get_result calls it, otherwise the value is returned. | 
|---|
| [f47f887] | 70 | //------------------------------------------------------------------------------------------------- | 
|---|
| [7ff3e522] | 71 | template< typename core_t > | 
|---|
| [f47f887] | 72 | class Pass final : public ast::Visitor { | 
|---|
|  | 73 | public: | 
|---|
| [7ff3e522] | 74 | using core_type = core_t; | 
|---|
|  | 75 | using type = Pass<core_t>; | 
|---|
|  | 76 |  | 
|---|
| [04124c4] | 77 | /// Forward any arguments to the pass constructor | 
|---|
|  | 78 | /// Propagate 'this' if necessary | 
|---|
| [f47f887] | 79 | template< typename... Args > | 
|---|
|  | 80 | Pass( Args &&... args) | 
|---|
| [7ff3e522] | 81 | : core( std::forward<Args>( args )... ) | 
|---|
| [f47f887] | 82 | { | 
|---|
|  | 83 | // After the pass is constructed, check if it wants the have a pointer to the wrapping visitor | 
|---|
| [7ff3e522] | 84 | type * const * visitor = __pass::visitor(core, 0); | 
|---|
| [f47f887] | 85 | if(visitor) { | 
|---|
| [7ff3e522] | 86 | *const_cast<type **>( visitor ) = this; | 
|---|
| [f47f887] | 87 | } | 
|---|
|  | 88 | } | 
|---|
|  | 89 |  | 
|---|
|  | 90 | virtual ~Pass() = default; | 
|---|
|  | 91 |  | 
|---|
| [e6b42e7] | 92 | /// Storage for the actual pass. | 
|---|
|  | 93 | core_t core; | 
|---|
|  | 94 |  | 
|---|
|  | 95 | /// If the core defines a result, call it if possible, otherwise return it. | 
|---|
|  | 96 | inline auto get_result() -> decltype( __pass::get_result( core, '0' ) ) { | 
|---|
|  | 97 | return __pass::get_result( core, '0' ); | 
|---|
|  | 98 | } | 
|---|
|  | 99 |  | 
|---|
| [a86b2ca6] | 100 | /// Construct and run a pass on a translation unit. | 
|---|
|  | 101 | template< typename... Args > | 
|---|
| [293dc1c] | 102 | static void run( TranslationUnit & decls, Args &&... args ) { | 
|---|
| [7ff3e522] | 103 | Pass<core_t> visitor( std::forward<Args>( args )... ); | 
|---|
| [a86b2ca6] | 104 | accept_all( decls, visitor ); | 
|---|
|  | 105 | } | 
|---|
|  | 106 |  | 
|---|
| [e6b42e7] | 107 | /// Contruct and run a pass on a pointer to extract a value. | 
|---|
|  | 108 | template< typename node_type, typename... Args > | 
|---|
|  | 109 | static auto read( node_type const * node, Args&&... args ) { | 
|---|
|  | 110 | Pass<core_t> visitor( std::forward<Args>( args )... ); | 
|---|
|  | 111 | node_type const * temp = node->accept( visitor ); | 
|---|
|  | 112 | assert( temp == node ); | 
|---|
|  | 113 | return visitor.get_result(); | 
|---|
|  | 114 | } | 
|---|
|  | 115 |  | 
|---|
|  | 116 | // Versions of the above for older compilers. | 
|---|
| [b9fa85b] | 117 | template< typename... Args > | 
|---|
| [293dc1c] | 118 | static void run( TranslationUnit & decls ) { | 
|---|
| [0240cd69] | 119 | Pass<core_t> visitor; | 
|---|
|  | 120 | accept_all( decls, visitor ); | 
|---|
|  | 121 | } | 
|---|
|  | 122 |  | 
|---|
| [b9fa85b] | 123 | template< typename node_type, typename... Args > | 
|---|
|  | 124 | static auto read( node_type const * node ) { | 
|---|
| [e6b42e7] | 125 | Pass<core_t> visitor; | 
|---|
| [b9fa85b] | 126 | node_type const * temp = node->accept( visitor ); | 
|---|
| [e6b42e7] | 127 | assert( temp == node ); | 
|---|
|  | 128 | return visitor.get_result(); | 
|---|
|  | 129 | } | 
|---|
| [f47f887] | 130 |  | 
|---|
| [04124c4] | 131 | /// Visit function declarations | 
|---|
| [23f99e1] | 132 | const ast::DeclWithType *     visit( const ast::ObjectDecl           * ) override final; | 
|---|
|  | 133 | const ast::DeclWithType *     visit( const ast::FunctionDecl         * ) override final; | 
|---|
|  | 134 | const ast::Decl *             visit( const ast::StructDecl           * ) override final; | 
|---|
|  | 135 | const ast::Decl *             visit( const ast::UnionDecl            * ) override final; | 
|---|
|  | 136 | const ast::Decl *             visit( const ast::EnumDecl             * ) override final; | 
|---|
|  | 137 | const ast::Decl *             visit( const ast::TraitDecl            * ) override final; | 
|---|
|  | 138 | const ast::Decl *             visit( const ast::TypeDecl             * ) override final; | 
|---|
|  | 139 | const ast::Decl *             visit( const ast::TypedefDecl          * ) override final; | 
|---|
|  | 140 | const ast::AsmDecl *          visit( const ast::AsmDecl              * ) override final; | 
|---|
| [2d019af] | 141 | const ast::DirectiveDecl *    visit( const ast::DirectiveDecl        * ) override final; | 
|---|
| [23f99e1] | 142 | const ast::StaticAssertDecl * visit( const ast::StaticAssertDecl     * ) override final; | 
|---|
|  | 143 | const ast::CompoundStmt *     visit( const ast::CompoundStmt         * ) override final; | 
|---|
|  | 144 | const ast::Stmt *             visit( const ast::ExprStmt             * ) override final; | 
|---|
|  | 145 | const ast::Stmt *             visit( const ast::AsmStmt              * ) override final; | 
|---|
|  | 146 | const ast::Stmt *             visit( const ast::DirectiveStmt        * ) override final; | 
|---|
|  | 147 | const ast::Stmt *             visit( const ast::IfStmt               * ) override final; | 
|---|
|  | 148 | const ast::Stmt *             visit( const ast::WhileStmt            * ) override final; | 
|---|
|  | 149 | const ast::Stmt *             visit( const ast::ForStmt              * ) override final; | 
|---|
|  | 150 | const ast::Stmt *             visit( const ast::SwitchStmt           * ) override final; | 
|---|
|  | 151 | const ast::Stmt *             visit( const ast::CaseStmt             * ) override final; | 
|---|
|  | 152 | const ast::Stmt *             visit( const ast::BranchStmt           * ) override final; | 
|---|
|  | 153 | const ast::Stmt *             visit( const ast::ReturnStmt           * ) override final; | 
|---|
|  | 154 | const ast::Stmt *             visit( const ast::ThrowStmt            * ) override final; | 
|---|
|  | 155 | const ast::Stmt *             visit( const ast::TryStmt              * ) override final; | 
|---|
|  | 156 | const ast::Stmt *             visit( const ast::CatchStmt            * ) override final; | 
|---|
|  | 157 | const ast::Stmt *             visit( const ast::FinallyStmt          * ) override final; | 
|---|
| [37cdd97] | 158 | const ast::Stmt *             visit( const ast::SuspendStmt          * ) override final; | 
|---|
| [23f99e1] | 159 | const ast::Stmt *             visit( const ast::WaitForStmt          * ) override final; | 
|---|
| [e67991f] | 160 | const ast::Decl *             visit( const ast::WithStmt             * ) override final; | 
|---|
| [23f99e1] | 161 | const ast::NullStmt *         visit( const ast::NullStmt             * ) override final; | 
|---|
|  | 162 | const ast::Stmt *             visit( const ast::DeclStmt             * ) override final; | 
|---|
|  | 163 | const ast::Stmt *             visit( const ast::ImplicitCtorDtorStmt * ) override final; | 
|---|
|  | 164 | const ast::Expr *             visit( const ast::ApplicationExpr      * ) override final; | 
|---|
|  | 165 | const ast::Expr *             visit( const ast::UntypedExpr          * ) override final; | 
|---|
|  | 166 | const ast::Expr *             visit( const ast::NameExpr             * ) override final; | 
|---|
|  | 167 | const ast::Expr *             visit( const ast::AddressExpr          * ) override final; | 
|---|
|  | 168 | const ast::Expr *             visit( const ast::LabelAddressExpr     * ) override final; | 
|---|
|  | 169 | const ast::Expr *             visit( const ast::CastExpr             * ) override final; | 
|---|
|  | 170 | const ast::Expr *             visit( const ast::KeywordCastExpr      * ) override final; | 
|---|
|  | 171 | const ast::Expr *             visit( const ast::VirtualCastExpr      * ) override final; | 
|---|
|  | 172 | const ast::Expr *             visit( const ast::UntypedMemberExpr    * ) override final; | 
|---|
|  | 173 | const ast::Expr *             visit( const ast::MemberExpr           * ) override final; | 
|---|
|  | 174 | const ast::Expr *             visit( const ast::VariableExpr         * ) override final; | 
|---|
|  | 175 | const ast::Expr *             visit( const ast::ConstantExpr         * ) override final; | 
|---|
|  | 176 | const ast::Expr *             visit( const ast::SizeofExpr           * ) override final; | 
|---|
|  | 177 | const ast::Expr *             visit( const ast::AlignofExpr          * ) override final; | 
|---|
|  | 178 | const ast::Expr *             visit( const ast::UntypedOffsetofExpr  * ) override final; | 
|---|
|  | 179 | const ast::Expr *             visit( const ast::OffsetofExpr         * ) override final; | 
|---|
|  | 180 | const ast::Expr *             visit( const ast::OffsetPackExpr       * ) override final; | 
|---|
|  | 181 | const ast::Expr *             visit( const ast::LogicalExpr          * ) override final; | 
|---|
|  | 182 | const ast::Expr *             visit( const ast::ConditionalExpr      * ) override final; | 
|---|
|  | 183 | const ast::Expr *             visit( const ast::CommaExpr            * ) override final; | 
|---|
|  | 184 | const ast::Expr *             visit( const ast::TypeExpr             * ) override final; | 
|---|
|  | 185 | const ast::Expr *             visit( const ast::AsmExpr              * ) override final; | 
|---|
|  | 186 | const ast::Expr *             visit( const ast::ImplicitCopyCtorExpr * ) override final; | 
|---|
|  | 187 | const ast::Expr *             visit( const ast::ConstructorExpr      * ) override final; | 
|---|
|  | 188 | const ast::Expr *             visit( const ast::CompoundLiteralExpr  * ) override final; | 
|---|
|  | 189 | const ast::Expr *             visit( const ast::RangeExpr            * ) override final; | 
|---|
|  | 190 | const ast::Expr *             visit( const ast::UntypedTupleExpr     * ) override final; | 
|---|
|  | 191 | const ast::Expr *             visit( const ast::TupleExpr            * ) override final; | 
|---|
|  | 192 | const ast::Expr *             visit( const ast::TupleIndexExpr       * ) override final; | 
|---|
|  | 193 | const ast::Expr *             visit( const ast::TupleAssignExpr      * ) override final; | 
|---|
|  | 194 | const ast::Expr *             visit( const ast::StmtExpr             * ) override final; | 
|---|
|  | 195 | const ast::Expr *             visit( const ast::UniqueExpr           * ) override final; | 
|---|
|  | 196 | const ast::Expr *             visit( const ast::UntypedInitExpr      * ) override final; | 
|---|
|  | 197 | const ast::Expr *             visit( const ast::InitExpr             * ) override final; | 
|---|
|  | 198 | const ast::Expr *             visit( const ast::DeletedExpr          * ) override final; | 
|---|
|  | 199 | const ast::Expr *             visit( const ast::DefaultArgExpr       * ) override final; | 
|---|
|  | 200 | const ast::Expr *             visit( const ast::GenericExpr          * ) override final; | 
|---|
|  | 201 | const ast::Type *             visit( const ast::VoidType             * ) override final; | 
|---|
|  | 202 | const ast::Type *             visit( const ast::BasicType            * ) override final; | 
|---|
|  | 203 | const ast::Type *             visit( const ast::PointerType          * ) override final; | 
|---|
|  | 204 | const ast::Type *             visit( const ast::ArrayType            * ) override final; | 
|---|
|  | 205 | const ast::Type *             visit( const ast::ReferenceType        * ) override final; | 
|---|
|  | 206 | const ast::Type *             visit( const ast::QualifiedType        * ) override final; | 
|---|
|  | 207 | const ast::Type *             visit( const ast::FunctionType         * ) override final; | 
|---|
|  | 208 | const ast::Type *             visit( const ast::StructInstType       * ) override final; | 
|---|
|  | 209 | const ast::Type *             visit( const ast::UnionInstType        * ) override final; | 
|---|
|  | 210 | const ast::Type *             visit( const ast::EnumInstType         * ) override final; | 
|---|
|  | 211 | const ast::Type *             visit( const ast::TraitInstType        * ) override final; | 
|---|
|  | 212 | const ast::Type *             visit( const ast::TypeInstType         * ) override final; | 
|---|
|  | 213 | const ast::Type *             visit( const ast::TupleType            * ) override final; | 
|---|
|  | 214 | const ast::Type *             visit( const ast::TypeofType           * ) override final; | 
|---|
|  | 215 | const ast::Type *             visit( const ast::VarArgsType          * ) override final; | 
|---|
|  | 216 | const ast::Type *             visit( const ast::ZeroType             * ) override final; | 
|---|
|  | 217 | const ast::Type *             visit( const ast::OneType              * ) override final; | 
|---|
|  | 218 | const ast::Type *             visit( const ast::GlobalScopeType      * ) override final; | 
|---|
|  | 219 | const ast::Designation *      visit( const ast::Designation          * ) override final; | 
|---|
|  | 220 | const ast::Init *             visit( const ast::SingleInit           * ) override final; | 
|---|
|  | 221 | const ast::Init *             visit( const ast::ListInit             * ) override final; | 
|---|
|  | 222 | const ast::Init *             visit( const ast::ConstructorInit      * ) override final; | 
|---|
|  | 223 | const ast::Attribute *        visit( const ast::Attribute            * ) override final; | 
|---|
|  | 224 | const ast::TypeSubstitution * visit( const ast::TypeSubstitution     * ) override final; | 
|---|
| [f47f887] | 225 |  | 
|---|
| [7ff3e522] | 226 | template<typename core_type> | 
|---|
|  | 227 | friend void accept_all( std::list< ptr<Decl> > & decls, Pass<core_type>& visitor ); | 
|---|
| [53d55b6] | 228 |  | 
|---|
|  | 229 | bool isInFunction() const { | 
|---|
|  | 230 | return inFunction; | 
|---|
|  | 231 | } | 
|---|
|  | 232 |  | 
|---|
| [f47f887] | 233 | private: | 
|---|
|  | 234 |  | 
|---|
| [7ff3e522] | 235 | bool __visit_children() { __pass::bool_ref * ptr = __pass::visit_children(core, 0); return ptr ? *ptr : true; } | 
|---|
| [f47f887] | 236 |  | 
|---|
|  | 237 | private: | 
|---|
| [6d51bd7] | 238 | const ast::Stmt * call_accept( const ast::Stmt * ); | 
|---|
|  | 239 | const ast::Expr * call_accept( const ast::Expr * ); | 
|---|
| [f47f887] | 240 |  | 
|---|
| [490fb92e] | 241 | // requests WithStmtsToAdd directly add to this statement, as if it is a compound. | 
|---|
|  | 242 |  | 
|---|
|  | 243 | const ast::Stmt * call_accept_as_compound(const ast::Stmt *); | 
|---|
|  | 244 |  | 
|---|
| [6d51bd7] | 245 | template< typename node_t > | 
|---|
| [8a5530c] | 246 | auto call_accept( const node_t * node ) -> typename std::enable_if< | 
|---|
|  | 247 | !std::is_base_of<ast::Expr, node_t>::value && | 
|---|
|  | 248 | !std::is_base_of<ast::Stmt, node_t>::value | 
|---|
|  | 249 | , decltype( node->accept(*this) ) | 
|---|
|  | 250 | >::type; | 
|---|
| [f47f887] | 251 |  | 
|---|
| [6d51bd7] | 252 | template< template <class...> class container_t > | 
|---|
| [04124c4] | 253 | container_t< ptr<Stmt> > call_accept( const container_t< ptr<Stmt> > & ); | 
|---|
| [f47f887] | 254 |  | 
|---|
| [6d51bd7] | 255 | template< template <class...> class container_t, typename node_t > | 
|---|
| [04124c4] | 256 | container_t< ptr<node_t> > call_accept( const container_t< ptr<node_t> > & container ); | 
|---|
| [f47f887] | 257 |  | 
|---|
| [2b59f55] | 258 | public: | 
|---|
| [6d51bd7] | 259 | /// Logic to call the accept and mutate the parent if needed, delegates call to accept | 
|---|
|  | 260 | template<typename node_t, typename parent_t, typename child_t> | 
|---|
|  | 261 | void maybe_accept(const node_t * &, child_t parent_t::* child); | 
|---|
|  | 262 |  | 
|---|
| [490fb92e] | 263 | template<typename node_t, typename parent_t, typename child_t> | 
|---|
|  | 264 | void maybe_accept_as_compound(const node_t * &, child_t parent_t::* child); | 
|---|
|  | 265 |  | 
|---|
| [f47f887] | 266 | private: | 
|---|
| [0e42794] | 267 | /// Internal RAII guard for symbol table features | 
|---|
|  | 268 | struct guard_symtab { | 
|---|
| [7ff3e522] | 269 | guard_symtab( Pass<core_t> & pass ): pass( pass ) { __pass::symtab::enter(pass.core, 0); } | 
|---|
|  | 270 | ~guard_symtab()                                   { __pass::symtab::leave(pass.core, 0); } | 
|---|
|  | 271 | Pass<core_t> & pass; | 
|---|
| [f47f887] | 272 | }; | 
|---|
|  | 273 |  | 
|---|
| [04124c4] | 274 | /// Internal RAII guard for scope features | 
|---|
|  | 275 | struct guard_scope { | 
|---|
| [7ff3e522] | 276 | guard_scope( Pass<core_t> & pass ): pass( pass ) { __pass::scope::enter(pass.core, 0); } | 
|---|
|  | 277 | ~guard_scope()                                   { __pass::scope::leave(pass.core, 0); } | 
|---|
|  | 278 | Pass<core_t> & pass; | 
|---|
| [f47f887] | 279 | }; | 
|---|
| [23f99e1] | 280 |  | 
|---|
| [e0e9a0b] | 281 | /// Internal RAII guard for forall substitutions | 
|---|
|  | 282 | struct guard_forall_subs { | 
|---|
| [361bf01] | 283 | guard_forall_subs( Pass<core_t> & pass, const FunctionType * type ) | 
|---|
| [7ff3e522] | 284 | : pass( pass ), type( type ) { __pass::forall::enter(pass.core, 0, type ); } | 
|---|
|  | 285 | ~guard_forall_subs()         { __pass::forall::leave(pass.core, 0, type ); } | 
|---|
|  | 286 | Pass<core_t> & pass; | 
|---|
| [361bf01] | 287 | const FunctionType * type; | 
|---|
| [e0e9a0b] | 288 | }; | 
|---|
|  | 289 |  | 
|---|
| [23f99e1] | 290 | private: | 
|---|
|  | 291 | bool inFunction = false; | 
|---|
| [c6c682cf] | 292 | bool atFunctionTop = false; | 
|---|
| [f47f887] | 293 | }; | 
|---|
|  | 294 |  | 
|---|
| [d8938622] | 295 | /// Apply a pass to an entire translation unit | 
|---|
| [7ff3e522] | 296 | template<typename core_t> | 
|---|
|  | 297 | void accept_all( std::list< ast::ptr<ast::Decl> > &, ast::Pass<core_t> & visitor ); | 
|---|
| [f47f887] | 298 |  | 
|---|
| [293dc1c] | 299 | template<typename core_t> | 
|---|
|  | 300 | void accept_all( ast::TranslationUnit &, ast::Pass<core_t> & visitor ); | 
|---|
|  | 301 |  | 
|---|
| [04124c4] | 302 | //------------------------------------------------------------------------------------------------- | 
|---|
| [f47f887] | 303 | // PASS ACCESSORIES | 
|---|
| [04124c4] | 304 | //------------------------------------------------------------------------------------------------- | 
|---|
| [f47f887] | 305 |  | 
|---|
| [73f1b1c] | 306 | /// If used the visitor will always clone nodes. | 
|---|
| [d3aa64f1] | 307 | struct PureVisitor {}; | 
|---|
|  | 308 |  | 
|---|
| [b2a11ba] | 309 | /// Keep track of the polymorphic const TypeSubstitution * typeSubs for the current expression. | 
|---|
| [04124c4] | 310 | struct WithConstTypeSubstitution { | 
|---|
| [b2a11ba] | 311 | const TypeSubstitution * typeSubs = nullptr; | 
|---|
| [04124c4] | 312 | }; | 
|---|
|  | 313 |  | 
|---|
|  | 314 | /// Used if visitor requires added statements before or after the current node. | 
|---|
|  | 315 | /// The Pass template handles what *before* and *after* means automatically | 
|---|
| [6d51bd7] | 316 | template< template<class...> class container_t = std::list > | 
|---|
| [f47f887] | 317 | struct WithStmtsToAdd { | 
|---|
| [04124c4] | 318 | container_t< ptr<Stmt> > stmtsToAddBefore; | 
|---|
|  | 319 | container_t< ptr<Stmt> > stmtsToAddAfter; | 
|---|
| [f47f887] | 320 | }; | 
|---|
|  | 321 |  | 
|---|
| [04124c4] | 322 | /// Used if visitor requires added declarations before or after the current node. | 
|---|
|  | 323 | /// The Pass template handles what *before* and *after* means automatically | 
|---|
| [6d51bd7] | 324 | template< template<class...> class container_t = std::list > | 
|---|
| [f47f887] | 325 | struct WithDeclsToAdd { | 
|---|
| [04124c4] | 326 | container_t< ptr<Decl> > declsToAddBefore; | 
|---|
|  | 327 | container_t< ptr<Decl> > declsToAddAfter; | 
|---|
| [f47f887] | 328 | }; | 
|---|
|  | 329 |  | 
|---|
| [04124c4] | 330 | /// Use if visitation should stop at certain levels | 
|---|
|  | 331 | /// set visit_children false of all child nodes should be ignored | 
|---|
| [f47f887] | 332 | struct WithShortCircuiting { | 
|---|
|  | 333 | __pass::bool_ref visit_children; | 
|---|
|  | 334 | }; | 
|---|
|  | 335 |  | 
|---|
| [04124c4] | 336 | /// Used to restore values/functions/etc. when the Pass finishes visiting this node | 
|---|
|  | 337 | class WithGuards { | 
|---|
| [e16e27e1] | 338 | __pass::at_cleanup_t at_cleanup = [](__pass::cleanup_func_t, void*) { | 
|---|
|  | 339 | std::cerr << "No cleanup function was set" << std::endl; | 
|---|
|  | 340 | abort(); | 
|---|
|  | 341 | }; | 
|---|
| [f47f887] | 342 |  | 
|---|
| [7ff3e522] | 343 | template< typename core_t> | 
|---|
|  | 344 | friend auto __pass::at_cleanup( core_t & core, int ) -> decltype( &core.at_cleanup ); | 
|---|
| [04124c4] | 345 | public: | 
|---|
| [e16e27e1] | 346 |  | 
|---|
| [04124c4] | 347 | /// When this node is finished being visited, restore the value of a variable | 
|---|
|  | 348 | template< typename T > | 
|---|
|  | 349 | void GuardValue( T& val ) { | 
|---|
|  | 350 | at_cleanup( [ val ]( void * newVal ) { | 
|---|
|  | 351 | * static_cast< T * >( newVal ) = val; | 
|---|
|  | 352 | }, static_cast< void * >( & val ) ); | 
|---|
|  | 353 | } | 
|---|
| [f47f887] | 354 |  | 
|---|
| [04124c4] | 355 | /// On the object, all beginScope now and endScope when the current node is finished being visited | 
|---|
|  | 356 | template< typename T > | 
|---|
|  | 357 | void GuardScope( T& val ) { | 
|---|
|  | 358 | val.beginScope(); | 
|---|
|  | 359 | at_cleanup( []( void * val ) { | 
|---|
|  | 360 | static_cast< T * >( val )->endScope(); | 
|---|
|  | 361 | }, static_cast< void * >( & val ) ); | 
|---|
|  | 362 | } | 
|---|
| [f47f887] | 363 |  | 
|---|
| [04124c4] | 364 | /// When this node is finished being visited, call a function | 
|---|
|  | 365 | template< typename Func > | 
|---|
|  | 366 | void GuardAction( Func func ) { | 
|---|
|  | 367 | at_cleanup( [func](void *) { func(); }, nullptr ); | 
|---|
|  | 368 | } | 
|---|
| [be8518f] | 369 |  | 
|---|
|  | 370 | /// When this node is finished being visited, call a member of an object. | 
|---|
|  | 371 | template<typename T> | 
|---|
|  | 372 | void GuardMethod( T * obj, void (T::*method)() ) { | 
|---|
|  | 373 | at_cleanup( [ method ]( void * object ) { | 
|---|
|  | 374 | static_cast< T * >( object )->method(); | 
|---|
|  | 375 | }, static_cast< void * >( obj ) ); | 
|---|
|  | 376 | } | 
|---|
| [04124c4] | 377 | }; | 
|---|
| [f47f887] | 378 |  | 
|---|
| [04124c4] | 379 | /// Used to get a pointer to the pass with its wrapped type | 
|---|
| [7ff3e522] | 380 | template<typename core_t> | 
|---|
| [04124c4] | 381 | struct WithVisitorRef { | 
|---|
| [7ff3e522] | 382 | Pass<core_t> * const visitor = nullptr; | 
|---|
| [f47f887] | 383 |  | 
|---|
| [53d55b6] | 384 | bool isInFunction() const { | 
|---|
|  | 385 | return visitor->isInFunction(); | 
|---|
| [cb25fc9] | 386 | } | 
|---|
|  | 387 | }; | 
|---|
|  | 388 |  | 
|---|
| [0e42794] | 389 | /// Use when the templated visitor should update the symbol table | 
|---|
|  | 390 | struct WithSymbolTable { | 
|---|
|  | 391 | SymbolTable symtab; | 
|---|
| [f47f887] | 392 | }; | 
|---|
| [e0e9a0b] | 393 |  | 
|---|
| [6d51bd7] | 394 | } | 
|---|
|  | 395 |  | 
|---|
|  | 396 | #include "Common/Stats.h" | 
|---|
|  | 397 |  | 
|---|
| [172d9342] | 398 | namespace ast { | 
|---|
| [6d51bd7] | 399 | extern struct PassVisitorStats { | 
|---|
|  | 400 | size_t depth = 0; | 
|---|
| [c408483] | 401 | Stats::Counters::MaxCounter<double> * max; | 
|---|
|  | 402 | Stats::Counters::AverageCounter<double> * avg; | 
|---|
| [6d51bd7] | 403 | } pass_visitor_stats; | 
|---|
| [172d9342] | 404 | } | 
|---|
| [6d51bd7] | 405 |  | 
|---|
| [be8518f] | 406 | #include "AST/Pass.impl.hpp" | 
|---|