ndbm.c revision 1.20 1 /* $NetBSD: ndbm.c,v 1.20 2005/09/13 01:44:09 christos Exp $ */
2 /* from: NetBSD: ndbm.c,v 1.18 2004/04/27 20:03:45 kleink Exp */
3
4 /*-
5 * Copyright (c) 1990, 1993
6 * The Regents of the University of California. All rights reserved.
7 *
8 * This code is derived from software contributed to Berkeley by
9 * Margo Seltzer.
10 *
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
13 * are met:
14 * 1. Redistributions of source code must retain the above copyright
15 * notice, this list of conditions and the following disclaimer.
16 * 2. Redistributions in binary form must reproduce the above copyright
17 * notice, this list of conditions and the following disclaimer in the
18 * documentation and/or other materials provided with the distribution.
19 * 3. Neither the name of the University nor the names of its contributors
20 * may be used to endorse or promote products derived from this software
21 * without specific prior written permission.
22 *
23 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * SUCH DAMAGE.
34 */
35
36 #include <sys/cdefs.h>
37 #if defined(LIBC_SCCS) && !defined(lint)
38 #if 0
39 static char sccsid[] = "@(#)ndbm.c 8.4 (Berkeley) 7/21/94";
40 #else
41 __RCSID("$NetBSD: ndbm.c,v 1.20 2005/09/13 01:44:09 christos Exp $");
42 #endif
43 #endif /* LIBC_SCCS and not lint */
44
45 /*
46 * This package provides a dbm compatible interface to the new hashing
47 * package described in db(3).
48 */
49 #include "namespace.h"
50 #include <sys/param.h>
51
52 #include <fcntl.h>
53 #include <stdio.h>
54 #include <string.h>
55
56 #include <ndbm.h>
57 #include "hash.h"
58
59 /*
60 * Returns:
61 * *DBM on success
62 * NULL on failure
63 */
64 extern DBM *
65 dbm_open(file, flags, mode)
66 const char *file;
67 int flags;
68 mode_t mode;
69 {
70 HASHINFO info;
71 char path[MAXPATHLEN];
72
73 info.bsize = 4096;
74 info.ffactor = 40;
75 info.nelem = 1;
76 info.cachesize = 0;
77 info.hash = NULL;
78 info.lorder = 0;
79 (void)strncpy(path, file, sizeof(path) - 1);
80 (void)strncat(path, DBM_SUFFIX, sizeof(path) - strlen(path) - 1);
81 if ((flags & O_ACCMODE) == O_WRONLY) {
82 flags &= ~O_WRONLY;
83 flags |= O_RDWR;
84 }
85 return ((DBM *)__hash_open(path, flags, mode, &info, 0));
86 }
87
88 extern void
89 dbm_close(db)
90 DBM *db;
91 {
92 (void)(db->close)(db);
93 }
94
95 extern int
96 dbm_error(db)
97 DBM *db;
98 {
99 HTAB *hp;
100
101 hp = (HTAB *)db->internal;
102 return (hp->err);
103 }
104
105 extern int
106 dbm_clearerr(db)
107 DBM *db;
108 {
109 HTAB *hp;
110
111 hp = (HTAB *)db->internal;
112 hp->err = 0;
113 return (0);
114 }
115
116 extern int
117 dbm_dirfno(db)
118 DBM *db;
119 {
120 return(((HTAB *)db->internal)->fp);
121 }
122