2 * sdbm - ndbm work-alike hashed database library
3 * based on Per-Ake Larson's Dynamic Hashing algorithms. BIT 18 (1978).
4 * author: oz@nexus.yorku.ca
5 * status: public domain.
9 #define PAIRMAX 1008 /* arbitrary on PBLKSIZ-N */
10 #define SPLTMAX 10 /* maximum allowed splits */
11 /* for a single insertion */
12 #define DIRFEXT ".dir"
13 #define PAGFEXT ".pag"
16 int dirf; /* directory file descriptor */
17 int pagf; /* page file descriptor */
18 int flags; /* status/error flags, see below */
19 long maxbno; /* size of dirfile in bits */
20 long curbit; /* current bit number */
21 long hmask; /* current hash mask */
22 long blkptr; /* current block for nextkey */
23 int keyptr; /* current key for nextkey */
24 long blkno; /* current page to read/write */
25 long pagbno; /* current page in pagbuf */
26 char pagbuf[PBLKSIZ]; /* page file block buffer */
27 long dirbno; /* current block in dirbuf */
28 char dirbuf[DBLKSIZ]; /* directory file block buffer */
31 #define DBM_RDONLY 0x1 /* data base open read-only */
32 #define DBM_IOERR 0x2 /* data base I/O error */
37 #define sdbm_rdonly(db) ((db)->flags & DBM_RDONLY)
38 #define sdbm_error(db) ((db)->flags & DBM_IOERR)
40 #define sdbm_clearerr(db) ((db)->flags &= ~DBM_IOERR) /* ouch */
42 #define sdbm_dirfno(db) ((db)->dirf)
43 #define sdbm_pagfno(db) ((db)->pagf)
50 extern datum nullitem;
67 extern DBM *sdbm_open proto((char *, int, int));
68 extern void sdbm_close proto((DBM *));
69 extern datum sdbm_fetch proto((DBM *, datum));
70 extern int sdbm_delete proto((DBM *, datum));
71 extern int sdbm_store proto((DBM *, datum, datum, int));
72 extern datum sdbm_firstkey proto((DBM *));
73 extern datum sdbm_nextkey proto((DBM *));
78 extern DBM *sdbm_prep proto((char *, char *, int, int));
79 extern long sdbm_hash proto((char *, int));
82 #define dbm_open sdbm_open;
83 #define dbm_close sdbm_close;
84 #define dbm_fetch sdbm_fetch;
85 #define dbm_store sdbm_store;
86 #define dbm_delete sdbm_delete;
87 #define dbm_firstkey sdbm_firstkey;
88 #define dbm_nextkey sdbm_nextkey;
89 #define dbm_error sdbm_error;
90 #define dbm_clearerr sdbm_clearerr;
93 /* Most of the following is stolen from perl.h. */
94 #ifndef H_PERL /* Include guard */
97 * The following contortions are brought to you on behalf of all the
98 * standards, semi-standards, de facto standards, not-so-de-facto standards
99 * of the world, as well as all the other botches anyone ever thought of.
100 * The basic theory is that if we work hard enough here, the rest of the
101 * code can be a lot prettier. Well, so much for theory. Sorry, Henry...
107 # include <net/errno.h>
113 # define malloc Mymalloc
114 # define realloc Myremalloc
117 # define safemalloc malloc
118 # define saferealloc realloc
119 # define safefree free
122 #if defined(__STDC__) || defined(_AIX) || defined(__stdc__) || defined(__cplusplus)
123 # define STANDARD_C 1
135 # ifdef PARAM_NEEDS_TYPES
136 # include <sys/types.h>
138 # include <sys/param.h>
141 #ifndef _TYPES_ /* If types.h defines this it's easy. */
142 # ifndef major /* Does everyone's types.h define this? */
143 # include <sys/types.h>
147 #include <sys/stat.h>
151 # define SEEK_SET L_SET
153 # define SEEK_SET 0 /* Wild guess. */
157 /* Use all the "standard" definitions? */
158 #if defined(STANDARD_C) && defined(I_STDLIB)
160 #endif /* STANDARD_C */
162 #define MEM_SIZE Size_t
174 #if defined(mips) && defined(ultrix) && !defined(__STDC__)
179 # if !defined(STANDARD_C) && !defined(I_STRING) && !defined(I_MEMORY)
181 extern char * memcpy _((char*, char*, int));
187 # define memcpy(d,s,l) bcopy(s,d,l)
189 # define memcpy(d,s,l) my_bcopy(s,d,l)
192 #endif /* HAS_MEMCPY */
195 # if !defined(STANDARD_C) && !defined(I_STRING) && !defined(I_MEMORY)
197 extern char *memset _((char*, int, int));
200 # define memzero(d,l) memset(d,0,l)
204 # define memzero(d,l) bzero(d,l)
206 # define memzero(d,l) my_bzero(d,l)
209 #endif /* HAS_MEMSET */
212 # if !defined(STANDARD_C) && !defined(I_STRING) && !defined(I_MEMORY)
214 extern int memcmp _((char*, char*, int));
219 # define memcmp my_memcmp
221 #endif /* HAS_MEMCMP */
223 /* we prefer bcmp slightly for comparisons that don't care about ordering */
226 # define bcmp(s1,s2,l) memcmp(s1,s2,l)
228 #endif /* HAS_BCMP */
231 # include <netinet/in.h>
234 #endif /* Include guard */