1 //===----------------------------------------------------------------------===//
2 //
3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4 // See https://llvm.org/LICENSE.txt for license information.
5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6 //
7 //===----------------------------------------------------------------------===//
8 
9 #ifndef _LIBCPP__ALGORITHM_RANGES_IS_SORTED_UNTIL_H
10 #define _LIBCPP__ALGORITHM_RANGES_IS_SORTED_UNTIL_H
11 
12 #include <__config>
13 #include <__functional/identity.h>
14 #include <__functional/invoke.h>
15 #include <__functional/ranges_operations.h>
16 #include <__iterator/concepts.h>
17 #include <__iterator/projected.h>
18 #include <__ranges/access.h>
19 #include <__ranges/concepts.h>
20 #include <__ranges/dangling.h>
21 #include <__utility/move.h>
22 
23 #if !defined(_LIBCPP_HAS_NO_PRAGMA_SYSTEM_HEADER)
24 #  pragma GCC system_header
25 #endif
26 
27 #if _LIBCPP_STD_VER >= 20
28 
29 _LIBCPP_BEGIN_NAMESPACE_STD
30 
31 namespace ranges {
32 
33 template <class _Iter, class _Sent, class _Proj, class _Comp>
34 _LIBCPP_HIDE_FROM_ABI constexpr _Iter
35 __is_sorted_until_impl(_Iter __first, _Sent __last, _Comp& __comp, _Proj& __proj) {
36   if (__first == __last)
37     return __first;
38   auto __i = __first;
39   while (++__i != __last) {
40     if (std::invoke(__comp, std::invoke(__proj, *__i), std::invoke(__proj, *__first)))
41       return __i;
42     __first = __i;
43   }
44   return __i;
45 }
46 
47 namespace __is_sorted_until {
48 struct __fn {
49   template <forward_iterator _Iter,
50             sentinel_for<_Iter> _Sent,
51             class _Proj                                               = identity,
52             indirect_strict_weak_order<projected<_Iter, _Proj>> _Comp = ranges::less>
53   _LIBCPP_NODISCARD_EXT _LIBCPP_HIDE_FROM_ABI constexpr _Iter
54   operator()(_Iter __first, _Sent __last, _Comp __comp = {}, _Proj __proj = {}) const {
55     return ranges::__is_sorted_until_impl(std::move(__first), std::move(__last), __comp, __proj);
56   }
57 
58   template <forward_range _Range,
59             class _Proj                                                            = identity,
60             indirect_strict_weak_order<projected<iterator_t<_Range>, _Proj>> _Comp = ranges::less>
61   _LIBCPP_NODISCARD_EXT _LIBCPP_HIDE_FROM_ABI constexpr borrowed_iterator_t<_Range>
62   operator()(_Range&& __range, _Comp __comp = {}, _Proj __proj = {}) const {
63     return ranges::__is_sorted_until_impl(ranges::begin(__range), ranges::end(__range), __comp, __proj);
64   }
65 };
66 } // namespace __is_sorted_until
67 
68 inline namespace __cpo {
69 inline constexpr auto is_sorted_until = __is_sorted_until::__fn{};
70 } // namespace __cpo
71 } // namespace ranges
72 
73 _LIBCPP_END_NAMESPACE_STD
74 
75 #endif // _LIBCPP_STD_VER >= 20
76 
77 #endif // _LIBCPP__ALGORITHM_RANGES_IS_SORTED_UNTIL_H
78