You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
86 lines
1.8 KiB
86 lines
1.8 KiB
/*-
|
|
* See the file LICENSE for redistribution information.
|
|
*
|
|
* Copyright (c) 1996, 1997, 1998, 1999
|
|
* Sleepycat Software. All rights reserved.
|
|
*/
|
|
|
|
#include "db_config.h"
|
|
|
|
#ifndef lint
|
|
static const char sccsid[] = "@(#)db_getlong.c 11.3 (Sleepycat) 10/29/99";
|
|
#endif /* not lint */
|
|
|
|
#ifndef NO_SYSTEM_INCLUDES
|
|
#include <sys/types.h>
|
|
|
|
#include <errno.h>
|
|
#include <limits.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#endif
|
|
|
|
#include "db_int.h"
|
|
|
|
/*
|
|
* CDB___db_getlong --
|
|
* Return a long value inside of basic parameters.
|
|
*
|
|
* PUBLIC: int CDB___db_getlong
|
|
* PUBLIC: __P((DB *, const char *, char *, long, long, long *));
|
|
*/
|
|
int
|
|
CDB___db_getlong(dbp, progname, p, min, max, storep)
|
|
DB *dbp;
|
|
const char *progname;
|
|
char *p;
|
|
long min, max, *storep;
|
|
{
|
|
long val;
|
|
char *end;
|
|
|
|
CDB___os_set_errno(0);
|
|
val = strtol(p, &end, 10);
|
|
if ((val == LONG_MIN || val == LONG_MAX) &&
|
|
CDB___os_get_errno() == ERANGE) {
|
|
if (dbp == NULL) {
|
|
fprintf(stderr,
|
|
"%s: %s: %s\n", progname, p, strerror(ERANGE));
|
|
exit(1);
|
|
}
|
|
dbp->err(dbp, ERANGE, "%s", p);
|
|
return (1);
|
|
}
|
|
if (p[0] == '\0' || end[0] != '\0') {
|
|
if (dbp == NULL) {
|
|
fprintf(stderr,
|
|
"%s: %s: Invalid numeric argument\n", progname, p);
|
|
exit(1);
|
|
}
|
|
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);
|
|
exit(1);
|
|
}
|
|
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);
|
|
exit(1);
|
|
}
|
|
dbp->errx(dbp, "%s: Greater than maximum value (%ld)", p, max);
|
|
exit(1);
|
|
}
|
|
*storep = val;
|
|
return (0);
|
|
}
|