[babeltrace.git] / formats / ctf-text / types / integer.c

/*
 * Common Trace Format
 *
 * Integers read/write functions.
 *
 * Copyright 2010-2011 EfficiOS Inc. and Linux Foundation
 *
 * Author: Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
 *
 * 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:
 *
 * The above copyright notice and this permission notice shall be included in
 * all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
 * SOFTWARE.
 */

#include <babeltrace/ctf-text/types.h>
#include <stdio.h>
#include <inttypes.h>
#include <stdint.h>
#include <babeltrace/bitfield.h>

int ctf_text_integer_write(struct stream_pos *ppos, struct definition *definition)
{
	struct definition_integer *integer_definition =
		container_of(definition, struct definition_integer, p);
	const struct declaration_integer *integer_declaration =
		integer_definition->declaration;
	struct ctf_text_stream_pos *pos = ctf_text_pos(ppos);

	if (!print_field(definition))
		return 0;

	if (pos->dummy)
		return 0;

	if (pos->field_nr++ != 0)
		fprintf(pos->fp, ",");
	fprintf(pos->fp, " ");
	if (pos->print_names)
		fprintf(pos->fp, "%s = ",
			rem_(g_quark_to_string(definition->name)));

	if (pos->string
	    && (integer_declaration->encoding == CTF_STRING_ASCII
	      || integer_declaration->encoding == CTF_STRING_UTF8)) {

		if (!integer_declaration->signedness) {
			g_string_append_c(pos->string,
				(int) integer_definition->value._unsigned);
		} else {
			g_string_append_c(pos->string,
				(int) integer_definition->value._signed);
		}
		return 0;
	}

	switch (integer_declaration->base) {
	case 0:	/* default */
	case 10:
		if (!integer_declaration->signedness) {
			fprintf(pos->fp, "%" PRIu64,
				integer_definition->value._unsigned);
		} else {
			fprintf(pos->fp, "%" PRId64,
				integer_definition->value._signed);
		}
		break;
	case 2:
	{
		int bitnr;
		uint64_t v;

		if (!integer_declaration->signedness)
			v = integer_definition->value._unsigned;
		else
			v = (uint64_t) integer_definition->value._signed;

		fprintf(pos->fp, "0b");
		v = _bt_piecewise_lshift(v, 64 - integer_declaration->len);
		for (bitnr = 0; bitnr < integer_declaration->len; bitnr++) {
			fprintf(pos->fp, "%u", (v & (1ULL << 63)) ? 1 : 0);
			v = _bt_piecewise_lshift(v, 1);
		}
		break;
	}
	case 8:
	{
		uint64_t v;

		if (!integer_declaration->signedness)
			v = integer_definition->value._unsigned;
		else
			v = (uint64_t) integer_definition->value._signed;

		fprintf(pos->fp, "0%" PRIo64, v);
		break;
	}
	case 16:
	{
		uint64_t v;

		if (!integer_declaration->signedness)
			v = integer_definition->value._unsigned;
		else
			v = (uint64_t) integer_definition->value._signed;

		fprintf(pos->fp, "0x%" PRIX64, v);
		break;
	}
	default:
		return -EINVAL;
	}

	return 0;
}
Commit	Line	Data
	1	/*
	2	* Common Trace Format
	3	*
	4	* Integers read/write functions.
	5	*
	6	* Copyright 2010-2011 EfficiOS Inc. and Linux Foundation
	7	*
	8	* Author: Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
	9	*
	10	* Permission is hereby granted, free of charge, to any person obtaining a copy
	11	* of this software and associated documentation files (the "Software"), to deal
	12	* in the Software without restriction, including without limitation the rights
	13	* to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
	14	* copies of the Software, and to permit persons to whom the Software is
	15	* furnished to do so, subject to the following conditions:
	16	*
	17	* The above copyright notice and this permission notice shall be included in
	18	* all copies or substantial portions of the Software.
	19	*
	20	* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
	21	* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
	22	* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
	23	* AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
	24	* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
	25	* OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
	26	* SOFTWARE.
	27	*/
	28
	29	#include <babeltrace/ctf-text/types.h>
	30	#include <stdio.h>
	31	#include <inttypes.h>
	32	#include <stdint.h>
	33	#include <babeltrace/bitfield.h>
	34
	35	int ctf_text_integer_write(struct stream_pos ppos, struct definition definition)
	36	{
	37	struct definition_integer *integer_definition =
	38	container_of(definition, struct definition_integer, p);
	39	const struct declaration_integer *integer_declaration =
	40	integer_definition->declaration;
	41	struct ctf_text_stream_pos *pos = ctf_text_pos(ppos);
	42
	43	if (!print_field(definition))
	44	return 0;
	45
	46	if (pos->dummy)
	47	return 0;
	48
	49	if (pos->field_nr++ != 0)
	50	fprintf(pos->fp, ",");
	51	fprintf(pos->fp, " ");
	52	if (pos->print_names)
	53	fprintf(pos->fp, "%s = ",
	54	rem_(g_quark_to_string(definition->name)));
	55
	56	if (pos->string
	57	&& (integer_declaration->encoding == CTF_STRING_ASCII
	58	\|\| integer_declaration->encoding == CTF_STRING_UTF8)) {
	59
	60	if (!integer_declaration->signedness) {
	61	g_string_append_c(pos->string,
	62	(int) integer_definition->value._unsigned);
	63	} else {
	64	g_string_append_c(pos->string,
	65	(int) integer_definition->value._signed);
	66	}
	67	return 0;
	68	}
	69
	70	switch (integer_declaration->base) {
	71	case 0: /* default */
	72	case 10:
	73	if (!integer_declaration->signedness) {
	74	fprintf(pos->fp, "%" PRIu64,
	75	integer_definition->value._unsigned);
	76	} else {
	77	fprintf(pos->fp, "%" PRId64,
	78	integer_definition->value._signed);
	79	}
	80	break;
	81	case 2:
	82	{
	83	int bitnr;
	84	uint64_t v;
	85
	86	if (!integer_declaration->signedness)
	87	v = integer_definition->value._unsigned;
	88	else
	89	v = (uint64_t) integer_definition->value._signed;
	90
	91	fprintf(pos->fp, "0b");
	92	v = _bt_piecewise_lshift(v, 64 - integer_declaration->len);
	93	for (bitnr = 0; bitnr < integer_declaration->len; bitnr++) {
	94	fprintf(pos->fp, "%u", (v & (1ULL << 63)) ? 1 : 0);
	95	v = _bt_piecewise_lshift(v, 1);
	96	}
	97	break;
	98	}
	99	case 8:
	100	{
	101	uint64_t v;
	102
	103	if (!integer_declaration->signedness)
	104	v = integer_definition->value._unsigned;
	105	else
	106	v = (uint64_t) integer_definition->value._signed;
	107
	108	fprintf(pos->fp, "0%" PRIo64, v);
	109	break;
	110	}
	111	case 16:
	112	{
	113	uint64_t v;
	114
	115	if (!integer_declaration->signedness)
	116	v = integer_definition->value._unsigned;
	117	else
	118	v = (uint64_t) integer_definition->value._signed;
	119
	120	fprintf(pos->fp, "0x%" PRIX64, v);
	121	break;
	122	}
	123	default:
	124	return -EINVAL;
	125	}
	126
	127	return 0;
	128	}