debug.h revision 132720
1// Debugging support implementation -*- C++ -*-
2
3// Copyright (C) 2003
4// Free Software Foundation, Inc.
5//
6// This file is part of the GNU ISO C++ Library.  This library is free
7// software; you can redistribute it and/or modify it under the
8// terms of the GNU General Public License as published by the
9// Free Software Foundation; either version 2, or (at your option)
10// any later version.
11
12// This library is distributed in the hope that it will be useful,
13// but WITHOUT ANY WARRANTY; without even the implied warranty of
14// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15// GNU General Public License for more details.
16
17// You should have received a copy of the GNU General Public License along
18// with this library; see the file COPYING.  If not, write to the Free
19// Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307,
20// USA.
21
22// As a special exception, you may use this file as part of a free software
23// library without restriction.  Specifically, if other files instantiate
24// templates or use macros or inline functions from this file, or you compile
25// this file and link it with other files to produce an executable, this
26// file does not by itself cause the resulting executable to be covered by
27// the GNU General Public License.  This exception does not however
28// invalidate any other reasons why the executable file might be covered by
29// the GNU General Public License.
30
31#ifndef _GLIBCXX_DEBUG_DEBUG_H
32#define _GLIBCXX_DEBUG_DEBUG_H 1
33
34/**
35 * Macros used by the implementation to verify certain
36 * properties. These macros may only be used directly by the debug
37 * wrappers. Note that these are macros (instead of the more obviously
38 * "correct" choice of making them functions) because we need line and
39 * file information at the call site, to minimize the distance between
40 * the user error and where the error is reported.
41 *
42 */
43#define _GLIBCXX_DEBUG_VERIFY(_Condition,_ErrorMessage)		\
44  do {									\
45    if (! (_Condition))							\
46      ::__gnu_debug::_Error_formatter::_M_at(__FILE__, __LINE__)	\
47	  ._ErrorMessage._M_error();					\
48  } while (false)
49
50// Verify that [_First, _Last) forms a valid iterator range.
51#define __glibcxx_check_valid_range(_First,_Last)			\
52_GLIBCXX_DEBUG_VERIFY(::__gnu_debug::__valid_range(_First, _Last),	\
53		      _M_message(::__gnu_debug::__msg_valid_range)	\
54		      ._M_iterator(_First, #_First)			\
55		      ._M_iterator(_Last, #_Last))
56
57/** Verify that we can insert into *this with the iterator _Position.
58 *  Insertion into a container at a specific position requires that
59 *  the iterator be nonsingular (i.e., either dereferenceable or
60 *  past-the-end) and that it reference the sequence we are inserting
61 *  into. Note that this macro is only valid when the container is a
62 *  _Safe_sequence and the iterator is a _Safe_iterator.
63*/
64#define __glibcxx_check_insert(_Position)				\
65_GLIBCXX_DEBUG_VERIFY(!_Position._M_singular(),				\
66		      _M_message(::__gnu_debug::__msg_insert_singular) \
67		      ._M_sequence(*this, "this")			\
68		      ._M_iterator(_Position, #_Position));		\
69_GLIBCXX_DEBUG_VERIFY(_Position._M_attached_to(this),			\
70		      _M_message(::__gnu_debug::__msg_insert_different) \
71		      ._M_sequence(*this, "this")			\
72		      ._M_iterator(_Position, #_Position))
73
74/** Verify that we can insert the values in the iterator range
75 *  [_First, _Last) into *this with the iterator _Position.  Insertion
76 *  into a container at a specific position requires that the iterator
77 *  be nonsingular (i.e., either dereferenceable or past-the-end),
78 *  that it reference the sequence we are inserting into, and that the
79 *  iterator range [_First, Last) is a valid (possibly empty)
80 *  range. Note that this macro is only valid when the container is a
81 *  _Safe_sequence and the iterator is a _Safe_iterator.
82 *
83 *  @tbd We would like to be able to check for noninterference of
84 *  _Position and the range [_First, _Last), but that can't (in
85 *  general) be done.
86*/
87#define __glibcxx_check_insert_range(_Position,_First,_Last)		\
88__glibcxx_check_valid_range(_First,_Last);				\
89_GLIBCXX_DEBUG_VERIFY(!_Position._M_singular(),				\
90		      _M_message(::__gnu_debug::__msg_insert_singular) \
91                      ._M_sequence(*this, "this")			\
92		      ._M_iterator(_Position, #_Position));		\
93_GLIBCXX_DEBUG_VERIFY(_Position._M_attached_to(this),			\
94		      _M_message(::__gnu_debug::__msg_insert_different) \
95		      ._M_sequence(*this, "this")			\
96		      ._M_iterator(_Position, #_Position))
97
98/** Verify that we can erase the element referenced by the iterator
99 * _Position. We can erase the element if the _Position iterator is
100 * dereferenceable and references this sequence.
101*/
102#define __glibcxx_check_erase(_Position)				\
103_GLIBCXX_DEBUG_VERIFY(_Position._M_dereferenceable(),			\
104		      _M_message(::__gnu_debug::__msg_erase_bad)	\
105                      ._M_sequence(*this, "this")			\
106		      ._M_iterator(_Position, #_Position));		\
107_GLIBCXX_DEBUG_VERIFY(_Position._M_attached_to(this),			\
108		      _M_message(::__gnu_debug::__msg_erase_different) \
109		      ._M_sequence(*this, "this")			\
110		      ._M_iterator(_Position, #_Position))
111
112/** Verify that we can erase the elements in the iterator range
113 *  [_First, _Last). We can erase the elements if [_First, _Last) is a
114 *  valid iterator range within this sequence.
115*/
116#define __glibcxx_check_erase_range(_First,_Last)			\
117__glibcxx_check_valid_range(_First,_Last);				\
118_GLIBCXX_DEBUG_VERIFY(_First._M_attached_to(this),			\
119		      _M_message(::__gnu_debug::__msg_erase_different) \
120                      ._M_sequence(*this, "this")			\
121		      ._M_iterator(_First, #_First)			\
122		      ._M_iterator(_Last, #_Last))
123
124// Verify that the subscript _N is less than the container's size.
125#define __glibcxx_check_subscript(_N)					\
126_GLIBCXX_DEBUG_VERIFY(_N < this->size(),				\
127		      _M_message(::__gnu_debug::__msg_subscript_oob) \
128                      ._M_sequence(*this, "this")			\
129		      ._M_integer(_N, #_N)				\
130		      ._M_integer(this->size(), "size"))
131
132// Verify that the container is nonempty
133#define __glibcxx_check_nonempty()					\
134_GLIBCXX_DEBUG_VERIFY(! this->empty(),					\
135		      _M_message(::__gnu_debug::__msg_empty)	\
136                      ._M_sequence(*this, "this"))
137
138// Verify that the < operator for elements in the sequence is a
139// StrictWeakOrdering by checking that it is irreflexive.
140#define __glibcxx_check_strict_weak_ordering(_First,_Last)	\
141_GLIBCXX_DEBUG_ASSERT(_First == _Last || !(*_First < *_First))
142
143// Verify that the predicate is StrictWeakOrdering by checking that it
144// is irreflexive.
145#define __glibcxx_check_strict_weak_ordering_pred(_First,_Last,_Pred)	\
146_GLIBCXX_DEBUG_ASSERT(_First == _Last || !_Pred(*_First, *_First))
147
148
149// Verify that the iterator range [_First, _Last) is sorted
150#define __glibcxx_check_sorted(_First,_Last)				\
151__glibcxx_check_valid_range(_First,_Last);				\
152__glibcxx_check_strict_weak_ordering(_First,_Last);			\
153_GLIBCXX_DEBUG_VERIFY(::__gnu_debug::__check_sorted(_First, _Last),	\
154		      _M_message(::__gnu_debug::__msg_unsorted)	\
155                      ._M_iterator(_First, #_First)			\
156		      ._M_iterator(_Last, #_Last))
157
158/** Verify that the iterator range [_First, _Last) is sorted by the
159    predicate _Pred. */
160#define __glibcxx_check_sorted_pred(_First,_Last,_Pred)			\
161__glibcxx_check_valid_range(_First,_Last);				\
162__glibcxx_check_strict_weak_ordering_pred(_First,_Last,_Pred);	        \
163_GLIBCXX_DEBUG_VERIFY(::__gnu_debug::__check_sorted(_First, _Last, _Pred), \
164		      _M_message(::__gnu_debug::__msg_unsorted_pred) \
165                      ._M_iterator(_First, #_First)			\
166		      ._M_iterator(_Last, #_Last)			\
167		      ._M_string(#_Pred))
168
169/** Verify that the iterator range [_First, _Last) is partitioned
170    w.r.t. the value _Value. */
171#define __glibcxx_check_partitioned(_First,_Last,_Value)		\
172__glibcxx_check_valid_range(_First,_Last);				\
173_GLIBCXX_DEBUG_VERIFY(::__gnu_debug::__check_partitioned(_First, _Last,	\
174							 _Value),	\
175		      _M_message(::__gnu_debug::__msg_unpartitioned) \
176		      ._M_iterator(_First, #_First)			\
177		      ._M_iterator(_Last, #_Last)			\
178		      ._M_string(#_Value))
179
180/** Verify that the iterator range [_First, _Last) is partitioned
181    w.r.t. the value _Value and predicate _Pred. */
182#define __glibcxx_check_partitioned_pred(_First,_Last,_Value,_Pred)	\
183__glibcxx_check_valid_range(_First,_Last);				\
184_GLIBCXX_DEBUG_VERIFY(::__gnu_debug::__check_partitioned(_First, _Last,	\
185							 _Value, _Pred), \
186		      _M_message(::__gnu_debug::__msg_unpartitioned_pred) \
187		      ._M_iterator(_First, #_First)			\
188		      ._M_iterator(_Last, #_Last)			\
189		      ._M_string(#_Pred)				\
190                      ._M_string(#_Value))
191
192// Verify that the iterator range [_First, _Last) is a heap
193#define __glibcxx_check_heap(_First,_Last)				\
194__glibcxx_check_valid_range(_First,_Last);				\
195_GLIBCXX_DEBUG_VERIFY(::std::__is_heap(_First, _Last),		\
196		      _M_message(::__gnu_debug::__msg_not_heap)	\
197		      ._M_iterator(_First, #_First)			\
198		      ._M_iterator(_Last, #_Last))
199
200/** Verify that the iterator range [_First, _Last) is a heap
201    w.r.t. the predicate _Pred. */
202#define __glibcxx_check_heap_pred(_First,_Last,_Pred)			\
203__glibcxx_check_valid_range(_First,_Last);				\
204_GLIBCXX_DEBUG_VERIFY(::std::__is_heap(_First, _Last, _Pred),		\
205		      _M_message(::__gnu_debug::__msg_not_heap_pred) \
206                      ._M_iterator(_First, #_First)			\
207		      ._M_iterator(_Last, #_Last)			\
208		      ._M_string(#_Pred))
209
210#ifdef _GLIBCXX_DEBUG_PEDANTIC
211#  define __glibcxx_check_string(_String) _GLIBCXX_DEBUG_ASSERT(_String != 0)
212#  define __glibcxx_check_string_len(_String,_Len) \
213       _GLIBCXX_DEBUG_ASSERT(_String != 0 || _Len == 0)
214#else
215#  define __glibcxx_check_string(_String)
216#  define __glibcxx_check_string_len(_String,_Len)
217#endif
218
219/** Macros used by the implementation outside of debug wrappers to
220 *  verify certain properties. The __glibcxx_requires_xxx macros are
221 *  merely wrappers around the __glibcxx_check_xxx wrappers when we
222 *  are compiling with debug mode, but disappear when we are in
223 *  release mode so that there is no checking performed in, e.g., the
224 *  standard library algorithms.
225*/
226#ifdef _GLIBCXX_DEBUG
227#  define _GLIBCXX_DEBUG_ASSERT(_Condition) assert(_Condition)
228
229#  ifdef _GLIBXX_DEBUG_PEDANTIC
230#    define _GLIBCXX_DEBUG_PEDASSERT(_Condition) assert(_Condition)
231#  else
232#    define _GLIBCXX_DEBUG_PEDASSERT(_Condition)
233#  endif
234
235#  define __glibcxx_requires_cond(_Cond,_Msg) _GLIBCXX_DEBUG_VERIFY(_Cond,_Msg)
236#  define __glibcxx_requires_valid_range(_First,_Last) \
237     __glibcxx_check_valid_range(_First,_Last)
238#  define __glibcxx_requires_sorted(_First,_Last) \
239     __glibcxx_check_sorted(_First,_Last)
240#  define __glibcxx_requires_sorted_pred(_First,_Last,_Pred) \
241     __glibcxx_check_sorted_pred(_First,_Last,_Pred)
242#  define __glibcxx_requires_partitioned(_First,_Last,_Value)	\
243     __glibcxx_check_partitioned(_First,_Last,_Value)
244#  define __glibcxx_requires_partitioned_pred(_First,_Last,_Value,_Pred) \
245     __glibcxx_check_partitioned_pred(_First,_Last,_Value,_Pred)
246#  define __glibcxx_requires_heap(_First,_Last) \
247     __glibcxx_check_heap(_First,_Last)
248#  define __glibcxx_requires_heap_pred(_First,_Last,_Pred) \
249     __glibcxx_check_heap_pred(_First,_Last,_Pred)
250#  define __glibcxx_requires_nonempty() __glibcxx_check_nonempty()
251#  define __glibcxx_requires_string(_String) __glibcxx_check_string(_String)
252#  define __glibcxx_requires_string_len(_String,_Len)	\
253     __glibcxx_check_string_len(_String,_Len)
254#  define __glibcxx_requires_subscript(_N) __glibcxx_check_subscript(_N)
255#else
256#  define _GLIBCXX_DEBUG_ASSERT(_Condition)
257#  define _GLIBCXX_DEBUG_PEDASSERT(_Condition)
258#  define __glibcxx_requires_cond(_Cond,_Msg)
259#  define __glibcxx_requires_valid_range(_First,_Last)
260#  define __glibcxx_requires_sorted(_First,_Last)
261#  define __glibcxx_requires_sorted_pred(_First,_Last,_Pred)
262#  define __glibcxx_requires_partitioned(_First,_Last,_Value)
263#  define __glibcxx_requires_partitioned_pred(_First,_Last,_Value,_Pred)
264#  define __glibcxx_requires_heap(_First,_Last)
265#  define __glibcxx_requires_heap_pred(_First,_Last,_Pred)
266#  define __glibcxx_requires_nonempty()
267#  define __glibcxx_requires_string(_String)
268#  define __glibcxx_requires_string_len(_String,_Len)
269#  define __glibcxx_requires_subscript(_N)
270#endif
271
272#include <cassert> // TBD: temporary
273
274#include <stddef.h>                       // for ptrdiff_t
275#include <bits/stl_iterator_base_types.h> // for iterator_traits, categories
276#include <bits/type_traits.h>             // for _Is_integer
277
278namespace __gnu_debug
279{
280  template<typename _Iterator, typename _Sequence>
281    class _Safe_iterator;
282
283  // An arbitrary iterator pointer is not singular.
284  inline bool
285  __check_singular_aux(const void*) { return false; }
286
287  // We may have an iterator that derives from _Safe_iterator_base but isn't
288  // a _Safe_iterator.
289  template<typename _Iterator>
290    inline bool
291    __check_singular(_Iterator& __x)
292    { return __gnu_debug::__check_singular_aux(&__x); }
293
294  /** Non-NULL pointers are nonsingular. */
295  template<typename _Tp>
296    inline bool
297    __check_singular(const _Tp* __ptr)
298    { return __ptr == 0; }
299
300  /** Safe iterators know if they are singular. */
301  template<typename _Iterator, typename _Sequence>
302    inline bool
303    __check_singular(const _Safe_iterator<_Iterator, _Sequence>& __x)
304    { return __x._M_singular(); }
305
306  /** Assume that some arbitrary iterator is dereferenceable, because we
307      can't prove that it isn't. */
308  template<typename _Iterator>
309    inline bool
310    __check_dereferenceable(_Iterator&)
311    { return true; }
312
313  /** Non-NULL pointers are dereferenceable. */
314  template<typename _Tp>
315    inline bool
316    __check_dereferenceable(const _Tp* __ptr)
317    { return __ptr; }
318
319  /** Safe iterators know if they are singular. */
320  template<typename _Iterator, typename _Sequence>
321    inline bool
322    __check_dereferenceable(const _Safe_iterator<_Iterator, _Sequence>& __x)
323    { return __x._M_dereferenceable(); }
324
325  /** If the distance between two random access iterators is
326   *  nonnegative, assume the range is valid.
327  */
328  template<typename _RandomAccessIterator>
329    inline bool
330    __valid_range_aux2(const _RandomAccessIterator& __first,
331		       const _RandomAccessIterator& __last,
332		       std::random_access_iterator_tag)
333    { return __last - __first >= 0; }
334
335  /** Can't test for a valid range with input iterators, because
336   *  iteration may be destructive. So we just assume that the range
337   *  is valid.
338  */
339  template<typename _InputIterator>
340    inline bool
341    __valid_range_aux2(const _InputIterator&, const _InputIterator&,
342		       std::input_iterator_tag)
343    { return true; }
344
345  /** We say that integral types for a valid range, and defer to other
346   *  routines to realize what to do with integral types instead of
347   *  iterators.
348  */
349  template<typename _Integral>
350    inline bool
351    __valid_range_aux(const _Integral&, const _Integral&, __true_type)
352    { return true; }
353
354  /** We have iterators, so figure out what kind of iterators that are
355   *  to see if we can check the range ahead of time.
356  */
357  template<typename _InputIterator>
358    inline bool
359    __valid_range_aux(const _InputIterator& __first,
360		      const _InputIterator& __last, __false_type)
361  {
362    typedef typename std::iterator_traits<_InputIterator>::iterator_category
363      _Category;
364    return __gnu_debug::__valid_range_aux2(__first, __last, _Category());
365  }
366
367  /** Don't know what these iterators are, or if they are even
368   *  iterators (we may get an integral type for InputIterator), so
369   *  see if they are integral and pass them on to the next phase
370   *  otherwise.
371  */
372  template<typename _InputIterator>
373    inline bool
374    __valid_range(const _InputIterator& __first, const _InputIterator& __last)
375    {
376      typedef typename _Is_integer<_InputIterator>::_Integral _Integral;
377      return __gnu_debug::__valid_range_aux(__first, __last, _Integral());
378    }
379
380  /** Safe iterators know how to check if they form a valid range. */
381  template<typename _Iterator, typename _Sequence>
382    inline bool
383    __valid_range(const _Safe_iterator<_Iterator, _Sequence>& __first,
384		  const _Safe_iterator<_Iterator, _Sequence>& __last)
385    { return __first._M_valid_range(__last); }
386
387  /* Checks that [first, last) is a valid range, and then returns
388   * __first. This routine is useful when we can't use a separate
389   * assertion statement because, e.g., we are in a constructor.
390  */
391  template<typename _InputIterator>
392    inline _InputIterator
393    __check_valid_range(const _InputIterator& __first,
394			const _InputIterator& __last)
395    {
396      _GLIBCXX_DEBUG_ASSERT(__gnu_debug::__valid_range(__first, __last));
397      return __first;
398    }
399
400  /** Checks that __s is non-NULL or __n == 0, and then returns __s. */
401  template<typename _CharT, typename _Integer>
402    inline const _CharT*
403    __check_string(const _CharT* __s, const _Integer& __n)
404    {
405#ifdef _GLIBCXX_DEBUG_PEDANTIC
406      _GLIBCXX_DEBUG_ASSERT(__s != 0 || __n == 0);
407#endif
408      return __s;
409    }
410
411  /** Checks that __s is non-NULL and then returns __s. */
412  template<typename _CharT>
413    inline const _CharT*
414    __check_string(const _CharT* __s)
415    {
416#ifdef _GLIBCXX_DEBUG_PEDANTIC
417      _GLIBCXX_DEBUG_ASSERT(__s != 0);
418#endif
419      return __s;
420    }
421
422  // Can't check if an input iterator sequence is sorted, because we
423  // can't step through the sequence.
424  template<typename _InputIterator>
425    inline bool
426    __check_sorted_aux(const _InputIterator&, const _InputIterator&,
427                       std::input_iterator_tag)
428    { return true; }
429
430  // Can verify if a forward iterator sequence is in fact sorted using
431  // std::__is_sorted
432  template<typename _ForwardIterator>
433    inline bool
434    __check_sorted_aux(_ForwardIterator __first, _ForwardIterator __last,
435                       std::forward_iterator_tag)
436    {
437      if (__first == __last)
438        return true;
439
440      _ForwardIterator __next = __first;
441      for (++__next; __next != __last; __first = __next, ++__next) {
442        if (*__next < *__first)
443          return false;
444      }
445
446      return true;
447    }
448
449  // Can't check if an input iterator sequence is sorted, because we can't step
450  // through the sequence.
451  template<typename _InputIterator, typename _Predicate>
452    inline bool
453    __check_sorted_aux(const _InputIterator&, const _InputIterator&,
454                       _Predicate, std::input_iterator_tag)
455    { return true; }
456
457  // Can verify if a forward iterator sequence is in fact sorted using
458  // std::__is_sorted
459  template<typename _ForwardIterator, typename _Predicate>
460    inline bool
461    __check_sorted_aux(_ForwardIterator __first, _ForwardIterator __last,
462                       _Predicate __pred, std::forward_iterator_tag)
463    {
464      if (__first == __last)
465        return true;
466
467      _ForwardIterator __next = __first;
468      for (++__next; __next != __last; __first = __next, ++__next) {
469        if (__pred(*__next, *__first))
470          return false;
471      }
472
473      return true;
474    }
475
476  // Determine if a sequence is sorted.
477  template<typename _InputIterator>
478    inline bool
479    __check_sorted(const _InputIterator& __first, const _InputIterator& __last)
480    {
481      typedef typename std::iterator_traits<_InputIterator>::iterator_category
482        _Category;
483      return __gnu_debug::__check_sorted_aux(__first, __last, _Category());
484    }
485
486  template<typename _InputIterator, typename _Predicate>
487    inline bool
488    __check_sorted(const _InputIterator& __first, const _InputIterator& __last,
489                   _Predicate __pred)
490    {
491      typedef typename std::iterator_traits<_InputIterator>::iterator_category
492        _Category;
493      return __gnu_debug::__check_sorted_aux(__first, __last, __pred,
494					     _Category());
495    }
496
497  // _GLIBCXX_RESOLVE_LIB_DEFECTS
498  // 270. Binary search requirements overly strict
499  // Determine if a sequence is partitioned w.r.t. this element.
500  template<typename _ForwardIterator, typename _Tp>
501    inline bool
502    __check_partitioned(_ForwardIterator __first, _ForwardIterator __last,
503			const _Tp& __value)
504    {
505      while (__first != __last && *__first < __value)
506	++__first;
507      while (__first != __last && !(*__first < __value))
508	++__first;
509      return __first == __last;
510    }
511
512  // Determine if a sequence is partitioned w.r.t. this element.
513  template<typename _ForwardIterator, typename _Tp, typename _Pred>
514    inline bool
515    __check_partitioned(_ForwardIterator __first, _ForwardIterator __last,
516			const _Tp& __value, _Pred __pred)
517    {
518      while (__first != __last && __pred(*__first, __value))
519	++__first;
520      while (__first != __last && !__pred(*__first, __value))
521	++__first;
522      return __first == __last;
523    }
524} // namespace __gnu_debug
525
526#ifdef _GLIBCXX_DEBUG
527// We need the error formatter
528#  include <debug/formatter.h>
529#endif
530
531#endif
532