2 // (C) Copyright Edward Diener 2011-2015
3 // Use, modification and distribution are subject to the Boost Software License,
4 // Version 1.0. (See accompanying file LICENSE_1_0.txt or copy at
5 // http://www.boost.org/LICENSE_1_0.txt).
7 #if !defined(BOOST_VMD_DETAIL_IDENTIFIER_HPP)
8 #define BOOST_VMD_DETAIL_IDENTIFIER_HPP
10 #include <boost/preprocessor/arithmetic/dec.hpp>
11 #include <boost/preprocessor/comparison/equal.hpp>
12 #include <boost/preprocessor/control/expr_iif.hpp>
13 #include <boost/preprocessor/control/iif.hpp>
14 #include <boost/preprocessor/logical/bitand.hpp>
15 #include <boost/preprocessor/logical/bitor.hpp>
16 #include <boost/preprocessor/punctuation/is_begin_parens.hpp>
17 #include <boost/preprocessor/tuple/elem.hpp>
18 #include <boost/preprocessor/variadic/elem.hpp>
19 #include <boost/vmd/identity.hpp>
20 #include <boost/vmd/is_empty.hpp>
21 #include <boost/vmd/detail/identifier_concat.hpp>
22 #include <boost/vmd/detail/is_entire.hpp>
23 #include <boost/vmd/detail/match_identifier.hpp>
24 #include <boost/vmd/detail/mods.hpp>
25 #include <boost/vmd/detail/not_empty.hpp>
26 #include <boost/vmd/detail/parens.hpp>
28 #define BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_SUCCESS(id,rest,keymatch,mods) \
29 BOOST_VMD_DETAIL_IDENTIFIER_SUCCESS_MODS(id,rest,BOOST_PP_DEC(keymatch),mods) \
32 #define BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_FAILURE(id,rest,keymatch,mods) \
33 BOOST_VMD_DETAIL_IDENTIFIER_FAILURE_MODS(mods) \
36 #define BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_TUPLE_RESULT(id,rest,keymatch,mods) \
39 BOOST_PP_EQUAL(keymatch,0), \
40 BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_FAILURE, \
41 BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_SUCCESS \
43 (id,rest,keymatch,mods) \
46 #define BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_TUPLE_RESULT_D(d,id,rest,keymatch,mods) \
49 BOOST_PP_EQUAL_D(d,keymatch,0), \
50 BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_FAILURE, \
51 BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_SUCCESS \
53 (id,rest,keymatch,mods) \
56 #define BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_TUPLE(id,rest,keytuple,mods) \
57 BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_TUPLE_RESULT \
61 BOOST_VMD_DETAIL_MATCH_IDENTIFIER(id,keytuple), \
66 #define BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_TUPLE_D(d,id,rest,keytuple,mods) \
67 BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_TUPLE_RESULT_D \
72 BOOST_VMD_DETAIL_MATCH_IDENTIFIER_D(d,id,keytuple), \
77 #define BOOST_VMD_DETAIL_IDENTIFIER_MAKE_SPLIT(tuple) \
82 BOOST_PP_TUPLE_ELEM(0,tuple) \
84 BOOST_PP_TUPLE_ELEM(1,tuple) \
88 #define BOOST_VMD_DETAIL_IDENTIFIER_SPLIT_SEQUENCE_CONCAT_DATA(tuple) \
89 BOOST_VMD_IDENTITY_RESULT \
95 BOOST_PP_TUPLE_ELEM(0,tuple) \
97 BOOST_VMD_IDENTITY(tuple), \
98 BOOST_VMD_DETAIL_IDENTIFIER_MAKE_SPLIT \
104 #define BOOST_VMD_DETAIL_IDENTIFIER_SPLIT_SEQUENCE_CONCAT(vcseq) \
105 BOOST_VMD_DETAIL_IDENTIFIER_SPLIT_SEQUENCE_CONCAT_DATA \
107 BOOST_VMD_DETAIL_PARENS(vcseq,BOOST_VMD_RETURN_AFTER) \
111 #define BOOST_VMD_DETAIL_IDENTIFIER_GETID_TID(tid) \
112 BOOST_VMD_IDENTITY_RESULT \
116 BOOST_VMD_IS_EMPTY(tid), \
117 BOOST_VMD_IDENTITY(tid), \
118 BOOST_PP_TUPLE_ELEM \
124 #define BOOST_VMD_DETAIL_IDENTIFIER_GETID_SEQUENCE(vseq) \
125 BOOST_VMD_DETAIL_IDENTIFIER_GETID_TID \
127 BOOST_VMD_DETAIL_PARENS(BOOST_VMD_DETAIL_IDENTIFIER_CONCATENATE(vseq)) \
131 #define BOOST_VMD_DETAIL_IDENTIFIER_SPLIT_SEQUENCE(vseq) \
132 BOOST_VMD_DETAIL_IDENTIFIER_SPLIT_SEQUENCE_CONCAT \
134 BOOST_VMD_DETAIL_IDENTIFIER_CONCATENATE(vseq) \
138 #define BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS(id,rest,mods) \
139 BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_TUPLE \
143 BOOST_VMD_DETAIL_MODS_RESULT_OTHER(mods), \
148 #define BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_D(d,id,rest,mods) \
149 BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_TUPLE_D \
154 BOOST_VMD_DETAIL_MODS_RESULT_OTHER(mods), \
159 #define BOOST_VMD_DETAIL_IDENTIFIER_JUST(id,rest,mods) \
160 BOOST_VMD_DETAIL_IDENTIFIER_SUCCESS_MODS(id,rest,0,mods) \
163 #define BOOST_VMD_DETAIL_IDENTIFIER_JUST_D(d,id,rest,mods) \
164 BOOST_VMD_DETAIL_IDENTIFIER_SUCCESS_MODS(id,rest,0,mods) \
167 #define BOOST_VMD_DETAIL_IDENTIFIER_CHECK_KEYS(id,rest,mods) \
172 BOOST_VMD_DETAIL_MODS_RESULT_OTHER(mods) \
174 BOOST_VMD_DETAIL_IDENTIFIER_JUST, \
175 BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS \
180 #define BOOST_VMD_DETAIL_IDENTIFIER_CHECK_KEYS_D(d,id,rest,mods) \
185 BOOST_VMD_DETAIL_MODS_RESULT_OTHER(mods) \
187 BOOST_VMD_DETAIL_IDENTIFIER_JUST_D, \
188 BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_KEYS_D \
193 #define BOOST_VMD_DETAIL_IDENTIFIER_MKEYS(mods) \
196 BOOST_VMD_DETAIL_MODS_IS_RESULT_INDEX(mods), \
197 BOOST_VMD_DETAIL_NOT_EMPTY \
199 BOOST_VMD_DETAIL_MODS_RESULT_OTHER(mods) \
204 #define BOOST_VMD_DETAIL_IDENTIFIER_SUCCESS_MODS(id,rest,keymatch,mods) \
207 BOOST_VMD_DETAIL_IDENTIFIER_MKEYS(mods), \
210 BOOST_VMD_DETAIL_MODS_IS_RESULT_AFTER(mods), \
211 (id,rest,keymatch), \
216 BOOST_VMD_DETAIL_MODS_IS_RESULT_AFTER(mods), \
223 #define BOOST_VMD_DETAIL_IDENTIFIER_FAILURE_MODS(mods) \
226 BOOST_VMD_DETAIL_IDENTIFIER_MKEYS(mods), \
229 BOOST_VMD_DETAIL_MODS_IS_RESULT_AFTER(mods), \
235 BOOST_VMD_DETAIL_MODS_IS_RESULT_AFTER(mods), \
241 #define BOOST_VMD_DETAIL_IDENTIFIER_FAILURE_REST(id,rest,mods) \
242 BOOST_VMD_DETAIL_IDENTIFIER_FAILURE_MODS(mods) \
245 #define BOOST_VMD_DETAIL_IDENTIFIER_FAILURE_REST_D(d,id,rest,mods) \
246 BOOST_VMD_DETAIL_IDENTIFIER_FAILURE_MODS(mods) \
249 #define BOOST_VMD_DETAIL_IDENTIFIER_ID_REST(id,rest,mods) \
252 BOOST_VMD_IS_EMPTY(id), \
253 BOOST_VMD_DETAIL_IDENTIFIER_FAILURE_REST, \
254 BOOST_VMD_DETAIL_IDENTIFIER_CHECK_KEYS \
259 #define BOOST_VMD_DETAIL_IDENTIFIER_ID_REST_D(d,id,rest,mods) \
262 BOOST_VMD_IS_EMPTY(id), \
263 BOOST_VMD_DETAIL_IDENTIFIER_FAILURE_REST_D, \
264 BOOST_VMD_DETAIL_IDENTIFIER_CHECK_KEYS_D \
269 #define BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_DATA(tuple,mods) \
270 BOOST_VMD_DETAIL_IDENTIFIER_ID_REST \
272 BOOST_PP_TUPLE_ELEM(0,tuple), \
273 BOOST_PP_TUPLE_ELEM(1,tuple), \
278 #define BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_ID(id,mods) \
281 BOOST_VMD_IS_EMPTY(id), \
282 BOOST_VMD_DETAIL_IDENTIFIER_FAILURE_REST, \
283 BOOST_VMD_DETAIL_IDENTIFIER_CHECK_KEYS \
288 #define BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_ID_D(d,id,mods) \
291 BOOST_VMD_IS_EMPTY(id), \
292 BOOST_VMD_DETAIL_IDENTIFIER_FAILURE_REST_D, \
293 BOOST_VMD_DETAIL_IDENTIFIER_CHECK_KEYS_D \
298 #define BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_DATA_D(d,tuple,mods) \
299 BOOST_VMD_DETAIL_IDENTIFIER_ID_REST_D \
302 BOOST_PP_TUPLE_ELEM(0,tuple), \
303 BOOST_PP_TUPLE_ELEM(1,tuple), \
308 #define BOOST_VMD_DETAIL_IDENTIFIER_SEQUENCE_AFTER(vseq,mods) \
309 BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_DATA \
311 BOOST_VMD_DETAIL_IDENTIFIER_SPLIT_SEQUENCE(vseq), \
316 #define BOOST_VMD_DETAIL_IDENTIFIER_SEQUENCE_AFTER_D(d,vseq,mods) \
317 BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_DATA_D \
320 BOOST_VMD_DETAIL_IDENTIFIER_SPLIT_SEQUENCE(vseq), \
325 #define BOOST_VMD_DETAIL_IDENTIFIER_SEQUENCE_ID(vseq,mods) \
326 BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_ID \
328 BOOST_VMD_DETAIL_IDENTIFIER_GETID_SEQUENCE(vseq), \
333 #define BOOST_VMD_DETAIL_IDENTIFIER_SEQUENCE_ID_D(d,vseq,mods) \
334 BOOST_VMD_DETAIL_IDENTIFIER_PROCESS_ID_D \
337 BOOST_VMD_DETAIL_IDENTIFIER_GETID_SEQUENCE(vseq), \
342 #define BOOST_VMD_DETAIL_IDENTIFIER_SEQUENCE(vseq,mods) \
345 BOOST_VMD_DETAIL_MODS_IS_RESULT_AFTER(mods), \
346 BOOST_VMD_DETAIL_IDENTIFIER_SEQUENCE_AFTER, \
347 BOOST_VMD_DETAIL_IDENTIFIER_SEQUENCE_ID \
352 #define BOOST_VMD_DETAIL_IDENTIFIER_SEQUENCE_D(d,vseq,mods) \
355 BOOST_VMD_DETAIL_MODS_IS_RESULT_AFTER(mods), \
356 BOOST_VMD_DETAIL_IDENTIFIER_SEQUENCE_AFTER_D, \
357 BOOST_VMD_DETAIL_IDENTIFIER_SEQUENCE_ID_D \
362 #define BOOST_VMD_DETAIL_IDENTIFIER_EX_FAILURE(vseq,mods) \
363 BOOST_VMD_DETAIL_IDENTIFIER_FAILURE_MODS(mods) \
366 #define BOOST_VMD_DETAIL_IDENTIFIER_EX_FAILURE_D(d,vseq,mods) \
367 BOOST_VMD_DETAIL_IDENTIFIER_FAILURE_MODS(mods) \
370 #define BOOST_VMD_DETAIL_IDENTIFIER_EX(vseq,mods) \
375 BOOST_VMD_IS_EMPTY(vseq), \
376 BOOST_PP_IS_BEGIN_PARENS(vseq) \
378 BOOST_VMD_DETAIL_IDENTIFIER_EX_FAILURE, \
379 BOOST_VMD_DETAIL_IDENTIFIER_SEQUENCE \
384 #define BOOST_VMD_DETAIL_IDENTIFIER_EX_D(d,vseq,mods) \
389 BOOST_VMD_IS_EMPTY(vseq), \
390 BOOST_PP_IS_BEGIN_PARENS(vseq) \
392 BOOST_VMD_DETAIL_IDENTIFIER_EX_FAILURE_D, \
393 BOOST_VMD_DETAIL_IDENTIFIER_SEQUENCE_D \
398 #define BOOST_VMD_DETAIL_IDENTIFIER(...) \
399 BOOST_VMD_DETAIL_IDENTIFIER_EX \
401 BOOST_PP_VARIADIC_ELEM(0,__VA_ARGS__), \
402 BOOST_VMD_DETAIL_NEW_MODS(BOOST_VMD_ALLOW_INDEX,__VA_ARGS__) \
406 #define BOOST_VMD_DETAIL_IDENTIFIER_D(d,...) \
407 BOOST_VMD_DETAIL_IDENTIFIER_EX_D \
410 BOOST_PP_VARIADIC_ELEM(0,__VA_ARGS__), \
411 BOOST_VMD_DETAIL_NEW_MODS_D(d,BOOST_VMD_ALLOW_INDEX,__VA_ARGS__) \
415 #define BOOST_VMD_DETAIL_IS_IDENTIFIER_MULTIPLE(...) \
416 BOOST_VMD_DETAIL_IS_ENTIRE \
418 BOOST_VMD_DETAIL_IDENTIFIER(__VA_ARGS__,BOOST_VMD_RETURN_AFTER) \
422 #define BOOST_VMD_DETAIL_IS_IDENTIFIER_MULTIPLE_D(d,...) \
423 BOOST_VMD_DETAIL_IS_ENTIRE \
425 BOOST_VMD_DETAIL_IDENTIFIER_D(d,__VA_ARGS__,BOOST_VMD_RETURN_AFTER) \
429 #endif /* BOOST_VMD_DETAIL_IDENTIFIER_HPP */