#define PERL_constant_NOTFOUND 1
#define PERL_constant_NOTDEF 2
#define PERL_constant_ISIV 3
#define PERL_constant_ISNO 4
#define PERL_constant_ISNV 5
#define PERL_constant_ISPV 6
#define PERL_constant_ISPVN 7
#define PERL_constant_ISSV 8
#define PERL_constant_ISUNDEF 9
#define PERL_constant_ISUV 10
#define PERL_constant_ISYES 11
#ifndef NVTYPE
typedef double NV; /* 5.6 and later define NVTYPE, and typedef NV to it. */
#endif
#ifndef aTHX_
#define aTHX_ /* 5.6 or later define this for threading support. */
#endif
#ifndef pTHX_
#define pTHX_ /* 5.6 or later define this for threading support. */
#endif
static int
constant_6 (pTHX_ const char *name, IV *iv_return) {
/* When generated this function returned values for the list of names given
here. However, subsequent manual editing may have added or removed some.
DB_DUP DB_PAD DB_RMW DB_SET */
/* Offset 3 gives the best switch position. */
switch (name[3]) {
case 'D':
if (memEQ(name, "DB_DUP", 6)) {
/* ^ */
#ifdef DB_DUP
*iv_return = DB_DUP;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'P':
if (memEQ(name, "DB_PAD", 6)) {
/* ^ */
#ifdef DB_PAD
*iv_return = DB_PAD;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'R':
if (memEQ(name, "DB_RMW", 6)) {
/* ^ */
#ifdef DB_RMW
*iv_return = DB_RMW;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'S':
if (memEQ(name, "DB_SET", 6)) {
/* ^ */
#ifdef DB_SET
*iv_return = DB_SET;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
}
return PERL_constant_NOTFOUND;
}
static int
constant_7 (pTHX_ const char *name, IV *iv_return) {
/* When generated this function returned values for the list of names given
here. However, subsequent manual editing may have added or removed some.
DB_EXCL DB_HASH DB_HEAP DB_LAST DB_NEXT DB_PREV */
/* Offset 3 gives the best switch position. */
switch (name[3]) {
case 'E':
if (memEQ(name, "DB_EXCL", 7)) {
/* ^ */
#ifdef DB_EXCL
*iv_return = DB_EXCL;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'H':
if (memEQ(name, "DB_HASH", 7)) {
/* ^ */
#if (DB_VERSION_MAJOR > 2) || \
(DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 3)
*iv_return = DB_HASH;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_HEAP", 7)) {
/* ^ */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 2) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 2 && \
DB_VERSION_PATCH >= 14)
*iv_return = DB_HEAP;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'L':
if (memEQ(name, "DB_LAST", 7)) {
/* ^ */
#ifdef DB_LAST
*iv_return = DB_LAST;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'N':
if (memEQ(name, "DB_NEXT", 7)) {
/* ^ */
#ifdef DB_NEXT
*iv_return = DB_NEXT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'P':
if (memEQ(name, "DB_PREV", 7)) {
/* ^ */
#ifdef DB_PREV
*iv_return = DB_PREV;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
}
return PERL_constant_NOTFOUND;
}
static int
constant_8 (pTHX_ const char *name, IV *iv_return) {
/* When generated this function returned values for the list of names given
here. However, subsequent manual editing may have added or removed some.
DB_AFTER DB_BTREE DB_FIRST DB_FLUSH DB_FORCE DB_QUEUE DB_RECNO DB_UNREF */
/* Offset 4 gives the best switch position. */
switch (name[4]) {
case 'E':
if (memEQ(name, "DB_RECNO", 8)) {
/* ^ */
#if (DB_VERSION_MAJOR > 2) || \
(DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 3)
*iv_return = DB_RECNO;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'F':
if (memEQ(name, "DB_AFTER", 8)) {
/* ^ */
#ifdef DB_AFTER
*iv_return = DB_AFTER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'I':
if (memEQ(name, "DB_FIRST", 8)) {
/* ^ */
#ifdef DB_FIRST
*iv_return = DB_FIRST;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'L':
if (memEQ(name, "DB_FLUSH", 8)) {
/* ^ */
#ifdef DB_FLUSH
*iv_return = DB_FLUSH;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'N':
if (memEQ(name, "DB_UNREF", 8)) {
/* ^ */
#ifdef DB_UNREF
*iv_return = DB_UNREF;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'O':
if (memEQ(name, "DB_FORCE", 8)) {
/* ^ */
#ifdef DB_FORCE
*iv_return = DB_FORCE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'T':
if (memEQ(name, "DB_BTREE", 8)) {
/* ^ */
#if (DB_VERSION_MAJOR > 2) || \
(DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 3)
*iv_return = DB_BTREE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'U':
if (memEQ(name, "DB_QUEUE", 8)) {
/* ^ */
#if (DB_VERSION_MAJOR > 3) || \
(DB_VERSION_MAJOR == 3 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 3 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 55)
*iv_return = DB_QUEUE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
}
return PERL_constant_NOTFOUND;
}
static int
constant_9 (pTHX_ const char *name, IV *iv_return) {
/* When generated this function returned values for the list of names given
here. However, subsequent manual editing may have added or removed some.
DB_APPEND DB_BEFORE DB_CHKSUM DB_CLIENT DB_COMMIT DB_CREATE DB_CURLSN
DB_DIRECT DB_EXTENT DB_GETREC DB_LEGACY DB_NOCOPY DB_NOMMAP DB_NOSYNC
DB_RDONLY DB_RECNUM DB_THREAD DB_VERIFY LOGREC_DB LOGREC_OP */
/* Offset 7 gives the best switch position. */
switch (name[7]) {
case 'A':
if (memEQ(name, "DB_NOMMAP", 9)) {
/* ^ */
#ifdef DB_NOMMAP
*iv_return = DB_NOMMAP;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_THREAD", 9)) {
/* ^ */
#ifdef DB_THREAD
*iv_return = DB_THREAD;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'C':
if (memEQ(name, "DB_DIRECT", 9)) {
/* ^ */
#ifdef DB_DIRECT
*iv_return = DB_DIRECT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LEGACY", 9)) {
/* ^ */
#ifdef DB_LEGACY
*iv_return = DB_LEGACY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'D':
if (memEQ(name, "LOGREC_DB", 9)) {
/* ^ */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 6)
*iv_return = LOGREC_DB;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'E':
if (memEQ(name, "DB_GETREC", 9)) {
/* ^ */
#ifdef DB_GETREC
*iv_return = DB_GETREC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'F':
if (memEQ(name, "DB_VERIFY", 9)) {
/* ^ */
#ifdef DB_VERIFY
*iv_return = DB_VERIFY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'I':
if (memEQ(name, "DB_COMMIT", 9)) {
/* ^ */
#ifdef DB_COMMIT
*iv_return = DB_COMMIT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'L':
if (memEQ(name, "DB_RDONLY", 9)) {
/* ^ */
#ifdef DB_RDONLY
*iv_return = DB_RDONLY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'N':
if (memEQ(name, "DB_APPEND", 9)) {
/* ^ */
#ifdef DB_APPEND
*iv_return = DB_APPEND;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_CLIENT", 9)) {
/* ^ */
#ifdef DB_CLIENT
*iv_return = DB_CLIENT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_EXTENT", 9)) {
/* ^ */
#ifdef DB_EXTENT
*iv_return = DB_EXTENT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_NOSYNC", 9)) {
/* ^ */
#ifdef DB_NOSYNC
*iv_return = DB_NOSYNC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'O':
if (memEQ(name, "LOGREC_OP", 9)) {
/* ^ */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 6)
*iv_return = LOGREC_OP;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'P':
if (memEQ(name, "DB_NOCOPY", 9)) {
/* ^ */
#ifdef DB_NOCOPY
*iv_return = DB_NOCOPY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'R':
if (memEQ(name, "DB_BEFORE", 9)) {
/* ^ */
#ifdef DB_BEFORE
*iv_return = DB_BEFORE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'S':
if (memEQ(name, "DB_CURLSN", 9)) {
/* ^ */
#ifdef DB_CURLSN
*iv_return = DB_CURLSN;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'T':
if (memEQ(name, "DB_CREATE", 9)) {
/* ^ */
#ifdef DB_CREATE
*iv_return = DB_CREATE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'U':
if (memEQ(name, "DB_CHKSUM", 9)) {
/* ^ */
#ifdef DB_CHKSUM
*iv_return = DB_CHKSUM;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_RECNUM", 9)) {
/* ^ */
#ifdef DB_RECNUM
*iv_return = DB_RECNUM;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
}
return PERL_constant_NOTFOUND;
}
static int
constant_10 (pTHX_ const char *name, IV *iv_return) {
/* When generated this function returned values for the list of names given
here. However, subsequent manual editing may have added or removed some.
DB_CONSUME DB_CURRENT DB_DELETED DB_DUPSORT DB_ENCRYPT DB_ENV_CDB
DB_ENV_TXN DB_FAILCHK DB_INORDER DB_JOINENV DB_KEYLAST DB_NOERROR
DB_NOFLUSH DB_NOPANIC DB_OK_HASH DB_OK_HEAP DB_PRIVATE DB_PR_PAGE
DB_RECOVER DB_SALVAGE DB_SEQ_DEC DB_SEQ_INC DB_SET_LTE DB_TIMEOUT
DB_TXN_CKP DB_UNKNOWN DB_UPGRADE LOGREC_ARG LOGREC_DBT LOGREC_HDR */
/* Offset 8 gives the best switch position. */
switch (name[8]) {
case 'A':
if (memEQ(name, "DB_OK_HEAP", 10)) {
/* ^ */
#ifdef DB_OK_HEAP
*iv_return = DB_OK_HEAP;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'B':
if (memEQ(name, "LOGREC_DBT", 10)) {
/* ^ */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 6)
*iv_return = LOGREC_DBT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'D':
if (memEQ(name, "DB_ENV_CDB", 10)) {
/* ^ */
#ifdef DB_ENV_CDB
*iv_return = DB_ENV_CDB;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_UPGRADE", 10)) {
/* ^ */
#ifdef DB_UPGRADE
*iv_return = DB_UPGRADE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "LOGREC_HDR", 10)) {
/* ^ */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 6)
*iv_return = LOGREC_HDR;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'E':
if (memEQ(name, "DB_DELETED", 10)) {
/* ^ */
#ifdef DB_DELETED
*iv_return = DB_DELETED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_INORDER", 10)) {
/* ^ */
#ifdef DB_INORDER
*iv_return = DB_INORDER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_RECOVER", 10)) {
/* ^ */
#ifdef DB_RECOVER
*iv_return = DB_RECOVER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_SEQ_DEC", 10)) {
/* ^ */
#ifdef DB_SEQ_DEC
*iv_return = DB_SEQ_DEC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'G':
if (memEQ(name, "DB_PR_PAGE", 10)) {
/* ^ */
#ifdef DB_PR_PAGE
*iv_return = DB_PR_PAGE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_SALVAGE", 10)) {
/* ^ */
#ifdef DB_SALVAGE
*iv_return = DB_SALVAGE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'H':
if (memEQ(name, "DB_FAILCHK", 10)) {
/* ^ */
#ifdef DB_FAILCHK
*iv_return = DB_FAILCHK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'I':
if (memEQ(name, "DB_NOPANIC", 10)) {
/* ^ */
#ifdef DB_NOPANIC
*iv_return = DB_NOPANIC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'K':
if (memEQ(name, "DB_TXN_CKP", 10)) {
/* ^ */
#ifdef DB_TXN_CKP
*iv_return = DB_TXN_CKP;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'M':
if (memEQ(name, "DB_CONSUME", 10)) {
/* ^ */
#ifdef DB_CONSUME
*iv_return = DB_CONSUME;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'N':
if (memEQ(name, "DB_CURRENT", 10)) {
/* ^ */
#ifdef DB_CURRENT
*iv_return = DB_CURRENT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_JOINENV", 10)) {
/* ^ */
#ifdef DB_JOINENV
*iv_return = DB_JOINENV;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_SEQ_INC", 10)) {
/* ^ */
#ifdef DB_SEQ_INC
*iv_return = DB_SEQ_INC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'O':
if (memEQ(name, "DB_NOERROR", 10)) {
/* ^ */
#ifdef DB_NOERROR
*iv_return = DB_NOERROR;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'P':
if (memEQ(name, "DB_ENCRYPT", 10)) {
/* ^ */
#ifdef DB_ENCRYPT
*iv_return = DB_ENCRYPT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'R':
if (memEQ(name, "DB_DUPSORT", 10)) {
/* ^ */
#ifdef DB_DUPSORT
*iv_return = DB_DUPSORT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "LOGREC_ARG", 10)) {
/* ^ */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 6)
*iv_return = LOGREC_ARG;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'S':
if (memEQ(name, "DB_KEYLAST", 10)) {
/* ^ */
#ifdef DB_KEYLAST
*iv_return = DB_KEYLAST;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_NOFLUSH", 10)) {
/* ^ */
#ifdef DB_NOFLUSH
*iv_return = DB_NOFLUSH;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_OK_HASH", 10)) {
/* ^ */
#ifdef DB_OK_HASH
*iv_return = DB_OK_HASH;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'T':
if (memEQ(name, "DB_PRIVATE", 10)) {
/* ^ */
#ifdef DB_PRIVATE
*iv_return = DB_PRIVATE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_SET_LTE", 10)) {
/* ^ */
#ifdef DB_SET_LTE
*iv_return = DB_SET_LTE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'U':
if (memEQ(name, "DB_TIMEOUT", 10)) {
/* ^ */
#ifdef DB_TIMEOUT
*iv_return = DB_TIMEOUT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'W':
if (memEQ(name, "DB_UNKNOWN", 10)) {
/* ^ */
#if (DB_VERSION_MAJOR > 2) || \
(DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 3)
*iv_return = DB_UNKNOWN;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'X':
if (memEQ(name, "DB_ENV_TXN", 10)) {
/* ^ */
#ifdef DB_ENV_TXN
*iv_return = DB_ENV_TXN;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
}
return PERL_constant_NOTFOUND;
}
static int
constant_11 (pTHX_ const char *name, IV *iv_return) {
/* When generated this function returned values for the list of names given
here. However, subsequent manual editing may have added or removed some.
DB2_AM_EXCL DB_APP_INIT DB_ARCH_ABS DB_ARCH_LOG DB_DEGREE_2 DB_DSYNC_DB
DB_FILEOPEN DB_FIXEDLEN DB_GET_BOTH DB_GID_SIZE DB_INIT_CDB DB_INIT_LOG
DB_INIT_REP DB_INIT_TXN DB_KEYEMPTY DB_KEYEXIST DB_KEYFIRST DB_LOCKDOWN
DB_LOCK_GET DB_LOCK_PUT DB_LOGMAGIC DB_LOG_DISK DB_LOG_PERM DB_LOG_ZERO
DB_MEM_LOCK DB_MULTIPLE DB_NEXT_DUP DB_NOSERVER DB_NOTFOUND DB_OK_BTREE
DB_OK_QUEUE DB_OK_RECNO DB_POSITION DB_PREV_DUP DB_QAMMAGIC DB_REGISTER
DB_RENUMBER DB_SEQ_WRAP DB_SNAPSHOT DB_STAT_ALL DB_ST_DUPOK DB_ST_RELEN
DB_TRUNCATE DB_TXNMAGIC DB_TXN_BULK DB_TXN_LOCK DB_TXN_REDO DB_TXN_SYNC
DB_TXN_UNDO DB_TXN_WAIT DB_WRNOSYNC DB_YIELDCPU LOGREC_DATA LOGREC_DBOP
LOGREC_Done LOGREC_TIME */
/* Offset 8 gives the best switch position. */
switch (name[8]) {
case 'A':
if (memEQ(name, "DB_ARCH_ABS", 11)) {
/* ^ */
#ifdef DB_ARCH_ABS
*iv_return = DB_ARCH_ABS;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_STAT_ALL", 11)) {
/* ^ */
#ifdef DB_STAT_ALL
*iv_return = DB_STAT_ALL;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TRUNCATE", 11)) {
/* ^ */
#ifdef DB_TRUNCATE
*iv_return = DB_TRUNCATE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXN_WAIT", 11)) {
/* ^ */
#ifdef DB_TXN_WAIT
*iv_return = DB_TXN_WAIT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "LOGREC_DATA", 11)) {
/* ^ */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 6)
*iv_return = LOGREC_DATA;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'B':
if (memEQ(name, "DB_RENUMBER", 11)) {
/* ^ */
#ifdef DB_RENUMBER
*iv_return = DB_RENUMBER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "LOGREC_DBOP", 11)) {
/* ^ */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 6)
*iv_return = LOGREC_DBOP;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'C':
if (memEQ(name, "DB_INIT_CDB", 11)) {
/* ^ */
#ifdef DB_INIT_CDB
*iv_return = DB_INIT_CDB;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_OK_RECNO", 11)) {
/* ^ */
#ifdef DB_OK_RECNO
*iv_return = DB_OK_RECNO;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_YIELDCPU", 11)) {
/* ^ */
#ifdef DB_YIELDCPU
*iv_return = DB_YIELDCPU;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'D':
if (memEQ(name, "DB_NEXT_DUP", 11)) {
/* ^ */
#ifdef DB_NEXT_DUP
*iv_return = DB_NEXT_DUP;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_PREV_DUP", 11)) {
/* ^ */
#ifdef DB_PREV_DUP
*iv_return = DB_PREV_DUP;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'E':
if (memEQ(name, "DB_DEGREE_2", 11)) {
/* ^ */
#ifdef DB_DEGREE_2
*iv_return = DB_DEGREE_2;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOG_PERM", 11)) {
/* ^ */
#ifdef DB_LOG_PERM
*iv_return = DB_LOG_PERM;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOG_ZERO", 11)) {
/* ^ */
#ifdef DB_LOG_ZERO
*iv_return = DB_LOG_ZERO;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_OK_QUEUE", 11)) {
/* ^ */
#ifdef DB_OK_QUEUE
*iv_return = DB_OK_QUEUE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXN_REDO", 11)) {
/* ^ */
#ifdef DB_TXN_REDO
*iv_return = DB_TXN_REDO;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'G':
if (memEQ(name, "DB_LOCK_GET", 11)) {
/* ^ */
#if (DB_VERSION_MAJOR > 2) || \
(DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 3)
*iv_return = DB_LOCK_GET;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOGMAGIC", 11)) {
/* ^ */
#ifdef DB_LOGMAGIC
*iv_return = DB_LOGMAGIC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_QAMMAGIC", 11)) {
/* ^ */
#ifdef DB_QAMMAGIC
*iv_return = DB_QAMMAGIC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXNMAGIC", 11)) {
/* ^ */
#ifdef DB_TXNMAGIC
*iv_return = DB_TXNMAGIC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'H':
if (memEQ(name, "DB_SNAPSHOT", 11)) {
/* ^ */
#ifdef DB_SNAPSHOT
*iv_return = DB_SNAPSHOT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'I':
if (memEQ(name, "DB_GID_SIZE", 11)) {
/* ^ */
#ifdef DB_GID_SIZE
*iv_return = DB_GID_SIZE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_KEYEXIST", 11)) {
/* ^ */
#ifdef DB_KEYEXIST
*iv_return = DB_KEYEXIST;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOG_DISK", 11)) {
/* ^ */
#ifdef DB_LOG_DISK
*iv_return = DB_LOG_DISK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_POSITION", 11)) {
/* ^ */
#ifdef DB_POSITION
*iv_return = DB_POSITION;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "LOGREC_TIME", 11)) {
/* ^ */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 6)
*iv_return = LOGREC_TIME;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'L':
if (memEQ(name, "DB_ARCH_LOG", 11)) {
/* ^ */
#ifdef DB_ARCH_LOG
*iv_return = DB_ARCH_LOG;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_FIXEDLEN", 11)) {
/* ^ */
#ifdef DB_FIXEDLEN
*iv_return = DB_FIXEDLEN;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_INIT_LOG", 11)) {
/* ^ */
#ifdef DB_INIT_LOG
*iv_return = DB_INIT_LOG;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ST_RELEN", 11)) {
/* ^ */
#ifdef DB_ST_RELEN
*iv_return = DB_ST_RELEN;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'N':
if (memEQ(name, "DB_APP_INIT", 11)) {
/* ^ */
#ifdef DB_APP_INIT
*iv_return = DB_APP_INIT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXN_UNDO", 11)) {
/* ^ */
#ifdef DB_TXN_UNDO
*iv_return = DB_TXN_UNDO;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'O':
if (memEQ(name, "DB_GET_BOTH", 11)) {
/* ^ */
#ifdef DB_GET_BOTH
*iv_return = DB_GET_BOTH;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCKDOWN", 11)) {
/* ^ */
#ifdef DB_LOCKDOWN
*iv_return = DB_LOCKDOWN;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_MEM_LOCK", 11)) {
/* ^ */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 2) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 2 && \
DB_VERSION_PATCH >= 14)
*iv_return = DB_MEM_LOCK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXN_LOCK", 11)) {
/* ^ */
#ifdef DB_TXN_LOCK
*iv_return = DB_TXN_LOCK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'P':
if (memEQ(name, "DB_FILEOPEN", 11)) {
/* ^ */
#ifdef DB_FILEOPEN
*iv_return = DB_FILEOPEN;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_KEYEMPTY", 11)) {
/* ^ */
#ifdef DB_KEYEMPTY
*iv_return = DB_KEYEMPTY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_PUT", 11)) {
/* ^ */
#if (DB_VERSION_MAJOR > 2) || \
(DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 3)
*iv_return = DB_LOCK_PUT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_MULTIPLE", 11)) {
/* ^ */
#ifdef DB_MULTIPLE
*iv_return = DB_MULTIPLE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ST_DUPOK", 11)) {
/* ^ */
#ifdef DB_ST_DUPOK
*iv_return = DB_ST_DUPOK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'R':
if (memEQ(name, "DB_INIT_REP", 11)) {
/* ^ */
#ifdef DB_INIT_REP
*iv_return = DB_INIT_REP;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_KEYFIRST", 11)) {
/* ^ */
#ifdef DB_KEYFIRST
*iv_return = DB_KEYFIRST;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_OK_BTREE", 11)) {
/* ^ */
#ifdef DB_OK_BTREE
*iv_return = DB_OK_BTREE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_SEQ_WRAP", 11)) {
/* ^ */
#ifdef DB_SEQ_WRAP
*iv_return = DB_SEQ_WRAP;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'T':
if (memEQ(name, "DB_INIT_TXN", 11)) {
/* ^ */
#ifdef DB_INIT_TXN
*iv_return = DB_INIT_TXN;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REGISTER", 11)) {
/* ^ */
#ifdef DB_REGISTER
*iv_return = DB_REGISTER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'U':
if (memEQ(name, "DB_NOTFOUND", 11)) {
/* ^ */
#ifdef DB_NOTFOUND
*iv_return = DB_NOTFOUND;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXN_BULK", 11)) {
/* ^ */
#ifdef DB_TXN_BULK
*iv_return = DB_TXN_BULK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'V':
if (memEQ(name, "DB_NOSERVER", 11)) {
/* ^ */
#ifdef DB_NOSERVER
*iv_return = DB_NOSERVER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'X':
if (memEQ(name, "DB2_AM_EXCL", 11)) {
/* ^ */
#ifdef DB2_AM_EXCL
*iv_return = DB2_AM_EXCL;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'Y':
if (memEQ(name, "DB_TXN_SYNC", 11)) {
/* ^ */
#ifdef DB_TXN_SYNC
*iv_return = DB_TXN_SYNC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_WRNOSYNC", 11)) {
/* ^ */
#ifdef DB_WRNOSYNC
*iv_return = DB_WRNOSYNC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case '_':
if (memEQ(name, "DB_DSYNC_DB", 11)) {
/* ^ */
#ifdef DB_DSYNC_DB
*iv_return = DB_DSYNC_DB;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'o':
if (memEQ(name, "LOGREC_Done", 11)) {
/* ^ */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 6)
*iv_return = LOGREC_Done;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
}
return PERL_constant_NOTFOUND;
}
static int
constant_12 (pTHX_ const char *name, IV *iv_return) {
/* When generated this function returned values for the list of names given
here. However, subsequent manual editing may have added or removed some.
DB_ARCH_DATA DB_CDB_ALLDB DB_CL_WRITER DB_DELIMITER DB_DIRECT_DB
DB_DSYNC_LOG DB_DUPCURSOR DB_ENV_FATAL DB_FAST_STAT DB_FORCESYNC
DB_GET_BOTHC DB_GET_RECNO DB_HASHMAGIC DB_HEAPMAGIC DB_HEAP_FULL
DB_INIT_LOCK DB_JOIN_ITEM DB_LOCKMAGIC DB_LOCK_DUMP DB_LOCK_RW_N
DB_LOGCHKSUM DB_LOGOLDVER DB_LOG_DSYNC DB_MAX_PAGES DB_MEM_LOGID
DB_MPOOL_NEW DB_MPOOL_TRY DB_NEEDSPLIT DB_NODUPDATA DB_NOLOCKING
DB_NORECURSE DB_OVERWRITE DB_PAGEYIELD DB_PAGE_LOCK DB_PERMANENT
DB_POSITIONI DB_PRINTABLE DB_QAMOLDVER DB_RPCCLIENT DB_SET_RANGE
DB_SET_RECNO DB_ST_DUPSET DB_ST_RECNUM DB_SWAPBYTES DB_TEMPORARY
DB_TXN_ABORT DB_TXN_APPLY DB_TXN_PRINT DB_WRITELOCK DB_WRITEOPEN
DB_XA_CREATE LOGREC_LOCKS LOGREC_PGDBT */
/* Offset 3 gives the best switch position. */
switch (name[3]) {
case 'A':
if (memEQ(name, "DB_ARCH_DATA", 12)) {
/* ^ */
#ifdef DB_ARCH_DATA
*iv_return = DB_ARCH_DATA;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'C':
if (memEQ(name, "DB_CDB_ALLDB", 12)) {
/* ^ */
#ifdef DB_CDB_ALLDB
*iv_return = DB_CDB_ALLDB;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_CL_WRITER", 12)) {
/* ^ */
#ifdef DB_CL_WRITER
*iv_return = DB_CL_WRITER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'D':
if (memEQ(name, "DB_DELIMITER", 12)) {
/* ^ */
#ifdef DB_DELIMITER
*iv_return = DB_DELIMITER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_DIRECT_DB", 12)) {
/* ^ */
#ifdef DB_DIRECT_DB
*iv_return = DB_DIRECT_DB;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_DSYNC_LOG", 12)) {
/* ^ */
#ifdef DB_DSYNC_LOG
*iv_return = DB_DSYNC_LOG;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_DUPCURSOR", 12)) {
/* ^ */
#ifdef DB_DUPCURSOR
*iv_return = DB_DUPCURSOR;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'E':
if (memEQ(name, "DB_ENV_FATAL", 12)) {
/* ^ */
#ifdef DB_ENV_FATAL
*iv_return = DB_ENV_FATAL;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'F':
if (memEQ(name, "DB_FAST_STAT", 12)) {
/* ^ */
#ifdef DB_FAST_STAT
*iv_return = DB_FAST_STAT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_FORCESYNC", 12)) {
/* ^ */
#ifdef DB_FORCESYNC
*iv_return = DB_FORCESYNC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'G':
if (memEQ(name, "DB_GET_BOTHC", 12)) {
/* ^ */
#ifdef DB_GET_BOTHC
*iv_return = DB_GET_BOTHC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_GET_RECNO", 12)) {
/* ^ */
#ifdef DB_GET_RECNO
*iv_return = DB_GET_RECNO;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'H':
if (memEQ(name, "DB_HASHMAGIC", 12)) {
/* ^ */
#ifdef DB_HASHMAGIC
*iv_return = DB_HASHMAGIC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_HEAPMAGIC", 12)) {
/* ^ */
#ifdef DB_HEAPMAGIC
*iv_return = DB_HEAPMAGIC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_HEAP_FULL", 12)) {
/* ^ */
#ifdef DB_HEAP_FULL
*iv_return = DB_HEAP_FULL;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'I':
if (memEQ(name, "DB_INIT_LOCK", 12)) {
/* ^ */
#ifdef DB_INIT_LOCK
*iv_return = DB_INIT_LOCK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'J':
if (memEQ(name, "DB_JOIN_ITEM", 12)) {
/* ^ */
#ifdef DB_JOIN_ITEM
*iv_return = DB_JOIN_ITEM;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'L':
if (memEQ(name, "DB_LOCKMAGIC", 12)) {
/* ^ */
#ifdef DB_LOCKMAGIC
*iv_return = DB_LOCKMAGIC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_DUMP", 12)) {
/* ^ */
#if (DB_VERSION_MAJOR > 2) || \
(DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 3)
*iv_return = DB_LOCK_DUMP;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_RW_N", 12)) {
/* ^ */
#ifdef DB_LOCK_RW_N
*iv_return = DB_LOCK_RW_N;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOGCHKSUM", 12)) {
/* ^ */
#ifdef DB_LOGCHKSUM
*iv_return = DB_LOGCHKSUM;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOGOLDVER", 12)) {
/* ^ */
#ifdef DB_LOGOLDVER
*iv_return = DB_LOGOLDVER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOG_DSYNC", 12)) {
/* ^ */
#ifdef DB_LOG_DSYNC
*iv_return = DB_LOG_DSYNC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'M':
if (memEQ(name, "DB_MAX_PAGES", 12)) {
/* ^ */
#ifdef DB_MAX_PAGES
*iv_return = DB_MAX_PAGES;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_MEM_LOGID", 12)) {
/* ^ */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 2) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 2 && \
DB_VERSION_PATCH >= 14)
*iv_return = DB_MEM_LOGID;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_MPOOL_NEW", 12)) {
/* ^ */
#ifdef DB_MPOOL_NEW
*iv_return = DB_MPOOL_NEW;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_MPOOL_TRY", 12)) {
/* ^ */
#ifdef DB_MPOOL_TRY
*iv_return = DB_MPOOL_TRY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'N':
if (memEQ(name, "DB_NEEDSPLIT", 12)) {
/* ^ */
#ifdef DB_NEEDSPLIT
*iv_return = DB_NEEDSPLIT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_NODUPDATA", 12)) {
/* ^ */
#ifdef DB_NODUPDATA
*iv_return = DB_NODUPDATA;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_NOLOCKING", 12)) {
/* ^ */
#ifdef DB_NOLOCKING
*iv_return = DB_NOLOCKING;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_NORECURSE", 12)) {
/* ^ */
#ifdef DB_NORECURSE
*iv_return = DB_NORECURSE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'O':
if (memEQ(name, "DB_OVERWRITE", 12)) {
/* ^ */
#ifdef DB_OVERWRITE
*iv_return = DB_OVERWRITE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'P':
if (memEQ(name, "DB_PAGEYIELD", 12)) {
/* ^ */
#ifdef DB_PAGEYIELD
*iv_return = DB_PAGEYIELD;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_PAGE_LOCK", 12)) {
/* ^ */
#ifdef DB_PAGE_LOCK
*iv_return = DB_PAGE_LOCK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_PERMANENT", 12)) {
/* ^ */
#ifdef DB_PERMANENT
*iv_return = DB_PERMANENT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_POSITIONI", 12)) {
/* ^ */
#ifdef DB_POSITIONI
*iv_return = DB_POSITIONI;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_PRINTABLE", 12)) {
/* ^ */
#ifdef DB_PRINTABLE
*iv_return = DB_PRINTABLE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'Q':
if (memEQ(name, "DB_QAMOLDVER", 12)) {
/* ^ */
#ifdef DB_QAMOLDVER
*iv_return = DB_QAMOLDVER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'R':
if (memEQ(name, "DB_RPCCLIENT", 12)) {
/* ^ */
#ifdef DB_RPCCLIENT
*iv_return = DB_RPCCLIENT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "LOGREC_LOCKS", 12)) {
/* ^ */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 6)
*iv_return = LOGREC_LOCKS;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "LOGREC_PGDBT", 12)) {
/* ^ */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 6)
*iv_return = LOGREC_PGDBT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'S':
if (memEQ(name, "DB_SET_RANGE", 12)) {
/* ^ */
#ifdef DB_SET_RANGE
*iv_return = DB_SET_RANGE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_SET_RECNO", 12)) {
/* ^ */
#ifdef DB_SET_RECNO
*iv_return = DB_SET_RECNO;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ST_DUPSET", 12)) {
/* ^ */
#ifdef DB_ST_DUPSET
*iv_return = DB_ST_DUPSET;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ST_RECNUM", 12)) {
/* ^ */
#ifdef DB_ST_RECNUM
*iv_return = DB_ST_RECNUM;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_SWAPBYTES", 12)) {
/* ^ */
#ifdef DB_SWAPBYTES
*iv_return = DB_SWAPBYTES;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'T':
if (memEQ(name, "DB_TEMPORARY", 12)) {
/* ^ */
#ifdef DB_TEMPORARY
*iv_return = DB_TEMPORARY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXN_ABORT", 12)) {
/* ^ */
#if (DB_VERSION_MAJOR > 3) || \
(DB_VERSION_MAJOR == 3 && DB_VERSION_MINOR > 1) || \
(DB_VERSION_MAJOR == 3 && DB_VERSION_MINOR == 1 && \
DB_VERSION_PATCH >= 14)
*iv_return = DB_TXN_ABORT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXN_APPLY", 12)) {
/* ^ */
#if (DB_VERSION_MAJOR > 4) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 14)
*iv_return = DB_TXN_APPLY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXN_PRINT", 12)) {
/* ^ */
#if (DB_VERSION_MAJOR > 4) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 1) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 1 && \
DB_VERSION_PATCH >= 24)
*iv_return = DB_TXN_PRINT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'W':
if (memEQ(name, "DB_WRITELOCK", 12)) {
/* ^ */
#ifdef DB_WRITELOCK
*iv_return = DB_WRITELOCK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_WRITEOPEN", 12)) {
/* ^ */
#ifdef DB_WRITEOPEN
*iv_return = DB_WRITEOPEN;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'X':
if (memEQ(name, "DB_XA_CREATE", 12)) {
/* ^ */
#ifdef DB_XA_CREATE
*iv_return = DB_XA_CREATE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
}
return PERL_constant_NOTFOUND;
}
static int
constant_13 (pTHX_ const char *name, IV *iv_return) {
/* When generated this function returned values for the list of names given
here. However, subsequent manual editing may have added or removed some.
DB2_AM_NOWAIT DB_AGGRESSIVE DB_BTREEMAGIC DB_CHECKPOINT DB_DIRECT_LOG
DB_DIRTY_READ DB_DONOTINDEX DB_EID_MASTER DB_ENV_CREATE DB_ENV_NOMMAP
DB_ENV_THREAD DB_FREE_SPACE DB_HASHOLDVER DB_HEAPOLDVER DB_INCOMPLETE
DB_INIT_MPOOL DB_INIT_MUTEX DB_LOCAL_SITE DB_LOCK_ABORT DB_LOCK_CHECK
DB_LOCK_NORUN DB_LOCK_RIW_N DB_LOCK_TRADE DB_LOGVERSION DB_LOG_CHKPNT
DB_LOG_COMMIT DB_LOG_DIRECT DB_LOG_LOCKED DB_LOG_NOCOPY DB_LOG_RESEND
DB_MEM_LOCKER DB_MEM_THREAD DB_MPOOL_EDIT DB_MPOOL_FREE DB_MPOOL_LAST
DB_MUTEXDEBUG DB_MUTEXLOCKS DB_NEXT_NODUP DB_NOORDERCHK DB_PREV_NODUP
DB_PR_HEADERS DB_QAMVERSION DB_RDWRMASTER DB_REGISTERED DB_REP_CLIENT
DB_REP_CREATE DB_REP_IGNORE DB_REP_ISPERM DB_REP_MASTER DB_SEQUENTIAL
DB_SPARE_FLAG DB_STAT_ALLOC DB_STAT_CLEAR DB_ST_DUPSORT DB_SYSTEM_MEM
DB_TXNVERSION DB_TXN_FAMILY DB_TXN_NOSYNC DB_TXN_NOWAIT DB_VERIFY_BAD
DB_debug_FLAG DB_user_BEGIN LOGREC_PGDDBT LOGREC_PGLIST */
/* Offset 5 gives the best switch position. */
switch (name[5]) {
case 'A':
if (memEQ(name, "DB_HEAPOLDVER", 13)) {
/* ^ */
#ifdef DB_HEAPOLDVER
*iv_return = DB_HEAPOLDVER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_SPARE_FLAG", 13)) {
/* ^ */
#ifdef DB_SPARE_FLAG
*iv_return = DB_SPARE_FLAG;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_STAT_ALLOC", 13)) {
/* ^ */
#ifdef DB_STAT_ALLOC
*iv_return = DB_STAT_ALLOC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_STAT_CLEAR", 13)) {
/* ^ */
#ifdef DB_STAT_CLEAR
*iv_return = DB_STAT_CLEAR;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'C':
if (memEQ(name, "DB_INCOMPLETE", 13)) {
/* ^ */
#ifdef DB_INCOMPLETE
*iv_return = DB_INCOMPLETE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCAL_SITE", 13)) {
/* ^ */
#ifdef DB_LOCAL_SITE
*iv_return = DB_LOCAL_SITE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_ABORT", 13)) {
/* ^ */
#ifdef DB_LOCK_ABORT
*iv_return = DB_LOCK_ABORT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_CHECK", 13)) {
/* ^ */
#ifdef DB_LOCK_CHECK
*iv_return = DB_LOCK_CHECK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_NORUN", 13)) {
/* ^ */
#ifdef DB_LOCK_NORUN
*iv_return = DB_LOCK_NORUN;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_RIW_N", 13)) {
/* ^ */
#ifdef DB_LOCK_RIW_N
*iv_return = DB_LOCK_RIW_N;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_TRADE", 13)) {
/* ^ */
#if (DB_VERSION_MAJOR > 4) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 1) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 1 && \
DB_VERSION_PATCH >= 24)
*iv_return = DB_LOCK_TRADE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "LOGREC_PGDDBT", 13)) {
/* ^ */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 6)
*iv_return = LOGREC_PGDDBT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "LOGREC_PGLIST", 13)) {
/* ^ */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 6)
*iv_return = LOGREC_PGLIST;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'D':
if (memEQ(name, "DB_EID_MASTER", 13)) {
/* ^ */
#ifdef DB_EID_MASTER
*iv_return = DB_EID_MASTER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'E':
if (memEQ(name, "DB_CHECKPOINT", 13)) {
/* ^ */
#ifdef DB_CHECKPOINT
*iv_return = DB_CHECKPOINT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_FREE_SPACE", 13)) {
/* ^ */
#ifdef DB_FREE_SPACE
*iv_return = DB_FREE_SPACE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_PREV_NODUP", 13)) {
/* ^ */
#ifdef DB_PREV_NODUP
*iv_return = DB_PREV_NODUP;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'G':
if (memEQ(name, "DB_AGGRESSIVE", 13)) {
/* ^ */
#ifdef DB_AGGRESSIVE
*iv_return = DB_AGGRESSIVE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOGVERSION", 13)) {
/* ^ */
#ifdef DB_LOGVERSION
*iv_return = DB_LOGVERSION;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOG_CHKPNT", 13)) {
/* ^ */
#ifdef DB_LOG_CHKPNT
*iv_return = DB_LOG_CHKPNT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOG_COMMIT", 13)) {
/* ^ */
#ifdef DB_LOG_COMMIT
*iv_return = DB_LOG_COMMIT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOG_DIRECT", 13)) {
/* ^ */
#ifdef DB_LOG_DIRECT
*iv_return = DB_LOG_DIRECT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOG_LOCKED", 13)) {
/* ^ */
#ifdef DB_LOG_LOCKED
*iv_return = DB_LOG_LOCKED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOG_NOCOPY", 13)) {
/* ^ */
#ifdef DB_LOG_NOCOPY
*iv_return = DB_LOG_NOCOPY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOG_RESEND", 13)) {
/* ^ */
#ifdef DB_LOG_RESEND
*iv_return = DB_LOG_RESEND;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REGISTERED", 13)) {
/* ^ */
#ifdef DB_REGISTERED
*iv_return = DB_REGISTERED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'I':
if (memEQ(name, "DB_INIT_MPOOL", 13)) {
/* ^ */
#ifdef DB_INIT_MPOOL
*iv_return = DB_INIT_MPOOL;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_INIT_MUTEX", 13)) {
/* ^ */
#ifdef DB_INIT_MUTEX
*iv_return = DB_INIT_MUTEX;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'M':
if (memEQ(name, "DB2_AM_NOWAIT", 13)) {
/* ^ */
#ifdef DB2_AM_NOWAIT
*iv_return = DB2_AM_NOWAIT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_MEM_LOCKER", 13)) {
/* ^ */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 2) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 2 && \
DB_VERSION_PATCH >= 14)
*iv_return = DB_MEM_LOCKER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_MEM_THREAD", 13)) {
/* ^ */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 2) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 2 && \
DB_VERSION_PATCH >= 14)
*iv_return = DB_MEM_THREAD;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_QAMVERSION", 13)) {
/* ^ */
#ifdef DB_QAMVERSION
*iv_return = DB_QAMVERSION;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'N':
if (memEQ(name, "DB_DONOTINDEX", 13)) {
/* ^ */
#ifdef DB_DONOTINDEX
*iv_return = DB_DONOTINDEX;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXNVERSION", 13)) {
/* ^ */
#ifdef DB_TXNVERSION
*iv_return = DB_TXNVERSION;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXN_FAMILY", 13)) {
/* ^ */
#ifdef DB_TXN_FAMILY
*iv_return = DB_TXN_FAMILY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXN_NOSYNC", 13)) {
/* ^ */
#ifdef DB_TXN_NOSYNC
*iv_return = DB_TXN_NOSYNC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXN_NOWAIT", 13)) {
/* ^ */
#ifdef DB_TXN_NOWAIT
*iv_return = DB_TXN_NOWAIT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'O':
if (memEQ(name, "DB_MPOOL_EDIT", 13)) {
/* ^ */
#ifdef DB_MPOOL_EDIT
*iv_return = DB_MPOOL_EDIT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_MPOOL_FREE", 13)) {
/* ^ */
#ifdef DB_MPOOL_FREE
*iv_return = DB_MPOOL_FREE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_MPOOL_LAST", 13)) {
/* ^ */
#ifdef DB_MPOOL_LAST
*iv_return = DB_MPOOL_LAST;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_NOORDERCHK", 13)) {
/* ^ */
#ifdef DB_NOORDERCHK
*iv_return = DB_NOORDERCHK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'P':
if (memEQ(name, "DB_REP_CLIENT", 13)) {
/* ^ */
#ifdef DB_REP_CLIENT
*iv_return = DB_REP_CLIENT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REP_CREATE", 13)) {
/* ^ */
#ifdef DB_REP_CREATE
*iv_return = DB_REP_CREATE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REP_IGNORE", 13)) {
/* ^ */
#ifdef DB_REP_IGNORE
*iv_return = DB_REP_IGNORE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REP_ISPERM", 13)) {
/* ^ */
#ifdef DB_REP_ISPERM
*iv_return = DB_REP_ISPERM;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REP_MASTER", 13)) {
/* ^ */
#ifdef DB_REP_MASTER
*iv_return = DB_REP_MASTER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'Q':
if (memEQ(name, "DB_SEQUENTIAL", 13)) {
/* ^ */
#ifdef DB_SEQUENTIAL
*iv_return = DB_SEQUENTIAL;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'R':
if (memEQ(name, "DB_BTREEMAGIC", 13)) {
/* ^ */
#ifdef DB_BTREEMAGIC
*iv_return = DB_BTREEMAGIC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_DIRECT_LOG", 13)) {
/* ^ */
#ifdef DB_DIRECT_LOG
*iv_return = DB_DIRECT_LOG;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_DIRTY_READ", 13)) {
/* ^ */
#ifdef DB_DIRTY_READ
*iv_return = DB_DIRTY_READ;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERIFY_BAD", 13)) {
/* ^ */
#ifdef DB_VERIFY_BAD
*iv_return = DB_VERIFY_BAD;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'S':
if (memEQ(name, "DB_HASHOLDVER", 13)) {
/* ^ */
#ifdef DB_HASHOLDVER
*iv_return = DB_HASHOLDVER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_SYSTEM_MEM", 13)) {
/* ^ */
#ifdef DB_SYSTEM_MEM
*iv_return = DB_SYSTEM_MEM;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'T':
if (memEQ(name, "DB_MUTEXDEBUG", 13)) {
/* ^ */
#ifdef DB_MUTEXDEBUG
*iv_return = DB_MUTEXDEBUG;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_MUTEXLOCKS", 13)) {
/* ^ */
#ifdef DB_MUTEXLOCKS
*iv_return = DB_MUTEXLOCKS;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'V':
if (memEQ(name, "DB_ENV_CREATE", 13)) {
/* ^ */
#ifdef DB_ENV_CREATE
*iv_return = DB_ENV_CREATE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ENV_NOMMAP", 13)) {
/* ^ */
#ifdef DB_ENV_NOMMAP
*iv_return = DB_ENV_NOMMAP;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ENV_THREAD", 13)) {
/* ^ */
#ifdef DB_ENV_THREAD
*iv_return = DB_ENV_THREAD;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'W':
if (memEQ(name, "DB_RDWRMASTER", 13)) {
/* ^ */
#ifdef DB_RDWRMASTER
*iv_return = DB_RDWRMASTER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'X':
if (memEQ(name, "DB_NEXT_NODUP", 13)) {
/* ^ */
#ifdef DB_NEXT_NODUP
*iv_return = DB_NEXT_NODUP;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case '_':
if (memEQ(name, "DB_PR_HEADERS", 13)) {
/* ^ */
#ifdef DB_PR_HEADERS
*iv_return = DB_PR_HEADERS;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ST_DUPSORT", 13)) {
/* ^ */
#ifdef DB_ST_DUPSORT
*iv_return = DB_ST_DUPSORT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'b':
if (memEQ(name, "DB_debug_FLAG", 13)) {
/* ^ */
#ifdef DB_debug_FLAG
*iv_return = DB_debug_FLAG;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'e':
if (memEQ(name, "DB_user_BEGIN", 13)) {
/* ^ */
#ifdef DB_user_BEGIN
*iv_return = DB_user_BEGIN;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
}
return PERL_constant_NOTFOUND;
}
static int
constant_14 (pTHX_ const char *name, IV *iv_return) {
/* When generated this function returned values for the list of names given
here. However, subsequent manual editing may have added or removed some.
DB2_AM_INTEXCL DB_ARCH_REMOVE DB_AUTO_COMMIT DB_BACKUP_SIZE DB_BTREEOLDVER
DB_CHKSUM_SHA1 DB_CURSOR_BULK DB_EID_INVALID DB_ENCRYPT_AES DB_ENV_APPINIT
DB_ENV_DBLOCAL DB_ENV_FAILCHK DB_ENV_LOCKING DB_ENV_LOGGING DB_ENV_NOFLUSH
DB_ENV_NOPANIC DB_ENV_PRIVATE DB_EVENT_PANIC DB_FILE_ID_LEN DB_HANDLE_LOCK
DB_HASHVERSION DB_HEAPVERSION DB_HEAP_RID_SZ DB_INTERNAL_DB DB_JOIN_NOSORT
DB_LOCKVERSION DB_LOCK_EXPIRE DB_LOCK_NOWAIT DB_LOCK_OLDEST DB_LOCK_RANDOM
DB_LOCK_RECORD DB_LOCK_REMOVE DB_LOCK_SWITCH DB_LOG_NO_DATA DB_MAX_RECORDS
DB_MPOOL_CLEAN DB_MPOOL_DIRTY DB_NOOVERWRITE DB_NOSERVER_ID DB_ODDFILESIZE
DB_OLD_VERSION DB_OPEN_CALLED DB_RECORDCOUNT DB_RECORD_LOCK DB_REGION_ANON
DB_REGION_INIT DB_REGION_NAME DB_RENAMEMAGIC DB_REPMGR_PEER DB_REP_BULKOVF
DB_REP_EGENCHG DB_REP_LOCKOUT DB_REP_NEWSITE DB_REP_NOTPERM DB_REP_UNAVAIL
DB_REVSPLITOFF DB_RUNRECOVERY DB_SEQ_WRAPPED DB_SET_TXN_NOW DB_SHALLOW_DUP
DB_ST_IS_RECNO DB_ST_TOPLEVEL DB_USE_ENVIRON DB_VERB_BACKUP DB_WRITECURSOR
DB_XIDDATASIZE LOGREC_POINTER */
/* Offset 13 gives the best switch position. */
switch (name[13]) {
case '1':
if (memEQ(name, "DB_CHKSUM_SHA", 13)) {
/* 1 */
#ifdef DB_CHKSUM_SHA1
*iv_return = DB_CHKSUM_SHA1;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'A':
if (memEQ(name, "DB_LOG_NO_DAT", 13)) {
/* A */
#ifdef DB_LOG_NO_DATA
*iv_return = DB_LOG_NO_DATA;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'B':
if (memEQ(name, "DB_INTERNAL_D", 13)) {
/* B */
#ifdef DB_INTERNAL_DB
*iv_return = DB_INTERNAL_DB;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'C':
if (memEQ(name, "DB_ENV_NOPANI", 13)) {
/* C */
#ifdef DB_ENV_NOPANIC
*iv_return = DB_ENV_NOPANIC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_EVENT_PANI", 13)) {
/* C */
#ifdef DB_EVENT_PANIC
*iv_return = DB_EVENT_PANIC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_RENAMEMAGI", 13)) {
/* C */
#ifdef DB_RENAMEMAGIC
*iv_return = DB_RENAMEMAGIC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'D':
if (memEQ(name, "DB_EID_INVALI", 13)) {
/* D */
#ifdef DB_EID_INVALID
*iv_return = DB_EID_INVALID;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_RECOR", 13)) {
/* D */
#ifdef DB_LOCK_RECORD
*iv_return = DB_LOCK_RECORD;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_NOSERVER_I", 13)) {
/* D */
#ifdef DB_NOSERVER_ID
*iv_return = DB_NOSERVER_ID;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_OPEN_CALLE", 13)) {
/* D */
#ifdef DB_OPEN_CALLED
*iv_return = DB_OPEN_CALLED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_SEQ_WRAPPE", 13)) {
/* D */
#ifdef DB_SEQ_WRAPPED
*iv_return = DB_SEQ_WRAPPED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'E':
if (memEQ(name, "DB_ARCH_REMOV", 13)) {
/* E */
#ifdef DB_ARCH_REMOVE
*iv_return = DB_ARCH_REMOVE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_BACKUP_SIZ", 13)) {
/* E */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 3) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 3 && \
DB_VERSION_PATCH >= 5)
*iv_return = DB_BACKUP_SIZE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ENV_PRIVAT", 13)) {
/* E */
#ifdef DB_ENV_PRIVATE
*iv_return = DB_ENV_PRIVATE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_EXPIR", 13)) {
/* E */
#ifdef DB_LOCK_EXPIRE
*iv_return = DB_LOCK_EXPIRE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_REMOV", 13)) {
/* E */
#ifdef DB_LOCK_REMOVE
*iv_return = DB_LOCK_REMOVE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_NOOVERWRIT", 13)) {
/* E */
#ifdef DB_NOOVERWRITE
*iv_return = DB_NOOVERWRITE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ODDFILESIZ", 13)) {
/* E */
#ifdef DB_ODDFILESIZE
*iv_return = DB_ODDFILESIZE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REGION_NAM", 13)) {
/* E */
#ifdef DB_REGION_NAME
*iv_return = DB_REGION_NAME;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REP_NEWSIT", 13)) {
/* E */
#ifdef DB_REP_NEWSITE
*iv_return = DB_REP_NEWSITE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_XIDDATASIZ", 13)) {
/* E */
#ifdef DB_XIDDATASIZE
*iv_return = DB_XIDDATASIZE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'F':
if (memEQ(name, "DB_REP_BULKOV", 13)) {
/* F */
#ifdef DB_REP_BULKOVF
*iv_return = DB_REP_BULKOVF;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REVSPLITOF", 13)) {
/* F */
#ifdef DB_REVSPLITOFF
*iv_return = DB_REVSPLITOFF;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'G':
if (memEQ(name, "DB_ENV_LOCKIN", 13)) {
/* G */
#ifdef DB_ENV_LOCKING
*iv_return = DB_ENV_LOCKING;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ENV_LOGGIN", 13)) {
/* G */
#ifdef DB_ENV_LOGGING
*iv_return = DB_ENV_LOGGING;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REP_EGENCH", 13)) {
/* G */
#ifdef DB_REP_EGENCHG
*iv_return = DB_REP_EGENCHG;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'H':
if (memEQ(name, "DB_ENV_NOFLUS", 13)) {
/* H */
#ifdef DB_ENV_NOFLUSH
*iv_return = DB_ENV_NOFLUSH;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_SWITC", 13)) {
/* H */
#ifdef DB_LOCK_SWITCH
*iv_return = DB_LOCK_SWITCH;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'K':
if (memEQ(name, "DB_CURSOR_BUL", 13)) {
/* K */
#ifdef DB_CURSOR_BULK
*iv_return = DB_CURSOR_BULK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ENV_FAILCH", 13)) {
/* K */
#ifdef DB_ENV_FAILCHK
*iv_return = DB_ENV_FAILCHK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_HANDLE_LOC", 13)) {
/* K */
#ifdef DB_HANDLE_LOCK
*iv_return = DB_HANDLE_LOCK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_RECORD_LOC", 13)) {
/* K */
#ifdef DB_RECORD_LOCK
*iv_return = DB_RECORD_LOCK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'L':
if (memEQ(name, "DB2_AM_INTEXC", 13)) {
/* L */
#ifdef DB2_AM_INTEXCL
*iv_return = DB2_AM_INTEXCL;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ENV_DBLOCA", 13)) {
/* L */
#ifdef DB_ENV_DBLOCAL
*iv_return = DB_ENV_DBLOCAL;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REP_UNAVAI", 13)) {
/* L */
#ifdef DB_REP_UNAVAIL
*iv_return = DB_REP_UNAVAIL;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ST_TOPLEVE", 13)) {
/* L */
#ifdef DB_ST_TOPLEVEL
*iv_return = DB_ST_TOPLEVEL;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'M':
if (memEQ(name, "DB_LOCK_RANDO", 13)) {
/* M */
#ifdef DB_LOCK_RANDOM
*iv_return = DB_LOCK_RANDOM;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REP_NOTPER", 13)) {
/* M */
#ifdef DB_REP_NOTPERM
*iv_return = DB_REP_NOTPERM;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'N':
if (memEQ(name, "DB_FILE_ID_LE", 13)) {
/* N */
#ifdef DB_FILE_ID_LEN
*iv_return = DB_FILE_ID_LEN;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_HASHVERSIO", 13)) {
/* N */
#ifdef DB_HASHVERSION
*iv_return = DB_HASHVERSION;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_HEAPVERSIO", 13)) {
/* N */
#ifdef DB_HEAPVERSION
*iv_return = DB_HEAPVERSION;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCKVERSIO", 13)) {
/* N */
#ifdef DB_LOCKVERSION
*iv_return = DB_LOCKVERSION;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_MPOOL_CLEA", 13)) {
/* N */
#ifdef DB_MPOOL_CLEAN
*iv_return = DB_MPOOL_CLEAN;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_OLD_VERSIO", 13)) {
/* N */
#ifdef DB_OLD_VERSION
*iv_return = DB_OLD_VERSION;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REGION_ANO", 13)) {
/* N */
#ifdef DB_REGION_ANON
*iv_return = DB_REGION_ANON;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_USE_ENVIRO", 13)) {
/* N */
#ifdef DB_USE_ENVIRON
*iv_return = DB_USE_ENVIRON;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'O':
if (memEQ(name, "DB_ST_IS_RECN", 13)) {
/* O */
#ifdef DB_ST_IS_RECNO
*iv_return = DB_ST_IS_RECNO;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'P':
if (memEQ(name, "DB_SHALLOW_DU", 13)) {
/* P */
#ifdef DB_SHALLOW_DUP
*iv_return = DB_SHALLOW_DUP;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERB_BACKU", 13)) {
/* P */
#ifdef DB_VERB_BACKUP
*iv_return = DB_VERB_BACKUP;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'R':
if (memEQ(name, "DB_BTREEOLDVE", 13)) {
/* R */
#ifdef DB_BTREEOLDVER
*iv_return = DB_BTREEOLDVER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REPMGR_PEE", 13)) {
/* R */
#ifdef DB_REPMGR_PEER
*iv_return = DB_REPMGR_PEER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_WRITECURSO", 13)) {
/* R */
#ifdef DB_WRITECURSOR
*iv_return = DB_WRITECURSOR;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "LOGREC_POINTE", 13)) {
/* R */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 6)
*iv_return = LOGREC_POINTER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'S':
if (memEQ(name, "DB_ENCRYPT_AE", 13)) {
/* S */
#ifdef DB_ENCRYPT_AES
*iv_return = DB_ENCRYPT_AES;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_MAX_RECORD", 13)) {
/* S */
#ifdef DB_MAX_RECORDS
*iv_return = DB_MAX_RECORDS;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'T':
if (memEQ(name, "DB_AUTO_COMMI", 13)) {
/* T */
#ifdef DB_AUTO_COMMIT
*iv_return = DB_AUTO_COMMIT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ENV_APPINI", 13)) {
/* T */
#ifdef DB_ENV_APPINIT
*iv_return = DB_ENV_APPINIT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_JOIN_NOSOR", 13)) {
/* T */
#ifdef DB_JOIN_NOSORT
*iv_return = DB_JOIN_NOSORT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_NOWAI", 13)) {
/* T */
#ifdef DB_LOCK_NOWAIT
*iv_return = DB_LOCK_NOWAIT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_OLDES", 13)) {
/* T */
#ifdef DB_LOCK_OLDEST
*iv_return = DB_LOCK_OLDEST;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_RECORDCOUN", 13)) {
/* T */
#ifdef DB_RECORDCOUNT
*iv_return = DB_RECORDCOUNT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REGION_INI", 13)) {
/* T */
#ifdef DB_REGION_INIT
*iv_return = DB_REGION_INIT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REP_LOCKOU", 13)) {
/* T */
#ifdef DB_REP_LOCKOUT
*iv_return = DB_REP_LOCKOUT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'W':
if (memEQ(name, "DB_SET_TXN_NO", 13)) {
/* W */
#ifdef DB_SET_TXN_NOW
*iv_return = DB_SET_TXN_NOW;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'Y':
if (memEQ(name, "DB_MPOOL_DIRT", 13)) {
/* Y */
#ifdef DB_MPOOL_DIRTY
*iv_return = DB_MPOOL_DIRTY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_RUNRECOVER", 13)) {
/* Y */
#ifdef DB_RUNRECOVERY
*iv_return = DB_RUNRECOVERY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'Z':
if (memEQ(name, "DB_HEAP_RID_S", 13)) {
/* Z */
#ifdef DB_HEAP_RID_SZ
*iv_return = DB_HEAP_RID_SZ;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
}
return PERL_constant_NOTFOUND;
}
static int
constant_15 (pTHX_ const char *name, IV *iv_return) {
/* When generated this function returned values for the list of names given
here. However, subsequent manual editing may have added or removed some.
DB_APPLY_LOGREG DB_ASSOC_CREATE DB_BACKUP_CLEAN DB_BACKUP_FILES
DB_BTREEVERSION DB_BUFFER_SMALL DB_CKP_INTERNAL DB_CONSUME_WAIT
DB_ENV_DSYNC_DB DB_ENV_LOCKDOWN DB_ENV_YIELDCPU DB_GET_BOTH_LTE
DB_IGNORE_LEASE DB_LOCK_DEFAULT DB_LOCK_INHERIT DB_LOCK_NOTHELD
DB_LOCK_PUT_ALL DB_LOCK_PUT_OBJ DB_LOCK_TIMEOUT DB_LOCK_UPGRADE
DB_LOG_INMEMORY DB_LOG_WRNOSYNC DB_MPOOL_CREATE DB_MPOOL_EXTENT
DB_MPOOL_NOFILE DB_MPOOL_NOLOCK DB_MPOOL_UNLINK DB_MULTIPLE_KEY
DB_MULTIVERSION DB_MUTEX_LOCKED DB_MUTEX_SHARED DB_MUTEX_THREAD
DB_OPFLAGS_MASK DB_ORDERCHKONLY DB_PRIORITY_LOW DB_REGION_MAGIC
DB_REP_ANYWHERE DB_REP_ELECTION DB_REP_LOGREADY DB_REP_LOGSONLY
DB_REP_NOBUFFER DB_REP_OUTDATED DB_REP_PAGEDONE DB_STAT_NOERROR
DB_STAT_SUMMARY DB_ST_OVFL_LEAF DB_SURPRISE_KID DB_TEST_POSTLOG
DB_TEST_PREOPEN DB_TEST_RECYCLE DB_TXN_LOCK_2PL DB_TXN_LOG_MASK
DB_TXN_LOG_REDO DB_TXN_LOG_UNDO DB_TXN_SNAPSHOT DB_VERB_FILEOPS
DB_VERIFY_FATAL */
/* Offset 10 gives the best switch position. */
switch (name[10]) {
case 'C':
if (memEQ(name, "DB_BACKUP_CLEAN", 15)) {
/* ^ */
#ifdef DB_BACKUP_CLEAN
*iv_return = DB_BACKUP_CLEAN;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REP_ELECTION", 15)) {
/* ^ */
#ifdef DB_REP_ELECTION
*iv_return = DB_REP_ELECTION;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TEST_RECYCLE", 15)) {
/* ^ */
#ifdef DB_TEST_RECYCLE
*iv_return = DB_TEST_RECYCLE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'D':
if (memEQ(name, "DB_REP_OUTDATED", 15)) {
/* ^ */
#ifdef DB_REP_OUTDATED
*iv_return = DB_REP_OUTDATED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'E':
if (memEQ(name, "DB_CKP_INTERNAL", 15)) {
/* ^ */
#ifdef DB_CKP_INTERNAL
*iv_return = DB_CKP_INTERNAL;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOG_INMEMORY", 15)) {
/* ^ */
#ifdef DB_LOG_INMEMORY
*iv_return = DB_LOG_INMEMORY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_MULTIPLE_KEY", 15)) {
/* ^ */
#ifdef DB_MULTIPLE_KEY
*iv_return = DB_MULTIPLE_KEY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REP_PAGEDONE", 15)) {
/* ^ */
#ifdef DB_REP_PAGEDONE
*iv_return = DB_REP_PAGEDONE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_STAT_NOERROR", 15)) {
/* ^ */
#ifdef DB_STAT_NOERROR
*iv_return = DB_STAT_NOERROR;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_SURPRISE_KID", 15)) {
/* ^ */
#ifdef DB_SURPRISE_KID
*iv_return = DB_SURPRISE_KID;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TEST_PREOPEN", 15)) {
/* ^ */
#ifdef DB_TEST_PREOPEN
*iv_return = DB_TEST_PREOPEN;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'F':
if (memEQ(name, "DB_BACKUP_FILES", 15)) {
/* ^ */
#ifdef DB_BACKUP_FILES
*iv_return = DB_BACKUP_FILES;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_DEFAULT", 15)) {
/* ^ */
#ifdef DB_LOCK_DEFAULT
*iv_return = DB_LOCK_DEFAULT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERIFY_FATAL", 15)) {
/* ^ */
#ifdef DB_VERIFY_FATAL
*iv_return = DB_VERIFY_FATAL;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'G':
if (memEQ(name, "DB_LOCK_UPGRADE", 15)) {
/* ^ */
#ifdef DB_LOCK_UPGRADE
*iv_return = DB_LOCK_UPGRADE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'H':
if (memEQ(name, "DB_GET_BOTH_LTE", 15)) {
/* ^ */
#ifdef DB_GET_BOTH_LTE
*iv_return = DB_GET_BOTH_LTE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_INHERIT", 15)) {
/* ^ */
#if (DB_VERSION_MAJOR > 2) || \
(DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR > 7) || \
(DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR == 7 && \
DB_VERSION_PATCH >= 1)
*iv_return = DB_LOCK_INHERIT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_MUTEX_SHARED", 15)) {
/* ^ */
#ifdef DB_MUTEX_SHARED
*iv_return = DB_MUTEX_SHARED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_MUTEX_THREAD", 15)) {
/* ^ */
#ifdef DB_MUTEX_THREAD
*iv_return = DB_MUTEX_THREAD;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'K':
if (memEQ(name, "DB_ENV_LOCKDOWN", 15)) {
/* ^ */
#ifdef DB_ENV_LOCKDOWN
*iv_return = DB_ENV_LOCKDOWN;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ORDERCHKONLY", 15)) {
/* ^ */
#ifdef DB_ORDERCHKONLY
*iv_return = DB_ORDERCHKONLY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXN_LOCK_2PL", 15)) {
/* ^ */
#ifdef DB_TXN_LOCK_2PL
*iv_return = DB_TXN_LOCK_2PL;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'L':
if (memEQ(name, "DB_ENV_YIELDCPU", 15)) {
/* ^ */
#ifdef DB_ENV_YIELDCPU
*iv_return = DB_ENV_YIELDCPU;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_IGNORE_LEASE", 15)) {
/* ^ */
#ifdef DB_IGNORE_LEASE
*iv_return = DB_IGNORE_LEASE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERB_FILEOPS", 15)) {
/* ^ */
#ifdef DB_VERB_FILEOPS
*iv_return = DB_VERB_FILEOPS;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'M':
if (memEQ(name, "DB_LOCK_TIMEOUT", 15)) {
/* ^ */
#if (DB_VERSION_MAJOR > 4) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 14)
*iv_return = DB_LOCK_TIMEOUT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REGION_MAGIC", 15)) {
/* ^ */
#ifdef DB_REGION_MAGIC
*iv_return = DB_REGION_MAGIC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_STAT_SUMMARY", 15)) {
/* ^ */
#ifdef DB_STAT_SUMMARY
*iv_return = DB_STAT_SUMMARY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'N':
if (memEQ(name, "DB_ENV_DSYNC_DB", 15)) {
/* ^ */
#ifdef DB_ENV_DSYNC_DB
*iv_return = DB_ENV_DSYNC_DB;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_MPOOL_UNLINK", 15)) {
/* ^ */
#ifdef DB_MPOOL_UNLINK
*iv_return = DB_MPOOL_UNLINK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'O':
if (memEQ(name, "DB_APPLY_LOGREG", 15)) {
/* ^ */
#ifdef DB_APPLY_LOGREG
*iv_return = DB_APPLY_LOGREG;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOG_WRNOSYNC", 15)) {
/* ^ */
#ifdef DB_LOG_WRNOSYNC
*iv_return = DB_LOG_WRNOSYNC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_MPOOL_NOFILE", 15)) {
/* ^ */
#ifdef DB_MPOOL_NOFILE
*iv_return = DB_MPOOL_NOFILE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_MPOOL_NOLOCK", 15)) {
/* ^ */
#ifdef DB_MPOOL_NOLOCK
*iv_return = DB_MPOOL_NOLOCK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_MUTEX_LOCKED", 15)) {
/* ^ */
#ifdef DB_MUTEX_LOCKED
*iv_return = DB_MUTEX_LOCKED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'P':
if (memEQ(name, "DB_TXN_SNAPSHOT", 15)) {
/* ^ */
#ifdef DB_TXN_SNAPSHOT
*iv_return = DB_TXN_SNAPSHOT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'R':
if (memEQ(name, "DB_ASSOC_CREATE", 15)) {
/* ^ */
#ifdef DB_ASSOC_CREATE
*iv_return = DB_ASSOC_CREATE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_BTREEVERSION", 15)) {
/* ^ */
#ifdef DB_BTREEVERSION
*iv_return = DB_BTREEVERSION;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_MPOOL_CREATE", 15)) {
/* ^ */
#ifdef DB_MPOOL_CREATE
*iv_return = DB_MPOOL_CREATE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_MULTIVERSION", 15)) {
/* ^ */
#ifdef DB_MULTIVERSION
*iv_return = DB_MULTIVERSION;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REP_LOGREADY", 15)) {
/* ^ */
#ifdef DB_REP_LOGREADY
*iv_return = DB_REP_LOGREADY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'S':
if (memEQ(name, "DB_BUFFER_SMALL", 15)) {
/* ^ */
#ifdef DB_BUFFER_SMALL
*iv_return = DB_BUFFER_SMALL;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REP_LOGSONLY", 15)) {
/* ^ */
#ifdef DB_REP_LOGSONLY
*iv_return = DB_REP_LOGSONLY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TEST_POSTLOG", 15)) {
/* ^ */
#ifdef DB_TEST_POSTLOG
*iv_return = DB_TEST_POSTLOG;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'T':
if (memEQ(name, "DB_LOCK_NOTHELD", 15)) {
/* ^ */
#ifdef DB_LOCK_NOTHELD
*iv_return = DB_LOCK_NOTHELD;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_PUT_ALL", 15)) {
/* ^ */
#if (DB_VERSION_MAJOR > 2) || \
(DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 3)
*iv_return = DB_LOCK_PUT_ALL;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_PUT_OBJ", 15)) {
/* ^ */
#if (DB_VERSION_MAJOR > 2) || \
(DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 3)
*iv_return = DB_LOCK_PUT_OBJ;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'U':
if (memEQ(name, "DB_REP_NOBUFFER", 15)) {
/* ^ */
#ifdef DB_REP_NOBUFFER
*iv_return = DB_REP_NOBUFFER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'W':
if (memEQ(name, "DB_REP_ANYWHERE", 15)) {
/* ^ */
#ifdef DB_REP_ANYWHERE
*iv_return = DB_REP_ANYWHERE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'X':
if (memEQ(name, "DB_MPOOL_EXTENT", 15)) {
/* ^ */
#ifdef DB_MPOOL_EXTENT
*iv_return = DB_MPOOL_EXTENT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'Y':
if (memEQ(name, "DB_PRIORITY_LOW", 15)) {
/* ^ */
#if (DB_VERSION_MAJOR > 4) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 1) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 1 && \
DB_VERSION_PATCH >= 24)
*iv_return = DB_PRIORITY_LOW;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case '_':
if (memEQ(name, "DB_CONSUME_WAIT", 15)) {
/* ^ */
#ifdef DB_CONSUME_WAIT
*iv_return = DB_CONSUME_WAIT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_OPFLAGS_MASK", 15)) {
/* ^ */
#ifdef DB_OPFLAGS_MASK
*iv_return = DB_OPFLAGS_MASK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ST_OVFL_LEAF", 15)) {
/* ^ */
#ifdef DB_ST_OVFL_LEAF
*iv_return = DB_ST_OVFL_LEAF;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXN_LOG_MASK", 15)) {
/* ^ */
#ifdef DB_TXN_LOG_MASK
*iv_return = DB_TXN_LOG_MASK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXN_LOG_REDO", 15)) {
/* ^ */
#ifdef DB_TXN_LOG_REDO
*iv_return = DB_TXN_LOG_REDO;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXN_LOG_UNDO", 15)) {
/* ^ */
#ifdef DB_TXN_LOG_UNDO
*iv_return = DB_TXN_LOG_UNDO;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
}
return PERL_constant_NOTFOUND;
}
static int
constant_16 (pTHX_ const char *name, IV *iv_return) {
/* When generated this function returned values for the list of names given
here. However, subsequent manual editing may have added or removed some.
DB_BACKUP_UPDATE DB_CACHED_COUNTS DB_COMPACT_FLAGS DB_DATABASE_LOCK
DB_EID_BROADCAST DB_ENV_CDB_ALLDB DB_ENV_DIRECT_DB DB_ENV_DSYNC_LOG
DB_ENV_HOTBACKUP DB_ENV_NOLOCKING DB_ENV_OVERWRITE DB_ENV_RPCCLIENT
DB_FCNTL_LOCKING DB_FOREIGN_ABORT DB_FREELIST_ONLY DB_GROUP_CREATOR
DB_IMMUTABLE_KEY DB_JAVA_CALLBACK DB_LOCK_CONFLICT DB_LOCK_DEADLOCK
DB_LOCK_MAXLOCKS DB_LOCK_MAXWRITE DB_LOCK_MINLOCKS DB_LOCK_MINWRITE
DB_LOCK_NOTEXIST DB_LOCK_PUT_READ DB_LOCK_YOUNGEST DB_LOGC_BUF_SIZE
DB_LOG_IN_MEMORY DB_MPOOL_DISCARD DB_MPOOL_PRIVATE DB_NOSERVER_HOME
DB_NO_CHECKPOINT DB_OVERWRITE_DUP DB_PAGE_NOTFOUND DB_PRIORITY_HIGH
DB_RECOVER_FATAL DB_REPFLAGS_MASK DB_REPMGR_ISPEER DB_REP_CONF_BULK
DB_REP_DUPMASTER DB_REP_NEWMASTER DB_REP_PERMANENT DB_REP_REREQUEST
DB_SA_UNKNOWNKEY DB_SECONDARY_BAD DB_SEQ_RANGE_SET DB_TEST_POSTOPEN
DB_TEST_POSTSYNC DB_TXN_LOCK_MASK DB_TXN_OPENFILES DB_VERB_CHKPOINT
DB_VERB_DEADLOCK DB_VERB_RECOVERY DB_VERB_REGISTER DB_VERB_REP_MISC
DB_VERB_REP_MSGS DB_VERB_REP_SYNC DB_VERB_REP_TEST DB_VERB_WAITSFOR
DB_VERSION_MAJOR DB_VERSION_MINOR DB_VERSION_PATCH DB_VRFY_FLAGMASK */
/* Offset 10 gives the best switch position. */
switch (name[10]) {
case 'A':
if (memEQ(name, "DB_EID_BROADCAST", 16)) {
/* ^ */
#ifdef DB_EID_BROADCAST
*iv_return = DB_EID_BROADCAST;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_DEADLOCK", 16)) {
/* ^ */
#ifdef DB_LOCK_DEADLOCK
*iv_return = DB_LOCK_DEADLOCK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERB_DEADLOCK", 16)) {
/* ^ */
#ifdef DB_VERB_DEADLOCK
*iv_return = DB_VERB_DEADLOCK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VRFY_FLAGMASK", 16)) {
/* ^ */
#ifdef DB_VRFY_FLAGMASK
*iv_return = DB_VRFY_FLAGMASK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'B':
if (memEQ(name, "DB_ENV_HOTBACKUP", 16)) {
/* ^ */
#ifdef DB_ENV_HOTBACKUP
*iv_return = DB_ENV_HOTBACKUP;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'C':
if (memEQ(name, "DB_CACHED_COUNTS", 16)) {
/* ^ */
#ifdef DB_CACHED_COUNTS
*iv_return = DB_CACHED_COUNTS;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ENV_RPCCLIENT", 16)) {
/* ^ */
#ifdef DB_ENV_RPCCLIENT
*iv_return = DB_ENV_RPCCLIENT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERB_RECOVERY", 16)) {
/* ^ */
#ifdef DB_VERB_RECOVERY
*iv_return = DB_VERB_RECOVERY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'E':
if (memEQ(name, "DB_DATABASE_LOCK", 16)) {
/* ^ */
#ifdef DB_DATABASE_LOCK
*iv_return = DB_DATABASE_LOCK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ENV_DIRECT_DB", 16)) {
/* ^ */
#ifdef DB_ENV_DIRECT_DB
*iv_return = DB_ENV_DIRECT_DB;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REP_REREQUEST", 16)) {
/* ^ */
#ifdef DB_REP_REREQUEST
*iv_return = DB_REP_REREQUEST;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'F':
if (memEQ(name, "DB_LOGC_BUF_SIZE", 16)) {
/* ^ */
#ifdef DB_LOGC_BUF_SIZE
*iv_return = DB_LOGC_BUF_SIZE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REP_CONF_BULK", 16)) {
/* ^ */
#ifdef DB_REP_CONF_BULK
*iv_return = DB_REP_CONF_BULK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'G':
if (memEQ(name, "DB_SEQ_RANGE_SET", 16)) {
/* ^ */
#ifdef DB_SEQ_RANGE_SET
*iv_return = DB_SEQ_RANGE_SET;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERB_REGISTER", 16)) {
/* ^ */
#ifdef DB_VERB_REGISTER
*iv_return = DB_VERB_REGISTER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'I':
if (memEQ(name, "DB_MPOOL_DISCARD", 16)) {
/* ^ */
#ifdef DB_MPOOL_DISCARD
*iv_return = DB_MPOOL_DISCARD;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REPMGR_ISPEER", 16)) {
/* ^ */
#ifdef DB_REPMGR_ISPEER
*iv_return = DB_REPMGR_ISPEER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERB_WAITSFOR", 16)) {
/* ^ */
#ifdef DB_VERB_WAITSFOR
*iv_return = DB_VERB_WAITSFOR;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'K':
if (memEQ(name, "DB_NO_CHECKPOINT", 16)) {
/* ^ */
#ifdef DB_NO_CHECKPOINT
*iv_return = DB_NO_CHECKPOINT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXN_LOCK_MASK", 16)) {
/* ^ */
#ifdef DB_TXN_LOCK_MASK
*iv_return = DB_TXN_LOCK_MASK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERB_CHKPOINT", 16)) {
/* ^ */
#ifdef DB_VERB_CHKPOINT
*iv_return = DB_VERB_CHKPOINT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'L':
if (memEQ(name, "DB_IMMUTABLE_KEY", 16)) {
/* ^ */
#ifdef DB_IMMUTABLE_KEY
*iv_return = DB_IMMUTABLE_KEY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_JAVA_CALLBACK", 16)) {
/* ^ */
#ifdef DB_JAVA_CALLBACK
*iv_return = DB_JAVA_CALLBACK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'M':
if (memEQ(name, "DB_LOG_IN_MEMORY", 16)) {
/* ^ */
#ifdef DB_LOG_IN_MEMORY
*iv_return = DB_LOG_IN_MEMORY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REP_DUPMASTER", 16)) {
/* ^ */
#ifdef DB_REP_DUPMASTER
*iv_return = DB_REP_DUPMASTER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REP_NEWMASTER", 16)) {
/* ^ */
#ifdef DB_REP_NEWMASTER
*iv_return = DB_REP_NEWMASTER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REP_PERMANENT", 16)) {
/* ^ */
#ifdef DB_REP_PERMANENT
*iv_return = DB_REP_PERMANENT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'N':
if (memEQ(name, "DB_ENV_DSYNC_LOG", 16)) {
/* ^ */
#ifdef DB_ENV_DSYNC_LOG
*iv_return = DB_ENV_DSYNC_LOG;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_CONFLICT", 16)) {
/* ^ */
#ifdef DB_LOCK_CONFLICT
*iv_return = DB_LOCK_CONFLICT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_MINLOCKS", 16)) {
/* ^ */
#ifdef DB_LOCK_MINLOCKS
*iv_return = DB_LOCK_MINLOCKS;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_MINWRITE", 16)) {
/* ^ */
#ifdef DB_LOCK_MINWRITE
*iv_return = DB_LOCK_MINWRITE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXN_OPENFILES", 16)) {
/* ^ */
#if (DB_VERSION_MAJOR > 3) || \
(DB_VERSION_MAJOR == 3 && DB_VERSION_MINOR > 1) || \
(DB_VERSION_MAJOR == 3 && DB_VERSION_MINOR == 1 && \
DB_VERSION_PATCH >= 14)
*iv_return = DB_TXN_OPENFILES;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'O':
if (memEQ(name, "DB_ENV_NOLOCKING", 16)) {
/* ^ */
#ifdef DB_ENV_NOLOCKING
*iv_return = DB_ENV_NOLOCKING;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_FCNTL_LOCKING", 16)) {
/* ^ */
#ifdef DB_FCNTL_LOCKING
*iv_return = DB_FCNTL_LOCKING;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_SA_UNKNOWNKEY", 16)) {
/* ^ */
#ifdef DB_SA_UNKNOWNKEY
*iv_return = DB_SA_UNKNOWNKEY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'P':
if (memEQ(name, "DB_VERB_REP_MISC", 16)) {
/* ^ */
#ifdef DB_VERB_REP_MISC
*iv_return = DB_VERB_REP_MISC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERB_REP_MSGS", 16)) {
/* ^ */
#ifdef DB_VERB_REP_MSGS
*iv_return = DB_VERB_REP_MSGS;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERB_REP_SYNC", 16)) {
/* ^ */
#ifdef DB_VERB_REP_SYNC
*iv_return = DB_VERB_REP_SYNC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERB_REP_TEST", 16)) {
/* ^ */
#ifdef DB_VERB_REP_TEST
*iv_return = DB_VERB_REP_TEST;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'R':
if (memEQ(name, "DB_ENV_OVERWRITE", 16)) {
/* ^ */
#ifdef DB_ENV_OVERWRITE
*iv_return = DB_ENV_OVERWRITE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_GROUP_CREATOR", 16)) {
/* ^ */
#ifdef DB_GROUP_CREATOR
*iv_return = DB_GROUP_CREATOR;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_MPOOL_PRIVATE", 16)) {
/* ^ */
#ifdef DB_MPOOL_PRIVATE
*iv_return = DB_MPOOL_PRIVATE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_NOSERVER_HOME", 16)) {
/* ^ */
#ifdef DB_NOSERVER_HOME
*iv_return = DB_NOSERVER_HOME;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_SECONDARY_BAD", 16)) {
/* ^ */
#ifdef DB_SECONDARY_BAD
*iv_return = DB_SECONDARY_BAD;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'S':
if (memEQ(name, "DB_REPFLAGS_MASK", 16)) {
/* ^ */
#ifdef DB_REPFLAGS_MASK
*iv_return = DB_REPFLAGS_MASK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TEST_POSTOPEN", 16)) {
/* ^ */
#ifdef DB_TEST_POSTOPEN
*iv_return = DB_TEST_POSTOPEN;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TEST_POSTSYNC", 16)) {
/* ^ */
#ifdef DB_TEST_POSTSYNC
*iv_return = DB_TEST_POSTSYNC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'T':
if (memEQ(name, "DB_FREELIST_ONLY", 16)) {
/* ^ */
#ifdef DB_FREELIST_ONLY
*iv_return = DB_FREELIST_ONLY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_NOTEXIST", 16)) {
/* ^ */
#ifdef DB_LOCK_NOTEXIST
*iv_return = DB_LOCK_NOTEXIST;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_PUT_READ", 16)) {
/* ^ */
#if (DB_VERSION_MAJOR > 4) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 14)
*iv_return = DB_LOCK_PUT_READ;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_OVERWRITE_DUP", 16)) {
/* ^ */
#ifdef DB_OVERWRITE_DUP
*iv_return = DB_OVERWRITE_DUP;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_PAGE_NOTFOUND", 16)) {
/* ^ */
#ifdef DB_PAGE_NOTFOUND
*iv_return = DB_PAGE_NOTFOUND;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'U':
if (memEQ(name, "DB_BACKUP_UPDATE", 16)) {
/* ^ */
#ifdef DB_BACKUP_UPDATE
*iv_return = DB_BACKUP_UPDATE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_YOUNGEST", 16)) {
/* ^ */
#ifdef DB_LOCK_YOUNGEST
*iv_return = DB_LOCK_YOUNGEST;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'X':
if (memEQ(name, "DB_LOCK_MAXLOCKS", 16)) {
/* ^ */
#ifdef DB_LOCK_MAXLOCKS
*iv_return = DB_LOCK_MAXLOCKS;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_MAXWRITE", 16)) {
/* ^ */
#ifdef DB_LOCK_MAXWRITE
*iv_return = DB_LOCK_MAXWRITE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'Y':
if (memEQ(name, "DB_PRIORITY_HIGH", 16)) {
/* ^ */
#if (DB_VERSION_MAJOR > 4) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 1) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 1 && \
DB_VERSION_PATCH >= 24)
*iv_return = DB_PRIORITY_HIGH;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case '_':
if (memEQ(name, "DB_COMPACT_FLAGS", 16)) {
/* ^ */
#ifdef DB_COMPACT_FLAGS
*iv_return = DB_COMPACT_FLAGS;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ENV_CDB_ALLDB", 16)) {
/* ^ */
#ifdef DB_ENV_CDB_ALLDB
*iv_return = DB_ENV_CDB_ALLDB;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_FOREIGN_ABORT", 16)) {
/* ^ */
#ifdef DB_FOREIGN_ABORT
*iv_return = DB_FOREIGN_ABORT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_RECOVER_FATAL", 16)) {
/* ^ */
#ifdef DB_RECOVER_FATAL
*iv_return = DB_RECOVER_FATAL;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERSION_MAJOR", 16)) {
/* ^ */
#ifdef DB_VERSION_MAJOR
*iv_return = DB_VERSION_MAJOR;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERSION_MINOR", 16)) {
/* ^ */
#ifdef DB_VERSION_MINOR
*iv_return = DB_VERSION_MINOR;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERSION_PATCH", 16)) {
/* ^ */
#ifdef DB_VERSION_PATCH
*iv_return = DB_VERSION_PATCH;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
}
return PERL_constant_NOTFOUND;
}
static int
constant_17 (pTHX_ const char *name, IV *iv_return, const char **pv_return) {
/* When generated this function returned values for the list of names given
here. However, subsequent manual editing may have added or removed some.
DB_BACKUP_NO_LOGS DB_ENV_DIRECT_LOG DB_ENV_REP_CLIENT DB_ENV_REP_MASTER
DB_ENV_STANDALONE DB_ENV_SYSTEM_MEM DB_ENV_TXN_NOSYNC DB_ENV_TXN_NOWAIT
DB_ENV_USER_ALLOC DB_GET_BOTH_RANGE DB_LOG_AUTOREMOVE DB_LOG_SILENT_ERR
DB_LOG_VERIFY_BAD DB_LOG_VERIFY_CAF DB_LOG_VERIFY_ERR DB_MEM_LOCKOBJECT
DB_NO_AUTO_COMMIT DB_READ_COMMITTED DB_REP_CONF_INMEM DB_REP_CONF_LEASE
DB_REP_PAGELOCKED DB_RPC_SERVERPROG DB_RPC_SERVERVERS DB_STAT_LOCK_CONF
DB_STAT_MEMP_HASH DB_STAT_SUBSYSTEM DB_TEST_ELECTINIT DB_TEST_ELECTSEND
DB_TEST_PRERENAME DB_TXN_LOG_VERIFY DB_TXN_POPENFILES DB_TXN_TOKEN_SIZE
DB_VERB_REP_ELECT DB_VERB_REP_LEASE DB_VERSION_FAMILY DB_VERSION_STRING */
/* Offset 13 gives the best switch position. */
switch (name[13]) {
case 'A':
if (memEQ(name, "DB_GET_BOTH_RANGE", 17)) {
/* ^ */
#ifdef DB_GET_BOTH_RANGE
*iv_return = DB_GET_BOTH_RANGE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'C':
if (memEQ(name, "DB_REP_PAGELOCKED", 17)) {
/* ^ */
#ifdef DB_REP_PAGELOCKED
*iv_return = DB_REP_PAGELOCKED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_STAT_LOCK_CONF", 17)) {
/* ^ */
#ifdef DB_STAT_LOCK_CONF
*iv_return = DB_STAT_LOCK_CONF;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'E':
if (memEQ(name, "DB_REP_CONF_LEASE", 17)) {
/* ^ */
#ifdef DB_REP_CONF_LEASE
*iv_return = DB_REP_CONF_LEASE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERB_REP_LEASE", 17)) {
/* ^ */
#ifdef DB_VERB_REP_LEASE
*iv_return = DB_VERB_REP_LEASE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'H':
if (memEQ(name, "DB_STAT_MEMP_HASH", 17)) {
/* ^ */
#ifdef DB_STAT_MEMP_HASH
*iv_return = DB_STAT_MEMP_HASH;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'I':
if (memEQ(name, "DB_ENV_REP_CLIENT", 17)) {
/* ^ */
#ifdef DB_ENV_REP_CLIENT
*iv_return = DB_ENV_REP_CLIENT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TEST_ELECTINIT", 17)) {
/* ^ */
#ifdef DB_TEST_ELECTINIT
*iv_return = DB_TEST_ELECTINIT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXN_POPENFILES", 17)) {
/* ^ */
#if (DB_VERSION_MAJOR > 4) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 14)
*iv_return = DB_TXN_POPENFILES;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'J':
if (memEQ(name, "DB_MEM_LOCKOBJECT", 17)) {
/* ^ */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 2) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 2 && \
DB_VERSION_PATCH >= 14)
*iv_return = DB_MEM_LOCKOBJECT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'L':
if (memEQ(name, "DB_BACKUP_NO_LOGS", 17)) {
/* ^ */
#ifdef DB_BACKUP_NO_LOGS
*iv_return = DB_BACKUP_NO_LOGS;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ENV_STANDALONE", 17)) {
/* ^ */
#ifdef DB_ENV_STANDALONE
*iv_return = DB_ENV_STANDALONE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ENV_USER_ALLOC", 17)) {
/* ^ */
#ifdef DB_ENV_USER_ALLOC
*iv_return = DB_ENV_USER_ALLOC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERB_REP_ELECT", 17)) {
/* ^ */
#ifdef DB_VERB_REP_ELECT
*iv_return = DB_VERB_REP_ELECT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'M':
if (memEQ(name, "DB_LOG_AUTOREMOVE", 17)) {
/* ^ */
#ifdef DB_LOG_AUTOREMOVE
*iv_return = DB_LOG_AUTOREMOVE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_NO_AUTO_COMMIT", 17)) {
/* ^ */
#ifdef DB_NO_AUTO_COMMIT
*iv_return = DB_NO_AUTO_COMMIT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERSION_FAMILY", 17)) {
/* ^ */
#ifdef DB_VERSION_FAMILY
*iv_return = DB_VERSION_FAMILY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'N':
if (memEQ(name, "DB_REP_CONF_INMEM", 17)) {
/* ^ */
#ifdef DB_REP_CONF_INMEM
*iv_return = DB_REP_CONF_INMEM;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TEST_PRERENAME", 17)) {
/* ^ */
#ifdef DB_TEST_PRERENAME
*iv_return = DB_TEST_PRERENAME;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'P':
if (memEQ(name, "DB_RPC_SERVERPROG", 17)) {
/* ^ */
#ifdef DB_RPC_SERVERPROG
*iv_return = DB_RPC_SERVERPROG;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'R':
if (memEQ(name, "DB_TXN_LOG_VERIFY", 17)) {
/* ^ */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 6)
*iv_return = DB_TXN_LOG_VERIFY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERSION_STRING", 17)) {
/* ^ */
#ifdef DB_VERSION_STRING
*pv_return = DB_VERSION_STRING;
return PERL_constant_ISPV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'S':
if (memEQ(name, "DB_ENV_REP_MASTER", 17)) {
/* ^ */
#ifdef DB_ENV_REP_MASTER
*iv_return = DB_ENV_REP_MASTER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ENV_TXN_NOSYNC", 17)) {
/* ^ */
#ifdef DB_ENV_TXN_NOSYNC
*iv_return = DB_ENV_TXN_NOSYNC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_STAT_SUBSYSTEM", 17)) {
/* ^ */
#ifdef DB_STAT_SUBSYSTEM
*iv_return = DB_STAT_SUBSYSTEM;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TEST_ELECTSEND", 17)) {
/* ^ */
#ifdef DB_TEST_ELECTSEND
*iv_return = DB_TEST_ELECTSEND;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXN_TOKEN_SIZE", 17)) {
/* ^ */
#ifdef DB_TXN_TOKEN_SIZE
*iv_return = DB_TXN_TOKEN_SIZE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'T':
if (memEQ(name, "DB_READ_COMMITTED", 17)) {
/* ^ */
#ifdef DB_READ_COMMITTED
*iv_return = DB_READ_COMMITTED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'V':
if (memEQ(name, "DB_RPC_SERVERVERS", 17)) {
/* ^ */
#ifdef DB_RPC_SERVERVERS
*iv_return = DB_RPC_SERVERVERS;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'W':
if (memEQ(name, "DB_ENV_TXN_NOWAIT", 17)) {
/* ^ */
#ifdef DB_ENV_TXN_NOWAIT
*iv_return = DB_ENV_TXN_NOWAIT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case '_':
if (memEQ(name, "DB_ENV_DIRECT_LOG", 17)) {
/* ^ */
#ifdef DB_ENV_DIRECT_LOG
*iv_return = DB_ENV_DIRECT_LOG;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ENV_SYSTEM_MEM", 17)) {
/* ^ */
#ifdef DB_ENV_SYSTEM_MEM
*iv_return = DB_ENV_SYSTEM_MEM;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOG_SILENT_ERR", 17)) {
/* ^ */
#ifdef DB_LOG_SILENT_ERR
*iv_return = DB_LOG_SILENT_ERR;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOG_VERIFY_BAD", 17)) {
/* ^ */
#ifdef DB_LOG_VERIFY_BAD
*iv_return = DB_LOG_VERIFY_BAD;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOG_VERIFY_CAF", 17)) {
/* ^ */
#ifdef DB_LOG_VERIFY_CAF
*iv_return = DB_LOG_VERIFY_CAF;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOG_VERIFY_ERR", 17)) {
/* ^ */
#ifdef DB_LOG_VERIFY_ERR
*iv_return = DB_LOG_VERIFY_ERR;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
}
return PERL_constant_NOTFOUND;
}
static int
constant_18 (pTHX_ const char *name, IV *iv_return) {
/* When generated this function returned values for the list of names given
here. However, subsequent manual editing may have added or removed some.
DB_ALREADY_ABORTED DB_DURABLE_UNKNOWN DB_ENV_AUTO_COMMIT
DB_ENV_OPEN_CALLED DB_ENV_REF_COUNTED DB_ENV_REGION_INIT
DB_EVENT_REG_ALIVE DB_EVENT_REG_PANIC DB_FAILCHK_ISALIVE
DB_FOREIGN_CASCADE DB_FOREIGN_NULLIFY DB_LOCK_IGNORE_REC
DB_LOCK_NOTGRANTED DB_LOG_AUTO_REMOVE DB_LOG_BUFFER_FULL
DB_LOG_NOT_DURABLE DB_MEM_TRANSACTION DB_MPOOL_NEW_GROUP
DB_MUTEX_ALLOCATED DB_PR_RECOVERYTEST DB_REPMGR_ACKS_ALL
DB_REPMGR_ACKS_ONE DB_REP_ACK_TIMEOUT DB_REP_CONF_NOWAIT
DB_REP_HANDLE_DEAD DB_REP_STARTUPDONE DB_SA_SKIPFIRSTKEY
DB_SEQUENCE_OLDVER DB_SET_REG_TIMEOUT DB_SET_TXN_TIMEOUT
DB_TEST_ELECTVOTE1 DB_TEST_ELECTVOTE2 DB_TEST_ELECTWAIT1
DB_TEST_ELECTWAIT2 DB_TEST_POSTRENAME DB_TEST_PREDESTROY
DB_THREADID_STRLEN DB_TIME_NOTGRANTED DB_TXN_NOT_DURABLE
DB_VERB_REP_SYSTEM DB_VERSION_RELEASE */
/* Offset 13 gives the best switch position. */
switch (name[13]) {
case 'A':
if (memEQ(name, "DB_ENV_OPEN_CALLED", 18)) {
/* ^ */
#ifdef DB_ENV_OPEN_CALLED
*iv_return = DB_ENV_OPEN_CALLED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_EVENT_REG_ALIVE", 18)) {
/* ^ */
#ifdef DB_EVENT_REG_ALIVE
*iv_return = DB_EVENT_REG_ALIVE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_FAILCHK_ISALIVE", 18)) {
/* ^ */
#ifdef DB_FAILCHK_ISALIVE
*iv_return = DB_FAILCHK_ISALIVE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_NOTGRANTED", 18)) {
/* ^ */
#ifdef DB_LOCK_NOTGRANTED
*iv_return = DB_LOCK_NOTGRANTED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TIME_NOTGRANTED", 18)) {
/* ^ */
#ifdef DB_TIME_NOTGRANTED
*iv_return = DB_TIME_NOTGRANTED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'C':
if (memEQ(name, "DB_MEM_TRANSACTION", 18)) {
/* ^ */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 2) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 2 && \
DB_VERSION_PATCH >= 14)
*iv_return = DB_MEM_TRANSACTION;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_MUTEX_ALLOCATED", 18)) {
/* ^ */
#ifdef DB_MUTEX_ALLOCATED
*iv_return = DB_MUTEX_ALLOCATED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'E':
if (memEQ(name, "DB_LOCK_IGNORE_REC", 18)) {
/* ^ */
#ifdef DB_LOCK_IGNORE_REC
*iv_return = DB_LOCK_IGNORE_REC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOG_AUTO_REMOVE", 18)) {
/* ^ */
#ifdef DB_LOG_AUTO_REMOVE
*iv_return = DB_LOG_AUTO_REMOVE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TEST_POSTRENAME", 18)) {
/* ^ */
#ifdef DB_TEST_POSTRENAME
*iv_return = DB_TEST_POSTRENAME;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'G':
if (memEQ(name, "DB_MPOOL_NEW_GROUP", 18)) {
/* ^ */
#ifdef DB_MPOOL_NEW_GROUP
*iv_return = DB_MPOOL_NEW_GROUP;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'K':
if (memEQ(name, "DB_DURABLE_UNKNOWN", 18)) {
/* ^ */
#ifdef DB_DURABLE_UNKNOWN
*iv_return = DB_DURABLE_UNKNOWN;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'L':
if (memEQ(name, "DB_FOREIGN_NULLIFY", 18)) {
/* ^ */
#ifdef DB_FOREIGN_NULLIFY
*iv_return = DB_FOREIGN_NULLIFY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_SEQUENCE_OLDVER", 18)) {
/* ^ */
#ifdef DB_SEQUENCE_OLDVER
*iv_return = DB_SEQUENCE_OLDVER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERSION_RELEASE", 18)) {
/* ^ */
#ifdef DB_VERSION_RELEASE
*iv_return = DB_VERSION_RELEASE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'M':
if (memEQ(name, "DB_REP_ACK_TIMEOUT", 18)) {
/* ^ */
#ifdef DB_REP_ACK_TIMEOUT
*iv_return = DB_REP_ACK_TIMEOUT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_SET_REG_TIMEOUT", 18)) {
/* ^ */
#ifdef DB_SET_REG_TIMEOUT
*iv_return = DB_SET_REG_TIMEOUT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_SET_TXN_TIMEOUT", 18)) {
/* ^ */
#ifdef DB_SET_TXN_TIMEOUT
*iv_return = DB_SET_TXN_TIMEOUT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'O':
if (memEQ(name, "DB_ALREADY_ABORTED", 18)) {
/* ^ */
#ifdef DB_ALREADY_ABORTED
*iv_return = DB_ALREADY_ABORTED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ENV_AUTO_COMMIT", 18)) {
/* ^ */
#ifdef DB_ENV_AUTO_COMMIT
*iv_return = DB_ENV_AUTO_COMMIT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REP_CONF_NOWAIT", 18)) {
/* ^ */
#ifdef DB_REP_CONF_NOWAIT
*iv_return = DB_REP_CONF_NOWAIT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'P':
if (memEQ(name, "DB_EVENT_REG_PANIC", 18)) {
/* ^ */
#ifdef DB_EVENT_REG_PANIC
*iv_return = DB_EVENT_REG_PANIC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REP_STARTUPDONE", 18)) {
/* ^ */
#ifdef DB_REP_STARTUPDONE
*iv_return = DB_REP_STARTUPDONE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'R':
if (memEQ(name, "DB_LOG_NOT_DURABLE", 18)) {
/* ^ */
#ifdef DB_LOG_NOT_DURABLE
*iv_return = DB_LOG_NOT_DURABLE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXN_NOT_DURABLE", 18)) {
/* ^ */
#ifdef DB_TXN_NOT_DURABLE
*iv_return = DB_TXN_NOT_DURABLE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'S':
if (memEQ(name, "DB_FOREIGN_CASCADE", 18)) {
/* ^ */
#ifdef DB_FOREIGN_CASCADE
*iv_return = DB_FOREIGN_CASCADE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REPMGR_ACKS_ALL", 18)) {
/* ^ */
#ifdef DB_REPMGR_ACKS_ALL
*iv_return = DB_REPMGR_ACKS_ALL;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REPMGR_ACKS_ONE", 18)) {
/* ^ */
#ifdef DB_REPMGR_ACKS_ONE
*iv_return = DB_REPMGR_ACKS_ONE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_SA_SKIPFIRSTKEY", 18)) {
/* ^ */
#ifdef DB_SA_SKIPFIRSTKEY
*iv_return = DB_SA_SKIPFIRSTKEY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TEST_PREDESTROY", 18)) {
/* ^ */
#ifdef DB_TEST_PREDESTROY
*iv_return = DB_TEST_PREDESTROY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'T':
if (memEQ(name, "DB_THREADID_STRLEN", 18)) {
/* ^ */
#ifdef DB_THREADID_STRLEN
*iv_return = DB_THREADID_STRLEN;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'U':
if (memEQ(name, "DB_ENV_REF_COUNTED", 18)) {
/* ^ */
#ifdef DB_ENV_REF_COUNTED
*iv_return = DB_ENV_REF_COUNTED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'V':
if (memEQ(name, "DB_TEST_ELECTVOTE1", 18)) {
/* ^ */
#ifdef DB_TEST_ELECTVOTE1
*iv_return = DB_TEST_ELECTVOTE1;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TEST_ELECTVOTE2", 18)) {
/* ^ */
#ifdef DB_TEST_ELECTVOTE2
*iv_return = DB_TEST_ELECTVOTE2;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'W':
if (memEQ(name, "DB_TEST_ELECTWAIT1", 18)) {
/* ^ */
#ifdef DB_TEST_ELECTWAIT1
*iv_return = DB_TEST_ELECTWAIT1;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TEST_ELECTWAIT2", 18)) {
/* ^ */
#ifdef DB_TEST_ELECTWAIT2
*iv_return = DB_TEST_ELECTWAIT2;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'Y':
if (memEQ(name, "DB_PR_RECOVERYTEST", 18)) {
/* ^ */
#ifdef DB_PR_RECOVERYTEST
*iv_return = DB_PR_RECOVERYTEST;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERB_REP_SYSTEM", 18)) {
/* ^ */
#ifdef DB_VERB_REP_SYSTEM
*iv_return = DB_VERB_REP_SYSTEM;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case '_':
if (memEQ(name, "DB_ENV_REGION_INIT", 18)) {
/* ^ */
#ifdef DB_ENV_REGION_INIT
*iv_return = DB_ENV_REGION_INIT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOG_BUFFER_FULL", 18)) {
/* ^ */
#ifdef DB_LOG_BUFFER_FULL
*iv_return = DB_LOG_BUFFER_FULL;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REP_HANDLE_DEAD", 18)) {
/* ^ */
#ifdef DB_REP_HANDLE_DEAD
*iv_return = DB_REP_HANDLE_DEAD;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
}
return PERL_constant_NOTFOUND;
}
static int
constant_19 (pTHX_ const char *name, IV *iv_return) {
/* When generated this function returned values for the list of names given
here. However, subsequent manual editing may have added or removed some.
DB_BOOTSTRAP_HELPER DB_CURSOR_TRANSIENT DB_DATABASE_LOCKING
DB_ENV_LOG_INMEMORY DB_ENV_MULTIVERSION DB_ENV_REP_LOGSONLY
DB_ENV_TXN_SNAPSHOT DB_EVENT_REP_CLIENT DB_EVENT_REP_MASTER
DB_FOREIGN_CONFLICT DB_LOCK_FREE_LOCKER DB_LOCK_GET_TIMEOUT
DB_LOCK_SET_TIMEOUT DB_MUTEX_SELF_BLOCK DB_PRIORITY_DEFAULT
DB_READ_UNCOMMITTED DB_REPMGR_ACKS_NONE DB_REPMGR_CONNECTED
DB_REP_HOLDELECTION DB_REP_JOIN_FAILURE DB_SEQUENCE_VERSION
DB_SET_LOCK_TIMEOUT DB_STAT_LOCK_PARAMS DB_TEST_POSTDESTROY
DB_TEST_POSTLOGMETA DB_TEST_SUBDB_LOCKS DB_TXN_FORWARD_ROLL
DB_TXN_LOG_UNDOREDO DB_TXN_WRITE_NOSYNC DB_UPDATE_SECONDARY
DB_USERCOPY_GETDATA DB_USERCOPY_SETDATA DB_USE_ENVIRON_ROOT
DB_VERB_FILEOPS_ALL DB_VERB_REPLICATION DB_VERB_REPMGR_MISC
DB_VERIFY_PARTITION DB_VERSION_MISMATCH */
/* Offset 14 gives the best switch position. */
switch (name[14]) {
case 'A':
if (memEQ(name, "DB_EVENT_REP_MASTER", 19)) {
/* ^ */
#ifdef DB_EVENT_REP_MASTER
*iv_return = DB_EVENT_REP_MASTER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_STAT_LOCK_PARAMS", 19)) {
/* ^ */
#ifdef DB_STAT_LOCK_PARAMS
*iv_return = DB_STAT_LOCK_PARAMS;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERB_REPLICATION", 19)) {
/* ^ */
#ifdef DB_VERB_REPLICATION
*iv_return = DB_VERB_REPLICATION;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'B':
if (memEQ(name, "DB_MUTEX_SELF_BLOCK", 19)) {
/* ^ */
#ifdef DB_MUTEX_SELF_BLOCK
*iv_return = DB_MUTEX_SELF_BLOCK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'C':
if (memEQ(name, "DB_DATABASE_LOCKING", 19)) {
/* ^ */
#ifdef DB_DATABASE_LOCKING
*iv_return = DB_DATABASE_LOCKING;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REP_HOLDELECTION", 19)) {
/* ^ */
#ifdef DB_REP_HOLDELECTION
*iv_return = DB_REP_HOLDELECTION;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'E':
if (memEQ(name, "DB_BOOTSTRAP_HELPER", 19)) {
/* ^ */
#ifdef DB_BOOTSTRAP_HELPER
*iv_return = DB_BOOTSTRAP_HELPER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ENV_LOG_INMEMORY", 19)) {
/* ^ */
#ifdef DB_ENV_LOG_INMEMORY
*iv_return = DB_ENV_LOG_INMEMORY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REPMGR_CONNECTED", 19)) {
/* ^ */
#ifdef DB_REPMGR_CONNECTED
*iv_return = DB_REPMGR_CONNECTED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'F':
if (memEQ(name, "DB_FOREIGN_CONFLICT", 19)) {
/* ^ */
#ifdef DB_FOREIGN_CONFLICT
*iv_return = DB_FOREIGN_CONFLICT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_PRIORITY_DEFAULT", 19)) {
/* ^ */
#if (DB_VERSION_MAJOR > 4) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 1) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 1 && \
DB_VERSION_PATCH >= 24)
*iv_return = DB_PRIORITY_DEFAULT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'G':
if (memEQ(name, "DB_TEST_POSTLOGMETA", 19)) {
/* ^ */
#ifdef DB_TEST_POSTLOGMETA
*iv_return = DB_TEST_POSTLOGMETA;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'I':
if (memEQ(name, "DB_READ_UNCOMMITTED", 19)) {
/* ^ */
#ifdef DB_READ_UNCOMMITTED
*iv_return = DB_READ_UNCOMMITTED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REP_JOIN_FAILURE", 19)) {
/* ^ */
#ifdef DB_REP_JOIN_FAILURE
*iv_return = DB_REP_JOIN_FAILURE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERIFY_PARTITION", 19)) {
/* ^ */
#ifdef DB_VERIFY_PARTITION
*iv_return = DB_VERIFY_PARTITION;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'L':
if (memEQ(name, "DB_EVENT_REP_CLIENT", 19)) {
/* ^ */
#ifdef DB_EVENT_REP_CLIENT
*iv_return = DB_EVENT_REP_CLIENT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TEST_SUBDB_LOCKS", 19)) {
/* ^ */
#ifdef DB_TEST_SUBDB_LOCKS
*iv_return = DB_TEST_SUBDB_LOCKS;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'M':
if (memEQ(name, "DB_LOCK_GET_TIMEOUT", 19)) {
/* ^ */
#if (DB_VERSION_MAJOR > 4) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 14)
*iv_return = DB_LOCK_GET_TIMEOUT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOCK_SET_TIMEOUT", 19)) {
/* ^ */
#ifdef DB_LOCK_SET_TIMEOUT
*iv_return = DB_LOCK_SET_TIMEOUT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_SET_LOCK_TIMEOUT", 19)) {
/* ^ */
#ifdef DB_SET_LOCK_TIMEOUT
*iv_return = DB_SET_LOCK_TIMEOUT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERSION_MISMATCH", 19)) {
/* ^ */
#ifdef DB_VERSION_MISMATCH
*iv_return = DB_VERSION_MISMATCH;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'N':
if (memEQ(name, "DB_UPDATE_SECONDARY", 19)) {
/* ^ */
#ifdef DB_UPDATE_SECONDARY
*iv_return = DB_UPDATE_SECONDARY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'O':
if (memEQ(name, "DB_LOCK_FREE_LOCKER", 19)) {
/* ^ */
#ifdef DB_LOCK_FREE_LOCKER
*iv_return = DB_LOCK_FREE_LOCKER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXN_LOG_UNDOREDO", 19)) {
/* ^ */
#ifdef DB_TXN_LOG_UNDOREDO
*iv_return = DB_TXN_LOG_UNDOREDO;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXN_WRITE_NOSYNC", 19)) {
/* ^ */
#ifdef DB_TXN_WRITE_NOSYNC
*iv_return = DB_TXN_WRITE_NOSYNC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'P':
if (memEQ(name, "DB_ENV_TXN_SNAPSHOT", 19)) {
/* ^ */
#ifdef DB_ENV_TXN_SNAPSHOT
*iv_return = DB_ENV_TXN_SNAPSHOT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'R':
if (memEQ(name, "DB_ENV_MULTIVERSION", 19)) {
/* ^ */
#ifdef DB_ENV_MULTIVERSION
*iv_return = DB_ENV_MULTIVERSION;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_SEQUENCE_VERSION", 19)) {
/* ^ */
#ifdef DB_SEQUENCE_VERSION
*iv_return = DB_SEQUENCE_VERSION;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'S':
if (memEQ(name, "DB_CURSOR_TRANSIENT", 19)) {
/* ^ */
#ifdef DB_CURSOR_TRANSIENT
*iv_return = DB_CURSOR_TRANSIENT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ENV_REP_LOGSONLY", 19)) {
/* ^ */
#ifdef DB_ENV_REP_LOGSONLY
*iv_return = DB_ENV_REP_LOGSONLY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TEST_POSTDESTROY", 19)) {
/* ^ */
#ifdef DB_TEST_POSTDESTROY
*iv_return = DB_TEST_POSTDESTROY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERB_FILEOPS_ALL", 19)) {
/* ^ */
#ifdef DB_VERB_FILEOPS_ALL
*iv_return = DB_VERB_FILEOPS_ALL;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'T':
if (memEQ(name, "DB_USERCOPY_GETDATA", 19)) {
/* ^ */
#ifdef DB_USERCOPY_GETDATA
*iv_return = DB_USERCOPY_GETDATA;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_USERCOPY_SETDATA", 19)) {
/* ^ */
#ifdef DB_USERCOPY_SETDATA
*iv_return = DB_USERCOPY_SETDATA;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case '_':
if (memEQ(name, "DB_REPMGR_ACKS_NONE", 19)) {
/* ^ */
#ifdef DB_REPMGR_ACKS_NONE
*iv_return = DB_REPMGR_ACKS_NONE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXN_FORWARD_ROLL", 19)) {
/* ^ */
#if (DB_VERSION_MAJOR > 3) || \
(DB_VERSION_MAJOR == 3 && DB_VERSION_MINOR > 1) || \
(DB_VERSION_MAJOR == 3 && DB_VERSION_MINOR == 1 && \
DB_VERSION_PATCH >= 14)
*iv_return = DB_TXN_FORWARD_ROLL;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_USE_ENVIRON_ROOT", 19)) {
/* ^ */
#ifdef DB_USE_ENVIRON_ROOT
*iv_return = DB_USE_ENVIRON_ROOT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERB_REPMGR_MISC", 19)) {
/* ^ */
#ifdef DB_VERB_REPMGR_MISC
*iv_return = DB_VERB_REPMGR_MISC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
}
return PERL_constant_NOTFOUND;
}
static int
constant_20 (pTHX_ const char *name, IV *iv_return) {
/* When generated this function returned values for the list of names given
here. However, subsequent manual editing may have added or removed some.
DB_BACKUP_READ_COUNT DB_BACKUP_READ_SLEEP DB_BACKUP_SINGLE_DIR
DB_CXX_NO_EXCEPTIONS DB_ENV_NO_OUTPUT_SET DB_ENV_RECOVER_FATAL
DB_EVENT_NOT_HANDLED DB_EVENT_REP_ELECTED DB_LOGFILEID_INVALID
DB_LOG_VERIFY_DBFILE DB_LOG_VERIFY_INTERR DB_PANIC_ENVIRONMENT
DB_PRIORITY_VERY_LOW DB_REP_CONF_AUTOINIT DB_REP_FULL_ELECTION
DB_REP_LEASE_EXPIRED DB_REP_LEASE_TIMEOUT DB_REP_WOULDROLLBACK
DB_STAT_LOCK_LOCKERS DB_STAT_LOCK_OBJECTS DB_STAT_MEMP_NOERROR
DB_TXN_BACKWARD_ROLL DB_TXN_LOCK_OPTIMIST */
/* Offset 15 gives the best switch position. */
switch (name[15]) {
case 'B':
if (memEQ(name, "DB_LOG_VERIFY_DBFILE", 20)) {
/* ^ */
#ifdef DB_LOG_VERIFY_DBFILE
*iv_return = DB_LOG_VERIFY_DBFILE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'C':
if (memEQ(name, "DB_BACKUP_READ_COUNT", 20)) {
/* ^ */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 3) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 3 && \
DB_VERSION_PATCH >= 5)
*iv_return = DB_BACKUP_READ_COUNT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REP_FULL_ELECTION", 20)) {
/* ^ */
#ifdef DB_REP_FULL_ELECTION
*iv_return = DB_REP_FULL_ELECTION;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_STAT_LOCK_LOCKERS", 20)) {
/* ^ */
#ifdef DB_STAT_LOCK_LOCKERS
*iv_return = DB_STAT_LOCK_LOCKERS;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'E':
if (memEQ(name, "DB_BACKUP_SINGLE_DIR", 20)) {
/* ^ */
#ifdef DB_BACKUP_SINGLE_DIR
*iv_return = DB_BACKUP_SINGLE_DIR;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_EVENT_REP_ELECTED", 20)) {
/* ^ */
#ifdef DB_EVENT_REP_ELECTED
*iv_return = DB_EVENT_REP_ELECTED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_STAT_MEMP_NOERROR", 20)) {
/* ^ */
#ifdef DB_STAT_MEMP_NOERROR
*iv_return = DB_STAT_MEMP_NOERROR;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'F':
if (memEQ(name, "DB_ENV_RECOVER_FATAL", 20)) {
/* ^ */
#ifdef DB_ENV_RECOVER_FATAL
*iv_return = DB_ENV_RECOVER_FATAL;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'I':
if (memEQ(name, "DB_TXN_LOCK_OPTIMIST", 20)) {
/* ^ */
#ifdef DB_TXN_LOCK_OPTIMIST
*iv_return = DB_TXN_LOCK_OPTIMIST;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'J':
if (memEQ(name, "DB_STAT_LOCK_OBJECTS", 20)) {
/* ^ */
#ifdef DB_STAT_LOCK_OBJECTS
*iv_return = DB_STAT_LOCK_OBJECTS;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'L':
if (memEQ(name, "DB_REP_WOULDROLLBACK", 20)) {
/* ^ */
#ifdef DB_REP_WOULDROLLBACK
*iv_return = DB_REP_WOULDROLLBACK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'M':
if (memEQ(name, "DB_REP_LEASE_TIMEOUT", 20)) {
/* ^ */
#ifdef DB_REP_LEASE_TIMEOUT
*iv_return = DB_REP_LEASE_TIMEOUT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'N':
if (memEQ(name, "DB_EVENT_NOT_HANDLED", 20)) {
/* ^ */
#ifdef DB_EVENT_NOT_HANDLED
*iv_return = DB_EVENT_NOT_HANDLED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_LOG_VERIFY_INTERR", 20)) {
/* ^ */
#ifdef DB_LOG_VERIFY_INTERR
*iv_return = DB_LOG_VERIFY_INTERR;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_PANIC_ENVIRONMENT", 20)) {
/* ^ */
#ifdef DB_PANIC_ENVIRONMENT
*iv_return = DB_PANIC_ENVIRONMENT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'O':
if (memEQ(name, "DB_REP_CONF_AUTOINIT", 20)) {
/* ^ */
#ifdef DB_REP_CONF_AUTOINIT
*iv_return = DB_REP_CONF_AUTOINIT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'P':
if (memEQ(name, "DB_REP_LEASE_EXPIRED", 20)) {
/* ^ */
#ifdef DB_REP_LEASE_EXPIRED
*iv_return = DB_REP_LEASE_EXPIRED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'S':
if (memEQ(name, "DB_BACKUP_READ_SLEEP", 20)) {
/* ^ */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 3) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 3 && \
DB_VERSION_PATCH >= 5)
*iv_return = DB_BACKUP_READ_SLEEP;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'T':
if (memEQ(name, "DB_CXX_NO_EXCEPTIONS", 20)) {
/* ^ */
#ifdef DB_CXX_NO_EXCEPTIONS
*iv_return = DB_CXX_NO_EXCEPTIONS;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_ENV_NO_OUTPUT_SET", 20)) {
/* ^ */
#ifdef DB_ENV_NO_OUTPUT_SET
*iv_return = DB_ENV_NO_OUTPUT_SET;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'V':
if (memEQ(name, "DB_LOGFILEID_INVALID", 20)) {
/* ^ */
#ifdef DB_LOGFILEID_INVALID
*iv_return = DB_LOGFILEID_INVALID;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'Y':
if (memEQ(name, "DB_PRIORITY_VERY_LOW", 20)) {
/* ^ */
#if (DB_VERSION_MAJOR > 4) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 1) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 1 && \
DB_VERSION_PATCH >= 24)
*iv_return = DB_PRIORITY_VERY_LOW;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case '_':
if (memEQ(name, "DB_TXN_BACKWARD_ROLL", 20)) {
/* ^ */
#if (DB_VERSION_MAJOR > 3) || \
(DB_VERSION_MAJOR == 3 && DB_VERSION_MINOR > 1) || \
(DB_VERSION_MAJOR == 3 && DB_VERSION_MINOR == 1 && \
DB_VERSION_PATCH >= 14)
*iv_return = DB_TXN_BACKWARD_ROLL;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
}
return PERL_constant_NOTFOUND;
}
static int
constant_21 (pTHX_ const char *name, IV *iv_return) {
/* When generated this function returned values for the list of names given
here. However, subsequent manual editing may have added or removed some.
DB_ENV_LOG_AUTOREMOVE DB_EVENT_WRITE_FAILED DB_LOCK_UPGRADE_WRITE
DB_LOG_VERIFY_FORWARD DB_LOG_VERIFY_PARTIAL DB_LOG_VERIFY_VERBOSE
DB_LOG_VERIFY_WARNING DB_MUTEX_LOGICAL_LOCK DB_MUTEX_PROCESS_ONLY
DB_PRIORITY_UNCHANGED DB_PRIORITY_VERY_HIGH DB_REPMGR_ACKS_QUORUM
DB_REP_ELECTION_RETRY DB_REP_HEARTBEAT_SEND */
/* Offset 17 gives the best switch position. */
switch (name[17]) {
case 'B':
if (memEQ(name, "DB_LOG_VERIFY_VERBOSE", 21)) {
/* ^ */
#ifdef DB_LOG_VERIFY_VERBOSE
*iv_return = DB_LOG_VERIFY_VERBOSE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'E':
if (memEQ(name, "DB_REP_ELECTION_RETRY", 21)) {
/* ^ */
#ifdef DB_REP_ELECTION_RETRY
*iv_return = DB_REP_ELECTION_RETRY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'H':
if (memEQ(name, "DB_PRIORITY_VERY_HIGH", 21)) {
/* ^ */
#if (DB_VERSION_MAJOR > 4) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 1) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 1 && \
DB_VERSION_PATCH >= 24)
*iv_return = DB_PRIORITY_VERY_HIGH;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'I':
if (memEQ(name, "DB_EVENT_WRITE_FAILED", 21)) {
/* ^ */
#ifdef DB_EVENT_WRITE_FAILED
*iv_return = DB_EVENT_WRITE_FAILED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'L':
if (memEQ(name, "DB_MUTEX_LOGICAL_LOCK", 21)) {
/* ^ */
#ifdef DB_MUTEX_LOGICAL_LOCK
*iv_return = DB_MUTEX_LOGICAL_LOCK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'M':
if (memEQ(name, "DB_ENV_LOG_AUTOREMOVE", 21)) {
/* ^ */
#ifdef DB_ENV_LOG_AUTOREMOVE
*iv_return = DB_ENV_LOG_AUTOREMOVE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'N':
if (memEQ(name, "DB_LOG_VERIFY_WARNING", 21)) {
/* ^ */
#ifdef DB_LOG_VERIFY_WARNING
*iv_return = DB_LOG_VERIFY_WARNING;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_PRIORITY_UNCHANGED", 21)) {
/* ^ */
#if (DB_VERSION_MAJOR > 4) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 6) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 6 && \
DB_VERSION_PATCH >= 18)
*iv_return = DB_PRIORITY_UNCHANGED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'O':
if (memEQ(name, "DB_MUTEX_PROCESS_ONLY", 21)) {
/* ^ */
#ifdef DB_MUTEX_PROCESS_ONLY
*iv_return = DB_MUTEX_PROCESS_ONLY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REPMGR_ACKS_QUORUM", 21)) {
/* ^ */
#ifdef DB_REPMGR_ACKS_QUORUM
*iv_return = DB_REPMGR_ACKS_QUORUM;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'R':
if (memEQ(name, "DB_LOCK_UPGRADE_WRITE", 21)) {
/* ^ */
#if (DB_VERSION_MAJOR > 4) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 0) || \
(DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 0 && \
DB_VERSION_PATCH >= 14)
*iv_return = DB_LOCK_UPGRADE_WRITE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'S':
if (memEQ(name, "DB_REP_HEARTBEAT_SEND", 21)) {
/* ^ */
#ifdef DB_REP_HEARTBEAT_SEND
*iv_return = DB_REP_HEARTBEAT_SEND;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'T':
if (memEQ(name, "DB_LOG_VERIFY_PARTIAL", 21)) {
/* ^ */
#ifdef DB_LOG_VERIFY_PARTIAL
*iv_return = DB_LOG_VERIFY_PARTIAL;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'W':
if (memEQ(name, "DB_LOG_VERIFY_FORWARD", 21)) {
/* ^ */
#ifdef DB_LOG_VERIFY_FORWARD
*iv_return = DB_LOG_VERIFY_FORWARD;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
}
return PERL_constant_NOTFOUND;
}
static int
constant_22 (pTHX_ const char *name, IV *iv_return, const char **pv_return) {
/* When generated this function returned values for the list of names given
here. However, subsequent manual editing may have added or removed some.
DB_ASSOC_IMMUTABLE_KEY DB_BACKUP_WRITE_DIRECT DB_ENV_RPCCLIENT_GIVEN
DB_ENV_TIME_NOTGRANTED DB_ENV_TXN_NOT_DURABLE DB_EVENT_NO_SUCH_EVENT
DB_EVENT_REP_DUPMASTER DB_EVENT_REP_INIT_DONE DB_EVENT_REP_NEWMASTER
DB_LOGVERSION_LATCHING DB_REPMGR_DISCONNECTED DB_REP_CONF_NOAUTOINIT
DB_TXN_LOCK_OPTIMISTIC DB_VERSION_FULL_STRING */
/* Offset 15 gives the best switch position. */
switch (name[15]) {
case 'A':
if (memEQ(name, "DB_LOGVERSION_LATCHING", 22)) {
/* ^ */
#ifdef DB_LOGVERSION_LATCHING
*iv_return = DB_LOGVERSION_LATCHING;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'B':
if (memEQ(name, "DB_ASSOC_IMMUTABLE_KEY", 22)) {
/* ^ */
#ifdef DB_ASSOC_IMMUTABLE_KEY
*iv_return = DB_ASSOC_IMMUTABLE_KEY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'D':
if (memEQ(name, "DB_ENV_TXN_NOT_DURABLE", 22)) {
/* ^ */
#ifdef DB_ENV_TXN_NOT_DURABLE
*iv_return = DB_ENV_TXN_NOT_DURABLE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'G':
if (memEQ(name, "DB_ENV_TIME_NOTGRANTED", 22)) {
/* ^ */
#ifdef DB_ENV_TIME_NOTGRANTED
*iv_return = DB_ENV_TIME_NOTGRANTED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'H':
if (memEQ(name, "DB_EVENT_NO_SUCH_EVENT", 22)) {
/* ^ */
#ifdef DB_EVENT_NO_SUCH_EVENT
*iv_return = DB_EVENT_NO_SUCH_EVENT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'I':
if (memEQ(name, "DB_EVENT_REP_INIT_DONE", 22)) {
/* ^ */
#ifdef DB_EVENT_REP_INIT_DONE
*iv_return = DB_EVENT_REP_INIT_DONE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_TXN_LOCK_OPTIMISTIC", 22)) {
/* ^ */
#ifdef DB_TXN_LOCK_OPTIMISTIC
*iv_return = DB_TXN_LOCK_OPTIMISTIC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'N':
if (memEQ(name, "DB_REPMGR_DISCONNECTED", 22)) {
/* ^ */
#ifdef DB_REPMGR_DISCONNECTED
*iv_return = DB_REPMGR_DISCONNECTED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'P':
if (memEQ(name, "DB_EVENT_REP_DUPMASTER", 22)) {
/* ^ */
#ifdef DB_EVENT_REP_DUPMASTER
*iv_return = DB_EVENT_REP_DUPMASTER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'T':
if (memEQ(name, "DB_ENV_RPCCLIENT_GIVEN", 22)) {
/* ^ */
#ifdef DB_ENV_RPCCLIENT_GIVEN
*iv_return = DB_ENV_RPCCLIENT_GIVEN;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'U':
if (memEQ(name, "DB_REP_CONF_NOAUTOINIT", 22)) {
/* ^ */
#ifdef DB_REP_CONF_NOAUTOINIT
*iv_return = DB_REP_CONF_NOAUTOINIT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'W':
if (memEQ(name, "DB_EVENT_REP_NEWMASTER", 22)) {
/* ^ */
#ifdef DB_EVENT_REP_NEWMASTER
*iv_return = DB_EVENT_REP_NEWMASTER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case '_':
if (memEQ(name, "DB_BACKUP_WRITE_DIRECT", 22)) {
/* ^ */
#if (DB_VERSION_MAJOR > 5) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 3) || \
(DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 3 && \
DB_VERSION_PATCH >= 5)
*iv_return = DB_BACKUP_WRITE_DIRECT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_VERSION_FULL_STRING", 22)) {
/* ^ */
#ifdef DB_VERSION_FULL_STRING
*pv_return = DB_VERSION_FULL_STRING;
return PERL_constant_ISPV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
}
return PERL_constant_NOTFOUND;
}
static int
constant_23 (pTHX_ const char *name, IV *iv_return) {
/* When generated this function returned values for the list of names given
here. However, subsequent manual editing may have added or removed some.
DB_ENV_DATABASE_LOCKING DB_ENV_TXN_WRITE_NOSYNC DB_EVENT_REP_SITE_ADDED
DB_REPMGR_ACKS_ONE_PEER DB_REPMGR_NEED_RESPONSE DB_REP_CHECKPOINT_DELAY
DB_REP_CONF_DELAYCLIENT DB_REP_CONNECTION_RETRY DB_REP_DEFAULT_PRIORITY
DB_REP_ELECTION_TIMEOUT DB_VERB_REPMGR_CONNFAIL */
/* Offset 12 gives the best switch position. */
switch (name[12]) {
case 'A':
if (memEQ(name, "DB_ENV_DATABASE_LOCKING", 23)) {
/* ^ */
#ifdef DB_ENV_DATABASE_LOCKING
*iv_return = DB_ENV_DATABASE_LOCKING;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'C':
if (memEQ(name, "DB_REP_CONNECTION_RETRY", 23)) {
/* ^ */
#ifdef DB_REP_CONNECTION_RETRY
*iv_return = DB_REP_CONNECTION_RETRY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'D':
if (memEQ(name, "DB_REP_CONF_DELAYCLIENT", 23)) {
/* ^ */
#ifdef DB_REP_CONF_DELAYCLIENT
*iv_return = DB_REP_CONF_DELAYCLIENT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'E':
if (memEQ(name, "DB_REPMGR_NEED_RESPONSE", 23)) {
/* ^ */
#ifdef DB_REPMGR_NEED_RESPONSE
*iv_return = DB_REPMGR_NEED_RESPONSE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'G':
if (memEQ(name, "DB_VERB_REPMGR_CONNFAIL", 23)) {
/* ^ */
#ifdef DB_VERB_REPMGR_CONNFAIL
*iv_return = DB_VERB_REPMGR_CONNFAIL;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'I':
if (memEQ(name, "DB_REP_ELECTION_TIMEOUT", 23)) {
/* ^ */
#ifdef DB_REP_ELECTION_TIMEOUT
*iv_return = DB_REP_ELECTION_TIMEOUT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'K':
if (memEQ(name, "DB_REPMGR_ACKS_ONE_PEER", 23)) {
/* ^ */
#ifdef DB_REPMGR_ACKS_ONE_PEER
*iv_return = DB_REPMGR_ACKS_ONE_PEER;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'L':
if (memEQ(name, "DB_REP_DEFAULT_PRIORITY", 23)) {
/* ^ */
#ifdef DB_REP_DEFAULT_PRIORITY
*iv_return = DB_REP_DEFAULT_PRIORITY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'P':
if (memEQ(name, "DB_REP_CHECKPOINT_DELAY", 23)) {
/* ^ */
#ifdef DB_REP_CHECKPOINT_DELAY
*iv_return = DB_REP_CHECKPOINT_DELAY;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'R':
if (memEQ(name, "DB_ENV_TXN_WRITE_NOSYNC", 23)) {
/* ^ */
#ifdef DB_ENV_TXN_WRITE_NOSYNC
*iv_return = DB_ENV_TXN_WRITE_NOSYNC;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case '_':
if (memEQ(name, "DB_EVENT_REP_SITE_ADDED", 23)) {
/* ^ */
#ifdef DB_EVENT_REP_SITE_ADDED
*iv_return = DB_EVENT_REP_SITE_ADDED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
}
return PERL_constant_NOTFOUND;
}
static int
constant_24 (pTHX_ const char *name, IV *iv_return) {
/* When generated this function returned values for the list of names given
here. However, subsequent manual editing may have added or removed some.
DB_EVENT_REP_PERM_FAILED DB_EVENT_REP_STARTUPDONE DB_HOTBACKUP_IN_PROGRESS
DB_INTERNAL_TEMPORARY_DB DB_REPMGR_ACKS_ALL_PEERS DB_REPMGR_CONF_ELECTIONS
DB_REP_CONF_AUTOROLLBACK DB_REP_HEARTBEAT_MONITOR */
/* Offset 22 gives the best switch position. */
switch (name[22]) {
case 'C':
if (memEQ(name, "DB_REP_CONF_AUTOROLLBACK", 24)) {
/* ^ */
#ifdef DB_REP_CONF_AUTOROLLBACK
*iv_return = DB_REP_CONF_AUTOROLLBACK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'D':
if (memEQ(name, "DB_INTERNAL_TEMPORARY_DB", 24)) {
/* ^ */
#ifdef DB_INTERNAL_TEMPORARY_DB
*iv_return = DB_INTERNAL_TEMPORARY_DB;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'E':
if (memEQ(name, "DB_EVENT_REP_PERM_FAILED", 24)) {
/* ^ */
#ifdef DB_EVENT_REP_PERM_FAILED
*iv_return = DB_EVENT_REP_PERM_FAILED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'N':
if (memEQ(name, "DB_EVENT_REP_STARTUPDONE", 24)) {
/* ^ */
#ifdef DB_EVENT_REP_STARTUPDONE
*iv_return = DB_EVENT_REP_STARTUPDONE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
if (memEQ(name, "DB_REPMGR_CONF_ELECTIONS", 24)) {
/* ^ */
#ifdef DB_REPMGR_CONF_ELECTIONS
*iv_return = DB_REPMGR_CONF_ELECTIONS;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'O':
if (memEQ(name, "DB_REP_HEARTBEAT_MONITOR", 24)) {
/* ^ */
#ifdef DB_REP_HEARTBEAT_MONITOR
*iv_return = DB_REP_HEARTBEAT_MONITOR;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'R':
if (memEQ(name, "DB_REPMGR_ACKS_ALL_PEERS", 24)) {
/* ^ */
#ifdef DB_REPMGR_ACKS_ALL_PEERS
*iv_return = DB_REPMGR_ACKS_ALL_PEERS;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'S':
if (memEQ(name, "DB_HOTBACKUP_IN_PROGRESS", 24)) {
/* ^ */
#ifdef DB_HOTBACKUP_IN_PROGRESS
*iv_return = DB_HOTBACKUP_IN_PROGRESS;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
}
return PERL_constant_NOTFOUND;
}
static int
constant_25 (pTHX_ const char *name, IV *iv_return) {
/* When generated this function returned values for the list of names given
here. However, subsequent manual editing may have added or removed some.
DB_EVENT_REP_CONNECT_ESTD DB_EVENT_REP_JOIN_FAILURE
DB_EVENT_REP_SITE_REMOVED DB_INTERNAL_PERSISTENT_DB */
/* Offset 15 gives the best switch position. */
switch (name[15]) {
case 'I':
if (memEQ(name, "DB_EVENT_REP_JOIN_FAILURE", 25)) {
/* ^ */
#ifdef DB_EVENT_REP_JOIN_FAILURE
*iv_return = DB_EVENT_REP_JOIN_FAILURE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'N':
if (memEQ(name, "DB_EVENT_REP_CONNECT_ESTD", 25)) {
/* ^ */
#ifdef DB_EVENT_REP_CONNECT_ESTD
*iv_return = DB_EVENT_REP_CONNECT_ESTD;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'S':
if (memEQ(name, "DB_INTERNAL_PERSISTENT_DB", 25)) {
/* ^ */
#ifdef DB_INTERNAL_PERSISTENT_DB
*iv_return = DB_INTERNAL_PERSISTENT_DB;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'T':
if (memEQ(name, "DB_EVENT_REP_SITE_REMOVED", 25)) {
/* ^ */
#ifdef DB_EVENT_REP_SITE_REMOVED
*iv_return = DB_EVENT_REP_SITE_REMOVED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
}
return PERL_constant_NOTFOUND;
}
static int
constant_27 (pTHX_ const char *name, IV *iv_return) {
/* When generated this function returned values for the list of names given
here. However, subsequent manual editing may have added or removed some.
DB_EVENT_REP_CONNECT_BROKEN DB_EVENT_REP_MASTER_FAILURE
DB_EVENT_REP_WOULD_ROLLBACK DB_REPMGR_CONF_2SITE_STRICT */
/* Offset 16 gives the best switch position. */
switch (name[16]) {
case 'L':
if (memEQ(name, "DB_EVENT_REP_WOULD_ROLLBACK", 27)) {
/* ^ */
#ifdef DB_EVENT_REP_WOULD_ROLLBACK
*iv_return = DB_EVENT_REP_WOULD_ROLLBACK;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'N':
if (memEQ(name, "DB_EVENT_REP_CONNECT_BROKEN", 27)) {
/* ^ */
#ifdef DB_EVENT_REP_CONNECT_BROKEN
*iv_return = DB_EVENT_REP_CONNECT_BROKEN;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'S':
if (memEQ(name, "DB_REPMGR_CONF_2SITE_STRICT", 27)) {
/* ^ */
#ifdef DB_REPMGR_CONF_2SITE_STRICT
*iv_return = DB_REPMGR_CONF_2SITE_STRICT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'T':
if (memEQ(name, "DB_EVENT_REP_MASTER_FAILURE", 27)) {
/* ^ */
#ifdef DB_EVENT_REP_MASTER_FAILURE
*iv_return = DB_EVENT_REP_MASTER_FAILURE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
}
return PERL_constant_NOTFOUND;
}
static int
constant_28 (pTHX_ const char *name, IV *iv_return) {
/* When generated this function returned values for the list of names given
here. However, subsequent manual editing may have added or removed some.
DB_EVENT_REP_ELECTION_FAILED DB_REPMGR_ACKS_ALL_AVAILABLE
DB_REP_FULL_ELECTION_TIMEOUT */
/* Offset 15 gives the best switch position. */
switch (name[15]) {
case 'A':
if (memEQ(name, "DB_REPMGR_ACKS_ALL_AVAILABLE", 28)) {
/* ^ */
#ifdef DB_REPMGR_ACKS_ALL_AVAILABLE
*iv_return = DB_REPMGR_ACKS_ALL_AVAILABLE;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'C':
if (memEQ(name, "DB_REP_FULL_ELECTION_TIMEOUT", 28)) {
/* ^ */
#ifdef DB_REP_FULL_ELECTION_TIMEOUT
*iv_return = DB_REP_FULL_ELECTION_TIMEOUT;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'E':
if (memEQ(name, "DB_EVENT_REP_ELECTION_FAILED", 28)) {
/* ^ */
#ifdef DB_EVENT_REP_ELECTION_FAILED
*iv_return = DB_EVENT_REP_ELECTION_FAILED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
}
return PERL_constant_NOTFOUND;
}
static int
constant (pTHX_ const char *name, STRLEN len, IV *iv_return, const char **pv_return) {
/* Initially switch on the length of the name. */
/* When generated this function returned values for the list of names given
in this section of perl code. Rather than manually editing these functions
to add or remove constants, which would result in this comment and section
of code becoming inaccurate, we recommend that you edit this section of
code, and use it to regenerate a new set of constant functions which you
then use to replace the originals.
Regenerate these constant functions by feeding this entire source file to
perl -x
#!/linux-shared/base/perl/install/bin/perl -w
use ExtUtils::Constant qw (constant_types C_constant XS_constant);
my $types = {map {($_, 1)} qw(IV PV)};
my @names = (qw(DB2_AM_EXCL DB2_AM_INTEXCL DB2_AM_NOWAIT DB_AFTER DB_AGGRESSIVE
DB_ALREADY_ABORTED DB_APPEND DB_APPLY_LOGREG DB_APP_INIT
DB_ARCH_ABS DB_ARCH_DATA DB_ARCH_LOG DB_ARCH_REMOVE
DB_ASSOC_CREATE DB_ASSOC_IMMUTABLE_KEY DB_AUTO_COMMIT
DB_BACKUP_CLEAN DB_BACKUP_FILES DB_BACKUP_NO_LOGS
DB_BACKUP_SINGLE_DIR DB_BACKUP_UPDATE DB_BEFORE
DB_BOOTSTRAP_HELPER DB_BTREEMAGIC DB_BTREEOLDVER DB_BTREEVERSION
DB_BUFFER_SMALL DB_CACHED_COUNTS DB_CDB_ALLDB DB_CHECKPOINT
DB_CHKSUM DB_CHKSUM_SHA1 DB_CKP_INTERNAL DB_CLIENT DB_CL_WRITER
DB_COMMIT DB_COMPACT_FLAGS DB_CONSUME DB_CONSUME_WAIT DB_CREATE
DB_CURLSN DB_CURRENT DB_CURSOR_BULK DB_CURSOR_TRANSIENT
DB_CXX_NO_EXCEPTIONS DB_DATABASE_LOCK DB_DATABASE_LOCKING
DB_DEGREE_2 DB_DELETED DB_DELIMITER DB_DIRECT DB_DIRECT_DB
DB_DIRECT_LOG DB_DIRTY_READ DB_DONOTINDEX DB_DSYNC_DB
DB_DSYNC_LOG DB_DUP DB_DUPCURSOR DB_DUPSORT DB_DURABLE_UNKNOWN
DB_EID_BROADCAST DB_EID_INVALID DB_EID_MASTER DB_ENCRYPT
DB_ENCRYPT_AES DB_ENV_APPINIT DB_ENV_AUTO_COMMIT DB_ENV_CDB
DB_ENV_CDB_ALLDB DB_ENV_CREATE DB_ENV_DATABASE_LOCKING
DB_ENV_DBLOCAL DB_ENV_DIRECT_DB DB_ENV_DIRECT_LOG
DB_ENV_DSYNC_DB DB_ENV_DSYNC_LOG DB_ENV_FAILCHK DB_ENV_FATAL
DB_ENV_HOTBACKUP DB_ENV_LOCKDOWN DB_ENV_LOCKING DB_ENV_LOGGING
DB_ENV_LOG_AUTOREMOVE DB_ENV_LOG_INMEMORY DB_ENV_MULTIVERSION
DB_ENV_NOFLUSH DB_ENV_NOLOCKING DB_ENV_NOMMAP DB_ENV_NOPANIC
DB_ENV_NO_OUTPUT_SET DB_ENV_OPEN_CALLED DB_ENV_OVERWRITE
DB_ENV_PRIVATE DB_ENV_RECOVER_FATAL DB_ENV_REF_COUNTED
DB_ENV_REGION_INIT DB_ENV_REP_CLIENT DB_ENV_REP_LOGSONLY
DB_ENV_REP_MASTER DB_ENV_RPCCLIENT DB_ENV_RPCCLIENT_GIVEN
DB_ENV_STANDALONE DB_ENV_SYSTEM_MEM DB_ENV_THREAD
DB_ENV_TIME_NOTGRANTED DB_ENV_TXN DB_ENV_TXN_NOSYNC
DB_ENV_TXN_NOT_DURABLE DB_ENV_TXN_NOWAIT DB_ENV_TXN_SNAPSHOT
DB_ENV_TXN_WRITE_NOSYNC DB_ENV_USER_ALLOC DB_ENV_YIELDCPU
DB_EVENT_NOT_HANDLED DB_EVENT_NO_SUCH_EVENT DB_EVENT_PANIC
DB_EVENT_REG_ALIVE DB_EVENT_REG_PANIC DB_EVENT_REP_CLIENT
DB_EVENT_REP_CONNECT_BROKEN DB_EVENT_REP_CONNECT_ESTD
DB_EVENT_REP_CONNECT_TRY_FAILED DB_EVENT_REP_DUPMASTER
DB_EVENT_REP_ELECTED DB_EVENT_REP_ELECTION_FAILED
DB_EVENT_REP_INIT_DONE DB_EVENT_REP_JOIN_FAILURE
DB_EVENT_REP_LOCAL_SITE_REMOVED DB_EVENT_REP_MASTER
DB_EVENT_REP_MASTER_FAILURE DB_EVENT_REP_NEWMASTER
DB_EVENT_REP_PERM_FAILED DB_EVENT_REP_SITE_ADDED
DB_EVENT_REP_SITE_REMOVED DB_EVENT_REP_STARTUPDONE
DB_EVENT_REP_WOULD_ROLLBACK DB_EVENT_WRITE_FAILED DB_EXCL
DB_EXTENT DB_FAILCHK DB_FAILCHK_ISALIVE DB_FAST_STAT
DB_FCNTL_LOCKING DB_FILEOPEN DB_FILE_ID_LEN DB_FIRST DB_FIXEDLEN
DB_FLUSH DB_FORCE DB_FORCESYNC DB_FOREIGN_ABORT
DB_FOREIGN_CASCADE DB_FOREIGN_CONFLICT DB_FOREIGN_NULLIFY
DB_FREELIST_ONLY DB_FREE_SPACE DB_GETREC DB_GET_BOTH
DB_GET_BOTHC DB_GET_BOTH_LTE DB_GET_BOTH_RANGE DB_GET_RECNO
DB_GID_SIZE DB_GROUP_CREATOR DB_HANDLE_LOCK DB_HASHMAGIC
DB_HASHOLDVER DB_HASHVERSION DB_HEAPMAGIC DB_HEAPOLDVER
DB_HEAPVERSION DB_HEAP_FULL DB_HEAP_RID_SZ
DB_HOTBACKUP_IN_PROGRESS DB_IGNORE_LEASE DB_IMMUTABLE_KEY
DB_INCOMPLETE DB_INIT_CDB DB_INIT_LOCK DB_INIT_LOG DB_INIT_MPOOL
DB_INIT_MUTEX DB_INIT_REP DB_INIT_TXN DB_INORDER DB_INTERNAL_DB
DB_INTERNAL_PERSISTENT_DB DB_INTERNAL_TEMPORARY_DB
DB_JAVA_CALLBACK DB_JOINENV DB_JOIN_ITEM DB_JOIN_NOSORT
DB_KEYEMPTY DB_KEYEXIST DB_KEYFIRST DB_KEYLAST DB_LAST DB_LEGACY
DB_LOCAL_SITE DB_LOCKDOWN DB_LOCKMAGIC DB_LOCKVERSION
DB_LOCK_ABORT DB_LOCK_CHECK DB_LOCK_CONFLICT DB_LOCK_DEADLOCK
DB_LOCK_DEFAULT DB_LOCK_EXPIRE DB_LOCK_FREE_LOCKER
DB_LOCK_IGNORE_REC DB_LOCK_MAXLOCKS DB_LOCK_MAXWRITE
DB_LOCK_MINLOCKS DB_LOCK_MINWRITE DB_LOCK_NORUN DB_LOCK_NOTEXIST
DB_LOCK_NOTGRANTED DB_LOCK_NOTHELD DB_LOCK_NOWAIT DB_LOCK_OLDEST
DB_LOCK_RANDOM DB_LOCK_RECORD DB_LOCK_REMOVE DB_LOCK_RIW_N
DB_LOCK_RW_N DB_LOCK_SET_TIMEOUT DB_LOCK_SWITCH DB_LOCK_UPGRADE
DB_LOCK_YOUNGEST DB_LOGCHKSUM DB_LOGC_BUF_SIZE
DB_LOGFILEID_INVALID DB_LOGMAGIC DB_LOGOLDVER DB_LOGVERSION
DB_LOGVERSION_LATCHING DB_LOG_AUTOREMOVE DB_LOG_AUTO_REMOVE
DB_LOG_BUFFER_FULL DB_LOG_CHKPNT DB_LOG_COMMIT DB_LOG_DIRECT
DB_LOG_DISK DB_LOG_DSYNC DB_LOG_INMEMORY DB_LOG_IN_MEMORY
DB_LOG_LOCKED DB_LOG_NOCOPY DB_LOG_NOT_DURABLE DB_LOG_NO_DATA
DB_LOG_PERM DB_LOG_RESEND DB_LOG_SILENT_ERR DB_LOG_VERIFY_BAD
DB_LOG_VERIFY_CAF DB_LOG_VERIFY_DBFILE DB_LOG_VERIFY_ERR
DB_LOG_VERIFY_FORWARD DB_LOG_VERIFY_INTERR DB_LOG_VERIFY_PARTIAL
DB_LOG_VERIFY_VERBOSE DB_LOG_VERIFY_WARNING DB_LOG_WRNOSYNC
DB_LOG_ZERO DB_MAX_PAGES DB_MAX_RECORDS DB_MPOOL_CLEAN
DB_MPOOL_CREATE DB_MPOOL_DIRTY DB_MPOOL_DISCARD DB_MPOOL_EDIT
DB_MPOOL_EXTENT DB_MPOOL_FREE DB_MPOOL_LAST DB_MPOOL_NEW
DB_MPOOL_NEW_GROUP DB_MPOOL_NOFILE DB_MPOOL_NOLOCK
DB_MPOOL_PRIVATE DB_MPOOL_TRY DB_MPOOL_UNLINK DB_MULTIPLE
DB_MULTIPLE_KEY DB_MULTIVERSION DB_MUTEXDEBUG DB_MUTEXLOCKS
DB_MUTEX_ALLOCATED DB_MUTEX_LOCKED DB_MUTEX_LOGICAL_LOCK
DB_MUTEX_PROCESS_ONLY DB_MUTEX_SELF_BLOCK DB_MUTEX_SHARED
DB_MUTEX_THREAD DB_NEEDSPLIT DB_NEXT DB_NEXT_DUP DB_NEXT_NODUP
DB_NOCOPY DB_NODUPDATA DB_NOERROR DB_NOFLUSH DB_NOLOCKING
DB_NOMMAP DB_NOORDERCHK DB_NOOVERWRITE DB_NOPANIC DB_NORECURSE
DB_NOSERVER DB_NOSERVER_HOME DB_NOSERVER_ID DB_NOSYNC
DB_NOTFOUND DB_NO_AUTO_COMMIT DB_NO_CHECKPOINT DB_ODDFILESIZE
DB_OK_BTREE DB_OK_HASH DB_OK_HEAP DB_OK_QUEUE DB_OK_RECNO
DB_OLD_VERSION DB_OPEN_CALLED DB_OPFLAGS_MASK DB_ORDERCHKONLY
DB_OVERWRITE DB_OVERWRITE_DUP DB_PAD DB_PAGEYIELD DB_PAGE_LOCK
DB_PAGE_NOTFOUND DB_PANIC_ENVIRONMENT DB_PERMANENT DB_POSITION
DB_POSITIONI DB_PREV DB_PREV_DUP DB_PREV_NODUP DB_PRINTABLE
DB_PRIVATE DB_PR_HEADERS DB_PR_PAGE DB_PR_RECOVERYTEST
DB_QAMMAGIC DB_QAMOLDVER DB_QAMVERSION DB_RDONLY DB_RDWRMASTER
DB_READ_COMMITTED DB_READ_UNCOMMITTED DB_RECNUM DB_RECORDCOUNT
DB_RECORD_LOCK DB_RECOVER DB_RECOVER_FATAL DB_REGION_ANON
DB_REGION_INIT DB_REGION_MAGIC DB_REGION_NAME DB_REGISTER
DB_REGISTERED DB_RENAMEMAGIC DB_RENUMBER DB_REPFLAGS_MASK
DB_REPMGR_ACKS_ALL DB_REPMGR_ACKS_ALL_AVAILABLE
DB_REPMGR_ACKS_ALL_PEERS DB_REPMGR_ACKS_NONE DB_REPMGR_ACKS_ONE
DB_REPMGR_ACKS_ONE_PEER DB_REPMGR_ACKS_QUORUM
DB_REPMGR_CONF_2SITE_STRICT DB_REPMGR_CONF_ELECTIONS
DB_REPMGR_CONNECTED DB_REPMGR_DISCONNECTED DB_REPMGR_ISPEER
DB_REPMGR_NEED_RESPONSE DB_REPMGR_PEER DB_REP_ACK_TIMEOUT
DB_REP_ANYWHERE DB_REP_BULKOVF DB_REP_CHECKPOINT_DELAY
DB_REP_CLIENT DB_REP_CONF_AUTOINIT DB_REP_CONF_AUTOROLLBACK
DB_REP_CONF_BULK DB_REP_CONF_DELAYCLIENT DB_REP_CONF_INMEM
DB_REP_CONF_LEASE DB_REP_CONF_NOAUTOINIT DB_REP_CONF_NOWAIT
DB_REP_CONNECTION_RETRY DB_REP_CREATE DB_REP_DEFAULT_PRIORITY
DB_REP_DUPMASTER DB_REP_EGENCHG DB_REP_ELECTION
DB_REP_ELECTION_RETRY DB_REP_ELECTION_TIMEOUT
DB_REP_FULL_ELECTION DB_REP_FULL_ELECTION_TIMEOUT
DB_REP_HANDLE_DEAD DB_REP_HEARTBEAT_MONITOR
DB_REP_HEARTBEAT_SEND DB_REP_HOLDELECTION DB_REP_IGNORE
DB_REP_ISPERM DB_REP_JOIN_FAILURE DB_REP_LEASE_EXPIRED
DB_REP_LEASE_TIMEOUT DB_REP_LOCKOUT DB_REP_LOGREADY
DB_REP_LOGSONLY DB_REP_MASTER DB_REP_NEWMASTER DB_REP_NEWSITE
DB_REP_NOBUFFER DB_REP_NOTPERM DB_REP_OUTDATED DB_REP_PAGEDONE
DB_REP_PAGELOCKED DB_REP_PERMANENT DB_REP_REREQUEST
DB_REP_STARTUPDONE DB_REP_UNAVAIL DB_REP_WOULDROLLBACK
DB_REVSPLITOFF DB_RMW DB_RPCCLIENT DB_RPC_SERVERPROG
DB_RPC_SERVERVERS DB_RUNRECOVERY DB_SALVAGE DB_SA_SKIPFIRSTKEY
DB_SA_UNKNOWNKEY DB_SECONDARY_BAD DB_SEQUENCE_OLDVER
DB_SEQUENCE_VERSION DB_SEQUENTIAL DB_SEQ_DEC DB_SEQ_INC
DB_SEQ_RANGE_SET DB_SEQ_WRAP DB_SEQ_WRAPPED DB_SET
DB_SET_LOCK_TIMEOUT DB_SET_LTE DB_SET_RANGE DB_SET_RECNO
DB_SET_REG_TIMEOUT DB_SET_TXN_NOW DB_SET_TXN_TIMEOUT
DB_SHALLOW_DUP DB_SNAPSHOT DB_SPARE_FLAG DB_STAT_ALL
DB_STAT_ALLOC DB_STAT_CLEAR DB_STAT_LOCK_CONF
DB_STAT_LOCK_LOCKERS DB_STAT_LOCK_OBJECTS DB_STAT_LOCK_PARAMS
DB_STAT_MEMP_HASH DB_STAT_MEMP_NOERROR DB_STAT_NOERROR
DB_STAT_SUBSYSTEM DB_STAT_SUMMARY DB_ST_DUPOK DB_ST_DUPSET
DB_ST_DUPSORT DB_ST_IS_RECNO DB_ST_OVFL_LEAF DB_ST_RECNUM
DB_ST_RELEN DB_ST_TOPLEVEL DB_SURPRISE_KID DB_SWAPBYTES
DB_SYSTEM_MEM DB_TEMPORARY DB_TEST_ELECTINIT DB_TEST_ELECTSEND
DB_TEST_ELECTVOTE1 DB_TEST_ELECTVOTE2 DB_TEST_ELECTWAIT1
DB_TEST_ELECTWAIT2 DB_TEST_POSTDESTROY DB_TEST_POSTLOG
DB_TEST_POSTLOGMETA DB_TEST_POSTOPEN DB_TEST_POSTRENAME
DB_TEST_POSTSYNC DB_TEST_PREDESTROY DB_TEST_PREOPEN
DB_TEST_PRERENAME DB_TEST_RECYCLE DB_TEST_SUBDB_LOCKS DB_THREAD
DB_THREADID_STRLEN DB_TIMEOUT DB_TIME_NOTGRANTED DB_TRUNCATE
DB_TXNMAGIC DB_TXNVERSION DB_TXN_BULK DB_TXN_CKP DB_TXN_FAMILY
DB_TXN_LOCK DB_TXN_LOCK_2PL DB_TXN_LOCK_MASK
DB_TXN_LOCK_OPTIMIST DB_TXN_LOCK_OPTIMISTIC DB_TXN_LOG_MASK
DB_TXN_LOG_REDO DB_TXN_LOG_UNDO DB_TXN_LOG_UNDOREDO
DB_TXN_NOSYNC DB_TXN_NOT_DURABLE DB_TXN_NOWAIT DB_TXN_REDO
DB_TXN_SNAPSHOT DB_TXN_SYNC DB_TXN_TOKEN_SIZE DB_TXN_UNDO
DB_TXN_WAIT DB_TXN_WRITE_NOSYNC DB_UNREF DB_UPDATE_SECONDARY
DB_UPGRADE DB_USERCOPY_GETDATA DB_USERCOPY_SETDATA
DB_USE_ENVIRON DB_USE_ENVIRON_ROOT DB_VERB_BACKUP
DB_VERB_CHKPOINT DB_VERB_DEADLOCK DB_VERB_FILEOPS
DB_VERB_FILEOPS_ALL DB_VERB_RECOVERY DB_VERB_REGISTER
DB_VERB_REPLICATION DB_VERB_REPMGR_CONNFAIL DB_VERB_REPMGR_MISC
DB_VERB_REP_ELECT DB_VERB_REP_LEASE DB_VERB_REP_MISC
DB_VERB_REP_MSGS DB_VERB_REP_SYNC DB_VERB_REP_SYSTEM
DB_VERB_REP_TEST DB_VERB_WAITSFOR DB_VERIFY DB_VERIFY_BAD
DB_VERIFY_FATAL DB_VERIFY_PARTITION DB_VERSION_FAMILY
DB_VERSION_MAJOR DB_VERSION_MINOR DB_VERSION_MISMATCH
DB_VERSION_PATCH DB_VERSION_RELEASE DB_VRFY_FLAGMASK
DB_WRITECURSOR DB_WRITELOCK DB_WRITEOPEN DB_WRNOSYNC
DB_XA_CREATE DB_XIDDATASIZE DB_YIELDCPU DB_debug_FLAG
DB_user_BEGIN),
{name=>"DB_BACKUP_READ_COUNT", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 3) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 3 && \\\n DB_VERSION_PATCH >= 5)\n", "#endif\n"]},
{name=>"DB_BACKUP_READ_SLEEP", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 3) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 3 && \\\n DB_VERSION_PATCH >= 5)\n", "#endif\n"]},
{name=>"DB_BACKUP_SIZE", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 3) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 3 && \\\n DB_VERSION_PATCH >= 5)\n", "#endif\n"]},
{name=>"DB_BACKUP_WRITE_DIRECT", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 3) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 3 && \\\n DB_VERSION_PATCH >= 5)\n", "#endif\n"]},
{name=>"DB_BTREE", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 2) || \\\n (DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 3)\n", "#endif\n"]},
{name=>"DB_HASH", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 2) || \\\n (DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 3)\n", "#endif\n"]},
{name=>"DB_HEAP", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 2) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 2 && \\\n DB_VERSION_PATCH >= 14)\n", "#endif\n"]},
{name=>"DB_LOCK_DUMP", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 2) || \\\n (DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 3)\n", "#endif\n"]},
{name=>"DB_LOCK_GET", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 2) || \\\n (DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 3)\n", "#endif\n"]},
{name=>"DB_LOCK_GET_TIMEOUT", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 4) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 14)\n", "#endif\n"]},
{name=>"DB_LOCK_INHERIT", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 2) || \\\n (DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR > 7) || \\\n (DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR == 7 && \\\n DB_VERSION_PATCH >= 1)\n", "#endif\n"]},
{name=>"DB_LOCK_PUT", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 2) || \\\n (DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 3)\n", "#endif\n"]},
{name=>"DB_LOCK_PUT_ALL", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 2) || \\\n (DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 3)\n", "#endif\n"]},
{name=>"DB_LOCK_PUT_OBJ", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 2) || \\\n (DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 3)\n", "#endif\n"]},
{name=>"DB_LOCK_PUT_READ", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 4) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 14)\n", "#endif\n"]},
{name=>"DB_LOCK_TIMEOUT", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 4) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 14)\n", "#endif\n"]},
{name=>"DB_LOCK_TRADE", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 4) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 1) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 1 && \\\n DB_VERSION_PATCH >= 24)\n", "#endif\n"]},
{name=>"DB_LOCK_UPGRADE_WRITE", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 4) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 14)\n", "#endif\n"]},
{name=>"DB_MEM_LOCK", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 2) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 2 && \\\n DB_VERSION_PATCH >= 14)\n", "#endif\n"]},
{name=>"DB_MEM_LOCKER", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 2) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 2 && \\\n DB_VERSION_PATCH >= 14)\n", "#endif\n"]},
{name=>"DB_MEM_LOCKOBJECT", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 2) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 2 && \\\n DB_VERSION_PATCH >= 14)\n", "#endif\n"]},
{name=>"DB_MEM_LOGID", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 2) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 2 && \\\n DB_VERSION_PATCH >= 14)\n", "#endif\n"]},
{name=>"DB_MEM_THREAD", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 2) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 2 && \\\n DB_VERSION_PATCH >= 14)\n", "#endif\n"]},
{name=>"DB_MEM_TRANSACTION", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 2) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 2 && \\\n DB_VERSION_PATCH >= 14)\n", "#endif\n"]},
{name=>"DB_PRIORITY_DEFAULT", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 4) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 1) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 1 && \\\n DB_VERSION_PATCH >= 24)\n", "#endif\n"]},
{name=>"DB_PRIORITY_HIGH", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 4) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 1) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 1 && \\\n DB_VERSION_PATCH >= 24)\n", "#endif\n"]},
{name=>"DB_PRIORITY_LOW", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 4) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 1) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 1 && \\\n DB_VERSION_PATCH >= 24)\n", "#endif\n"]},
{name=>"DB_PRIORITY_UNCHANGED", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 4) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 6) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 6 && \\\n DB_VERSION_PATCH >= 18)\n", "#endif\n"]},
{name=>"DB_PRIORITY_VERY_HIGH", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 4) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 1) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 1 && \\\n DB_VERSION_PATCH >= 24)\n", "#endif\n"]},
{name=>"DB_PRIORITY_VERY_LOW", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 4) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 1) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 1 && \\\n DB_VERSION_PATCH >= 24)\n", "#endif\n"]},
{name=>"DB_QUEUE", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 3) || \\\n (DB_VERSION_MAJOR == 3 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 3 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 55)\n", "#endif\n"]},
{name=>"DB_RECNO", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 2) || \\\n (DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 3)\n", "#endif\n"]},
{name=>"DB_TXN_ABORT", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 3) || \\\n (DB_VERSION_MAJOR == 3 && DB_VERSION_MINOR > 1) || \\\n (DB_VERSION_MAJOR == 3 && DB_VERSION_MINOR == 1 && \\\n DB_VERSION_PATCH >= 14)\n", "#endif\n"]},
{name=>"DB_TXN_APPLY", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 4) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 14)\n", "#endif\n"]},
{name=>"DB_TXN_BACKWARD_ROLL", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 3) || \\\n (DB_VERSION_MAJOR == 3 && DB_VERSION_MINOR > 1) || \\\n (DB_VERSION_MAJOR == 3 && DB_VERSION_MINOR == 1 && \\\n DB_VERSION_PATCH >= 14)\n", "#endif\n"]},
{name=>"DB_TXN_FORWARD_ROLL", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 3) || \\\n (DB_VERSION_MAJOR == 3 && DB_VERSION_MINOR > 1) || \\\n (DB_VERSION_MAJOR == 3 && DB_VERSION_MINOR == 1 && \\\n DB_VERSION_PATCH >= 14)\n", "#endif\n"]},
{name=>"DB_TXN_LOG_VERIFY", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 6)\n", "#endif\n"]},
{name=>"DB_TXN_OPENFILES", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 3) || \\\n (DB_VERSION_MAJOR == 3 && DB_VERSION_MINOR > 1) || \\\n (DB_VERSION_MAJOR == 3 && DB_VERSION_MINOR == 1 && \\\n DB_VERSION_PATCH >= 14)\n", "#endif\n"]},
{name=>"DB_TXN_POPENFILES", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 4) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 14)\n", "#endif\n"]},
{name=>"DB_TXN_PRINT", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 4) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR > 1) || \\\n (DB_VERSION_MAJOR == 4 && DB_VERSION_MINOR == 1 && \\\n DB_VERSION_PATCH >= 24)\n", "#endif\n"]},
{name=>"DB_UNKNOWN", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 2) || \\\n (DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 2 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 3)\n", "#endif\n"]},
{name=>"DB_VERSION_FULL_STRING", type=>"PV"},
{name=>"DB_VERSION_STRING", type=>"PV"},
{name=>"LOGREC_ARG", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 6)\n", "#endif\n"]},
{name=>"LOGREC_DATA", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 6)\n", "#endif\n"]},
{name=>"LOGREC_DB", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 6)\n", "#endif\n"]},
{name=>"LOGREC_DBOP", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 6)\n", "#endif\n"]},
{name=>"LOGREC_DBT", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 6)\n", "#endif\n"]},
{name=>"LOGREC_Done", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 6)\n", "#endif\n"]},
{name=>"LOGREC_HDR", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 6)\n", "#endif\n"]},
{name=>"LOGREC_LOCKS", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 6)\n", "#endif\n"]},
{name=>"LOGREC_OP", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 6)\n", "#endif\n"]},
{name=>"LOGREC_PGDBT", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 6)\n", "#endif\n"]},
{name=>"LOGREC_PGDDBT", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 6)\n", "#endif\n"]},
{name=>"LOGREC_PGLIST", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 6)\n", "#endif\n"]},
{name=>"LOGREC_POINTER", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 6)\n", "#endif\n"]},
{name=>"LOGREC_TIME", type=>"IV", macro=>["#if (DB_VERSION_MAJOR > 5) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR > 0) || \\\n (DB_VERSION_MAJOR == 5 && DB_VERSION_MINOR == 0 && \\\n DB_VERSION_PATCH >= 6)\n", "#endif\n"]});
print constant_types(), "\n"; # macro defs
foreach (C_constant ("BerkeleyDB", 'constant', 'IV', $types, undef, 3, @names) ) {
print $_, "\n"; # C constant subs
}
print "\n#### XS Section:\n";
print XS_constant ("BerkeleyDB", $types);
__END__
*/
switch (len) {
case 6:
return constant_6 (aTHX_ name, iv_return);
break;
case 7:
return constant_7 (aTHX_ name, iv_return);
break;
case 8:
return constant_8 (aTHX_ name, iv_return);
break;
case 9:
return constant_9 (aTHX_ name, iv_return);
break;
case 10:
return constant_10 (aTHX_ name, iv_return);
break;
case 11:
return constant_11 (aTHX_ name, iv_return);
break;
case 12:
return constant_12 (aTHX_ name, iv_return);
break;
case 13:
return constant_13 (aTHX_ name, iv_return);
break;
case 14:
return constant_14 (aTHX_ name, iv_return);
break;
case 15:
return constant_15 (aTHX_ name, iv_return);
break;
case 16:
return constant_16 (aTHX_ name, iv_return);
break;
case 17:
return constant_17 (aTHX_ name, iv_return, pv_return);
break;
case 18:
return constant_18 (aTHX_ name, iv_return);
break;
case 19:
return constant_19 (aTHX_ name, iv_return);
break;
case 20:
return constant_20 (aTHX_ name, iv_return);
break;
case 21:
return constant_21 (aTHX_ name, iv_return);
break;
case 22:
return constant_22 (aTHX_ name, iv_return, pv_return);
break;
case 23:
return constant_23 (aTHX_ name, iv_return);
break;
case 24:
return constant_24 (aTHX_ name, iv_return);
break;
case 25:
return constant_25 (aTHX_ name, iv_return);
break;
case 27:
return constant_27 (aTHX_ name, iv_return);
break;
case 28:
return constant_28 (aTHX_ name, iv_return);
break;
case 31:
/* Names all of length 31. */
/* DB_EVENT_REP_CONNECT_TRY_FAILED DB_EVENT_REP_LOCAL_SITE_REMOVED */
/* Offset 19 gives the best switch position. */
switch (name[19]) {
case 'S':
if (memEQ(name, "DB_EVENT_REP_LOCAL_SITE_REMOVED", 31)) {
/* ^ */
#ifdef DB_EVENT_REP_LOCAL_SITE_REMOVED
*iv_return = DB_EVENT_REP_LOCAL_SITE_REMOVED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
case 'T':
if (memEQ(name, "DB_EVENT_REP_CONNECT_TRY_FAILED", 31)) {
/* ^ */
#ifdef DB_EVENT_REP_CONNECT_TRY_FAILED
*iv_return = DB_EVENT_REP_CONNECT_TRY_FAILED;
return PERL_constant_ISIV;
#else
return PERL_constant_NOTDEF;
#endif
}
break;
}
break;
}
return PERL_constant_NOTFOUND;
}