[lttng-tools.git] / src / common / tracker.cpp

/*
 * Copyright (C) 2019 Jonathan Rajotte <jonathan.rajotte-julien@efficios.com>
 * Copyright (C) 2020 Jérémie Galarneau <jeremie.galarneau@efficios.com>
 *
 * SPDX-License-Identifier: LGPL-2.1-only
 *
 */

#include <lttng/domain.h>
#include <lttng/lttng-error.h>
#include <lttng/tracker.h>

#include <common/dynamic-array.h>
#include <common/error.h>
#include <common/hashtable/hashtable.h>
#include <common/hashtable/utils.h>
#include <common/tracker.h>

#include <stdbool.h>

#include <type_traits>

struct process_attr_tracker_values_comm_header {
	uint32_t count;
};

struct process_attr_tracker_value_comm {
	/* enum lttng_process_attr_value_type */
	int32_t type;
	union {
		struct process_attr_integral_value_comm integral;
		/* Includes the '\0' terminator. */
		uint32_t name_len;
	} value;
};

#define GET_INTEGRAL_COMM_VALUE(value_ptr, as_type)              \
	((as_type)(std::is_signed<as_type>::value ? (value_ptr)->u._signed : \
					(value_ptr)->u._unsigned))

#define SET_INTEGRAL_COMM_VALUE(comm_value, val)                         \
	if (std::is_signed<typeof(val)>::value) {                                    \
		(comm_value)->u._signed =                                  \
				(typeof((comm_value)->u._signed)) val;   \
	} else {                                                           \
		(comm_value)->u._unsigned =                                \
				(typeof((comm_value)->u._unsigned)) val; \
	}

static inline bool is_virtual_process_attr(enum lttng_process_attr process_attr)
{
	return process_attr == LTTNG_PROCESS_ATTR_VIRTUAL_PROCESS_ID ||
	       process_attr == LTTNG_PROCESS_ATTR_VIRTUAL_USER_ID ||
	       process_attr == LTTNG_PROCESS_ATTR_VIRTUAL_GROUP_ID;
}

static inline bool is_value_type_name(
		enum lttng_process_attr_value_type value_type)
{
	return value_type == LTTNG_PROCESS_ATTR_VALUE_TYPE_USER_NAME ||
	       value_type == LTTNG_PROCESS_ATTR_VALUE_TYPE_GROUP_NAME;
}

enum lttng_error_code process_attr_value_from_comm(
		enum lttng_domain_type domain,
		enum lttng_process_attr process_attr,
		enum lttng_process_attr_value_type value_type,
		const struct process_attr_integral_value_comm *integral_value,
		const struct lttng_buffer_view *value_view,
		struct process_attr_value **_value)
{
	char *name = NULL;
	enum lttng_error_code ret = LTTNG_OK;
	struct process_attr_value *value = (process_attr_value *) zmalloc(sizeof(*value));

	if (!value) {
		ret = LTTNG_ERR_NOMEM;
		goto error;
	}

	if (value_view && value_view->size > 0) {
		if (value_view->data[value_view->size - 1] != '\0') {
			ret = LTTNG_ERR_INVALID;
			goto error;
		}
		name = strdup(value_view->data);
		if (!name) {
			ret = LTTNG_ERR_NOMEM;
			goto error;
		}
	}

	if (domain != LTTNG_DOMAIN_UST && domain != LTTNG_DOMAIN_KERNEL) {
		ERR("Only the user space and kernel space domains may be specified to configure process attribute trackers");
		ret = LTTNG_ERR_UNSUPPORTED_DOMAIN;
		goto error;
	}

	if (!is_virtual_process_attr(process_attr) &&
			domain != LTTNG_DOMAIN_KERNEL) {
		ERR("Non-virtual process attributes can only be used in the kernel domain");
		ret = LTTNG_ERR_UNSUPPORTED_DOMAIN;
		goto error;
	}

	/* Only expect a payload for name value types. */
	if (is_value_type_name(value_type) &&
			(!value_view || value_view->size == 0)) {
		ret = LTTNG_ERR_INVALID_PROTOCOL;
		goto error;
	} else if (!is_value_type_name(value_type) && value_view &&
			value_view->size != 0) {
		ret = LTTNG_ERR_INVALID_PROTOCOL;
		goto error;
	}

	value->type = value_type;
	switch (process_attr) {
	case LTTNG_PROCESS_ATTR_PROCESS_ID:
	case LTTNG_PROCESS_ATTR_VIRTUAL_PROCESS_ID:
		if (value_type != LTTNG_PROCESS_ATTR_VALUE_TYPE_PID) {
			ERR("Invalid value type used for process ID process attribute");
			ret = LTTNG_ERR_INVALID;
			goto error;
		}
		value->value.pid =
				GET_INTEGRAL_COMM_VALUE(integral_value, pid_t);
		break;
	case LTTNG_PROCESS_ATTR_USER_ID:
	case LTTNG_PROCESS_ATTR_VIRTUAL_USER_ID:
		switch (value_type) {
		case LTTNG_PROCESS_ATTR_VALUE_TYPE_UID:
			value->value.uid = GET_INTEGRAL_COMM_VALUE(
					integral_value, uid_t);
			break;
		case LTTNG_PROCESS_ATTR_VALUE_TYPE_USER_NAME:
			if (!name) {
				ret = LTTNG_ERR_INVALID;
				goto error;
			}

			value->value.user_name = name;
			name = NULL;
			break;
		default:
			ERR("Invalid value type used for user ID process attribute");
			ret = LTTNG_ERR_INVALID;
			goto error;
		}
		break;
	case LTTNG_PROCESS_ATTR_GROUP_ID:
	case LTTNG_PROCESS_ATTR_VIRTUAL_GROUP_ID:
		switch (value_type) {
		case LTTNG_PROCESS_ATTR_VALUE_TYPE_GID:
			value->value.gid = GET_INTEGRAL_COMM_VALUE(
					integral_value, gid_t);
			break;
		case LTTNG_PROCESS_ATTR_VALUE_TYPE_GROUP_NAME:
			if (!name) {
				ret = LTTNG_ERR_INVALID;
				goto error;
			}

			value->value.group_name = name;
			name = NULL;
			break;
		default:
			ERR("Invalid value type used for group ID process attribute");
			ret = LTTNG_ERR_INVALID;
			goto error;
		}
		break;
	default:
		ret = LTTNG_ERR_INVALID_PROTOCOL;
		goto error;
	}

	*_value = value;
	value = NULL;
	free(name);
	return LTTNG_OK;
error:
	free(name);
	process_attr_value_destroy(value);
	return ret;
}

const char *lttng_process_attr_to_string(enum lttng_process_attr process_attr)
{
	switch (process_attr) {
	case LTTNG_PROCESS_ATTR_PROCESS_ID:
		return "process ID";
	case LTTNG_PROCESS_ATTR_VIRTUAL_PROCESS_ID:
		return "virtual process ID";
	case LTTNG_PROCESS_ATTR_USER_ID:
		return "user ID";
	case LTTNG_PROCESS_ATTR_VIRTUAL_USER_ID:
		return "virtual user ID";
	case LTTNG_PROCESS_ATTR_GROUP_ID:
		return "group ID";
	case LTTNG_PROCESS_ATTR_VIRTUAL_GROUP_ID:
		return "virtual group ID";
	default:
		return "unknown process attribute";
	}
}

static void process_attr_tracker_value_destructor(void *ptr)
{
	struct process_attr_value *value = (typeof(value)) ptr;

	process_attr_value_destroy(value);
}

struct lttng_process_attr_values *lttng_process_attr_values_create(void)
{
	struct lttng_process_attr_values *values = (lttng_process_attr_values *) zmalloc(sizeof(*values));

	if (!values) {
		goto end;
	}

	lttng_dynamic_pointer_array_init(
			&values->array, process_attr_tracker_value_destructor);
end:
	return values;
}

unsigned int _lttng_process_attr_values_get_count(
		const struct lttng_process_attr_values *values)
{
	return (unsigned int) lttng_dynamic_pointer_array_get_count(
			&values->array);
}

const struct process_attr_value *lttng_process_attr_tracker_values_get_at_index(
		const struct lttng_process_attr_values *values,
		unsigned int index)
{
	return (process_attr_value *) lttng_dynamic_pointer_array_get_pointer(&values->array, index);
}

static
int process_attr_tracker_value_serialize(const struct process_attr_value *value,
		struct lttng_dynamic_buffer *buffer)
{
	int ret;
	struct process_attr_tracker_value_comm value_comm = {
			.type = (int32_t) value->type,
	};
	const char *name = NULL;

	switch (value->type) {
	case LTTNG_PROCESS_ATTR_VALUE_TYPE_PID:
		SET_INTEGRAL_COMM_VALUE(
				&value_comm.value.integral, value->value.pid);
		break;
	case LTTNG_PROCESS_ATTR_VALUE_TYPE_UID:
		SET_INTEGRAL_COMM_VALUE(
				&value_comm.value.integral, value->value.uid);
		break;
	case LTTNG_PROCESS_ATTR_VALUE_TYPE_GID:
		SET_INTEGRAL_COMM_VALUE(
				&value_comm.value.integral, value->value.gid);
		break;
	case LTTNG_PROCESS_ATTR_VALUE_TYPE_USER_NAME:
		name = value->value.user_name;
		break;
	case LTTNG_PROCESS_ATTR_VALUE_TYPE_GROUP_NAME:
		name = value->value.group_name;
		break;
	default:
		abort();
	}

	if (name) {
		value_comm.value.name_len = strlen(name) + 1;
	}

	ret = lttng_dynamic_buffer_append(
			buffer, &value_comm, sizeof(value_comm));
	if (ret) {
		goto end;
	}

	if (name) {
		ret = lttng_dynamic_buffer_append(
				buffer, name, value_comm.value.name_len);
	}
end:
	return ret;
}

int lttng_process_attr_values_serialize(
		const struct lttng_process_attr_values *values,
		struct lttng_dynamic_buffer *buffer)
{
	int ret;
	unsigned int count, i;
	struct process_attr_tracker_values_comm_header header = {};

	count = _lttng_process_attr_values_get_count(values);
	header.count = (uint32_t) count;

	ret = lttng_dynamic_buffer_append(buffer, &header, sizeof(header));
	if (ret) {
		goto end;
	}

	for (i = 0; i < count; i++) {
		const struct process_attr_value *value =
				lttng_process_attr_tracker_values_get_at_index(
						values, i);

		ret = process_attr_tracker_value_serialize(value, buffer);
		if (ret) {
			goto end;
		}
	}
end:
	return ret;
}

ssize_t lttng_process_attr_values_create_from_buffer(
		enum lttng_domain_type domain,
		enum lttng_process_attr process_attr,
		const struct lttng_buffer_view *buffer_view,
		struct lttng_process_attr_values **_values)
{
	ssize_t offset;
	unsigned int i;
	struct lttng_process_attr_values *values;
	struct lttng_buffer_view header_view;
	const struct process_attr_tracker_values_comm_header *header;

	values = lttng_process_attr_values_create();
	if (!values) {
		goto error;
	}

	header_view = lttng_buffer_view_from_view(
			buffer_view, 0, sizeof(*header));
	if (!lttng_buffer_view_is_valid(&header_view)) {
		goto error;
	}

	offset = header_view.size;
	header = (typeof(header)) header_view.data;

	/*
	 * Check that the number of values is not absurdly large with respect to
	 * the received buffer's size.
	 */
	if (buffer_view->size <
			header->count * sizeof(struct process_attr_tracker_value_comm)) {
		goto error;
	}
	for (i = 0; i < (unsigned int) header->count; i++) {
		int ret;
		enum lttng_error_code ret_code;
		const struct process_attr_tracker_value_comm *value_comm;
		struct process_attr_value *value;
		enum lttng_process_attr_value_type type;
		struct lttng_buffer_view value_view;
		struct lttng_buffer_view value_name_view = {};

		value_view = lttng_buffer_view_from_view(
				buffer_view, offset, sizeof(*value_comm));
		if (!lttng_buffer_view_is_valid(&value_view)) {
			goto error;
		}

		offset += value_view.size;
		value_comm = (typeof(value_comm)) value_view.data;
		type = (typeof(type)) value_comm->type;

		if (is_value_type_name(type)) {
			value_name_view = lttng_buffer_view_from_view(
					buffer_view, offset,
					value_comm->value.name_len);
			if (!lttng_buffer_view_is_valid(&value_name_view)) {
				goto error;
			}

			offset += value_name_view.size;
		}

		ret_code = process_attr_value_from_comm(domain, process_attr,
				type, &value_comm->value.integral,
				&value_name_view, &value);
		if (ret_code != LTTNG_OK) {
			goto error;
		}

		ret = lttng_dynamic_pointer_array_add_pointer(
				&values->array, value);
		if (ret) {
			process_attr_value_destroy(value);
			goto error;
		}
	}

	*_values = values;
	return offset;
error:
	lttng_process_attr_values_destroy(values);
	return -1;
}

void lttng_process_attr_values_destroy(struct lttng_process_attr_values *values)
{
	if (!values) {
		return;
	}
	lttng_dynamic_pointer_array_reset(&values->array);
	free(values);
}

struct process_attr_value *process_attr_value_copy(
		const struct process_attr_value *value)
{
	struct process_attr_value *new_value = NULL;

	if (!value) {
		goto end;
	}

	new_value = (process_attr_value *) zmalloc(sizeof(*new_value));
	if (!new_value) {
		goto end;
	}
	if (is_value_type_name(value->type)) {
		const char *src =
				value->type == LTTNG_PROCESS_ATTR_VALUE_TYPE_USER_NAME ?
						value->value.user_name :
						value->value.group_name;
		char **dst = value->type == LTTNG_PROCESS_ATTR_VALUE_TYPE_USER_NAME ?
					     &new_value->value.user_name :
					     &new_value->value.group_name;

		new_value->type = value->type;
		*dst = strdup(src);
		if (!*dst) {
			goto error;
		}
	} else {
		*new_value = *value;
	}
end:
	return new_value;
error:
	free(new_value);
	return NULL;
}

unsigned long process_attr_value_hash(const struct process_attr_value *a)
{
	unsigned long hash = hash_key_ulong((void *) a->type, lttng_ht_seed);

	switch (a->type) {
	case LTTNG_PROCESS_ATTR_VALUE_TYPE_PID:
		hash ^= hash_key_ulong((void *) (unsigned long) a->value.pid,
				lttng_ht_seed);
		break;
	case LTTNG_PROCESS_ATTR_VALUE_TYPE_UID:
		hash ^= hash_key_ulong((void *) (unsigned long) a->value.uid,
				lttng_ht_seed);
		break;
	case LTTNG_PROCESS_ATTR_VALUE_TYPE_GID:
		hash ^= hash_key_ulong((void *) (unsigned long) a->value.gid,
				lttng_ht_seed);
		break;
	case LTTNG_PROCESS_ATTR_VALUE_TYPE_USER_NAME:
		hash ^= hash_key_str(a->value.user_name, lttng_ht_seed);
		break;
	case LTTNG_PROCESS_ATTR_VALUE_TYPE_GROUP_NAME:
		hash ^= hash_key_str(a->value.group_name, lttng_ht_seed);
		break;
	default:
		abort();
	}

	return hash;
}

bool process_attr_tracker_value_equal(const struct process_attr_value *a,
		const struct process_attr_value *b)
{
	if (a->type != b->type) {
		return false;
	}
	switch (a->type) {
	case LTTNG_PROCESS_ATTR_VALUE_TYPE_PID:
		return a->value.pid == b->value.pid;
	case LTTNG_PROCESS_ATTR_VALUE_TYPE_UID:
		return a->value.uid == b->value.uid;
	case LTTNG_PROCESS_ATTR_VALUE_TYPE_GID:
		return a->value.gid == b->value.gid;
	case LTTNG_PROCESS_ATTR_VALUE_TYPE_USER_NAME:
		return !strcmp(a->value.user_name, b->value.user_name);
	case LTTNG_PROCESS_ATTR_VALUE_TYPE_GROUP_NAME:
		return !strcmp(a->value.group_name, b->value.group_name);
	default:
		abort();
	}
}

void process_attr_value_destroy(struct process_attr_value *value)
{
	if (!value) {
		return;
	}
	if (is_value_type_name(value->type)) {
		free(value->type == LTTNG_PROCESS_ATTR_VALUE_TYPE_USER_NAME ?
						value->value.user_name :
						value->value.group_name);
	}
	free(value);
}
Commit	Line	Data
2d97a006	1	/*
4942c256	2	* Copyright (C) 2019 Jonathan Rajotte <jonathan.rajotte-julien@efficios.com>
159b042f	3	* Copyright (C) 2020 Jérémie Galarneau <jeremie.galarneau@efficios.com>
2d97a006	4	*
ab5be9fa	5	* SPDX-License-Identifier: LGPL-2.1-only
2d97a006	6	*
2d97a006 JR	7	*/
2d97a006 JR	8
159b042f JG	9	#include <lttng/domain.h>
	10	#include <lttng/lttng-error.h>
	11	#include <lttng/tracker.h>
2d97a006	12
159b042f JG	13	#include <common/dynamic-array.h>
	14	#include <common/error.h>
	15	#include <common/hashtable/hashtable.h>
	16	#include <common/hashtable/utils.h>
	17	#include <common/tracker.h>
	18
	19	#include <stdbool.h>
	20
c10f9cdd MJ	21	#include <type_traits>
c10f9cdd MJ	22
159b042f JG	23	struct process_attr_tracker_values_comm_header {
	24	uint32_t count;
	25	};
	26
	27	struct process_attr_tracker_value_comm {
	28	/* enum lttng_process_attr_value_type */
	29	int32_t type;
	30	union {
	31	struct process_attr_integral_value_comm integral;
	32	/* Includes the '\0' terminator. */
	33	uint32_t name_len;
	34	} value;
	35	};
	36
	37	#define GET_INTEGRAL_COMM_VALUE(value_ptr, as_type) \
c10f9cdd	38	((as_type)(std::is_signed<as_type>::value ? (value_ptr)->u._signed : \
159b042f JG	39	(value_ptr)->u._unsigned))
159b042f JG	40
c10f9cdd MJ	41	#define SET_INTEGRAL_COMM_VALUE(comm_value, val) \
c10f9cdd MJ	42	if (std::is_signed<typeof(val)>::value) { \
159b042f	43	(comm_value)->u._signed = \
c10f9cdd	44	(typeof((comm_value)->u._signed)) val; \
159b042f JG	45	} else { \
159b042f JG	46	(comm_value)->u._unsigned = \
c10f9cdd	47	(typeof((comm_value)->u._unsigned)) val; \
2d97a006 JR	48	}
2d97a006 JR	49
159b042f JG	50	static inline bool is_virtual_process_attr(enum lttng_process_attr process_attr)
	51	{
	52	return process_attr == LTTNG_PROCESS_ATTR_VIRTUAL_PROCESS_ID \|\|
	53	process_attr == LTTNG_PROCESS_ATTR_VIRTUAL_USER_ID \|\|
	54	process_attr == LTTNG_PROCESS_ATTR_VIRTUAL_GROUP_ID;
2d97a006 JR	55	}
2d97a006 JR	56
159b042f JG	57	static inline bool is_value_type_name(
159b042f JG	58	enum lttng_process_attr_value_type value_type)
2d97a006	59	{
159b042f JG	60	return value_type == LTTNG_PROCESS_ATTR_VALUE_TYPE_USER_NAME \|\|
159b042f JG	61	value_type == LTTNG_PROCESS_ATTR_VALUE_TYPE_GROUP_NAME;
2d97a006 JR	62	}
2d97a006 JR	63
159b042f JG	64	enum lttng_error_code process_attr_value_from_comm(
	65	enum lttng_domain_type domain,
	66	enum lttng_process_attr process_attr,
	67	enum lttng_process_attr_value_type value_type,
	68	const struct process_attr_integral_value_comm *integral_value,
	69	const struct lttng_buffer_view *value_view,
	70	struct process_attr_value **_value)
2d97a006	71	{
159b042f JG	72	char *name = NULL;
159b042f JG	73	enum lttng_error_code ret = LTTNG_OK;
a6bc4ca9	74	struct process_attr_value value = (process_attr_value ) zmalloc(sizeof(*value));
2d97a006	75
159b042f JG	76	if (!value) {
159b042f JG	77	ret = LTTNG_ERR_NOMEM;
2d97a006 JR	78	goto error;
	79	}
	80
159b042f JG	81	if (value_view && value_view->size > 0) {
	82	if (value_view->data[value_view->size - 1] != '\0') {
	83	ret = LTTNG_ERR_INVALID;
	84	goto error;
	85	}
	86	name = strdup(value_view->data);
	87	if (!name) {
	88	ret = LTTNG_ERR_NOMEM;
74675e31	89	goto error;
159b042f JG	90	}
159b042f JG	91	}
2d97a006	92
159b042f JG	93	if (domain != LTTNG_DOMAIN_UST && domain != LTTNG_DOMAIN_KERNEL) {
	94	ERR("Only the user space and kernel space domains may be specified to configure process attribute trackers");
	95	ret = LTTNG_ERR_UNSUPPORTED_DOMAIN;
	96	goto error;
	97	}
2d97a006	98
159b042f JG	99	if (!is_virtual_process_attr(process_attr) &&
	100	domain != LTTNG_DOMAIN_KERNEL) {
	101	ERR("Non-virtual process attributes can only be used in the kernel domain");
	102	ret = LTTNG_ERR_UNSUPPORTED_DOMAIN;
	103	goto error;
	104	}
2d97a006	105
159b042f	106	/* Only expect a payload for name value types. */
b78dab17 JG	107	if (is_value_type_name(value_type) &&
b78dab17 JG	108	(!value_view \|\| value_view->size == 0)) {
159b042f JG	109	ret = LTTNG_ERR_INVALID_PROTOCOL;
159b042f JG	110	goto error;
1ad5cb59 JG	111	} else if (!is_value_type_name(value_type) && value_view &&
1ad5cb59 JG	112	value_view->size != 0) {
159b042f JG	113	ret = LTTNG_ERR_INVALID_PROTOCOL;
159b042f JG	114	goto error;
2d97a006 JR	115	}
2d97a006 JR	116
159b042f JG	117	value->type = value_type;
	118	switch (process_attr) {
	119	case LTTNG_PROCESS_ATTR_PROCESS_ID:
	120	case LTTNG_PROCESS_ATTR_VIRTUAL_PROCESS_ID:
	121	if (value_type != LTTNG_PROCESS_ATTR_VALUE_TYPE_PID) {
	122	ERR("Invalid value type used for process ID process attribute");
	123	ret = LTTNG_ERR_INVALID;
	124	goto error;
	125	}
	126	value->value.pid =
	127	GET_INTEGRAL_COMM_VALUE(integral_value, pid_t);
	128	break;
	129	case LTTNG_PROCESS_ATTR_USER_ID:
	130	case LTTNG_PROCESS_ATTR_VIRTUAL_USER_ID:
	131	switch (value_type) {
	132	case LTTNG_PROCESS_ATTR_VALUE_TYPE_UID:
	133	value->value.uid = GET_INTEGRAL_COMM_VALUE(
	134	integral_value, uid_t);
	135	break;
	136	case LTTNG_PROCESS_ATTR_VALUE_TYPE_USER_NAME:
	137	if (!name) {
	138	ret = LTTNG_ERR_INVALID;
	139	goto error;
	140	}
	141
	142	value->value.user_name = name;
	143	name = NULL;
	144	break;
	145	default:
	146	ERR("Invalid value type used for user ID process attribute");
	147	ret = LTTNG_ERR_INVALID;
	148	goto error;
	149	}
	150	break;
	151	case LTTNG_PROCESS_ATTR_GROUP_ID:
	152	case LTTNG_PROCESS_ATTR_VIRTUAL_GROUP_ID:
	153	switch (value_type) {
	154	case LTTNG_PROCESS_ATTR_VALUE_TYPE_GID:
	155	value->value.gid = GET_INTEGRAL_COMM_VALUE(
	156	integral_value, gid_t);
	157	break;
	158	case LTTNG_PROCESS_ATTR_VALUE_TYPE_GROUP_NAME:
	159	if (!name) {
	160	ret = LTTNG_ERR_INVALID;
	161	goto error;
	162	}
	163
	164	value->value.group_name = name;
	165	name = NULL;
	166	break;
	167	default:
	168	ERR("Invalid value type used for group ID process attribute");
	169	ret = LTTNG_ERR_INVALID;
	170	goto error;
	171	}
	172	break;
	173	default:
	174	ret = LTTNG_ERR_INVALID_PROTOCOL;
	175	goto error;
2d97a006 JR	176	}
2d97a006 JR	177
159b042f JG	178	*_value = value;
159b042f JG	179	value = NULL;
d4e37173	180	free(name);
159b042f JG	181	return LTTNG_OK;
	182	error:
	183	free(name);
	184	process_attr_value_destroy(value);
	185	return ret;
2d97a006 JR	186	}
2d97a006 JR	187
159b042f	188	const char *lttng_process_attr_to_string(enum lttng_process_attr process_attr)
2d97a006	189	{
159b042f JG	190	switch (process_attr) {
	191	case LTTNG_PROCESS_ATTR_PROCESS_ID:
	192	return "process ID";
	193	case LTTNG_PROCESS_ATTR_VIRTUAL_PROCESS_ID:
	194	return "virtual process ID";
	195	case LTTNG_PROCESS_ATTR_USER_ID:
	196	return "user ID";
	197	case LTTNG_PROCESS_ATTR_VIRTUAL_USER_ID:
	198	return "virtual user ID";
	199	case LTTNG_PROCESS_ATTR_GROUP_ID:
	200	return "group ID";
	201	case LTTNG_PROCESS_ATTR_VIRTUAL_GROUP_ID:
	202	return "virtual group ID";
	203	default:
	204	return "unknown process attribute";
2d97a006	205	}
2d97a006 JR	206	}
2d97a006 JR	207
159b042f	208	static void process_attr_tracker_value_destructor(void *ptr)
2d97a006	209	{
159b042f JG	210	struct process_attr_value *value = (typeof(value)) ptr;
	211
	212	process_attr_value_destroy(value);
2d97a006 JR	213	}
2d97a006 JR	214
159b042f	215	struct lttng_process_attr_values *lttng_process_attr_values_create(void)
2d97a006	216	{
a6bc4ca9	217	struct lttng_process_attr_values values = (lttng_process_attr_values ) zmalloc(sizeof(*values));
2d97a006	218
159b042f JG	219	if (!values) {
159b042f JG	220	goto end;
2d97a006 JR	221	}
2d97a006 JR	222
159b042f JG	223	lttng_dynamic_pointer_array_init(
	224	&values->array, process_attr_tracker_value_destructor);
	225	end:
	226	return values;
2d97a006 JR	227	}
2d97a006 JR	228
159b042f JG	229	unsigned int _lttng_process_attr_values_get_count(
159b042f JG	230	const struct lttng_process_attr_values *values)
2d97a006	231	{
159b042f JG	232	return (unsigned int) lttng_dynamic_pointer_array_get_count(
159b042f JG	233	&values->array);
2d97a006 JR	234	}
2d97a006 JR	235
159b042f JG	236	const struct process_attr_value *lttng_process_attr_tracker_values_get_at_index(
	237	const struct lttng_process_attr_values *values,
	238	unsigned int index)
2d97a006	239	{
a6bc4ca9	240	return (process_attr_value *) lttng_dynamic_pointer_array_get_pointer(&values->array, index);
159b042f	241	}
2d97a006	242
159b042f JG	243	static
	244	int process_attr_tracker_value_serialize(const struct process_attr_value *value,
	245	struct lttng_dynamic_buffer *buffer)
	246	{
	247	int ret;
	248	struct process_attr_tracker_value_comm value_comm = {
	249	.type = (int32_t) value->type,
	250	};
	251	const char *name = NULL;
	252
	253	switch (value->type) {
	254	case LTTNG_PROCESS_ATTR_VALUE_TYPE_PID:
	255	SET_INTEGRAL_COMM_VALUE(
	256	&value_comm.value.integral, value->value.pid);
2d97a006	257	break;
159b042f JG	258	case LTTNG_PROCESS_ATTR_VALUE_TYPE_UID:
	259	SET_INTEGRAL_COMM_VALUE(
	260	&value_comm.value.integral, value->value.uid);
2d97a006	261	break;
159b042f JG	262	case LTTNG_PROCESS_ATTR_VALUE_TYPE_GID:
	263	SET_INTEGRAL_COMM_VALUE(
	264	&value_comm.value.integral, value->value.gid);
2d97a006	265	break;
159b042f JG	266	case LTTNG_PROCESS_ATTR_VALUE_TYPE_USER_NAME:
159b042f JG	267	name = value->value.user_name;
2d97a006	268	break;
159b042f JG	269	case LTTNG_PROCESS_ATTR_VALUE_TYPE_GROUP_NAME:
	270	name = value->value.group_name;
	271	break;
	272	default:
	273	abort();
2d97a006 JR	274	}
2d97a006 JR	275
159b042f JG	276	if (name) {
159b042f JG	277	value_comm.value.name_len = strlen(name) + 1;
a7a533cd	278	}
159b042f JG	279
	280	ret = lttng_dynamic_buffer_append(
	281	buffer, &value_comm, sizeof(value_comm));
	282	if (ret) {
	283	goto end;
	284	}
	285
	286	if (name) {
	287	ret = lttng_dynamic_buffer_append(
	288	buffer, name, value_comm.value.name_len);
	289	}
	290	end:
a7a533cd JR	291	return ret;
	292	}
	293
159b042f JG	294	int lttng_process_attr_values_serialize(
	295	const struct lttng_process_attr_values *values,
	296	struct lttng_dynamic_buffer *buffer)
a7a533cd JR	297	{
a7a533cd JR	298	int ret;
159b042f JG	299	unsigned int count, i;
159b042f JG	300	struct process_attr_tracker_values_comm_header header = {};
a7a533cd	301
159b042f JG	302	count = _lttng_process_attr_values_get_count(values);
159b042f JG	303	header.count = (uint32_t) count;
a7a533cd	304
159b042f	305	ret = lttng_dynamic_buffer_append(buffer, &header, sizeof(header));
a7a533cd	306	if (ret) {
159b042f	307	goto end;
2d97a006 JR	308	}
2d97a006 JR	309
159b042f JG	310	for (i = 0; i < count; i++) {
	311	const struct process_attr_value *value =
	312	lttng_process_attr_tracker_values_get_at_index(
	313	values, i);
2d97a006	314
159b042f JG	315	ret = process_attr_tracker_value_serialize(value, buffer);
	316	if (ret) {
	317	goto end;
	318	}
2d97a006	319	}
159b042f JG	320	end:
159b042f JG	321	return ret;
2d97a006	322	}
a7a533cd	323
159b042f JG	324	ssize_t lttng_process_attr_values_create_from_buffer(
	325	enum lttng_domain_type domain,
	326	enum lttng_process_attr process_attr,
	327	const struct lttng_buffer_view *buffer_view,
	328	struct lttng_process_attr_values **_values)
a7a533cd	329	{
159b042f JG	330	ssize_t offset;
	331	unsigned int i;
	332	struct lttng_process_attr_values *values;
	333	struct lttng_buffer_view header_view;
	334	const struct process_attr_tracker_values_comm_header *header;
a7a533cd	335
159b042f JG	336	values = lttng_process_attr_values_create();
159b042f JG	337	if (!values) {
a7a533cd JR	338	goto error;
	339	}
	340
159b042f JG	341	header_view = lttng_buffer_view_from_view(
159b042f JG	342	buffer_view, 0, sizeof(*header));
3e6e0df2	343	if (!lttng_buffer_view_is_valid(&header_view)) {
a7a533cd JR	344	goto error;
a7a533cd JR	345	}
3e6e0df2	346
159b042f JG	347	offset = header_view.size;
	348	header = (typeof(header)) header_view.data;
	349
	350	/*
	351	* Check that the number of values is not absurdly large with respect to
	352	* the received buffer's size.
	353	*/
	354	if (buffer_view->size <
	355	header->count * sizeof(struct process_attr_tracker_value_comm)) {
	356	goto error;
	357	}
	358	for (i = 0; i < (unsigned int) header->count; i++) {
	359	int ret;
	360	enum lttng_error_code ret_code;
	361	const struct process_attr_tracker_value_comm *value_comm;
	362	struct process_attr_value *value;
	363	enum lttng_process_attr_value_type type;
	364	struct lttng_buffer_view value_view;
	365	struct lttng_buffer_view value_name_view = {};
	366
	367	value_view = lttng_buffer_view_from_view(
	368	buffer_view, offset, sizeof(*value_comm));
3e6e0df2	369	if (!lttng_buffer_view_is_valid(&value_view)) {
159b042f JG	370	goto error;
159b042f JG	371	}
a7a533cd	372
159b042f JG	373	offset += value_view.size;
	374	value_comm = (typeof(value_comm)) value_view.data;
	375	type = (typeof(type)) value_comm->type;
a7a533cd	376
159b042f JG	377	if (is_value_type_name(type)) {
	378	value_name_view = lttng_buffer_view_from_view(
	379	buffer_view, offset,
	380	value_comm->value.name_len);
3e6e0df2 JG	381	if (!lttng_buffer_view_is_valid(&value_name_view)) {
	382	goto error;
	383	}
	384
159b042f JG	385	offset += value_name_view.size;
159b042f JG	386	}
3e6e0df2	387
159b042f JG	388	ret_code = process_attr_value_from_comm(domain, process_attr,
	389	type, &value_comm->value.integral,
	390	&value_name_view, &value);
	391	if (ret_code != LTTNG_OK) {
	392	goto error;
	393	}
a7a533cd	394
159b042f JG	395	ret = lttng_dynamic_pointer_array_add_pointer(
	396	&values->array, value);
	397	if (ret) {
	398	process_attr_value_destroy(value);
	399	goto error;
	400	}
a7a533cd JR	401	}
a7a533cd JR	402
159b042f JG	403	*_values = values;
	404	return offset;
	405	error:
	406	lttng_process_attr_values_destroy(values);
	407	return -1;
a7a533cd JR	408	}
a7a533cd JR	409
159b042f	410	void lttng_process_attr_values_destroy(struct lttng_process_attr_values *values)
a7a533cd	411	{
159b042f JG	412	if (!values) {
	413	return;
	414	}
	415	lttng_dynamic_pointer_array_reset(&values->array);
	416	free(values);
a7a533cd JR	417	}
a7a533cd JR	418
159b042f JG	419	struct process_attr_value *process_attr_value_copy(
159b042f JG	420	const struct process_attr_value *value)
a7a533cd	421	{
159b042f	422	struct process_attr_value *new_value = NULL;
e283e4a0	423
159b042f	424	if (!value) {
e283e4a0 JR	425	goto end;
	426	}
	427
a6bc4ca9	428	new_value = (process_attr_value ) zmalloc(sizeof(new_value));
159b042f JG	429	if (!new_value) {
	430	goto end;
	431	}
	432	if (is_value_type_name(value->type)) {
	433	const char *src =
	434	value->type == LTTNG_PROCESS_ATTR_VALUE_TYPE_USER_NAME ?
	435	value->value.user_name :
	436	value->value.group_name;
	437	char **dst = value->type == LTTNG_PROCESS_ATTR_VALUE_TYPE_USER_NAME ?
	438	&new_value->value.user_name :
	439	&new_value->value.group_name;
	440
	441	new_value->type = value->type;
	442	*dst = strdup(src);
	443	if (!*dst) {
	444	goto error;
	445	}
	446	} else {
	447	new_value = value;
	448	}
e283e4a0	449	end:
159b042f JG	450	return new_value;
	451	error:
	452	free(new_value);
	453	return NULL;
a7a533cd JR	454	}
a7a533cd JR	455
159b042f	456	unsigned long process_attr_value_hash(const struct process_attr_value *a)
a7a533cd	457	{
159b042f	458	unsigned long hash = hash_key_ulong((void *) a->type, lttng_ht_seed);
9df6c82a	459
159b042f JG	460	switch (a->type) {
	461	case LTTNG_PROCESS_ATTR_VALUE_TYPE_PID:
	462	hash ^= hash_key_ulong((void *) (unsigned long) a->value.pid,
	463	lttng_ht_seed);
	464	break;
	465	case LTTNG_PROCESS_ATTR_VALUE_TYPE_UID:
	466	hash ^= hash_key_ulong((void *) (unsigned long) a->value.uid,
	467	lttng_ht_seed);
	468	break;
	469	case LTTNG_PROCESS_ATTR_VALUE_TYPE_GID:
	470	hash ^= hash_key_ulong((void *) (unsigned long) a->value.gid,
	471	lttng_ht_seed);
	472	break;
	473	case LTTNG_PROCESS_ATTR_VALUE_TYPE_USER_NAME:
	474	hash ^= hash_key_str(a->value.user_name, lttng_ht_seed);
	475	break;
	476	case LTTNG_PROCESS_ATTR_VALUE_TYPE_GROUP_NAME:
	477	hash ^= hash_key_str(a->value.group_name, lttng_ht_seed);
	478	break;
	479	default:
	480	abort();
a7a533cd JR	481	}
a7a533cd JR	482
159b042f	483	return hash;
a7a533cd	484	}
f19f5c96	485
159b042f JG	486	bool process_attr_tracker_value_equal(const struct process_attr_value *a,
159b042f JG	487	const struct process_attr_value *b)
f19f5c96	488	{
159b042f JG	489	if (a->type != b->type) {
159b042f JG	490	return false;
f19f5c96	491	}
159b042f JG	492	switch (a->type) {
	493	case LTTNG_PROCESS_ATTR_VALUE_TYPE_PID:
	494	return a->value.pid == b->value.pid;
	495	case LTTNG_PROCESS_ATTR_VALUE_TYPE_UID:
	496	return a->value.uid == b->value.uid;
	497	case LTTNG_PROCESS_ATTR_VALUE_TYPE_GID:
	498	return a->value.gid == b->value.gid;
	499	case LTTNG_PROCESS_ATTR_VALUE_TYPE_USER_NAME:
	500	return !strcmp(a->value.user_name, b->value.user_name);
	501	case LTTNG_PROCESS_ATTR_VALUE_TYPE_GROUP_NAME:
	502	return !strcmp(a->value.group_name, b->value.group_name);
	503	default:
	504	abort();
	505	}
	506	}
f19f5c96	507
159b042f JG	508	void process_attr_value_destroy(struct process_attr_value *value)
	509	{
	510	if (!value) {
	511	return;
f19f5c96	512	}
159b042f JG	513	if (is_value_type_name(value->type)) {
	514	free(value->type == LTTNG_PROCESS_ATTR_VALUE_TYPE_USER_NAME ?
	515	value->value.user_name :
	516	value->value.group_name);
	517	}
	518	free(value);
f19f5c96	519	}