*
* Types registry.
*
- * Copyright 2010 - Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
+ * Copyright 2010, 2011 - Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
*
* Permission is hereby granted, free of charge, to any person obtaining a copy
* of this software and associated documentation files (the "Software"), to deal
* all copies or substantial portions of the Software.
*/
-#include <ctf/ctf-types.h>
+#include <babeltrace/format.h>
#include <glib.h>
#include <errno.h>
-/*
- * Type hash table contains the registered types. Type registration is typically
- * performed by a type plugin.
- * TODO: support plugin unload (unregistration of types).
- */
-GHashTable *types;
+static
+struct type_class *lookup_type_class_scope(GQuark qname,
+ struct declaration_scope *scope)
+{
+ return g_hash_table_lookup(scope->type_classes,
+ (gconstpointer) (unsigned long) qname);
+}
-struct type_class *ctf_lookup_type(GQuark qname)
+struct type_class *lookup_type_class(GQuark qname,
+ struct declaration_scope *scope)
{
- return g_hash_table_lookup(type_classes,
- (gconstpointer) (unsigned long) qname)
+ struct type_class *tc;
+
+ while (scope) {
+ tc = lookup_type_class_scope(qname, scope);
+ if (tc)
+ return tc;
+ scope = scope->parent_scope;
+ }
+ return NULL;
}
-static void free_type(struct type_class *type_class)
+static void free_type_class(struct type_class *type_class)
{
- type_class->free(type_class);
+ type_class->class_free(type_class);
}
-int ctf_register_type(struct type_class *type_class)
+static void free_type(struct type *type)
{
- if (ctf_lookup_type_class(type_class->name))
+ type->p.type_free(type);
+}
+
+int register_type_class(struct type_class *type_class,
+ struct declaration_scope *scope)
+{
+ /* Only lookup in local scope */
+ if (lookup_type_class_scope(type_class->name, scope))
return -EEXIST;
- g_hash_table_insert(type_classes,
- (gconstpointer) (unsigned long) type_class->name,
+ g_hash_table_insert(scope->type_classes,
+ (gpointer) (unsigned long) type_class->name,
type_class);
return 0;
}
-int ctf_init_types(void)
+void type_class_ref(struct type_class *type_class)
{
- type_classes = g_hash_table_new_full(g_direct_hash, g_direct_equal,
- NULL, free_type);
- if (!type_classes)
- return -ENOMEM;
- return 0;
+ type_class->ref++;
+}
+
+void type_class_unref(struct type_class *type_class)
+{
+ if (!--type_class->ref)
+ free_type_class(type_class);
+}
+
+void type_ref(struct type *type)
+{
+ type->ref++;
+}
+
+void type_unref(struct type *type)
+{
+ if (!--type->ref)
+ free_type(type);
+}
+
+struct declaration_scope *
+new_declaration_scope(struct declaration_scope *parent_scope)
+{
+ struct declaration_scope *scope = g_new(struct declaration_scope, 1);
+
+ scope->type_classes = g_hash_table_new_full(g_direct_hash,
+ g_direct_equal, NULL,
+ (GDestroyNotify) type_class_unref);
+ scope->parent_scope = parent_scope;
+ return scope;
}
-int ctf_finalize_types(void)
+void free_declaration_scope(struct declaration_scope *scope)
{
- g_hash_table_destroy(type_classes);
+ g_hash_table_destroy(scope->type_classes);
+ g_free(scope);
}