9a81f3a09c71baa85dd70b53d4b4ee16e1970f2b
[libcds.git] / cds / intrusive / msqueue.h
1 //$$CDS-header$$
2
3 #ifndef __CDS_INTRUSIVE_MSQUEUE_H
4 #define __CDS_INTRUSIVE_MSQUEUE_H
5
6 #include <type_traits>
7 #include <cds/intrusive/details/single_link_struct.h>
8 #include <cds/cxx11_atomic.h>
9
10 namespace cds { namespace intrusive {
11
12     /// MSQueue related definitions
13     /** @ingroup cds_intrusive_helper
14     */
15     namespace msqueue {
16
17         /// Queue node
18         /**
19             Template parameters:
20             - GC - garbage collector used
21             - Tag - a \ref cds_intrusive_hook_tag "tag"
22         */
23         template <class GC, typename Tag = opt::none >
24         using node = cds::intrusive::single_link::node< GC, Tag > ;
25
26         /// Base hook
27         /**
28             \p Options are:
29             - opt::gc - garbage collector used.
30             - opt::tag - a \ref cds_intrusive_hook_tag "tag"
31         */
32         template < typename... Options >
33         using base_hook = cds::intrusive::single_link::base_hook< Options...>;
34
35         /// Member hook
36         /**
37             \p MemberOffset specifies offset in bytes of \ref node member into your structure.
38             Use \p offsetof macro to define \p MemberOffset
39
40             \p Options are:
41             - opt::gc - garbage collector used.
42             - opt::tag - a \ref cds_intrusive_hook_tag "tag"
43         */
44         template < size_t MemberOffset, typename... Options >
45         using member_hook = cds::intrusive::single_link::member_hook< MemberOffset, Options... >;
46
47         /// Traits hook
48         /**
49             \p NodeTraits defines type traits for node.
50             See \ref node_traits for \p NodeTraits interface description
51
52             \p Options are:
53             - opt::gc - garbage collector used.
54             - opt::tag - a \ref cds_intrusive_hook_tag "tag"
55         */
56         template <typename NodeTraits, typename... Options >
57         using traits_hook = cds::intrusive::single_link::traits_hook< NodeTraits, Options... >;
58
59         /// Queue internal statistics. May be used for debugging or profiling
60         /**
61             Template argument \p Counter defines type of counter.
62             Default is \p cds::atomicity::event_counter, that is weak, i.e. it is not guaranteed
63             strict event counting.
64             You may use stronger type of counter like as \p cds::atomicity::item_counter,
65             or even integral type, for example, \p int.
66         */
67         template <typename Counter = cds::atomicity::event_counter >
68         struct stat
69         {
70             typedef Counter     counter_type    ;   ///< Counter type
71
72             counter_type m_EnqueueCount      ;  ///< Enqueue call count
73             counter_type m_DequeueCount      ;  ///< Dequeue call count
74             counter_type m_EnqueueRace       ;  ///< Count of enqueue race conditions encountered
75             counter_type m_DequeueRace       ;  ///< Count of dequeue race conditions encountered
76             counter_type m_AdvanceTailError  ;  ///< Count of "advance tail failed" events
77             counter_type m_BadTail           ;  ///< Count of events "Tail is not pointed to the last item in the queue"
78
79             /// Register enqueue call
80             void onEnqueue()                { ++m_EnqueueCount; }
81             /// Register dequeue call
82             void onDequeue()                { ++m_DequeueCount; }
83             /// Register enqueue race event
84             void onEnqueueRace()            { ++m_EnqueueRace; }
85             /// Register dequeue race event
86             void onDequeueRace()            { ++m_DequeueRace; }
87             /// Register "advance tail failed" event
88             void onAdvanceTailFailed()      { ++m_AdvanceTailError; }
89             /// Register event "Tail is not pointed to last item in the queue"
90             void onBadTail()                { ++m_BadTail; }
91
92             //@cond
93             void reset()
94             {
95                 m_EnqueueCount.reset();
96                 m_DequeueCount.reset();
97                 m_EnqueueRace.reset();
98                 m_DequeueRace.reset();
99                 m_AdvanceTailError.reset();
100                 m_BadTail.reset();
101             }
102
103             stat& operator +=( stat const& s )
104             {
105                 m_EnqueueCount += s.m_EnqueueCount.get();
106                 m_DequeueCount += s.m_DequeueCount.get();
107                 m_EnqueueRace += s.m_EnqueueRace.get();
108                 m_DequeueRace += s.m_DequeueRace.get();
109                 m_AdvanceTailError += s.m_AdvanceTailError.get();
110                 m_BadTail += s.m_BadTail.get();
111
112                 return *this;
113             }
114             //@endcond
115         };
116
117         /// Dummy queue statistics - no counting is performed, no overhead. Support interface like \p msqueue::stat
118         /** @ingroup cds_intrusive_helper
119         */
120         struct empty_stat
121         {
122             //@cond
123             void onEnqueue()                {}
124             void onDequeue()                {}
125             void onEnqueueRace()            {}
126             void onDequeueRace()            {}
127             void onAdvanceTailFailed()      {}
128             void onBadTail()                {}
129
130             void reset() {}
131             empty_stat& operator +=( empty_stat const& s )
132             {
133                 return *this;
134             }
135             //@endcond
136         };
137
138         /// MSQueue default type traits
139         struct traits
140         {
141             /// Back-off strategy
142             typedef cds::backoff::empty         back_off;
143
144             /// Hook, possible types are \p msqueue::base_hook, \p msqueue::member_hook, \p msqueue::traits_hook
145             typedef msqueue::base_hook<>        hook;
146
147             /// The functor used for dispose removed items. Default is \p opt::v::empty_disposer. This option is used for dequeuing
148             typedef opt::v::empty_disposer      disposer;
149
150             /// Item counting feature; by default, disabled. Use \p cds::atomicity::item_counter to enable item counting
151             typedef atomicity::empty_item_counter   item_counter;
152
153             /// Internal statistics (by default, disabled)
154             /**
155                 Possible option value are: \p msqueue::stat, \p msqueue::empty_stat (the default),
156                 user-provided class that supports \p %msqueue::stat interface.
157             */
158             typedef msqueue::empty_stat         stat;
159
160             /// C++ memory ordering model
161             /** 
162                 Can be \p opt::v::relaxed_ordering (relaxed memory model, the default)
163                 or \p opt::v::sequential_consistent (sequentially consisnent memory model).
164             */
165             typedef opt::v::relaxed_ordering    memory_model;
166
167             /// Link checking, see \p cds::opt::link_checker
168             static const opt::link_check_type link_checker = opt::debug_check_link;
169
170             /// Alignment of internal queue data. Default is \p opt::cache_line_alignment
171             enum { alignment = opt::cache_line_alignment };
172         };
173
174         /// Metafunction converting option list to \p msqueue::traits
175         /**
176             This is a wrapper for <tt> cds::opt::make_options< type_traits, Options...> </tt>
177             Supported \p Options are:
178
179             - opt::hook - hook used. Possible hooks are: \p msqueue::base_hook, \p msqueue::member_hook, \p msqueue::traits_hook.
180                 If the option is not specified, \p %msqueue::base_hook<> is used.
181             - opt::back_off - back-off strategy used, default is \p cds::backoff::empty.
182             - opt::disposer - the functor used for dispose removed items. Default is \p opt::v::empty_disposer. This option is used
183                 when dequeuing.
184             - opt::link_checker - the type of node's link fields checking. Default is \p opt::debug_check_link
185             - opt::item_counter - the type of item counting feature. Default is \p cds::atomicity::empty_item_counter (item counting disabled)
186                 To enable item counting use \p cds::atomicity::item_counter
187             - opt::stat - the type to gather internal statistics.
188                 Possible statistics types are: \p msqueue::stat, \p msqueue::empty_stat, user-provided class that supports \p %msqueue::stat interface.
189                 Default is \p %msqueue::empty_stat.
190             - opt::alignment - the alignment for internal queue data. Default is \p opt::cache_line_alignment
191             - opt::memory_model - C++ memory ordering model. Can be \p opt::v::relaxed_ordering (relaxed memory model, the default)
192                 or \p opt::v::sequential_consistent (sequentially consisnent memory model).
193
194             Example: declare \p %MSQueue with item counting and internal statistics
195             \code
196             typedef cds::intrusive::MSQueue< cds::gc::HP, Foo, 
197                 typename cds::intrusive::msqueue::make_traits<
198                     cds::intrusive::opt:hook< cds::intrusive::msqueue::base_hook< cds::opt::gc<cds:gc::HP> >>,
199                     cds::opt::item_counte< cds::atomicity::item_counter >,
200                     cds::opt::stat< cds::intrusive::msqueue::stat<> >
201                 >::type
202             > myQueue;
203             \endcode
204         */
205         template <typename... Options>
206         struct make_traits {
207 #   ifdef CDS_DOXYGEN_INVOKED
208             typedef implementation_defined type;   ///< Metafunction result
209 #   else
210             typedef typename cds::opt::make_options<
211                 typename cds::opt::find_type_traits< traits, Options... >::type
212                 , Options...
213             >::type type;
214 #   endif
215         };
216
217
218     } // namespace msqueue
219
220     /// Michael & Scott's intrusive lock-free queue
221     /** @ingroup cds_intrusive_queue
222         Implementation of well-known Michael & Scott's queue algorithm:
223         - [1998] Maged Michael, Michael Scott "Simple, fast, and practical non-blocking and blocking concurrent queue algorithms"
224
225         Template arguments:
226         - \p GC - garbage collector type: \p gc::HP, \p gc::DHP
227         - \p T - type to be stored in the queue. A value of type \p T must be derived from \p msqueue::node for \p msqueue::base_hook,
228             or it should have a member of type \p %msqueue::node for \p msqueue::member_hook,
229             or it should be convertible to \p %msqueue::node for \p msqueue::traits_hook.
230         - \p Traits - queue traits, default is \p msqueue::traits. You can use \p msqueue::make_traits
231             metafunction to make your traits or just derive your traits from \p %msqueue::traits:
232             \code
233             struct myTraits: public cds::intrusive::msqueue::traits {
234                 typedef cds::intrusive::msqueue::stat<> stat;
235                 typedef cds::atomicity::item_counter    item_counter;
236             };
237             typedef cds::intrusive::MSQueue< cds::gc::HP, Foo, myTraits > myQueue;
238
239             // Equivalent make_traits example:
240             typedef cds::intrusive::MSQueue< cds::gc::HP, Foo, 
241                 typename cds::intrusive::msqueue::make_traits< 
242                     cds::opt::stat< cds::intrusive::msqueue::stat<> >,
243                     cds::opt::item_counter< cds::atomicity::item_counter >
244                 >::type
245             > myQueue;
246             \endcode
247
248         \par About item disposing
249         The Michael & Scott's queue algo has a key feature: even if the queue is empty it contains one item that is "dummy" one from
250         the standpoint of the algo. See \p dequeue() function for explanation.
251
252         \par Examples
253         \code
254         #include <cds/intrusive/msqueue.h>
255         #include <cds/gc/hp.h>
256
257         namespace ci = cds::inrtusive;
258         typedef cds::gc::HP hp_gc;
259
260         // MSQueue with Hazard Pointer garbage collector, base hook + item disposer:
261         struct Foo: public ci::msqueue::node< hp_gc >
262         {
263             // Your data
264             ...
265         };
266
267         // Disposer for Foo struct just deletes the object passed in
268         struct fooDisposer {
269             void operator()( Foo * p )
270             {
271                 delete p;
272             }
273         };
274
275         // Declare traits for the queue
276         struct myTraits: public ci::msqueue::traits {
277             ,ci::opt::hook<
278                 ci::msqueue::base_hook< ci::opt::gc<hp_gc> >
279             >
280             ,ci::opt::disposer< fooDisposer >
281         };
282
283         // At least, declare the queue type
284         typedef ci::MSQueue< hp_gc, Foo, myTraits > fooQueue;
285
286         // Example 2:
287         //  MSQueue with Hazard Pointer garbage collector,
288         //  member hook + item disposer + item counter,
289         //  without alignment of internal queue data
290         //  Use msqueue::make_traits
291         struct Bar
292         {
293             // Your data
294             ...
295             ci::msqueue::node< hp_gc > hMember;
296         };
297
298         typedef ci::MSQueue< hp_gc,
299             Foo,
300             typename ci::msqueue::make_traits<
301                 ci::opt::hook<
302                     ci::msqueue::member_hook<
303                         offsetof(Bar, hMember)
304                         ,ci::opt::gc<hp_gc>
305                     >
306                 >
307                 ,ci::opt::disposer< fooDisposer >
308                 ,cds::opt::item_counter< cds::atomicity::item_counter >
309                 ,cds::opt::alignment< cds::opt::no_special_alignment >
310             >::type
311         > barQueue;
312         \endcode
313     */
314     template <typename GC, typename T, typename Traits>
315     class MSQueue
316     {
317     public:
318         typedef GC gc;          ///< Garbage collector
319         typedef T  value_type;  ///< type of value stored in the queue
320         typedef Traits traits;  ///< Queue traits
321
322         typedef typename traits::hook       hook;       ///< hook type
323         typedef typename hook::node_type    node_type;  ///< node type
324         typedef typename traits::disposer   disposer;   ///< disposer used
325         typedef typename get_node_traits< value_type, node_type, hook>::type node_traits;   ///< node traits
326         typedef typename single_link::get_link_checker< node_type, traits::link_checker >::type link_checker;   ///< link checker
327
328         typedef typename traits::back_off   back_off;       ///< back-off strategy
329         typedef typename traits::item_counter item_counter; ///< Item counter class
330         typedef typename traits::stat       stat;           ///< Internal statistics
331         typedef typename traits::memory_model memory_model; ///< Memory ordering. See \p cds::opt::memory_model option
332
333         /// Rebind template arguments
334         template <typename GC2, typename T2, typename Traits2>
335         struct rebind {
336             typedef MSQueue< GC2, T2, Traits2 > other;   ///< Rebinding result
337         };
338
339     protected:
340         //@cond
341
342         // GC and node_type::gc must be the same
343         static_assert((std::is_same<gc, typename node_type::gc>::value), "GC and node_type::gc must be the same");
344
345         typedef intrusive::node_to_value<MSQueue> node_to_value;
346         typedef typename opt::details::alignment_setter< typename node_type::atomic_node_ptr, traits::alignment >::type aligned_node_ptr;
347         typedef typename opt::details::alignment_setter< node_type, traits::alignment >::type dummy_node_type;
348
349         aligned_node_ptr    m_pHead ;           ///< Queue's head pointer
350         aligned_node_ptr    m_pTail ;           ///< Queue's tail pointer
351         dummy_node_type     m_Dummy ;           ///< dummy node
352         item_counter        m_ItemCounter   ;   ///< Item counter
353         stat                m_Stat  ;           ///< Internal statistics
354         //@endcond
355
356         //@cond
357         struct dequeue_result {
358             typename gc::template GuardArray<2>  guards;
359
360             node_type * pHead;
361             node_type * pNext;
362         };
363
364         bool do_dequeue( dequeue_result& res )
365         {
366             node_type * pNext;
367             back_off bkoff;
368
369             node_type * h;
370             while ( true ) {
371                 h = res.guards.protect( 0, m_pHead, node_to_value() );
372                 pNext = h->m_pNext.load( memory_model::memory_order_relaxed );
373                 res.guards.assign( 1, node_to_value()( pNext ));
374                 if ( m_pHead.load(memory_model::memory_order_acquire) != h )
375                     continue;
376
377                 if ( pNext == nullptr )
378                     return false ;    // empty queue
379
380                 node_type * t = m_pTail.load(memory_model::memory_order_acquire);
381                 if ( h == t ) {
382                     // It is needed to help enqueue
383                     m_pTail.compare_exchange_strong( t, pNext, memory_model::memory_order_release, atomics::memory_order_relaxed );
384                     m_Stat.onBadTail();
385                     continue;
386                 }
387
388                 if ( m_pHead.compare_exchange_strong( h, pNext, memory_model::memory_order_release, atomics::memory_order_relaxed ))
389                     break;
390
391                 m_Stat.onDequeueRace();
392                 bkoff();
393             }
394
395             --m_ItemCounter;
396             m_Stat.onDequeue();
397
398             res.pHead = h;
399             res.pNext = pNext;
400             return true;
401         }
402
403         static void clear_links( node_type * pNode )
404         {
405             pNode->m_pNext.store( nullptr, memory_model::memory_order_release );
406         }
407
408         void dispose_result( dequeue_result& res )
409         {
410             dispose_node( res.pHead );
411         }
412
413         void dispose_node( node_type * p )
414         {
415             // Note about the dummy node:
416             // We cannot clear m_Dummy here since it leads to ABA.
417             // On the other hand, we cannot use deferred clear_links( &m_Dummy ) call via
418             // HP retiring cycle since m_Dummy is member of MSQueue and may be destroyed
419             // before HP retiring cycle invocation.
420             // So, we will never clear m_Dummy
421             if ( p != &m_Dummy ) {
422                 gc::retire( node_traits::to_value_ptr(p),
423                     []( value_type * ptr ) {
424                         assert( ptr != nullptr );
425                         MSQueue::clear_links( node_traits::to_node_ptr( ptr ) );
426                         disposer()(ptr);
427                     }
428                 );
429             }
430         }
431         //@endcond
432
433     public:
434         /// Initializes empty queue
435         MSQueue()
436             : m_pHead( &m_Dummy )
437             , m_pTail( &m_Dummy )
438         {}
439
440         /// Destructor clears the queue
441         /**
442             Since the Michael & Scott queue contains at least one item even
443             if the queue is empty, the destructor may call item disposer.
444         */
445         ~MSQueue()
446         {
447             clear();
448
449             node_type * pHead = m_pHead.load(memory_model::memory_order_relaxed);
450
451             assert( pHead != nullptr );
452             assert( pHead == m_pTail.load(memory_model::memory_order_relaxed) );
453
454             m_pHead.store( nullptr, memory_model::memory_order_relaxed );
455             m_pTail.store( nullptr, memory_model::memory_order_relaxed );
456
457             dispose_node( pHead );
458         }
459
460         /// Enqueues \p val value into the queue.
461         /** @anchor cds_intrusive_MSQueue_enqueue
462             The function always returns \p true.
463         */
464         bool enqueue( value_type& val )
465         {
466             node_type * pNew = node_traits::to_node_ptr( val );
467             link_checker::is_empty( pNew );
468
469             typename gc::Guard guard;
470             back_off bkoff;
471
472             node_type * t;
473             while ( true ) {
474                 t = guard.protect( m_pTail, node_to_value() );
475
476                 node_type * pNext = t->m_pNext.load(memory_model::memory_order_acquire);
477                 if ( pNext != nullptr ) {
478                     // Tail is misplaced, advance it
479                     m_pTail.compare_exchange_weak( t, pNext, memory_model::memory_order_release, atomics::memory_order_relaxed );
480                     m_Stat.onBadTail();
481                     continue;
482                 }
483
484                 node_type * tmp = nullptr;
485                 if ( t->m_pNext.compare_exchange_strong( tmp, pNew, memory_model::memory_order_release, atomics::memory_order_relaxed ))
486                     break;
487
488                 m_Stat.onEnqueueRace();
489                 bkoff();
490             }
491             ++m_ItemCounter;
492             m_Stat.onEnqueue();
493
494             if ( !m_pTail.compare_exchange_strong( t, pNew, memory_model::memory_order_acq_rel, atomics::memory_order_relaxed ))
495                 m_Stat.onAdvanceTailFailed();
496             return true;
497         }
498
499         /// Dequeues a value from the queue
500         /** @anchor cds_intrusive_MSQueue_dequeue
501             If the queue is empty the function returns \p nullptr.
502
503             \par Warning
504             The queue algorithm has following feature: when \p %dequeue() is called,
505             the item returning is still queue's top, and previous top is disposed:
506
507             \code
508             before dequeuing         Dequeue               after dequeuing
509             +------------------+                           +------------------+
510       Top ->|      Item 1      |  -> Dispose Item 1        |      Item 2      | <- Top
511             +------------------+                           +------------------+
512             |      Item 2      |  -> Return Item 2         |       ...        |
513             +------------------+
514             |       ...        |
515             \endcode
516
517             \p %dequeue() function returns Item 2, that becomes new top of queue, and calls
518             the disposer for Item 1, that was queue's top on function entry.
519             Thus, you cannot manually delete item returned because it is still included in
520             item sequence and it has valuable link field that must not be zeroed.
521             The item should be deleted only in garbage collector retire cycle using the disposer.
522         */
523         value_type * dequeue()
524         {
525             dequeue_result res;
526
527             if ( do_dequeue( res )) {
528                 dispose_result( res );
529
530                 return node_traits::to_value_ptr( *res.pNext );
531             }
532             return nullptr;
533         }
534
535         /// Synonym for \ref cds_intrusive_MSQueue_enqueue "enqueue()" function
536         bool push( value_type& val )
537         {
538             return enqueue( val );
539         }
540
541         /// Synonym for \ref cds_intrusive_MSQueue_dequeue "dequeue()" function
542         value_type * pop()
543         {
544             return dequeue();
545         }
546
547         /// Checks if the queue is empty
548         bool empty() const
549         {
550             typename gc::Guard guard;
551             return guard.protect( m_pHead, node_to_value() )->m_pNext.load( memory_model::memory_order_relaxed ) == nullptr;
552         }
553
554         /// Clear the queue
555         /**
556             The function repeatedly calls \p dequeue() until it returns \p nullptr.
557             The disposer defined in template \p Traits is called for each item
558             that can be safely disposed.
559         */
560         void clear()
561         {
562             while ( dequeue() );
563         }
564
565         /// Returns queue's item count
566         /**
567             The value returned depends on \p msqueue::traits::item_counter. For \p atomicity::empty_item_counter,
568             this function always returns 0.
569
570             @note Even if you use real item counter and it returns 0, this fact is not mean that the queue
571             is empty. To check queue emptyness use \p empty() method.
572         */
573         size_t size() const
574         {
575             return m_ItemCounter.value();
576         }
577
578         /// Returns reference to internal statistics
579         stat const& statistics() const
580         {
581             return m_Stat;
582         }
583
584     };
585
586 }} // namespace cds::intrusive
587
588 #endif // #ifndef __CDS_INTRUSIVE_MSQUEUE_H