source: src/Common/utility.h @ f8143a6

ADTast-experimentalenumforall-pointer-decaypthread-emulationqualifiedEnum
Last change on this file since f8143a6 was f8143a6, checked in by Thierry Delisle <tdelisle@…>, 3 years ago

Change pass visitor to avoid more transient strong references

  • Property mode set to 100644
File size: 16.8 KB
Line 
1//
2// Cforall Version 1.0.0 Copyright (C) 2015 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// utility.h --
8//
9// Author           : Richard C. Bilson
10// Created On       : Mon May 18 07:44:20 2015
11// Last Modified By : Peter A. Buhr
12// Last Modified On : Tue Feb 11 13:00:36 2020
13// Update Count     : 50
14//
15
16#pragma once
17
18#include <cassert>
19#include <cctype>
20#include <algorithm>
21#include <functional>
22#include <iostream>
23#include <iterator>
24#include <list>
25#include <memory>
26#include <sstream>
27#include <string>
28#include <type_traits>
29#include <utility>
30#include <vector>
31#include <cstring>                                                                              // memcmp
32
33#include "Common/Indenter.h"
34
35class Expression;
36
37/// bring std::move into global scope
38using std::move;
39
40/// partner to move that copies any copyable type
41template<typename T>
42T copy( const T & x ) { return x; }
43
44template< typename T >
45static inline T * maybeClone( const T *orig ) {
46        if ( orig ) {
47                return orig->clone();
48        } else {
49                return 0;
50        } // if
51}
52
53template< typename T, typename U >
54struct maybeBuild_t {
55        static T * doit( const U *orig ) {
56                if ( orig ) {
57                        return orig->build();
58                } else {
59                        return 0;
60                } // if
61        }
62};
63
64template< typename T, typename U >
65static inline T * maybeBuild( const U *orig ) {
66        return maybeBuild_t<T,U>::doit(orig);
67}
68
69template< typename T, typename U >
70static inline T * maybeMoveBuild( const U *orig ) {
71        T* ret = maybeBuild<T>(orig);
72        delete orig;
73        return ret;
74}
75
76template< typename Input_iterator >
77void printEnums( Input_iterator begin, Input_iterator end, const char * const *name_array, std::ostream &os ) {
78        for ( Input_iterator i = begin; i != end; ++i ) {
79                os << name_array[ *i ] << ' ';
80        } // for
81}
82
83template< typename Container >
84void deleteAll( const Container &container ) {
85        for ( const auto &i : container ) {
86                delete i;
87        } // for
88}
89
90template< typename Container >
91void printAll( const Container &container, std::ostream &os, Indenter indent = {} ) {
92        for ( typename Container::const_iterator i = container.begin(); i != container.end(); ++i ) {
93                if ( *i ) {
94                        os << indent;
95                        (*i)->print( os, indent );
96                        // need an endl after each element because it's not easy to know when each individual item should end
97                        os << std::endl;
98                } // if
99        } // for
100}
101
102template< typename SrcContainer, typename DestContainer >
103void cloneAll( const SrcContainer &src, DestContainer &dest ) {
104        typename SrcContainer::const_iterator in = src.begin();
105        std::back_insert_iterator< DestContainer > out( dest );
106        while ( in != src.end() ) {
107                *out++ = (*in++)->clone();
108        } // while
109}
110
111template< typename SrcContainer, typename DestContainer, typename Predicate >
112void cloneAll_if( const SrcContainer &src, DestContainer &dest, Predicate pred ) {
113        std::back_insert_iterator< DestContainer > out( dest );
114        for ( auto x : src ) {
115                if ( pred(x) ) {
116                        *out++ = x->clone();
117                }
118        } // while
119}
120
121template< typename Container >
122void assertAll( const Container &container ) {
123        int count = 0;
124        for ( typename Container::const_iterator i = container.begin(); i != container.end(); ++i ) {
125                if ( !(*i) ) {
126                        std::cerr << count << " is null" << std::endl;
127                } // if
128        } // for
129}
130
131template < typename T >
132std::list<T> tail( std::list<T> l ) {
133        if ( ! l.empty() ) {
134                std::list<T> ret(++(l.begin()), l.end());
135                return ret;
136        } // if
137}
138
139template < typename T >
140std::list<T> flatten( std::list < std::list<T> > l) {
141        typedef std::list <T> Ts;
142
143        Ts ret;
144
145        switch ( l.size() ) {
146          case 0:
147                return ret;
148          case 1:
149                return l.front();
150          default:
151                ret = flatten(tail(l));
152                ret.insert(ret.begin(), l.front().begin(), l.front().end());
153                return ret;
154        } // switch
155}
156
157/// Splice src onto the end of dst, clearing src
158template< typename T >
159void splice( std::vector< T > & dst, std::vector< T > & src ) {
160        dst.reserve( dst.size() + src.size() );
161        for ( T & x : src ) { dst.emplace_back( std::move( x ) ); }
162        src.clear();
163}
164
165/// Splice src onto the begining of dst, clearing src
166template< typename T >
167void spliceBegin( std::vector< T > & dst, std::vector< T > & src ) {
168        splice( src, dst );
169        dst.swap( src );
170}
171
172template < typename T >
173void toString_single( std::ostream & os, const T & value ) {
174        os << value;
175}
176
177template < typename T, typename... Params >
178void toString_single( std::ostream & os, const T & value, const Params & ... params ) {
179        os << value;
180        toString_single( os, params ... );
181}
182
183template < typename ... Params >
184std::string toString( const Params & ... params ) {
185        std::ostringstream os;
186        toString_single( os, params... );
187        return os.str();
188}
189
190#define toCString( ... ) toString( __VA_ARGS__ ).c_str()
191
192// replace element of list with all elements of another list
193template< typename T >
194void replace( std::list< T > &org, typename std::list< T >::iterator pos, std::list< T > &with ) {
195        typename std::list< T >::iterator next = pos; advance( next, 1 );
196
197        //if ( next != org.end() ) {
198        org.erase( pos );
199        org.splice( next, with );
200        //}
201
202        return;
203}
204
205// replace range of a list with a single element
206template< typename T >
207void replace( std::list< T > &org, typename std::list< T >::iterator begin, typename std::list< T >::iterator end, const T & with ) {
208        org.insert( begin, with );
209        org.erase( begin, end );
210}
211
212template< typename... Args >
213auto filter(Args&&... args) -> decltype(std::copy_if(std::forward<Args>(args)...)) {
214  return std::copy_if(std::forward<Args>(args)...);
215}
216
217template <typename E, typename UnaryPredicate, template< typename, typename...> class Container, typename... Args >
218void filter( Container< E *, Args... > & container, UnaryPredicate pred, bool doDelete ) {
219        auto i = begin( container );
220        while ( i != end( container ) ) {
221                auto it = next( i );
222                if ( pred( *i ) ) {
223                        if ( doDelete ) {
224                                delete *i;
225                        } // if
226                        container.erase( i );
227                } // if
228                i = it;
229        } // while
230}
231
232template< typename... Args >
233auto zip(Args&&... args) -> decltype(zipWith(std::forward<Args>(args)..., std::make_pair)) {
234  return zipWith(std::forward<Args>(args)..., std::make_pair);
235}
236
237template< class InputIterator1, class InputIterator2, class OutputIterator, class BinFunction >
238void zipWith( InputIterator1 b1, InputIterator1 e1, InputIterator2 b2, InputIterator2 e2, OutputIterator out, BinFunction func ) {
239        while ( b1 != e1 && b2 != e2 )
240                *out++ = func(*b1++, *b2++);
241}
242
243// it's nice to actually be able to increment iterators by an arbitrary amount
244template< class InputIt, class Distance >
245InputIt operator+( InputIt it, Distance n ) {
246        advance(it, n);
247        return it;
248}
249
250template< typename T >
251void warn_single( const T & arg ) {
252        std::cerr << arg << std::endl;
253}
254
255template< typename T, typename... Params >
256void warn_single(const T & arg, const Params & ... params ) {
257        std::cerr << arg;
258        warn_single( params... );
259}
260
261template< typename... Params >
262void warn( const Params & ... params ) {
263        std::cerr << "Warning: ";
264        warn_single( params... );
265}
266
267// determines if pref is a prefix of str
268static inline bool isPrefix( const std::string & str, const std::string & pref, unsigned int start = 0 ) {
269        if ( pref.size() > str.size() ) return false;
270    return 0 == memcmp( str.c_str() + start, pref.c_str(), pref.size() );
271        // return prefix == full.substr(0, prefix.size()); // for future, requires c++17
272}
273
274// -----------------------------------------------------------------------------
275// Ref Counted Singleton class
276// Objects that inherit from this class will have at most one reference to it
277// but if all references die, the object will be deleted.
278
279template< typename ThisType >
280class RefCountSingleton {
281  public:
282        static std::shared_ptr<ThisType> get() {
283                if( global_instance.expired() ) {
284                        std::shared_ptr<ThisType> new_instance = std::make_shared<ThisType>();
285                        global_instance = new_instance;
286                        return std::move(new_instance);
287                }
288                return global_instance.lock();
289        }
290  private:
291        static std::weak_ptr<ThisType> global_instance;
292};
293
294template< typename ThisType >
295std::weak_ptr<ThisType> RefCountSingleton<ThisType>::global_instance;
296
297// -----------------------------------------------------------------------------
298// RAII object to regulate "save and restore" behaviour, e.g.
299// void Foo::bar() {
300//   ValueGuard<int> guard(var); // var is a member of type Foo
301//   var = ...;
302// } // var's original value is restored
303template< typename T >
304struct ValueGuard {
305        T old;
306        T& ref;
307
308        ValueGuard(T& inRef) : old(inRef), ref(inRef) {}
309        ~ValueGuard() { ref = old; }
310};
311
312template< typename T >
313struct ValueGuardPtr {
314        T old;
315        T* ref;
316
317        ValueGuardPtr(T * inRef) : old( inRef ? *inRef : T() ), ref(inRef) {}
318        ~ValueGuardPtr() { if( ref ) *ref = old; }
319};
320
321template< typename aT >
322struct FuncGuard {
323        aT m_after;
324
325        template< typename bT >
326        FuncGuard( bT before, aT after ) : m_after( after ) {
327                before();
328        }
329
330        ~FuncGuard() {
331                m_after();
332        }
333};
334
335template< typename bT, typename aT >
336FuncGuard<aT> makeFuncGuard( bT && before, aT && after ) {
337        return FuncGuard<aT>( std::forward<bT>(before), std::forward<aT>(after) );
338}
339
340template< typename T >
341struct ValueGuardPtr< std::list< T > > {
342        std::list< T > old;
343        std::list< T >* ref;
344
345        ValueGuardPtr( std::list< T > * inRef) : old(), ref(inRef) {
346                if( ref ) { swap( *ref, old ); }
347        }
348        ~ValueGuardPtr() { if( ref ) { swap( *ref, old ); } }
349};
350
351// -----------------------------------------------------------------------------
352// Helper struct and function to support
353// for ( val : reverseIterate( container ) ) {}
354// syntax to have a for each that iterates backwards
355
356template< typename T >
357struct reverse_iterate_t {
358        T& ref;
359
360        reverse_iterate_t( T & ref ) : ref(ref) {}
361
362        // this does NOT work on const T!!!
363        // typedef typename T::reverse_iterator iterator;
364        auto begin() { return ref.rbegin(); }
365        auto end() { return ref.rend(); }
366};
367
368template< typename T >
369reverse_iterate_t< T > reverseIterate( T & ref ) {
370        return reverse_iterate_t< T >( ref );
371}
372
373template< typename T >
374struct enumerate_t {
375        template<typename val_t>
376        struct value_t {
377                val_t & val;
378                size_t idx;
379        };
380
381        template< typename iter_t, typename val_t >
382        struct iterator_t {
383                iter_t it;
384                size_t idx;
385
386                iterator_t( iter_t _it, size_t _idx ) : it(_it), idx(_idx) {}
387
388                value_t<val_t> operator*() const { return value_t<val_t>{ *it, idx }; }
389
390                bool operator==(const iterator_t & o) const { return o.it == it; }
391                bool operator!=(const iterator_t & o) const { return o.it != it; }
392
393                iterator_t & operator++() {
394                        it++;
395                        idx++;
396                        return *this;
397                }
398
399                using difference_type   = typename std::iterator_traits< iter_t >::difference_type;
400                using value_type        = value_t<val_t>;
401                using pointer           = value_t<val_t> *;
402                using reference         = value_t<val_t> &;
403                using iterator_category = std::forward_iterator_tag;
404        };
405
406        T & ref;
407
408        using iterator = iterator_t< typename T::iterator, typename T::value_type >;
409        using const_iterator = iterator_t< typename T::const_iterator, const typename T::value_type >;
410
411        iterator begin() { return iterator( ref.begin(), 0 ); }
412        iterator end()   { return iterator( ref.end(), ref.size() ); }
413
414        const_iterator begin() const { return const_iterator( ref.cbegin(), 0 ); }
415        const_iterator end()   const { return const_iterator( ref.cend(), ref.size() ); }
416
417        const_iterator cbegin() const { return const_iterator( ref.cbegin(), 0 ); }
418        const_iterator cend()   const { return const_iterator( ref.cend(), ref.size() ); }
419};
420
421template< typename T >
422enumerate_t<T> enumerate( T & ref ) {
423        return enumerate_t< T >{ ref };
424}
425
426template< typename T >
427const enumerate_t< const T > enumerate( const T & ref ) {
428        return enumerate_t< const T >{ ref };
429}
430
431template< typename OutType, typename Range, typename Functor >
432OutType map_range( const Range& range, Functor&& functor ) {
433        OutType out;
434
435        std::transform(
436                begin( range ),
437                end( range ),
438                std::back_inserter( out ),
439                std::forward< Functor >( functor )
440        );
441
442        return out;
443}
444
445// -----------------------------------------------------------------------------
446// Helper struct and function to support
447// for ( val : group_iterate( container1, container2, ... ) ) {}
448// syntax to have a for each that iterates multiple containers of the same length
449// TODO: update to use variadic arguments
450
451template< typename T1, typename T2 >
452struct group_iterate_t {
453private:
454        std::tuple<T1, T2> args;
455public:
456        group_iterate_t( bool skipBoundsCheck, const T1 & v1, const T2 & v2 ) : args(v1, v2) {
457                assertf(skipBoundsCheck || v1.size() == v2.size(), "group iteration requires containers of the same size: <%zd, %zd>.", v1.size(), v2.size());
458        };
459
460        typedef std::tuple<decltype(*std::get<0>(args).begin()), decltype(*std::get<1>(args).begin())> value_type;
461        typedef decltype(std::get<0>(args).begin()) T1Iter;
462        typedef decltype(std::get<1>(args).begin()) T2Iter;
463
464        struct iterator {
465                typedef std::tuple<T1Iter, T2Iter> IterTuple;
466                IterTuple it;
467                iterator( T1Iter i1, T2Iter i2 ) : it( i1, i2 ) {}
468                iterator operator++() {
469                        return iterator( ++std::get<0>(it), ++std::get<1>(it) );
470                }
471                bool operator!=( const iterator &other ) const { return it != other.it; }
472                value_type operator*() const { return std::tie( *std::get<0>(it), *std::get<1>(it) ); }
473        };
474
475        iterator begin() { return iterator( std::get<0>(args).begin(), std::get<1>(args).begin() ); }
476        iterator end() { return iterator( std::get<0>(args).end(), std::get<1>(args).end() ); }
477};
478
479/// performs bounds check to ensure that all arguments are of the same length.
480template< typename... Args >
481group_iterate_t<Args...> group_iterate( Args &&... args ) {
482        return group_iterate_t<Args...>(false, std::forward<Args>( args )...);
483}
484
485/// does not perform a bounds check - requires user to ensure that iteration terminates when appropriate.
486template< typename... Args >
487group_iterate_t<Args...> unsafe_group_iterate( Args &&... args ) {
488        return group_iterate_t<Args...>(true, std::forward<Args>( args )...);
489}
490
491// -----------------------------------------------------------------------------
492// Helper struct and function to support
493// for ( val : lazy_map( container1, f ) ) {}
494// syntax to have a for each that iterates a container, mapping each element by applying f
495template< typename T, typename Func >
496struct lambda_iterate_t {
497        const T & ref;
498        std::function<Func> f;
499
500        struct iterator {
501                typedef decltype(begin(ref)) Iter;
502                Iter it;
503                std::function<Func> f;
504                iterator( Iter it, std::function<Func> f ) : it(it), f(f) {}
505                iterator & operator++() {
506                        ++it; return *this;
507                }
508                bool operator!=( const iterator &other ) const { return it != other.it; }
509                auto operator*() const -> decltype(f(*it)) { return f(*it); }
510        };
511
512        lambda_iterate_t( const T & ref, std::function<Func> f ) : ref(ref), f(f) {}
513
514        auto begin() const -> decltype(iterator(std::begin(ref), f)) { return iterator(std::begin(ref), f); }
515        auto end() const   -> decltype(iterator(std::end(ref), f)) { return iterator(std::end(ref), f); }
516};
517
518template< typename... Args >
519lambda_iterate_t<Args...> lazy_map( const Args &... args ) {
520        return lambda_iterate_t<Args...>( args...);
521}
522
523// -----------------------------------------------------------------------------
524// O(1) polymorphic integer ilog2, using clz, which returns the number of leading 0-bits, starting at the most
525// significant bit (single instruction on x86)
526
527template<typename T>
528inline
529#if defined(__GNUC__) && __GNUC__ > 4
530constexpr
531#endif
532T ilog2(const T & t) {
533        if(std::is_integral<T>::value) {
534                const constexpr int r = sizeof(t) * __CHAR_BIT__ - 1;
535                if( sizeof(T) == sizeof(unsigned       int) ) return r - __builtin_clz  ( t );
536                if( sizeof(T) == sizeof(unsigned      long) ) return r - __builtin_clzl ( t );
537                if( sizeof(T) == sizeof(unsigned long long) ) return r - __builtin_clzll( t );
538        }
539        assert(false);
540        return -1;
541} // ilog2
542
543// -----------------------------------------------------------------------------
544/// evaluates expr as a long long int. If second is false, expr could not be evaluated
545std::pair<long long int, bool> eval(const Expression * expr);
546
547namespace ast {
548        class Expr;
549}
550
551std::pair<long long int, bool> eval(const ast::Expr * expr);
552
553// -----------------------------------------------------------------------------
554/// Reorders the input range in-place so that the minimal-value elements according to the
555/// comparator are in front;
556/// returns the iterator after the last minimal-value element.
557template<typename Iter, typename Compare>
558Iter sort_mins( Iter begin, Iter end, Compare& lt ) {
559        if ( begin == end ) return end;
560
561        Iter min_pos = begin;
562        for ( Iter i = begin + 1; i != end; ++i ) {
563                if ( lt( *i, *min_pos ) ) {
564                        // new minimum cost; swap into first position
565                        min_pos = begin;
566                        std::iter_swap( min_pos, i );
567                } else if ( ! lt( *min_pos, *i ) ) {
568                        // duplicate minimum cost; swap into next minimum position
569                        ++min_pos;
570                        std::iter_swap( min_pos, i );
571                }
572        }
573        return ++min_pos;
574}
575
576template<typename Iter, typename Compare>
577inline Iter sort_mins( Iter begin, Iter end, Compare&& lt ) {
578        return sort_mins( begin, end, lt );
579}
580
581/// sort_mins defaulted to use std::less
582template<typename Iter>
583inline Iter sort_mins( Iter begin, Iter end ) {
584        return sort_mins( begin, end, std::less<typename std::iterator_traits<Iter>::value_type>{} );
585}
586
587// Local Variables: //
588// tab-width: 4 //
589// mode: c++ //
590// compile-command: "make install" //
591// End: //
Note: See TracBrowser for help on using the repository browser.