+ g_array_set_size(array, array->len + 1);
+ range = &g_array_index(array, struct enum_range, array->len - 1);
+ range->start._unsigned = start;
+ range->end._unsigned = end;
+}
+
+size_t enum_get_nr_enumerators(struct type_enum *enum_type)
+{
+ return g_hash_table_size(enum_type->table.quark_to_range_set);
+}
+
+void enum_copy(struct stream_pos *dest, const struct format *fdest,
+ struct stream_pos *src, const struct format *fsrc,
+ struct declaration *declaration)
+{
+ struct declaration_enum *_enum =
+ container_of(declaration, struct declaration_enum, p);
+ struct type_enum *enum_type= _enum->type;
+ GArray *array;
+ GQuark v;
+
+ array = fsrc->enum_read(src, enum_type);
+ assert(array);
+ /* unref previous array */
+ if (_enum->value)
+ g_array_unref(_enum->value);
+ _enum->value = array;
+ /*
+ * Arbitrarily choose the first one.
+ * TODO: use direct underlying type read/write intead. Not doing it for
+ * now to test enum read and write code.
+ */
+ v = g_array_index(array, GQuark, 0);
+ return fdest->enum_write(dest, enum_type, v);
+}
+
+static
+void _enum_type_free(struct type *type)
+{
+ struct type_enum *enum_type =
+ container_of(type, struct type_enum, p);
+ struct enum_range_to_quark *iter, *tmp;
+
+ g_hash_table_destroy(enum_type->table.value_to_quark_set);
+ cds_list_for_each_entry_safe(iter, tmp, &enum_type->table.range_to_quark, node) {
+ cds_list_del(&iter->node);
+ g_free(iter);
+ }
+ g_hash_table_destroy(enum_type->table.quark_to_range_set);
+ type_unref(&enum_type->integer_type->p);
+ g_free(enum_type);
+}
+
+struct type_enum *
+ _enum_type_new(const char *name, struct type_integer *integer_type)
+{
+ struct type_enum *enum_type;
+
+ enum_type = g_new(struct type_enum, 1);
+
+ enum_type->table.value_to_quark_set = g_hash_table_new_full(enum_val_hash,
+ enum_val_equal,
+ enum_val_free,
+ enum_range_set_free);
+ CDS_INIT_LIST_HEAD(&enum_type->table.range_to_quark);
+ enum_type->table.quark_to_range_set = g_hash_table_new_full(g_int_hash,
+ g_int_equal,
+ NULL, enum_range_set_free);
+ type_ref(&integer_type->p);
+ enum_type->integer_type = integer_type;
+ enum_type->p.id = CTF_TYPE_ENUM;
+ enum_type->p.name = g_quark_from_string(name);
+ enum_type->p.alignment = 1;
+ enum_type->p.copy = enum_copy;
+ enum_type->p.type_free = _enum_type_free;
+ enum_type->p.declaration_new = _enum_declaration_new;
+ enum_type->p.declaration_free = _enum_declaration_free;
+ enum_type->p.ref = 1;
+ return enum_type;
+}
+
+static
+struct declaration *
+ _enum_declaration_new(struct type *type,
+ struct declaration_scope *parent_scope)
+{
+ struct type_enum *enum_type =
+ container_of(type, struct type_enum, p);
+ struct declaration_enum *_enum;
+ struct declaration *declaration_integer_parent;
+
+ _enum = g_new(struct declaration_enum, 1);
+ type_ref(&enum_type->p);
+ _enum->p.type = type;
+ _enum->type = enum_type;
+ _enum->p.ref = 1;
+ _enum->value = NULL;
+ declaration_integer_parent =
+ enum_type->integer_type->p.declaration_new(&enum_type->integer_type->p,
+ parent_scope);
+ _enum->integer = container_of(declaration_integer_parent,
+ struct declaration_integer, p);
+ return &_enum->p;
+}
+
+static
+void _enum_declaration_free(struct declaration *declaration)
+{
+ struct declaration_enum *_enum =
+ container_of(declaration, struct declaration_enum, p);
+
+ declaration_unref(&_enum->integer->p);
+ type_unref(_enum->p.type);
+ if (_enum->value)
+ g_array_unref(_enum->value);
+ g_free(_enum);