X-Git-Url: http://git.efficios.com/?p=babeltrace.git;a=blobdiff_plain;f=types%2Ftypes.c;h=961337800a1e45472a2abd175de21448726884d5;hp=91d6b211d118acaafe50a0a9f29bc5f1b12de329;hb=c054553dac076f91196b372fa19efaf2adc4e4f9;hpb=ccd7e1c86f36342b0b06651cc52df86bb663c271 diff --git a/types/types.c b/types/types.c index 91d6b211..96133780 100644 --- a/types/types.c +++ b/types/types.c @@ -5,7 +5,7 @@ * * Types registry. * - * Copyright 2010 - Mathieu Desnoyers + * Copyright 2010, 2011 - Mathieu Desnoyers * * Permission is hereby granted, free of charge, to any person obtaining a copy * of this software and associated documentation files (the "Software"), to deal @@ -18,49 +18,91 @@ * all copies or substantial portions of the Software. */ -#include +#include #include #include -/* - * 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); }