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
|
/*-
* See the file LICENSE for redistribution information.
*
* Copyright (c) 1996-2002
* Sleepycat Software. All rights reserved.
*/
#include "db_config.h"
#ifndef lint
static const char revid[] = "$Id: db_getlong.c,v 11.18 2002/03/28 20:13:33 bostic Exp $";
#endif /* not lint */
#ifndef NO_SYSTEM_INCLUDES
#include <sys/types.h>
#include <limits.h>
#include <stdlib.h>
#include <string.h>
#endif
#include "db_int.h"
/*
* __db_getlong --
* Return a long value inside of basic parameters.
*
* PUBLIC: int __db_getlong
* PUBLIC: __P((DB *, const char *, char *, long, long, long *));
*/
int
__db_getlong(dbp, progname, p, min, max, storep)
DB *dbp;
const char *progname;
char *p;
long min, max, *storep;
{
long val;
char *end;
__os_set_errno(0);
val = strtol(p, &end, 10);
if ((val == LONG_MIN || val == LONG_MAX) &&
__os_get_errno() == ERANGE) {
if (dbp == NULL)
fprintf(stderr,
"%s: %s: %s\n", progname, p, strerror(ERANGE));
else
dbp->err(dbp, ERANGE, "%s", p);
return (1);
}
if (p[0] == '\0' || (end[0] != '\0' && end[0] != '\n')) {
if (dbp == NULL)
fprintf(stderr,
"%s: %s: Invalid numeric argument\n", progname, p);
else
dbp->errx(dbp, "%s: Invalid numeric argument", p);
return (1);
}
if (val < min) {
if (dbp == NULL)
fprintf(stderr,
"%s: %s: Less than minimum value (%ld)\n",
progname, p, min);
else
dbp->errx(dbp,
"%s: Less than minimum value (%ld)", p, min);
return (1);
}
if (val > max) {
if (dbp == NULL)
fprintf(stderr,
"%s: %s: Greater than maximum value (%ld)\n",
progname, p, max);
else
dbp->errx(dbp,
"%s: Greater than maximum value (%ld)", p, max);
return (1);
}
*storep = val;
return (0);
}
/*
* __db_getulong --
* Return an unsigned long value inside of basic parameters.
*
* PUBLIC: int __db_getulong
* PUBLIC: __P((DB *, const char *, char *, u_long, u_long, u_long *));
*/
int
__db_getulong(dbp, progname, p, min, max, storep)
DB *dbp;
const char *progname;
char *p;
u_long min, max, *storep;
{
#if !defined(HAVE_STRTOUL)
COMPQUIET(min, 0);
return (__db_getlong(dbp, progname, p, 0, max, (long *)storep));
#else
u_long val;
char *end;
__os_set_errno(0);
val = strtoul(p, &end, 10);
if (val == ULONG_MAX && __os_get_errno() == ERANGE) {
if (dbp == NULL)
fprintf(stderr,
"%s: %s: %s\n", progname, p, strerror(ERANGE));
else
dbp->err(dbp, ERANGE, "%s", p);
return (1);
}
if (p[0] == '\0' || (end[0] != '\0' && end[0] != '\n')) {
if (dbp == NULL)
fprintf(stderr,
"%s: %s: Invalid numeric argument\n", progname, p);
else
dbp->errx(dbp, "%s: Invalid numeric argument", p);
return (1);
}
if (val < min) {
if (dbp == NULL)
fprintf(stderr,
"%s: %s: Less than minimum value (%lu)\n",
progname, p, min);
else
dbp->errx(dbp,
"%s: Less than minimum value (%lu)", p, min);
return (1);
}
/*
* We allow a 0 to substitute as a max value for ULONG_MAX because
* 1) accepting only a 0 value is unlikely to be necessary, and 2)
* we don't want callers to have to use ULONG_MAX explicitly, as it
* may not exist on all platforms.
*/
if (max != 0 && val > max) {
if (dbp == NULL)
fprintf(stderr,
"%s: %s: Greater than maximum value (%lu)\n",
progname, p, max);
else
dbp->errx(dbp,
"%s: Greater than maximum value (%lu)", p, max);
return (1);
}
*storep = val;
return (0);
#endif /* !defined(HAVE_STRTOUL) */
}
|
