*** empty log message ***
[libfirm] / ir / ident / ident.h
1 /* Declarations for ident.
2    Copyright (C) 1995, 1996 Markus Armbruster */
3
4 /* Copyright (C) 1998 - 2000 by Universitaet Karlsruhe
5 ** All rights reserved.
6 **
7 ** Authors: Martin Trapp, Christian Schaefer
8 */
9
10 # ifndef _IDENT_H_
11 # define _IDENT_H_
12
13 #include <assert.h>
14 #include <stddef.h>
15 #include "misc.h"
16 #include "debug.h"
17 #include "set.h"
18
19 # include "xprintf.h"
20 # include "xp_help.h"
21
22 /* Identifiers */
23 typedef const struct set_entry ident;
24
25 /* Caution: strings _not_ zero-terminated! */
26 #define ID_FROM_STR(str, len) \
27   (assert ((len) > 0), \
28    (const set_entry *)set_hinsert (id_set, (str), (len), ID_HASH ((str), (len))))
29 #define ID_TO_STR(id) ((const char *)&(id)->dptr[0])
30 #define ID_TO_STRLEN(id) ((id)->size)
31 #define ID_TO_HASH(id) ((long)(id) + (id)->hash)
32
33 ident *new_id_derived (const char *pfx, ident *);
34 ident *new_id_internal (void);
35 bool id_is_internal (ident *);
36 void id_init (void);
37
38 #ifdef NDEBUG
39 # define ID_VRFY(id) ((void)0)
40 # define IDS_VRFY(id) ((void)0)
41 #else
42 # define ID_VRFY(id) \
43     assert (   (id) \
44             && (   !d_ (df_vrfy_level, 1) \
45                 || (ID_FROM_STR (ID_TO_STR((id)), ID_TO_STRLEN((id))) == (id))))
46 # define IDS_VRFY(id) ids_vrfy ((id))
47 void ids_vrfy (ident **id);
48 #endif
49
50 #ifdef STATS
51 # define id_stats() set_stats (id_set)
52 #else
53 # define id_stats() ((void)0)
54 #endif
55
56 /* Private */
57
58 /* @@@ tune */
59 #define ID_HASH(str, len) \
60   (((  ((unsigned char *)(str))[0] * 33 \
61      + ((unsigned char *)(str))[(len)>>1]) * 31 \
62     + ((unsigned char *)(str))[(len)-1]) * 9 \
63    + (len))
64
65 extern set *id_set;
66
67
68 # define id_from_str  ID_FROM_STR
69 # define id_to_str    ID_TO_STR
70 # define id_to_strlen ID_TO_STRLEN
71
72
73 int ident_print (XP_PAR1, const xprintf_info *, XP_PARN);
74
75 # endif /* _IDENT_H_ */