source: src/AST/Pass.hpp @ 923d25a

ADTarm-ehast-experimentalenumforall-pointer-decayjacob/cs343-translationnew-astnew-ast-unique-exprpthread-emulationqualifiedEnum
Last change on this file since 923d25a was 7030dab, checked in by Thierry Delisle <tdelisle@…>, 4 years ago

Merge branch 'master' into new-ast
  • Property mode set to 100644
File size: 17.0 KB
Line 
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
10// Created On       : Thu May 09 15::37::05 2019
11// Last Modified By :
12// Last Modified On :
13// Update Count     :
14//
15
16#pragma once
17// IWYU pragma: private, include "AST/Pass.hpp"
18
19#include <functional>
20#include <list>
21#include <stack>
22
23#include "AST/Fwd.hpp"
24#include "AST/Node.hpp"
25
26#include "AST/Attribute.hpp"
27#include "AST/Decl.hpp"
28#include "AST/Expr.hpp"
29#include "AST/Init.hpp"
30#include "AST/Stmt.hpp"
31#include "AST/Type.hpp"
32
33#include "AST/Visitor.hpp"
34
35#include "AST/SymbolTable.hpp"
36
37#include "AST/ForallSubstitutionTable.hpp"
38
39// Private prelude header, needed for some of the magic tricks this class pulls off
40#include "AST/Pass.proto.hpp"
41
42namespace ast {
43//-------------------------------------------------------------------------------------------------
44// Templated visitor type
45// To use declare a Pass< YOUR VISITOR TYPE >
46// The visitor type should specify the previsit/postvisit for types that are desired.
47// Note: previsit/postvisit must be **public** members
48//
49// Several additional features are available through inheritance
50// | WithTypeSubstitution  - provides polymorphic const TypeSubstitution * env for the
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
66// | WithForallSubstitutor - maintains links between TypeInstType and TypeDecl under mutation
67//-------------------------------------------------------------------------------------------------
68template< typename pass_t >
69class Pass final : public ast::Visitor {
70public:
71        /// Forward any arguments to the pass constructor
72        /// Propagate 'this' if necessary
73        template< typename... Args >
74        Pass( Args &&... args)
75                : pass( std::forward<Args>( args )... )
76        {
77                // After the pass is constructed, check if it wants the have a pointer to the wrapping visitor
78                typedef Pass<pass_t> this_t;
79                this_t * const * visitor = __pass::visitor(pass, 0);
80                if(visitor) {
81                        *const_cast<this_t **>( visitor ) = this;
82                }
83        }
84
85        virtual ~Pass() = default;
86
87        /// Storage for the actual pass
88        pass_t pass;
89
90        /// Visit function declarations
91        const ast::DeclWithType *     visit( const ast::ObjectDecl           * ) override final;
92        const ast::DeclWithType *     visit( const ast::FunctionDecl         * ) override final;
93        const ast::Decl *             visit( const ast::StructDecl           * ) override final;
94        const ast::Decl *             visit( const ast::UnionDecl            * ) override final;
95        const ast::Decl *             visit( const ast::EnumDecl             * ) override final;
96        const ast::Decl *             visit( const ast::TraitDecl            * ) override final;
97        const ast::Decl *             visit( const ast::TypeDecl             * ) override final;
98        const ast::Decl *             visit( const ast::TypedefDecl          * ) override final;
99        const ast::AsmDecl *          visit( const ast::AsmDecl              * ) override final;
100        const ast::StaticAssertDecl * visit( const ast::StaticAssertDecl     * ) override final;
101        const ast::CompoundStmt *     visit( const ast::CompoundStmt         * ) override final;
102        const ast::Stmt *             visit( const ast::ExprStmt             * ) override final;
103        const ast::Stmt *             visit( const ast::AsmStmt              * ) override final;
104        const ast::Stmt *             visit( const ast::DirectiveStmt        * ) override final;
105        const ast::Stmt *             visit( const ast::IfStmt               * ) override final;
106        const ast::Stmt *             visit( const ast::WhileStmt            * ) override final;
107        const ast::Stmt *             visit( const ast::ForStmt              * ) override final;
108        const ast::Stmt *             visit( const ast::SwitchStmt           * ) override final;
109        const ast::Stmt *             visit( const ast::CaseStmt             * ) override final;
110        const ast::Stmt *             visit( const ast::BranchStmt           * ) override final;
111        const ast::Stmt *             visit( const ast::ReturnStmt           * ) override final;
112        const ast::Stmt *             visit( const ast::ThrowStmt            * ) override final;
113        const ast::Stmt *             visit( const ast::TryStmt              * ) override final;
114        const ast::Stmt *             visit( const ast::CatchStmt            * ) override final;
115        const ast::Stmt *             visit( const ast::FinallyStmt          * ) override final;
116        const ast::Stmt *             visit( const ast::SuspendStmt          * ) override final;
117        const ast::Stmt *             visit( const ast::WaitForStmt          * ) override final;
118        const ast::Decl *             visit( const ast::WithStmt             * ) override final;
119        const ast::NullStmt *         visit( const ast::NullStmt             * ) override final;
120        const ast::Stmt *             visit( const ast::DeclStmt             * ) override final;
121        const ast::Stmt *             visit( const ast::ImplicitCtorDtorStmt * ) override final;
122        const ast::Expr *             visit( const ast::ApplicationExpr      * ) override final;
123        const ast::Expr *             visit( const ast::UntypedExpr          * ) override final;
124        const ast::Expr *             visit( const ast::NameExpr             * ) override final;
125        const ast::Expr *             visit( const ast::AddressExpr          * ) override final;
126        const ast::Expr *             visit( const ast::LabelAddressExpr     * ) override final;
127        const ast::Expr *             visit( const ast::CastExpr             * ) override final;
128        const ast::Expr *             visit( const ast::KeywordCastExpr      * ) override final;
129        const ast::Expr *             visit( const ast::VirtualCastExpr      * ) override final;
130        const ast::Expr *             visit( const ast::UntypedMemberExpr    * ) override final;
131        const ast::Expr *             visit( const ast::MemberExpr           * ) override final;
132        const ast::Expr *             visit( const ast::VariableExpr         * ) override final;
133        const ast::Expr *             visit( const ast::ConstantExpr         * ) override final;
134        const ast::Expr *             visit( const ast::SizeofExpr           * ) override final;
135        const ast::Expr *             visit( const ast::AlignofExpr          * ) override final;
136        const ast::Expr *             visit( const ast::UntypedOffsetofExpr  * ) override final;
137        const ast::Expr *             visit( const ast::OffsetofExpr         * ) override final;
138        const ast::Expr *             visit( const ast::OffsetPackExpr       * ) override final;
139        const ast::Expr *             visit( const ast::LogicalExpr          * ) override final;
140        const ast::Expr *             visit( const ast::ConditionalExpr      * ) override final;
141        const ast::Expr *             visit( const ast::CommaExpr            * ) override final;
142        const ast::Expr *             visit( const ast::TypeExpr             * ) override final;
143        const ast::Expr *             visit( const ast::AsmExpr              * ) override final;
144        const ast::Expr *             visit( const ast::ImplicitCopyCtorExpr * ) override final;
145        const ast::Expr *             visit( const ast::ConstructorExpr      * ) override final;
146        const ast::Expr *             visit( const ast::CompoundLiteralExpr  * ) override final;
147        const ast::Expr *             visit( const ast::RangeExpr            * ) override final;
148        const ast::Expr *             visit( const ast::UntypedTupleExpr     * ) override final;
149        const ast::Expr *             visit( const ast::TupleExpr            * ) override final;
150        const ast::Expr *             visit( const ast::TupleIndexExpr       * ) override final;
151        const ast::Expr *             visit( const ast::TupleAssignExpr      * ) override final;
152        const ast::Expr *             visit( const ast::StmtExpr             * ) override final;
153        const ast::Expr *             visit( const ast::UniqueExpr           * ) override final;
154        const ast::Expr *             visit( const ast::UntypedInitExpr      * ) override final;
155        const ast::Expr *             visit( const ast::InitExpr             * ) override final;
156        const ast::Expr *             visit( const ast::DeletedExpr          * ) override final;
157        const ast::Expr *             visit( const ast::DefaultArgExpr       * ) override final;
158        const ast::Expr *             visit( const ast::GenericExpr          * ) override final;
159        const ast::Type *             visit( const ast::VoidType             * ) override final;
160        const ast::Type *             visit( const ast::BasicType            * ) override final;
161        const ast::Type *             visit( const ast::PointerType          * ) override final;
162        const ast::Type *             visit( const ast::ArrayType            * ) override final;
163        const ast::Type *             visit( const ast::ReferenceType        * ) override final;
164        const ast::Type *             visit( const ast::QualifiedType        * ) override final;
165        const ast::Type *             visit( const ast::FunctionType         * ) override final;
166        const ast::Type *             visit( const ast::StructInstType       * ) override final;
167        const ast::Type *             visit( const ast::UnionInstType        * ) override final;
168        const ast::Type *             visit( const ast::EnumInstType         * ) override final;
169        const ast::Type *             visit( const ast::TraitInstType        * ) override final;
170        const ast::Type *             visit( const ast::TypeInstType         * ) override final;
171        const ast::Type *             visit( const ast::TupleType            * ) override final;
172        const ast::Type *             visit( const ast::TypeofType           * ) override final;
173        const ast::Type *             visit( const ast::VarArgsType          * ) override final;
174        const ast::Type *             visit( const ast::ZeroType             * ) override final;
175        const ast::Type *             visit( const ast::OneType              * ) override final;
176        const ast::Type *             visit( const ast::GlobalScopeType      * ) override final;
177        const ast::Designation *      visit( const ast::Designation          * ) override final;
178        const ast::Init *             visit( const ast::SingleInit           * ) override final;
179        const ast::Init *             visit( const ast::ListInit             * ) override final;
180        const ast::Init *             visit( const ast::ConstructorInit      * ) override final;
181        const ast::Attribute *        visit( const ast::Attribute            * ) override final;
182        const ast::TypeSubstitution * visit( const ast::TypeSubstitution     * ) override final;
183
184        template<typename pass_type>
185        friend void accept_all( std::list< ptr<Decl> > & decls, Pass<pass_type>& visitor );
186private:
187
188        bool __visit_children() { __pass::bool_ref * ptr = __pass::visit_children(pass, 0); return ptr ? *ptr : true; }
189
190private:
191        const ast::Stmt * call_accept( const ast::Stmt * );
192        const ast::Expr * call_accept( const ast::Expr * );
193
194        template< typename node_t >
195        auto call_accept( const node_t * node ) -> typename std::enable_if<
196                                !std::is_base_of<ast::Expr, node_t>::value &&
197                                !std::is_base_of<ast::Stmt, node_t>::value
198                        , decltype( node->accept(*this) )
199                >::type;
200
201        template< template <class...> class container_t >
202        container_t< ptr<Stmt> > call_accept( const container_t< ptr<Stmt> > & );
203
204        template< template <class...> class container_t, typename node_t >
205        container_t< ptr<node_t> > call_accept( const container_t< ptr<node_t> > & container );
206
207        /// Mutate forall-list, accounting for presence of type substitution map
208        template<typename node_t>
209        void mutate_forall( const node_t *& );
210
211public:
212        /// Logic to call the accept and mutate the parent if needed, delegates call to accept
213        template<typename node_t, typename parent_t, typename child_t>
214        void maybe_accept(const node_t * &, child_t parent_t::* child);
215
216private:
217        /// Internal RAII guard for symbol table features
218        struct guard_symtab {
219                guard_symtab( Pass<pass_t> & pass ): pass( pass ) { __pass::symtab::enter(pass.pass, 0); }
220                ~guard_symtab()                                   { __pass::symtab::leave(pass.pass, 0); }
221                Pass<pass_t> & pass;
222        };
223
224        /// Internal RAII guard for scope features
225        struct guard_scope {
226                guard_scope( Pass<pass_t> & pass ): pass( pass ) { __pass::scope::enter(pass.pass, 0); }
227                ~guard_scope()                                   { __pass::scope::leave(pass.pass, 0); }
228                Pass<pass_t> & pass;
229        };
230
231        /// Internal RAII guard for forall substitutions
232        struct guard_forall_subs {
233                guard_forall_subs( Pass<pass_t> & pass, const ParameterizedType * type )
234                : pass( pass ), type( type ) { __pass::forall::enter(pass.pass, 0, type ); }
235                ~guard_forall_subs()         { __pass::forall::leave(pass.pass, 0, type ); }
236                Pass<pass_t> & pass;
237                const ParameterizedType * type;
238        };
239
240private:
241        bool inFunction = false;
242};
243
244/// Apply a pass to an entire translation unit
245template<typename pass_t>
246void accept_all( std::list< ast::ptr<ast::Decl> > &, ast::Pass<pass_t> & visitor );
247
248//-------------------------------------------------------------------------------------------------
249// PASS ACCESSORIES
250//-------------------------------------------------------------------------------------------------
251
252/// Keep track of the polymorphic const TypeSubstitution * env for the current expression
253struct WithConstTypeSubstitution {
254        const TypeSubstitution * env = nullptr;
255};
256
257/// Used if visitor requires added statements before or after the current node.
258/// The Pass template handles what *before* and *after* means automatically
259template< template<class...> class container_t = std::list >
260struct WithStmtsToAdd {
261        container_t< ptr<Stmt> > stmtsToAddBefore;
262        container_t< ptr<Stmt> > stmtsToAddAfter;
263};
264
265/// Used if visitor requires added declarations before or after the current node.
266/// The Pass template handles what *before* and *after* means automatically
267template< template<class...> class container_t = std::list >
268struct WithDeclsToAdd {
269        container_t< ptr<Decl> > declsToAddBefore;
270        container_t< ptr<Decl> > declsToAddAfter;
271};
272
273/// Use if visitation should stop at certain levels
274/// set visit_children false of all child nodes should be ignored
275struct WithShortCircuiting {
276        __pass::bool_ref visit_children;
277};
278
279/// Used to restore values/functions/etc. when the Pass finishes visiting this node
280class WithGuards {
281        __pass::at_cleanup_t at_cleanup = [](__pass::cleanup_func_t, void*) {
282                std::cerr << "No cleanup function was set" << std::endl;
283                abort();
284        };
285
286        template< typename pass_t>
287        friend auto __pass::at_cleanup( pass_t & pass, int ) -> decltype( &pass.at_cleanup );
288public:
289
290        /// When this node is finished being visited, restore the value of a variable
291        template< typename T >
292        void GuardValue( T& val ) {
293                at_cleanup( [ val ]( void * newVal ) {
294                        * static_cast< T * >( newVal ) = val;
295                }, static_cast< void * >( & val ) );
296        }
297
298        /// On the object, all beginScope now and endScope when the current node is finished being visited
299        template< typename T >
300        void GuardScope( T& val ) {
301                val.beginScope();
302                at_cleanup( []( void * val ) {
303                        static_cast< T * >( val )->endScope();
304                }, static_cast< void * >( & val ) );
305        }
306
307        /// When this node is finished being visited, call a function
308        template< typename Func >
309        void GuardAction( Func func ) {
310                at_cleanup( [func](void *) { func(); }, nullptr );
311        }
312
313        /// When this node is finished being visited, call a member of an object.
314        template<typename T>
315        void GuardMethod( T * obj, void (T::*method)() ) {
316                at_cleanup( [ method ]( void * object ) {
317                        static_cast< T * >( object )->method();
318                }, static_cast< void * >( obj ) );
319        }
320};
321
322/// Used to get a pointer to the pass with its wrapped type
323template<typename pass_t>
324struct WithVisitorRef {
325        Pass<pass_t> * const visitor = nullptr;
326};
327
328/// Use when the templated visitor should update the symbol table
329struct WithSymbolTable {
330        SymbolTable symtab;
331};
332
333/// Use when the templated visitor needs to keep TypeInstType instances properly linked to TypeDecl
334struct WithForallSubstitutor {
335        ForallSubstitutionTable subs;
336};
337
338}
339
340#include "Common/Stats.h"
341
342namespace ast {
343extern struct PassVisitorStats {
344        size_t depth = 0;
345        Stats::Counters::MaxCounter<double> * max = nullptr;
346        Stats::Counters::AverageCounter<double> * avg = nullptr;
347} pass_visitor_stats;
348}
349
350#include "AST/Pass.impl.hpp"
Note: See TracBrowser for help on using the repository browser.