libbpf: Complete field-based CO-RE helpers with field offset helper
[linux-2.6-microblaze.git] / tools / lib / bpf / bpf_core_read.h
1 /* SPDX-License-Identifier: (LGPL-2.1 OR BSD-2-Clause) */
2 #ifndef __BPF_CORE_READ_H__
3 #define __BPF_CORE_READ_H__
4
5 /*
6  * enum bpf_field_info_kind is passed as a second argument into
7  * __builtin_preserve_field_info() built-in to get a specific aspect of
8  * a field, captured as a first argument. __builtin_preserve_field_info(field,
9  * info_kind) returns __u32 integer and produces BTF field relocation, which
10  * is understood and processed by libbpf during BPF object loading. See
11  * selftests/bpf for examples.
12  */
13 enum bpf_field_info_kind {
14         BPF_FIELD_BYTE_OFFSET = 0,      /* field byte offset */
15         BPF_FIELD_BYTE_SIZE = 1,
16         BPF_FIELD_EXISTS = 2,           /* field existence in target kernel */
17         BPF_FIELD_SIGNED = 3,
18         BPF_FIELD_LSHIFT_U64 = 4,
19         BPF_FIELD_RSHIFT_U64 = 5,
20 };
21
22 /* second argument to __builtin_btf_type_id() built-in */
23 enum bpf_type_id_kind {
24         BPF_TYPE_ID_LOCAL = 0,          /* BTF type ID in local program */
25         BPF_TYPE_ID_TARGET = 1,         /* BTF type ID in target kernel */
26 };
27
28 /* second argument to __builtin_preserve_type_info() built-in */
29 enum bpf_type_info_kind {
30         BPF_TYPE_EXISTS = 0,            /* type existence in target kernel */
31         BPF_TYPE_SIZE = 1,              /* type size in target kernel */
32 };
33
34 /* second argument to __builtin_preserve_enum_value() built-in */
35 enum bpf_enum_value_kind {
36         BPF_ENUMVAL_EXISTS = 0,         /* enum value existence in kernel */
37         BPF_ENUMVAL_VALUE = 1,          /* enum value value relocation */
38 };
39
40 #define __CORE_RELO(src, field, info)                                         \
41         __builtin_preserve_field_info((src)->field, BPF_FIELD_##info)
42
43 #if __BYTE_ORDER__ == __ORDER_LITTLE_ENDIAN__
44 #define __CORE_BITFIELD_PROBE_READ(dst, src, fld)                             \
45         bpf_probe_read_kernel(                                                \
46                         (void *)dst,                                  \
47                         __CORE_RELO(src, fld, BYTE_SIZE),                     \
48                         (const void *)src + __CORE_RELO(src, fld, BYTE_OFFSET))
49 #else
50 /* semantics of LSHIFT_64 assumes loading values into low-ordered bytes, so
51  * for big-endian we need to adjust destination pointer accordingly, based on
52  * field byte size
53  */
54 #define __CORE_BITFIELD_PROBE_READ(dst, src, fld)                             \
55         bpf_probe_read_kernel(                                                \
56                         (void *)dst + (8 - __CORE_RELO(src, fld, BYTE_SIZE)), \
57                         __CORE_RELO(src, fld, BYTE_SIZE),                     \
58                         (const void *)src + __CORE_RELO(src, fld, BYTE_OFFSET))
59 #endif
60
61 /*
62  * Extract bitfield, identified by s->field, and return its value as u64.
63  * All this is done in relocatable manner, so bitfield changes such as
64  * signedness, bit size, offset changes, this will be handled automatically.
65  * This version of macro is using bpf_probe_read_kernel() to read underlying
66  * integer storage. Macro functions as an expression and its return type is
67  * bpf_probe_read_kernel()'s return value: 0, on success, <0 on error.
68  */
69 #define BPF_CORE_READ_BITFIELD_PROBED(s, field) ({                            \
70         unsigned long long val = 0;                                           \
71                                                                               \
72         __CORE_BITFIELD_PROBE_READ(&val, s, field);                           \
73         val <<= __CORE_RELO(s, field, LSHIFT_U64);                            \
74         if (__CORE_RELO(s, field, SIGNED))                                    \
75                 val = ((long long)val) >> __CORE_RELO(s, field, RSHIFT_U64);  \
76         else                                                                  \
77                 val = val >> __CORE_RELO(s, field, RSHIFT_U64);               \
78         val;                                                                  \
79 })
80
81 /*
82  * Extract bitfield, identified by s->field, and return its value as u64.
83  * This version of macro is using direct memory reads and should be used from
84  * BPF program types that support such functionality (e.g., typed raw
85  * tracepoints).
86  */
87 #define BPF_CORE_READ_BITFIELD(s, field) ({                                   \
88         const void *p = (const void *)s + __CORE_RELO(s, field, BYTE_OFFSET); \
89         unsigned long long val;                                               \
90                                                                               \
91         /* This is a so-called barrier_var() operation that makes specified   \
92          * variable "a black box" for optimizing compiler.                    \
93          * It forces compiler to perform BYTE_OFFSET relocation on p and use  \
94          * its calculated value in the switch below, instead of applying      \
95          * the same relocation 4 times for each individual memory load.       \
96          */                                                                   \
97         asm volatile("" : "=r"(p) : "0"(p));                                  \
98                                                                               \
99         switch (__CORE_RELO(s, field, BYTE_SIZE)) {                           \
100         case 1: val = *(const unsigned char *)p; break;                       \
101         case 2: val = *(const unsigned short *)p; break;                      \
102         case 4: val = *(const unsigned int *)p; break;                        \
103         case 8: val = *(const unsigned long long *)p; break;                  \
104         }                                                                     \
105         val <<= __CORE_RELO(s, field, LSHIFT_U64);                            \
106         if (__CORE_RELO(s, field, SIGNED))                                    \
107                 val = ((long long)val) >> __CORE_RELO(s, field, RSHIFT_U64);  \
108         else                                                                  \
109                 val = val >> __CORE_RELO(s, field, RSHIFT_U64);               \
110         val;                                                                  \
111 })
112
113 #define ___bpf_field_ref1(field)        (field)
114 #define ___bpf_field_ref2(type, field)  (((typeof(type) *)0)->field)
115 #define ___bpf_field_ref(args...)                                           \
116         ___bpf_apply(___bpf_field_ref, ___bpf_narg(args))(args)
117
118 /*
119  * Convenience macro to check that field actually exists in target kernel's.
120  * Returns:
121  *    1, if matching field is present in target kernel;
122  *    0, if no matching field found.
123  *
124  * Supports two forms:
125  *   - field reference through variable access:
126  *     bpf_core_field_exists(p->my_field);
127  *   - field reference through type and field names:
128  *     bpf_core_field_exists(struct my_type, my_field).
129  */
130 #define bpf_core_field_exists(field...)                                     \
131         __builtin_preserve_field_info(___bpf_field_ref(field), BPF_FIELD_EXISTS)
132
133 /*
134  * Convenience macro to get the byte size of a field. Works for integers,
135  * struct/unions, pointers, arrays, and enums.
136  *
137  * Supports two forms:
138  *   - field reference through variable access:
139  *     bpf_core_field_size(p->my_field);
140  *   - field reference through type and field names:
141  *     bpf_core_field_size(struct my_type, my_field).
142  */
143 #define bpf_core_field_size(field...)                                       \
144         __builtin_preserve_field_info(___bpf_field_ref(field), BPF_FIELD_BYTE_SIZE)
145
146 /*
147  * Convenience macro to get field's byte offset.
148  *
149  * Supports two forms:
150  *   - field reference through variable access:
151  *     bpf_core_field_offset(p->my_field);
152  *   - field reference through type and field names:
153  *     bpf_core_field_offset(struct my_type, my_field).
154  */
155 #define bpf_core_field_offset(field...)                                     \
156         __builtin_preserve_field_info(___bpf_field_ref(field), BPF_FIELD_BYTE_OFFSET)
157
158 /*
159  * Convenience macro to get BTF type ID of a specified type, using a local BTF
160  * information. Return 32-bit unsigned integer with type ID from program's own
161  * BTF. Always succeeds.
162  */
163 #define bpf_core_type_id_local(type)                                        \
164         __builtin_btf_type_id(*(typeof(type) *)0, BPF_TYPE_ID_LOCAL)
165
166 /*
167  * Convenience macro to get BTF type ID of a target kernel's type that matches
168  * specified local type.
169  * Returns:
170  *    - valid 32-bit unsigned type ID in kernel BTF;
171  *    - 0, if no matching type was found in a target kernel BTF.
172  */
173 #define bpf_core_type_id_kernel(type)                                       \
174         __builtin_btf_type_id(*(typeof(type) *)0, BPF_TYPE_ID_TARGET)
175
176 /*
177  * Convenience macro to check that provided named type
178  * (struct/union/enum/typedef) exists in a target kernel.
179  * Returns:
180  *    1, if such type is present in target kernel's BTF;
181  *    0, if no matching type is found.
182  */
183 #define bpf_core_type_exists(type)                                          \
184         __builtin_preserve_type_info(*(typeof(type) *)0, BPF_TYPE_EXISTS)
185
186 /*
187  * Convenience macro to get the byte size of a provided named type
188  * (struct/union/enum/typedef) in a target kernel.
189  * Returns:
190  *    >= 0 size (in bytes), if type is present in target kernel's BTF;
191  *    0, if no matching type is found.
192  */
193 #define bpf_core_type_size(type)                                            \
194         __builtin_preserve_type_info(*(typeof(type) *)0, BPF_TYPE_SIZE)
195
196 /*
197  * Convenience macro to check that provided enumerator value is defined in
198  * a target kernel.
199  * Returns:
200  *    1, if specified enum type and its enumerator value are present in target
201  *    kernel's BTF;
202  *    0, if no matching enum and/or enum value within that enum is found.
203  */
204 #define bpf_core_enum_value_exists(enum_type, enum_value)                   \
205         __builtin_preserve_enum_value(*(typeof(enum_type) *)enum_value, BPF_ENUMVAL_EXISTS)
206
207 /*
208  * Convenience macro to get the integer value of an enumerator value in
209  * a target kernel.
210  * Returns:
211  *    64-bit value, if specified enum type and its enumerator value are
212  *    present in target kernel's BTF;
213  *    0, if no matching enum and/or enum value within that enum is found.
214  */
215 #define bpf_core_enum_value(enum_type, enum_value)                          \
216         __builtin_preserve_enum_value(*(typeof(enum_type) *)enum_value, BPF_ENUMVAL_VALUE)
217
218 /*
219  * bpf_core_read() abstracts away bpf_probe_read_kernel() call and captures
220  * offset relocation for source address using __builtin_preserve_access_index()
221  * built-in, provided by Clang.
222  *
223  * __builtin_preserve_access_index() takes as an argument an expression of
224  * taking an address of a field within struct/union. It makes compiler emit
225  * a relocation, which records BTF type ID describing root struct/union and an
226  * accessor string which describes exact embedded field that was used to take
227  * an address. See detailed description of this relocation format and
228  * semantics in comments to struct bpf_field_reloc in libbpf_internal.h.
229  *
230  * This relocation allows libbpf to adjust BPF instruction to use correct
231  * actual field offset, based on target kernel BTF type that matches original
232  * (local) BTF, used to record relocation.
233  */
234 #define bpf_core_read(dst, sz, src)                                         \
235         bpf_probe_read_kernel(dst, sz, (const void *)__builtin_preserve_access_index(src))
236
237 /* NOTE: see comments for BPF_CORE_READ_USER() about the proper types use. */
238 #define bpf_core_read_user(dst, sz, src)                                    \
239         bpf_probe_read_user(dst, sz, (const void *)__builtin_preserve_access_index(src))
240 /*
241  * bpf_core_read_str() is a thin wrapper around bpf_probe_read_str()
242  * additionally emitting BPF CO-RE field relocation for specified source
243  * argument.
244  */
245 #define bpf_core_read_str(dst, sz, src)                                     \
246         bpf_probe_read_kernel_str(dst, sz, (const void *)__builtin_preserve_access_index(src))
247
248 /* NOTE: see comments for BPF_CORE_READ_USER() about the proper types use. */
249 #define bpf_core_read_user_str(dst, sz, src)                                \
250         bpf_probe_read_user_str(dst, sz, (const void *)__builtin_preserve_access_index(src))
251
252 #define ___concat(a, b) a ## b
253 #define ___apply(fn, n) ___concat(fn, n)
254 #define ___nth(_1, _2, _3, _4, _5, _6, _7, _8, _9, _10, __11, N, ...) N
255
256 /*
257  * return number of provided arguments; used for switch-based variadic macro
258  * definitions (see ___last, ___arrow, etc below)
259  */
260 #define ___narg(...) ___nth(_, ##__VA_ARGS__, 10, 9, 8, 7, 6, 5, 4, 3, 2, 1, 0)
261 /*
262  * return 0 if no arguments are passed, N - otherwise; used for
263  * recursively-defined macros to specify termination (0) case, and generic
264  * (N) case (e.g., ___read_ptrs, ___core_read)
265  */
266 #define ___empty(...) ___nth(_, ##__VA_ARGS__, N, N, N, N, N, N, N, N, N, N, 0)
267
268 #define ___last1(x) x
269 #define ___last2(a, x) x
270 #define ___last3(a, b, x) x
271 #define ___last4(a, b, c, x) x
272 #define ___last5(a, b, c, d, x) x
273 #define ___last6(a, b, c, d, e, x) x
274 #define ___last7(a, b, c, d, e, f, x) x
275 #define ___last8(a, b, c, d, e, f, g, x) x
276 #define ___last9(a, b, c, d, e, f, g, h, x) x
277 #define ___last10(a, b, c, d, e, f, g, h, i, x) x
278 #define ___last(...) ___apply(___last, ___narg(__VA_ARGS__))(__VA_ARGS__)
279
280 #define ___nolast2(a, _) a
281 #define ___nolast3(a, b, _) a, b
282 #define ___nolast4(a, b, c, _) a, b, c
283 #define ___nolast5(a, b, c, d, _) a, b, c, d
284 #define ___nolast6(a, b, c, d, e, _) a, b, c, d, e
285 #define ___nolast7(a, b, c, d, e, f, _) a, b, c, d, e, f
286 #define ___nolast8(a, b, c, d, e, f, g, _) a, b, c, d, e, f, g
287 #define ___nolast9(a, b, c, d, e, f, g, h, _) a, b, c, d, e, f, g, h
288 #define ___nolast10(a, b, c, d, e, f, g, h, i, _) a, b, c, d, e, f, g, h, i
289 #define ___nolast(...) ___apply(___nolast, ___narg(__VA_ARGS__))(__VA_ARGS__)
290
291 #define ___arrow1(a) a
292 #define ___arrow2(a, b) a->b
293 #define ___arrow3(a, b, c) a->b->c
294 #define ___arrow4(a, b, c, d) a->b->c->d
295 #define ___arrow5(a, b, c, d, e) a->b->c->d->e
296 #define ___arrow6(a, b, c, d, e, f) a->b->c->d->e->f
297 #define ___arrow7(a, b, c, d, e, f, g) a->b->c->d->e->f->g
298 #define ___arrow8(a, b, c, d, e, f, g, h) a->b->c->d->e->f->g->h
299 #define ___arrow9(a, b, c, d, e, f, g, h, i) a->b->c->d->e->f->g->h->i
300 #define ___arrow10(a, b, c, d, e, f, g, h, i, j) a->b->c->d->e->f->g->h->i->j
301 #define ___arrow(...) ___apply(___arrow, ___narg(__VA_ARGS__))(__VA_ARGS__)
302
303 #define ___type(...) typeof(___arrow(__VA_ARGS__))
304
305 #define ___read(read_fn, dst, src_type, src, accessor)                      \
306         read_fn((void *)(dst), sizeof(*(dst)), &((src_type)(src))->accessor)
307
308 /* "recursively" read a sequence of inner pointers using local __t var */
309 #define ___rd_first(fn, src, a) ___read(fn, &__t, ___type(src), src, a);
310 #define ___rd_last(fn, ...)                                                 \
311         ___read(fn, &__t, ___type(___nolast(__VA_ARGS__)), __t, ___last(__VA_ARGS__));
312 #define ___rd_p1(fn, ...) const void *__t; ___rd_first(fn, __VA_ARGS__)
313 #define ___rd_p2(fn, ...) ___rd_p1(fn, ___nolast(__VA_ARGS__)) ___rd_last(fn, __VA_ARGS__)
314 #define ___rd_p3(fn, ...) ___rd_p2(fn, ___nolast(__VA_ARGS__)) ___rd_last(fn, __VA_ARGS__)
315 #define ___rd_p4(fn, ...) ___rd_p3(fn, ___nolast(__VA_ARGS__)) ___rd_last(fn, __VA_ARGS__)
316 #define ___rd_p5(fn, ...) ___rd_p4(fn, ___nolast(__VA_ARGS__)) ___rd_last(fn, __VA_ARGS__)
317 #define ___rd_p6(fn, ...) ___rd_p5(fn, ___nolast(__VA_ARGS__)) ___rd_last(fn, __VA_ARGS__)
318 #define ___rd_p7(fn, ...) ___rd_p6(fn, ___nolast(__VA_ARGS__)) ___rd_last(fn, __VA_ARGS__)
319 #define ___rd_p8(fn, ...) ___rd_p7(fn, ___nolast(__VA_ARGS__)) ___rd_last(fn, __VA_ARGS__)
320 #define ___rd_p9(fn, ...) ___rd_p8(fn, ___nolast(__VA_ARGS__)) ___rd_last(fn, __VA_ARGS__)
321 #define ___read_ptrs(fn, src, ...)                                          \
322         ___apply(___rd_p, ___narg(__VA_ARGS__))(fn, src, __VA_ARGS__)
323
324 #define ___core_read0(fn, fn_ptr, dst, src, a)                              \
325         ___read(fn, dst, ___type(src), src, a);
326 #define ___core_readN(fn, fn_ptr, dst, src, ...)                            \
327         ___read_ptrs(fn_ptr, src, ___nolast(__VA_ARGS__))                   \
328         ___read(fn, dst, ___type(src, ___nolast(__VA_ARGS__)), __t,         \
329                 ___last(__VA_ARGS__));
330 #define ___core_read(fn, fn_ptr, dst, src, a, ...)                          \
331         ___apply(___core_read, ___empty(__VA_ARGS__))(fn, fn_ptr, dst,      \
332                                                       src, a, ##__VA_ARGS__)
333
334 /*
335  * BPF_CORE_READ_INTO() is a more performance-conscious variant of
336  * BPF_CORE_READ(), in which final field is read into user-provided storage.
337  * See BPF_CORE_READ() below for more details on general usage.
338  */
339 #define BPF_CORE_READ_INTO(dst, src, a, ...) ({                             \
340         ___core_read(bpf_core_read, bpf_core_read,                          \
341                      dst, (src), a, ##__VA_ARGS__)                          \
342 })
343
344 /*
345  * Variant of BPF_CORE_READ_INTO() for reading from user-space memory.
346  *
347  * NOTE: see comments for BPF_CORE_READ_USER() about the proper types use.
348  */
349 #define BPF_CORE_READ_USER_INTO(dst, src, a, ...) ({                        \
350         ___core_read(bpf_core_read_user, bpf_core_read_user,                \
351                      dst, (src), a, ##__VA_ARGS__)                          \
352 })
353
354 /* Non-CO-RE variant of BPF_CORE_READ_INTO() */
355 #define BPF_PROBE_READ_INTO(dst, src, a, ...) ({                            \
356         ___core_read(bpf_probe_read, bpf_probe_read,                        \
357                      dst, (src), a, ##__VA_ARGS__)                          \
358 })
359
360 /* Non-CO-RE variant of BPF_CORE_READ_USER_INTO().
361  *
362  * As no CO-RE relocations are emitted, source types can be arbitrary and are
363  * not restricted to kernel types only.
364  */
365 #define BPF_PROBE_READ_USER_INTO(dst, src, a, ...) ({                       \
366         ___core_read(bpf_probe_read_user, bpf_probe_read_user,              \
367                      dst, (src), a, ##__VA_ARGS__)                          \
368 })
369
370 /*
371  * BPF_CORE_READ_STR_INTO() does same "pointer chasing" as
372  * BPF_CORE_READ() for intermediate pointers, but then executes (and returns
373  * corresponding error code) bpf_core_read_str() for final string read.
374  */
375 #define BPF_CORE_READ_STR_INTO(dst, src, a, ...) ({                         \
376         ___core_read(bpf_core_read_str, bpf_core_read,                      \
377                      dst, (src), a, ##__VA_ARGS__)                          \
378 })
379
380 /*
381  * Variant of BPF_CORE_READ_STR_INTO() for reading from user-space memory.
382  *
383  * NOTE: see comments for BPF_CORE_READ_USER() about the proper types use.
384  */
385 #define BPF_CORE_READ_USER_STR_INTO(dst, src, a, ...) ({                    \
386         ___core_read(bpf_core_read_user_str, bpf_core_read_user,            \
387                      dst, (src), a, ##__VA_ARGS__)                          \
388 })
389
390 /* Non-CO-RE variant of BPF_CORE_READ_STR_INTO() */
391 #define BPF_PROBE_READ_STR_INTO(dst, src, a, ...) ({                        \
392         ___core_read(bpf_probe_read_str, bpf_probe_read,                    \
393                      dst, (src), a, ##__VA_ARGS__)                          \
394 })
395
396 /*
397  * Non-CO-RE variant of BPF_CORE_READ_USER_STR_INTO().
398  *
399  * As no CO-RE relocations are emitted, source types can be arbitrary and are
400  * not restricted to kernel types only.
401  */
402 #define BPF_PROBE_READ_USER_STR_INTO(dst, src, a, ...) ({                   \
403         ___core_read(bpf_probe_read_user_str, bpf_probe_read_user,          \
404                      dst, (src), a, ##__VA_ARGS__)                          \
405 })
406
407 /*
408  * BPF_CORE_READ() is used to simplify BPF CO-RE relocatable read, especially
409  * when there are few pointer chasing steps.
410  * E.g., what in non-BPF world (or in BPF w/ BCC) would be something like:
411  *      int x = s->a.b.c->d.e->f->g;
412  * can be succinctly achieved using BPF_CORE_READ as:
413  *      int x = BPF_CORE_READ(s, a.b.c, d.e, f, g);
414  *
415  * BPF_CORE_READ will decompose above statement into 4 bpf_core_read (BPF
416  * CO-RE relocatable bpf_probe_read_kernel() wrapper) calls, logically
417  * equivalent to:
418  * 1. const void *__t = s->a.b.c;
419  * 2. __t = __t->d.e;
420  * 3. __t = __t->f;
421  * 4. return __t->g;
422  *
423  * Equivalence is logical, because there is a heavy type casting/preservation
424  * involved, as well as all the reads are happening through
425  * bpf_probe_read_kernel() calls using __builtin_preserve_access_index() to
426  * emit CO-RE relocations.
427  *
428  * N.B. Only up to 9 "field accessors" are supported, which should be more
429  * than enough for any practical purpose.
430  */
431 #define BPF_CORE_READ(src, a, ...) ({                                       \
432         ___type((src), a, ##__VA_ARGS__) __r;                               \
433         BPF_CORE_READ_INTO(&__r, (src), a, ##__VA_ARGS__);                  \
434         __r;                                                                \
435 })
436
437 /*
438  * Variant of BPF_CORE_READ() for reading from user-space memory.
439  *
440  * NOTE: all the source types involved are still *kernel types* and need to
441  * exist in kernel (or kernel module) BTF, otherwise CO-RE relocation will
442  * fail. Custom user types are not relocatable with CO-RE.
443  * The typical situation in which BPF_CORE_READ_USER() might be used is to
444  * read kernel UAPI types from the user-space memory passed in as a syscall
445  * input argument.
446  */
447 #define BPF_CORE_READ_USER(src, a, ...) ({                                  \
448         ___type((src), a, ##__VA_ARGS__) __r;                               \
449         BPF_CORE_READ_USER_INTO(&__r, (src), a, ##__VA_ARGS__);             \
450         __r;                                                                \
451 })
452
453 /* Non-CO-RE variant of BPF_CORE_READ() */
454 #define BPF_PROBE_READ(src, a, ...) ({                                      \
455         ___type((src), a, ##__VA_ARGS__) __r;                               \
456         BPF_PROBE_READ_INTO(&__r, (src), a, ##__VA_ARGS__);                 \
457         __r;                                                                \
458 })
459
460 /*
461  * Non-CO-RE variant of BPF_CORE_READ_USER().
462  *
463  * As no CO-RE relocations are emitted, source types can be arbitrary and are
464  * not restricted to kernel types only.
465  */
466 #define BPF_PROBE_READ_USER(src, a, ...) ({                                 \
467         ___type((src), a, ##__VA_ARGS__) __r;                               \
468         BPF_PROBE_READ_USER_INTO(&__r, (src), a, ##__VA_ARGS__);            \
469         __r;                                                                \
470 })
471
472 #endif
473