4 * Copyright (C) 2020 Francis Deslauriers <francis.deslauriers@efficios.com>
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; only
9 * version 2.1 of the License.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
25 #define MSGPACK_FIXSTR_ID_MASK 0xA0
26 #define MSGPACK_FIXMAP_ID_MASK 0x80
27 #define MSGPACK_FIXARRAY_ID_MASK 0x90
29 #define MSGPACK_NIL_ID 0xC0
30 #define MSGPACK_FALSE_ID 0xC2
31 #define MSGPACK_TRUE_ID 0xC3
32 #define MSGPACK_MAP16_ID 0xDE
33 #define MSGPACK_ARRAY16_ID 0xDC
35 #define MSGPACK_UINT8_ID 0xCC
36 #define MSGPACK_UINT16_ID 0xCD
37 #define MSGPACK_UINT32_ID 0xCE
38 #define MSGPACK_UINT64_ID 0xCF
40 #define MSGPACK_INT8_ID 0xD0
41 #define MSGPACK_INT16_ID 0xD1
42 #define MSGPACK_INT32_ID 0xD2
43 #define MSGPACK_INT64_ID 0xD3
45 #define MSGPACK_FLOAT64_ID 0xCB
46 #define MSGPACK_STR16_ID 0xDA
48 #define MSGPACK_FIXINT_MAX ((1 << 7) - 1)
49 #define MSGPACK_FIXINT_MIN -(1 << 5)
50 #define MSGPACK_FIXMAP_MAX_COUNT 15
51 #define MSGPACK_FIXARRAY_MAX_COUNT 15
52 #define MSGPACK_FIXSTR_MAX_LENGTH 31
55 #include <linux/bug.h>
56 #include <linux/string.h>
57 #include <linux/types.h>
58 #include <asm/byteorder.h>
60 #include <lttng/msgpack.h>
62 #define INT8_MIN (-128)
63 #define INT16_MIN (-32767-1)
64 #define INT32_MIN (-2147483647-1)
65 #define INT8_MAX (127)
66 #define INT16_MAX (32767)
67 #define INT32_MAX (2147483647)
68 #define UINT8_MAX (255)
69 #define UINT16_MAX (65535)
70 #define UINT32_MAX (4294967295U)
72 #define byteswap_host_to_be16(_tmp) cpu_to_be16(_tmp)
73 #define byteswap_host_to_be32(_tmp) cpu_to_be32(_tmp)
74 #define byteswap_host_to_be64(_tmp) cpu_to_be64(_tmp)
76 #define lttng_msgpack_assert(cond) WARN_ON(!(cond))
78 #else /* __KERNEL__ */
86 #define byteswap_host_to_be16(_tmp) htobe16(_tmp)
87 #define byteswap_host_to_be32(_tmp) htobe32(_tmp)
88 #define byteswap_host_to_be64(_tmp) htobe64(_tmp)
90 #define lttng_msgpack_assert(cond) ({ \
92 fprintf(stderr, "Assertion failed. %s:%d\n", __FILE__, __LINE__); \
94 #endif /* __KERNEL__ */
96 static inline int lttng_msgpack_append_buffer(
97 struct lttng_msgpack_writer
*writer
,
103 lttng_msgpack_assert(buf
);
105 /* Ensure we are not trying to write after the end of the buffer. */
106 if (writer
->write_pos
+ length
> writer
->end_write_pos
) {
111 memcpy(writer
->write_pos
, buf
, length
);
112 writer
->write_pos
+= length
;
117 static inline int lttng_msgpack_append_u8(
118 struct lttng_msgpack_writer
*writer
, uint8_t value
)
120 return lttng_msgpack_append_buffer(writer
, &value
, sizeof(value
));
123 static inline int lttng_msgpack_append_u16(
124 struct lttng_msgpack_writer
*writer
, uint16_t value
)
126 value
= byteswap_host_to_be16(value
);
128 return lttng_msgpack_append_buffer(writer
, (uint8_t *) &value
, sizeof(value
));
131 static inline int lttng_msgpack_append_u32(
132 struct lttng_msgpack_writer
*writer
, uint32_t value
)
134 value
= byteswap_host_to_be32(value
);
136 return lttng_msgpack_append_buffer(writer
, (uint8_t *) &value
, sizeof(value
));
139 static inline int lttng_msgpack_append_u64(
140 struct lttng_msgpack_writer
*writer
, uint64_t value
)
142 value
= byteswap_host_to_be64(value
);
144 return lttng_msgpack_append_buffer(writer
, (uint8_t *) &value
, sizeof(value
));
147 static inline int lttng_msgpack_append_f64(
148 struct lttng_msgpack_writer
*writer
, double value
)
158 return lttng_msgpack_append_u64(writer
, u
.u
);
161 static inline int lttng_msgpack_append_i8(
162 struct lttng_msgpack_writer
*writer
, int8_t value
)
164 return lttng_msgpack_append_u8(writer
, (uint8_t) value
);
167 static inline int lttng_msgpack_append_i16(
168 struct lttng_msgpack_writer
*writer
, int16_t value
)
170 return lttng_msgpack_append_u16(writer
, (uint16_t) value
);
173 static inline int lttng_msgpack_append_i32(
174 struct lttng_msgpack_writer
*writer
, int32_t value
)
176 return lttng_msgpack_append_u32(writer
, (uint32_t) value
);
179 static inline int lttng_msgpack_append_i64(
180 struct lttng_msgpack_writer
*writer
, int64_t value
)
182 return lttng_msgpack_append_u64(writer
, (uint64_t) value
);
185 static inline int lttng_msgpack_encode_f64(
186 struct lttng_msgpack_writer
*writer
, double value
)
190 ret
= lttng_msgpack_append_u8(writer
, MSGPACK_FLOAT64_ID
);
194 ret
= lttng_msgpack_append_f64(writer
, value
);
202 static inline int lttng_msgpack_encode_fixmap(
203 struct lttng_msgpack_writer
*writer
, uint8_t count
)
207 lttng_msgpack_assert(count
<= MSGPACK_FIXMAP_MAX_COUNT
);
209 ret
= lttng_msgpack_append_u8(writer
, MSGPACK_FIXMAP_ID_MASK
| count
);
217 static inline int lttng_msgpack_encode_map16(
218 struct lttng_msgpack_writer
*writer
, uint16_t count
)
222 lttng_msgpack_assert(count
> MSGPACK_FIXMAP_MAX_COUNT
);
224 ret
= lttng_msgpack_append_u8(writer
, MSGPACK_MAP16_ID
);
228 ret
= lttng_msgpack_append_u16(writer
, count
);
236 static inline int lttng_msgpack_encode_fixarray(
237 struct lttng_msgpack_writer
*writer
, uint8_t count
)
241 lttng_msgpack_assert(count
<= MSGPACK_FIXARRAY_MAX_COUNT
);
243 ret
= lttng_msgpack_append_u8(writer
, MSGPACK_FIXARRAY_ID_MASK
| count
);
251 static inline int lttng_msgpack_encode_array16(
252 struct lttng_msgpack_writer
*writer
, uint16_t count
)
256 lttng_msgpack_assert(count
> MSGPACK_FIXARRAY_MAX_COUNT
);
258 ret
= lttng_msgpack_append_u8(writer
, MSGPACK_ARRAY16_ID
);
262 ret
= lttng_msgpack_append_u16(writer
, count
);
270 static inline int lttng_msgpack_encode_fixstr(
271 struct lttng_msgpack_writer
*writer
,
277 lttng_msgpack_assert(len
<= MSGPACK_FIXSTR_MAX_LENGTH
);
279 ret
= lttng_msgpack_append_u8(writer
, MSGPACK_FIXSTR_ID_MASK
| len
);
283 ret
= lttng_msgpack_append_buffer(writer
, (uint8_t *) str
, len
);
291 static inline int lttng_msgpack_encode_str16(
292 struct lttng_msgpack_writer
*writer
,
298 lttng_msgpack_assert(len
> MSGPACK_FIXSTR_MAX_LENGTH
);
300 ret
= lttng_msgpack_append_u8(writer
, MSGPACK_STR16_ID
);
304 ret
= lttng_msgpack_append_u16(writer
, len
);
308 ret
= lttng_msgpack_append_buffer(writer
, (uint8_t *) str
, len
);
316 int lttng_msgpack_begin_map(struct lttng_msgpack_writer
*writer
, size_t count
)
320 if (count
>= (1 << 16)) {
325 if (count
<= MSGPACK_FIXMAP_MAX_COUNT
)
326 ret
= lttng_msgpack_encode_fixmap(writer
, count
);
328 ret
= lttng_msgpack_encode_map16(writer
, count
);
330 writer
->map_nesting
++;
335 int lttng_msgpack_end_map(struct lttng_msgpack_writer
*writer
)
337 lttng_msgpack_assert(writer
->map_nesting
> 0);
338 writer
->map_nesting
--;
342 int lttng_msgpack_begin_array(
343 struct lttng_msgpack_writer
*writer
, size_t count
)
347 if (count
>= (1 << 16)) {
352 if (count
<= MSGPACK_FIXARRAY_MAX_COUNT
)
353 ret
= lttng_msgpack_encode_fixarray(writer
, count
);
355 ret
= lttng_msgpack_encode_array16(writer
, count
);
357 writer
->array_nesting
++;
362 int lttng_msgpack_end_array(struct lttng_msgpack_writer
*writer
)
364 lttng_msgpack_assert(writer
->array_nesting
> 0);
365 writer
->array_nesting
--;
369 int lttng_msgpack_write_str(struct lttng_msgpack_writer
*writer
,
373 size_t length
= strlen(str
);
375 if (length
>= (1 << 16)) {
380 if (length
<= MSGPACK_FIXSTR_MAX_LENGTH
)
381 ret
= lttng_msgpack_encode_fixstr(writer
, str
, length
);
383 ret
= lttng_msgpack_encode_str16(writer
, str
, length
);
389 int lttng_msgpack_write_nil(struct lttng_msgpack_writer
*writer
)
391 return lttng_msgpack_append_u8(writer
, MSGPACK_NIL_ID
);
394 int lttng_msgpack_write_true(struct lttng_msgpack_writer
*writer
)
396 return lttng_msgpack_append_u8(writer
, MSGPACK_TRUE_ID
);
399 int lttng_msgpack_write_false(struct lttng_msgpack_writer
*writer
)
401 return lttng_msgpack_append_u8(writer
, MSGPACK_FALSE_ID
);
404 int lttng_msgpack_write_unsigned_integer(
405 struct lttng_msgpack_writer
*writer
, uint64_t value
)
409 if (value
<= MSGPACK_FIXINT_MAX
) {
410 ret
= lttng_msgpack_append_u8(writer
, (uint8_t) value
);
413 } else if (value
<= UINT8_MAX
) {
414 ret
= lttng_msgpack_append_u8(writer
, MSGPACK_UINT8_ID
);
418 ret
= lttng_msgpack_append_u8(writer
, (uint8_t) value
);
421 } else if (value
<= UINT16_MAX
) {
422 ret
= lttng_msgpack_append_u8(writer
, MSGPACK_UINT16_ID
);
426 ret
= lttng_msgpack_append_u16(writer
, (uint16_t) value
);
429 } else if (value
<= UINT32_MAX
) {
430 ret
= lttng_msgpack_append_u8(writer
, MSGPACK_UINT32_ID
);
434 ret
= lttng_msgpack_append_u32(writer
, (uint32_t) value
);
438 ret
= lttng_msgpack_append_u8(writer
, MSGPACK_UINT64_ID
);
442 ret
= lttng_msgpack_append_u64(writer
, value
);
451 int lttng_msgpack_write_signed_integer(struct lttng_msgpack_writer
*writer
, int64_t value
)
455 if (value
>= MSGPACK_FIXINT_MIN
&& value
<= MSGPACK_FIXINT_MAX
){
456 ret
= lttng_msgpack_append_i8(writer
, (int8_t) value
);
459 } else if (value
>= INT8_MIN
&& value
<= INT8_MAX
) {
460 ret
= lttng_msgpack_append_u8(writer
, MSGPACK_INT8_ID
);
464 ret
= lttng_msgpack_append_i8(writer
, (int8_t) value
);
467 } else if (value
>= INT16_MIN
&& value
<= INT16_MAX
) {
468 ret
= lttng_msgpack_append_u8(writer
, MSGPACK_INT16_ID
);
472 ret
= lttng_msgpack_append_i16(writer
, (int16_t) value
);
475 } else if (value
>= INT32_MIN
&& value
<= INT32_MAX
) {
476 ret
= lttng_msgpack_append_u8(writer
, MSGPACK_INT32_ID
);
480 ret
= lttng_msgpack_append_i32(writer
, (int32_t) value
);
484 ret
= lttng_msgpack_append_u8(writer
, MSGPACK_INT64_ID
);
488 ret
= lttng_msgpack_append_i64(writer
, value
);
497 int lttng_msgpack_write_double(struct lttng_msgpack_writer
*writer
, double value
)
499 return lttng_msgpack_encode_f64(writer
, value
);
502 void lttng_msgpack_writer_init(struct lttng_msgpack_writer
*writer
,
503 uint8_t *buffer
, size_t size
)
505 lttng_msgpack_assert(buffer
);
506 lttng_msgpack_assert(size
>= 0);
508 writer
->buffer
= buffer
;
509 writer
->write_pos
= buffer
;
510 writer
->end_write_pos
= buffer
+ size
;
512 writer
->array_nesting
= 0;
513 writer
->map_nesting
= 0;
516 void lttng_msgpack_writer_fini(struct lttng_msgpack_writer
*writer
)
518 memset(writer
, 0, sizeof(*writer
));