addresses #1093

another test that exposes a problem

git-svn-id: file:///svn/tokudb@5676 c7de825b-a66e-492c-adef-691d508d4ae1

src/tests/test_txn_nested_abort3.c

+#include <stdio.h>
+#include <assert.h>
+#include <stdlib.h>
+#include <unistd.h>
+#include <string.h>
+#include <sys/stat.h>
+#include <db.h>
+#include "test.h"
+
+void test_txn_abort() {
+
+    system("rm -rf " ENVDIR);
+    mkdir(ENVDIR, 0777);
+
+    int r;
+    int i;
+    DB_ENV *env;
+    DBT key, val;
+    DB_TXN* txn_all = NULL;
+    DB_TXN* txn_stmt = NULL;
+    DB_TXN* txn_sp = NULL;
+    r = db_env_create(&env, 0); assert(r == 0);
+    r = env->set_data_dir(env, ENVDIR);
+    r = env->set_lg_dir(env, ENVDIR);
+    r = env->open(env, 0, DB_INIT_MPOOL + DB_INIT_LOG + DB_INIT_LOCK + DB_INIT_TXN + DB_PRIVATE + DB_CREATE, 0777); 
+    if (r != 0) printf("%s:%d:%d:%s\n", __FILE__, __LINE__, r, db_strerror(r));
+    assert(r == 0);
+
+    DB_TXN *txn = 0;
+    r = env->txn_begin(env, 0, &txn, 0); assert(r == 0);
+
+    DB *db;
+    r = db_create(&db, env, 0); assert(r == 0);
+    r = db->open(db, txn, "test.db", 0, DB_BTREE, DB_CREATE, 0777); assert(r == 0);
+    r = txn->commit(txn, 0); assert(r == 0);
+
+
+    r = env->txn_begin(env, 0, &txn_all, 0); assert(r == 0);
+
+    r = env->txn_begin(env, txn_all, &txn_stmt, 0); assert(r == 0);
+    i = 1;
+    r = db->put(db, txn_stmt, dbt_init(&key, &i, sizeof i), dbt_init(&val, &i, sizeof i), 0); 
+    if (r != 0) printf("%s:%d:%d:%s\n", __FILE__, __LINE__, r, db_strerror(r));
+    assert(r == 0);
+    r = txn_stmt->commit(txn_stmt,DB_TXN_NOSYNC); 
+    txn_stmt = NULL;
+    
+    r = env->txn_begin(env, txn_all, &txn_sp, 0); assert(r == 0);
+    
+    r = env->txn_begin(env, txn_sp, &txn_stmt, 0); assert(r == 0);
+    r = db->del(db, txn_stmt, dbt_init(&key, &i, sizeof i), 0);
+    if (r != 0) printf("%s:%d:%d:%s\n", __FILE__, __LINE__, r, db_strerror(r));
+    assert(r == 0);
+
+
+    r = txn_stmt->commit(txn_stmt,DB_TXN_NOSYNC); 
+    txn_stmt = NULL;
+
+
+    r = txn_all->abort(txn_all);
+    if (r != 0) printf("%s:%d:abort:%d\n", __FILE__, __LINE__, r);
+    assert (r==0);
+
+
+    /* walk the db, should be empty */
+    r = env->txn_begin(env, 0, &txn, 0); assert(r == 0);
+    DBC *cursor;
+    r = db->cursor(db, txn, &cursor, 0); assert(r == 0);
+    memset(&key, 0, sizeof key);
+    memset(&val, 0, sizeof val);
+    r = cursor->c_get(cursor, &key, &val, DB_FIRST); 
+    if (r == 0) printf("%s:%d:%d:%s\n", __FILE__, __LINE__, r, db_strerror(r));
+    assert(r == DB_NOTFOUND);
+    r = cursor->c_close(cursor); assert(r == 0);
+    r = txn->commit(txn, 0);
+
+    r = db->close(db, 0); assert(r == 0);
+    r = env->close(env, 0); assert(r == 0);
+}
+
+int main(int argc, char *argv[]) {
+    int i;
+    for (i = 1; i < argc; i++) {
+        char *arg = argv[i];
+        if (strcmp(arg, "-v") == 0 || strcmp(arg, "--verbose") == 0) {
+            verbose++;
+            continue;
+        }
+    }
+    test_txn_abort();
+    return 0;
+}