X-Git-Url: http://plrg.eecs.uci.edu/git/?a=blobdiff_plain;f=cds%2Fintrusive%2Fsplit_list_nogc.h;h=966f5da3aea33bf038ab936ccaaa5431ea18da3f;hb=6924946ceeaae28bc227fe7c9d8e939963bb9d69;hp=6ed3ffe7977164e0052ab0c0ed812743baa24528;hpb=98aa954aa9d1b640f6f6d81018542eec1c2046bb;p=libcds.git diff --git a/cds/intrusive/split_list_nogc.h b/cds/intrusive/split_list_nogc.h index 6ed3ffe7..966f5da3 100644 --- a/cds/intrusive/split_list_nogc.h +++ b/cds/intrusive/split_list_nogc.h @@ -1,10 +1,41 @@ -//$$CDS-header$$ +/* + This file is a part of libcds - Concurrent Data Structures library -#ifndef __CDS_INTRUSIVE_SPLIT_LIST_NOGC_H -#define __CDS_INTRUSIVE_SPLIT_LIST_NOGC_H + (C) Copyright Maxim Khizhinsky (libcds.dev@gmail.com) 2006-2017 -#include + Source code repo: http://github.com/khizmax/libcds/ + Download: http://sourceforge.net/projects/libcds/files/ + + Redistribution and use in source and binary forms, with or without + modification, are permitted provided that the following conditions are met: + + * Redistributions of source code must retain the above copyright notice, this + list of conditions and the following disclaimer. + + * Redistributions in binary form must reproduce the above copyright notice, + this list of conditions and the following disclaimer in the documentation + and/or other materials provided with the distribution. + + THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" + AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE + DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE + FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR + SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER + CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, + OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE + OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. +*/ + +#ifndef CDSLIB_INTRUSIVE_SPLIT_LIST_NOGC_H +#define CDSLIB_INTRUSIVE_SPLIT_LIST_NOGC_H + +#include + +#include #include +#include namespace cds { namespace intrusive { @@ -19,67 +50,76 @@ namespace cds { namespace intrusive { The template parameter \p OrderedList should be any gc::nogc-derived ordered list, for example, \ref cds_intrusive_MichaelList_nogc "persistent MichaelList", \ref cds_intrusive_LazyList_nogc "persistent LazyList" - - The interface of the specialization is a slightly different. */ template < class OrderedList, #ifdef CDS_DOXYGEN_INVOKED - class Traits = split_list::type_traits + class Traits = split_list::traits #else class Traits #endif > - class SplitListSet< gc::nogc, OrderedList, Traits > + class SplitListSet< cds::gc::nogc, OrderedList, Traits > { public: - typedef Traits options ; ///< Traits template parameters - typedef gc::nogc gc ; ///< Garbage collector + typedef cds::gc::nogc gc; ///< Garbage collector + typedef Traits traits; ///< Traits template parameters - /// Hash functor for \ref value_type and all its derivatives that you use - typedef typename cds::opt::v::hash_selector< typename options::hash >::type hash; + /// Hash functor for \p value_type and all its derivatives that you use + typedef typename cds::opt::v::hash_selector< typename traits::hash >::type hash; protected: //@cond - typedef split_list::details::rebind_list_options wrapped_ordered_list; + typedef split_list::details::rebind_list_traits ordered_list_adapter; //@endcond public: # ifdef CDS_DOXYGEN_INVOKED - typedef OrderedList ordered_list ; ///< type of ordered list used as base for split-list + typedef OrderedList ordered_list; ///< type of ordered list used as base for split-list # else - typedef typename wrapped_ordered_list::result ordered_list; + typedef typename ordered_list_adapter::result ordered_list; # endif - typedef typename ordered_list::value_type value_type ; ///< type of value stored in the split-list - typedef typename ordered_list::key_comparator key_comparator ; ///< key comparison functor - typedef typename ordered_list::disposer disposer ; ///< Node disposer functor + typedef typename ordered_list::value_type value_type; ///< type of value stored in the split-list + typedef typename ordered_list::key_comparator key_comparator; ///< key comparison functor + typedef typename ordered_list::disposer disposer; ///< Node disposer functor - typedef typename options::item_counter item_counter ; ///< Item counter type - typedef typename options::back_off back_off ; ///< back-off strategy for spinning - typedef typename options::memory_model memory_model ; ///< Memory ordering. See cds::opt::memory_model option + typedef typename traits::bit_reversal bit_reversal; ///< Bit reversal algorithm, see \p split_list::traits::bit_reversal + typedef typename traits::item_counter item_counter; ///< Item counter type + typedef typename traits::back_off back_off; ///< back-off strategy + typedef typename traits::memory_model memory_model; ///< Memory ordering. See cds::opt::memory_model option + typedef typename traits::stat stat; ///< Internal statistics, see \p spit_list::stat + + // GC and OrderedList::gc must be the same + static_assert(std::is_same::value, "GC and OrderedList::gc must be the same"); + + // atomicity::empty_item_counter is not allowed as a item counter + static_assert(!std::is_same::value, + "cds::atomicity::empty_item_counter is not allowed as a item counter"); protected: - typedef typename ordered_list::node_type list_node_type ; ///< Node type as declared in ordered list - typedef split_list::node node_type ; ///< split-list node type - typedef node_type dummy_node_type ; ///< dummy node type + //@cond + typedef typename ordered_list::node_type list_node_type; ///< Node type as declared in ordered list + typedef split_list::node node_type; ///< split-list node type /// Split-list node traits /** This traits is intended for converting between underlying ordered list node type \ref list_node_type and split-list node type \ref node_type */ - typedef split_list::node_traits node_traits; + typedef typename ordered_list_adapter::node_traits node_traits; - //@cond /// Bucket table implementation typedef typename split_list::details::bucket_table_selector< - options::dynamic_bucket_table + traits::dynamic_bucket_table , gc - , dummy_node_type - , opt::allocator< typename options::allocator > + , typename ordered_list_adapter::aux_node + , opt::allocator< typename traits::allocator > , opt::memory_model< memory_model > + , opt::free_list< typename traits::free_list > >::type bucket_table; + typedef typename bucket_table::aux_node_type aux_node_type; ///< dummy node type + typedef typename ordered_list::iterator list_iterator; typedef typename ordered_list::const_iterator list_const_iterator; //@endcond @@ -90,10 +130,10 @@ namespace cds { namespace intrusive { class ordered_list_wrapper: public ordered_list { typedef ordered_list base_class; - typedef typename base_class::auxiliary_head bucket_head_type; + typedef typename base_class::auxiliary_head bucket_head_type; public: - list_iterator insert_at_( dummy_node_type * pHead, value_type& val ) + list_iterator insert_at_( aux_node_type * pHead, value_type& val ) { assert( pHead != nullptr ); bucket_head_type h(static_cast(pHead)); @@ -101,15 +141,15 @@ namespace cds { namespace intrusive { } template - std::pair ensure_at_( dummy_node_type * pHead, value_type& val, Func func ) + std::pair update_at_( aux_node_type * pHead, value_type& val, Func func, bool bAllowInsert ) { assert( pHead != nullptr ); bucket_head_type h(static_cast(pHead)); - return base_class::ensure_at_( h, val, func ); + return base_class::update_at_( h, val, func, bAllowInsert ); } template - bool find_at( dummy_node_type * pHead, split_list::details::search_value_type& val, Compare cmp, Func f ) + bool find_at( aux_node_type * pHead, split_list::details::search_value_type& val, Compare cmp, Func f ) { assert( pHead != nullptr ); bucket_head_type h(static_cast(pHead)); @@ -117,139 +157,29 @@ namespace cds { namespace intrusive { } template - list_iterator find_at_( dummy_node_type * pHead, split_list::details::search_value_type const & val, Compare cmp ) + list_iterator find_at_( aux_node_type * pHead, split_list::details::search_value_type const & val, Compare cmp ) { assert( pHead != nullptr ); bucket_head_type h(static_cast(pHead)); return base_class::find_at_( h, val, cmp ); } - bool insert_aux_node( dummy_node_type * pNode ) + bool insert_aux_node( aux_node_type * pNode ) { return base_class::insert_aux_node( pNode ); } - bool insert_aux_node( dummy_node_type * pHead, dummy_node_type * pNode ) + bool insert_aux_node( aux_node_type * pHead, aux_node_type * pNode ) { bucket_head_type h(static_cast(pHead)); return base_class::insert_aux_node( h, pNode ); } - }; - - //@endcond - protected: - ordered_list_wrapper m_List ; ///< Ordered list containing split-list items - bucket_table m_Buckets ; ///< bucket table - CDS_ATOMIC::atomic m_nBucketCountLog2 ; ///< log2( current bucket count ) - item_counter m_ItemCounter ; ///< Item counter - hash m_HashFunctor ; ///< Hash functor - - protected: - //@cond - typedef cds::details::Allocator< dummy_node_type, typename options::allocator > dummy_node_allocator; - static dummy_node_type * alloc_dummy_node( size_t nHash ) - { - return dummy_node_allocator().New( nHash ); - } - static void free_dummy_node( dummy_node_type * p ) - { - dummy_node_allocator().Delete( p ); - } - - /// Calculates hash value of \p key - template - size_t hash_value( Q const& key ) const - { - return m_HashFunctor( key ); - } - - size_t bucket_no( size_t nHash ) const - { - return nHash & ( (1 << m_nBucketCountLog2.load(CDS_ATOMIC::memory_order_relaxed)) - 1 ); - } - - static size_t parent_bucket( size_t nBucket ) - { - assert( nBucket > 0 ); - return nBucket & ~( 1 << bitop::MSBnz( nBucket ) ); - } - - dummy_node_type * init_bucket( size_t nBucket ) - { - assert( nBucket > 0 ); - size_t nParent = parent_bucket( nBucket ); - - dummy_node_type * pParentBucket = m_Buckets.bucket( nParent ); - if ( pParentBucket == nullptr ) { - pParentBucket = init_bucket( nParent ); - } - - assert( pParentBucket != nullptr ); - - // Allocate a dummy node for new bucket + template + void erase_for( Predicate pred ) { - dummy_node_type * pBucket = alloc_dummy_node( split_list::dummy_hash( nBucket ) ); - if ( m_List.insert_aux_node( pParentBucket, pBucket ) ) { - m_Buckets.bucket( nBucket, pBucket ); - return pBucket; - } - free_dummy_node( pBucket ); + return base_class::erase_for( pred ); } - - // Another thread set the bucket. Wait while it done - - // In this point, we must wait while nBucket is empty. - // The compiler can decide that waiting loop can be "optimized" (stripped) - // To prevent this situation, we use waiting on volatile bucket_head_ptr pointer. - // - back_off bkoff; - while ( true ) { - dummy_node_type volatile * p = m_Buckets.bucket( nBucket ); - if ( p && p != nullptr ) - return const_cast( p ); - bkoff(); - } - } - - dummy_node_type * get_bucket( size_t nHash ) - { - size_t nBucket = bucket_no( nHash ); - - dummy_node_type * pHead = m_Buckets.bucket( nBucket ); - if ( pHead == nullptr ) - pHead = init_bucket( nBucket ); - - assert( pHead->is_dummy() ); - - return pHead; - } - - void init() - { - // GC and OrderedList::gc must be the same - static_assert(( std::is_same::value ), "GC and OrderedList::gc must be the same"); - - // atomicity::empty_item_counter is not allowed as a item counter - static_assert(( !std::is_same::value ), "atomicity::empty_item_counter is not allowed as a item counter"); - - // Initialize bucket 0 - dummy_node_type * pNode = alloc_dummy_node( 0 /*split_list::dummy_hash(0)*/ ); - - // insert_aux_node cannot return false for empty list - CDS_VERIFY( m_List.insert_aux_node( pNode )); - - m_Buckets.bucket( 0, pNode ); - } - - void inc_item_count() - { - size_t sz = m_nBucketCountLog2.load(CDS_ATOMIC::memory_order_relaxed); - if ( ( ++m_ItemCounter >> sz ) > m_Buckets.load_factor() && ((size_t)(1 << sz )) < m_Buckets.capacity() ) - { - m_nBucketCountLog2.compare_exchange_strong( sz, sz + 1, CDS_ATOMIC::memory_order_seq_cst, CDS_ATOMIC::memory_order_relaxed ); - } - } - + }; //@endcond public: @@ -261,6 +191,7 @@ namespace cds { namespace intrusive { */ SplitListSet() : m_nBucketCountLog2(1) + , m_nMaxItemCount( max_item_count(2, m_Buckets.load_factor())) { init(); } @@ -272,10 +203,16 @@ namespace cds { namespace intrusive { ) : m_Buckets( nItemCount, nLoadFactor ) , m_nBucketCountLog2(1) + , m_nMaxItemCount( max_item_count(2, m_Buckets.load_factor())) { init(); } + /// Destroys split-list + ~SplitListSet() + { + m_List.clear(); + } public: /// Inserts new node /** @@ -289,106 +226,132 @@ namespace cds { namespace intrusive { return insert_( val ) != end(); } - /// Ensures that the \p item exists in the set + /// Updates the node /** The operation performs inserting or changing data with lock-free manner. - If the item \p val not found in the set, then \p val is inserted into the set. + If the item \p val is not found in the set, then \p val is inserted + iff \p bAllowInsert is \p true. Otherwise, the functor \p func is called with item found. The functor signature is: \code - struct ensure_functor { - void operator()( bool bNew, value_type& item, value_type& val ); - }; + void func( bool bNew, value_type& item, value_type& val ); \endcode with arguments: - \p bNew - \p true if the item has been inserted, \p false otherwise - \p item - item of the set - - \p val - argument \p val passed into the \p ensure function + - \p val - argument \p val passed into the \p update() function If new item has been inserted (i.e. \p bNew is \p true) then \p item and \p val arguments refers to the same thing. - The functor can change non-key fields of the \p item; however, \p func must guarantee - that during changing no any other modifications could be made on this item by concurrent threads. + The functor may change non-key fields of the \p item. - You can pass \p func argument by value by reference using boost::ref or cds::ref. + Returns std::pair where \p first is \p true if operation is successful, + \p second is \p true if new item has been added or \p false if the item with \p key + already is in the list. - Returns std::pair where \p first is \p true if operation is successfull, - \p second is \p true if new item has been added or \p false if the item with given key - already is in the set. + @warning For \ref cds_intrusive_MichaelList_hp "MichaelList" as the bucket see \ref cds_intrusive_item_creating "insert item troubleshooting". + \ref cds_intrusive_LazyList_hp "LazyList" provides exclusive access to inserted item and does not require any node-level + synchronization. */ template - std::pair ensure( value_type& val, Func func ) + std::pair update( value_type& val, Func func, bool bAllowInsert = true ) { - std::pair ret = ensure_( val, func ); + std::pair ret = update_( val, func, bAllowInsert ); return std::make_pair( ret.first != end(), ret.second ); } + //@cond + template + CDS_DEPRECATED("ensure() is deprecated, use update()") + std::pair ensure( value_type& val, Func func ) + { + return update( val, func, true ); + } + //@endcond - /// Finds the key \p val - /** \anchor cds_intrusive_SplitListSet_nogc_find_val - The function searches the item with key equal to \p val - and returns pointer to item found or , and \p NULL otherwise. + /// Checks whether the set contains \p key + /** + The function searches the item with key equal to \p key + and returns \p true if it is found, and \p false otherwise. Note the hash functor specified for class \p Traits template parameter should accept a parameter of type \p Q that can be not the same as \p value_type. + Otherwise, you may use \p contains( Q const&, Less pred ) functions with explicit predicate for key comparing. */ template - value_type * find( Q const & val ) + value_type * contains( Q const& key ) { - iterator it = find_( val ); - if ( it == end() ) + iterator it = find_( key ); + if ( it == end()) return nullptr; return &*it; } + //@cond + template + CDS_DEPRECATED("deprecated, use contains()") + value_type * find( Q const& key ) + { + return contains( key ); + } + //@endcond - /// Finds the key \p val with \p pred predicate for comparing + /// Checks whether the set contains \p key using \p pred predicate for searching /** - The function is an analog of \ref cds_intrusive_SplitListSet_nogc_find_val "find(Q const&)" - but \p cmp is used for key compare. - \p Less has the interface like \p std::less. - \p cmp must imply the same element order as the comparator used for building the set. + The function is similar to contains( key ) but \p pred is used for key comparing. + \p Less functor has the interface like \p std::less. + \p Less must imply the same element order as the comparator used for building the list. */ template - value_type * find_with( Q const& val, Less pred ) + value_type * contains( Q const& key, Less pred ) { - iterator it = find_with_( val, pred ); - if ( it == end() ) + iterator it = find_with_( key, pred ); + if ( it == end()) return nullptr; return &*it; } + //@cond + template + CDS_DEPRECATED("deprecated, use contains()") + value_type * find_with( Q const& key, Less pred ) + { + return contains( key, pred ); + } + //@endcond - /// Finds the key \p val + /// Finds the key \p key /** \anchor cds_intrusive_SplitListSet_nogc_find_func - The function searches the item with key equal to \p val and calls the functor \p f for item found. + The function searches the item with key equal to \p key and calls the functor \p f for item found. The interface of \p Func functor is: \code struct functor { - void operator()( value_type& item, Q& val ); + void operator()( value_type& item, Q& key ); }; \endcode - where \p item is the item found, \p val is the find function argument. - - You can pass \p f argument by value or by reference using boost::ref or cds::ref. + where \p item is the item found, \p key is the find function argument. The functor can change non-key fields of \p item. The functor does not serialize simultaneous access to the set \p item. If such access is possible you must provide your own synchronization schema on item level to exclude unsafe item modifications. - The \p val argument is non-const since it can be used as \p f functor destination i.e., the functor - may modify both arguments. - Note the hash functor specified for class \p Traits template parameter should accept a parameter of type \p Q that can be not the same as \p value_type. - The function returns \p true if \p val is found, \p false otherwise. + The function returns \p true if \p key is found, \p false otherwise. */ template - bool find( Q& val, Func f ) + bool find( Q& key, Func f ) { - return find_( val, key_comparator(), f ); + return find_( key, key_comparator(), f ); } + //@cond + template + bool find( Q const& key, Func f ) + { + return find_( key, key_comparator(), f ); + } + //@endcond - /// Finds the key \p val with \p pred predicate for comparing + /// Finds the key \p key with \p pred predicate for comparing /** The function is an analog of \ref cds_intrusive_SplitListSet_nogc_find_func "find(Q&, Func)" but \p cmp is used for key compare. @@ -396,50 +359,35 @@ namespace cds { namespace intrusive { \p cmp must imply the same element order as the comparator used for building the set. */ template - bool find_with( Q& val, Less pred, Func f ) + bool find_with( Q& key, Less pred, Func f ) { - return find_( val, typename wrapped_ordered_list::template make_compare_from_less(), f ); + CDS_UNUSED( pred ); + return find_( key, typename ordered_list_adapter::template make_compare_from_less(), f ); } - - /// Find the key \p val - /** \anchor cds_intrusive_SplitListSet_nogc_find_cfunc - The function searches the item with key equal to \p val and calls the functor \p f for item found. - The interface of \p Func functor is: - \code - struct functor { - void operator()( value_type& item, Q const& val ); - }; - \endcode - where \p item is the item found, \p val is the find function argument. - - You can pass \p f argument by value or by reference using boost::ref or cds::ref. - - The functor can change non-key fields of \p item. - The functor does not serialize simultaneous access to the set \p item. If such access is - possible you must provide your own synchronization schema on item level to exclude unsafe item modifications. - - Note the hash functor specified for class \p Traits template parameter - should accept a parameter of type \p Q that can be not the same as \p value_type. - - The function returns \p true if \p val is found, \p false otherwise. - */ - template - bool find( Q const& val, Func f ) + //@cond + template + bool find_with( Q const& key, Less pred, Func f ) { - return find_( val, key_comparator(), f ); + CDS_UNUSED( pred ); + return find_( key, typename ordered_list_adapter::template make_compare_from_less(), f ); } + //@endcond - /// Finds the key \p val with \p pred predicate for comparing + + /// Clears the set (non-atomic, not thread-safe) /** - The function is an analog of \ref cds_intrusive_SplitListSet_nogc_find_cfunc "find(Q const&, Func)" - but \p cmp is used for key compare. - \p Less has the interface like \p std::less. - \p cmp must imply the same element order as the comparator used for building the set. + The function unlink all items from the set. + The function is not atomic. It cleans up each bucket and then resets the item counter to zero. + If there are a thread that performs insertion while \p %clear() is working the result is undefined in general case: + empty() may return \p true but the set may contain item(s). + Therefore, \p %clear() may be used only for debugging purposes. + + For each item the \p disposer is called after unlinking. */ - template - bool find_with( Q const& val, Less pred, Func f ) + void clear() { - return find_( val, typename wrapped_ordered_list::template make_compare_from_less(), f ); + m_List.erase_for( []( value_type const& val ) -> bool { return !node_traits::to_node_ptr( val )->is_dummy(); } ); + m_ItemCounter.reset(); } /// Checks if the set is empty @@ -458,11 +406,23 @@ namespace cds { namespace intrusive { return m_ItemCounter; } + /// Returns internal statistics + stat const& statistics() const + { + return m_Stat; + } + + /// Returns internal statistics for \p OrderedList + typename OrderedList::stat const& list_statistics() const + { + return m_List.statistics(); + } + protected: //@cond template class iterator_type - :public split_list::details::iterator_type + : public split_list::details::iterator_type { typedef split_list::details::iterator_type iterator_base_class; typedef typename iterator_base_class::list_iterator list_iterator; @@ -483,6 +443,8 @@ namespace cds { namespace intrusive { //@endcond public: + ///@name Forward iterators + //@{ /// Forward iterator /** The forward iterator for a split-list has some features: @@ -490,6 +452,7 @@ namespace cds { namespace intrusive { - it depends on iterator of underlying \p OrderedList */ typedef iterator_type iterator; + /// Const forward iterator /** For iterator's features and requirements see \ref iterator @@ -502,7 +465,7 @@ namespace cds { namespace intrusive { */ iterator begin() { - return iterator( m_List.begin(), m_List.end() ); + return iterator( m_List.begin(), m_List.end()); } /// Returns an iterator that addresses the location succeeding the last element in a split-list @@ -514,111 +477,267 @@ namespace cds { namespace intrusive { */ iterator end() { - return iterator( m_List.end(), m_List.end() ); + return iterator( m_List.end(), m_List.end()); } /// Returns a forward const iterator addressing the first element in a split-list - //@{ const_iterator begin() const { - return const_iterator( m_List.begin(), m_List.end() ); + return const_iterator( m_List.begin(), m_List.end()); } - const_iterator cbegin() + + /// Returns a forward const iterator addressing the first element in a split-list + const_iterator cbegin() const { - return const_iterator( m_List.cbegin(), m_List.cend() ); + return const_iterator( m_List.cbegin(), m_List.cend()); } - //@} /// Returns an const iterator that addresses the location succeeding the last element in a split-list - //@{ const_iterator end() const { - return const_iterator( m_List.end(), m_List.end() ); + return const_iterator( m_List.end(), m_List.end()); } - const_iterator cend() + + /// Returns an const iterator that addresses the location succeeding the last element in a split-list + const_iterator cend() const { - return const_iterator( m_List.cend(), m_List.cend() ); + return const_iterator( m_List.cend(), m_List.cend()); } - //@} + //@} protected: //@cond iterator insert_( value_type& val ) { size_t nHash = hash_value( val ); - dummy_node_type * pHead = get_bucket( nHash ); + aux_node_type * pHead = get_bucket( nHash ); assert( pHead != nullptr ); - node_traits::to_node_ptr( val )->m_nHash = split_list::regular_hash( nHash ); + node_traits::to_node_ptr( val )->m_nHash = split_list::regular_hash( nHash ); list_iterator it = m_List.insert_at_( pHead, val ); - if ( it != m_List.end() ) { + if ( it != m_List.end()) { inc_item_count(); - return iterator( it, m_List.end() ); + m_Stat.onInsertSuccess(); + return iterator( it, m_List.end()); } + m_Stat.onInsertFailed(); return end(); } template - std::pair ensure_( value_type& val, Func func ) + std::pair update_( value_type& val, Func func, bool bAllowInsert ) { size_t nHash = hash_value( val ); - dummy_node_type * pHead = get_bucket( nHash ); + aux_node_type * pHead = get_bucket( nHash ); assert( pHead != nullptr ); - node_traits::to_node_ptr( val )->m_nHash = split_list::regular_hash( nHash ); + node_traits::to_node_ptr( val )->m_nHash = split_list::regular_hash( nHash ); - std::pair ret = m_List.ensure_at_( pHead, val, func ); - if ( ret.first != m_List.end() ) { - if ( ret.second ) + std::pair ret = m_List.update_at_( pHead, val, func, bAllowInsert ); + if ( ret.first != m_List.end()) { + if ( ret.second ) { inc_item_count(); + m_Stat.onUpdateNew(); + } + else + m_Stat.onUpdateExist(); return std::make_pair( iterator(ret.first, m_List.end()), ret.second ); } return std::make_pair( end(), ret.second ); } template - iterator find_with_( Q const& val, Less pred ) + iterator find_with_( Q& val, Less pred ) { + CDS_UNUSED( pred ); size_t nHash = hash_value( val ); - split_list::details::search_value_type sv( val, split_list::regular_hash( nHash )); - dummy_node_type * pHead = get_bucket( nHash ); + split_list::details::search_value_type sv( val, split_list::regular_hash( nHash )); + aux_node_type * pHead = get_bucket( nHash ); assert( pHead != nullptr ); - return iterator( m_List.find_at_( pHead, sv, typename wrapped_ordered_list::template make_compare_from_less() ), m_List.end() ); + auto it = m_List.find_at_( pHead, sv, typename ordered_list_adapter::template make_compare_from_less()); + m_Stat.onFind( it != m_List.end()); + return iterator( it, m_List.end()); } template iterator find_( Q const& val ) { size_t nHash = hash_value( val ); - split_list::details::search_value_type sv( val, split_list::regular_hash( nHash )); - dummy_node_type * pHead = get_bucket( nHash ); + split_list::details::search_value_type sv( val, split_list::regular_hash( nHash )); + aux_node_type * pHead = get_bucket( nHash ); assert( pHead != nullptr ); - return iterator( m_List.find_at_( pHead, sv, key_comparator() ), m_List.end() ); - + auto it = m_List.find_at_( pHead, sv, key_comparator()); + m_Stat.onFind( it != m_List.end()); + return iterator( it, m_List.end()); } template bool find_( Q& val, Compare cmp, Func f ) { size_t nHash = hash_value( val ); - split_list::details::search_value_type sv( val, split_list::regular_hash( nHash )); - dummy_node_type * pHead = get_bucket( nHash ); + split_list::details::search_value_type sv( val, split_list::regular_hash( nHash )); + aux_node_type * pHead = get_bucket( nHash ); assert( pHead != nullptr ); -# ifdef CDS_CXX11_LAMBDA_SUPPORT - return m_List.find_at( pHead, sv, cmp, - [&f](value_type& item, split_list::details::search_value_type& val){ cds::unref(f)(item, val.val ); }); -# else - split_list::details::find_functor_wrapper ffw( f ); - return m_List.find_at( pHead, sv, cmp, cds::ref(ffw) ); -# endif + return m_Stat.onFind( m_List.find_at( pHead, sv, cmp, + [&f](value_type& item, split_list::details::search_value_type& v){ f(item, v.val ); })); + } + + aux_node_type * alloc_aux_node( size_t nHash ) + { + m_Stat.onHeadNodeAllocated(); + aux_node_type* p = m_Buckets.alloc_aux_node(); + if ( p ) + p->m_nHash = nHash; + return p; + } + + void free_aux_node( aux_node_type * p ) + { + m_Buckets.free_aux_node( p ); + m_Stat.onHeadNodeFreed(); + } + + /// Calculates hash value of \p key + template + size_t hash_value( Q const& key ) const + { + return m_HashFunctor( key ); + } + + size_t bucket_no( size_t nHash ) const + { + return nHash & ((1 << m_nBucketCountLog2.load( memory_model::memory_order_relaxed )) - 1); + } + + static size_t parent_bucket( size_t nBucket ) + { + assert( nBucket > 0 ); + return nBucket & ~(1 << bitop::MSBnz( nBucket )); } + aux_node_type * init_bucket( size_t const nBucket ) + { + assert( nBucket > 0 ); + size_t nParent = parent_bucket( nBucket ); + + aux_node_type * pParentBucket = m_Buckets.bucket( nParent ); + if ( pParentBucket == nullptr ) { + pParentBucket = init_bucket( nParent ); + m_Stat.onRecursiveInitBucket(); + } + + assert( pParentBucket != nullptr ); + + // Allocate an aux node for new bucket + aux_node_type * pBucket = m_Buckets.bucket( nBucket ); + + back_off bkoff; + for ( ;; pBucket = m_Buckets.bucket( nBucket )) { + if ( pBucket ) + return pBucket; + + pBucket = alloc_aux_node( split_list::dummy_hash( nBucket )); + if ( pBucket ) { + if ( m_List.insert_aux_node( pParentBucket, pBucket )) { + m_Buckets.bucket( nBucket, pBucket ); + m_Stat.onNewBucket(); + return pBucket; + } + + // Another thread set the bucket. Wait while it done + free_aux_node( pBucket ); + m_Stat.onBucketInitContenton(); + break; + } + + // There are no free buckets. It means that the bucket table is full + // Wait while another thread set the bucket or a free bucket will be available + m_Stat.onBucketsExhausted(); + bkoff(); + } + + // Another thread set the bucket. Wait while it done + for ( pBucket = m_Buckets.bucket( nBucket ); pBucket == nullptr; pBucket = m_Buckets.bucket( nBucket )) { + bkoff(); + m_Stat.onBusyWaitBucketInit(); + } + + return pBucket; + } + + aux_node_type * get_bucket( size_t nHash ) + { + size_t nBucket = bucket_no( nHash ); + + aux_node_type * pHead = m_Buckets.bucket( nBucket ); + if ( pHead == nullptr ) + pHead = init_bucket( nBucket ); + + assert( pHead->is_dummy()); + + return pHead; + } + + void init() + { + // Initialize bucket 0 + aux_node_type * pNode = alloc_aux_node( 0 /*split_list::dummy_hash(0)*/ ); + + // insert_aux_node cannot return false for empty list + CDS_VERIFY( m_List.insert_aux_node( pNode )); + + m_Buckets.bucket( 0, pNode ); + } + + static size_t max_item_count( size_t nBucketCount, size_t nLoadFactor ) + { + return nBucketCount * nLoadFactor; + } + + void inc_item_count() + { + size_t nMaxCount = m_nMaxItemCount.load( memory_model::memory_order_relaxed ); + if ( ++m_ItemCounter <= nMaxCount ) + return; + + size_t sz = m_nBucketCountLog2.load( memory_model::memory_order_relaxed ); + const size_t nBucketCount = static_cast(1) << sz; + if ( nBucketCount < m_Buckets.capacity()) { + // we may grow the bucket table + const size_t nLoadFactor = m_Buckets.load_factor(); + if ( nMaxCount < max_item_count( nBucketCount, nLoadFactor )) + return; // someone already have updated m_nBucketCountLog2, so stop here + + m_nMaxItemCount.compare_exchange_strong( nMaxCount, max_item_count( nBucketCount << 1, nLoadFactor ), + memory_model::memory_order_relaxed, atomics::memory_order_relaxed ); + m_nBucketCountLog2.compare_exchange_strong( sz, sz + 1, memory_model::memory_order_relaxed, atomics::memory_order_relaxed ); + } + else + m_nMaxItemCount.store( std::numeric_limits::max(), memory_model::memory_order_relaxed ); + } + //@endcond + + protected: + //@cond + static unsigned const c_padding = cds::opt::actual_padding< traits::padding >::value; + + typedef typename cds::details::type_padding< bucket_table, c_padding >::type padded_bucket_table; + padded_bucket_table m_Buckets; ///< bucket table + + typedef typename cds::details::type_padding< ordered_list_wrapper, c_padding >::type padded_ordered_list; + padded_ordered_list m_List; ///< Ordered list containing split-list items + + atomics::atomic m_nBucketCountLog2; ///< log2( current bucket count ) + atomics::atomic m_nMaxItemCount; ///< number of items container can hold, before we have to resize + hash m_HashFunctor; ///< Hash functor + item_counter m_ItemCounter; ///< Item counter + stat m_Stat; ///< Internal statistics //@endcond }; }} // namespace cds::intrusive -#endif // #ifndef __CDS_INTRUSIVE_SPLIT_LIST_NOGC_H +#endif // #ifndef CDSLIB_INTRUSIVE_SPLIT_LIST_NOGC_H