File: gdbmobj2.c

package info (click to toggle)
maildrop 2.9.3-2.1
  • links: PTS, VCS
  • area: main
  • in suites: bookworm
  • size: 13,104 kB
  • sloc: ansic: 26,822; cpp: 9,085; sh: 4,868; makefile: 753; perl: 94
file content (56 lines) | stat: -rw-r--r-- 1,279 bytes parent folder | download | duplicates (39)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
/*
** Copyright 1998 - 1999 Double Precision, Inc.  See COPYING for
** distribution information.
*/

#include	"gdbmobj.h"

static char *fetchkeyval(struct gdbmobj *obj, size_t *, char **, size_t *);
extern char *gdbm_dofetch(struct gdbmobj *, const char *, size_t, size_t *);

char	*gdbmobj_firstkey(struct gdbmobj *obj, size_t *keylen, char **val,
	size_t *vallen)
{
datum	key;

	if (!obj->has_dbf)	return (0);

	if (obj->prev_key)	free(obj->prev_key);
	obj->prev_key=0;

	key=gdbm_firstkey(obj->dbf);

	if (!key.dptr)	return (0);

	obj->prev_key=key.dptr;
	obj->prev_key_len=key.dsize;
	return (fetchkeyval(obj, keylen, val, vallen));
}


static char *fetchkeyval(struct gdbmobj *obj, size_t *keylen, char **val,
	size_t *vallen)
{
	if (!obj->prev_key)	return (0);
	*val=gdbm_dofetch(obj, obj->prev_key, obj->prev_key_len, vallen);
	*keylen=obj->prev_key_len;
	return (obj->prev_key);
}

char	*gdbmobj_nextkey(struct gdbmobj *obj, size_t *keylen,
	char **val, size_t *vallen)
{
datum	dkey, key;

	if (!obj->has_dbf || !obj->prev_key)	return (0);

	dkey.dptr=(char *)obj->prev_key;
	dkey.dsize=obj->prev_key_len;

	key=gdbm_nextkey(obj->dbf, dkey);

	free(obj->prev_key);
	obj->prev_key=key.dptr;
	obj->prev_key_len=key.dsize;
	return (fetchkeyval(obj, keylen, val, vallen));
}