mtest3.c 3.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133
  1. /* mtest3.c - memory-mapped database tester/toy */
  2. /*
  3. * Copyright 2011-2021 Howard Chu, Symas Corp.
  4. * All rights reserved.
  5. *
  6. * Redistribution and use in source and binary forms, with or without
  7. * modification, are permitted only as authorized by the OpenLDAP
  8. * Public License.
  9. *
  10. * A copy of this license is available in the file LICENSE in the
  11. * top-level directory of the distribution or, alternatively, at
  12. * <http://www.OpenLDAP.org/license.html>.
  13. */
  14. /* Tests for sorted duplicate DBs */
  15. #include <stdio.h>
  16. #include <stdlib.h>
  17. #include <string.h>
  18. #include <time.h>
  19. #include "lmdb.h"
  20. #define E(expr) CHECK((rc = (expr)) == MDB_SUCCESS, #expr)
  21. #define RES(err, expr) ((rc = expr) == (err) || (CHECK(!rc, #expr), 0))
  22. #define CHECK(test, msg) ((test) ? (void)0 : ((void)fprintf(stderr, \
  23. "%s:%d: %s: %s\n", __FILE__, __LINE__, msg, mdb_strerror(rc)), abort()))
  24. int main(int argc,char * argv[])
  25. {
  26. int i = 0, j = 0, rc;
  27. MDB_env *env;
  28. MDB_dbi dbi;
  29. MDB_val key, data;
  30. MDB_txn *txn;
  31. MDB_stat mst;
  32. MDB_cursor *cursor;
  33. int count;
  34. int *values;
  35. char sval[32];
  36. char kval[sizeof(int)];
  37. srand(time(NULL));
  38. memset(sval, 0, sizeof(sval));
  39. count = (rand()%384) + 64;
  40. values = (int *)malloc(count*sizeof(int));
  41. for(i = 0;i<count;i++) {
  42. values[i] = rand()%1024;
  43. }
  44. E(mdb_env_create(&env));
  45. E(mdb_env_set_mapsize(env, 10485760));
  46. E(mdb_env_set_maxdbs(env, 4));
  47. E(mdb_env_open(env, "./testdb", MDB_FIXEDMAP|MDB_NOSYNC, 0664));
  48. E(mdb_txn_begin(env, NULL, 0, &txn));
  49. E(mdb_dbi_open(txn, "id2", MDB_CREATE|MDB_DUPSORT, &dbi));
  50. key.mv_size = sizeof(int);
  51. key.mv_data = kval;
  52. data.mv_size = sizeof(sval);
  53. data.mv_data = sval;
  54. printf("Adding %d values\n", count);
  55. for (i=0;i<count;i++) {
  56. if (!(i & 0x0f))
  57. sprintf(kval, "%03x", values[i]);
  58. sprintf(sval, "%03x %d foo bar", values[i], values[i]);
  59. if (RES(MDB_KEYEXIST, mdb_put(txn, dbi, &key, &data, MDB_NODUPDATA)))
  60. j++;
  61. }
  62. if (j) printf("%d duplicates skipped\n", j);
  63. E(mdb_txn_commit(txn));
  64. E(mdb_env_stat(env, &mst));
  65. E(mdb_txn_begin(env, NULL, MDB_RDONLY, &txn));
  66. E(mdb_cursor_open(txn, dbi, &cursor));
  67. while ((rc = mdb_cursor_get(cursor, &key, &data, MDB_NEXT)) == 0) {
  68. printf("key: %p %.*s, data: %p %.*s\n",
  69. key.mv_data, (int) key.mv_size, (char *) key.mv_data,
  70. data.mv_data, (int) data.mv_size, (char *) data.mv_data);
  71. }
  72. CHECK(rc == MDB_NOTFOUND, "mdb_cursor_get");
  73. mdb_cursor_close(cursor);
  74. mdb_txn_abort(txn);
  75. j=0;
  76. for (i= count - 1; i > -1; i-= (rand()%5)) {
  77. j++;
  78. txn=NULL;
  79. E(mdb_txn_begin(env, NULL, 0, &txn));
  80. sprintf(kval, "%03x", values[i & ~0x0f]);
  81. sprintf(sval, "%03x %d foo bar", values[i], values[i]);
  82. key.mv_size = sizeof(int);
  83. key.mv_data = kval;
  84. data.mv_size = sizeof(sval);
  85. data.mv_data = sval;
  86. if (RES(MDB_NOTFOUND, mdb_del(txn, dbi, &key, &data))) {
  87. j--;
  88. mdb_txn_abort(txn);
  89. } else {
  90. E(mdb_txn_commit(txn));
  91. }
  92. }
  93. free(values);
  94. printf("Deleted %d values\n", j);
  95. E(mdb_env_stat(env, &mst));
  96. E(mdb_txn_begin(env, NULL, MDB_RDONLY, &txn));
  97. E(mdb_cursor_open(txn, dbi, &cursor));
  98. printf("Cursor next\n");
  99. while ((rc = mdb_cursor_get(cursor, &key, &data, MDB_NEXT)) == 0) {
  100. printf("key: %.*s, data: %.*s\n",
  101. (int) key.mv_size, (char *) key.mv_data,
  102. (int) data.mv_size, (char *) data.mv_data);
  103. }
  104. CHECK(rc == MDB_NOTFOUND, "mdb_cursor_get");
  105. printf("Cursor prev\n");
  106. while ((rc = mdb_cursor_get(cursor, &key, &data, MDB_PREV)) == 0) {
  107. printf("key: %.*s, data: %.*s\n",
  108. (int) key.mv_size, (char *) key.mv_data,
  109. (int) data.mv_size, (char *) data.mv_data);
  110. }
  111. CHECK(rc == MDB_NOTFOUND, "mdb_cursor_get");
  112. mdb_cursor_close(cursor);
  113. mdb_txn_abort(txn);
  114. mdb_dbi_close(env, dbi);
  115. mdb_env_close(env);
  116. return 0;
  117. }