*
* Integers read/write functions.
*
- * Copyright (c) 2010 Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
+ * Copyright 2010-2011 EfficiOS Inc. and Linux Foundation
*
- * This library is free software; you can redistribute it and/or
- * modify it under the terms of the GNU Lesser General Public
- * License as published by the Free Software Foundation; either
- * version 2.1 of the License, or (at your option) any later version.
+ * Author: Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
*
- * This library is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
- * Lesser General Public License for more details.
+ * Permission is hereby granted, free of charge, to any person obtaining a copy
+ * of this software and associated documentation files (the "Software"), to deal
+ * in the Software without restriction, including without limitation the rights
+ * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+ * copies of the Software, and to permit persons to whom the Software is
+ * furnished to do so, subject to the following conditions:
*
- * You should have received a copy of the GNU Lesser General Public
- * License along with this library; if not, write to the Free Software
- * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ * The above copyright notice and this permission notice shall be included in
+ * all copies or substantial portions of the Software.
*/
-#include <ctf/ctf-types.h>
-#include <ctf/bitfield.h>
+#include <babeltrace/ctf/types.h>
+#include <babeltrace/bitfield.h>
#include <stdint.h>
#include <glib.h>
-#include <endian.h>
+#include <babeltrace/endian.h>
+
+/*
+ * The aligned read/write functions are expected to be faster than the
+ * bitfield variants. They will be enabled eventually as an
+ * optimisation.
+ */
static
-uint64_t _aligned_uint_read(struct stream_pos *pos,
- const struct type_class_integer *int_class)
+int _aligned_integer_read(struct stream_pos *ppos,
+ struct definition *definition)
{
- int rbo = (int_class->byte_order != BYTE_ORDER); /* reverse byte order */
+ struct definition_integer *integer_definition =
+ container_of(definition, struct definition_integer, p);
+ const struct declaration_integer *integer_declaration =
+ integer_definition->declaration;
+ struct ctf_stream_pos *pos = ctf_pos(ppos);
+ int rbo = (integer_declaration->byte_order != BYTE_ORDER); /* reverse byte order */
- align_pos(pos, int_class->p.alignment);
- assert(!(pos->offset % CHAR_BIT));
- switch (int_class->len) {
- case 8:
- {
- uint8_t v;
+ ctf_align_pos(pos, integer_declaration->p.alignment);
- v = *(const uint8_t *)pos->base;
- move_pos(pos, int_class->len);
- return v;
- }
- case 16:
- {
- uint16_t v;
+ if (!ctf_pos_access_ok(pos, integer_declaration->len))
+ return -EFAULT;
- v = *(const uint16_t *)pos->base;
- move_pos(pos, int_class->len);
- return rbo ? GUINT16_SWAP_LE_BE(v) : v;
- }
- case 32:
- {
- uint32_t v;
+ assert(!(pos->offset % CHAR_BIT));
+ if (!integer_declaration->signedness) {
+ switch (integer_declaration->len) {
+ case 8:
+ {
+ uint8_t v;
- v = *(const uint32_t *)pos->base;
- move_pos(pos, int_class->len);
- return rbo ? GUINT32_SWAP_LE_BE(v) : v;
- }
- case 64:
- {
- uint64_t v;
+ v = *(const uint8_t *) ctf_get_pos_addr(pos);
+ integer_definition->value._unsigned = v;
+ break;
+ }
+ case 16:
+ {
+ uint16_t v;
- v = *(const uint64_t *)pos->base;
- move_pos(pos, int_class->len);
- return rbo ? GUINT64_SWAP_LE_BE(v) : v;
- }
- default:
- assert(0);
- }
-}
+ v = *(const uint16_t *) ctf_get_pos_addr(pos);
+ integer_definition->value._unsigned =
+ rbo ? GUINT16_SWAP_LE_BE(v) : v;
+ break;
+ }
+ case 32:
+ {
+ uint32_t v;
-static
-int64_t _aligned_int_read(struct stream_pos *pos,
- const struct type_class_integer *int_class)
-{
- int rbo = (int_class->byte_order != BYTE_ORDER); /* reverse byte order */
+ v = *(const uint32_t *) ctf_get_pos_addr(pos);
+ integer_definition->value._unsigned =
+ rbo ? GUINT32_SWAP_LE_BE(v) : v;
+ break;
+ }
+ case 64:
+ {
+ uint64_t v;
- align_pos(pos, int_class->p.alignment);
- assert(!(pos->offset % CHAR_BIT));
- switch (int_class->len) {
- case 8:
- {
- int8_t v;
+ v = *(const uint64_t *) ctf_get_pos_addr(pos);
+ integer_definition->value._unsigned =
+ rbo ? GUINT64_SWAP_LE_BE(v) : v;
+ break;
+ }
+ default:
+ assert(0);
+ }
+ } else {
+ switch (integer_declaration->len) {
+ case 8:
+ {
+ int8_t v;
- v = *(const int8_t *)pos->base;
- move_pos(pos, int_class->len);
- return v;
- }
- case 16:
- {
- int16_t v;
+ v = *(const int8_t *) ctf_get_pos_addr(pos);
+ integer_definition->value._signed = v;
+ break;
+ }
+ case 16:
+ {
+ int16_t v;
- v = *(const int16_t *)pos->base;
- move_pos(pos, int_class->len);
- return rbo ? GUINT16_SWAP_LE_BE(v) : v;
- }
- case 32:
- {
- int32_t v;
+ v = *(const int16_t *) ctf_get_pos_addr(pos);
+ integer_definition->value._signed =
+ rbo ? (int16_t) GUINT16_SWAP_LE_BE(v) : v;
+ break;
+ }
+ case 32:
+ {
+ int32_t v;
- v = *(const int32_t *)pos->base;
- move_pos(pos, int_class->len);
- return rbo ? GUINT32_SWAP_LE_BE(v) : v;
- }
- case 64:
- {
- int64_t v;
+ v = *(const int32_t *) ctf_get_pos_addr(pos);
+ integer_definition->value._signed =
+ rbo ? (int32_t) GUINT32_SWAP_LE_BE(v) : v;
+ break;
+ }
+ case 64:
+ {
+ int64_t v;
- v = *(const int64_t *)pos->base;
- move_pos(pos, int_class->len);
- return rbo ? GUINT64_SWAP_LE_BE(v) : v;
- }
- default:
- assert(0);
+ v = *(const int64_t *) ctf_get_pos_addr(pos);
+ integer_definition->value._signed =
+ rbo ? (int64_t) GUINT64_SWAP_LE_BE(v) : v;
+ break;
+ }
+ default:
+ assert(0);
+ }
}
+ ctf_move_pos(pos, integer_declaration->len);
+ return 0;
}
static
-void _aligned_uint_write(struct stream_pos *pos,
- const struct type_class_integer *int_class,
- uint64_t v)
+int _aligned_integer_write(struct stream_pos *ppos,
+ struct definition *definition)
{
- int rbo = (int_class->byte_order != BYTE_ORDER); /* reverse byte order */
+ struct definition_integer *integer_definition =
+ container_of(definition, struct definition_integer, p);
+ const struct declaration_integer *integer_declaration =
+ integer_definition->declaration;
+ struct ctf_stream_pos *pos = ctf_pos(ppos);
+ int rbo = (integer_declaration->byte_order != BYTE_ORDER); /* reverse byte order */
+
+ ctf_align_pos(pos, integer_declaration->p.alignment);
+
+ if (!ctf_pos_access_ok(pos, integer_declaration->len))
+ return -EFAULT;
- align_pos(pos, int_class->p.alignment);
assert(!(pos->offset % CHAR_BIT));
if (pos->dummy)
goto end;
+ if (!integer_declaration->signedness) {
+ uint64_t v = integer_definition->value._unsigned;
+
+ switch (integer_declaration->len) {
+ case 8: *(uint8_t *) ctf_get_pos_addr(pos) = (uint8_t) v;
+ break;
+ case 16:
+ *(uint16_t *) ctf_get_pos_addr(pos) = rbo ?
+ GUINT16_SWAP_LE_BE((uint16_t) v) :
+ (uint16_t) v;
+ break;
+ case 32:
+ *(uint32_t *) ctf_get_pos_addr(pos) = rbo ?
+ GUINT32_SWAP_LE_BE((uint32_t) v) :
+ (uint32_t) v;
+ break;
+ case 64:
+ *(uint64_t *) ctf_get_pos_addr(pos) = rbo ?
+ GUINT64_SWAP_LE_BE(v) : v;
+ break;
+ default:
+ assert(0);
+ }
+ } else {
+ int64_t v = integer_definition->value._signed;
- switch (int_class->len) {
- case 8: *(uint8_t *) get_pos_addr(pos) = (uint8_t) v;
- break;
- case 16:
- *(uint16_t *) get_pos_addr(pos) = rbo ?
- GUINT16_SWAP_LE_BE((uint16_t) v) :
- (uint16_t) v;
- break;
- case 32:
- *(uint32_t *) get_pos_addr(pos) = rbo ?
- GUINT32_SWAP_LE_BE((uint32_t) v) :
- (uint32_t) v;
- break;
- case 64:
- *(uint64_t *) get_pos_addr(pos) = rbo ?
- GUINT64_SWAP_LE_BE(v) : v;
- break;
- default:
- assert(0);
+ switch (integer_declaration->len) {
+ case 8: *(int8_t *) ctf_get_pos_addr(pos) = (int8_t) v;
+ break;
+ case 16:
+ *(int16_t *) ctf_get_pos_addr(pos) = rbo ?
+ (int16_t) GUINT16_SWAP_LE_BE((int16_t) v) :
+ (int16_t) v;
+ break;
+ case 32:
+ *(int32_t *) ctf_get_pos_addr(pos) = rbo ?
+ (int32_t) GUINT32_SWAP_LE_BE((int32_t) v) :
+ (int32_t) v;
+ break;
+ case 64:
+ *(int64_t *) ctf_get_pos_addr(pos) = rbo ?
+ GUINT64_SWAP_LE_BE(v) : v;
+ break;
+ default:
+ assert(0);
+ }
}
end:
- move_pos(pos, int_class->len);
+ ctf_move_pos(pos, integer_declaration->len);
+ return 0;
}
-static
-void _aligned_int_write(struct stream_pos *pos,
- const struct type_class_integer *int_class,
- int64_t v)
+int ctf_integer_read(struct stream_pos *ppos, struct definition *definition)
{
- int rbo = (int_class->byte_order != BYTE_ORDER); /* reverse byte order */
-
- align_pos(pos, int_class->p.alignment);
- assert(!(pos->offset % CHAR_BIT));
- if (pos->dummy)
- goto end;
+ struct definition_integer *integer_definition =
+ container_of(definition, struct definition_integer, p);
+ const struct declaration_integer *integer_declaration =
+ integer_definition->declaration;
+ struct ctf_stream_pos *pos = ctf_pos(ppos);
- switch (int_class->len) {
- case 8: *(int8_t *) get_pos_addr(pos) = (int8_t) v;
- break;
- case 16:
- *(int16_t *) get_pos_addr(pos) = rbo ?
- GUINT16_SWAP_LE_BE((int16_t) v) :
- (int16_t) v;
- break;
- case 32:
- *(int32_t *) get_pos_addr(pos) = rbo ?
- GUINT32_SWAP_LE_BE((int32_t) v) :
- (int32_t) v;
- break;
- case 64:
- *(int64_t *) get_pos_addr(pos) = rbo ?
- GUINT64_SWAP_LE_BE(v) : v;
- break;
- default:
- assert(0);
+ if (!(integer_declaration->p.alignment % CHAR_BIT)
+ && !(integer_declaration->len % CHAR_BIT)) {
+ return _aligned_integer_read(ppos, definition);
}
-end:
- move_pos(pos, int_class->len);
- return;
-}
-uint64_t ctf_uint_read(struct stream_pos *pos,
- const struct type_class_bitfield *int_class)
-{
- uint64_t v;
+ ctf_align_pos(pos, integer_declaration->p.alignment);
- align_pos(pos, int_class->p.alignment);
- if (int_class->byte_order == LITTLE_ENDIAN)
- ctf_bitfield_read_le(pos->base, pos->offset,
- int_class->len, &v);
- else
- ctf_bitfield_read_be(pos->base, pos->offset,
- int_class->len, &v);
- move_pos(pos, int_class->len);
- return v;
+ if (!ctf_pos_access_ok(pos, integer_declaration->len))
+ return -EFAULT;
+
+ if (!integer_declaration->signedness) {
+ if (integer_declaration->byte_order == LITTLE_ENDIAN)
+ bt_bitfield_read_le(pos->base, unsigned long,
+ pos->offset, integer_declaration->len,
+ &integer_definition->value._unsigned);
+ else
+ bt_bitfield_read_be(pos->base, unsigned long,
+ pos->offset, integer_declaration->len,
+ &integer_definition->value._unsigned);
+ } else {
+ if (integer_declaration->byte_order == LITTLE_ENDIAN)
+ bt_bitfield_read_le(pos->base, unsigned long,
+ pos->offset, integer_declaration->len,
+ &integer_definition->value._signed);
+ else
+ bt_bitfield_read_be(pos->base, unsigned long,
+ pos->offset, integer_declaration->len,
+ &integer_definition->value._signed);
+ }
+ ctf_move_pos(pos, integer_declaration->len);
+ return 0;
}
-int64_t ctf_int_read(struct stream_pos *pos,
- const struct type_class_bitfield *int_class)
+int ctf_integer_write(struct stream_pos *ppos, struct definition *definition)
{
- int64_t v;
+ struct definition_integer *integer_definition =
+ container_of(definition, struct definition_integer, p);
+ const struct declaration_integer *integer_declaration =
+ integer_definition->declaration;
+ struct ctf_stream_pos *pos = ctf_pos(ppos);
- align_pos(pos, int_class->p.alignment);
- if (int_class->byte_order == LITTLE_ENDIAN)
- ctf_bitfield_read_le(pos->base, pos->offset,
- int_class->len, &v);
- else
- ctf_bitfield_read_be(pos->base, pos->offset,
- int_class->len, &v);
- move_pos(pos, int_class->len);
- return v;
-}
+ if (!(integer_declaration->p.alignment % CHAR_BIT)
+ && !(integer_declaration->len % CHAR_BIT)) {
+ return _aligned_integer_write(ppos, definition);
+ }
-void ctf_uint_write(struct stream_pos *pos,
- const struct type_class_bitfield *int_class,
- uint64_t v)
-{
- align_pos(pos, int_class->p.alignment);
- if (pos->dummy)
- goto end;
- if (int_class->byte_order == LITTLE_ENDIAN)
- ctf_bitfield_write_le(pos->base, pos->offset,
- int_class->len, v);
- else
- ctf_bitfield_write_be(pos->base, pos->offset,
- int_class->len,, v);
-end:
- move_pos(pos, int_class->len);
-}
+ ctf_align_pos(pos, integer_declaration->p.alignment);
+
+ if (!ctf_pos_access_ok(pos, integer_declaration->len))
+ return -EFAULT;
-void ctf_int_write(struct stream_pos *pos,
- const struct type_class_bitfield *int_class,
- int64_t v)
-{
- align_pos(pos, int_class->p.alignment);
if (pos->dummy)
goto end;
- if (int_class->byte_order == LITTLE_ENDIAN)
- ctf_bitfield_write_le(pos->base, pos->offset,
- int_class->len, v);
- else
- ctf_bitfield_write_be(pos->base, pos->offset,
- int_class->len, v);
+ if (!integer_declaration->signedness) {
+ if (integer_declaration->byte_order == LITTLE_ENDIAN)
+ bt_bitfield_write_le(pos->base, unsigned long,
+ pos->offset, integer_declaration->len,
+ integer_definition->value._unsigned);
+ else
+ bt_bitfield_write_be(pos->base, unsigned long,
+ pos->offset, integer_declaration->len,
+ integer_definition->value._unsigned);
+ } else {
+ if (integer_declaration->byte_order == LITTLE_ENDIAN)
+ bt_bitfield_write_le(pos->base, unsigned long,
+ pos->offset, integer_declaration->len,
+ integer_definition->value._signed);
+ else
+ bt_bitfield_write_be(pos->base, unsigned long,
+ pos->offset, integer_declaration->len,
+ integer_definition->value._signed);
+ }
end:
- move_pos(pos, int_class->len);
+ ctf_move_pos(pos, integer_declaration->len);
+ return 0;
}
projects / babeltrace.git / blobdiff