aboutsummaryrefslogtreecommitdiff
blob: ecb4f1c2e708fb5cc1057a505c9066824b15979f (plain)
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
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
/*-
 * See the file LICENSE for redistribution information.
 *
 * Copyright (c) 1997
 *	Sleepycat Software.  All rights reserved.
 */

#include "config.h"

#ifndef lint
static const char sccsid[] = "@(#)os_config.c	10.9 (Sleepycat) 11/28/97";
#endif /* not lint */

#ifndef NO_SYSTEM_INCLUDES
#include <sys/types.h>

#include <errno.h>
#endif

#include "db_int.h"

/*
 * XXX
 * We provide our own extern declarations so that we don't collide with
 * systems that get them wrong, e.g., SunOS.
 */
#ifdef _WIN32
#define fsync		_commit
#define imported	__declspec(dllimport)
#else
#define imported
#endif

imported extern int	 close __P((int));
imported extern void	 free __P((void *));
imported extern int	 fsync __P((int));
imported extern void    *malloc __P((size_t));
imported extern int	 open __P((const char *, int, ...));
imported extern ssize_t	 read __P((int, void *, size_t));
imported extern char	*strdup __P((const char *));
imported extern void    *realloc __P((void *, size_t));
imported extern int	 unlink __P((const char *));
imported extern ssize_t	 write __P((int, const void *, size_t));
imported extern void	*memset __P((void *, int, size_t));

/*
 * __db_jump --
 *	This list of interfaces that applications can replace.  In some
 *	cases, the user is permitted to replace the standard ANSI C or
 *	POSIX 1003.1 call, e.g., malloc or read.  In others, we provide
 *	a local interface to the functionality, e.g., __os_map.
 */
struct __db_jumptab __db_jump = {
	close,				/* DB_FUNC_CLOSE */
	__os_dirfree,			/* DB_FUNC_DIRFREE */
	__os_dirlist,			/* DB_FUNC_DIRLIST */
	__os_exists,			/* DB_FUNC_EXISTS */
	free,				/* DB_FUNC_FREE */
	fsync,				/* DB_FUNC_FSYNC */
	__os_ioinfo,			/* DB_FUNC_IOINFO */
	malloc,				/* DB_FUNC_MALLOC */
	__os_map,			/* DB_FUNC_MAP */
	open,				/* DB_FUNC_OPEN */
	read,				/* DB_FUNC_READ */
	realloc,			/* DB_FUNC_REALLOC */
	__os_seek,			/* DB_FUNC_SEEK */
	__os_sleep,			/* DB_FUNC_SLEEP */
	strdup,				/* DB_FUNC_STRDUP */
	unlink,				/* DB_FUNC_UNLINK */
	__os_unmap,			/* DB_FUNC_UNMAP */
	write,				/* DB_FUNC_WRITE */
	NULL				/* DB_FUNC_YIELD */
};

int __db_tsl_spins;			/* DB_TSL_SPINS */

/*
 * db_jump_set --
 *	Replace functions for the DB package.
 */
int
db_jump_set(func, which)
	void *func;
	int which;
{
	switch (which) {
	case DB_FUNC_CALLOC:
		/*
		 * XXX
		 * Obsolete, calloc is no longer called by DB.
		 */
		 break;
	case DB_FUNC_CLOSE:
		__db_jump.db_close = (int (*) __P((int)))func;
		break;
	case DB_FUNC_DIRFREE:
		__db_jump.db_dirfree = (void (*) __P((char **, int)))func;
		break;
	case DB_FUNC_DIRLIST:
		__db_jump.db_dirlist =
		    (int (*) __P((const char *, char ***, int *)))func;
		break;
	case DB_FUNC_EXISTS:
		__db_jump.db_exists = (int (*) __P((const char *, int *)))func;
		break;
	case DB_FUNC_FREE:
		__db_jump.db_free = (void (*) __P((void *)))func;
		break;
	case DB_FUNC_FSYNC:
		__db_jump.db_fsync = (int (*) __P((int)))func;
		break;
	case DB_FUNC_IOINFO:
		__db_jump.db_ioinfo =
		    (int (*) __P((const char *, int, off_t *, off_t *)))func;
		break;
	case DB_FUNC_MALLOC:
		__db_jump.db_malloc = (void *(*) __P((size_t)))func;
		break;
	case DB_FUNC_MAP:
		__db_jump.db_map =
		    (int (*) __P((int, size_t, int, int, void **)))func;
		break;
	case DB_FUNC_OPEN:
		__db_jump.db_open = (int (*) __P((const char *, int, ...)))func;
		break;
	case DB_FUNC_READ:
		__db_jump.db_read =
		    (ssize_t (*) __P((int, void *, size_t)))func;
		break;
	case DB_FUNC_REALLOC:
		__db_jump.db_realloc = (void *(*) __P((void *, size_t)))func;
		break;
	case DB_FUNC_SEEK:
		__db_jump.db_seek =
		    (int (*) __P((int, size_t, db_pgno_t, u_long, int)))func;
		break;
	case DB_FUNC_SLEEP:
		__db_jump.db_sleep = (int (*) __P((u_long, u_long)))func;
		break;
	case DB_FUNC_STRDUP:
		__db_jump.db_strdup = (char *(*) __P((const char *)))func;
		break;
	case DB_FUNC_UNLINK:
		__db_jump.db_unlink = (int (*) __P((const char *)))func;
		break;
	case DB_FUNC_UNMAP:
		__db_jump.db_unmap = (int (*) __P((void *, size_t)))func;
		break;
	case DB_FUNC_WRITE:
		__db_jump.db_write =
		    (ssize_t (*) __P((int, const void *, size_t)))func;
		break;
	case DB_FUNC_YIELD:
		__db_jump.db_yield = (int (*) __P((void)))func;
		break;
	default:
		return (EINVAL);
	}
	return (0);
}

/*
 * db_value_set --
 *	Replace values for the DB package.
 */
int
db_value_set(value, which)
	int value, which;
{
	switch (which) {
	case DB_TSL_SPINS:
		if (value <= 0)
			return (EINVAL);
		__db_tsl_spins = value;
		break;
	default:
		return (EINVAL);
	}
	return (0);
}

/*
 * XXX
 * Correct for systems that return NULL when you allocate 0 bytes of memory.
 * There are several places in DB where we allocate the number of bytes held
 * by the key/data item, and it can be 0.  Correct here so that malloc never
 * returns a NULL for that reason.
 */
/*
 * __db_calloc --
 *	The calloc(3) function for DB.
 *
 * PUBLIC: void *__db_calloc __P((size_t, size_t));
 */
void *
__db_calloc(num, size)
	size_t num, size;
{
	void *p;

	size *= num;
	if ((p = __db_jump.db_malloc(size == 0 ? 1 : size)) != NULL)
		memset(p, 0, size);
	return (p);
}

/*
 * __db_malloc --
 *	The malloc(3) function for DB.
 *
 * PUBLIC: void *__db_malloc __P((size_t));
 */
void *
__db_malloc(size)
	size_t size;
{
	return (__db_jump.db_malloc(size == 0 ? 1 : size));
}

/*
 * __db_realloc --
 *	The realloc(3) function for DB.
 *
 * PUBLIC: void *__db_realloc __P((void *, size_t));
 */
void *
__db_realloc(ptr, size)
	void *ptr;
	size_t size;
{
	return (__db_jump.db_realloc(ptr, size == 0 ? 1 : size));
}