source: src/AST/Pass.hpp@ 891f707

ADT ast-experimental enum pthread-emulation qualifiedEnum
Last change on this file since 891f707 was ee918356, checked in by Thierry Delisle <tdelisle@…>, 4 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.