source: src/AST/Pass.hpp @ 0240a7cb

ADTast-experimentalenumpthread-emulationqualifiedEnum
Last change on this file since 0240a7cb was ee918356, checked in by Thierry Delisle <tdelisle@…>, 2 years ago

Some clean-up to remove clang-only warnings

  • Property mode set to 100644
File size: 21.3 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// Private prelude header, needed for some of the magic tricks this class pulls off
38#include "AST/Pass.proto.hpp"
39
40namespace 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
48// | PureVisitor           - makes the visitor pure, it never modifies nodes in place and always
49//                           clones nodes it needs to make changes to
50// | WithConstTypeSubstitution - provides polymorphic const TypeSubstitution * typeSubs 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//
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.
70//-------------------------------------------------------------------------------------------------
71template< typename core_t >
72class Pass final : public ast::Visitor {
73public:
74        using core_type = core_t;
75        using type = Pass<core_t>;
76
77        /// Forward any arguments to the pass constructor
78        /// Propagate 'this' if necessary
79        template< typename... Args >
80        Pass( Args &&... args)
81                : core( std::forward<Args>( args )... )
82        {
83                // After the pass is constructed, check if it wants the have a pointer to the wrapping visitor
84                type * const * visitor = __pass::visitor(core, 0);
85                if(visitor) {
86                        *const_cast<type **>( visitor ) = this;
87                }
88        }
89
90        virtual ~Pass() = default;
91
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
100        /// Construct and run a pass on a translation unit.
101        template< typename... Args >
102        static void run( TranslationUnit & decls, Args &&... args ) {
103                Pass<core_t> visitor( std::forward<Args>( args )... );
104                accept_all( decls, visitor );
105        }
106
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                auto const * temp = node->accept( visitor );
112                assert( temp == node );
113                return visitor.get_result();
114        }
115
116        // Versions of the above for older compilers.
117        template< typename... Args >
118        static void run( TranslationUnit & decls ) {
119                Pass<core_t> visitor;
120                accept_all( decls, visitor );
121        }
122
123        template< typename node_type, typename... Args >
124        static auto read( node_type const * node ) {
125                Pass<core_t> visitor;
126                auto const * temp = node->accept( visitor );
127                assert( temp == node );
128                return visitor.get_result();
129        }
130
131        /// Visit function declarations
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;
141        const ast::DirectiveDecl *    visit( const ast::DirectiveDecl        * ) override final;
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::WhileDoStmt          * ) 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;
158        const ast::Stmt *             visit( const ast::SuspendStmt          * ) override final;
159        const ast::Stmt *             visit( const ast::WaitForStmt          * ) override final;
160        const ast::Decl *             visit( const ast::WithStmt             * ) override final;
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::Stmt *             visit( const ast::MutexStmt            * ) override final;
165        const ast::Expr *             visit( const ast::ApplicationExpr      * ) override final;
166        const ast::Expr *             visit( const ast::UntypedExpr          * ) override final;
167        const ast::Expr *             visit( const ast::NameExpr             * ) override final;
168        const ast::Expr *             visit( const ast::AddressExpr          * ) override final;
169        const ast::Expr *             visit( const ast::LabelAddressExpr     * ) override final;
170        const ast::Expr *             visit( const ast::CastExpr             * ) override final;
171        const ast::Expr *             visit( const ast::KeywordCastExpr      * ) override final;
172        const ast::Expr *             visit( const ast::VirtualCastExpr      * ) override final;
173        const ast::Expr *             visit( const ast::UntypedMemberExpr    * ) override final;
174        const ast::Expr *             visit( const ast::MemberExpr           * ) override final;
175        const ast::Expr *             visit( const ast::VariableExpr         * ) override final;
176        const ast::Expr *             visit( const ast::ConstantExpr         * ) override final;
177        const ast::Expr *             visit( const ast::SizeofExpr           * ) override final;
178        const ast::Expr *             visit( const ast::AlignofExpr          * ) override final;
179        const ast::Expr *             visit( const ast::UntypedOffsetofExpr  * ) override final;
180        const ast::Expr *             visit( const ast::OffsetofExpr         * ) override final;
181        const ast::Expr *             visit( const ast::OffsetPackExpr       * ) override final;
182        const ast::Expr *             visit( const ast::LogicalExpr          * ) override final;
183        const ast::Expr *             visit( const ast::ConditionalExpr      * ) override final;
184        const ast::Expr *             visit( const ast::CommaExpr            * ) override final;
185        const ast::Expr *             visit( const ast::TypeExpr             * ) override final;
186        const ast::Expr *             visit( const ast::AsmExpr              * ) override final;
187        const ast::Expr *             visit( const ast::ImplicitCopyCtorExpr * ) override final;
188        const ast::Expr *             visit( const ast::ConstructorExpr      * ) override final;
189        const ast::Expr *             visit( const ast::CompoundLiteralExpr  * ) override final;
190        const ast::Expr *             visit( const ast::RangeExpr            * ) override final;
191        const ast::Expr *             visit( const ast::UntypedTupleExpr     * ) override final;
192        const ast::Expr *             visit( const ast::TupleExpr            * ) override final;
193        const ast::Expr *             visit( const ast::TupleIndexExpr       * ) override final;
194        const ast::Expr *             visit( const ast::TupleAssignExpr      * ) override final;
195        const ast::Expr *             visit( const ast::StmtExpr             * ) override final;
196        const ast::Expr *             visit( const ast::UniqueExpr           * ) override final;
197        const ast::Expr *             visit( const ast::UntypedInitExpr      * ) override final;
198        const ast::Expr *             visit( const ast::InitExpr             * ) override final;
199        const ast::Expr *             visit( const ast::DeletedExpr          * ) override final;
200        const ast::Expr *             visit( const ast::DefaultArgExpr       * ) override final;
201        const ast::Expr *             visit( const ast::GenericExpr          * ) override final;
202        const ast::Type *             visit( const ast::VoidType             * ) override final;
203        const ast::Type *             visit( const ast::BasicType            * ) override final;
204        const ast::Type *             visit( const ast::PointerType          * ) override final;
205        const ast::Type *             visit( const ast::ArrayType            * ) override final;
206        const ast::Type *             visit( const ast::ReferenceType        * ) override final;
207        const ast::Type *             visit( const ast::QualifiedType        * ) override final;
208        const ast::Type *             visit( const ast::FunctionType         * ) override final;
209        const ast::Type *             visit( const ast::StructInstType       * ) override final;
210        const ast::Type *             visit( const ast::UnionInstType        * ) override final;
211        const ast::Type *             visit( const ast::EnumInstType         * ) override final;
212        const ast::Type *             visit( const ast::TraitInstType        * ) override final;
213        const ast::Type *             visit( const ast::TypeInstType         * ) override final;
214        const ast::Type *             visit( const ast::TupleType            * ) override final;
215        const ast::Type *             visit( const ast::TypeofType           * ) override final;
216        const ast::Type *             visit( const ast::VTableType           * ) override final;
217        const ast::Type *             visit( const ast::VarArgsType          * ) override final;
218        const ast::Type *             visit( const ast::ZeroType             * ) override final;
219        const ast::Type *             visit( const ast::OneType              * ) override final;
220        const ast::Type *             visit( const ast::GlobalScopeType      * ) override final;
221        const ast::Designation *      visit( const ast::Designation          * ) override final;
222        const ast::Init *             visit( const ast::SingleInit           * ) override final;
223        const ast::Init *             visit( const ast::ListInit             * ) override final;
224        const ast::Init *             visit( const ast::ConstructorInit      * ) override final;
225        const ast::Attribute *        visit( const ast::Attribute            * ) override final;
226        const ast::TypeSubstitution * visit( const ast::TypeSubstitution     * ) override final;
227
228        template<typename core_type>
229        friend void accept_all( std::list< ptr<Decl> > & decls, Pass<core_type>& visitor );
230
231        bool isInFunction() const {
232                return inFunction;
233        }
234
235private:
236
237        bool __visit_children() { __pass::bool_ref * ptr = __pass::visit_children(core, 0); return ptr ? *ptr : true; }
238
239private:
240
241        // Regular nodes
242        template< typename node_t >
243        struct result1 {
244                bool differs;
245                const node_t * value;
246
247                template< typename object_t, typename super_t, typename field_t >
248                void apply(object_t *, field_t super_t::* field);
249        };
250
251        result1<ast::Stmt> call_accept( const ast::Stmt * );
252        result1<ast::Expr> call_accept( const ast::Expr * );
253
254        template< typename node_t >
255        auto call_accept( const node_t * node )
256                -> typename std::enable_if<
257                                !std::is_base_of<ast::Expr, node_t>::value &&
258                                !std::is_base_of<ast::Stmt, node_t>::value
259                        , result1<
260                                typename std::remove_pointer< decltype( node->accept(*this) ) >::type
261                        >
262                >::type;
263
264        // requests WithStmtsToAdd directly add to this statement, as if it is a compound.
265        result1<ast::Stmt> call_accept_as_compound(const ast::Stmt *);
266
267        // Container of statements
268        template< template <class...> class container_t >
269        struct resultNstmt {
270                struct delta {
271                        ptr<Stmt> nval;
272                        ssize_t old_idx;
273                        bool is_old;
274
275                        delta(const Stmt * s, ssize_t i, bool old) : nval{s}, old_idx{i}, is_old{old} {}
276                };
277
278                bool differs;
279                container_t< delta > values;
280
281                resultNstmt() : differs(false), values{} {}
282                resultNstmt(bool diff, container_t< delta > && vals) : differs(diff), values(vals) {}
283
284                template< typename object_t, typename super_t, typename field_t >
285                void apply(object_t *, field_t super_t::* field);
286
287                template< template <class...> class incontainer_t >
288                void take_all( incontainer_t<ast::ptr<ast::Stmt>> * stmts ) {
289                        if(!stmts || stmts->empty()) return;
290
291                        std::transform(stmts->begin(), stmts->end(), std::back_inserter( values ), [](ast::ptr<ast::Stmt>& decl) -> delta {
292                                        return delta( decl.release(), -1, false );
293                                });
294                        stmts->clear();
295                        differs = true;
296                }
297
298                template< template <class...> class incontainer_t >
299                void take_all( incontainer_t<ast::ptr<ast::Decl>> * decls ) {
300                        if(!decls || decls->empty()) return;
301
302                        std::transform(decls->begin(), decls->end(), std::back_inserter( values ), [](ast::ptr<ast::Decl>& decl) -> auto {
303                                        auto loc = decl->location;
304                                        auto stmt = new DeclStmt( loc, decl.release() );
305                                        return delta( stmt, -1, false );
306                                });
307                        decls->clear();
308                        differs = true;
309                }
310        };
311
312        template< template <class...> class container_t >
313        resultNstmt<container_t> call_accept( const container_t< ptr<Stmt> > & );
314
315        // Container of something
316        template< template <class...> class container_t, typename node_t >
317        struct resultN {
318                bool differs;
319                container_t<ptr<node_t>> values;
320
321                template< typename object_t, typename super_t, typename field_t >
322                void apply(object_t *, field_t super_t::* field);
323        };
324
325        template< template <class...> class container_t, typename node_t >
326        resultN< container_t, node_t > call_accept( const container_t< ptr<node_t> > & container );
327
328public:
329        /// Logic to call the accept and mutate the parent if needed, delegates call to accept
330        template<typename node_t, typename parent_t, typename field_t>
331        void maybe_accept(const node_t * &, field_t parent_t::* field);
332
333        template<typename node_t, typename parent_t, typename field_t>
334        void maybe_accept_as_compound(const node_t * &, field_t parent_t::* field);
335
336private:
337        /// Internal RAII guard for symbol table features
338        struct guard_symtab {
339                guard_symtab( Pass<core_t> & pass ): pass( pass ) { __pass::symtab::enter(pass.core, 0); }
340                ~guard_symtab()                                   { __pass::symtab::leave(pass.core, 0); }
341                Pass<core_t> & pass;
342        };
343
344        /// Internal RAII guard for scope features
345        struct guard_scope {
346                guard_scope( Pass<core_t> & pass ): pass( pass ) { __pass::scope::enter(pass.core, 0); }
347                ~guard_scope()                                   { __pass::scope::leave(pass.core, 0); }
348                Pass<core_t> & pass;
349        };
350
351        /// Internal RAII guard for forall substitutions
352        struct guard_forall_subs {
353                guard_forall_subs( Pass<core_t> & pass, const FunctionType * type )
354                : pass( pass ), type( type ) { __pass::forall::enter(pass.core, 0, type ); }
355                ~guard_forall_subs()         { __pass::forall::leave(pass.core, 0, type ); }
356                Pass<core_t> & pass;
357                const FunctionType * type;
358        };
359
360private:
361        bool inFunction = false;
362        bool atFunctionTop = false;
363};
364
365/// Apply a pass to an entire translation unit
366template<typename core_t>
367void accept_all( std::list< ast::ptr<ast::Decl> > &, ast::Pass<core_t> & visitor );
368
369template<typename core_t>
370void accept_all( ast::TranslationUnit &, ast::Pass<core_t> & visitor );
371
372//-------------------------------------------------------------------------------------------------
373// PASS ACCESSORIES
374//-------------------------------------------------------------------------------------------------
375
376/// If used the visitor will always clone nodes.
377struct PureVisitor {};
378
379/// Keep track of the polymorphic const TypeSubstitution * typeSubs for the current expression.
380struct WithConstTypeSubstitution {
381        const TypeSubstitution * typeSubs = nullptr;
382};
383
384/// Used if visitor requires added statements before or after the current node.
385/// The Pass template handles what *before* and *after* means automatically
386template< template<class...> class container_t = std::list >
387struct WithStmtsToAdd {
388        container_t< ptr<Stmt> > stmtsToAddBefore;
389        container_t< ptr<Stmt> > stmtsToAddAfter;
390};
391
392/// Used if visitor requires added declarations before or after the current node.
393/// The Pass template handles what *before* and *after* means automatically
394template< template<class...> class container_t = std::list >
395struct WithDeclsToAdd {
396        container_t< ptr<Decl> > declsToAddBefore;
397        container_t< ptr<Decl> > declsToAddAfter;
398};
399
400/// Use if visitation should stop at certain levels
401/// set visit_children false of all child nodes should be ignored
402struct WithShortCircuiting {
403        __pass::bool_ref visit_children;
404};
405
406/// Used to restore values/functions/etc. when the Pass finishes visiting this node
407class WithGuards {
408        __pass::at_cleanup_t at_cleanup = [](__pass::cleanup_func_t, void*) {
409                std::cerr << "No cleanup function was set" << std::endl;
410                abort();
411        };
412
413        template< typename core_t>
414        friend auto __pass::at_cleanup( core_t & core, int ) -> decltype( &core.at_cleanup );
415public:
416
417        /// When this node is finished being visited, restore the value of a variable
418        /// You may assign to the return value to set the new value in the same statement.
419        template< typename T >
420        T& GuardValue( T& val ) {
421                at_cleanup( [ val ]( void * newVal ) {
422                        * static_cast< T * >( newVal ) = val;
423                }, static_cast< void * >( & val ) );
424                return val;
425        }
426
427        /// On the object, all beginScope now and endScope when the current node is finished being visited
428        template< typename T >
429        void GuardScope( T& val ) {
430                val.beginScope();
431                at_cleanup( []( void * val ) {
432                        static_cast< T * >( val )->endScope();
433                }, static_cast< void * >( & val ) );
434        }
435
436        /// When this node is finished being visited, call a function
437        template< typename Func >
438        void GuardAction( Func func ) {
439                at_cleanup( [func](void *) { func(); }, nullptr );
440        }
441
442        /// When this node is finished being visited, call a member of an object.
443        template<typename T>
444        void GuardMethod( T * obj, void (T::*method)() ) {
445                at_cleanup( [ method ]( void * object ) {
446                        static_cast< T * >( object )->method();
447                }, static_cast< void * >( obj ) );
448        }
449};
450
451/// Used to get a pointer to the pass with its wrapped type
452template<typename core_t>
453struct WithVisitorRef {
454        Pass<core_t> * const visitor = nullptr;
455
456        bool isInFunction() const {
457                return visitor->isInFunction();
458        }
459};
460
461/// Use when the templated visitor should update the symbol table
462struct WithSymbolTable {
463        SymbolTable symtab;
464};
465
466/// Used to get a pointer to the wrapping TranslationUnit.
467struct WithConstTranslationUnit {
468        const TranslationUnit * translationUnit = nullptr;
469
470        const TranslationUnit & transUnit() const {
471                assertf( translationUnit, "WithConstTranslationUnit not set-up." );
472                return *translationUnit;
473        }
474};
475
476}
477
478#include "Common/Stats.h"
479
480namespace ast {
481extern struct PassVisitorStats {
482        size_t depth = 0;
483        Stats::Counters::MaxCounter<double> * max;
484        Stats::Counters::AverageCounter<double> * avg;
485} pass_visitor_stats;
486}
487
488#include "AST/Pass.impl.hpp"
Note: See TracBrowser for help on using the repository browser.