[lttng-ust.git] / liblttng-ust / lttng-probes.c

/*
 * lttng-probes.c
 *
 * Holds LTTng probes registry.
 *
 * Copyright 2010-2012 (c) - Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
 *
 * 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; only
 * version 2.1 of the License.
 *
 * 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.
 *
 * 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
 */

#include <string.h>
#include <errno.h>
#include <urcu/list.h>
#include <urcu/hlist.h>
#include <lttng/ust-events.h>
#include <lttng/tracepoint.h>
#include "tracepoint-internal.h"
#include <assert.h>
#include <helper.h>
#include <ctype.h>

#include "lttng-tracer-core.h"
#include "jhash.h"
#include "error.h"

/*
 * probe list is protected by ust_lock()/ust_unlock().
 */
static CDS_LIST_HEAD(_probe_list);

/*
 * List of probes registered by not yet processed.
 */
static CDS_LIST_HEAD(lazy_probe_init);

/*
 * lazy_nesting counter ensures we don't trigger lazy probe registration
 * fixup while we are performing the fixup. It is protected by the ust
 * mutex.
 */
static int lazy_nesting;

/*
 * Called under ust lock.
 */
static
int check_event_provider(struct lttng_probe_desc *desc)
{
	int i;
	size_t provider_name_len;

	provider_name_len = strnlen(desc->provider,
				LTTNG_UST_SYM_NAME_LEN - 1);
	for (i = 0; i < desc->nr_events; i++) {
		if (strncmp(desc->event_desc[i]->name,
				desc->provider,
				provider_name_len))
			return 0;	/* provider mismatch */
	}
	return 1;
}

/*
 * Called under ust lock.
 */
static
void lttng_lazy_probe_register(struct lttng_probe_desc *desc)
{
	struct lttng_probe_desc *iter;
	struct cds_list_head *probe_list;

	/*
	 * Each provider enforce that every event name begins with the
	 * provider name. Check this in an assertion for extra
	 * carefulness. This ensures we cannot have duplicate event
	 * names across providers.
	 */
	assert(check_event_provider(desc));

	/*
	 * The provider ensures there are no duplicate event names.
	 * Duplicated TRACEPOINT_EVENT event names would generate a
	 * compile-time error due to duplicated symbol names.
	 */

	/*
	 * We sort the providers by struct lttng_probe_desc pointer
	 * address.
	 */
	probe_list = &_probe_list;
	cds_list_for_each_entry_reverse(iter, probe_list, head) {
		BUG_ON(iter == desc); /* Should never be in the list twice */
		if (iter < desc) {
			/* We belong to the location right after iter. */
			cds_list_add(&desc->head, &iter->head);
			goto desc_added;
		}
	}
	/* We should be added at the head of the list */
	cds_list_add(&desc->head, probe_list);
desc_added:
	DBG("just registered probe %s containing %u events",
		desc->provider, desc->nr_events);
}

/*
 * Called under ust lock.
 */
static
void fixup_lazy_probes(void)
{
	struct lttng_probe_desc *iter, *tmp;
	int ret;

	lazy_nesting++;
	cds_list_for_each_entry_safe(iter, tmp,
			&lazy_probe_init, lazy_init_head) {
		lttng_lazy_probe_register(iter);
		iter->lazy = 0;
		cds_list_del(&iter->lazy_init_head);
	}
	ret = lttng_fix_pending_events();
	assert(!ret);
	lazy_nesting--;
}

/*
 * Called under ust lock.
 */
struct cds_list_head *lttng_get_probe_list_head(void)
{
	if (!lazy_nesting && !cds_list_empty(&lazy_probe_init))
		fixup_lazy_probes();
	return &_probe_list;
}

static
const struct lttng_probe_desc *find_provider(const char *provider)
{
	struct lttng_probe_desc *iter;
	struct cds_list_head *probe_list;

	probe_list = lttng_get_probe_list_head();
	cds_list_for_each_entry(iter, probe_list, head) {
		if (!strcmp(iter->provider, provider))
			return iter;
	}
	return NULL;
}

int lttng_probe_register(struct lttng_probe_desc *desc)
{
	int ret = 0;

	ust_lock();

	/*
	 * Check if the provider has already been registered.
	 */
	if (find_provider(desc->provider)) {
		ret = -EEXIST;
		goto end;
	}
	cds_list_add(&desc->lazy_init_head, &lazy_probe_init);
	desc->lazy = 1;
	DBG("adding probe %s containing %u events to lazy registration list",
		desc->provider, desc->nr_events);
	/*
	 * If there is at least one active session, we need to register
	 * the probe immediately, since we cannot delay event
	 * registration because they are needed ASAP.
	 */
	if (lttng_session_active())
		fixup_lazy_probes();
end:
	ust_unlock();
	return ret;
}

/* Backward compatibility with UST 2.0 */
int ltt_probe_register(struct lttng_probe_desc *desc)
{
	return lttng_probe_register(desc);
}

void lttng_probe_unregister(struct lttng_probe_desc *desc)
{
	ust_lock();
	if (!desc->lazy)
		cds_list_del(&desc->head);
	else
		cds_list_del(&desc->lazy_init_head);
	DBG("just unregistered probe %s", desc->provider);
	ust_unlock();
}

/* Backward compatibility with UST 2.0 */
void ltt_probe_unregister(struct lttng_probe_desc *desc)
{
	lttng_probe_unregister(desc);
}

void lttng_probes_prune_event_list(struct lttng_ust_tracepoint_list *list)
{
	struct tp_list_entry *list_entry, *tmp;

	cds_list_for_each_entry_safe(list_entry, tmp, &list->head, head) {
		cds_list_del(&list_entry->head);
		free(list_entry);
	}
}

/*
 * called with UST lock held.
 */
int lttng_probes_get_event_list(struct lttng_ust_tracepoint_list *list)
{
	struct lttng_probe_desc *probe_desc;
	int i;
	struct cds_list_head *probe_list;

	probe_list = lttng_get_probe_list_head();
	CDS_INIT_LIST_HEAD(&list->head);
	cds_list_for_each_entry(probe_desc, probe_list, head) {
		for (i = 0; i < probe_desc->nr_events; i++) {
			struct tp_list_entry *list_entry;

			list_entry = zmalloc(sizeof(*list_entry));
			if (!list_entry)
				goto err_nomem;
			cds_list_add(&list_entry->head, &list->head);
			strncpy(list_entry->tp.name,
				probe_desc->event_desc[i]->name,
				LTTNG_UST_SYM_NAME_LEN);
			list_entry->tp.name[LTTNG_UST_SYM_NAME_LEN - 1] = '\0';
			if (!probe_desc->event_desc[i]->loglevel) {
				list_entry->tp.loglevel = TRACE_DEFAULT;
			} else {
				list_entry->tp.loglevel = *(*probe_desc->event_desc[i]->loglevel);
			}
		}
	}
	if (cds_list_empty(&list->head))
		list->iter = NULL;
	else
		list->iter =
			cds_list_first_entry(&list->head, struct tp_list_entry, head);
	return 0;

err_nomem:
	lttng_probes_prune_event_list(list);
	return -ENOMEM;
}

/*
 * Return current iteration position, advance internal iterator to next.
 * Return NULL if end of list.
 */
struct lttng_ust_tracepoint_iter *
	lttng_ust_tracepoint_list_get_iter_next(struct lttng_ust_tracepoint_list *list)
{
	struct tp_list_entry *entry;

	if (!list->iter)
		return NULL;
	entry = list->iter;
	if (entry->head.next == &list->head)
		list->iter = NULL;
	else
		list->iter = cds_list_entry(entry->head.next,
				struct tp_list_entry, head);
	return &entry->tp;
}

void lttng_probes_prune_field_list(struct lttng_ust_field_list *list)
{
	struct tp_field_list_entry *list_entry, *tmp;

	cds_list_for_each_entry_safe(list_entry, tmp, &list->head, head) {
		cds_list_del(&list_entry->head);
		free(list_entry);
	}
}

/*
 * called with UST lock held.
 */
int lttng_probes_get_field_list(struct lttng_ust_field_list *list)
{
	struct lttng_probe_desc *probe_desc;
	int i;
	struct cds_list_head *probe_list;

	probe_list = lttng_get_probe_list_head();
	CDS_INIT_LIST_HEAD(&list->head);
	cds_list_for_each_entry(probe_desc, probe_list, head) {
		for (i = 0; i < probe_desc->nr_events; i++) {
			const struct lttng_event_desc *event_desc =
				probe_desc->event_desc[i];
			int j;

			if (event_desc->nr_fields == 0) {
				/* Events without fields. */
				struct tp_field_list_entry *list_entry;

				list_entry = zmalloc(sizeof(*list_entry));
				if (!list_entry)
					goto err_nomem;
				cds_list_add(&list_entry->head, &list->head);
				strncpy(list_entry->field.event_name,
					event_desc->name,
					LTTNG_UST_SYM_NAME_LEN);
				list_entry->field.event_name[LTTNG_UST_SYM_NAME_LEN - 1] = '\0';
				list_entry->field.field_name[0] = '\0';
				list_entry->field.type = LTTNG_UST_FIELD_OTHER;
				if (!event_desc->loglevel) {
					list_entry->field.loglevel = TRACE_DEFAULT;
				} else {
					list_entry->field.loglevel = *(*event_desc->loglevel);
				}
				list_entry->field.nowrite = 1;
			}

			for (j = 0; j < event_desc->nr_fields; j++) {
				const struct lttng_event_field *event_field =
					&event_desc->fields[j];
				struct tp_field_list_entry *list_entry;

				list_entry = zmalloc(sizeof(*list_entry));
				if (!list_entry)
					goto err_nomem;
				cds_list_add(&list_entry->head, &list->head);
				strncpy(list_entry->field.event_name,
					event_desc->name,
					LTTNG_UST_SYM_NAME_LEN);
				list_entry->field.event_name[LTTNG_UST_SYM_NAME_LEN - 1] = '\0';
				strncpy(list_entry->field.field_name,
					event_field->name,
					LTTNG_UST_SYM_NAME_LEN);
				list_entry->field.field_name[LTTNG_UST_SYM_NAME_LEN - 1] = '\0';
				switch (event_field->type.atype) {
				case atype_integer:
					list_entry->field.type = LTTNG_UST_FIELD_INTEGER;
					break;
				case atype_string:
					list_entry->field.type = LTTNG_UST_FIELD_STRING;
					break;
				case atype_array:
					if (event_field->type.u.array.elem_type.atype != atype_integer
						|| event_field->type.u.array.elem_type.u.basic.integer.encoding == lttng_encode_none)
						list_entry->field.type = LTTNG_UST_FIELD_OTHER;
					else
						list_entry->field.type = LTTNG_UST_FIELD_STRING;
					break;
				case atype_sequence:
					if (event_field->type.u.sequence.elem_type.atype != atype_integer
						|| event_field->type.u.sequence.elem_type.u.basic.integer.encoding == lttng_encode_none)
						list_entry->field.type = LTTNG_UST_FIELD_OTHER;
					else
						list_entry->field.type = LTTNG_UST_FIELD_STRING;
					break;
				case atype_float:
					list_entry->field.type = LTTNG_UST_FIELD_FLOAT;
					break;
				case atype_enum:
					list_entry->field.type = LTTNG_UST_FIELD_ENUM;
					break;
				default:
					list_entry->field.type = LTTNG_UST_FIELD_OTHER;
				}
				if (!event_desc->loglevel) {
					list_entry->field.loglevel = TRACE_DEFAULT;
				} else {
					list_entry->field.loglevel = *(*event_desc->loglevel);
				}
				list_entry->field.nowrite = event_field->nowrite;
			}
		}
	}
	if (cds_list_empty(&list->head))
		list->iter = NULL;
	else
		list->iter =
			cds_list_first_entry(&list->head,
				struct tp_field_list_entry, head);
	return 0;

err_nomem:
	lttng_probes_prune_field_list(list);
	return -ENOMEM;
}

/*
 * Return current iteration position, advance internal iterator to next.
 * Return NULL if end of list.
 */
struct lttng_ust_field_iter *
	lttng_ust_field_list_get_iter_next(struct lttng_ust_field_list *list)
{
	struct tp_field_list_entry *entry;

	if (!list->iter)
		return NULL;
	entry = list->iter;
	if (entry->head.next == &list->head)
		list->iter = NULL;
	else
		list->iter = cds_list_entry(entry->head.next,
				struct tp_field_list_entry, head);
	return &entry->field;
}
Commit	Line	Data
ce5aef0b	1	/*
7dd08bec	2	* lttng-probes.c
ce5aef0b	3	*
ce5aef0b MD	4	* Holds LTTng probes registry.
ce5aef0b MD	5	*
e92f3e28 MD	6	* Copyright 2010-2012 (c) - Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
	7	*
	8	* This library is free software; you can redistribute it and/or
	9	* modify it under the terms of the GNU Lesser General Public
	10	* License as published by the Free Software Foundation; only
	11	* version 2.1 of the License.
	12	*
	13	* This library is distributed in the hope that it will be useful,
	14	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	15	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
	16	* Lesser General Public License for more details.
	17	*
	18	* You should have received a copy of the GNU Lesser General Public
	19	* License along with this library; if not, write to the Free Software
	20	* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
ce5aef0b MD	21	*/
ce5aef0b MD	22
8d8a24c8 MD	23	#include <string.h>
	24	#include <errno.h>
	25	#include <urcu/list.h>
1f18504e	26	#include <urcu/hlist.h>
4318ae1b	27	#include <lttng/ust-events.h>
902e1379	28	#include <lttng/tracepoint.h>
d8de1354	29	#include "tracepoint-internal.h"
a3bb4b27	30	#include <assert.h>
c8fcf224	31	#include <helper.h>
48740cab	32	#include <ctype.h>
ce5aef0b	33
7dd08bec	34	#include "lttng-tracer-core.h"
1f18504e MD	35	#include "jhash.h"
1f18504e MD	36	#include "error.h"
8165c8da MD	37
8165c8da MD	38	/*
17dfb34b	39	* probe list is protected by ust_lock()/ust_unlock().
8165c8da	40	*/
ac69b35b	41	static CDS_LIST_HEAD(_probe_list);
e58095ef	42
6715d7d1 MD	43	/*
	44	* List of probes registered by not yet processed.
	45	*/
	46	static CDS_LIST_HEAD(lazy_probe_init);
df854e41	47
6715d7d1 MD	48	/*
	49	* lazy_nesting counter ensures we don't trigger lazy probe registration
	50	* fixup while we are performing the fixup. It is protected by the ust
	51	* mutex.
	52	*/
	53	static int lazy_nesting;
df854e41	54
6715d7d1 MD	55	/*
	56	* Called under ust lock.
	57	*/
ce5aef0b	58	static
48205d60	59	int check_event_provider(struct lttng_probe_desc *desc)
ce5aef0b	60	{
ce5aef0b	61	int i;
48205d60	62	size_t provider_name_len;
ce5aef0b	63
48205d60 MD	64	provider_name_len = strnlen(desc->provider,
	65	LTTNG_UST_SYM_NAME_LEN - 1);
	66	for (i = 0; i < desc->nr_events; i++) {
	67	if (strncmp(desc->event_desc[i]->name,
	68	desc->provider,
	69	provider_name_len))
	70	return 0; /* provider mismatch */
ce5aef0b	71	}
48205d60	72	return 1;
ce5aef0b MD	73	}
ce5aef0b MD	74
6715d7d1 MD	75	/*
	76	* Called under ust lock.
	77	*/
	78	static
	79	void lttng_lazy_probe_register(struct lttng_probe_desc *desc)
ce5aef0b	80	{
df854e41	81	struct lttng_probe_desc *iter;
ac69b35b	82	struct cds_list_head *probe_list;
48205d60	83
ce5aef0b	84	/*
48205d60 MD	85	* Each provider enforce that every event name begins with the
	86	* provider name. Check this in an assertion for extra
	87	* carefulness. This ensures we cannot have duplicate event
	88	* names across providers.
	89	*/
	90	assert(check_event_provider(desc));
	91
	92	/*
	93	* The provider ensures there are no duplicate event names.
	94	* Duplicated TRACEPOINT_EVENT event names would generate a
	95	* compile-time error due to duplicated symbol names.
ce5aef0b	96	*/
df854e41 MD	97
	98	/*
	99	* We sort the providers by struct lttng_probe_desc pointer
	100	* address.
	101	*/
6715d7d1	102	probe_list = &_probe_list;
ac69b35b	103	cds_list_for_each_entry_reverse(iter, probe_list, head) {
df854e41 MD	104	BUG_ON(iter == desc); /* Should never be in the list twice */
	105	if (iter < desc) {
	106	/* We belong to the location right after iter. */
	107	cds_list_add(&desc->head, &iter->head);
	108	goto desc_added;
	109	}
	110	}
	111	/* We should be added at the head of the list */
ac69b35b	112	cds_list_add(&desc->head, probe_list);
df854e41	113	desc_added:
e81a53af MD	114	DBG("just registered probe %s containing %u events",
e81a53af MD	115	desc->provider, desc->nr_events);
6715d7d1 MD	116	}
	117
	118	/*
	119	* Called under ust lock.
	120	*/
	121	static
	122	void fixup_lazy_probes(void)
	123	{
	124	struct lttng_probe_desc iter, tmp;
5f733922	125	int ret;
6715d7d1 MD	126
	127	lazy_nesting++;
	128	cds_list_for_each_entry_safe(iter, tmp,
	129	&lazy_probe_init, lazy_init_head) {
	130	lttng_lazy_probe_register(iter);
	131	iter->lazy = 0;
	132	cds_list_del(&iter->lazy_init_head);
	133	}
5f733922 MD	134	ret = lttng_fix_pending_events();
5f733922 MD	135	assert(!ret);
6715d7d1 MD	136	lazy_nesting--;
	137	}
	138
	139	/*
	140	* Called under ust lock.
	141	*/
	142	struct cds_list_head *lttng_get_probe_list_head(void)
	143	{
	144	if (!lazy_nesting && !cds_list_empty(&lazy_probe_init))
	145	fixup_lazy_probes();
	146	return &_probe_list;
	147	}
	148
	149	static
	150	const struct lttng_probe_desc find_provider(const char provider)
	151	{
	152	struct lttng_probe_desc *iter;
	153	struct cds_list_head *probe_list;
	154
	155	probe_list = lttng_get_probe_list_head();
	156	cds_list_for_each_entry(iter, probe_list, head) {
	157	if (!strcmp(iter->provider, provider))
	158	return iter;
	159	}
	160	return NULL;
	161	}
	162
	163	int lttng_probe_register(struct lttng_probe_desc *desc)
	164	{
	165	int ret = 0;
	166
	167	ust_lock();
	168
	169	/*
	170	* Check if the provider has already been registered.
	171	*/
	172	if (find_provider(desc->provider)) {
	173	ret = -EEXIST;
	174	goto end;
	175	}
	176	cds_list_add(&desc->lazy_init_head, &lazy_probe_init);
	177	desc->lazy = 1;
	178	DBG("adding probe %s containing %u events to lazy registration list",
	179	desc->provider, desc->nr_events);
	180	/*
	181	* If there is at least one active session, we need to register
	182	* the probe immediately, since we cannot delay event
	183	* registration because they are needed ASAP.
	184	*/
	185	if (lttng_session_active())
	186	fixup_lazy_probes();
ce5aef0b	187	end:
17dfb34b	188	ust_unlock();
ce5aef0b MD	189	return ret;
ce5aef0b MD	190	}
ce5aef0b	191
7dd08bec MD	192	/* Backward compatibility with UST 2.0 */
	193	int ltt_probe_register(struct lttng_probe_desc *desc)
	194	{
	195	return lttng_probe_register(desc);
	196	}
	197
	198	void lttng_probe_unregister(struct lttng_probe_desc *desc)
ce5aef0b	199	{
17dfb34b	200	ust_lock();
6715d7d1 MD	201	if (!desc->lazy)
	202	cds_list_del(&desc->head);
	203	else
	204	cds_list_del(&desc->lazy_init_head);
e81a53af	205	DBG("just unregistered probe %s", desc->provider);
17dfb34b	206	ust_unlock();
ce5aef0b	207	}
ce5aef0b	208
7dd08bec MD	209	/* Backward compatibility with UST 2.0 */
	210	void ltt_probe_unregister(struct lttng_probe_desc *desc)
	211	{
	212	lttng_probe_unregister(desc);
	213	}
	214
7dd08bec	215	void lttng_probes_prune_event_list(struct lttng_ust_tracepoint_list *list)
c8fcf224 MD	216	{
	217	struct tp_list_entry list_entry, tmp;
	218
	219	cds_list_for_each_entry_safe(list_entry, tmp, &list->head, head) {
	220	cds_list_del(&list_entry->head);
	221	free(list_entry);
	222	}
	223	}
	224
	225	/*
	226	* called with UST lock held.
	227	*/
7dd08bec	228	int lttng_probes_get_event_list(struct lttng_ust_tracepoint_list *list)
c8fcf224 MD	229	{
	230	struct lttng_probe_desc *probe_desc;
	231	int i;
ac69b35b	232	struct cds_list_head *probe_list;
c8fcf224	233
ac69b35b	234	probe_list = lttng_get_probe_list_head();
c8fcf224	235	CDS_INIT_LIST_HEAD(&list->head);
ac69b35b	236	cds_list_for_each_entry(probe_desc, probe_list, head) {
c8fcf224 MD	237	for (i = 0; i < probe_desc->nr_events; i++) {
	238	struct tp_list_entry *list_entry;
	239
	240	list_entry = zmalloc(sizeof(*list_entry));
	241	if (!list_entry)
	242	goto err_nomem;
	243	cds_list_add(&list_entry->head, &list->head);
	244	strncpy(list_entry->tp.name,
	245	probe_desc->event_desc[i]->name,
	246	LTTNG_UST_SYM_NAME_LEN);
	247	list_entry->tp.name[LTTNG_UST_SYM_NAME_LEN - 1] = '\0';
	248	if (!probe_desc->event_desc[i]->loglevel) {
882a56d7	249	list_entry->tp.loglevel = TRACE_DEFAULT;
c8fcf224	250	} else {
882a56d7	251	list_entry->tp.loglevel = (probe_desc->event_desc[i]->loglevel);
c8fcf224 MD	252	}
	253	}
	254	}
	255	if (cds_list_empty(&list->head))
	256	list->iter = NULL;
	257	else
	258	list->iter =
	259	cds_list_first_entry(&list->head, struct tp_list_entry, head);
	260	return 0;
	261
	262	err_nomem:
7dd08bec	263	lttng_probes_prune_event_list(list);
c8fcf224 MD	264	return -ENOMEM;
	265	}
	266
	267	/*
	268	* Return current iteration position, advance internal iterator to next.
	269	* Return NULL if end of list.
	270	*/
	271	struct lttng_ust_tracepoint_iter *
	272	lttng_ust_tracepoint_list_get_iter_next(struct lttng_ust_tracepoint_list *list)
	273	{
	274	struct tp_list_entry *entry;
	275
	276	if (!list->iter)
	277	return NULL;
	278	entry = list->iter;
	279	if (entry->head.next == &list->head)
	280	list->iter = NULL;
	281	else
	282	list->iter = cds_list_entry(entry->head.next,
	283	struct tp_list_entry, head);
	284	return &entry->tp;
	285	}
1f18504e	286
7dd08bec	287	void lttng_probes_prune_field_list(struct lttng_ust_field_list *list)
06d4f27e MD	288	{
	289	struct tp_field_list_entry list_entry, tmp;
	290
	291	cds_list_for_each_entry_safe(list_entry, tmp, &list->head, head) {
	292	cds_list_del(&list_entry->head);
	293	free(list_entry);
	294	}
	295	}
	296
	297	/*
	298	* called with UST lock held.
	299	*/
7dd08bec	300	int lttng_probes_get_field_list(struct lttng_ust_field_list *list)
06d4f27e MD	301	{
	302	struct lttng_probe_desc *probe_desc;
	303	int i;
ac69b35b	304	struct cds_list_head *probe_list;
06d4f27e	305
ac69b35b	306	probe_list = lttng_get_probe_list_head();
06d4f27e	307	CDS_INIT_LIST_HEAD(&list->head);
ac69b35b	308	cds_list_for_each_entry(probe_desc, probe_list, head) {
06d4f27e MD	309	for (i = 0; i < probe_desc->nr_events; i++) {
	310	const struct lttng_event_desc *event_desc =
	311	probe_desc->event_desc[i];
	312	int j;
	313
26329f26 MD	314	if (event_desc->nr_fields == 0) {
	315	/* Events without fields. */
	316	struct tp_field_list_entry *list_entry;
	317
	318	list_entry = zmalloc(sizeof(*list_entry));
	319	if (!list_entry)
	320	goto err_nomem;
	321	cds_list_add(&list_entry->head, &list->head);
	322	strncpy(list_entry->field.event_name,
	323	event_desc->name,
	324	LTTNG_UST_SYM_NAME_LEN);
	325	list_entry->field.event_name[LTTNG_UST_SYM_NAME_LEN - 1] = '\0';
	326	list_entry->field.field_name[0] = '\0';
	327	list_entry->field.type = LTTNG_UST_FIELD_OTHER;
	328	if (!event_desc->loglevel) {
	329	list_entry->field.loglevel = TRACE_DEFAULT;
	330	} else {
	331	list_entry->field.loglevel = (event_desc->loglevel);
	332	}
	333	list_entry->field.nowrite = 1;
	334	}
	335
06d4f27e MD	336	for (j = 0; j < event_desc->nr_fields; j++) {
	337	const struct lttng_event_field *event_field =
	338	&event_desc->fields[j];
	339	struct tp_field_list_entry *list_entry;
	340
	341	list_entry = zmalloc(sizeof(*list_entry));
	342	if (!list_entry)
	343	goto err_nomem;
	344	cds_list_add(&list_entry->head, &list->head);
	345	strncpy(list_entry->field.event_name,
	346	event_desc->name,
	347	LTTNG_UST_SYM_NAME_LEN);
	348	list_entry->field.event_name[LTTNG_UST_SYM_NAME_LEN - 1] = '\0';
	349	strncpy(list_entry->field.field_name,
	350	event_field->name,
	351	LTTNG_UST_SYM_NAME_LEN);
	352	list_entry->field.field_name[LTTNG_UST_SYM_NAME_LEN - 1] = '\0';
40003310 MD	353	switch (event_field->type.atype) {
	354	case atype_integer:
	355	list_entry->field.type = LTTNG_UST_FIELD_INTEGER;
	356	break;
	357	case atype_string:
	358	list_entry->field.type = LTTNG_UST_FIELD_STRING;
	359	break;
	360	case atype_array:
	361	if (event_field->type.u.array.elem_type.atype != atype_integer
	362	\|\| event_field->type.u.array.elem_type.u.basic.integer.encoding == lttng_encode_none)
	363	list_entry->field.type = LTTNG_UST_FIELD_OTHER;
	364	else
	365	list_entry->field.type = LTTNG_UST_FIELD_STRING;
	366	break;
	367	case atype_sequence:
	368	if (event_field->type.u.sequence.elem_type.atype != atype_integer
	369	\|\| event_field->type.u.sequence.elem_type.u.basic.integer.encoding == lttng_encode_none)
	370	list_entry->field.type = LTTNG_UST_FIELD_OTHER;
	371	else
	372	list_entry->field.type = LTTNG_UST_FIELD_STRING;
	373	break;
	374	case atype_float:
	375	list_entry->field.type = LTTNG_UST_FIELD_FLOAT;
	376	break;
	377	case atype_enum:
	378	list_entry->field.type = LTTNG_UST_FIELD_ENUM;
	379	break;
	380	default:
	381	list_entry->field.type = LTTNG_UST_FIELD_OTHER;
	382	}
06d4f27e MD	383	if (!event_desc->loglevel) {
	384	list_entry->field.loglevel = TRACE_DEFAULT;
	385	} else {
	386	list_entry->field.loglevel = (event_desc->loglevel);
	387	}
180901e6	388	list_entry->field.nowrite = event_field->nowrite;
06d4f27e MD	389	}
	390	}
	391	}
	392	if (cds_list_empty(&list->head))
	393	list->iter = NULL;
	394	else
	395	list->iter =
	396	cds_list_first_entry(&list->head,
	397	struct tp_field_list_entry, head);
	398	return 0;
	399
	400	err_nomem:
7dd08bec	401	lttng_probes_prune_field_list(list);
06d4f27e MD	402	return -ENOMEM;
	403	}
	404
	405	/*
	406	* Return current iteration position, advance internal iterator to next.
	407	* Return NULL if end of list.
	408	*/
	409	struct lttng_ust_field_iter *
	410	lttng_ust_field_list_get_iter_next(struct lttng_ust_field_list *list)
	411	{
	412	struct tp_field_list_entry *entry;
	413
	414	if (!list->iter)
	415	return NULL;
	416	entry = list->iter;
	417	if (entry->head.next == &list->head)
	418	list->iter = NULL;
	419	else
	420	list->iter = cds_list_entry(entry->head.next,
	421	struct tp_field_list_entry, head);
	422	return &entry->field;
	423	}