← Back to branch summary

~ubuntu-branches/ubuntu/trusty/cloog/trusty

« back to all changes in this revision

Viewing changes to isl/isl_name.c

  • Committer: Package Import Robot
  • Author(s): Matthias Klose
  • Date: 2011-12-15 18:39:17 UTC
  • mfrom: (1.1.1)
  • Revision ID: package-import@ubuntu.com-20111215183917-uqggmujou8wna9js
Tags: 0.17.0-1
New upstream version.

Show diffs side-by-side

added added

removed removed

Lines of Context:
isl/isl_name.c
1
 
/*
2
 
 * Copyright 2008-2009 Katholieke Universiteit Leuven
3
 
 *
4
 
 * Use of this software is governed by the GNU LGPLv2.1 license
5
 
 *
6
 
 * Written by Sven Verdoolaege, K.U.Leuven, Departement
7
 
 * Computerwetenschappen, Celestijnenlaan 200A, B-3001 Leuven, Belgium
8
 
 */
9
 
 
10
 
#include <string.h>
11
 
#include <isl_ctx_private.h>
12
 
#include "isl_name.h"
13
 
 
14
 
struct isl_name *isl_name_alloc(struct isl_ctx *ctx, const char *s)
15
 
{
16
 
        const char *copy = strdup(s);
17
 
        struct isl_name *name;
18
 
 
19
 
        if (!copy)
20
 
                return NULL;
21
 
        name = isl_alloc_type(ctx, struct isl_name);
22
 
        if (!name)
23
 
                goto error;
24
 
 
25
 
        name->ref = 1;
26
 
        name->name = copy;
27
 
 
28
 
        name->hash = isl_hash_init();
29
 
        name->hash = isl_hash_string(name->hash, s);
30
 
 
31
 
        return name;
32
 
error:
33
 
        free((char *)copy);
34
 
        return NULL;
35
 
}
36
 
 
37
 
static int isl_name_has_name(const void *entry, const void *val)
38
 
{
39
 
        struct isl_name *name = (struct isl_name *)entry;
40
 
        const char *s = (const char *)val;
41
 
 
42
 
        return !strcmp(name->name, s);
43
 
}
44
 
 
45
 
struct isl_name *isl_name_get(struct isl_ctx *ctx, const char *name)
46
 
{
47
 
        struct isl_hash_table_entry *entry;
48
 
        uint32_t name_hash;
49
 
 
50
 
        name_hash = isl_hash_string(isl_hash_init(), name);
51
 
        entry = isl_hash_table_find(ctx, &ctx->name_hash, name_hash,
52
 
                                        isl_name_has_name, name, 1);
53
 
        if (!entry)
54
 
                return NULL;
55
 
        if (entry->data)
56
 
                return isl_name_copy(ctx, entry->data);
57
 
        entry->data = isl_name_alloc(ctx, name);
58
 
        if (!entry->data)
59
 
                ctx->name_hash.n--;
60
 
        return entry->data;
61
 
}
62
 
 
63
 
struct isl_name *isl_name_copy(struct isl_ctx *ctx, struct isl_name *name)
64
 
{
65
 
        if (!name)
66
 
                return NULL;
67
 
 
68
 
        name->ref++;
69
 
        return name;
70
 
}
71
 
 
72
 
static int isl_name_eq(const void *entry, const void *name)
73
 
{
74
 
        return entry == name;
75
 
}
76
 
 
77
 
uint32_t isl_hash_name(uint32_t hash, struct isl_name *name)
78
 
{
79
 
        if (name)
80
 
                isl_hash_hash(hash, name->hash);
81
 
 
82
 
        return hash;
83
 
}
84
 
 
85
 
void isl_name_free(struct isl_ctx *ctx, struct isl_name *name)
86
 
{
87
 
        uint32_t name_hash;
88
 
        struct isl_hash_table_entry *entry;
89
 
 
90
 
        if (!name)
91
 
                return;
92
 
 
93
 
        if (--name->ref > 0)
94
 
                return;
95
 
 
96
 
        name_hash = isl_hash_string(isl_hash_init(), name->name);
97
 
        entry = isl_hash_table_find(ctx, &ctx->name_hash, name_hash,
98
 
                                        isl_name_eq, name, 0);
99
 
        isl_assert(ctx, entry, return);
100
 
        isl_hash_table_remove(ctx, &ctx->name_hash, entry);
101
 
 
102
 
        free((char *)name->name);
103
 
        free(name);
104
 
}