TLA Line data Source code
1 : //
2 : // Copyright (c) 2020 Krystian Stasiowski (sdkrystian@gmail.com)
3 : // Copyright (c) 2022 Dmitry Arkhipov (grisumbras@yandex.ru)
4 : //
5 : // Distributed under the Boost Software License, Version 1.0. (See accompanying
6 : // file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
7 : //
8 : // Official repository: https://github.com/boostorg/json
9 : //
10 :
11 : #ifndef BOOST_JSON_IMPL_CONVERSION_HPP
12 : #define BOOST_JSON_IMPL_CONVERSION_HPP
13 :
14 : #include <boost/json/fwd.hpp>
15 : #include <boost/json/string_view.hpp>
16 : #include <boost/describe/enumerators.hpp>
17 : #include <boost/describe/members.hpp>
18 : #include <boost/describe/bases.hpp>
19 : #include <boost/mp11/algorithm.hpp>
20 : #include <boost/mp11/utility.hpp>
21 : #include <boost/system/result.hpp>
22 :
23 : #include <iterator>
24 : #include <tuple>
25 : #include <utility>
26 : #ifndef BOOST_NO_CXX17_HDR_VARIANT
27 : # include <variant>
28 : #endif // BOOST_NO_CXX17_HDR_VARIANT
29 :
30 : namespace boost {
31 : namespace json {
32 :
33 : class value_ref;
34 :
35 : namespace detail {
36 :
37 : #ifdef __cpp_lib_nonmember_container_access
38 : using std::size;
39 : #endif
40 :
41 : template<std::size_t I, class T>
42 : using tuple_element_t = typename std::tuple_element<I, T>::type;
43 :
44 : template<class T>
45 : using iterator_type = decltype(std::begin(std::declval<T&>()));
46 : template<class T>
47 : using iterator_traits = std::iterator_traits< iterator_type<T> >;
48 :
49 : template<class T>
50 : using value_type = typename iterator_traits<T>::value_type;
51 : template<class T>
52 : using mapped_type = tuple_element_t< 1, value_type<T> >;
53 :
54 : // had to make the metafunction always succeeding in order to make it work
55 : // with msvc 14.0
56 : template<class T>
57 : using key_type_helper = tuple_element_t< 0, value_type<T> >;
58 : template<class T>
59 : using key_type = mp11::mp_eval_or<
60 : void,
61 : key_type_helper,
62 : T>;
63 :
64 : template<class T>
65 : using are_begin_and_end_same = std::is_same<
66 : iterator_type<T>,
67 : decltype(std::end(std::declval<T&>()))>;
68 :
69 : // msvc 14.0 gets confused when std::is_same is used directly
70 : template<class A, class B>
71 : using is_same_msvc_140 = std::is_same<A, B>;
72 : template<class T>
73 : using is_its_own_value = is_same_msvc_140<value_type<T>, T>;
74 :
75 : template<class T>
76 : using not_its_own_value = mp11::mp_not< is_its_own_value<T> >;
77 :
78 : template<class T>
79 : using begin_iterator_category = typename std::iterator_traits<
80 : iterator_type<T>>::iterator_category;
81 :
82 : template<class T>
83 : using has_positive_tuple_size = mp11::mp_bool<
84 : (std::tuple_size<T>::value > 0) >;
85 :
86 : template<class T>
87 : using has_unique_keys = has_positive_tuple_size<decltype(
88 : std::declval<T&>().emplace(
89 : std::declval<value_type<T>>()))>;
90 :
91 : template<class T>
92 : using has_string_type = std::is_same<
93 : typename T::string_type, std::basic_string<typename T::value_type> >;
94 :
95 : template<class T>
96 : struct is_value_type_pair_helper : std::false_type
97 : { };
98 : template<class T1, class T2>
99 : struct is_value_type_pair_helper<std::pair<T1, T2>> : std::true_type
100 : { };
101 : template<class T>
102 : using is_value_type_pair = is_value_type_pair_helper<value_type<T>>;
103 :
104 : template<class T>
105 : using has_size_member_helper
106 : = std::is_convertible<decltype(std::declval<T&>().size()), std::size_t>;
107 : template<class T>
108 : using has_size_member = mp11::mp_valid_and_true<has_size_member_helper, T>;
109 : template<class T>
110 : using has_free_size_helper
111 : = std::is_convertible<
112 : decltype(size(std::declval<T const&>())),
113 : std::size_t>;
114 : template<class T>
115 : using has_free_size = mp11::mp_valid_and_true<has_free_size_helper, T>;
116 : template<class T>
117 : using size_implementation = mp11::mp_cond<
118 : has_size_member<T>, mp11::mp_int<3>,
119 : has_free_size<T>, mp11::mp_int<2>,
120 : std::is_array<T>, mp11::mp_int<1>,
121 : mp11::mp_true, mp11::mp_int<0>>;
122 :
123 : template<class T>
124 : std::size_t
125 HIT 141 : try_size(T&& cont, mp11::mp_int<3>)
126 : {
127 141 : return cont.size();
128 : }
129 :
130 : template<class T>
131 : std::size_t
132 1 : try_size(T& cont, mp11::mp_int<2>)
133 : {
134 1 : return size(cont);
135 : }
136 :
137 : template<class T, std::size_t N>
138 : std::size_t
139 1 : try_size(T(&)[N], mp11::mp_int<1>)
140 : {
141 1 : return N;
142 : }
143 :
144 : template<class T>
145 : std::size_t
146 7 : try_size(T&, mp11::mp_int<0>)
147 : {
148 7 : return 0;
149 : }
150 :
151 : template<class T>
152 : using has_push_back_helper
153 : = decltype(std::declval<T&>().push_back(std::declval<value_type<T>>()));
154 : template<class T>
155 : using has_push_back = mp11::mp_valid<has_push_back_helper, T>;
156 : template<class T>
157 : using inserter_implementation = mp11::mp_cond<
158 : is_tuple_like<T>, mp11::mp_int<2>,
159 : has_push_back<T>, mp11::mp_int<1>,
160 : mp11::mp_true, mp11::mp_int<0>>;
161 :
162 : template<class T>
163 : iterator_type<T>
164 56 : inserter(
165 : T& target,
166 : mp11::mp_int<2>)
167 : {
168 56 : return target.begin();
169 : }
170 :
171 : template<class T>
172 : std::back_insert_iterator<T>
173 569 : inserter(
174 : T& target,
175 : mp11::mp_int<1>)
176 : {
177 569 : return std::back_inserter(target);
178 : }
179 :
180 : template<class T>
181 : std::insert_iterator<T>
182 62 : inserter(
183 : T& target,
184 : mp11::mp_int<0>)
185 : {
186 62 : return std::inserter( target, target.end() );
187 : }
188 :
189 : using boolean_category = std::integral_constant<
190 : conversion_category, conversion_category::boolean>;
191 :
192 : using integer_category = std::integral_constant<
193 : conversion_category, conversion_category::integer>;
194 :
195 : using floating_point_category = std::integral_constant<
196 : conversion_category, conversion_category::floating_point>;
197 :
198 : } // namespace detail
199 :
200 :
201 : template<class T, class Ctx, class Enable>
202 : struct use_category : unknown_category {};
203 :
204 : namespace detail {
205 :
206 : using value_from_conversion = mp11::mp_true;
207 : using value_to_conversion = mp11::mp_false;
208 :
209 : using user_category = std::integral_constant<
210 : conversion_category, conversion_category::user>;
211 : using user_context_category = std::integral_constant<
212 : conversion_category, conversion_category::user_context>;
213 : using user_full_context_category = std::integral_constant<
214 : conversion_category, conversion_category::user_full_context>;
215 : using json_value_category = std::integral_constant<
216 : conversion_category, conversion_category::json_value>;
217 : using json_object_category = std::integral_constant<
218 : conversion_category, conversion_category::json_object>;
219 : using json_array_category = std::integral_constant<
220 : conversion_category, conversion_category::json_array>;
221 : using json_string_category = std::integral_constant<
222 : conversion_category, conversion_category::json_string>;
223 : using json_value_ref_category = std::integral_constant<
224 : conversion_category, conversion_category::json_value_ref>;
225 :
226 : template< class Cat >
227 : using is_user_conversion = mp11::mp_bool<
228 : Cat::value == conversion_category::user
229 : || Cat::value == conversion_category::user_context
230 : || Cat::value == conversion_category::user_full_context>;
231 :
232 : template< class Cat >
233 : using is_native_conversion = mp11::mp_bool<
234 : Cat::value == conversion_category::user
235 : || Cat::value == conversion_category::json_value
236 : || Cat::value == conversion_category::json_object
237 : || Cat::value == conversion_category::json_array
238 : || Cat::value == conversion_category::json_string
239 : || Cat::value == conversion_category::json_value_ref
240 : || Cat::value == conversion_category::boolean
241 : || Cat::value == conversion_category::integer
242 : || Cat::value == conversion_category::floating_point>;
243 :
244 : template<class... Args>
245 : using supports_tag_invoke = decltype(tag_invoke( std::declval<Args>()... ));
246 :
247 : template<class T>
248 : using has_user_conversion_from_impl = supports_tag_invoke<
249 : value_from_tag, value&, T&& >;
250 : template<class T>
251 : using has_user_conversion_to_impl = supports_tag_invoke<
252 : value_to_tag<T>, value const& >;
253 : template<class T>
254 : using has_nonthrowing_user_conversion_to_impl = supports_tag_invoke<
255 : try_value_to_tag<T>, value const& >;
256 : template< class T, class Dir >
257 : using has_user_conversion1 = mp11::mp_if<
258 : std::is_same<Dir, value_from_conversion>,
259 : mp11::mp_valid<has_user_conversion_from_impl, T>,
260 : mp11::mp_or<
261 : mp11::mp_valid<has_user_conversion_to_impl, T>,
262 : mp11::mp_valid<has_nonthrowing_user_conversion_to_impl, T>>>;
263 :
264 : template< class Ctx, class T >
265 : using has_context_conversion_from_impl = supports_tag_invoke<
266 : value_from_tag, value&, T&&, Ctx const& >;
267 : template< class Ctx, class T >
268 : using has_context_conversion_to_impl = supports_tag_invoke<
269 : value_to_tag<T>, value const&, Ctx const& >;
270 : template< class Ctx, class T >
271 : using has_nonthrowing_context_conversion_to_impl = supports_tag_invoke<
272 : try_value_to_tag<T>, value const&, Ctx const& >;
273 : template< class Ctx, class T, class Dir >
274 : using has_user_conversion2 = mp11::mp_if<
275 : std::is_same<Dir, value_from_conversion>,
276 : mp11::mp_valid<has_context_conversion_from_impl, Ctx, T>,
277 : mp11::mp_or<
278 : mp11::mp_valid<has_context_conversion_to_impl, Ctx, T>,
279 : mp11::mp_valid<has_nonthrowing_context_conversion_to_impl, Ctx, T>>>;
280 :
281 : template< class Ctx, class T >
282 : using has_full_context_conversion_from_impl = supports_tag_invoke<
283 : value_from_tag, value&, T&&, Ctx const&, Ctx const& >;
284 : template< class Ctx, class T >
285 : using has_full_context_conversion_to_impl = supports_tag_invoke<
286 : value_to_tag<T>, value const&, Ctx const&, Ctx const& >;
287 : template< class Ctx, class T >
288 : using has_nonthrowing_full_context_conversion_to_impl = supports_tag_invoke<
289 : try_value_to_tag<T>, value const&, Ctx const&, Ctx const& >;
290 : template< class Ctx, class T, class Dir >
291 : using has_user_conversion3 = mp11::mp_if<
292 : std::is_same<Dir, value_from_conversion>,
293 : mp11::mp_valid<has_full_context_conversion_from_impl, Ctx, T>,
294 : mp11::mp_or<
295 : mp11::mp_valid<has_full_context_conversion_to_impl, Ctx, T>,
296 : mp11::mp_valid<
297 : has_nonthrowing_full_context_conversion_to_impl, Ctx, T>>>;
298 :
299 : template< class T >
300 : using described_non_public_members = describe::describe_members<
301 : T,
302 : describe::mod_private
303 : | describe::mod_protected
304 : | boost::describe::mod_inherited>;
305 :
306 : #if defined(BOOST_MSVC) && BOOST_MSVC < 1920
307 :
308 : template< class T >
309 : struct described_member_t_impl;
310 :
311 : template< class T, class C >
312 : struct described_member_t_impl<T C::*>
313 : {
314 : using type = T;
315 : };
316 :
317 : template< class T, class D >
318 : using described_member_t = remove_cvref<
319 : typename described_member_t_impl<
320 : remove_cvref<decltype(D::pointer)> >::type>;
321 :
322 : #else
323 :
324 : template< class T, class D >
325 : using described_member_t = remove_cvref<decltype(
326 : std::declval<T&>().* D::pointer )>;
327 :
328 : #endif
329 :
330 : template< class T >
331 : using described_members = describe::describe_members<
332 : T, describe::mod_any_access | describe::mod_inherited>;
333 :
334 : #ifdef BOOST_DESCRIBE_CXX14
335 :
336 : constexpr
337 : bool
338 : compare_strings(char const* l, char const* r)
339 : {
340 : #if defined(_MSC_VER) && (_MSC_VER <= 1900) && !defined(__clang__)
341 : return *l == *r && ( (*l == 0) | compare_strings(l + 1, r + 1) );
342 : #else
343 : do
344 : {
345 : if( *l != *r )
346 : return false;
347 : if( *l == 0 )
348 : return true;
349 : ++l;
350 : ++r;
351 : } while(true);
352 : #endif
353 : }
354 :
355 : template< class L, class R >
356 : struct equal_member_names
357 : : mp11::mp_bool< compare_strings(L::name, R::name) >
358 : {};
359 :
360 : template< class T >
361 : using uniquely_named_members = mp11::mp_same<
362 : mp11::mp_unique_if< described_members<T>, equal_member_names >,
363 : described_members<T> >;
364 :
365 : #else
366 :
367 : // we only check this in C++14, but the template should exist nevertheless
368 : template< class T >
369 : using uniquely_named_members = std::true_type;
370 :
371 : #endif // BOOST_DESCRIBE_CXX14
372 :
373 : // user conversion (via tag_invoke)
374 : template< class T, class Ctx, class Dir >
375 : using user_conversion_category = mp11::mp_cond<
376 : has_user_conversion3<Ctx, T, Dir>, user_full_context_category,
377 : has_user_conversion2<Ctx, T, Dir>, user_context_category,
378 : has_user_conversion1<T, Dir>, user_category>;
379 :
380 : // native conversions (constructors and member functions of value)
381 : template< class T >
382 : using native_conversion_category = mp11::mp_cond<
383 : std::is_same<T, value_ref>, json_value_ref_category,
384 : std::is_same<T, value>, json_value_category,
385 : std::is_same<T, array>, json_array_category,
386 : std::is_same<T, object>, json_object_category,
387 : std::is_same<T, string>, json_string_category>;
388 :
389 : template<class T>
390 : struct deduced_category
391 : : mp11::mp_cond<
392 : std::is_same<T, bool>, detail::boolean_category,
393 : std::is_integral<T>, detail::integer_category,
394 : std::is_floating_point<T>, detail::floating_point_category,
395 : is_null_like<T>, null_category,
396 : is_string_like<T>, string_category,
397 : is_variant_like<T>, variant_category,
398 : is_optional_like<T>, optional_category,
399 : is_map_like<T>, map_category,
400 : is_sequence_like<T>, sequence_category,
401 : is_tuple_like<T>, tuple_category,
402 : is_described_class<T>, described_class_category,
403 : is_described_enum<T>, described_enum_category,
404 : is_path_like<T>, path_category,
405 : // failed to find a suitable implementation
406 : mp11::mp_true, unknown_category>
407 : { };
408 :
409 : struct no_context {};
410 :
411 : template <class T, class Ctx>
412 : using use_category_helper = use_category<
413 : T, mp11::mp_if<std::is_same<Ctx, no_context>, void, Ctx>>;
414 :
415 : template< class Dir >
416 : struct all_checks {
417 : template <class T, class Ctx>
418 : using fn = mp11::mp_list<
419 : mp11::mp_defer<user_conversion_category, T, Ctx, Dir>,
420 : mp11::mp_defer<native_conversion_category, T>,
421 : mp11::mp_defer<use_category_helper, T, Ctx>,
422 : mp11::mp_defer<deduced_category, T>>;
423 : };
424 :
425 : template <class T, class Ctx>
426 : using direct_checks = mp11::mp_list<
427 : mp11::mp_defer<use_category_helper, T, Ctx>,
428 : mp11::mp_defer<deduced_category, T>>;
429 :
430 : template< class T >
431 : using nested_type = typename T::type;
432 :
433 : template< class T1, class T2 >
434 : using get_conversion_category_helper = mp11::mp_eval_if_c<
435 : conversion_category::unknown != T1::value,
436 : T1,
437 : mp11::mp_eval_or_q, T1, mp11::mp_quote<nested_type>, T2>;
438 :
439 : template< class T, class Ctx, template<class, class> class Checks >
440 : struct get_conversion_category_impl
441 : {
442 : using type = std::integral_constant<
443 : conversion_category,
444 : mp11::mp_fold<
445 : Checks<T, Ctx>,
446 : unknown_category,
447 : get_conversion_category_helper>::value>;
448 : };
449 :
450 : template< class T, class Ctx, template<class, class> class Checks >
451 : using get_conversion_category =
452 : typename get_conversion_category_impl<T, Ctx, Checks>::type;
453 :
454 : template< class T >
455 : using any_conversion_tag = mp11::mp_not< std::is_same<T, unknown_category> >;
456 :
457 : template< class T, template<class, class> class Checks, class... Ctxs >
458 : struct get_conversion_category_impl<T, std::tuple<Ctxs...>, Checks>
459 : {
460 : using ctxs = mp11::mp_list< remove_cvref<Ctxs>... >;
461 : using cats = mp11::mp_list<
462 : get_conversion_category<T, remove_cvref<Ctxs>, Checks>... >;
463 :
464 : template< class I >
465 : using exists = mp11::mp_less< I, mp11::mp_size<cats> >;
466 :
467 : using context2 = mp11::mp_find< cats, user_full_context_category >;
468 : using context1 = mp11::mp_find< cats, user_context_category >;
469 : using context0 = mp11::mp_find< cats, user_category >;
470 : using index = mp11::mp_cond<
471 : exists<context2>, context2,
472 : exists<context1>, context1,
473 : exists<context0>, context0,
474 : mp11::mp_true, mp11::mp_find_if< cats, any_conversion_tag > >;
475 : using type = mp11::mp_eval_or<
476 : unknown_category,
477 : mp11::mp_at, cats, index >;
478 : };
479 :
480 : template <class T, class Dir>
481 : using can_convert = mp11::mp_not<
482 : std::is_same<
483 : get_conversion_category<T, no_context, all_checks<Dir>::template fn>,
484 : unknown_category>>;
485 :
486 : template< class T1, class T2 >
487 : struct copy_cref_helper
488 : {
489 : using type = remove_cvref<T2>;
490 : };
491 : template< class T1, class T2 >
492 : using copy_cref = typename copy_cref_helper< T1, T2 >::type;
493 :
494 : template< class T1, class T2 >
495 : struct copy_cref_helper<T1 const, T2>
496 : {
497 : using type = remove_cvref<T2> const;
498 : };
499 : template< class T1, class T2 >
500 : struct copy_cref_helper<T1&, T2>
501 : {
502 : using type = copy_cref<T1, T2>&;
503 : };
504 : template< class T1, class T2 >
505 : struct copy_cref_helper<T1&&, T2>
506 : {
507 : using type = copy_cref<T1, T2>&&;
508 : };
509 :
510 : template< class Rng, class Traits >
511 : using forwarded_value_helper = mp11::mp_if<
512 : std::is_convertible<
513 : typename Traits::reference,
514 : copy_cref<Rng, typename Traits::value_type> >,
515 : copy_cref<Rng, typename Traits::value_type>,
516 : typename Traits::value_type >;
517 :
518 : template< class Rng >
519 : using forwarded_value = forwarded_value_helper<
520 : Rng, iterator_traits< Rng > >;
521 :
522 : template< class Ctx, class T, class Dir >
523 : struct supported_context
524 : {
525 : using type = Ctx;
526 :
527 : static
528 : type const&
529 32 : get( Ctx const& ctx ) noexcept
530 : {
531 32 : return ctx;
532 : }
533 : };
534 :
535 : template< class T, class Dir, class... Ctxs >
536 : struct supported_context< std::tuple<Ctxs...>, T, Dir >
537 : {
538 : using Ctx = std::tuple<Ctxs...>;
539 : using impl = get_conversion_category_impl<
540 : T, Ctx, all_checks<Dir>::template fn >;
541 : using index = typename impl::index;
542 : using next_supported = supported_context<
543 : mp11::mp_at< typename impl::ctxs, index >, T, Dir >;
544 : using type = typename next_supported::type;
545 :
546 : static
547 : type const&
548 19 : get( Ctx const& ctx ) noexcept
549 : {
550 19 : return next_supported::get( std::get<index::value>( ctx ) );
551 : }
552 : };
553 :
554 : template< class T >
555 : using value_result_type = typename std::decay<
556 : decltype( std::declval<T&>().value() )>::type;
557 :
558 : template< class T >
559 : using can_reset = decltype( std::declval<T&>().reset() );
560 :
561 : template< class T >
562 : using has_valueless_by_exception =
563 : decltype( std::declval<T const&>().valueless_by_exception() );
564 :
565 : } // namespace detail
566 :
567 : template <class T>
568 : struct result_for<T, value>
569 : {
570 : using type = system::result< detail::remove_cvref<T> >;
571 : };
572 :
573 : template<class T>
574 : struct is_string_like
575 : : std::is_convertible<T, string_view>
576 : { };
577 :
578 : template<class T>
579 : struct is_path_like
580 : : mp11::mp_all<
581 : mp11::mp_valid_and_true<detail::is_its_own_value, T>,
582 : mp11::mp_valid_and_true<detail::has_string_type, T>>
583 : { };
584 : template<class T>
585 : struct is_sequence_like
586 : : mp11::mp_all<
587 : mp11::mp_valid_and_true<detail::are_begin_and_end_same, T>,
588 : mp11::mp_valid_and_true<detail::not_its_own_value, T>,
589 : mp11::mp_valid<detail::begin_iterator_category, T>>
590 : { };
591 :
592 : template<class T>
593 : struct is_map_like
594 : : mp11::mp_all<
595 : is_sequence_like<T>,
596 : mp11::mp_valid_and_true<detail::is_value_type_pair, T>,
597 : is_string_like<detail::key_type<T>>,
598 : mp11::mp_valid_and_true<detail::has_unique_keys, T>>
599 : { };
600 :
601 : template<class T>
602 : struct is_tuple_like
603 : : mp11::mp_valid_and_true<detail::has_positive_tuple_size, T>
604 : { };
605 :
606 : template<>
607 : struct is_null_like<std::nullptr_t>
608 : : std::true_type
609 : { };
610 :
611 : #ifndef BOOST_NO_CXX17_HDR_VARIANT
612 : template<>
613 : struct is_null_like<std::monostate>
614 : : std::true_type
615 : { };
616 : #endif // BOOST_NO_CXX17_HDR_VARIANT
617 :
618 : template<class T>
619 : struct is_described_class
620 : : mp11::mp_and<
621 : describe::has_describe_members<T>,
622 : mp11::mp_not< std::is_union<T> >,
623 : mp11::mp_empty<
624 : mp11::mp_eval_or<
625 : mp11::mp_list<>, detail::described_non_public_members, T>>>
626 : { };
627 :
628 : template<class T>
629 : struct is_described_enum
630 : : describe::has_describe_enumerators<T>
631 : { };
632 :
633 : template<class T>
634 : struct is_variant_like : mp11::mp_valid<detail::has_valueless_by_exception, T>
635 : { };
636 :
637 : template<class T>
638 : struct is_optional_like
639 : : mp11::mp_and<
640 : mp11::mp_not<std::is_void<
641 : mp11::mp_eval_or<void, detail::value_result_type, T>>>,
642 : mp11::mp_valid<detail::can_reset, T>>
643 : { };
644 :
645 : } // namespace json
646 : } // namespace boost
647 :
648 : #endif // BOOST_JSON_IMPL_CONVERSION_HPP
|
