#include "brt.h"
#include "key.h"

#include "memory.h"
#include <assert.h>
#include <fcntl.h>
#include <stdio.h>
#include <string.h>
#include <sys/time.h>
#include <stdlib.h>
#include <unistd.h>
#include <arpa/inet.h>

TOKUTXN const null_txn = 0;
DB * const null_db = 0;

extern long long n_items_malloced;

static void test0 (void) {
    BRT t;
    int r;
    CACHETABLE ct;
    char fname[]="testbrt.brt";
    printf("%s:%d test0\n", __FILE__, __LINE__);
    memory_check=1;
    memory_check_all_free();
    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);
    assert(r==0);
    printf("%s:%d test0\n", __FILE__, __LINE__);
    unlink(fname);
    r = open_brt(fname, 0, 1, &t, 1024, ct, null_txn, toku_default_compare_fun);
    assert(r==0);
    //printf("%s:%d test0\n", __FILE__, __LINE__);
    //printf("%s:%d n_items_malloced=%lld\n", __FILE__, __LINE__, n_items_malloced);
    r = close_brt(t);     assert(r==0);
    //printf("%s:%d n_items_malloced=%lld\n", __FILE__, __LINE__, n_items_malloced);
    r = toku_cachetable_close(&ct);
    assert(r==0);
    memory_check_all_free();
}

static void test1 (void) {
    BRT t;
    int r;
    CACHETABLE ct;
    char fname[]="testbrt.brt";
    DBT k,v;
    memory_check=1;
    memory_check_all_free();
    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);
    assert(r==0);
    unlink(fname);
    r = open_brt(fname, 0, 1, &t, 1024, ct, null_txn, toku_default_compare_fun);
    assert(r==0);
    brt_insert(t, fill_dbt(&k, "hello", 6), fill_dbt(&v, "there", 6), null_db, null_txn);
    {
	r = brt_lookup(t, fill_dbt(&k, "hello", 6), init_dbt(&v), 0);
	assert(r==0);
	assert(strcmp(v.data, "there")==0);
	assert(v.size==6);
    }
    r = close_brt(t);              assert(r==0);
    r = toku_cachetable_close(&ct);     assert(r==0);
    memory_check_all_free();
    printf("test1 ok\n");
}

static void test2 (int memcheck) {
    BRT t;
    int r;
    int i;
    CACHETABLE ct;
    char fname[]="testbrt.brt";
    memory_check=memcheck;
    printf("%s:%d checking\n", __FILE__, __LINE__);
    memory_check_all_free();
    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER); assert(r==0);
    unlink(fname);
    r = open_brt(fname, 0, 1, &t, 1024, ct, null_txn, toku_default_compare_fun);
    printf("%s:%d did setup\n", __FILE__, __LINE__);
    assert(r==0);
    for (i=0; i<2048; i++) {
	DBT k,v;
	char key[100],val[100];
	snprintf(key,100,"hello%d",i);
	snprintf(val,100,"there%d",i);
	brt_insert(t, fill_dbt(&k, key, 1+strlen(key)), fill_dbt(&v, val, 1+strlen(val)), null_db, null_txn);
	//printf("%s:%d did insert %d\n", __FILE__, __LINE__, i);
	if (0) {
	    brt_flush(t);
	    {
		int n = get_n_items_malloced();
		printf("%s:%d i=%d n_items_malloced=%d\n", __FILE__, __LINE__, i, n);
		if (n!=3) print_malloced_items();
		assert(n==3);
	    }
	}
    }
    printf("%s:%d inserted\n", __FILE__, __LINE__);
    r = close_brt(t);              assert(r==0);
    r = toku_cachetable_close(&ct);     assert(r==0);
    memory_check_all_free();
    printf("test2 ok\n");
}

static void test3 (int nodesize, int count, int memcheck) {
    BRT t;
    int r;
    struct timeval t0,t1;
    int i;
    CACHETABLE ct;
    char fname[]="testbrt.brt";
    memory_check=memcheck;
    memory_check_all_free();
    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER); assert(r==0);
    gettimeofday(&t0, 0);
    unlink(fname);
    r = open_brt(fname, 0, 1, &t, nodesize, ct, null_txn, toku_default_compare_fun);
    assert(r==0);
    for (i=0; i<count; i++) {
	char key[100],val[100];
	DBT k,v;
	snprintf(key,100,"hello%d",i);
	snprintf(val,100,"there%d",i);
	brt_insert(t, fill_dbt(&k, key, 1+strlen(key)), fill_dbt(&v, val, 1+strlen(val)), null_db, null_txn);
    }
    r = close_brt(t);              assert(r==0);
    r = toku_cachetable_close(&ct);     assert(r==0);
    memory_check_all_free();
    gettimeofday(&t1, 0);
    {
	double tdiff = (t1.tv_sec-t0.tv_sec)+1e-6*(t1.tv_usec-t0.tv_usec);
	printf("serial insertions: blocksize=%d %d insertions in %.3f seconds, %.2f insertions/second\n", nodesize, count, tdiff, count/tdiff);
    }
}

static void test4 (int nodesize, int count, int memcheck) {
    BRT t;
    int r;
    struct timeval t0,t1;
    int i;
    CACHETABLE ct;
    char fname[]="testbrt.brt";
    gettimeofday(&t0, 0);
    unlink(fname);
    memory_check=memcheck;
    memory_check_all_free();
    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);         assert(r==0);
    r = open_brt(fname, 0, 1, &t, nodesize, ct, null_txn, toku_default_compare_fun); assert(r==0);
    for (i=0; i<count; i++) {
	char key[100],val[100];
	int rv = random();
	DBT k,v;
	snprintf(key,100,"hello%d",rv);
	snprintf(val,100,"there%d",i);
	brt_insert(t, fill_dbt(&k, key, 1+strlen(key)), fill_dbt(&v, val, 1+strlen(val)), null_db, null_txn);
    }
    r = close_brt(t);              assert(r==0);
    r = toku_cachetable_close(&ct);     assert(r==0);
    memory_check_all_free();
    gettimeofday(&t1, 0);
    {
	double tdiff = (t1.tv_sec-t0.tv_sec)+1e-6*(t1.tv_usec-t0.tv_usec);
	printf("random insertions: blocksize=%d %d insertions in %.3f seconds, %.2f insertions/second\n", nodesize, count, tdiff, count/tdiff);
    }
}

static void test5 (void) {
    int r;
    BRT t;
    int limit=100000;
    int *values;
    int i;
    CACHETABLE ct;
    char fname[]="testbrt.brt";
    memory_check_all_free();
    MALLOC_N(limit,values);
    for (i=0; i<limit; i++) values[i]=-1;
    unlink(fname);
    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);        assert(r==0);
    r = open_brt(fname, 0, 1, &t, 1<<12, ct, null_txn, toku_default_compare_fun);   assert(r==0);
    for (i=0; i<limit/2; i++) {
	char key[100],val[100];
	int rk = random()%limit;
	int rv = random();
	if (i%1000==0) printf("w"); fflush(stdout);
	values[rk] = rv;
	snprintf(key, 100, "key%d", rk);
	snprintf(val, 100, "val%d", rv);
	DBT k,v;
	brt_insert(t, fill_dbt(&k, key, 1+strlen(key)), fill_dbt(&v, val, 1+strlen(val)), null_db, null_txn);
    }
    printf("\n");
    for (i=0; i<limit/2; i++) {
	int rk = random()%limit;
	if (values[rk]>=0) {
	    char key[100], valexpected[100];
	    DBT k,v;
	    if (i%1000==0) printf("r"); fflush(stdout);
	    snprintf(key, 100, "key%d", rk);
	    snprintf(valexpected, 100, "val%d", values[rk]);
	    r = brt_lookup(t, fill_dbt(&k, key, 1+strlen(key)), init_dbt(&v), 0);
	    assert(r==0);
	    assert(v.size==(1+strlen(valexpected)));
	    assert(memcmp(v.data,valexpected,v.size)==0);
	}
    }
    printf("\n");
    toku_free(values);
    r = close_brt(t);          assert(r==0);
    r = toku_cachetable_close(&ct); assert(r==0);
    memory_check_all_free();
}

static void test_dump_empty_db (void) {
    BRT t;
    CACHETABLE ct;
    int r;
    char fname[]="testbrt.brt";
    memory_check=1;
    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);
    assert(r==0);
    unlink(fname);
    r = open_brt(fname, 0, 1, &t, 1024, ct, null_txn, toku_default_compare_fun);
    assert(r==0);
    dump_brt(t);
    r = close_brt(t);          assert(r==0);
    r = toku_cachetable_close(&ct); assert(r==0);
    memory_check_all_free();
}

/* Test running multiple trees in different files */
static void test_multiple_files_of_size (int size) {
    const char *n0 = "test0.brt";
    const char *n1 = "test1.brt";
    CACHETABLE ct;
    BRT t0,t1;
    int r,i;
    printf("test_multiple_files_of_size(%d)\n", size);
    unlink(n0);
    unlink(n1);
    memory_check_all_free();
    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);   assert(r==0);
    r = open_brt(n0, 0, 1, &t0, size, ct, null_txn, toku_default_compare_fun); assert(r==0);
    r = open_brt(n1, 0, 1, &t1, size, ct, null_txn, toku_default_compare_fun); assert(r==0);
    for (i=0; i<10000; i++) {
	char key[100],val[100];
	DBT k,v;
	snprintf(key, 100, "key%d", i);
	snprintf(val, 100, "val%d", i);
	brt_insert(t0, fill_dbt(&k, key, 1+strlen(key)), fill_dbt(&v, val, 1+strlen(val)), null_db, null_txn);
	snprintf(val, 100, "Val%d", i);
	brt_insert(t1, fill_dbt(&k, key, 1+strlen(key)), fill_dbt(&v, val, 1+strlen(val)), null_db, null_txn);
    }
    //toku_verify_brt(t0);
    //dump_brt(t0);
    //dump_brt(t1);
    toku_verify_brt(t0);
    toku_verify_brt(t1);

    r = close_brt(t0); assert(r==0);
    r = close_brt(t1); assert(r==0);
    r = toku_cachetable_close(&ct); assert(r==0);
    memory_check_all_free();

    /* Now see if the data is all there. */
    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);      assert(r==0);
    r = open_brt(n0, 0, 0, &t0, 1<<12, ct, null_txn, toku_default_compare_fun);
    printf("%s:%d r=%d\n", __FILE__, __LINE__,r);
    assert(r==0);
    r = open_brt(n1, 0, 0, &t1, 1<<12, ct, null_txn, toku_default_compare_fun); assert(r==0);

    for (i=0; i<10000; i++) {
	char key[100],val[100];
	DBT k,actual;
	snprintf(key, 100, "key%d", i);
	snprintf(val, 100, "val%d", i);
	r=brt_lookup(t0, fill_dbt(&k, key, 1+strlen(key)), init_dbt(&actual), 0);
	assert(r==0);
	assert(strcmp(val,actual.data)==0);
	assert(actual.size==1+strlen(val));
	snprintf(val, 100, "Val%d", i);
	r=brt_lookup(t1, fill_dbt(&k, key, 1+strlen(key)), init_dbt(&actual), 0);
	assert(r==0);
	assert(strcmp(val,actual.data)==0);
	assert(actual.size==1+strlen(val));
    }

    r = close_brt(t0); assert(r==0);
    r = close_brt(t1); assert(r==0);
    r = toku_cachetable_close(&ct); assert(r==0);
    memory_check_all_free();
}

static void test_multiple_files (void) {
    test_multiple_files_of_size (1<<12);
    test_multiple_files_of_size (1<<20);
}

static void test_named_db (void) {
    const char *n0 = "test0.brt";
    const char *n1 = "test1.brt";
    CACHETABLE ct;
    BRT t0;
    int r;
    DBT k,v;

    printf("test_named_db\n");
    unlink(n0);
    unlink(n1);
    memory_check_all_free();
    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);           assert(r==0);
    r = open_brt(n0, "db1", 1, &t0, 1<<12, ct, null_txn, toku_default_compare_fun); assert(r==0);


    brt_insert(t0, fill_dbt(&k, "good", 5), fill_dbt(&v, "day", 4), null_db, null_txn); assert(r==0);

    r = close_brt(t0); assert(r==0);
    r = toku_cachetable_close(&ct); assert(r==0);
    memory_check_all_free();

    memory_check_all_free();
    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);           assert(r==0);
    r = open_brt(n0, "db1", 0, &t0, 1<<12, ct, null_txn, toku_default_compare_fun); assert(r==0);

    {
	r = brt_lookup(t0, fill_dbt(&k, "good", 5), init_dbt(&v), 0);
	assert(r==0);
	assert(v.size==4);
	assert(strcmp(v.data,"day")==0);
    }

    r = close_brt(t0); assert(r==0);
    r = toku_cachetable_close(&ct); assert(r==0);
    memory_check_all_free();
}

static void test_multiple_dbs (void) {
    const char *n0 = "test0.brt";
    const char *n1 = "test1.brt";
    CACHETABLE ct;
    BRT t0,t1;
    int r;
    DBT k,v;
    printf("test_multiple_dbs: ");
    unlink(n0);
    unlink(n1);
    memory_check_all_free();
    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);        assert(r==0);
    r = open_brt(n0, "db1", 1, &t0, 1<<12, ct, null_txn, toku_default_compare_fun); assert(r==0);
    r = open_brt(n1, "db2", 1, &t1, 1<<12, ct, null_txn, toku_default_compare_fun); assert(r==0);

    brt_insert(t0, fill_dbt(&k, "good", 5), fill_dbt(&v, "grief", 6), null_db, null_txn); assert(r==0);
    brt_insert(t1, fill_dbt(&k, "bad",  4), fill_dbt(&v, "night", 6), null_db, null_txn); assert(r==0);

    r = close_brt(t0); assert(r==0);
    r = close_brt(t1); assert(r==0);
    r = toku_cachetable_close(&ct); assert(r==0);

    memory_check_all_free();

    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);        assert(r==0);
    r = open_brt(n0, "db1", 0, &t0, 1<<12, ct, null_txn, toku_default_compare_fun); assert(r==0);
    r = open_brt(n1, "db2", 0, &t1, 1<<12, ct, null_txn, toku_default_compare_fun); assert(r==0);

    {
	r = brt_lookup(t0, fill_dbt(&k, "good", 5), init_dbt(&v), 0);
	assert(r==0);
	assert(v.size==6);
	assert(strcmp(v.data,"grief")==0);

	r = brt_lookup(t1, fill_dbt(&k, "good", 5), init_dbt(&v), 0);
	assert(r!=0);

	r = brt_lookup(t0, fill_dbt(&k, "bad", 4), init_dbt(&v), 0);
	assert(r!=0);

	r = brt_lookup(t1, fill_dbt(&k, "bad", 4), init_dbt(&v), 0);
	assert(r==0);
	assert(v.size==6);
	assert(strcmp(v.data,"night")==0);
    }

    r = close_brt(t0); assert(r==0);
    r = close_brt(t1); assert(r==0);
    r = toku_cachetable_close(&ct); assert(r==0);

    memory_check_all_free();
    printf("ok\n");
}

/* Test to see a single file can contain many databases. */
static void test_multiple_dbs_many (void) {
    enum { MANYN = 16 };
    int i, r;
    const char *name = "test.brt";
    CACHETABLE ct;
    BRT trees[MANYN];
    printf("test_multiple_dbs_many:\n");
    memory_check_all_free();
    unlink(name);
    r = brt_create_cachetable(&ct, MANYN+4, ZERO_LSN, NULL_LOGGER);     assert(r==0);
    for (i=0; i<MANYN; i++) {
	char dbname[20];
	snprintf(dbname, 20, "db%d", i);
	r = open_brt(name, dbname, 1, &trees[i], 1<<12, ct, null_txn, toku_default_compare_fun);
	assert(r==0);
    }
    for (i=0; i<MANYN; i++) {
	char k[20], v[20];
	DBT kdbt,vdbt;
	snprintf(k, 20, "key%d", i);
	snprintf(v, 20, "val%d", i);
	brt_insert(trees[i], fill_dbt(&kdbt, k, strlen(k)+1), fill_dbt(&vdbt, v, strlen(v)+1), null_db, null_txn);
    }
    for (i=0; i<MANYN; i++) {
	r = close_brt(trees[i]); assert(r==0);
    }
    r = toku_cachetable_close(&ct);    assert(r==0);
    memory_check_all_free();
}

/* Test to see that a single db can be opened many times.  */
static void test_multiple_brts_one_db_one_file (void) {
    enum { MANYN = 2 };
    int i, r;
    const char *name = "test.brt";
    CACHETABLE ct;
    BRT trees[MANYN];
    printf("test_multiple_brts_one_db_one_file:");
    memory_check_all_free();
    unlink(name);
    r = brt_create_cachetable(&ct, 32, ZERO_LSN, NULL_LOGGER); assert(r==0);
    for (i=0; i<MANYN; i++) {
	r = open_brt(name, 0, (i==0), &trees[i], 1<<12, ct, null_txn, toku_default_compare_fun);
	assert(r==0);
    }
    for (i=0; i<MANYN; i++) {
	char k[20], v[20];
	DBT kb, vb;
	snprintf(k, 20, "key%d", i);
	snprintf(v, 20, "val%d", i);
	brt_insert(trees[i], fill_dbt(&kb, k, strlen(k)+1), fill_dbt(&vb, v, strlen(v)+1), null_db, null_txn);
    }
    for (i=0; i<MANYN; i++) {
	char k[20],vexpect[20];
	DBT kb, vb;
	snprintf(k, 20, "key%d", i);
	snprintf(vexpect, 20, "val%d", i);
	r=brt_lookup(trees[0], fill_dbt(&kb, k, strlen(k)+1), init_dbt(&vb), 0);
	assert(r==0);
	assert(vb.size==1+strlen(vexpect));
	assert(strcmp(vb.data, vexpect)==0);
    }
    for (i=0; i<MANYN; i++) {
	r=close_brt(trees[i]); assert(r==0);
    }
    r = toku_cachetable_close(&ct); assert(r==0);
    memory_check_all_free();
    printf(" ok\n");
}


/* Check to see if data can be read that was written. */
static void  test_read_what_was_written (void) {
    const char *n="testbrt.brt";
    CACHETABLE ct;
    BRT brt;
    int r;
    const int NVALS=10000;

    printf("test_read_what_was_written(): "); fflush(stdout);

    unlink(n);
    memory_check_all_free();

    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);       assert(r==0);
    r = open_brt(n, 0, 1, &brt, 1<<12, ct, null_txn, toku_default_compare_fun);  assert(r==0);
    r = close_brt(brt); assert(r==0);
    r = toku_cachetable_close(&ct); assert(r==0);

    memory_check_all_free();

    /* Now see if we can read an empty tree in. */
    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);     assert(r==0);
    r = open_brt(n, 0, 0, &brt, 1<<12, ct, null_txn, toku_default_compare_fun);  assert(r==0);

    /* See if we can put something in it. */
    {
	DBT k,v;
	brt_insert(brt, fill_dbt(&k, "hello", 6), fill_dbt(&v, "there", 6), null_db, null_txn);
    }

    r = close_brt(brt); assert(r==0);
    r = toku_cachetable_close(&ct); assert(r==0);

    memory_check_all_free();

    /* Now see if we can read it in and get the value. */
    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);    assert(r==0);
    r = open_brt(n, 0, 0, &brt, 1<<12, ct, null_txn, toku_default_compare_fun); assert(r==0);

    {
	DBT k,v;
	r = brt_lookup(brt, fill_dbt(&k, "hello", 6), init_dbt(&v), 0);
	assert(r==0);
	assert(v.size==6);
	assert(strcmp(v.data,"there")==0);
    }

    assert(toku_verify_brt(brt)==0);

    /* Now put a bunch (NVALS) of things in. */
    {
	int i;
	for (i=0; i<NVALS; i++) {
	    char key[100],val[100];
	    DBT k,v;
	    snprintf(key, 100, "key%d", i);
	    snprintf(val, 100, "val%d", i);
	    if (i<600) {
		int verify_result=toku_verify_brt(brt);;
		assert(verify_result==0);
	    }
	    brt_insert(brt, fill_dbt(&k, key, strlen(key)+1), fill_dbt(&v, val, strlen(val)+1), null_db, null_txn);
	    if (i<600) {
		int verify_result=toku_verify_brt(brt);
		if (verify_result) {
		    dump_brt(brt);
		    assert(0);
		}
		{
		    int j;
		    for (j=0; j<=i; j++) {
			char expectedval[100];
			snprintf(key, 100, "key%d", j);
			snprintf(expectedval, 100, "val%d", j);
			r=brt_lookup(brt, fill_dbt(&k, key, strlen(key)+1), init_dbt(&v), 0);
			if (r!=0) {
			    printf("%s:%d r=%d on lookup(key=%s) after i=%d\n", __FILE__, __LINE__, r, key, i);
			    dump_brt(brt);
			}
			assert(r==0);
		    }
		}
	    }
	}
    }
    printf("Now read them out\n");

    //show_brt_blocknumbers(brt);
    toku_verify_brt(brt);
    //dump_brt(brt);

    /* See if we can read them all out again. */
    {
	int i;
	for (i=0; i<NVALS; i++) {
	    char key[100],expectedval[100];
	    DBT k,v;
	    snprintf(key, 100, "key%d", i);
	    snprintf(expectedval, 100, "val%d", i);
	    r=brt_lookup(brt, fill_dbt(&k, key, strlen(key)+1), init_dbt(&v), 0);
	    if (r!=0) printf("%s:%d r=%d on key=%s\n", __FILE__, __LINE__, r, key);
	    assert(r==0);
	
	}
    }

    r = close_brt(brt); assert(r==0);
    printf("%s:%d About to close %p\n", __FILE__, __LINE__, ct);
    r = toku_cachetable_close(&ct); assert(r==0);

    memory_check_all_free();

    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);    assert(r==0);
    r = open_brt(n, 0, 0, &brt, 1<<12, ct, null_txn, toku_default_compare_fun); assert(r==0);

    {
	DBT k,v;
	r = brt_lookup(brt, fill_dbt(&k, "hello", 6), init_dbt(&v), 0);
	assert(r==0);
	assert(v.size==6);
	assert(strcmp(v.data,"there")==0);
    }
    {
	int i;
	for (i=0; i<NVALS; i++) {
	    char key[100],expectedval[100];
	    DBT k,v;
	    snprintf(key, 100, "key%d", i);
	    snprintf(expectedval, 100, "val%d", i);
	    r=brt_lookup(brt, fill_dbt(&k, key, strlen(key)+1), init_dbt(&v), 0);
	    if (r!=0) printf("%s:%d r=%d on key=%s\n", __FILE__, __LINE__, r, key);
	    assert(r==0);
	
	}
    }

    r = close_brt(brt); assert(r==0);
    r = toku_cachetable_close(&ct); assert(r==0);

    memory_check_all_free();


    printf(" ok\n");
}

extern void toku_pma_show_stats (void);

/* Test c_get(DB_LAST) on an empty tree */
void test_cursor_last_empty(void) {
    const char *n="testbrt.brt";
    CACHETABLE ct;
    BRT brt;
    BRT_CURSOR cursor;
    int r;
    DBT kbt, vbt;
    printf("%s", __FUNCTION__);
    unlink(n);
    memory_check_all_free();
    //printf("%s:%d %d alloced\n", __FILE__, __LINE__, get_n_items_malloced()); print_malloced_items();
    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);       assert(r==0);
    //printf("%s:%d %d alloced\n", __FILE__, __LINE__, get_n_items_malloced()); print_malloced_items();
    r = open_brt(n, 0, 1, &brt, 1<<12, ct, null_txn, toku_default_compare_fun);  assert(r==0);
    //printf("%s:%d %d alloced\n", __FILE__, __LINE__, get_n_items_malloced()); print_malloced_items();
    r = brt_cursor(brt, &cursor);            assert(r==0);
    init_dbt(&kbt);
    //printf("%s:%d %d alloced\n", __FILE__, __LINE__, get_n_items_malloced()); print_malloced_items();
    init_dbt(&vbt);
    //printf("%s:%d %d alloced\n", __FILE__, __LINE__, get_n_items_malloced()); print_malloced_items();
    r = brt_cursor_get(cursor, &kbt, &vbt, DB_LAST, null_db, null_txn);
    //printf("%s:%d %d alloced\n", __FILE__, __LINE__, get_n_items_malloced()); print_malloced_items();
    assert(r==DB_NOTFOUND);
    r = brt_cursor_get(cursor, &kbt, &vbt, DB_FIRST, null_db, null_txn);
    //printf("%s:%d %d alloced\n", __FILE__, __LINE__, get_n_items_malloced()); print_malloced_items();
    assert(r==DB_NOTFOUND);
    r = close_brt(brt);
    //printf("%s:%d %d alloced\n", __FILE__, __LINE__, get_n_items_malloced()); print_malloced_items();
    r = toku_cachetable_close(&ct); assert(r==0);
    //printf("%s:%d %d alloced\n", __FILE__, __LINE__, get_n_items_malloced()); print_malloced_items();
    memory_check_all_free();
}

void test_cursor_next (void) {
    const char *n="testbrt.brt";
    CACHETABLE ct;
    BRT brt;
    BRT_CURSOR cursor;
    int r;
    DBT kbt, vbt;

    unlink(n);
    memory_check_all_free();
    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);       assert(r==0);
    //printf("%s:%d %d alloced\n", __FILE__, __LINE__, get_n_items_malloced()); print_malloced_items();
    r = open_brt(n, 0, 1, &brt, 1<<12, ct, null_txn, toku_default_compare_fun);  assert(r==0);
    //printf("%s:%d %d alloced\n", __FILE__, __LINE__, get_n_items_malloced()); print_malloced_items();
    r = brt_insert(brt, fill_dbt(&kbt, "hello", 6), fill_dbt(&vbt, "there", 6), null_db, null_txn);
    r = brt_insert(brt, fill_dbt(&kbt, "byebye", 7), fill_dbt(&vbt, "byenow", 7), null_db, null_txn);
    printf("%s:%d calling brt_cursor(...)\n", __FILE__, __LINE__);
    r = brt_cursor(brt, &cursor);            assert(r==0);
    init_dbt(&kbt);
    //printf("%s:%d %d alloced\n", __FILE__, __LINE__, get_n_items_malloced()); print_malloced_items();
    init_dbt(&vbt);
    //printf("%s:%d %d alloced\n", __FILE__, __LINE__, get_n_items_malloced()); print_malloced_items();

    printf("%s:%d calling brt_cursor_get(...)\n", __FILE__, __LINE__);
    r = brt_cursor_get(cursor, &kbt, &vbt, DB_NEXT, null_db, null_txn);
    printf("%s:%d called brt_cursor_get(...)\n", __FILE__, __LINE__);
    //printf("%s:%d %d alloced\n", __FILE__, __LINE__, get_n_items_malloced()); print_malloced_items();
    assert(r==0);
    assert(kbt.size==7);
    assert(memcmp(kbt.data, "byebye", 7)==0);
    assert(vbt.size==7);
    assert(memcmp(vbt.data, "byenow", 7)==0);

    r = brt_cursor_get(cursor, &kbt, &vbt, DB_NEXT, null_db, null_txn);
    assert(r==0);
    assert(kbt.size==6);
    assert(memcmp(kbt.data, "hello", 6)==0);
    assert(vbt.size==6);
    assert(memcmp(vbt.data, "there", 6)==0);

    r = brt_cursor_get(cursor, &kbt, &vbt, DB_NEXT, null_db, null_txn);
    assert(r==DB_NOTFOUND);

    r = close_brt(brt);
    //printf("%s:%d %d alloced\n", __FILE__, __LINE__, get_n_items_malloced()); print_malloced_items();
    r = toku_cachetable_close(&ct); assert(r==0);
    //printf("%s:%d %d alloced\n", __FILE__, __LINE__, get_n_items_malloced()); print_malloced_items();
    memory_check_all_free();

}

DB nonce_db;

int wrong_compare_fun(DB *db, const DBT *a, const DBT *b) {
    unsigned int i;
    unsigned char *ad=a->data;
    unsigned char *bd=b->data;
    unsigned int siz=a->size;
    assert(a->size==b->size);
    assert(db==&nonce_db); // make sure the db was passed  down correctly
    for (i=0; i<siz; i++) {
	if (ad[siz-1-i]<bd[siz-1-i]) return -1;
	if (ad[siz-1-i]>bd[siz-1-i]) return +1;
    }
    return 0;

}

static void test_wrongendian_compare (int wrong_p, unsigned int N) {
    const char *n="testbrt.brt";
    CACHETABLE ct;
    BRT brt;
    BRT_CURSOR cursor;
    int r;
    DBT kbt, vbt;
    unsigned int i;

    unlink(n);
    memory_check_all_free();

    {
	char a[4]={0,1,0,0};
	char b[4]={1,0,0,0};
	DBT at, bt;
	assert(wrong_compare_fun(&nonce_db, fill_dbt(&at, a, 4), fill_dbt(&bt, b, 4))>0);
	assert(wrong_compare_fun(&nonce_db, fill_dbt(&at, b, 4), fill_dbt(&bt, a, 4))<0);
    }

    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);       assert(r==0);
    //printf("%s:%d WRONG=%d\n", __FILE__, __LINE__, wrong_p);

    if (0) { // ???? Why is this commented out?
    r = open_brt(n, 0, 1, &brt, 1<<20, ct, null_txn, wrong_p ? wrong_compare_fun : toku_default_compare_fun);  assert(r==0);
    for (i=1; i<257; i+=255) {
	unsigned char a[4],b[4];
	b[3] = a[0] = i&255;
	b[2] = a[1] = (i>>8)&255;
	b[1] = a[2] = (i>>16)&255;
	b[0] = a[3] = (i>>24)&255;
	fill_dbt(&kbt, a, sizeof(a));
	fill_dbt(&vbt, b, sizeof(b));
	printf("%s:%d insert: %02x%02x%02x%02x -> %02x%02x%02x%02x\n", __FILE__, __LINE__,
	       ((char*)kbt.data)[0], ((char*)kbt.data)[1], ((char*)kbt.data)[2], ((char*)kbt.data)[3],
	       ((char*)vbt.data)[0], ((char*)vbt.data)[1], ((char*)vbt.data)[2], ((char*)vbt.data)[3]);
	r = brt_insert(brt, &kbt, &vbt, &nonce_db, null_txn);
	assert(r==0);
    }
    r = brt_cursor(brt, &cursor);            assert(r==0);

    for (i=0; i<2; i++) {
	init_dbt(&kbt); init_dbt(&vbt);
	r = brt_cursor_get(cursor, &kbt, &vbt, DB_NEXT, null_db, null_txn);
	assert(r==0);
	assert(kbt.size==4 && vbt.size==4);
	printf("%s:%d %02x%02x%02x%02x -> %02x%02x%02x%02x\n", __FILE__, __LINE__,
	       ((char*)kbt.data)[0], ((char*)kbt.data)[1], ((char*)kbt.data)[2], ((char*)kbt.data)[3],
	       ((char*)vbt.data)[0], ((char*)vbt.data)[1], ((char*)vbt.data)[2], ((char*)vbt.data)[3]);
    }


    r = close_brt(brt);
    }

    {
	toku_cachetable_verify(ct);
	r = open_brt(n, 0, 1, &brt, 1<<20, ct, null_txn, wrong_p ? wrong_compare_fun : toku_default_compare_fun);  assert(r==0);
	toku_cachetable_verify(ct);

	for (i=0; i<N; i++) {
	    unsigned char a[4],b[4];
	    b[3] = a[0] = i&255;
	    b[2] = a[1] = (i>>8)&255;
	    b[1] = a[2] = (i>>16)&255;
	    b[0] = a[3] = (i>>24)&255;
	    fill_dbt(&kbt, a, sizeof(a));
	    fill_dbt(&vbt, b, sizeof(b));
	    if (0) printf("%s:%d insert: %02x%02x%02x%02x -> %02x%02x%02x%02x\n", __FILE__, __LINE__,
			  ((unsigned char*)kbt.data)[0], ((unsigned char*)kbt.data)[1], ((unsigned char*)kbt.data)[2], ((unsigned char*)kbt.data)[3],
			  ((unsigned char*)vbt.data)[0], ((unsigned char*)vbt.data)[1], ((unsigned char*)vbt.data)[2], ((unsigned char*)vbt.data)[3]);
	    r = brt_insert(brt, &kbt, &vbt, &nonce_db, null_txn);
	    assert(r==0);
	    toku_cachetable_verify(ct);
	}
	r = brt_cursor(brt, &cursor);            assert(r==0);
	
	int prev=-1;
	for (i=0; i<N; i++) {
	    int this;
	    init_dbt(&kbt); init_dbt(&vbt);
	    r = brt_cursor_get(cursor, &kbt, &vbt, DB_NEXT, null_db, null_txn);
	    assert(r==0);
	    assert(kbt.size==4 && vbt.size==4);
	    if (0) printf("%s:%d %02x%02x%02x%02x -> %02x%02x%02x%02x\n", __FILE__, __LINE__,
			  ((unsigned char*)kbt.data)[0], ((unsigned char*)kbt.data)[1], ((unsigned char*)kbt.data)[2], ((unsigned char*)kbt.data)[3],
			  ((unsigned char*)vbt.data)[0], ((unsigned char*)vbt.data)[1], ((unsigned char*)vbt.data)[2], ((unsigned char*)vbt.data)[3]);
	    this= ( (((unsigned char*)kbt.data)[3] << 24) +
		    (((unsigned char*)kbt.data)[2] << 16) +
		    (((unsigned char*)kbt.data)[1] <<  8) +
		    (((unsigned char*)kbt.data)[0] <<  0));
	    assert(prev<this);
	    prev=this;
	    assert(this==(int)i);
	    toku_cachetable_verify(ct);
	}

	r = close_brt(brt);
    }
    r = toku_cachetable_close(&ct); assert(r==0);
    memory_check_all_free();
}

int test_cursor_debug = 0;

int test_brt_cursor_keycompare(DB *db __attribute__((unused)), const DBT *a, const DBT *b) {
    return toku_keycompare(a->data, a->size, b->data, b->size);
}

void assert_cursor_notfound(BRT brt, int position, DB *db) {
    BRT_CURSOR cursor;
    int r;
    DBT kbt, vbt;

    r = brt_cursor(brt, &cursor);
    assert(r==0);

    init_dbt(&kbt); kbt.flags = DB_DBT_MALLOC;
    init_dbt(&vbt); vbt.flags = DB_DBT_MALLOC;
    r = brt_cursor_get(cursor, &kbt, &vbt, position, db, null_txn);
    assert(r == DB_NOTFOUND);

    r = brt_cursor_close(cursor);
    assert(r==0);
}

void assert_cursor_value(BRT brt, int position, long long value, DB *db) {
    BRT_CURSOR cursor;
    int r;
    DBT kbt, vbt;
    long long v;

    r = brt_cursor(brt, &cursor);
    assert(r==0);

    if (test_cursor_debug) printf("key: ");
    init_dbt(&kbt); kbt.flags = DB_DBT_MALLOC;
    init_dbt(&vbt); vbt.flags = DB_DBT_MALLOC;
    r = brt_cursor_get(cursor, &kbt, &vbt, position, db, null_txn);
    assert(r == 0);
    if (test_cursor_debug) printf("%s ", (char*)kbt.data);
    assert(vbt.size == sizeof v);
    memcpy(&v, vbt.data, vbt.size);
    assert(v == value);
    toku_free(kbt.data);
    toku_free(vbt.data);
    if (test_cursor_debug) printf("\n");

    r = brt_cursor_close(cursor);
    assert(r==0);
}

void assert_cursor_first_last(BRT brt, long long firstv, long long lastv, DB *db) {
    BRT_CURSOR cursor;
    int r;
    DBT kbt, vbt;
    long long v;

    r = brt_cursor(brt, &cursor);
    assert(r==0);

    if (test_cursor_debug) printf("first key: ");
    init_dbt(&kbt); kbt.flags = DB_DBT_MALLOC;
    init_dbt(&vbt); vbt.flags = DB_DBT_MALLOC;
    r = brt_cursor_get(cursor, &kbt, &vbt, DB_FIRST, db, null_txn);
    assert(r == 0);
    if (test_cursor_debug) printf("%s ", (char*)kbt.data);
    assert(vbt.size == sizeof v);
    memcpy(&v, vbt.data, vbt.size);
    assert(v == firstv);
    toku_free(kbt.data);
    toku_free(vbt.data);
    if (test_cursor_debug) printf("\n");

    if (test_cursor_debug) printf("last key:");
    init_dbt(&kbt); kbt.flags = DB_DBT_MALLOC;
    init_dbt(&vbt); vbt.flags = DB_DBT_MALLOC;
    r = brt_cursor_get(cursor, &kbt, &vbt, DB_LAST, db, null_txn);
    assert(r == 0);
    if (test_cursor_debug)printf("%s ", (char*)kbt.data);
    assert(vbt.size == sizeof v);
    memcpy(&v, vbt.data, vbt.size);
    assert(v == lastv);
    toku_free(kbt.data);
    toku_free(vbt.data);
    if (test_cursor_debug) printf("\n");

    r = brt_cursor_close(cursor);
    assert(r==0);
}

void test_brt_cursor_first(int n, DB *db) {
    const char *fname="testbrt.brt";
    CACHETABLE ct;
    BRT brt;
    int r;
    int i;

    printf("test_brt_cursor_first:%d %p\n", n, db);

    unlink(fname);

    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);
    assert(r==0);

    r = open_brt(fname, 0, 1, &brt, 1<<12, ct, null_txn, test_brt_cursor_keycompare);
    assert(r==0);

    /* insert a bunch of kv pairs */
    for (i=0; i<n; i++) {
        char key[8]; long long v;
        DBT kbt, vbt;

        snprintf(key, sizeof key, "%4.4d", i);
        fill_dbt(&kbt, key, strlen(key)+1);
        v = i;
        fill_dbt(&vbt, &v, sizeof v);
        r = brt_insert(brt, &kbt, &vbt, db, 0);
        assert(r==0);
    }

    if (n == 0)
        assert_cursor_notfound(brt, DB_FIRST, db);
    else
        assert_cursor_value(brt, DB_FIRST, 0, db);

    r = close_brt(brt);
    assert(r==0);

    r = toku_cachetable_close(&ct);
    assert(r==0);
}

void test_brt_cursor_last(int n, DB *db) {
    const char *fname="testbrt.brt";
    CACHETABLE ct;
    BRT brt;
    int r;
    int i;

    printf("test_brt_cursor_last:%d %p\n", n, db);

    unlink(fname);

    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);
    assert(r==0);

    r = open_brt(fname, 0, 1, &brt, 1<<12, ct, null_txn, test_brt_cursor_keycompare);
    assert(r==0);

    /* insert keys 0, 1, .. (n-1) */
    for (i=0; i<n; i++) {
        char key[8]; long long v;
        DBT kbt, vbt;

        snprintf(key, sizeof key, "%4.4d", i);
        fill_dbt(&kbt, key, strlen(key)+1);
        v = i;
        fill_dbt(&vbt, &v, sizeof v);
        r = brt_insert(brt, &kbt, &vbt, db, 0);
        assert(r==0);
    }

    if (n == 0)
        assert_cursor_notfound(brt, DB_LAST, db);
    else
        assert_cursor_value(brt, DB_LAST, n-1, db);

    r = close_brt(brt);
    assert(r==0);

    r = toku_cachetable_close(&ct);
    assert(r==0);
}

void test_brt_cursor_first_last(int n, DB *db) {
    const char *fname="testbrt.brt";
    CACHETABLE ct;
    BRT brt;
    int r;
    int i;

    printf("test_brt_cursor_first_last:%d %p\n", n, db);

    unlink(fname);

    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);
    assert(r==0);

    r = open_brt(fname, 0, 1, &brt, 1<<12, ct, null_txn, test_brt_cursor_keycompare);
    assert(r==0);

    /* insert a bunch of kv pairs */
    for (i=0; i<n; i++) {
        char key[8]; long long v;
        DBT kbt, vbt;

        snprintf(key, sizeof key, "%4.4d", i);
        fill_dbt(&kbt, key, strlen(key)+1);
        v = i;
        fill_dbt(&vbt, &v, sizeof v);

        r = brt_insert(brt, &kbt, &vbt, db, 0);
        assert(r==0);
    }

    if (n == 0) {
        assert_cursor_notfound(brt, DB_FIRST, db);
        assert_cursor_notfound(brt, DB_LAST, db);
    } else
        assert_cursor_first_last(brt, 0, n-1, db);

    r = close_brt(brt);
    assert(r==0);

    r = toku_cachetable_close(&ct);
    assert(r==0);


}

void test_brt_cursor_rfirst(int n, DB *db) {
    const char *fname="testbrt.brt";
    CACHETABLE ct;
    BRT brt;
    int r;
    int i;

    printf("test_brt_cursor_rfirst:%d %p\n", n, db);

    unlink(fname);

    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);
    assert(r==0);

    r = open_brt(fname, 0, 1, &brt, 1<<12, ct, null_txn, test_brt_cursor_keycompare);
    assert(r==0);

    /* insert keys n-1, n-2, ... , 0 */
    for (i=n-1; i>=0; i--) {
        char key[8]; long long v;
        DBT kbt, vbt;


        snprintf(key, sizeof key, "%4.4d", i);
        fill_dbt(&kbt, key, strlen(key)+1);
        v = i;
        fill_dbt(&vbt, &v, sizeof v);
        r = brt_insert(brt, &kbt, &vbt, db, 0);
        assert(r==0);
    }

    if (n == 0)
        assert_cursor_notfound(brt, DB_FIRST, db);
    else
        assert_cursor_value(brt, DB_FIRST, 0, db);

    r = close_brt(brt);
    assert(r==0);

    r = toku_cachetable_close(&ct);
    assert(r==0);
}

void assert_cursor_walk(BRT brt, int n, DB *db) {
    BRT_CURSOR cursor;
    int i;
    int r;

    r = brt_cursor(brt, &cursor);
    assert(r==0);

    if (test_cursor_debug) printf("key: ");
    for (i=0; ; i++) {
        DBT kbt, vbt;
        long long v;

        init_dbt(&kbt); kbt.flags = DB_DBT_MALLOC;
        init_dbt(&vbt); vbt.flags = DB_DBT_MALLOC;
        r = brt_cursor_get(cursor, &kbt, &vbt, DB_NEXT, db, null_txn);
        if (r != 0)
            break;
        if (test_cursor_debug) printf("%s ", (char*)kbt.data);
        assert(vbt.size == sizeof v);
        memcpy(&v, vbt.data, vbt.size);
        assert(v == i);
        toku_free(kbt.data);
        toku_free(vbt.data);
    }
    if (test_cursor_debug) printf("\n");
    assert(i == n);

    r = brt_cursor_close(cursor);
    assert(r==0);
}

void test_brt_cursor_walk(int n, DB *db) {
    const char *fname="testbrt.brt";
    CACHETABLE ct;
    BRT brt;
    int r;
    int i;

    printf("test_brt_cursor_walk:%d %p\n", n, db);

    unlink(fname);

    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);
    assert(r==0);

    r = open_brt(fname, 0, 1, &brt, 1<<12, ct, null_txn, test_brt_cursor_keycompare);
    assert(r==0);

    /* insert a bunch of kv pairs */
    for (i=0; i<n; i++) {
        char key[8]; long long v;
        DBT kbt, vbt;

        snprintf(key, sizeof key, "%4.4d", i);
        fill_dbt(&kbt, key, strlen(key)+1);
        v = i;
        fill_dbt(&vbt, &v, sizeof v);
        r = brt_insert(brt, &kbt, &vbt, db, 0);
        assert(r==0);
    }

    /* walk the tree */
    assert_cursor_walk(brt, n, db);

    r = close_brt(brt);
    assert(r==0);

    r = toku_cachetable_close(&ct);
    assert(r==0);

}

void assert_cursor_rwalk(BRT brt, int n, DB *db) {
    BRT_CURSOR cursor;
    int i;
    int r;

    r = brt_cursor(brt, &cursor);
    assert(r==0);

    if (test_cursor_debug) printf("key: ");
    for (i=n-1; ; i--) {
        DBT kbt, vbt;
        long long v;

        init_dbt(&kbt); kbt.flags = DB_DBT_MALLOC;
        init_dbt(&vbt); vbt.flags = DB_DBT_MALLOC;
        r = brt_cursor_get(cursor, &kbt, &vbt, DB_PREV, db, null_txn);
        if (r != 0)
            break;
        if (test_cursor_debug) printf("%s ", (char*)kbt.data);
        assert(vbt.size == sizeof v);
        memcpy(&v, vbt.data, vbt.size);
        assert(v == i);
        toku_free(kbt.data);
        toku_free(vbt.data);
    }
    if (test_cursor_debug) printf("\n");
    assert(i == -1);

    r = brt_cursor_close(cursor);
    assert(r==0);
}

void test_brt_cursor_rwalk(int n, DB *db) {
    const char *fname="testbrt.brt";
    CACHETABLE ct;
    BRT brt;
    int r;
    int i;

    printf("test_brt_cursor_rwalk:%d %p\n", n, db);

    unlink(fname);

    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);
    assert(r==0);

    r = open_brt(fname, 0, 1, &brt, 1<<12, ct, null_txn, test_brt_cursor_keycompare);
    assert(r==0);

    /* insert a bunch of kv pairs */
    for (i=0; i<n; i++) {
        int k; long long v;
        DBT kbt, vbt;

        k = htonl(i);
        fill_dbt(&kbt, &k, sizeof k);
        v = i;
        fill_dbt(&vbt, &v, sizeof v);
        r = brt_insert(brt, &kbt, &vbt, db, 0);
        assert(r==0);
    }

    /* walk the tree */
    assert_cursor_rwalk(brt, n, db);

    r = close_brt(brt);
    assert(r==0);

    r = toku_cachetable_close(&ct);
    assert(r==0);

}

void assert_cursor_walk_inorder(BRT brt, int n, DB *db) {
    BRT_CURSOR cursor;
    int i;
    int r;
    char *prevkey;

    r = brt_cursor(brt, &cursor);
    assert(r==0);

    prevkey = 0;
    if (test_cursor_debug) printf("key: ");
    for (i=0; ; i++) {
        DBT kbt, vbt;
        long long v;

        init_dbt(&kbt); kbt.flags = DB_DBT_MALLOC;
        init_dbt(&vbt); vbt.flags = DB_DBT_MALLOC;
        r = brt_cursor_get(cursor, &kbt, &vbt, DB_NEXT, db, null_txn);
        if (r != 0)
            break;
        if (test_cursor_debug) printf("%s ", (char*)kbt.data);
        assert(vbt.size == sizeof v);
        memcpy(&v, vbt.data, vbt.size);
        if (i != 0) {
	    assert(strcmp(prevkey, kbt.data) < 0);
	    toku_free(prevkey);
	}
        prevkey = kbt.data;
        toku_free(vbt.data);
    }
    if (prevkey) toku_free(prevkey);
    if (test_cursor_debug) printf("\n");
    assert(i == n);

    r = brt_cursor_close(cursor);
    assert(r==0);
}

void test_brt_cursor_rand(int n, DB *db) {
    const char *fname="testbrt.brt";
    CACHETABLE ct;
    BRT brt;
    int r;
    int i;

    printf("test_brt_cursor_rand:%d %p\n", n, db);

    unlink(fname);

    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);
    assert(r==0);

    r = open_brt(fname, 0, 1, &brt, 1<<12, ct, null_txn, test_brt_cursor_keycompare);
    assert(r==0);

    /* insert a bunch of kv pairs */
    for (i=0; i<n; i++) {
        char key[8]; long long v;
        DBT kbt, vbt;

        for (;;) {
	    v = ((long long) random() << 32) + random();
	    snprintf(key, sizeof key, "%lld", v);
	    fill_dbt(&kbt, key, strlen(key)+1);
	    v = i;
	    fill_dbt(&vbt, &v, sizeof v);
	    r = brt_lookup(brt, &kbt, &vbt, db);
	    if (r == 0) {
                printf("dup");
                continue;
	    }
	    r = brt_insert(brt, &kbt, &vbt, db, 0);
	    assert(r==0);
	    break;
        }
    }

    /* walk the tree */
    assert_cursor_walk_inorder(brt, n, db);

    r = close_brt(brt);
    assert(r==0);

    r = toku_cachetable_close(&ct);
    assert(r==0);

}

void test_brt_cursor_split(int n, DB *db) {
    const char *fname="testbrt.brt";
    CACHETABLE ct;
    BRT brt;
    BRT_CURSOR cursor;
    int r;
    int keyseqnum;
    int i;
    DBT kbt, vbt;

    printf("test_brt_cursor_split:%d %p\n", n, db);

    unlink(fname);

    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);
    assert(r==0);

    r = open_brt(fname, 0, 1, &brt, 1<<12, ct, null_txn, test_brt_cursor_keycompare);
    assert(r==0);

    /* insert a bunch of kv pairs */
    for (keyseqnum=0; keyseqnum < n/2; keyseqnum++) {
        char key[8]; long long v;

        snprintf(key, sizeof key, "%4.4d", keyseqnum);
        fill_dbt(&kbt, key, strlen(key)+1);
        v = keyseqnum;
        fill_dbt(&vbt, &v, sizeof v);
        r = brt_insert(brt, &kbt, &vbt, db, 0);
        assert(r==0);
    }

    r = brt_cursor(brt, &cursor);
    assert(r==0);

    if (test_cursor_debug) printf("key: ");
    for (i=0; i<n/2; i++) {
        init_dbt(&kbt); kbt.flags = DB_DBT_MALLOC;
        init_dbt(&vbt); vbt.flags = DB_DBT_MALLOC;
        r = brt_cursor_get(cursor, &kbt, &vbt, DB_NEXT, db, null_txn);
        assert(r==0);
        if (test_cursor_debug) printf("%s ", (char*)kbt.data);
        toku_free(kbt.data);
        toku_free(vbt.data);
    }
    if (test_cursor_debug) printf("\n");

    for (; keyseqnum<n; keyseqnum++) {
        char key[8]; long long v;

        snprintf(key, sizeof key, "%4.4d", keyseqnum);
        fill_dbt(&kbt, key, strlen(key)+1);
        v = keyseqnum;
        fill_dbt(&vbt, &v, sizeof v);
        r = brt_insert(brt, &kbt, &vbt, db, 0);
        assert(r==0);
    }

    if (test_cursor_debug) printf("key: ");
    for (;;) {
        init_dbt(&kbt); kbt.flags = DB_DBT_MALLOC;
        init_dbt(&vbt); vbt.flags = DB_DBT_MALLOC;
        r = brt_cursor_get(cursor, &kbt, &vbt, DB_NEXT, db, null_txn);
        if (r != 0)
            break;
        if (test_cursor_debug) printf("%s ", (char*)kbt.data);
        toku_free(kbt.data);
        toku_free(vbt.data);
    }
    if (test_cursor_debug) printf("\n");

    r = brt_cursor_close(cursor);
    assert(r==0);

    r = close_brt(brt);
    assert(r==0);

    r = toku_cachetable_close(&ct);
    assert(r==0);
}

void test_multiple_brt_cursors(int n, DB *db) {
    printf("test_multiple_brt_cursors:%d %p\n", n, db);

    int r;
    char fname[]="testbrt.brt";
    CACHETABLE ct;
    BRT brt;
    BRT_CURSOR cursors[n];

    unlink(fname);

    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);
    assert(r==0);

    r = open_brt(fname, 0, 1, &brt, 1<<12, ct, null_txn, test_brt_cursor_keycompare);
    assert(r==0);

    int i;
    for (i=0; i<n; i++) {
        r = brt_cursor(brt, &cursors[i]);
        assert(r == 0);
    }

    for (i=0; i<n; i++) {
        r = brt_cursor_close(cursors[i]);
        assert(r == 0);
    }

    r = close_brt(brt);
    assert(r==0);

    r = toku_cachetable_close(&ct);
    assert(r==0);
}

static int log16(int n) {
    int r = 0;
    int b = 1;
    while (b < n) {
        b *= 16;
        r += 1;
    }
    return r;
}

void test_multiple_brt_cursor_walk(int n, DB *db) {
    printf("test_multiple_brt_cursor_walk:%d %p\n", n, db);

    int r;
    char fname[]="testbrt.brt";
    CACHETABLE ct;
    BRT brt;
    const int cursor_gap = 1000;
    const int ncursors = n/cursor_gap;
    BRT_CURSOR cursors[ncursors];

    unlink(fname);

    int nodesize = 1<<12;
    int h = log16(n);
    int cachesize = 2 * h * ncursors * nodesize;
    r = brt_create_cachetable(&ct, cachesize, ZERO_LSN, NULL_LOGGER);
    assert(r==0);

    r = open_brt(fname, 0, 1, &brt, 1<<12, ct, null_txn, test_brt_cursor_keycompare);
    assert(r==0);

    int c;
    /* create the cursors */
    for (c=0; c<ncursors; c++) {
        r = brt_cursor(brt, &cursors[c]);
        assert(r == 0);
    }

    DBT key, val;
    int k, v;

    /* insert keys 0, 1, 2, ... n-1 */
    int i;
    for (i=0; i<n; i++) {
        k = htonl(i);
        v = i;
        fill_dbt(&key, &k, sizeof k);
        fill_dbt(&val, &v, sizeof v);
        r = brt_insert(brt, &key, &val, db, 0);
        assert(r == 0);

        /* point cursor i / cursor_gap to the current last key i */
        if ((i % cursor_gap) == 0) {
            c = i / cursor_gap;
            init_dbt(&key); key.flags = DB_DBT_MALLOC;
            init_dbt(&val); val.flags = DB_DBT_MALLOC;
            r = brt_cursor_get(cursors[c], &key, &val, DB_LAST, db, null_txn);
            assert(r == 0);
            toku_free(key.data);
            toku_free(val.data);
        }
    }

    /* walk the cursors by cursor_gap */
    for (i=0; i<cursor_gap; i++) {
        for (c=0; c<ncursors; c++) {
            init_dbt(&key); key.flags = DB_DBT_MALLOC;
            init_dbt(&val); val.flags = DB_DBT_MALLOC;
            r = brt_cursor_get(cursors[c], &key, &val, DB_NEXT, db, null_txn);
            if (r == DB_NOTFOUND) {
                /* we already consumed 1 previously */
                assert(i == cursor_gap-1);
            } else {
                assert(r == 0);
                int vv;
                assert(val.size == sizeof vv);
                memcpy(&vv, val.data, val.size);
                assert(vv == c*cursor_gap + i + 1);
                toku_free(key.data);
                toku_free(val.data);
            }
        }
    }

    for (i=0; i<ncursors; i++) {
        r = brt_cursor_close(cursors[i]);
        assert(r == 0);
    }

    r = close_brt(brt);
    assert(r==0);

    r = toku_cachetable_close(&ct);
    assert(r==0);
}

void test_brt_cursor_set(int n, int cursor_op, DB *db) {
    printf("test_brt_cursor_set:%d %d %p\n", n, cursor_op, db);

    int r;
    char fname[]="testbrt.brt";
    CACHETABLE ct;
    BRT brt;
    BRT_CURSOR cursor;

    unlink(fname);

    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);
    assert(r==0);

    r = open_brt(fname, 0, 1, &brt, 1<<12, ct, null_txn, test_brt_cursor_keycompare);
    assert(r==0);

    int i;
    DBT key, val;
    int k, v;

    /* insert keys 0, 10, 20 .. 10*(n-1) */
    for (i=0; i<n; i++) {
        k = htonl(10*i);
        v = 10*i;
        fill_dbt(&key, &k, sizeof k);
        fill_dbt(&val, &v, sizeof v);
        r = brt_insert(brt, &key, &val, db, 0);
        assert(r == 0);
    }

    r = brt_cursor(brt, &cursor);
    assert(r==0);

    /* set cursor to random keys in set { 0, 10, 20, .. 10*(n-1) } */
    for (i=0; i<n; i++) {
        int vv;

        v = 10*(random() % n);
        k = htonl(v);
        fill_dbt(&key, &k, sizeof k);
        init_dbt(&val); val.flags = DB_DBT_MALLOC;
        r = brt_cursor_get(cursor, &key, &val, cursor_op, db, null_txn);
        assert(r == 0);
        assert(val.size == sizeof vv);
        memcpy(&vv, val.data, val.size);
        assert(vv == v);
        toku_free(val.data);
    }

    /* try to set cursor to keys not in the tree, all should fail */
    for (i=0; i<10*n; i++) {
        if (i % 10 == 0)
            continue;
        k = htonl(i);
        fill_dbt(&key, &k, sizeof k);
        init_dbt(&val); val.flags = DB_DBT_MALLOC;
        r = brt_cursor_get(cursor, &key, &val, DB_SET, db, null_txn);
        assert(r == DB_NOTFOUND);
    }

    r = brt_cursor_close(cursor);
    assert(r==0);

    r = close_brt(brt);
    assert(r==0);

    r = toku_cachetable_close(&ct);
    assert(r==0);
}

void test_brt_cursor_set_range(int n, DB *db) {
    printf("test_brt_cursor_set_range:%d %p\n", n, db);

    int r;
    char fname[]="testbrt.brt";
    CACHETABLE ct;
    BRT brt;
    BRT_CURSOR cursor;

    unlink(fname);

    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);
    assert(r==0);

    r = open_brt(fname, 0, 1, &brt, 1<<12, ct, null_txn, test_brt_cursor_keycompare);
    assert(r==0);

    int i;
    DBT key, val;
    int k, v;

    /* insert keys 0, 10, 20 .. 10*(n-1) */
    int max_key = 10*(n-1);
    for (i=0; i<n; i++) {
        k = htonl(10*i);
        v = 10*i;
        fill_dbt(&key, &k, sizeof k);
        fill_dbt(&val, &v, sizeof v);
        r = brt_insert(brt, &key, &val, db, 0);
        assert(r == 0);
    }

    r = brt_cursor(brt, &cursor);
    assert(r==0);

    /* pick random keys v in 0 <= v < 10*n, the cursor should point
       to the smallest key in the tree that is >= v */
    for (i=0; i<n; i++) {
        int vv;

        v = random() % (10*n);
        k = htonl(v);
        fill_dbt(&key, &k, sizeof k);
        init_dbt(&val); val.flags = DB_DBT_MALLOC;
        r = brt_cursor_get(cursor, &key, &val, DB_SET_RANGE, db, null_txn);
        if (v > max_key)
            /* there is no smallest key if v > the max key */
            assert(r == DB_NOTFOUND);
        else {
            assert(r == 0);
            assert(val.size == sizeof vv);
            memcpy(&vv, val.data, val.size);
            assert(vv == (((v+9)/10)*10));
            toku_free(val.data);
        }
    }

    r = brt_cursor_close(cursor);
    assert(r==0);

    r = close_brt(brt);
    assert(r==0);

    r = toku_cachetable_close(&ct);
    assert(r==0);
}

void test_brt_cursor_delete(int n, DB *db) {
    printf("test_brt_cursor_delete:%d %p\n", n, db);

    int error;
    char fname[]="testbrt.brt";
    CACHETABLE ct;
    BRT brt;
    BRT_CURSOR cursor;

    unlink(fname);

    error = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);
    assert(error == 0);

    error = open_brt(fname, 0, 1, &brt, 1<<12, ct, null_txn, test_brt_cursor_keycompare);
    assert(error == 0);

    error = brt_cursor(brt, &cursor);
    assert(error == 0);

    DBT key, val;
    int k, v;

    int i;
    /* insert keys 0, 1, 2, .. (n-1) */
    for (i=0; i<n; i++) {
        k = htonl(i);
        v = i;
        fill_dbt(&key, &k, sizeof k);
        fill_dbt(&val, &v, sizeof v);
        error = brt_insert(brt, &key, &val, db, 0);
        assert(error == 0);
    }

    /* walk the tree and delete under the cursor */
    for (;;) {
        init_dbt(&key); key.flags = DB_DBT_MALLOC;
        init_dbt(&val); val.flags = DB_DBT_MALLOC;
        error = brt_cursor_get(cursor, &key, &val, DB_NEXT, db, null_txn);
        if (error == DB_NOTFOUND)
            break;
        assert(error == 0);
        toku_free(key.data);
        toku_free(val.data);

        error = brt_cursor_delete(cursor, 0);
        assert(error == 0);
    }

    error = brt_cursor_delete(cursor, 0);
    assert(error != 0);

    error = brt_cursor_close(cursor);
    assert(error == 0);

    error = close_brt(brt);
    assert(error == 0);

    error = toku_cachetable_close(&ct);
    assert(error == 0);
}

void test_brt_cursor_get_both(int n, DB *db) {
    printf("test_brt_cursor_get_both:%d %p\n", n, db);

    int error;
    char fname[]="testbrt.brt";
    CACHETABLE ct;
    BRT brt;
    BRT_CURSOR cursor;

    unlink(fname);

    error = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);
    assert(error == 0);

    error = open_brt(fname, 0, 1, &brt, 1<<12, ct, null_txn, test_brt_cursor_keycompare);
    assert(error == 0);

    error = brt_cursor(brt, &cursor);
    assert(error == 0);

    DBT key, val;
    int k, v;

    /* verify get_both on an empty tree fails */
    k = htonl(n+1);
    v = n+1;
    fill_dbt(&key, &k, sizeof k);
    fill_dbt(&val, &v, sizeof v);
    error = brt_cursor_get(cursor, &key, &val, DB_GET_BOTH, db, null_txn);
    assert(error == DB_NOTFOUND);

    int i;
    /* insert keys 0, 1, 2, .. (n-1) */
    for (i=0; i<n; i++) {
        k = htonl(i);
        v = i;
        fill_dbt(&key, &k, sizeof k);
        fill_dbt(&val, &v, sizeof v);
        error = brt_insert(brt, &key, &val, db, 0);
        assert(error == 0);
    }

    /* verify that keys not in the tree fail */
    k = htonl(n+1);
    v = n-1;
    fill_dbt(&key, &k, sizeof k);
    fill_dbt(&val, &v, sizeof v);
    error = brt_cursor_get(cursor, &key, &val, DB_GET_BOTH, db, null_txn);
    assert(error == DB_NOTFOUND);

    /* verify that key match but data mismatch fails */
    for (i=0; i<n; i++) {
        k = htonl(i);
        v = i+1;
        fill_dbt(&key, &k, sizeof k);
        fill_dbt(&val, &v, sizeof v);
        error = brt_cursor_get(cursor, &key, &val, DB_GET_BOTH, db, null_txn);
        assert(error == DB_NOTFOUND);
    }

    /* verify that key and data matches succeeds */
    for (i=0; i<n; i++) {
        k = htonl(i);
        v = i;
        fill_dbt(&key, &k, sizeof k);
        fill_dbt(&val, &v, sizeof v);
        error = brt_cursor_get(cursor, &key, &val, DB_GET_BOTH, db, null_txn);
        assert(error == 0);
#ifdef DB_CURRENT
        init_dbt(&key); key.flags = DB_DBT_MALLOC;
        init_dbt(&val); val.flags = DB_DBT_MALLOC;
        error = brt_cursor_get(cursor, &key, &val, DB_CURRENT, 0);
        assert(error == 0);
        int vv;
        assert(val.size == sizeof vv);
        memcpy(&vv, val.data, val.size);
        assert(vv == i);
        toku_free(key.data);
        toku_free(val.data);
#endif
        error = brt_cursor_delete(cursor, 0);
        assert(error == 0);

        k = htonl(i);
        v = i;
        fill_dbt(&key, &k, sizeof k);
        fill_dbt(&val, &v, sizeof v);
        error = brt_cursor_get(cursor, &key, &val, DB_GET_BOTH, db, null_txn);
        assert(error == DB_NOTFOUND);
    }

    error = brt_cursor_delete(cursor, 0);
    assert(error != 0);

    error = brt_cursor_close(cursor);
    assert(error == 0);

    error = close_brt(brt);
    assert(error == 0);

    error = toku_cachetable_close(&ct);
    assert(error == 0);
}


extern int brt_do_push_cmd;

int test_brt_cursor_inc = 1000;
int test_brt_cursor_limit = 10000;

void test_brt_cursor(DB *db) {
    int n;

    test_multiple_brt_cursors(1, db);
    test_multiple_brt_cursors(2, db);
    test_multiple_brt_cursors(3, db);

    for (n=0; n<test_brt_cursor_limit; n += test_brt_cursor_inc) {
        test_brt_cursor_first(n, db); memory_check_all_free();
     }
    for (n=0; n<test_brt_cursor_limit; n += test_brt_cursor_inc) {
        test_brt_cursor_rfirst(n, db); memory_check_all_free();
    }
    for (n=0; n<test_brt_cursor_limit; n += test_brt_cursor_inc) {
        test_brt_cursor_walk(n, db); memory_check_all_free();
    }
    for (n=0; n<test_brt_cursor_limit; n += test_brt_cursor_inc) {
        test_brt_cursor_last(n, db); memory_check_all_free();
    }
    for (n=0; n<test_brt_cursor_limit; n += test_brt_cursor_inc) {
        test_brt_cursor_first_last(n, db); memory_check_all_free();
    }
    for (n=0; n<test_brt_cursor_limit; n += test_brt_cursor_inc) {
        test_brt_cursor_split(n, db); memory_check_all_free();
    }
    for (n=0; n<test_brt_cursor_limit; n += test_brt_cursor_inc) {
        test_brt_cursor_rand(n, db); memory_check_all_free();
    }
    for (n=0; n<test_brt_cursor_limit; n += test_brt_cursor_inc) {
        test_brt_cursor_rwalk(n, db); memory_check_all_free();
    }

    test_brt_cursor_set(1000, DB_SET, db); memory_check_all_free();
    test_brt_cursor_set(10000, DB_SET, db); memory_check_all_free();
    test_brt_cursor_set(1000, DB_SET_RANGE, db); memory_check_all_free();
    test_brt_cursor_set_range(1000, db); memory_check_all_free();
    test_brt_cursor_set_range(10000, db); memory_check_all_free();


    test_brt_cursor_delete(1000, db); memory_check_all_free();
    test_multiple_brt_cursor_walk(10000, db); memory_check_all_free();
    test_multiple_brt_cursor_walk(100000, db); memory_check_all_free();
    test_brt_cursor_get_both(1000, db); memory_check_all_free();
}

void test_large_kv(int bsize, int ksize, int vsize) {
    BRT t;
    int r;
    CACHETABLE ct;
    char fname[]="testbrt.brt";

    printf("test_large_kv: %d %d %d\n", bsize, ksize, vsize);

    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);
    assert(r==0);
    unlink(fname);
    r = open_brt(fname, 0, 1, &t, bsize, ct, null_txn, toku_default_compare_fun);
    assert(r==0);

    DBT key, val;
    char *k, *v;
    k = toku_malloc(ksize); assert(k); memset(k, 0, ksize);
    v = toku_malloc(vsize); assert(v); memset(v, 0, vsize);
    fill_dbt(&key, k, ksize);
    fill_dbt(&val, v, vsize);

    r = brt_insert(t, &key, &val, 0, 0);
    assert(r == 0);

    toku_free(k);
    toku_free(v);

    r = close_brt(t);              assert(r==0);
    r = toku_cachetable_close(&ct);     assert(r==0);
}

/*
 * test the key and value limits
 * the current implementation crashes when kvsize == bsize/2 rather than fails
 */
void test_brt_limits() {
    int bsize = 1024;
    int kvsize = 4;
    while (kvsize < bsize/2) {
        test_large_kv(bsize, kvsize, kvsize);        memory_check_all_free();
        kvsize *= 2;
    }
}

/*
 * verify that a delete on an empty tree fails
 */
void test_brt_delete_empty() {
    printf("test_brt_delete_empty\n");

    BRT t;
    int r;
    CACHETABLE ct;
    char fname[]="testbrt.brt";

    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);
    assert(r==0);
    unlink(fname);
    r = open_brt(fname, 0, 1, &t, 4096, ct, null_txn, toku_default_compare_fun);
    assert(r==0);

    DBT key;
    int k = htonl(1);
    fill_dbt(&key, &k, sizeof k);
    r = brt_delete(t, &key, 0);
    assert(r == 0);

    r = close_brt(t);              assert(r==0);
    r = toku_cachetable_close(&ct);     assert(r==0);
}

/*
 * insert n keys, delete all n keys, verify that lookups for all the keys fail,
 * verify that a cursor walk of the tree finds nothing
 */
void test_brt_delete_present(int n) {
    printf("test_brt_delete_present:%d\n", n);

    BRT t;
    int r;
    CACHETABLE ct;
    char fname[]="testbrt.brt";
    int i;

    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);
    assert(r==0);
    unlink(fname);
    r = open_brt(fname, 0, 1, &t, 4096, ct, null_txn, toku_default_compare_fun);
    assert(r==0);

    DBT key, val;
    int k, v;

    /* insert 0 .. n-1 */
    for (i=0; i<n; i++) {
        k = htonl(i); v = i;
        fill_dbt(&key, &k, sizeof k);
        fill_dbt(&val, &v, sizeof v);
        r = brt_insert(t, &key, &val, 0, 0);
        assert(r == 0);
    }

    /* delete 0 .. n-1 */
    for (i=0; i<n; i++) {
        k = htonl(i);
        fill_dbt(&key, &k, sizeof k);
        r = brt_delete(t, &key, 0);
        assert(r == 0);
    }

    /* lookups should all fail */
    for (i=0; i<n; i++) {
        k = htonl(i);
        fill_dbt(&key, &k, sizeof k);
        init_dbt(&val); val.flags = DB_DBT_MALLOC;
        r = brt_lookup(t, &key, &val, 0);
        assert(r == DB_NOTFOUND);
    }

    /* cursor should not find anything */
    BRT_CURSOR cursor;

    r = brt_cursor(t, &cursor);
    assert(r == 0);

    init_dbt(&key); key.flags = DB_DBT_MALLOC;
    init_dbt(&val); val.flags = DB_DBT_MALLOC;
    r = brt_cursor_get(cursor, &key, &val, DB_FIRST, null_db, null_txn);
    assert(r != 0);

    r = brt_cursor_close(cursor);
    assert(r == 0);

    r = close_brt(t);              assert(r==0);
    r = toku_cachetable_close(&ct);     assert(r==0);
}

void test_brt_delete_not_present(int n) {
    printf("test_brt_delete_not_present:%d\n", n);

    BRT t;
    int r;
    CACHETABLE ct;
    char fname[]="testbrt.brt";
    int i;

    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);
    assert(r==0);
    unlink(fname);
    r = open_brt(fname, 0, 1, &t, 4096, ct, null_txn, toku_default_compare_fun);
    assert(r==0);

    DBT key, val;
    int k, v;

    /* insert 0 .. n-1 */
    for (i=0; i<n; i++) {
        k = htonl(i); v = i;
        fill_dbt(&key, &k, sizeof k);
        fill_dbt(&val, &v, sizeof v);
        r = brt_insert(t, &key, &val, 0, 0);
        assert(r == 0);
    }

    /* delete 0 .. n-1 */
    for (i=0; i<n; i++) {
        k = htonl(i);
        fill_dbt(&key, &k, sizeof k);
        r = brt_delete(t, &key, 0);
        assert(r == 0);
    }

    /* try to delete key n+1 not in the tree */
    k = htonl(n+1);
    fill_dbt(&key, &k, sizeof k);
    r = brt_delete(t, &key, 0);
    /* the delete may be buffered or may be executed on a leaf node, so the
       return value depends */
    printf("brt_delete k=%d %d\n", k, r);

    r = close_brt(t);              assert(r==0);
    r = toku_cachetable_close(&ct);     assert(r==0);
}

void test_brt_delete_cursor_first(int n) {
    printf("test_brt_delete_cursor_first:%d\n", n);

    BRT t;
    int r;
    CACHETABLE ct;
    char fname[]="testbrt.brt";
    int i;

    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);
    assert(r==0);
    unlink(fname);
    r = open_brt(fname, 0, 1, &t, 4096, ct, null_txn, toku_default_compare_fun);
    assert(r==0);

    DBT key, val;
    int k, v;

    /* insert 0 .. n-1 */
    for (i=0; i<n; i++) {
        k = htonl(i); v = i;
        fill_dbt(&key, &k, sizeof k);
        fill_dbt(&val, &v, sizeof v);
        r = brt_insert(t, &key, &val, 0, 0);
        assert(r == 0);
    }

    /* lookups 0 .. n-1 should succeed */
    for (i=0; i<n; i++) {
        k = htonl(i);
        fill_dbt(&key, &k, sizeof k);
        init_dbt(&val); val.flags = DB_DBT_MALLOC;
        r = brt_lookup(t, &key, &val, 0);
        assert(r == 0);
        assert(val.size == sizeof (int));
        int vv;
        memcpy(&vv, val.data, val.size);
        assert(vv == i);
        toku_free(val.data);
    }

    /* delete 0 .. n-2 */
    for (i=0; i<n-1; i++) {
        k = htonl(i);
        fill_dbt(&key, &k, sizeof k);
        r = brt_delete(t, &key, 0);
        assert(r == 0);

        init_dbt(&val); val.flags = DB_DBT_MALLOC;
        r = brt_lookup(t, &key, &val, 0);
        assert(r == DB_NOTFOUND);
    }

    /* lookup of 0 .. n-2 should all fail */
    for (i=0; i<n-1; i++) {
        k = htonl(i);
        fill_dbt(&key, &k, sizeof k);
        init_dbt(&val); val.flags = DB_DBT_MALLOC;
        r = brt_lookup(t, &key, &val, 0);
        assert(r == DB_NOTFOUND);
    }

    /* cursor should find the last key: n-1 */
    BRT_CURSOR cursor;

    r = brt_cursor(t, &cursor);
    assert(r == 0);

    init_dbt(&key); key.flags = DB_DBT_MALLOC;
    init_dbt(&val); val.flags = DB_DBT_MALLOC;
    r = brt_cursor_get(cursor, &key, &val, DB_FIRST, null_db, null_txn);
    assert(r == 0);
    int vv;
    assert(val.size == sizeof vv);
    memcpy(&vv, val.data, val.size);
    assert(vv == n-1);
    toku_free(key.data);
    toku_free(val.data);

    r = brt_cursor_close(cursor);
    assert(r == 0);

    r = close_brt(t);              assert(r==0);
    r = toku_cachetable_close(&ct);     assert(r==0);
}

/* test for bug: insert cmd in a nonleaf node, delete removes the
   insert cmd, but lookup finds the insert cmd

   build a 2 level tree, and expect the last insertion to be
   buffered. then delete and lookup. */

void test_insert_delete_lookup(int n) {
    printf("test_insert_delete_lookup:%d\n", n);

    BRT t;
    int r;
    CACHETABLE ct;
    char fname[]="testbrt.brt";
    int i;

    r = brt_create_cachetable(&ct, 0, ZERO_LSN, NULL_LOGGER);
    assert(r==0);
    unlink(fname);
    r = open_brt(fname, 0, 1, &t, 4096, ct, null_txn, toku_default_compare_fun);
    assert(r==0);

    DBT key, val;
    int k, v;

    /* insert 0 .. n-1 */
    for (i=0; i<n; i++) {
        k = htonl(i); v = i;
        fill_dbt(&key, &k, sizeof k);
        fill_dbt(&val, &v, sizeof v);
        r = brt_insert(t, &key, &val, 0, 0);
        assert(r == 0);
    }

    if (n > 0) {
        k = htonl(n-1);
        fill_dbt(&key, &k, sizeof k);
        r = brt_delete(t, &key, 0);
        assert(r == 0);

        k = htonl(n-1);
        fill_dbt(&key, &k, sizeof k);
        init_dbt(&val); val.flags = DB_DBT_MALLOC;
        r = brt_lookup(t, &key, &val, 0);
        assert(r == DB_NOTFOUND);
    }

    r = close_brt(t);              assert(r==0);
    r = toku_cachetable_close(&ct);     assert(r==0);
}

void test_brt_delete() {
    test_brt_delete_empty(); memory_check_all_free();
    test_brt_delete_present(1); memory_check_all_free();
    test_brt_delete_present(100); memory_check_all_free();
    test_brt_delete_present(500); memory_check_all_free();
    test_brt_delete_not_present(1); memory_check_all_free();
    test_brt_delete_not_present(100); memory_check_all_free();
    test_brt_delete_not_present(500); memory_check_all_free();
    test_brt_delete_cursor_first(1); memory_check_all_free();
    test_brt_delete_cursor_first(100); memory_check_all_free();
    test_brt_delete_cursor_first(500); memory_check_all_free();
    test_brt_delete_cursor_first(10000); memory_check_all_free();
    test_insert_delete_lookup(512); memory_check_all_free();
}

static void brt_blackbox_test (void) {
    memory_check = 1;

    test_wrongendian_compare(0, 2);          memory_check_all_free();
    test_wrongendian_compare(1, 2);          memory_check_all_free();
    test_wrongendian_compare(1, 257);        memory_check_all_free();
    test_wrongendian_compare(1, 1000);        memory_check_all_free();
    test_read_what_was_written();         memory_check_all_free(); printf("did read_what_was_written\n");
    test_cursor_next();                   memory_check_all_free();
    test_multiple_dbs_many();             memory_check_all_free();
    test_cursor_last_empty();             memory_check_all_free();
    test_multiple_brts_one_db_one_file(); memory_check_all_free();
    test_dump_empty_db();                 memory_check_all_free();
    test_named_db();
    memory_check_all_free();
    test_multiple_dbs();
    memory_check_all_free();
    printf("test0 A\n");
    test0();
    printf("test0 B\n");
    test0(); /* Make sure it works twice. */
    printf("test1\n");
    test1();
    printf("test2 checking memory\n");
    test2(1);
    printf("test2 faster\n");
    test2(0);
    printf("test5\n");
    test5();
    printf("test_multiple_files\n");
    test_multiple_files();
    printf("test3 slow\n");
    memory_check=0;
    test3(2048, 1<<15, 1);
    printf("test4 slow\n");
    test4(2048, 1<<15, 1);
    printf("test3 fast\n");

    toku_pma_show_stats();

    test3(1<<15, 1024, 1);
    test4(1<<15, 1024, 1);
    printf("test3 fast\n");

    test3(1<<18, 1<<20, 0);
    test4(1<<18, 1<<20, 0);

    // Once upon a time srandom(8) caused this test to fail.
    srandom(8); test4(2048, 1<<15, 1);

    memory_check = 1;

    test_brt_limits();

    DB a_db;
    DB *db = &a_db;
    test_brt_cursor(db);

    test_brt_delete();

    int old_brt_do_push_cmd = brt_do_push_cmd;
    brt_do_push_cmd = 0;

    test_brt_delete();
    test_brt_cursor(db);

    brt_do_push_cmd = old_brt_do_push_cmd;

//    test3(1<<19, 1<<20, 0);
//    test4(1<<19, 1<<20, 0);

//    test3(1<<20, 1<<20, 0);
//    test4(1<<20, 1<<20, 0);

//    test3(1<<20, 1<<21, 0);
//    test4(1<<20, 1<<21, 0);

//    test3(1<<20, 1<<22, 0);
//    test4(1<<20, 1<<22, 0);

}

int main (int argc __attribute__((__unused__)), char *argv[] __attribute__((__unused__))) {
    brt_blackbox_test();
    malloc_cleanup();
    printf("test ok\n");
    return 0;
}