1// Algorithm extensions -*- C++ -*-
 
    3// Copyright (C) 2001-2021 Free Software Foundation, Inc.
 
    5// This file is part of the GNU ISO C++ Library.  This library is free
 
    6// software; you can redistribute it and/or modify it under the
 
    7// terms of the GNU General Public License as published by the
 
    8// Free Software Foundation; either version 3, or (at your option)
 
   11// This library is distributed in the hope that it will be useful,
 
   12// but WITHOUT ANY WARRANTY; without even the implied warranty of
 
   13// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 
   14// GNU General Public License for more details.
 
   16// Under Section 7 of GPL version 3, you are granted additional
 
   17// permissions described in the GCC Runtime Library Exception, version
 
   18// 3.1, as published by the Free Software Foundation.
 
   20// You should have received a copy of the GNU General Public License and
 
   21// a copy of the GCC Runtime Library Exception along with this program;
 
   22// see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
 
   23// <http://www.gnu.org/licenses/>.
 
   28 * Hewlett-Packard Company
 
   30 * Permission to use, copy, modify, distribute and sell this software
 
   31 * and its documentation for any purpose is hereby granted without fee,
 
   32 * provided that the above copyright notice appear in all copies and
 
   33 * that both that copyright notice and this permission notice appear
 
   34 * in supporting documentation.  Hewlett-Packard Company makes no
 
   35 * representations about the suitability of this software for any
 
   36 * purpose.  It is provided "as is" without express or implied warranty.
 
   40 * Silicon Graphics Computer Systems, Inc.
 
   42 * Permission to use, copy, modify, distribute and sell this software
 
   43 * and its documentation for any purpose is hereby granted without fee,
 
   44 * provided that the above copyright notice appear in all copies and
 
   45 * that both that copyright notice and this permission notice appear
 
   46 * in supporting documentation.  Silicon Graphics makes no
 
   47 * representations about the suitability of this software for any
 
   48 * purpose.  It is provided "as is" without express or implied warranty.
 
   51/** @file ext/algorithm
 
   52 *  This file is a GNU extension to the Standard C++ Library (possibly
 
   53 *  containing extensions from the HP/SGI STL subset).
 
   57#define _EXT_ALGORITHM 1
 
   59#pragma GCC system_header
 
   63namespace __gnu_cxx _GLIBCXX_VISIBILITY(default)
 
   65_GLIBCXX_BEGIN_NAMESPACE_VERSION
 
   67  //--------------------------------------------------
 
   68  // copy_n (not part of the C++ standard)
 
   70  template<typename _InputIterator, typename _Size, typename _OutputIterator>
 
   71    std::pair<_InputIterator, _OutputIterator>
 
   72    __copy_n(_InputIterator __first, _Size __count,
 
   73             _OutputIterator __result,
 
   74             std::input_iterator_tag)
 
   76      for ( ; __count > 0; --__count)
 
   82      return std::pair<_InputIterator, _OutputIterator>(__first, __result);
 
   85  template<typename _RAIterator, typename _Size, typename _OutputIterator>
 
   86    inline std::pair<_RAIterator, _OutputIterator>
 
   87    __copy_n(_RAIterator __first, _Size __count,
 
   88             _OutputIterator __result,
 
   89             std::random_access_iterator_tag)
 
   91      _RAIterator __last = __first + __count;
 
   92      return std::pair<_RAIterator, _OutputIterator>(__last, std::copy(__first,
 
   98   *  @brief Copies the range [first,first+count) into [result,result+count).
 
   99   *  @param  __first  An input iterator.
 
  100   *  @param  __count  The number of elements to copy.
 
  101   *  @param  __result An output iterator.
 
  102   *  @return   A std::pair composed of first+count and result+count.
 
  104   *  This is an SGI extension.
 
  105   *  This inline function will boil down to a call to @c memmove whenever
 
  106   *  possible.  Failing that, if random access iterators are passed, then the
 
  107   *  loop count will be known (and therefore a candidate for compiler
 
  108   *  optimizations such as unrolling).
 
  109   *  @ingroup SGIextensions
 
  111  template<typename _InputIterator, typename _Size, typename _OutputIterator>
 
  112    inline std::pair<_InputIterator, _OutputIterator>
 
  113    copy_n(_InputIterator __first, _Size __count, _OutputIterator __result)
 
  115      // concept requirements
 
  116      __glibcxx_function_requires(_InputIteratorConcept<_InputIterator>)
 
  117      __glibcxx_function_requires(_OutputIteratorConcept<_OutputIterator,
 
  118            typename std::iterator_traits<_InputIterator>::value_type>)
 
  120      return __gnu_cxx::__copy_n(__first, __count, __result,
 
  121                                 std::__iterator_category(__first));
 
  124  template<typename _InputIterator1, typename _InputIterator2>
 
  126    __lexicographical_compare_3way(_InputIterator1 __first1,
 
  127                                   _InputIterator1 __last1,
 
  128                                   _InputIterator2 __first2,
 
  129                                   _InputIterator2 __last2)
 
  131      while (__first1 != __last1 && __first2 != __last2)
 
  133          if (*__first1 < *__first2)
 
  135          if (*__first2 < *__first1)
 
  140      if (__first2 == __last2)
 
  141        return !(__first1 == __last1);
 
  147  __lexicographical_compare_3way(const unsigned char* __first1,
 
  148                                 const unsigned char* __last1,
 
  149                                 const unsigned char* __first2,
 
  150                                 const unsigned char* __last2)
 
  152    const std::ptrdiff_t __len1 = __last1 - __first1;
 
  153    const std::ptrdiff_t __len2 = __last2 - __first2;
 
  154    const int __result = __builtin_memcmp(__first1, __first2,
 
  155                                          (std::min)(__len1, __len2));
 
  156    return __result != 0 ? __result
 
  157                         : (__len1 == __len2 ? 0 : (__len1 < __len2 ? -1 : 1));
 
  161  __lexicographical_compare_3way(const char* __first1, const char* __last1,
 
  162                                 const char* __first2, const char* __last2)
 
  164#if CHAR_MAX == SCHAR_MAX
 
  165    return __lexicographical_compare_3way((const signed char*) __first1,
 
  166                                          (const signed char*) __last1,
 
  167                                          (const signed char*) __first2,
 
  168                                          (const signed char*) __last2);
 
  170    return __lexicographical_compare_3way((const unsigned char*) __first1,
 
  171                                          (const unsigned char*) __last1,
 
  172                                          (const unsigned char*) __first2,
 
  173                                          (const unsigned char*) __last2);
 
  178   *  @brief @c memcmp on steroids.
 
  179   *  @param  __first1  An input iterator.
 
  180   *  @param  __last1   An input iterator.
 
  181   *  @param  __first2  An input iterator.
 
  182   *  @param  __last2   An input iterator.
 
  183   *  @return   An int, as with @c memcmp.
 
  185   *  The return value will be less than zero if the first range is
 
  186   *  <em>lexigraphically less than</em> the second, greater than zero
 
  187   *  if the second range is <em>lexigraphically less than</em> the
 
  188   *  first, and zero otherwise.
 
  189   *  This is an SGI extension.
 
  190   *  @ingroup SGIextensions
 
  192  template<typename _InputIterator1, typename _InputIterator2>
 
  194    lexicographical_compare_3way(_InputIterator1 __first1,
 
  195                                 _InputIterator1 __last1,
 
  196                                 _InputIterator2 __first2,
 
  197                                 _InputIterator2 __last2)
 
  199      // concept requirements
 
  200      __glibcxx_function_requires(_InputIteratorConcept<_InputIterator1>)
 
  201      __glibcxx_function_requires(_InputIteratorConcept<_InputIterator2>)
 
  202      __glibcxx_function_requires(_LessThanComparableConcept<
 
  203            typename std::iterator_traits<_InputIterator1>::value_type>)
 
  204      __glibcxx_function_requires(_LessThanComparableConcept<
 
  205            typename std::iterator_traits<_InputIterator2>::value_type>)
 
  206      __glibcxx_requires_valid_range(__first1, __last1);
 
  207      __glibcxx_requires_valid_range(__first2, __last2);
 
  209      return __lexicographical_compare_3way(__first1, __last1, __first2,
 
  213  // count and count_if: this version, whose return type is void, was present
 
  214  // in the HP STL, and is retained as an extension for backward compatibility.
 
  215  template<typename _InputIterator, typename _Tp, typename _Size>
 
  217    count(_InputIterator __first, _InputIterator __last,
 
  221      // concept requirements
 
  222      __glibcxx_function_requires(_InputIteratorConcept<_InputIterator>)
 
  223      __glibcxx_function_requires(_EqualityComparableConcept<
 
  224            typename std::iterator_traits<_InputIterator>::value_type >)
 
  225      __glibcxx_function_requires(_EqualityComparableConcept<_Tp>)
 
  226      __glibcxx_requires_valid_range(__first, __last);
 
  228      for ( ; __first != __last; ++__first)
 
  229        if (*__first == __value)
 
  233  template<typename _InputIterator, typename _Predicate, typename _Size>
 
  235    count_if(_InputIterator __first, _InputIterator __last,
 
  239      // concept requirements
 
  240      __glibcxx_function_requires(_InputIteratorConcept<_InputIterator>)
 
  241      __glibcxx_function_requires(_UnaryPredicateConcept<_Predicate,
 
  242            typename std::iterator_traits<_InputIterator>::value_type>)
 
  243      __glibcxx_requires_valid_range(__first, __last);
 
  245      for ( ; __first != __last; ++__first)
 
  246        if (__pred(*__first))
 
  250  // random_sample and random_sample_n (extensions, not part of the standard).
 
  253   *  This is an SGI extension.
 
  254   *  @ingroup SGIextensions
 
  257  template<typename _ForwardIterator, typename _OutputIterator,
 
  260    random_sample_n(_ForwardIterator __first, _ForwardIterator __last,
 
  261                    _OutputIterator __out, const _Distance __n)
 
  263      // concept requirements
 
  264      __glibcxx_function_requires(_ForwardIteratorConcept<_ForwardIterator>)
 
  265      __glibcxx_function_requires(_OutputIteratorConcept<_OutputIterator,
 
  266                typename std::iterator_traits<_ForwardIterator>::value_type>)
 
  267      __glibcxx_requires_valid_range(__first, __last);
 
  269      _Distance __remaining = std::distance(__first, __last);
 
  270      _Distance __m = (std::min)(__n, __remaining);
 
  274          if ((std::rand() % __remaining) < __m)
 
  287   *  This is an SGI extension.
 
  288   *  @ingroup SGIextensions
 
  291  template<typename _ForwardIterator, typename _OutputIterator,
 
  292           typename _Distance, typename _RandomNumberGenerator>
 
  294    random_sample_n(_ForwardIterator __first, _ForwardIterator __last,
 
  295                   _OutputIterator __out, const _Distance __n,
 
  296                   _RandomNumberGenerator& __rand)
 
  298      // concept requirements
 
  299      __glibcxx_function_requires(_ForwardIteratorConcept<_ForwardIterator>)
 
  300      __glibcxx_function_requires(_OutputIteratorConcept<_OutputIterator,
 
  301                typename std::iterator_traits<_ForwardIterator>::value_type>)
 
  302      __glibcxx_function_requires(_UnaryFunctionConcept<
 
  303                _RandomNumberGenerator, _Distance, _Distance>)
 
  304      __glibcxx_requires_valid_range(__first, __last);
 
  306      _Distance __remaining = std::distance(__first, __last);
 
  307      _Distance __m = (std::min)(__n, __remaining);
 
  311          if (__rand(__remaining) < __m)
 
  323  template<typename _InputIterator, typename _RandomAccessIterator,
 
  325    _RandomAccessIterator
 
  326    __random_sample(_InputIterator __first, _InputIterator __last,
 
  327                    _RandomAccessIterator __out,
 
  332      for ( ; __first != __last && __m < __n; ++__m, ++__first)
 
  333        __out[__m] = *__first;
 
  335      while (__first != __last)
 
  338          _Distance __M = std::rand() % (__t);
 
  340            __out[__M] = *__first;
 
  346  template<typename _InputIterator, typename _RandomAccessIterator,
 
  347           typename _RandomNumberGenerator, typename _Distance>
 
  348    _RandomAccessIterator
 
  349    __random_sample(_InputIterator __first, _InputIterator __last,
 
  350                    _RandomAccessIterator __out,
 
  351                    _RandomNumberGenerator& __rand,
 
  354      // concept requirements
 
  355      __glibcxx_function_requires(_UnaryFunctionConcept<
 
  356            _RandomNumberGenerator, _Distance, _Distance>)
 
  360      for ( ; __first != __last && __m < __n; ++__m, ++__first)
 
  361        __out[__m] = *__first;
 
  363      while (__first != __last)
 
  366          _Distance __M = __rand(__t);
 
  368            __out[__M] = *__first;
 
  375   *  This is an SGI extension.
 
  376   *  @ingroup SGIextensions
 
  379  template<typename _InputIterator, typename _RandomAccessIterator>
 
  380    inline _RandomAccessIterator
 
  381    random_sample(_InputIterator __first, _InputIterator __last,
 
  382                  _RandomAccessIterator __out_first,
 
  383                  _RandomAccessIterator __out_last)
 
  385      // concept requirements
 
  386      __glibcxx_function_requires(_InputIteratorConcept<_InputIterator>)
 
  387      __glibcxx_function_requires(_Mutable_RandomAccessIteratorConcept<
 
  388            _RandomAccessIterator>)
 
  389      __glibcxx_requires_valid_range(__first, __last);
 
  390      __glibcxx_requires_valid_range(__out_first, __out_last);
 
  392      return __random_sample(__first, __last,
 
  393                             __out_first, __out_last - __out_first);
 
  397   *  This is an SGI extension.
 
  398   *  @ingroup SGIextensions
 
  401  template<typename _InputIterator, typename _RandomAccessIterator,
 
  402           typename _RandomNumberGenerator>
 
  403    inline _RandomAccessIterator
 
  404    random_sample(_InputIterator __first, _InputIterator __last,
 
  405                  _RandomAccessIterator __out_first,
 
  406                  _RandomAccessIterator __out_last,
 
  407                  _RandomNumberGenerator& __rand)
 
  409      // concept requirements
 
  410      __glibcxx_function_requires(_InputIteratorConcept<_InputIterator>)
 
  411      __glibcxx_function_requires(_Mutable_RandomAccessIteratorConcept<
 
  412            _RandomAccessIterator>)
 
  413      __glibcxx_requires_valid_range(__first, __last);
 
  414      __glibcxx_requires_valid_range(__out_first, __out_last);
 
  416      return __random_sample(__first, __last,
 
  418                             __out_last - __out_first);
 
  421#if __cplusplus >= 201103L
 
  425   *  This is an SGI extension.
 
  426   *  @ingroup SGIextensions
 
  429  template<typename _RandomAccessIterator>
 
  431    is_heap(_RandomAccessIterator __first, _RandomAccessIterator __last)
 
  433      // concept requirements
 
  434      __glibcxx_function_requires(_RandomAccessIteratorConcept<
 
  435                                  _RandomAccessIterator>)
 
  436      __glibcxx_function_requires(_LessThanComparableConcept<
 
  437            typename std::iterator_traits<_RandomAccessIterator>::value_type>)
 
  438      __glibcxx_requires_valid_range(__first, __last);
 
  440      return std::__is_heap(__first, __last - __first);
 
  444   *  This is an SGI extension.
 
  445   *  @ingroup SGIextensions
 
  448  template<typename _RandomAccessIterator, typename _StrictWeakOrdering>
 
  450    is_heap(_RandomAccessIterator __first, _RandomAccessIterator __last,
 
  451            _StrictWeakOrdering __comp)
 
  453      // concept requirements
 
  454      __glibcxx_function_requires(_RandomAccessIteratorConcept<
 
  455                                  _RandomAccessIterator>)
 
  456      __glibcxx_function_requires(_BinaryPredicateConcept<_StrictWeakOrdering,
 
  457            typename std::iterator_traits<_RandomAccessIterator>::value_type,
 
  458            typename std::iterator_traits<_RandomAccessIterator>::value_type>)
 
  459      __glibcxx_requires_valid_range(__first, __last);
 
  461      return std::__is_heap(__first, __comp, __last - __first);
 
  465#if __cplusplus >= 201103L
 
  466  using std::is_sorted;
 
  468  // is_sorted, a predicated testing whether a range is sorted in
 
  469  // nondescending order.  This is an extension, not part of the C++
 
  473   *  This is an SGI extension.
 
  474   *  @ingroup SGIextensions
 
  477  template<typename _ForwardIterator>
 
  479    is_sorted(_ForwardIterator __first, _ForwardIterator __last)
 
  481      // concept requirements
 
  482      __glibcxx_function_requires(_ForwardIteratorConcept<_ForwardIterator>)
 
  483      __glibcxx_function_requires(_LessThanComparableConcept<
 
  484            typename std::iterator_traits<_ForwardIterator>::value_type>)
 
  485      __glibcxx_requires_valid_range(__first, __last);
 
  487      if (__first == __last)
 
  490      _ForwardIterator __next = __first;
 
  491      for (++__next; __next != __last; __first = __next, ++__next)
 
  492        if (*__next < *__first)
 
  498   *  This is an SGI extension.
 
  499   *  @ingroup SGIextensions
 
  502  template<typename _ForwardIterator, typename _StrictWeakOrdering>
 
  504    is_sorted(_ForwardIterator __first, _ForwardIterator __last,
 
  505              _StrictWeakOrdering __comp)
 
  507      // concept requirements
 
  508      __glibcxx_function_requires(_ForwardIteratorConcept<_ForwardIterator>)
 
  509      __glibcxx_function_requires(_BinaryPredicateConcept<_StrictWeakOrdering,
 
  510            typename std::iterator_traits<_ForwardIterator>::value_type,
 
  511            typename std::iterator_traits<_ForwardIterator>::value_type>)
 
  512      __glibcxx_requires_valid_range(__first, __last);
 
  514      if (__first == __last)
 
  517      _ForwardIterator __next = __first;
 
  518      for (++__next; __next != __last; __first = __next, ++__next)
 
  519        if (__comp(*__next, *__first))
 
  526   *  @brief Find the median of three values.
 
  527   *  @param  __a  A value.
 
  528   *  @param  __b  A value.
 
  529   *  @param  __c  A value.
 
  530   *  @return One of @p a, @p b or @p c.
 
  532   *  If @c {l,m,n} is some convolution of @p {a,b,c} such that @c l<=m<=n
 
  533   *  then the value returned will be @c m.
 
  534   *  This is an SGI extension.
 
  535   *  @ingroup SGIextensions
 
  537  template<typename _Tp>
 
  539    __median(const _Tp& __a, const _Tp& __b, const _Tp& __c)
 
  541      // concept requirements
 
  542      __glibcxx_function_requires(_LessThanComparableConcept<_Tp>)
 
  559   *  @brief Find the median of three values using a predicate for comparison.
 
  560   *  @param  __a     A value.
 
  561   *  @param  __b     A value.
 
  562   *  @param  __c     A value.
 
  563   *  @param  __comp  A binary predicate.
 
  564   *  @return One of @p a, @p b or @p c.
 
  566   *  If @c {l,m,n} is some convolution of @p {a,b,c} such that @p comp(l,m)
 
  567   *  and @p comp(m,n) are both true then the value returned will be @c m.
 
  568   *  This is an SGI extension.
 
  569   *  @ingroup SGIextensions
 
  571  template<typename _Tp, typename _Compare>
 
  573    __median(const _Tp& __a, const _Tp& __b, const _Tp& __c, _Compare __comp)
 
  575      // concept requirements
 
  576      __glibcxx_function_requires(_BinaryFunctionConcept<_Compare, bool,
 
  578      if (__comp(__a, __b))
 
  579        if (__comp(__b, __c))
 
  581        else if (__comp(__a, __c))
 
  585      else if (__comp(__a, __c))
 
  587      else if (__comp(__b, __c))
 
  593_GLIBCXX_END_NAMESPACE_VERSION
 
  596#endif /* _EXT_ALGORITHM */