138 lines
3.2 KiB
C
138 lines
3.2 KiB
C
/*-
|
|
* See the file LICENSE for redistribution information.
|
|
*
|
|
* Copyright (c) 1996,2008 Oracle. All rights reserved.
|
|
*
|
|
* $Id: db_getlong.c 63573 2008-05-23 21:43:21Z trent.nelson $
|
|
*/
|
|
|
|
#include "db_config.h"
|
|
|
|
#include "db_int.h"
|
|
|
|
/*
|
|
* __db_getlong --
|
|
* Return a long value inside of basic parameters.
|
|
*
|
|
* PUBLIC: int __db_getlong
|
|
* PUBLIC: __P((DB_ENV *, const char *, char *, long, long, long *));
|
|
*/
|
|
int
|
|
__db_getlong(dbenv, progname, p, min, max, storep)
|
|
DB_ENV *dbenv;
|
|
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 (dbenv == NULL)
|
|
fprintf(stderr,
|
|
"%s: %s: %s\n", progname, p, strerror(ERANGE));
|
|
else
|
|
dbenv->err(dbenv, ERANGE, "%s", p);
|
|
return (ERANGE);
|
|
}
|
|
if (p[0] == '\0' || (end[0] != '\0' && end[0] != '\n')) {
|
|
if (dbenv == NULL)
|
|
fprintf(stderr,
|
|
"%s: %s: Invalid numeric argument\n", progname, p);
|
|
else
|
|
dbenv->errx(dbenv, "%s: Invalid numeric argument", p);
|
|
return (EINVAL);
|
|
}
|
|
if (val < min) {
|
|
if (dbenv == NULL)
|
|
fprintf(stderr,
|
|
"%s: %s: Less than minimum value (%ld)\n",
|
|
progname, p, min);
|
|
else
|
|
dbenv->errx(dbenv,
|
|
"%s: Less than minimum value (%ld)", p, min);
|
|
return (ERANGE);
|
|
}
|
|
if (val > max) {
|
|
if (dbenv == NULL)
|
|
fprintf(stderr,
|
|
"%s: %s: Greater than maximum value (%ld)\n",
|
|
progname, p, max);
|
|
else
|
|
dbenv->errx(dbenv,
|
|
"%s: Greater than maximum value (%ld)", p, max);
|
|
return (ERANGE);
|
|
}
|
|
*storep = val;
|
|
return (0);
|
|
}
|
|
|
|
/*
|
|
* __db_getulong --
|
|
* Return an unsigned long value inside of basic parameters.
|
|
*
|
|
* PUBLIC: int __db_getulong
|
|
* PUBLIC: __P((DB_ENV *, const char *, char *, u_long, u_long, u_long *));
|
|
*/
|
|
int
|
|
__db_getulong(dbenv, progname, p, min, max, storep)
|
|
DB_ENV *dbenv;
|
|
const char *progname;
|
|
char *p;
|
|
u_long min, max, *storep;
|
|
{
|
|
u_long val;
|
|
char *end;
|
|
|
|
__os_set_errno(0);
|
|
val = strtoul(p, &end, 10);
|
|
if (val == ULONG_MAX && __os_get_errno() == ERANGE) {
|
|
if (dbenv == NULL)
|
|
fprintf(stderr,
|
|
"%s: %s: %s\n", progname, p, strerror(ERANGE));
|
|
else
|
|
dbenv->err(dbenv, ERANGE, "%s", p);
|
|
return (ERANGE);
|
|
}
|
|
if (p[0] == '\0' || (end[0] != '\0' && end[0] != '\n')) {
|
|
if (dbenv == NULL)
|
|
fprintf(stderr,
|
|
"%s: %s: Invalid numeric argument\n", progname, p);
|
|
else
|
|
dbenv->errx(dbenv, "%s: Invalid numeric argument", p);
|
|
return (EINVAL);
|
|
}
|
|
if (val < min) {
|
|
if (dbenv == NULL)
|
|
fprintf(stderr,
|
|
"%s: %s: Less than minimum value (%lu)\n",
|
|
progname, p, min);
|
|
else
|
|
dbenv->errx(dbenv,
|
|
"%s: Less than minimum value (%lu)", p, min);
|
|
return (ERANGE);
|
|
}
|
|
|
|
/*
|
|
* 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 (dbenv == NULL)
|
|
fprintf(stderr,
|
|
"%s: %s: Greater than maximum value (%lu)\n",
|
|
progname, p, max);
|
|
else
|
|
dbenv->errx(dbenv,
|
|
"%s: Greater than maximum value (%lu)", p, max);
|
|
return (ERANGE);
|
|
}
|
|
*storep = val;
|
|
return (0);
|
|
}
|