liuxiaolong
2021-07-20 58d904a328c0d849769b483e901a0be9426b8209
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
#ifndef BOOST_LEAF_CONTEXT_HPP_INCLUDED
#define BOOST_LEAF_CONTEXT_HPP_INCLUDED
 
// Copyright (c) 2018-2020 Emil Dotchevski and Reverge Studios, Inc.
 
// Distributed under the Boost Software License, Version 1.0. (See accompanying
// file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
 
#ifndef BOOST_LEAF_ENABLE_WARNINGS
#   if defined(__clang__)
#       pragma clang system_header
#   elif (__GNUC__*100+__GNUC_MINOR__>301)
#       pragma GCC system_header
#   elif defined(_MSC_VER)
#       pragma warning(push,1)
#   endif
#endif
 
#include <boost/leaf/error.hpp>
 
namespace boost { namespace leaf {
 
    class error_info;
    class diagnostic_info;
    class verbose_diagnostic_info;
 
    template <class>
    struct is_predicate: std::false_type
    {
    };
 
    namespace leaf_detail
    {
        template <class T>
        struct is_exception: std::is_base_of<std::exception, typename std::decay<T>::type>
        {
        };
 
        template <class E>
        struct handler_argument_traits;
 
        template <class E, bool IsPredicate = is_predicate<E>::value>
        struct handler_argument_traits_defaults;
 
        template <class E>
        struct handler_argument_traits_defaults<E, false>
        {
            using error_type = typename std::decay<E>::type;
            constexpr static bool always_available = false;
 
            template <class Tup>
            BOOST_LEAF_CONSTEXPR static error_type const * check( Tup const &, error_info const & ) noexcept;
 
            template <class Tup>
            BOOST_LEAF_CONSTEXPR static error_type * check( Tup &, error_info const & ) noexcept;
 
            template <class Tup>
            BOOST_LEAF_CONSTEXPR static E get( Tup & tup, error_info const & ei ) noexcept
            {
                return *check(tup, ei);
            }
 
            static_assert(!is_predicate<error_type>::value, "Handlers must take predicate arguments by value");
            static_assert(!std::is_same<E, error_info>::value, "Handlers must take leaf::error_info arguments by const &");
            static_assert(!std::is_same<E, diagnostic_info>::value, "Handlers must take leaf::diagnostic_info arguments by const &");
            static_assert(!std::is_same<E, verbose_diagnostic_info>::value, "Handlers must take leaf::verbose_diagnostic_info arguments by const &");
        };
 
        template <class Pred>
        struct handler_argument_traits_defaults<Pred, true>: handler_argument_traits<typename Pred::error_type>
        {
            using base = handler_argument_traits<typename Pred::error_type>;
            static_assert(!base::always_available, "Predicates can't use types that are always_available");
 
            template <class Tup>
            BOOST_LEAF_CONSTEXPR static bool check( Tup const & tup, error_info const & ei ) noexcept
            {
                auto e = base::check(tup, ei);
                return e && Pred::evaluate(*e);
            };
 
            template <class Tup>
            BOOST_LEAF_CONSTEXPR static Pred get( Tup const & tup, error_info const & ei ) noexcept
            {
                return Pred{*base::check(tup, ei)};
            }
        };
 
        template <class E>
        struct handler_argument_always_available
        {
            using error_type = E;
            constexpr static bool always_available = true;
 
            template <class Tup>
            BOOST_LEAF_CONSTEXPR static bool check( Tup &, error_info const & ) noexcept
            {
                return true;
            };
        };
 
        template <class E>
        struct handler_argument_traits: handler_argument_traits_defaults<E>
        {
        };
 
        template <>
        struct handler_argument_traits<void>
        {
            using error_type = void;
            constexpr static bool always_available = false;
 
            template <class Tup>
            BOOST_LEAF_CONSTEXPR static std::exception const * check( Tup const &, error_info const & ) noexcept;
        };
 
        template <class E>
        struct handler_argument_traits<E &&>
        {
            static_assert(sizeof(E) == 0, "Error handlers may not take rvalue ref arguments");
        };
 
        template <class E>
        struct handler_argument_traits<E *>: handler_argument_always_available<typename std::remove_const<E>::type>
        {
            template <class Tup>
            BOOST_LEAF_CONSTEXPR static E * get( Tup & tup, error_info const & ei) noexcept
            {
                return handler_argument_traits_defaults<E>::check(tup, ei);
            }
        };
 
        template <>
        struct handler_argument_traits<error_info const &>: handler_argument_always_available<void>
        {
            template <class Tup>
            BOOST_LEAF_CONSTEXPR static error_info const & get( Tup const &, error_info const & ei ) noexcept
            {
                return ei;
            }
        };
 
        template <class E>
        struct handler_argument_traits_require_by_value
        {
            static_assert(sizeof(E) == 0, "Error handlers must take this type by value");
        };
    }
 
    ////////////////////////////////////////
 
    namespace leaf_detail
    {
        template <int I, class Tuple>
        struct tuple_for_each
        {
            BOOST_LEAF_CONSTEXPR static void activate( Tuple & tup ) noexcept
            {
                static_assert(!std::is_same<error_info, typename std::decay<decltype(std::get<I-1>(tup))>::type>::value, "Bug in LEAF: context type deduction");
                tuple_for_each<I-1,Tuple>::activate(tup);
                std::get<I-1>(tup).activate();
            }
 
            BOOST_LEAF_CONSTEXPR static void deactivate( Tuple & tup ) noexcept
            {
                static_assert(!std::is_same<error_info, typename std::decay<decltype(std::get<I-1>(tup))>::type>::value, "Bug in LEAF: context type deduction");
                std::get<I-1>(tup).deactivate();
                tuple_for_each<I-1,Tuple>::deactivate(tup);
            }
 
            BOOST_LEAF_CONSTEXPR static void propagate( Tuple & tup ) noexcept
            {
                static_assert(!std::is_same<error_info, typename std::decay<decltype(std::get<I-1>(tup))>::type>::value, "Bug in LEAF: context type deduction");
                auto & sl = std::get<I-1>(tup);
                sl.propagate();
                tuple_for_each<I-1,Tuple>::propagate(tup);
            }
 
            BOOST_LEAF_CONSTEXPR static void propagate_captured( Tuple & tup, int err_id ) noexcept
            {
                static_assert(!std::is_same<error_info, typename std::decay<decltype(std::get<I-1>(tup))>::type>::value, "Bug in LEAF: context type deduction");
                auto & sl = std::get<I-1>(tup);
                if( sl.has_value(err_id) )
                    load_slot(err_id, std::move(sl).value(err_id));
                tuple_for_each<I-1,Tuple>::propagate_captured(tup, err_id);
            }
 
            static void print( std::ostream & os, void const * tup, int key_to_print )
            {
                BOOST_LEAF_ASSERT(tup != 0);
                tuple_for_each<I-1,Tuple>::print(os, tup, key_to_print);
                std::get<I-1>(*static_cast<Tuple const *>(tup)).print(os, key_to_print);
            }
        };
 
        template <class Tuple>
        struct tuple_for_each<0, Tuple>
        {
            BOOST_LEAF_CONSTEXPR static void activate( Tuple & ) noexcept { }
            BOOST_LEAF_CONSTEXPR static void deactivate( Tuple & ) noexcept { }
            BOOST_LEAF_CONSTEXPR static void propagate( Tuple & tup ) noexcept { }
            BOOST_LEAF_CONSTEXPR static void propagate_captured( Tuple & tup, int ) noexcept { }
            static void print( std::ostream &, void const *, int ) { }
        };
    }
 
    ////////////////////////////////////////////
 
#if BOOST_LEAF_DIAGNOSTICS
 
    namespace leaf_detail
    {
        template <class T> struct requires_unexpected { constexpr static bool value = false; };
        template <class T> struct requires_unexpected<T const> { constexpr static bool value = requires_unexpected<T>::value; };
        template <class T> struct requires_unexpected<T const &> { constexpr static bool value = requires_unexpected<T>::value; };
        template <class T> struct requires_unexpected<T const *> { constexpr static bool value = requires_unexpected<T>::value; };
        template <> struct requires_unexpected<e_unexpected_count> { constexpr static bool value = true; };
        template <> struct requires_unexpected<e_unexpected_info> { constexpr static bool value = true; };
 
        template <class L>
        struct unexpected_requested;
 
        template <template <class ...> class L>
        struct unexpected_requested<L<>>
        {
            constexpr static bool value = false;
        };
 
        template <template <class...> class L, template <class> class S, class Car, class... Cdr>
        struct unexpected_requested<L<S<Car>, S<Cdr>...>>
        {
            constexpr static bool value = requires_unexpected<Car>::value || unexpected_requested<L<S<Cdr>...>>::value;
        };
    }
 
#endif
 
    ////////////////////////////////////////////
 
    namespace leaf_detail
    {
        template <class T> struct does_not_participate_in_context_deduction: std::false_type { };
        template <> struct does_not_participate_in_context_deduction<void>: std::true_type { };
 
        template <class L>
        struct deduce_e_type_list;
 
        template <template<class...> class L, class... T>
        struct deduce_e_type_list<L<T...>>
        {
            using type =
                leaf_detail_mp11::mp_remove_if<
                    leaf_detail_mp11::mp_unique<
                        leaf_detail_mp11::mp_list<typename handler_argument_traits<T>::error_type...>
                    >,
                    does_not_participate_in_context_deduction
                >;
        };
 
        template <class L>
        struct deduce_e_tuple_impl;
 
        template <template <class...> class L, class... E>
        struct deduce_e_tuple_impl<L<E...>>
        {
            using type = std::tuple<slot<E>...>;
        };
 
        template <class... E>
        using deduce_e_tuple = typename deduce_e_tuple_impl<typename deduce_e_type_list<leaf_detail_mp11::mp_list<E...>>::type>::type;
    }
 
    ////////////////////////////////////////////
 
    template <class... E>
    class context
    {
        context( context const & ) = delete;
        context & operator=( context const & ) = delete;
 
        using Tup = leaf_detail::deduce_e_tuple<E...>;
        Tup tup_;
 
#if !defined(BOOST_LEAF_NO_THREADS) && !defined(NDEBUG)
        std::thread::id thread_id_;
#endif
        bool is_active_;
 
    protected:
 
        BOOST_LEAF_CONSTEXPR error_id propagate_captured_errors( error_id err_id ) noexcept
        {
            leaf_detail::tuple_for_each<std::tuple_size<Tup>::value,Tup>::propagate_captured(tup_, err_id.value());
            return err_id;
        }
 
    public:
 
        BOOST_LEAF_CONSTEXPR context( context && x ) noexcept:
            tup_(std::move(x.tup_)),
            is_active_(false)
        {
            BOOST_LEAF_ASSERT(!x.is_active());
        }
 
        BOOST_LEAF_CONSTEXPR context() noexcept:
            is_active_(false)
        {
        }
 
        ~context() noexcept
        {
            BOOST_LEAF_ASSERT(!is_active());
        }
 
        BOOST_LEAF_CONSTEXPR Tup const & tup() const noexcept
        {
            return tup_;
        }
 
        BOOST_LEAF_CONSTEXPR Tup & tup() noexcept
        {
            return tup_;
        }
 
        BOOST_LEAF_CONSTEXPR void activate() noexcept
        {
            using namespace leaf_detail;
            BOOST_LEAF_ASSERT(!is_active());
            tuple_for_each<std::tuple_size<Tup>::value,Tup>::activate(tup_);
#if BOOST_LEAF_DIAGNOSTICS
            if( unexpected_requested<Tup>::value )
                ++tl_unexpected_enabled<>::counter;
#endif
#if !defined(BOOST_LEAF_NO_THREADS) && !defined(NDEBUG)
            thread_id_ = std::this_thread::get_id();
#endif
            is_active_ = true;
        }
 
        BOOST_LEAF_CONSTEXPR void deactivate() noexcept
        {
            using namespace leaf_detail;
            BOOST_LEAF_ASSERT(is_active());
            is_active_ = false;
#if !defined(BOOST_LEAF_NO_THREADS) && !defined(NDEBUG)
            BOOST_LEAF_ASSERT(std::this_thread::get_id() == thread_id_);
            thread_id_ = std::thread::id();
#endif
#if BOOST_LEAF_DIAGNOSTICS
            if( unexpected_requested<Tup>::value )
                --tl_unexpected_enabled<>::counter;
#endif
            tuple_for_each<std::tuple_size<Tup>::value,Tup>::deactivate(tup_);
        }
 
        BOOST_LEAF_CONSTEXPR void propagate() noexcept
        {
            leaf_detail::tuple_for_each<std::tuple_size<Tup>::value,Tup>::propagate(tup_);
        }
 
        BOOST_LEAF_CONSTEXPR bool is_active() const noexcept
        {
            return is_active_;
        }
 
        void print( std::ostream & os ) const
        {
            leaf_detail::tuple_for_each<std::tuple_size<Tup>::value,Tup>::print(os, &tup_, 0);
        }
 
        template <class R, class... H>
        BOOST_LEAF_CONSTEXPR R handle_error( error_id, H && ... ) const;
 
        template <class R, class... H>
        BOOST_LEAF_CONSTEXPR R handle_error( error_id, H && ... );
    };
 
    ////////////////////////////////////////
 
    namespace leaf_detail
    {
        template <class TypeList>
        struct deduce_context_impl;
 
        template <template <class...> class L, class... E>
        struct deduce_context_impl<L<E...>>
        {
            using type = context<E...>;
        };
 
        template <class TypeList>
        using deduce_context = typename deduce_context_impl<TypeList>::type;
 
        template <class H>
        struct fn_mp_args_fwd
        {
            using type = fn_mp_args<H>;
        };
 
        template <class... H>
        struct fn_mp_args_fwd<std::tuple<H...> &>: fn_mp_args_fwd<std::tuple<H...>> { };
 
        template <class... H>
        struct fn_mp_args_fwd<std::tuple<H...>>
        {
            using type = leaf_detail_mp11::mp_append<typename fn_mp_args_fwd<H>::type...>;
        };
 
        template <class... H>
        struct context_type_from_handlers_impl
        {
            using type = deduce_context<leaf_detail_mp11::mp_append<typename fn_mp_args_fwd<H>::type...>>;
        };
 
        template <class Ctx>
        struct polymorphic_context_impl: polymorphic_context, Ctx
        {
            error_id propagate_captured_errors() noexcept final override { return Ctx::propagate_captured_errors(captured_id_); }
            void activate() noexcept final override { Ctx::activate(); }
            void deactivate() noexcept final override { Ctx::deactivate(); }
            void propagate() noexcept final override { Ctx::propagate(); }
            bool is_active() const noexcept final override { return Ctx::is_active(); }
            void print( std::ostream & os ) const final override { return Ctx::print(os); }
        };
    }
 
    template <class... H>
    using context_type_from_handlers = typename leaf_detail::context_type_from_handlers_impl<H...>::type;
 
    ////////////////////////////////////////////
 
    template <class...  H>
    BOOST_LEAF_CONSTEXPR inline context_type_from_handlers<H...> make_context() noexcept
    {
        return { };
    }
 
    template <class...  H>
    BOOST_LEAF_CONSTEXPR inline context_type_from_handlers<H...> make_context( H && ... ) noexcept
    {
        return { };
    }
 
    ////////////////////////////////////////////
 
    template <class...  H>
    inline context_ptr make_shared_context() noexcept
    {
        return std::make_shared<leaf_detail::polymorphic_context_impl<context_type_from_handlers<H...>>>();
    }
 
    template <class...  H>
    inline context_ptr make_shared_context( H && ... ) noexcept
    {
        return std::make_shared<leaf_detail::polymorphic_context_impl<context_type_from_handlers<H...>>>();
    }
 
} }
 
#endif