iter-adapter-stl.hpp

Go to the documentation of this file.

/*
  ITER-ADAPTER-STL.hpp  -  helpers for building simple forward iterators
 
   Copyright (C)
     2010,            Hermann Vosseler <Ichthyostega@web.de>
 
 **Lumiera** is free software; you can redistribute it and/or modify it
 under the terms of the GNU General Public License as published by the
 Free Software Foundation; either version 2 of the License, or (at your
 option) any later version. See the file COPYING for further details.
 
*/
 
#ifndef LIB_ITER_ADAPTER_STL_H
#define LIB_ITER_ADAPTER_STL_H
 
 
#include "lib/iter-adapter.hpp"
#include "lib/iter-adapter-ptr-deref.hpp"
 
#include <vector>
 
 
namespace lib {
namespace iter_stl {
  
  template<typename IT>
  class DistinctIter
    {
    public:
      using value_type = IT::value_type;
      using reference  = IT::reference;
      using pointer    = IT::pointer;
      
    private:
      IT      i_;
      pointer prev_;
      
      void memorise() { if (i_) prev_ = &(*i_); }
      
    public:
      DistinctIter()            : i_(), prev_() { }
      DistinctIter(IT const& i) : i_(i),prev_() { memorise(); }
      
      pointer   operator->()  const { return i_;  }
      reference operator*()   const { return *i_; }
      bool      isValid()     const { return i_;  }
      
      explicit
      operator bool() const
        {
          return bool{i_};
        }
      
      
      DistinctIter&
      operator++()
        {
          do ++i_;
          while (i_ and prev_ and *prev_ == *i_ );
          memorise();
          return *this;
        }
      
      friend bool operator== (DistinctIter const& i1, DistinctIter const& i2) { return i1.i_ == i2.i_; }
      friend bool operator!= (DistinctIter const& i1, DistinctIter const& i2) { return i1.i_ != i2.i_; }
    };
  
  
  
  template<typename DEF>
  struct WrappedStlIter : DEF
    {
      using Iter      = DEF::Iter;
      using reference = DEF::reference;
      using pointer   = DEF::pointer;
      
      
      WrappedStlIter()              : i_()  { }
      WrappedStlIter(Iter const& i) : i_(i) { }
      
      pointer   operator->() const  { return DEF::get(i_);  }
      reference operator*()  const  { return *(DEF::get(i_)); }
      
      WrappedStlIter& operator++()  { ++i_; return *this; }
      
      friend bool operator== (WrappedStlIter const& i1, WrappedStlIter const& i2) { return i1.i_ == i2.i_; }
      friend bool operator!= (WrappedStlIter const& i1, WrappedStlIter const& i2) { return i1.i_ != i2.i_; }
      
    private:
      mutable Iter i_;
    };
  
  
  /* -- customisations for building concrete wrappers -- */
  
  template<typename IT>
  struct Wrapped_Identity
    {
      using Iter = IT;
      using value_type = IT::value_type;
      using reference  = IT::reference;
      using pointer    = IT::pointer;
      
      static Iter get (Iter& it) { return & (*it); }
    };
  
  template<typename IT>
  struct Wrapped_PickKey
    {
      using Iter = IT;
      using value_type = IT::value_type::first_type;
      using reference  = value_type &;
      using pointer    = value_type *;
      
      static pointer get (Iter& it) { return & (it->first); }
    };
  
  template<typename IT>
  struct Wrapped_PickVal
    {
      using Iter = IT;
      using value_type = IT::value_type::second_type;
      using reference  = value_type &;
      using pointer    = value_type *;
      
      static pointer get (Iter& it) { return & (it->second); }
    };
  
  template<typename IT>
  struct Wrapped_PickConstVal
    {
      using Iter = IT;
      using value_type = const IT::value_type::second_type;
      using reference  = const value_type &;
      using pointer    = const value_type *;
      
      static pointer get (Iter& it) { return & (it->second); }
    };
  
  
  
  
  
  
  namespace { // traits and helpers...
    
    template<class MAP>
    struct _MapTypeSelector
      {
        using Key = MAP::value_type::first_type;
        using Val = MAP::value_type::second_type;
        using Itr = MAP::iterator;
      };
    
    template<class MAP>
    struct _MapTypeSelector<const MAP>
      {
        using Key = MAP::value_type::first_type;
        using Val = MAP::value_type::second_type const;
        using Itr = MAP::const_iterator;
      };
    
    template<class IT, typename SEL>
    struct _MapSubSelector
      {
        using PickKey = WrappedStlIter< Wrapped_PickKey<IT>>;
        using PickVal = WrappedStlIter< Wrapped_PickVal<IT>>;
      };
    
    template<class IT, typename SEL>
    struct _MapSubSelector<IT, SEL const&>
      {
        using PickKey = WrappedStlIter< Wrapped_PickKey<IT>>;    // Key is always const for maps
        using PickVal = WrappedStlIter< Wrapped_PickConstVal<IT>>;
      };
    
    
    
    template<class MAP>
    struct _MapT
      {
        using KeyType   = _MapTypeSelector<MAP>::Key;
        using ValType   = _MapTypeSelector<MAP>::Val;
        using EntryIter = _MapTypeSelector<MAP>::Itr;
        
        using DetectConst =  EntryIter::reference;
        using PickKeyIter = _MapSubSelector<EntryIter,DetectConst>::PickKey;
        using PickValIter = _MapSubSelector<EntryIter,DetectConst>::PickVal;
        
        using KeyIter     = RangeIter<PickKeyIter>;
        using ValIter     = RangeIter<PickValIter>;
        
        using DistinctKeys = DistinctIter<KeyIter>;
      };
    
    
    template<class IT>
    struct _MapIterT
      {
        using EntryIter = IT;
        
        using KeyType = EntryIter::value_type::first_type;
        using ValType = EntryIter::value_type::second_type;
        
        using DetectConst =  EntryIter::reference;
        using PickKeyIter = _MapSubSelector<EntryIter,DetectConst>::PickKey;
        using PickValIter = _MapSubSelector<EntryIter,DetectConst>::PickVal;
          
        using KeyIter     = RangeIter<PickKeyIter>;
        using ValIter     = RangeIter<PickValIter>;
        
        using DistinctKeys = DistinctIter<KeyIter>;
      };
    
    
    
    template<class SEQ>
    struct _SeqT
      {
        using Iter  = SEQ::iterator;
        using Range = RangeIter<Iter>;
        using DistinctVals = DistinctIter<Range>;
        using Addrs = AddressExposingIter<Range>;
      };
    
    template<class SEQ>
    struct _SeqT<const SEQ>
      {
        using Iter  = SEQ::const_iterator;
        using Range = RangeIter<Iter>;
        using DistinctVals = DistinctIter<Range>;
        using Addrs = AddressExposingIter<Range>;
      };
    
  }//(End) traits/helpers
  
  
  
  
  template<class CON>
  inline _SeqT<CON>::Range
  eachElm (CON& coll)
  {
    using Range = _SeqT<CON>::Range;
    return Range (coll.begin(), coll.end());
  }
  
  
  template<class CON>
  inline _SeqT<CON>::Addrs
  eachAddress (CON& coll)
  {
    using Addresses = _SeqT<CON>::Addrs;
    return Addresses (eachElm (coll));
  }
  
  
  template<class MAP>
  inline _MapT<MAP>::KeyIter
  eachKey (MAP& map)
  {
    using Range   = _MapT<MAP>::KeyIter;
    using PickKey = _MapT<MAP>::PickKeyIter;
    
    return Range (PickKey (map.begin()), PickKey (map.end()));
  }
  
  
  template<class IT>
  inline _MapIterT<IT>::KeyIter
  eachKey (IT const& begin, IT const& end)
  {
    using Range   = _MapIterT<IT>::KeyIter;
    using PickKey = _MapIterT<IT>::PickKeyIter;
    
    return Range (PickKey (begin), PickKey (end));
  }
  
  
  template<class MAP>
  inline _MapT<MAP>::ValIter
  eachVal (MAP& map)
  {
    using Range   = _MapT<MAP>::ValIter;
    using PickVal = _MapT<MAP>::PickValIter;
    
    return Range (PickVal (map.begin()), PickVal (map.end()));
  }
  
  
  template<class IT>
  inline _MapIterT<IT>::ValIter
  eachVal (IT const& begin, IT const& end)
  {
    using Range   = _MapIterT<IT>::ValIter;
    using PickVal = _MapIterT<IT>::PickValIter;
    
    return Range (PickVal (begin), PickVal (end));
  }
  
  
  template<class SEQ>
  inline _SeqT<SEQ>::DistinctVals
  eachDistinct (SEQ& seq)
  {
    using Range          = _SeqT<SEQ>::Range;
    using DistinctValues = _SeqT<SEQ>::DistinctVals;
    
    return DistinctValues (Range (seq.begin(), seq.end()));
  }
  
  
  template<class MAP>
  inline _MapT<MAP>::DistinctKeys
  eachDistinctKey (MAP& map)
  {
    return typename _MapT<MAP>::DistinctKeys (eachKey (map));
  }
  
  
  template<class MMAP, typename KEY>
  inline _MapT<MMAP>::ValIter
  eachValForKey (MMAP& multimap, KEY key)
  {
    using Pos     = _MapT<MMAP>::EntryIter;
    using Range   = _MapT<MMAP>::ValIter;
    using PickVal = _MapT<MMAP>::PickValIter;
    
    std::pair<Pos,Pos> valRange = multimap.equal_range (key);
    
    return Range (PickVal{valRange.first}, PickVal{valRange.second});
  }
  
  
  
  
  template<typename VAL>
  class IterSnapshot
    {
      using Sequence = std::vector<VAL>;
      
      mutable
      Sequence buffer_;
      size_t   pos_ = 0;
      
      
    public:
      IterSnapshot() { }
      
      template<class IT>
      IterSnapshot (IT&& src)
        {
          for ( ; src; ++src)
            buffer_.emplace_back (*src);
        }
      
      template<class IT>
      IterSnapshot (IT const& src)
        {
          for (IT copy{src}; copy; ++copy)
            buffer_.emplace_back (*copy);
        }
      
      template<class IT>
      IterSnapshot (IT&& pos, IT const& end)
        {
          for ( ; pos!=end; ++pos)
            buffer_.emplace_back (*pos);
        }
      
      template<class IT>
      IterSnapshot (IT const& begin, IT const& end)
        {
          for (IT pos{begin}; pos!=end; ++pos)
            buffer_.emplace_back (*pos);
        }
      
      IterSnapshot(IterSnapshot &&)                 = default;
      IterSnapshot(IterSnapshot const&)             = default;
      IterSnapshot& operator= (IterSnapshot const&) = default;
      IterSnapshot& operator= (IterSnapshot &&)     = default;
      
      explicit
      operator bool() const
        {
          return isValid();
        }
      
      size_t
      size()  const
        {
          return buffer_.size();
        }
      
      
      
      /* === lumiera forward iterator concept === */
      
      using pointer    = VAL*;
      using reference  = VAL&;
      using value_type = VAL ;
      
      reference
      operator*() const
        {
          _maybe_throw();
          return buffer_[pos_];
        }
      
      pointer
      operator->() const
        {
          _maybe_throw();
          return &buffer_[pos_];
        }
      
      IterSnapshot&
      operator++()
        {
          _maybe_throw();
          ++pos_;
          return *this;
        }
      
      bool
      isValid ()  const
        {
          return pos_ < buffer_.size();
        }
      
      bool
      empty ()  const
        {
          return not isValid();
        }
      
      ENABLE_USE_IN_STD_RANGE_FOR_LOOPS (IterSnapshot)
 
      
      
      friend bool
      operator== (IterSnapshot const& s1, IterSnapshot const& s2)
      {
        return (s1.empty()   and  s2.empty())
            or (s1.isValid() and  s2.isValid()
                and s1.pos_    == s2.pos_
                and s1.buffer_ == s2.buffer_
               );
      }
      
      friend bool
      operator!= (IterSnapshot const& snap1, IterSnapshot const& snap2)
      {
        return not (snap1 == snap2);
      }
      
      
    private:
      void
      _maybe_throw()  const
        {
          if (!isValid())
            _throwIterExhausted();
        }
    };
  
  namespace {
    template<class CON>
    using ContentSnapshot = IterSnapshot<typename CON::value_type>;
  }
  
  
  
  template<class CON>
  inline ContentSnapshot<CON>
  snapshot(CON const& con)
  {
    return ContentSnapshot<CON>{begin(con), end(con)};
  }
 
  template<class IT>
  inline ContentSnapshot<IT>
  dischargeToSnapshot(IT& ii)
  {
    return ContentSnapshot<IT>{ii};
  }
  
  template<class VAL>
  inline iter_stl::IterSnapshot<VAL>
  snapshot(std::initializer_list<VAL> const&& ili)
  {
    using OnceIter = iter_stl::IterSnapshot<VAL>;
    return OnceIter(begin(ili), end(ili));
  }
  
  
}} // namespace lib::iter_stl
#endif