X-Git-Url: http://git.efficios.com/?a=blobdiff_plain;f=src%2Fplugins%2Fctf%2Fcommon%2Fmetadata%2Fast.hpp;h=ad14a5af3d3b5c9e78d8661be6cee68589d5c461;hb=c802cacb9f0879a42e01575595a75bbefe7d3db9;hp=490e4d29b61ef616fa39b123c933eb77e6e980c7;hpb=087cd0f57f0f7d815a609a4e041d1200f380e4aa;p=babeltrace.git

diff --git a/src/plugins/ctf/common/metadata/ast.hpp b/src/plugins/ctf/common/metadata/ast.hpp
index 490e4d29..ad14a5af 100644
--- a/src/plugins/ctf/common/metadata/ast.hpp
+++ b/src/plugins/ctf/common/metadata/ast.hpp
@@ -7,16 +7,18 @@
 #ifndef _CTF_AST_H
 #define _CTF_AST_H
 
+#include <glib.h>
 #include <stdint.h>
 #include <stdio.h>
-#include <glib.h>
-#include "common/list.h"
+
 #include <babeltrace2/babeltrace.h>
-#include "common/macros.h"
+
 #include "common/assert.h"
+#include "common/list.h"
+#include "common/macros.h"
 
-#include "decoder.hpp"
 #include "ctf-meta.hpp"
+#include "decoder.hpp"
 
 // the parameter name (of the reentrant 'yyparse' function)
 // data is a pointer to a 'SParserParam' structure
@@ -26,410 +28,432 @@ struct ctf_node;
 struct ctf_parser;
 struct ctf_visitor_generate_ir;
 
-#define EINCOMPLETE	1000
-
-#define FOREACH_CTF_NODES(F) \
-	F(NODE_UNKNOWN) \
-	F(NODE_ROOT) \
-	F(NODE_ERROR) \
-	F(NODE_EVENT) \
-	F(NODE_STREAM) \
-	F(NODE_ENV) \
-	F(NODE_TRACE) \
-	F(NODE_CLOCK) \
-	F(NODE_CALLSITE) \
-	F(NODE_CTF_EXPRESSION) \
-	F(NODE_UNARY_EXPRESSION) \
-	F(NODE_TYPEDEF) \
-	F(NODE_TYPEALIAS_TARGET) \
-	F(NODE_TYPEALIAS_ALIAS) \
-	F(NODE_TYPEALIAS) \
-	F(NODE_TYPE_SPECIFIER) \
-	F(NODE_TYPE_SPECIFIER_LIST) \
-	F(NODE_POINTER) \
-	F(NODE_TYPE_DECLARATOR) \
-	F(NODE_FLOATING_POINT) \
-	F(NODE_INTEGER) \
-	F(NODE_STRING) \
-	F(NODE_ENUMERATOR) \
-	F(NODE_ENUM) \
-	F(NODE_STRUCT_OR_VARIANT_DECLARATION) \
-	F(NODE_VARIANT) \
-	F(NODE_STRUCT)
-
-enum node_type {
-#define ENTRY(S)	S,
-	FOREACH_CTF_NODES(ENTRY)
+#define EINCOMPLETE 1000
+
+#define FOREACH_CTF_NODES(F)                                                                       \
+    F(NODE_UNKNOWN)                                                                                \
+    F(NODE_ROOT)                                                                                   \
+    F(NODE_ERROR)                                                                                  \
+    F(NODE_EVENT)                                                                                  \
+    F(NODE_STREAM)                                                                                 \
+    F(NODE_ENV)                                                                                    \
+    F(NODE_TRACE)                                                                                  \
+    F(NODE_CLOCK)                                                                                  \
+    F(NODE_CALLSITE)                                                                               \
+    F(NODE_CTF_EXPRESSION)                                                                         \
+    F(NODE_UNARY_EXPRESSION)                                                                       \
+    F(NODE_TYPEDEF)                                                                                \
+    F(NODE_TYPEALIAS_TARGET)                                                                       \
+    F(NODE_TYPEALIAS_ALIAS)                                                                        \
+    F(NODE_TYPEALIAS)                                                                              \
+    F(NODE_TYPE_SPECIFIER)                                                                         \
+    F(NODE_TYPE_SPECIFIER_LIST)                                                                    \
+    F(NODE_POINTER)                                                                                \
+    F(NODE_TYPE_DECLARATOR)                                                                        \
+    F(NODE_FLOATING_POINT)                                                                         \
+    F(NODE_INTEGER)                                                                                \
+    F(NODE_STRING)                                                                                 \
+    F(NODE_ENUMERATOR)                                                                             \
+    F(NODE_ENUM)                                                                                   \
+    F(NODE_STRUCT_OR_VARIANT_DECLARATION)                                                          \
+    F(NODE_VARIANT)                                                                                \
+    F(NODE_STRUCT)
+
+enum node_type
+{
+#define ENTRY(S) S,
+    FOREACH_CTF_NODES(ENTRY)
 #undef ENTRY
 };
 
-enum ctf_unary {
-	UNARY_UNKNOWN = 0,
-	UNARY_STRING,
-	UNARY_SIGNED_CONSTANT,
-	UNARY_UNSIGNED_CONSTANT,
-	UNARY_SBRAC,
+enum ctf_unary
+{
+    UNARY_UNKNOWN = 0,
+    UNARY_STRING,
+    UNARY_SIGNED_CONSTANT,
+    UNARY_UNSIGNED_CONSTANT,
+    UNARY_SBRAC,
 };
 
-enum ctf_unary_link {
-	UNARY_LINK_UNKNOWN = 0,
-	UNARY_DOTLINK,
-	UNARY_ARROWLINK,
-	UNARY_DOTDOTDOT,
+enum ctf_unary_link
+{
+    UNARY_LINK_UNKNOWN = 0,
+    UNARY_DOTLINK,
+    UNARY_ARROWLINK,
+    UNARY_DOTDOTDOT,
 };
 
-enum ctf_typedec {
-	TYPEDEC_UNKNOWN = 0,
-	TYPEDEC_ID,	/* identifier */
-	TYPEDEC_NESTED,	/* (), array or sequence */
+enum ctf_typedec
+{
+    TYPEDEC_UNKNOWN = 0,
+    TYPEDEC_ID,     /* identifier */
+    TYPEDEC_NESTED, /* (), array or sequence */
 };
 
-enum ctf_typespec {
-	TYPESPEC_UNKNOWN = 0,
-	TYPESPEC_VOID,
-	TYPESPEC_CHAR,
-	TYPESPEC_SHORT,
-	TYPESPEC_INT,
-	TYPESPEC_LONG,
-	TYPESPEC_FLOAT,
-	TYPESPEC_DOUBLE,
-	TYPESPEC_SIGNED,
-	TYPESPEC_UNSIGNED,
-	TYPESPEC_BOOL,
-	TYPESPEC_COMPLEX,
-	TYPESPEC_IMAGINARY,
-	TYPESPEC_CONST,
-	TYPESPEC_ID_TYPE,
-	TYPESPEC_FLOATING_POINT,
-	TYPESPEC_INTEGER,
-	TYPESPEC_STRING,
-	TYPESPEC_STRUCT,
-	TYPESPEC_VARIANT,
-	TYPESPEC_ENUM,
+enum ctf_typespec
+{
+    TYPESPEC_UNKNOWN = 0,
+    TYPESPEC_VOID,
+    TYPESPEC_CHAR,
+    TYPESPEC_SHORT,
+    TYPESPEC_INT,
+    TYPESPEC_LONG,
+    TYPESPEC_FLOAT,
+    TYPESPEC_DOUBLE,
+    TYPESPEC_SIGNED,
+    TYPESPEC_UNSIGNED,
+    TYPESPEC_BOOL,
+    TYPESPEC_COMPLEX,
+    TYPESPEC_IMAGINARY,
+    TYPESPEC_CONST,
+    TYPESPEC_ID_TYPE,
+    TYPESPEC_FLOATING_POINT,
+    TYPESPEC_INTEGER,
+    TYPESPEC_STRING,
+    TYPESPEC_STRUCT,
+    TYPESPEC_VARIANT,
+    TYPESPEC_ENUM,
 };
 
-struct ctf_node {
-	/*
-	 * Parent node is only set on demand by specific visitor.
-	 */
-	struct ctf_node *parent;
-	struct bt_list_head siblings;
-	struct bt_list_head tmp_head;
-	unsigned int lineno;
-	/*
-	 * We mark nodes visited in the generate-ir phase (last
-	 * phase). We only mark the 1-depth level nodes as visited
-	 * (never the root node, and not their sub-nodes). This allows
-	 * skipping already visited nodes when doing incremental
-	 * metadata append.
-	 */
-	int visited;
-
-	enum node_type type;
-	union {
-		struct {
-		} unknown;
-		struct {
-			/*
-			 * Children nodes are ctf_expression, field_class_def,
-			 * field_class_alias and field_class_specifier_list.
-			 */
-			struct bt_list_head declaration_list;
-			struct bt_list_head trace;
-			struct bt_list_head env;
-			struct bt_list_head stream;
-			struct bt_list_head event;
-			struct bt_list_head clock;
-			struct bt_list_head callsite;
-		} root;
-		struct {
-			/*
-			 * Children nodes are ctf_expression, field_class_def,
-			 * field_class_alias and field_class_specifier_list.
-			 */
-			struct bt_list_head declaration_list;
-		} event;
-		struct {
-			/*
-			 * Children nodes are ctf_expression, field_class_def,
-			 * field_class_alias and field_class_specifier_list.
-			 */
-			struct bt_list_head declaration_list;
-		} stream;
-		struct {
-			/*
-			 * Children nodes are ctf_expression, field_class_def,
-			 * field_class_alias and field_class_specifier_list.
-			 */
-			struct bt_list_head declaration_list;
-		} env;
-		struct {
-			/*
-			 * Children nodes are ctf_expression, field_class_def,
-			 * field_class_alias and field_class_specifier_list.
-			 */
-			struct bt_list_head declaration_list;
-		} trace;
-		struct {
-			/*
-			 * Children nodes are ctf_expression, field_class_def,
-			 * field_class_alias and field_class_specifier_list.
-			 */
-			struct bt_list_head declaration_list;
-		} clock;
-		struct {
-			/*
-			 * Children nodes are ctf_expression, field_class_def,
-			 * field_class_alias and field_class_specifier_list.
-			 */
-			struct bt_list_head declaration_list;
-		} callsite;
-		struct {
-			struct bt_list_head left;	/* Should be string */
-			struct bt_list_head right;	/* Unary exp. or type */
-		} ctf_expression;
-		struct {
-			ctf_unary type;
-			union {
-				/*
-				 * string for identifier, id_type, keywords,
-				 * string literals and character constants.
-				 */
-				char *string;
-				int64_t signed_constant;
-				uint64_t unsigned_constant;
-				struct ctf_node *sbrac_exp;
-			} u;
-			ctf_unary_link link;
-		} unary_expression;
-		struct {
-			struct ctf_node *field_class_specifier_list;
-			struct bt_list_head field_class_declarators;
-		} field_class_def;
-		/* new type is "alias", existing type "target" */
-		struct {
-			struct ctf_node *field_class_specifier_list;
-			struct bt_list_head field_class_declarators;
-		} field_class_alias_target;
-		struct {
-			struct ctf_node *field_class_specifier_list;
-			struct bt_list_head field_class_declarators;
-		} field_class_alias_name;
-		struct {
-			struct ctf_node *target;
-			struct ctf_node *alias;
-		} field_class_alias;
-		struct {
-			ctf_typespec type;
-			/* For struct, variant and enum */
-			struct ctf_node *node;
-			const char *id_type;
-		} field_class_specifier;
-		struct {
-			/* list of field_class_specifier */
-			struct bt_list_head head;
-		} field_class_specifier_list;
-		struct {
-			unsigned int const_qualifier;
-		} pointer;
-		struct {
-			struct bt_list_head pointers;
-			ctf_typedec type;
-			union {
-				char *id;
-				struct {
-					/* typedec has no pointer list */
-					struct ctf_node *field_class_declarator;
-					/*
-					 * unary expression (value) or
-					 * field_class_specifier_list.
-					 */
-					struct bt_list_head length;
-					/* for abstract type declarator */
-					unsigned int abstract_array;
-				} nested;
-			} u;
-			struct ctf_node *bitfield_len;
-		} field_class_declarator;
-		struct {
-			/* Children nodes are ctf_expression. */
-			struct bt_list_head expressions;
-		} floating_point;
-		struct {
-			/* Children nodes are ctf_expression. */
-			struct bt_list_head expressions;
-		} integer;
-		struct {
-			/* Children nodes are ctf_expression. */
-			struct bt_list_head expressions;
-		} string;
-		struct {
-			char *id;
-			/*
-			 * Range list or single value node. Contains unary
-			 * expressions.
-			 */
-			struct bt_list_head values;
-		} enumerator;
-		struct {
-			char *enum_id;
-			/*
-			 * Either NULL, or points to unary expression or
-			 * field_class_specifier_list.
-			 */
-			struct ctf_node *container_field_class;
-			struct bt_list_head enumerator_list;
-			int has_body;
-		} _enum;
-		struct {
-			struct ctf_node *field_class_specifier_list;
-			struct bt_list_head field_class_declarators;
-		} struct_or_variant_declaration;
-		struct {
-			char *name;
-			char *choice;
-			/*
-			 * list of field_class_def, field_class_alias and
-			 * declarations
-			 */
-			struct bt_list_head declaration_list;
-			int has_body;
-		} variant;
-		struct {
-			char *name;
-			/*
-			 * list of field_class_def, field_class_alias and
-			 * declarations
-			 */
-			struct bt_list_head declaration_list;
-			int has_body;
-			struct bt_list_head min_align;	/* align() attribute */
-		} _struct;
-	} u;
+struct ctf_node
+{
+    /*
+     * Parent node is only set on demand by specific visitor.
+     */
+    struct ctf_node *parent;
+    struct bt_list_head siblings;
+    struct bt_list_head tmp_head;
+    unsigned int lineno;
+    /*
+     * We mark nodes visited in the generate-ir phase (last
+     * phase). We only mark the 1-depth level nodes as visited
+     * (never the root node, and not their sub-nodes). This allows
+     * skipping already visited nodes when doing incremental
+     * metadata append.
+     */
+    int visited;
+
+    enum node_type type;
+    union
+    {
+        struct
+        {
+        } unknown;
+        struct
+        {
+            /*
+             * Children nodes are ctf_expression, field_class_def,
+             * field_class_alias and field_class_specifier_list.
+             */
+            struct bt_list_head declaration_list;
+            struct bt_list_head trace;
+            struct bt_list_head env;
+            struct bt_list_head stream;
+            struct bt_list_head event;
+            struct bt_list_head clock;
+            struct bt_list_head callsite;
+        } root;
+        struct
+        {
+            /*
+             * Children nodes are ctf_expression, field_class_def,
+             * field_class_alias and field_class_specifier_list.
+             */
+            struct bt_list_head declaration_list;
+        } event;
+        struct
+        {
+            /*
+             * Children nodes are ctf_expression, field_class_def,
+             * field_class_alias and field_class_specifier_list.
+             */
+            struct bt_list_head declaration_list;
+        } stream;
+        struct
+        {
+            /*
+             * Children nodes are ctf_expression, field_class_def,
+             * field_class_alias and field_class_specifier_list.
+             */
+            struct bt_list_head declaration_list;
+        } env;
+        struct
+        {
+            /*
+             * Children nodes are ctf_expression, field_class_def,
+             * field_class_alias and field_class_specifier_list.
+             */
+            struct bt_list_head declaration_list;
+        } trace;
+        struct
+        {
+            /*
+             * Children nodes are ctf_expression, field_class_def,
+             * field_class_alias and field_class_specifier_list.
+             */
+            struct bt_list_head declaration_list;
+        } clock;
+        struct
+        {
+            /*
+             * Children nodes are ctf_expression, field_class_def,
+             * field_class_alias and field_class_specifier_list.
+             */
+            struct bt_list_head declaration_list;
+        } callsite;
+        struct
+        {
+            struct bt_list_head left;  /* Should be string */
+            struct bt_list_head right; /* Unary exp. or type */
+        } ctf_expression;
+        struct
+        {
+            ctf_unary type;
+            union
+            {
+                /*
+                 * string for identifier, id_type, keywords,
+                 * string literals and character constants.
+                 */
+                char *string;
+                int64_t signed_constant;
+                uint64_t unsigned_constant;
+                struct ctf_node *sbrac_exp;
+            } u;
+            ctf_unary_link link;
+        } unary_expression;
+        struct
+        {
+            struct ctf_node *field_class_specifier_list;
+            struct bt_list_head field_class_declarators;
+        } field_class_def;
+        /* new type is "alias", existing type "target" */
+        struct
+        {
+            struct ctf_node *field_class_specifier_list;
+            struct bt_list_head field_class_declarators;
+        } field_class_alias_target;
+        struct
+        {
+            struct ctf_node *field_class_specifier_list;
+            struct bt_list_head field_class_declarators;
+        } field_class_alias_name;
+        struct
+        {
+            struct ctf_node *target;
+            struct ctf_node *alias;
+        } field_class_alias;
+        struct
+        {
+            ctf_typespec type;
+            /* For struct, variant and enum */
+            struct ctf_node *node;
+            const char *id_type;
+        } field_class_specifier;
+        struct
+        {
+            /* list of field_class_specifier */
+            struct bt_list_head head;
+        } field_class_specifier_list;
+        struct
+        {
+            unsigned int const_qualifier;
+        } pointer;
+        struct
+        {
+            struct bt_list_head pointers;
+            ctf_typedec type;
+            union
+            {
+                char *id;
+                struct
+                {
+                    /* typedec has no pointer list */
+                    struct ctf_node *field_class_declarator;
+                    /*
+                     * unary expression (value) or
+                     * field_class_specifier_list.
+                     */
+                    struct bt_list_head length;
+                    /* for abstract type declarator */
+                    unsigned int abstract_array;
+                } nested;
+            } u;
+            struct ctf_node *bitfield_len;
+        } field_class_declarator;
+        struct
+        {
+            /* Children nodes are ctf_expression. */
+            struct bt_list_head expressions;
+        } floating_point;
+        struct
+        {
+            /* Children nodes are ctf_expression. */
+            struct bt_list_head expressions;
+        } integer;
+        struct
+        {
+            /* Children nodes are ctf_expression. */
+            struct bt_list_head expressions;
+        } string;
+        struct
+        {
+            char *id;
+            /*
+             * Range list or single value node. Contains unary
+             * expressions.
+             */
+            struct bt_list_head values;
+        } enumerator;
+        struct
+        {
+            char *enum_id;
+            /*
+             * Either NULL, or points to unary expression or
+             * field_class_specifier_list.
+             */
+            struct ctf_node *container_field_class;
+            struct bt_list_head enumerator_list;
+            int has_body;
+        } _enum;
+        struct
+        {
+            struct ctf_node *field_class_specifier_list;
+            struct bt_list_head field_class_declarators;
+        } struct_or_variant_declaration;
+        struct
+        {
+            char *name;
+            char *choice;
+            /*
+             * list of field_class_def, field_class_alias and
+             * declarations
+             */
+            struct bt_list_head declaration_list;
+            int has_body;
+        } variant;
+        struct
+        {
+            char *name;
+            /*
+             * list of field_class_def, field_class_alias and
+             * declarations
+             */
+            struct bt_list_head declaration_list;
+            int has_body;
+            struct bt_list_head min_align; /* align() attribute */
+        } _struct;
+    } u;
 };
 
-struct ctf_ast {
-	struct ctf_node root;
+struct ctf_ast
+{
+    struct ctf_node root;
 };
 
 const char *node_type(struct ctf_node *node);
 
 struct meta_log_config;
 
-BT_HIDDEN
-struct ctf_visitor_generate_ir *ctf_visitor_generate_ir_create(
-		const struct ctf_metadata_decoder_config *config);
+struct ctf_visitor_generate_ir *
+ctf_visitor_generate_ir_create(const struct ctf_metadata_decoder_config *config);
 
 void ctf_visitor_generate_ir_destroy(struct ctf_visitor_generate_ir *visitor);
 
-BT_HIDDEN
-bt_trace_class *ctf_visitor_generate_ir_get_ir_trace_class(
-		struct ctf_visitor_generate_ir *visitor);
+bt_trace_class *ctf_visitor_generate_ir_get_ir_trace_class(struct ctf_visitor_generate_ir *visitor);
 
-BT_HIDDEN
-struct ctf_trace_class *ctf_visitor_generate_ir_borrow_ctf_trace_class(
-		struct ctf_visitor_generate_ir *visitor);
+struct ctf_trace_class *
+ctf_visitor_generate_ir_borrow_ctf_trace_class(struct ctf_visitor_generate_ir *visitor);
 
-BT_HIDDEN
 int ctf_visitor_generate_ir_visit_node(struct ctf_visitor_generate_ir *visitor,
-		struct ctf_node *node);
+                                       struct ctf_node *node);
 
-BT_HIDDEN
-int ctf_visitor_semantic_check(int depth, struct ctf_node *node,
-		struct meta_log_config *log_cfg);
+int ctf_visitor_semantic_check(int depth, struct ctf_node *node, struct meta_log_config *log_cfg);
 
-BT_HIDDEN
-int ctf_visitor_parent_links(int depth, struct ctf_node *node,
-		struct meta_log_config *log_cfg);
+int ctf_visitor_parent_links(int depth, struct ctf_node *node, struct meta_log_config *log_cfg);
 
-static inline
-char *ctf_ast_concatenate_unary_strings(struct bt_list_head *head)
+static inline char *ctf_ast_concatenate_unary_strings(struct bt_list_head *head)
 {
-	int i = 0;
-	GString *str;
-	struct ctf_node *node;
-
-	str = g_string_new(NULL);
-	BT_ASSERT(str);
-
-	bt_list_for_each_entry(node, head, siblings) {
-		char *src_string;
-
-		if (
-			node->type != NODE_UNARY_EXPRESSION ||
-			node->u.unary_expression.type != UNARY_STRING ||
-			!(
-				(
-					node->u.unary_expression.link !=
-					UNARY_LINK_UNKNOWN
-				) ^ (i == 0)
-			)
-		) {
-			goto error;
-		}
-
-		switch (node->u.unary_expression.link) {
-		case UNARY_DOTLINK:
-			g_string_append(str, ".");
-			break;
-		case UNARY_ARROWLINK:
-			g_string_append(str, "->");
-			break;
-		case UNARY_DOTDOTDOT:
-			g_string_append(str, "...");
-			break;
-		default:
-			break;
-		}
-
-		src_string = node->u.unary_expression.u.string;
-		g_string_append(str, src_string);
-		i++;
-	}
-
-	/* Destroys the container, returns the underlying string */
-	return g_string_free(str, FALSE);
+    int i = 0;
+    GString *str;
+    struct ctf_node *node;
+
+    str = g_string_new(NULL);
+    BT_ASSERT(str);
+
+    bt_list_for_each_entry (node, head, siblings) {
+        char *src_string;
+
+        if (node->type != NODE_UNARY_EXPRESSION || node->u.unary_expression.type != UNARY_STRING ||
+            !((node->u.unary_expression.link != UNARY_LINK_UNKNOWN) ^ (i == 0))) {
+            goto error;
+        }
+
+        switch (node->u.unary_expression.link) {
+        case UNARY_DOTLINK:
+            g_string_append(str, ".");
+            break;
+        case UNARY_ARROWLINK:
+            g_string_append(str, "->");
+            break;
+        case UNARY_DOTDOTDOT:
+            g_string_append(str, "...");
+            break;
+        default:
+            break;
+        }
+
+        src_string = node->u.unary_expression.u.string;
+        g_string_append(str, src_string);
+        i++;
+    }
+
+    /* Destroys the container, returns the underlying string */
+    return g_string_free(str, FALSE);
 
 error:
-	/* This always returns NULL */
-	return g_string_free(str, TRUE);
+    /* This always returns NULL */
+    return g_string_free(str, TRUE);
 }
 
-static inline
-int ctf_ast_get_unary_uuid(struct bt_list_head *head,
-		bt_uuid_t uuid, int log_level, bt_self_component *self_comp)
+#ifndef BT_COMP_LOG_CUR_LVL
+#    define BT_AST_LOG_LEVEL_UNUSED_ATTR __attribute__((unused))
+#else
+#    define BT_AST_LOG_LEVEL_UNUSED_ATTR
+#endif
+
+static inline int ctf_ast_get_unary_uuid(struct bt_list_head *head, bt_uuid_t uuid,
+                                         int log_level BT_AST_LOG_LEVEL_UNUSED_ATTR,
+                                         bt_self_component *self_comp BT_AST_LOG_LEVEL_UNUSED_ATTR)
 {
-	int i = 0;
-	int ret = 0;
-	struct ctf_node *node;
-
-	bt_list_for_each_entry(node, head, siblings) {
-		int uexpr_type = node->u.unary_expression.type;
-		int uexpr_link = node->u.unary_expression.link;
-		const char *src_string;
-
-		if (node->type != NODE_UNARY_EXPRESSION ||
-				uexpr_type != UNARY_STRING ||
-				uexpr_link != UNARY_LINK_UNKNOWN ||
-				i != 0) {
-			ret = -EINVAL;
-			goto end;
-		}
-
-		src_string = node->u.unary_expression.u.string;
-		ret = bt_uuid_from_str(src_string, uuid);
-		if (ret) {
+    int i = 0;
+    int ret = 0;
+    struct ctf_node *node;
+
+    bt_list_for_each_entry (node, head, siblings) {
+        int uexpr_type = node->u.unary_expression.type;
+        int uexpr_link = node->u.unary_expression.link;
+        const char *src_string;
+
+        if (node->type != NODE_UNARY_EXPRESSION || uexpr_type != UNARY_STRING ||
+            uexpr_link != UNARY_LINK_UNKNOWN || i != 0) {
+            ret = -EINVAL;
+            goto end;
+        }
+
+        src_string = node->u.unary_expression.u.string;
+        ret = bt_uuid_from_str(src_string, uuid);
+        if (ret) {
 #ifdef BT_COMP_LOG_CUR_LVL
-			BT_COMP_LOG_CUR_LVL(BT_LOG_ERROR, log_level,
-				self_comp,
-				"Cannot parse UUID: uuid=\"%s\"", src_string);
+            BT_COMP_LOG_CUR_LVL(BT_LOG_ERROR, log_level, self_comp,
+                                "Cannot parse UUID: uuid=\"%s\"", src_string);
 #endif
-			goto end;
-		}
-	}
+            goto end;
+        }
+    }
 
 end:
-	return ret;
+    return ret;
 }
 
 #endif /* _CTF_AST_H */