static int btreeSeqCreate(
sqlite3_context *context, Btree *p, SEQ_COOKIE *cookie)
{
BtShared *pBt;
DBT key;
DB_SEQUENCE *seq;
char seq_key[BT_MAX_SEQ_NAME];
int ret, seq_len;
u_int32_t flags;
pBt = p->pBt;
if (cookie->cache != 0) {
if ((ret = db_sequence_create(&seq, pBt->metadb, 0)) != 0)
return ret;
if (cookie->cache > 0)
seq->set_cachesize(seq, cookie->cache);
if (cookie->decrementing != 0)
seq->set_flags(seq, DB_SEQ_DEC);
/* Always set min_val and max_val */
if ((ret =
seq->set_range(seq, cookie->min_val, cookie->max_val)) != 0)
return ret;
if ((ret = seq->initial_value(seq, cookie->start_val)) != 0)
return ret;
flags = DB_CREATE;
#ifndef BDBSQL_SINGLE_THREAD
flags |= DB_THREAD;
#endif
sqlite3_snprintf(
BT_MAX_SEQ_NAME, seq_key, "%s_db", cookie->name);
seq_len = (int)strlen(seq_key);
memset(&key, 0, sizeof(key));
key.data = seq_key;
key.size = key.ulen = seq_len;
key.flags = DB_DBT_USERMEM;
if ((ret = seq->open(seq, p->savepoint_txn, &key, flags)) != 0)
return ret;
cookie->handle = seq;
} else {
cookie->handle = NULL;
cookie->val = cookie->start_val;
if ((cookie->decrementing &&
cookie->start_val < cookie->min_val) ||
(!cookie->decrementing &&
cookie->start_val > cookie->max_val) ||
cookie->min_val == cookie->max_val)
return EINVAL;
}
if ((ret = btreeSeqPutCookie(context, p, cookie, DB_NOOVERWRITE)) != 0)
return (ret);
return (0);
}
int TestSequencePreOpenSetterAndGetter(CuTest *ct) {
DB_ENV *dbenv;
DB *dbp;
DB_SEQUENCE *seq;
u_int32_t seq_flags;
CuAssert(ct, "db_env_create", create_dbenv_handle(&dbenv) == 0);
CuAssert(ct, "dbenv->open", dbenv->open(dbenv,
TEST_ENV, DB_CREATE | DB_INIT_MPOOL, 0644) == 0);
CuAssert(ct, "db_create", create_db_handle(&dbp, dbenv) == 0);
CuAssert(ct, "dbp->open", dbp->open(dbp,
NULL, "seq.db", NULL, DB_BTREE, DB_CREATE, 0644) == 0);
CuAssert(ct, "db_sequence_create",
create_seq_handle(&seq, dbp) == 0);
/* Test DB_SEQUENCE->set_cachesize(), DB_SEQUENCE->get_cachesize(). */
CHECK_1_DIGIT_VALUE(seq, set_cachesize, get_cachesize,
u_int32_t, rand());
/* Test DB_SEQUENCE->set_flags(), DB_SEQUENCE->get_flags(). */
seq_flags = 0;
CHECK_1_DIGIT_VALUE(seq, set_flags, get_flags,
u_int32_t, DB_SEQ_DEC | DB_SEQ_WRAP);
/* We make sure the DB_SEQ_DEC is cleared if we set DB_SEQ_INC. */
CuAssert(ct, "seq->set_flags", seq->set_flags(seq, DB_SEQ_INC) == 0);
CuAssert(ct, "seq->get_flags", seq->get_flags(seq, &seq_flags) == 0);
CuAssert(ct, "check seq flags",
seq_flags == (DB_SEQ_INC | DB_SEQ_WRAP));
/*
* Test DB_SEQUENCE->set_range(), DB_SEQUENCE->get_range().
* The max should be bigger than min.
*/
CHECK_2_DIGIT_VALUES(seq, set_range, get_range,
db_seq_t, 2, db_seq_t, 1048576);
CuAssert(ct, "seq->close", close_seq_handle(seq) == 0);
CuAssert(ct, "dbp->close", close_db_handle(dbp) == 0);
CuAssert(ct, "dbenv->close", close_dbenv_handle(dbenv) == 0);
return (0);
}
static JSBool
rpmseq_setprop(JSContext *cx, JSObject *obj, jsid id, JSBool strict, jsval *vp)
{
void * ptr = JS_GetInstancePrivate(cx, obj, &rpmseqClass, NULL);
DB_SEQUENCE * seq = ptr;
jsval idval;
JS_IdToValue(cx, id, &idval);
jsint tiny = JSVAL_TO_INT(idval);
jsdouble d = 0;
int ret;
/* XXX the class has ptr == NULL, instances have ptr != NULL. */
if (ptr == NULL)
return JS_TRUE;
switch (tiny) {
case _DEBUG:
if (!JS_ValueToInt32(cx, *vp, &_debug))
break;
break;
case _CACHESIZE:
{ int32_t _i = 0;
if (seq->api_internal != NULL || !JS_ValueToNumber(cx, *vp, &d)) {
*vp = JSVAL_FALSE;
break;
}
_i = d;
ret = seq->set_cachesize(seq, _i);
*vp = (!ret ? JSVAL_TRUE : JSVAL_FALSE);
} break;
case _FLAGS:
{ uint32_t _u = 0;
if (seq->api_internal != NULL || !JS_ValueToNumber(cx, *vp, &d)) {
*vp = JSVAL_FALSE;
break;
}
_u = d;
ret = seq->set_flags(seq, _u);
*vp = (!ret ? JSVAL_TRUE : JSVAL_FALSE);
} break;
case _INITVAL:
{ db_seq_t _ival = 0;
if (seq->api_internal != NULL || !JS_ValueToNumber(cx, *vp, &d)) {
*vp = JSVAL_FALSE;
break;
}
_ival = d;
ret = seq->initial_value(seq, _ival);
*vp = (!ret ? JSVAL_TRUE : JSVAL_FALSE);
} break;
case _RANGEMIN:
case _RANGEMAX:
{ db_seq_t _min = 0;
db_seq_t _max = 0;
if (seq->api_internal != NULL || !JS_ValueToNumber(cx, *vp, &d)) {
*vp = JSVAL_FALSE;
break;
}
if ((ret = seq->get_range(seq, &_min, &_max)) != 0) {
*vp = JSVAL_VOID;
break;
}
switch (tiny) {
case _RANGEMIN: _min = d; break;
case _RANGEMAX: _max = d; break;
}
ret = seq->set_range(seq, _min, _max);
*vp = (!ret ? JSVAL_TRUE : JSVAL_FALSE);
} break;
default:
break;
}
return JS_TRUE;
}
