#pragma prototyped
#ifndef _HASH_H
#define _HASH_H
#define HASH_ALLOCATE (1L<<0)
#define HASH_FIXED (1L<<1)
#define HASH_HASHED (1L<<6)
#define HASH_RESIZE (1L<<2)
#define HASH_SCANNING (1L<<3)
#define HASH_SCOPE (1L<<4)
#define HASH_STATIC (1L<<5)
#define HASH_CREATE (1L<<8)
#define HASH_DELETE (1L<<9)
#define HASH_LOOKUP 0
#define HASH_RENAME (1L<<7)
#define HASH_BUCKET (1L<<11)
#define HASH_INSTALL (1L<<12)
#define HASH_NOSCOPE (1L<<13)
#define HASH_OPAQUE (1L<<14)
#define HASH_VALUE (1L<<15)
#define HASH_SIZE(n) (((long)(n))<<16)
#define HASH_SIZEOF(f) ((((long)(f))>>16)&0xffff)
#define HASH_DELETED ((unsigned long)1<<(8*sizeof(int)-1))
#define HASH_KEEP (1L<<(8*sizeof(int)-2))
#define HASH_HIDDEN (1L<<(8*sizeof(int)-3))
#define HASH_HIDES (1L<<(8*sizeof(int)-4))
#define HASH_OPAQUED (1L<<(8*sizeof(int)-5))
#define HASH_FREENAME (1L<<(8*sizeof(int)-6))
#define HASH_RESET (HASH_RESIZE|HASH_SCOPE|HASH_STATIC|HASH_VALUE)
#define HASH_INTERNAL (HASH_BUCKET|HASH_RESIZE|HASH_SCANNING|HASH_STATIC)
#define HASH_FLAGS (HASH_DELETED|HASH_FREENAME|HASH_HIDDEN|HASH_HIDES|HASH_KEEP|HASH_OPAQUED)
#define HASH_alloc 1
#define HASH_clear 2
#define HASH_compare 3
#define HASH_free 4
#define HASH_hash 5
#define HASH_meanchain 6
#define HASH_name 7
#define HASH_namesize 8
#define HASH_set 9
#define HASH_size 10
#define HASH_table 11
#define HASH_va_list 12
#define HASH_bucketsize 13
#define HASH_region 14
#include <hashpart.h>
#define hashclear(t,f) ((t)->flags &= ~((f) & ~HASH_INTERNAL))
#define hashcover(b) (((b)->hash&HASH_HIDES)?(Hash_bucket_t*)((b)->name):(Hash_bucket_t*)0)
#define hashdel(t,n) hashlook(t, (char*)(n), HASH_DELETE, (char*)0)
#define hashget(t,n) hashlook(t, (char*)(n), HASH_LOOKUP|HASH_VALUE, (char*)0)
#define hashgetbucket(s) ((Hash_bucket_t*)((s)-((sizeof(Hash_bucket_t)+sizeof(char*)-1)/sizeof(char*))*sizeof(char*)))
#define hashkeep(b) ((b)->hash|=HASH_KEEP)
#define hashname(b) ((((b)->hash&HASH_HIDES)?((Hash_bucket_t*)((b)->name)):(b))->name)
#define hashput(t,n,v) hashlook(t, (char*)(n), HASH_CREATE|HASH_VALUE, (char*)(v))
#define hashref(t,n) hashlook(t, (char*)(n), HASH_LOOKUP|HASH_INTERNAL|HASH_VALUE, (char*)0)
#define hashscope(t) ((t)->scope)
#define hashset(t,f) ((t)->flags |= ((f) & ~HASH_INTERNAL))
#define Hashbin_t Hash_bucket_t
#define HASHBUCKET Hash_bucket_t
#define Hashhdr_t Hash_header_t
#define HASHHEADER Hash_header_t
#define Hashpos_t Hash_position_t
#define HASHPOSITION Hash_position_t
#define Hashtab_t Hash_table_t
#define HASHTABLE Hash_table_t
#define vhashalloc hashvalloc
#define hashvalloc(t,a) hashalloc(t,HASH_va_list,a,0)
typedef struct Hash_bucket Hash_bucket_t;
typedef struct Hash_root Hash_root_t;
typedef struct Hash_table Hash_table_t;
#define HASH_HEADER \
Hash_bucket_t* next; \
unsigned int hash; \
char* name
#define HASH_DEFAULT \
char* value
typedef struct
{
HASH_HEADER;
} Hash_header_t;
struct Hash_bucket
{
HASH_HEADER;
HASH_DEFAULT;
};
typedef struct
{
Hash_bucket_t* bucket;
#ifdef _HASH_POSITION_PRIVATE_
_HASH_POSITION_PRIVATE_
#endif
} Hash_position_t;
typedef struct
{
Hash_table_t* table;
Hash_bucket_t* bucket;
#ifdef _HASH_LAST_PRIVATE_
_HASH_LAST_PRIVATE_
#endif
} Hash_last_t;
struct Hash_root
{
int accesses;
int collisions;
int flags;
Hash_last_t last;
void* context;
#ifdef _HASH_ROOT_PRIVATE_
_HASH_ROOT_PRIVATE_
#endif
};
struct Hash_table
{
Hash_root_t* root;
int size;
int buckets;
char* name;
Hash_table_t* scope;
short flags;
#ifdef _HASH_TABLE_PRIVATE_
_HASH_TABLE_PRIVATE_
#endif
};
#if _BLD_ast && defined(__EXPORT__)
#define extern __EXPORT__
#endif
extern Hash_table_t* hashalloc(Hash_table_t*, ...);
extern void hashdone(Hash_position_t*);
extern void hashdump(Hash_table_t*, int);
extern Hash_table_t* hashfree(Hash_table_t*);
extern Hash_bucket_t* hashlast(Hash_table_t*);
extern char* hashlook(Hash_table_t*, const char*, long, const char*);
extern Hash_bucket_t* hashnext(Hash_position_t*);
extern Hash_position_t* hashscan(Hash_table_t*, int);
extern void hashsize(Hash_table_t*, int);
extern Hash_table_t* hashview(Hash_table_t*, Hash_table_t*);
extern int hashwalk(Hash_table_t*, int, int (*)(const char*, char*, void*), void*);
#undef extern
#endif