[lttng-ust.git] / liblttng-ust / lttng-context-vtid.c

/*
 * SPDX-License-Identifier: LGPL-2.1-only
 *
 * Copyright (C) 2009-2012 Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
 *
 * LTTng UST vtid context.
 */

#define _LGPL_SOURCE
#include <stddef.h>
#include <sys/types.h>
#include <unistd.h>
#include <lttng/ust-events.h>
#include <lttng/ust-tracer.h>
#include <lttng/ringbuffer-context.h>
#include <ust-tid.h>
#include <urcu/tls-compat.h>

#include "context-internal.h"
#include "lttng-tracer-core.h"

/*
 * We cache the result to ensure we don't trigger a system call for
 * each event.
 */
static DEFINE_URCU_TLS(pid_t, cached_vtid);

/*
 * Upon fork or clone, the TID assigned to our thread is not the same as
 * we kept in cache. Luckily, we are the only thread surviving in the
 * child process, so we can simply clear our cached version.
 */
void lttng_context_vtid_reset(void)
{
	CMM_STORE_SHARED(URCU_TLS(cached_vtid), 0);
}

static
size_t vtid_get_size(struct lttng_ust_ctx_field *field, size_t offset)
{
	size_t size = 0;

	size += lib_ring_buffer_align(offset, lttng_alignof(pid_t));
	size += sizeof(pid_t);
	return size;
}

static inline
pid_t wrapper_getvtid(void)
{
	pid_t vtid;

	vtid = CMM_LOAD_SHARED(URCU_TLS(cached_vtid));
	if (caa_unlikely(!vtid)) {
		vtid = lttng_gettid();
		CMM_STORE_SHARED(URCU_TLS(cached_vtid), vtid);
	}
	return vtid;
}

static
void vtid_record(struct lttng_ust_ctx_field *field,
		 struct lttng_ust_lib_ring_buffer_ctx *ctx,
		 struct lttng_channel *chan)
{
	pid_t vtid = wrapper_getvtid();

	lib_ring_buffer_align_ctx(ctx, lttng_alignof(vtid));
	chan->ops->event_write(ctx, &vtid, sizeof(vtid));
}

static
void vtid_get_value(struct lttng_ust_ctx_field *field,
		struct lttng_ust_ctx_value *value)
{
	value->u.s64 = wrapper_getvtid();
}

int lttng_add_vtid_to_ctx(struct lttng_ust_ctx **ctx)
{
	struct lttng_ust_ctx_field *field;
	struct lttng_ust_type_common *type;
	int ret;

	type = lttng_ust_create_type_integer(sizeof(pid_t) * CHAR_BIT,
			lttng_alignof(pid_t) * CHAR_BIT,
			lttng_is_signed_type(pid_t),
			BYTE_ORDER, 10);
	if (!type)
		return -ENOMEM;
	field = lttng_append_context(ctx);
	if (!field) {
		ret = -ENOMEM;
		goto error_context;
	}
	if (lttng_find_context(*ctx, "vtid")) {
		ret = -EEXIST;
		goto error_find_context;
	}
	field->event_field->name = strdup("vtid");
	if (!field->event_field->name) {
		ret = -ENOMEM;
		goto error_name;
	}
	field->event_field->type = type;
	field->get_size = vtid_get_size;
	field->record = vtid_record;
	field->get_value = vtid_get_value;
	lttng_context_update(*ctx);
	return 0;

error_name:
error_find_context:
	lttng_remove_context_field(ctx, field);
error_context:
	lttng_ust_destroy_type(type);
	return ret;
}

/*
 * Force a read (imply TLS fixup for dlopen) of TLS variables.
 */
void lttng_fixup_vtid_tls(void)
{
	asm volatile ("" : : "m" (URCU_TLS(cached_vtid)));
}
Commit	Line	Data
	1	/*
	2	* SPDX-License-Identifier: LGPL-2.1-only
	3	*
	4	* Copyright (C) 2009-2012 Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
	5	*
	6	* LTTng UST vtid context.
	7	*/
	8
	9	#define _LGPL_SOURCE
	10	#include <stddef.h>
	11	#include <sys/types.h>
	12	#include <unistd.h>
	13	#include <lttng/ust-events.h>
	14	#include <lttng/ust-tracer.h>
	15	#include <lttng/ringbuffer-context.h>
	16	#include <ust-tid.h>
	17	#include <urcu/tls-compat.h>
	18
	19	#include "context-internal.h"
	20	#include "lttng-tracer-core.h"
	21
	22	/*
	23	* We cache the result to ensure we don't trigger a system call for
	24	* each event.
	25	*/
	26	static DEFINE_URCU_TLS(pid_t, cached_vtid);
	27
	28	/*
	29	* Upon fork or clone, the TID assigned to our thread is not the same as
	30	* we kept in cache. Luckily, we are the only thread surviving in the
	31	* child process, so we can simply clear our cached version.
	32	*/
	33	void lttng_context_vtid_reset(void)
	34	{
	35	CMM_STORE_SHARED(URCU_TLS(cached_vtid), 0);
	36	}
	37
	38	static
	39	size_t vtid_get_size(struct lttng_ust_ctx_field *field, size_t offset)
	40	{
	41	size_t size = 0;
	42
	43	size += lib_ring_buffer_align(offset, lttng_alignof(pid_t));
	44	size += sizeof(pid_t);
	45	return size;
	46	}
	47
	48	static inline
	49	pid_t wrapper_getvtid(void)
	50	{
	51	pid_t vtid;
	52
	53	vtid = CMM_LOAD_SHARED(URCU_TLS(cached_vtid));
	54	if (caa_unlikely(!vtid)) {
	55	vtid = lttng_gettid();
	56	CMM_STORE_SHARED(URCU_TLS(cached_vtid), vtid);
	57	}
	58	return vtid;
	59	}
	60
	61	static
	62	void vtid_record(struct lttng_ust_ctx_field *field,
	63	struct lttng_ust_lib_ring_buffer_ctx *ctx,
	64	struct lttng_channel *chan)
	65	{
	66	pid_t vtid = wrapper_getvtid();
	67
	68	lib_ring_buffer_align_ctx(ctx, lttng_alignof(vtid));
	69	chan->ops->event_write(ctx, &vtid, sizeof(vtid));
	70	}
	71
	72	static
	73	void vtid_get_value(struct lttng_ust_ctx_field *field,
	74	struct lttng_ust_ctx_value *value)
	75	{
	76	value->u.s64 = wrapper_getvtid();
	77	}
	78
	79	int lttng_add_vtid_to_ctx(struct lttng_ust_ctx **ctx)
	80	{
	81	struct lttng_ust_ctx_field *field;
	82	struct lttng_ust_type_common *type;
	83	int ret;
	84
	85	type = lttng_ust_create_type_integer(sizeof(pid_t) * CHAR_BIT,
	86	lttng_alignof(pid_t) * CHAR_BIT,
	87	lttng_is_signed_type(pid_t),
	88	BYTE_ORDER, 10);
	89	if (!type)
	90	return -ENOMEM;
	91	field = lttng_append_context(ctx);
	92	if (!field) {
	93	ret = -ENOMEM;
	94	goto error_context;
	95	}
	96	if (lttng_find_context(*ctx, "vtid")) {
	97	ret = -EEXIST;
	98	goto error_find_context;
	99	}
	100	field->event_field->name = strdup("vtid");
	101	if (!field->event_field->name) {
	102	ret = -ENOMEM;
	103	goto error_name;
	104	}
	105	field->event_field->type = type;
	106	field->get_size = vtid_get_size;
	107	field->record = vtid_record;
	108	field->get_value = vtid_get_value;
	109	lttng_context_update(*ctx);
	110	return 0;
	111
	112	error_name:
	113	error_find_context:
	114	lttng_remove_context_field(ctx, field);
	115	error_context:
	116	lttng_ust_destroy_type(type);
	117	return ret;
	118	}
	119
	120	/*
	121	* Force a read (imply TLS fixup for dlopen) of TLS variables.
	122	*/
	123	void lttng_fixup_vtid_tls(void)
	124	{
	125	asm volatile ("" : : "m" (URCU_TLS(cached_vtid)));
	126	}