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; }