ypdb.c revision 1.11 1 /* $NetBSD: ypdb.c,v 1.11 2008/02/29 03:00:47 lukem Exp $ */
2
3 /*
4 * Copyright (c) 1990, 1993
5 * The Regents of the University of California. All rights reserved.
6 * All rights reserved.
7 *
8 * This code is derived from software contributed to Berkeley by
9 * Margo Seltzer.
10 *
11 * This code is derived from ndbm module of BSD4.4 db (hash) by
12 * Mats O Jansson
13 *
14 * Redistribution and use in source and binary forms, with or without
15 * modification, are permitted provided that the following conditions
16 * are met:
17 * 1. Redistributions of source code must retain the above copyright
18 * notice, this list of conditions and the following disclaimer.
19 * 2. Redistributions in binary form must reproduce the above copyright
20 * notice, this list of conditions and the following disclaimer in the
21 * documentation and/or other materials provided with the distribution.
22 * 3. Neither the name of the University nor the names of its contributors
23 * may be used to endorse or promote products derived from this software
24 * without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS
27 * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
28 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
30 * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
31 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
32 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
33 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
34 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
35 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 * SUCH DAMAGE.
37 */
38
39 #include <sys/cdefs.h>
40 #ifndef lint
41 __RCSID("$NetBSD: ypdb.c,v 1.11 2008/02/29 03:00:47 lukem Exp $");
42 #endif
43
44 #include <sys/param.h>
45 #include <sys/types.h>
46
47 #include <db.h>
48 #include <err.h>
49 #include <errno.h>
50 #include <fcntl.h>
51 #include <stdio.h>
52 #include <stdlib.h>
53 #include <string.h>
54 #include <unistd.h>
55
56 #include <rpcsvc/yp.h>
57
58 #include "ypdb.h"
59
60 static DBM *_ypdb_dbopen(const char *, int, mode_t);
61
62 /*
63 * ypdb_open --
64 * dbopen(3) file, read-only.
65 * First ensure that file has a suffix of YPDB_SUFFIX.
66 * Try opening as a DB_BTREE first, then DB_HASH.
67 *
68 * Returns:
69 * *DBM on success
70 * NULL on failure
71 */
72
73 DBM *
74 ypdb_open(const char *file)
75 {
76 char path[MAXPATHLEN];
77 const char *cp, *suffix;
78
79 cp = strrchr(file, '.');
80 if (cp != NULL && strcmp(cp, YPDB_SUFFIX) == 0)
81 suffix = "";
82 else
83 suffix = YPDB_SUFFIX;
84 if (strlen(file) + strlen(suffix) > (sizeof(path) - 1)) {
85 warnx("File name `%s' is too long", file);
86 return (NULL);
87 }
88 snprintf(path, sizeof(path), "%s%s", file, suffix);
89 return _ypdb_dbopen(path, O_RDONLY, 0444);
90 }
91
92 /*
93 * ypdb_mktemp --
94 * Create a temporary file using mkstemp(3) based on the
95 * template provided in file.
96 * dbopen(3) file, read-write, 0644 (modified by umask(2)).
97 * Try opening as a DB_BTREE first, then DB_HASH.
98 * file won't have YPDB_SUFFIX.
99 *
100 * Returns:
101 * *DBM on success; file now exists.
102 * NULL on failure
103 */
104
105 DBM *
106 ypdb_mktemp(char *file)
107 {
108 int fd = -1;
109 DBM *db = NULL;
110 mode_t myumask;
111 int save_errno;
112
113 if ((fd = mkstemp(file)) == -1)
114 return NULL;
115
116 myumask = umask(0);
117 (void)umask(myumask);
118 if (fchmod(fd, 0644 & ~myumask) == -1)
119 goto bad;
120
121 (void) close(fd);
122 fd = -1;
123
124 if ((db = _ypdb_dbopen(file, O_RDWR, 0644)) == NULL)
125 goto bad;
126
127 return db;
128
129 bad:
130 save_errno = errno;
131 if (fd != 1)
132 (void) close(fd);
133 (void) unlink(file);
134 errno = save_errno;
135 return NULL;
136 }
137
138 /*
139 * _ypdb_dbopen --
140 * dbopen(3) path with the flags & mode.
141 * Try opening as a DB_BTREE first, then DB_HASH.
142 */
143
144 static DBM *
145 _ypdb_dbopen(const char *path, int flags, mode_t mode)
146 {
147 DBM *db;
148 BTREEINFO info;
149
150 /* try our btree format first */
151 info.flags = 0;
152 info.cachesize = 0;
153 info.maxkeypage = 0;
154 info.minkeypage = 0;
155 info.psize = 0;
156 info.compare = NULL;
157 info.prefix = NULL;
158 info.lorder = 0;
159 db = (DBM *)dbopen(path, flags, mode, DB_BTREE, (void *)&info);
160 if (db != NULL || errno != EFTYPE)
161 return (db);
162
163 /* fallback to standard hash (for sendmail's aliases.db) */
164 db = (DBM *)dbopen(path, flags, mode, DB_HASH, NULL);
165 return (db);
166 }
167
168 /*
169 * ypdb_close --
170 * Close the db
171 */
172
173 void
174 ypdb_close(DBM *db)
175 {
176 (void)(db->close)(db);
177 }
178
179 /*
180 * Returns:
181 * DATUM on success
182 * NULL on failure
183 */
184
185 datum
186 ypdb_fetch(DBM *db, datum key)
187 {
188 datum retkey;
189 DBT nk, nd;
190 int status;
191
192 nk.data = key.dptr;
193 nk.size = key.dsize;
194 status = (db->get)(db, &nk, &nd, 0);
195 if (status) {
196 retkey.dptr = NULL;
197 retkey.dsize = 0;
198 } else {
199 retkey.dptr = nd.data;
200 retkey.dsize = nd.size;
201 }
202 return (retkey);
203 }
204
205 /*
206 * Returns:
207 * DATUM on success
208 * NULL on failure
209 */
210
211 datum
212 ypdb_firstkey(DBM *db)
213 {
214 int status;
215 datum retkey;
216 DBT nk, nd;
217
218 status = (db->seq)(db, &nk, &nd, R_FIRST);
219 if (status) {
220 retkey.dptr = NULL;
221 retkey.dsize = 0;
222 } else {
223 retkey.dptr = nk.data;
224 retkey.dsize = nk.size;
225 }
226 return (retkey);
227 }
228
229 /*
230 * Returns:
231 * DATUM on success
232 * NULL on failure
233 */
234
235 datum
236 ypdb_nextkey(DBM *db)
237 {
238 int status;
239 datum retkey;
240 DBT nk, nd;
241
242 status = (db->seq)(db, &nk, &nd, R_NEXT);
243 if (status) {
244 retkey.dptr = NULL;
245 retkey.dsize = 0;
246 } else {
247 retkey.dptr = nk.data;
248 retkey.dsize = nk.size;
249 }
250 return (retkey);
251 }
252
253 /*
254 * Returns:
255 * DATUM on success
256 * NULL on failure
257 */
258
259 datum
260 ypdb_setkey(DBM *db, datum key)
261 {
262 int status;
263 DBT nk, nd;
264
265 nk.data = key.dptr;
266 nk.size = key.dsize;
267 status = (db->seq)(db, &nk, &nd, R_CURSOR);
268 if (status) {
269 key.dptr = NULL;
270 key.dsize = 0;
271 }
272 return (key);
273 }
274
275 /*
276 * Returns:
277 * 0 on success
278 * <0 failure
279 */
280
281 int
282 ypdb_delete(DBM *db, datum key)
283 {
284 int status;
285 DBT nk;
286
287 nk.data = key.dptr;
288 nk.size = key.dsize;
289 status = (db->del)(db, &nk, 0);
290 if (status)
291 return (-1);
292 else
293 return (0);
294 }
295
296 /*
297 * Returns:
298 * 0 on success
299 * <0 failure
300 * 1 if YPDB_INSERT and entry exists
301 */
302
303 int
304 ypdb_store(DBM *db, datum key, datum content, int flags)
305 {
306 DBT nk, nd;
307
308 if (key.dsize > YPMAXRECORD || content.dsize > YPMAXRECORD)
309 return -1;
310 nk.data = key.dptr;
311 nk.size = key.dsize;
312 nd.data = content.dptr;
313 nd.size = content.dsize;
314 return ((db->put)(db, &nk, &nd,
315 (flags == YPDB_INSERT) ? R_NOOVERWRITE : 0));
316 }
317