irdump: dump interfaces take const ir_node* now
[libfirm] / ir / adt / eset.c
1 /*
2  * Copyright (C) 1995-2011 University of Karlsruhe.  All right reserved.
3  *
4  * This file is part of libFirm.
5  *
6  * This file may be distributed and/or modified under the terms of the
7  * GNU General Public License version 2 as published by the Free Software
8  * Foundation and appearing in the file LICENSE.GPL included in the
9  * packaging of this file.
10  *
11  * Licensees holding valid libFirm Professional Edition licenses may use
12  * this file in accordance with the libFirm Commercial License.
13  * Agreement provided with the Software.
14  *
15  * This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
16  * WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR
17  * PURPOSE.
18  */
19
20 /**
21  * @file
22  * @brief       A pointer hash-set (WARNING: deprecated!)
23  * @author      Hubert Schmid
24  * @date        09.06.2002
25  */
26 #include "config.h"
27
28 #include "eset.h"
29 #include "set.h"
30 #include "hashptr.h"
31
32 struct eset {
33   int dummy; /* dummy entry */
34 };
35
36
37 #define INITIAL_SLOTS 64
38
39 static int pcmp(const void *p1, const void *p2, size_t size)
40 {
41   const void **q1 = (const void **)p1;
42   const void **q2 = (const void **)p2;
43   (void) size;
44
45   return *q1 != *q2;
46 }
47
48
49 eset * eset_create(void)
50 {
51   return (eset *) new_set(pcmp, INITIAL_SLOTS);
52 }
53
54
55 eset * eset_copy(eset *source)
56 {
57   eset * ret = eset_create();
58   void * p;
59   for (p = eset_first(source); p; p = eset_next(source)) {
60     eset_insert(ret, p);
61   }
62   return ret;
63 }
64
65
66 void eset_destroy(eset *s)
67 {
68   del_set((set *)s);
69 }
70
71 /* Returns the number of elements in the set. */
72 size_t eset_count(eset *s)
73 {
74   return set_count((set *)s);
75 }
76
77 void eset_insert(eset *s, void *p)
78 {
79   if (!eset_contains(s, p)) {
80     set_insert((set *)s, &p, sizeof(p), HASH_PTR(p));
81   }
82 }
83
84
85 int eset_contains(eset *s, void *p)
86 {
87   return set_find((set *)s, &p, sizeof(p), HASH_PTR(p)) != NULL;
88 }
89
90
91 void * eset_first(eset *s)
92 {
93   void * p = set_first((set *) s);
94   return p == NULL ? NULL : *((void **)p);
95 }
96
97
98 void * eset_next(eset *s)
99 {
100   void *p = set_next((set *) s);
101   return p == NULL ? NULL : *((void **)p);
102 }
103
104
105 void eset_insert_all(eset *target, eset *source)
106 {
107   void *p;
108   for (p = eset_first(source); p; p = eset_next(source)) {
109     eset_insert(target, p);
110   }
111 }