libmdbx: switch to original amalgamated source code (v0.9.1.18)

Amalgamated source code is the recommended form for
embedding libmdbx in non-CMake build systems. This amalgamated
version contains a minimum of files, is fully ready for use,
and make impossible a number of errors.

To upgrade or switch to a different version, just unpack
to the `src` subdirectory a corresponding `libmdbx-amalgamated-X_Y_Z.zip`
at the https://github.com/erthink/libmdbx/releases.

For instance, the https://github.com/erthink/libmdbx/releases/download/v0.9.2/libmdbx-amalgamated-0_9_2.zip
for the next release.

--

Minimal changes have been made to the build configuration:

1. For use the standard `DllMain()` entry of libmdbx:
   - added the `MDBX_BUILD_SHARED_LIBRARY=1` option;
   - removed the `MDBX_CONFIG_MANUAL_TLS_CALLBACK` option;
   - deleted the `miranda.c` file containing only `DllMain()`
     with the `mdbx_dll_handle()` call, now this is done by the library itself.

2. Removed refs to extra files (that missing in the amalgamated source code):
   - for building `libmdbx.dll` only the `mdbx.h` and `mdbx.c` are used,
     but not `mdbx.c++` for a C++ API;
   - for building the `mdbx_chk`, `mdbx_load`, and `mdbx_dump` utilities
     only it own sources are used.

--

Last libmdbx changes:

 - Fixed missing installation of `mdbx.h++`.
 - Fixed use of obsolete `__noreturn`.
 - Fixed use of `yield` instruction on ARM if unsupported.
 - Added pthread workaround for buggy toolchain/cmake/buildroot.
 - Fixed use of `pthread_yield()` for non-GLIBC.
 - Fixed use of `RegGetValueA()` on Windows 2000/XP.
 - Fixed use of `GetTickCount64()` on Windows 2000/XP.
 - Fixed opening DB on a network shares (in the exclusive mode).
 - Fixed copy&paste typos.
 - Fixed minor false-positive GCC warning.

2 files changed, 0 insertions, 415 deletions

diff --git a/libs/libmdbx/src/test/pcrf/README.md b/libs/libmdbx/src/test/pcrf/README.md
deleted file mode 100644
index b2c9b5ce95..0000000000
--- a/libs/libmdbx/src/test/pcrf/README.md
+++ /dev/null
@@ -1,2 +0,0 @@
-PCRF Session DB emulation test
-
diff --git a/libs/libmdbx/src/test/pcrf/pcrf_test.c b/libs/libmdbx/src/test/pcrf/pcrf_test.c
deleted file mode 100644
index 2db58a023a..0000000000
--- a/libs/libmdbx/src/test/pcrf/pcrf_test.c
+++ /dev/null
@@ -1,413 +0,0 @@
-/*
- * Copyright 2016-2020 Leonid Yuriev <leo@yuriev.ru>.
- * Copyright 2015 Vladimir Romanov
- * <https://www.linkedin.com/in/vladimirromanov>, Yota Lab.
- *
- * This file is part of libmdbx.
- *
- * ReOpenMDBX is free software; you can redistribute it and/or modify it under
- * the terms of the GNU Affero General Public License as published by
- * the Free Software Foundation; either version 3 of the License, or
- * (at your option) any later version.
- *
- * ReOpenMDBX is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
- * GNU Affero General Public License for more details.
- *
- * You should have received a copy of the GNU Affero General Public License
- * along with this program.  If not, see <http://www.gnu.org/licenses/>.
- */
-
-#include <sys/stat.h>
-#include <sys/time.h>
-
-#include "mdbx.h"
-#include <assert.h>
-#include <inttypes.h>
-#include <limits.h>
-#include <stddef.h>
-#include <stdint.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-
-#define IP_PRINTF_ARG_HOST(addr)                                               \
-  (int)((addr) >> 24), (int)((addr) >> 16 & 0xff), (int)((addr) >> 8 & 0xff),  \
-      (int)((addr)&0xff)
-
-char opt_db_path[PATH_MAX] = "./mdbx_bench2";
-static MDBX_env *env;
-#define REC_COUNT 10240000
-int64_t ids[REC_COUNT * 10];
-int32_t ids_count = 0;
-
-int64_t mdbx_add_count = 0;
-int64_t mdbx_del_count = 0;
-uint64_t mdbx_add_time = 0;
-uint64_t mdbx_del_time = 0;
-int64_t obj_id = 0;
-int64_t mdbx_data_size = 0;
-int64_t mdbx_key_size = 0;
-
-typedef struct {
-  char session_id1[100];
-  char session_id2[100];
-  char ip[20];
-  uint8_t fill[100];
-} session_data_t;
-
-typedef struct {
-  int64_t obj_id;
-  int8_t event_type;
-} __attribute__((__packed__)) event_data_t;
-
-static void add_id_to_pool(int64_t id) {
-  ids[ids_count] = id;
-  ids_count++;
-}
-
-static inline int64_t getClockUs(void) {
-  struct timespec val;
-#ifdef CYGWIN
-  clock_gettime(CLOCK_REALTIME, &val);
-#else
-  clock_gettime(CLOCK_MONOTONIC, &val);
-#endif
-  return val.tv_sec * ((int64_t)1000000) + val.tv_nsec / 1000;
-}
-
-static int64_t get_id_from_pool() {
-  if (ids_count == 0) {
-    return -1;
-  }
-  int32_t index = rand() % ids_count;
-  int64_t id = ids[index];
-  ids[index] = ids[ids_count - 1];
-  ids_count--;
-  return id;
-}
-
-#define MDBX_CHECK(x)                                                          \
-  do {                                                                         \
-    const int rc = (x);                                                        \
-    if (rc != MDBX_SUCCESS) {                                                  \
-      printf("Error [%d] %s in %s at %s:%d\n", rc, mdbx_strerror(rc), #x,      \
-             __FILE__, __LINE__);                                              \
-      exit(EXIT_FAILURE);                                                      \
-    }                                                                          \
-  } while (0)
-
-static void db_connect() {
-  MDBX_dbi dbi_session;
-  MDBX_dbi dbi_session_id;
-  MDBX_dbi dbi_event;
-  MDBX_dbi dbi_ip;
-
-  MDBX_CHECK(mdbx_env_create(&env));
-  MDBX_CHECK(mdbx_env_set_geometry(
-      env, 0, 0, REC_COUNT * sizeof(session_data_t) * 10, -1, -1, -1));
-  MDBX_CHECK(mdbx_env_set_maxdbs(env, 30));
-  MDBX_CHECK(mdbx_env_open(env, opt_db_path,
-                           MDBX_CREATE | MDBX_WRITEMAP | MDBX_MAPASYNC |
-                               MDBX_SAFE_NOSYNC | MDBX_LIFORECLAIM,
-                           0664));
-  MDBX_txn *txn;
-
-  // transaction init
-  MDBX_CHECK(mdbx_txn_begin(env, NULL, 0, &txn));
-  // open database in read-write mode
-  MDBX_CHECK(mdbx_dbi_open(txn, "session", MDBX_CREATE, &dbi_session));
-  MDBX_CHECK(mdbx_dbi_open(txn, "session_id", MDBX_CREATE, &dbi_session_id));
-  MDBX_CHECK(mdbx_dbi_open(txn, "event", MDBX_CREATE, &dbi_event));
-  MDBX_CHECK(mdbx_dbi_open(txn, "ip", MDBX_CREATE, &dbi_ip));
-  // transaction commit
-  MDBX_CHECK(mdbx_txn_commit(txn));
-  printf("Connection open\n");
-}
-
-static void create_record(uint64_t record_id) {
-  MDBX_dbi dbi_session;
-  MDBX_dbi dbi_session_id;
-  MDBX_dbi dbi_event;
-  MDBX_dbi dbi_ip;
-  event_data_t event;
-  MDBX_txn *txn;
-  session_data_t data;
-  // transaction init
-  snprintf(data.session_id1, sizeof(data.session_id1),
-           "prefix%02u_%02u.fill.fill.fill.fill.fill.fill;%" PRIu64,
-           (unsigned)(record_id % 3) + 1, (unsigned)(record_id % 9) + 1,
-           record_id);
-  snprintf(data.session_id2, sizeof(data.session_id2),
-           "dprefix%" PRIu64 ";%" PRIu64 ".fill.fill.;suffix", record_id,
-           (record_id + UINT64_C(1442695040888963407)) %
-               UINT64_C(6364136223846793005));
-  snprintf(data.ip, sizeof(data.ip), "%d.%d.%d.%d",
-           IP_PRINTF_ARG_HOST(record_id & 0xFFFFFFFF));
-  event.obj_id = record_id;
-  event.event_type = 1;
-
-  MDBX_val _session_id1_rec = {data.session_id1, strlen(data.session_id1)};
-  MDBX_val _session_id2_rec = {data.session_id2, strlen(data.session_id2)};
-  MDBX_val _ip_rec = {data.ip, strlen(data.ip)};
-  MDBX_val _obj_id_rec = {&record_id, sizeof(record_id)};
-  MDBX_val _data_rec = {&data, offsetof(session_data_t, fill) +
-                                   (rand() % sizeof(data.fill))};
-  MDBX_val _event_rec = {&event, sizeof(event)};
-
-  uint64_t start = getClockUs();
-  MDBX_CHECK(mdbx_txn_begin(env, NULL, 0, &txn));
-  MDBX_CHECK(mdbx_dbi_open(txn, "session", MDBX_CREATE, &dbi_session));
-  MDBX_CHECK(mdbx_dbi_open(txn, "session_id", MDBX_CREATE, &dbi_session_id));
-  MDBX_CHECK(mdbx_dbi_open(txn, "event", MDBX_CREATE, &dbi_event));
-  MDBX_CHECK(mdbx_dbi_open(txn, "ip", MDBX_CREATE, &dbi_ip));
-  MDBX_CHECK(mdbx_put(txn, dbi_session, &_obj_id_rec, &_data_rec,
-                      MDBX_NOOVERWRITE | MDBX_NODUPDATA));
-  MDBX_CHECK(mdbx_put(txn, dbi_session_id, &_session_id1_rec, &_obj_id_rec,
-                      MDBX_NOOVERWRITE | MDBX_NODUPDATA));
-  MDBX_CHECK(mdbx_put(txn, dbi_session_id, &_session_id2_rec, &_obj_id_rec,
-                      MDBX_NOOVERWRITE | MDBX_NODUPDATA));
-  MDBX_CHECK(mdbx_put(txn, dbi_ip, &_ip_rec, &_obj_id_rec, 0));
-  MDBX_CHECK(mdbx_put(txn, dbi_event, &_event_rec, &_obj_id_rec, 0));
-  MDBX_CHECK(mdbx_txn_commit(txn));
-
-  mdbx_data_size += (_data_rec.iov_len + _obj_id_rec.iov_len * 4);
-  mdbx_key_size +=
-      (_obj_id_rec.iov_len + _session_id1_rec.iov_len +
-       _session_id2_rec.iov_len + _ip_rec.iov_len + _event_rec.iov_len);
-
-  // transaction commit
-  mdbx_add_count++;
-  mdbx_add_time += (getClockUs() - start);
-}
-
-static void delete_record(int64_t record_id) {
-  MDBX_dbi dbi_session;
-  MDBX_dbi dbi_session_id;
-  MDBX_dbi dbi_event;
-  MDBX_dbi dbi_ip;
-  event_data_t event;
-  MDBX_txn *txn;
-
-  // transaction init
-  uint64_t start = getClockUs();
-  MDBX_CHECK(mdbx_txn_begin(env, NULL, 0, &txn));
-  // open database in read-write mode
-  MDBX_CHECK(mdbx_dbi_open(txn, "session", MDBX_CREATE, &dbi_session));
-  MDBX_CHECK(mdbx_dbi_open(txn, "session_id", MDBX_CREATE, &dbi_session_id));
-  MDBX_CHECK(mdbx_dbi_open(txn, "event", MDBX_CREATE, &dbi_event));
-  MDBX_CHECK(mdbx_dbi_open(txn, "ip", MDBX_CREATE, &dbi_ip));
-  // put data
-  MDBX_val _obj_id_rec = {&record_id, sizeof(record_id)};
-  MDBX_val _data_rec;
-  // get data
-  MDBX_CHECK(mdbx_get(txn, dbi_session, &_obj_id_rec, &_data_rec));
-  session_data_t *data = (session_data_t *)_data_rec.iov_base;
-
-  MDBX_val _session_id1_rec = {data->session_id1, strlen(data->session_id1)};
-  MDBX_val _session_id2_rec = {data->session_id2, strlen(data->session_id2)};
-  MDBX_val _ip_rec = {data->ip, strlen(data->ip)};
-  MDBX_CHECK(mdbx_del(txn, dbi_session_id, &_session_id1_rec, NULL));
-  MDBX_CHECK(mdbx_del(txn, dbi_session_id, &_session_id2_rec, NULL));
-  MDBX_CHECK(mdbx_del(txn, dbi_ip, &_ip_rec, NULL));
-  event.obj_id = record_id;
-  event.event_type = 1;
-  MDBX_val _event_rec = {&event, sizeof(event)};
-  MDBX_CHECK(mdbx_del(txn, dbi_event, &_event_rec, NULL));
-  MDBX_CHECK(mdbx_del(txn, dbi_session, &_obj_id_rec, NULL));
-
-  mdbx_data_size -= (_data_rec.iov_len + _obj_id_rec.iov_len * 4);
-  mdbx_key_size -=
-      (_obj_id_rec.iov_len + _session_id1_rec.iov_len +
-       _session_id2_rec.iov_len + _ip_rec.iov_len + _event_rec.iov_len);
-
-  // transaction commit
-  MDBX_CHECK(mdbx_txn_commit(txn));
-  mdbx_del_count++;
-  mdbx_del_time += (getClockUs() - start);
-}
-
-static void db_disconnect() {
-  mdbx_env_close(env);
-  printf("Connection closed\n");
-}
-
-static void get_db_stat(const char *db, int64_t *ms_branch_pages,
-                        int64_t *ms_leaf_pages) {
-  MDBX_txn *txn;
-  MDBX_stat stat;
-  MDBX_dbi dbi;
-
-  MDBX_CHECK(mdbx_txn_begin(env, NULL, MDBX_RDONLY, &txn));
-  MDBX_CHECK(mdbx_dbi_open(txn, db, MDBX_CREATE, &dbi));
-  MDBX_CHECK(mdbx_dbi_stat(txn, dbi, &stat, sizeof(stat)));
-  mdbx_txn_abort(txn);
-  printf("%15s | %15" PRIu64 " | %5u | %10" PRIu64 " | %10" PRIu64
-         " | %11" PRIu64 " |\n",
-         db, stat.ms_branch_pages, stat.ms_depth, stat.ms_entries,
-         stat.ms_leaf_pages, stat.ms_overflow_pages);
-  (*ms_branch_pages) += stat.ms_branch_pages;
-  (*ms_leaf_pages) += stat.ms_leaf_pages;
-}
-
-static void periodic_stat(void) {
-  int64_t ms_branch_pages = 0;
-  int64_t ms_leaf_pages = 0;
-  MDBX_stat mst;
-  MDBX_envinfo mei;
-  MDBX_CHECK(mdbx_env_stat_ex(env, NULL, &mst, sizeof(mst)));
-  MDBX_CHECK(mdbx_env_info_ex(env, NULL, &mei, sizeof(mei)));
-  printf("Environment Info\n");
-  printf("  Pagesize: %u\n", mst.ms_psize);
-  if (mei.mi_geo.lower != mei.mi_geo.upper) {
-    printf("  Dynamic datafile: %" PRIu64 "..%" PRIu64 " bytes (+%" PRIu64
-           "/-%" PRIu64 "), %" PRIu64 "..%" PRIu64 " pages (+%" PRIu64
-           "/-%" PRIu64 ")\n",
-           mei.mi_geo.lower, mei.mi_geo.upper, mei.mi_geo.grow,
-           mei.mi_geo.shrink, mei.mi_geo.lower / mst.ms_psize,
-           mei.mi_geo.upper / mst.ms_psize, mei.mi_geo.grow / mst.ms_psize,
-           mei.mi_geo.shrink / mst.ms_psize);
-    printf("  Current datafile: %" PRIu64 " bytes, %" PRIu64 " pages\n",
-           mei.mi_geo.current, mei.mi_geo.current / mst.ms_psize);
-  } else {
-    printf("  Fixed datafile: %" PRIu64 " bytes, %" PRIu64 " pages\n",
-           mei.mi_geo.current, mei.mi_geo.current / mst.ms_psize);
-  }
-  printf("  Current mapsize: %" PRIu64 " bytes, %" PRIu64 " pages \n",
-         mei.mi_mapsize, mei.mi_mapsize / mst.ms_psize);
-  printf("  Number of pages used: %" PRIu64 "\n", mei.mi_last_pgno + 1);
-  printf("  Last transaction ID: %" PRIu64 "\n", mei.mi_recent_txnid);
-  printf("  Tail transaction ID: %" PRIu64 " (%" PRIi64 ")\n",
-         mei.mi_latter_reader_txnid,
-         mei.mi_latter_reader_txnid - mei.mi_recent_txnid);
-  printf("  Max readers: %u\n", mei.mi_maxreaders);
-  printf("  Number of readers used: %u\n", mei.mi_numreaders);
-
-  printf("           Name | ms_branch_pages | depth |    entries | leaf_pages "
-         "| overf_pages |\n");
-  get_db_stat("session", &ms_branch_pages, &ms_leaf_pages);
-  get_db_stat("session_id", &ms_branch_pages, &ms_leaf_pages);
-  get_db_stat("event", &ms_branch_pages, &ms_leaf_pages);
-  get_db_stat("ip", &ms_branch_pages, &ms_leaf_pages);
-  printf("%15s | %15" PRIu64 " | %5s | %10s | %10" PRIu64 " | %11s |\n", "",
-         ms_branch_pages, "", "", ms_leaf_pages, "");
-
-  static int64_t prev_add_count;
-  static int64_t prev_del_count;
-  static uint64_t prev_add_time;
-  static uint64_t prev_del_time;
-  static int64_t t = -1;
-  if (t > 0) {
-    int64_t delta = (getClockUs() - t);
-    printf("CPS: add %" PRIu64 ", delete %" PRIu64
-           ", items processed - %" PRIu64 "K data=%" PRIu64 "K key=%" PRIu64
-           "K\n",
-           (mdbx_add_count - prev_add_count) * 1000000 / delta,
-           (mdbx_del_count - prev_del_count) * 1000000 / delta, obj_id / 1024,
-           mdbx_data_size / 1024, mdbx_key_size / 1024);
-    printf("usage data=%" PRIu64 "%%",
-           ((mdbx_data_size + mdbx_key_size) * 100) /
-               ((ms_leaf_pages + ms_branch_pages) * 4096));
-    if (prev_add_time != mdbx_add_time) {
-      printf(" Add : %" PRIu64 " c/s", (mdbx_add_count - prev_add_count) *
-                                           1000000 /
-                                           (mdbx_add_time - prev_add_time));
-    }
-    if (prev_del_time != mdbx_del_time) {
-      printf(" Del : %" PRIu64 " c/s", (mdbx_del_count - prev_del_count) *
-                                           1000000 /
-                                           (mdbx_del_time - prev_del_time));
-    }
-    if (mdbx_add_time) {
-      printf(" tAdd : %" PRIu64 " c/s",
-             mdbx_add_count * 1000000 / mdbx_add_time);
-    }
-    if (mdbx_del_time) {
-      printf(" tDel : %" PRIu64 " c/s",
-             mdbx_del_count * 1000000 / mdbx_del_time);
-    }
-    puts("");
-  }
-  t = getClockUs();
-  prev_add_count = mdbx_add_count;
-  prev_del_count = mdbx_del_count;
-  prev_add_time = mdbx_add_time;
-  prev_del_time = mdbx_del_time;
-}
-
-#if 0 /* unused */
-static void periodic_add_rec() {
-  for (int i = 0; i < 10240; i++) {
-    if (ids_count <= REC_COUNT) {
-      int64_t id = obj_id++;
-      create_record(id);
-      add_id_to_pool(id);
-    }
-    if (ids_count > REC_COUNT) {
-      int64_t id = get_id_from_pool();
-      delete_record(id);
-    }
-  }
-  periodic_stat();
-}
-#endif
-
-int main(int argc, char **argv) {
-  (void)argc;
-  (void)argv;
-
-  char filename[PATH_MAX];
-  int i;
-
-  strcpy(filename, opt_db_path);
-  strcat(filename, MDBX_DATANAME);
-  remove(filename);
-
-  strcpy(filename, opt_db_path);
-  strcat(filename, MDBX_LOCKNAME);
-  remove(filename);
-
-  puts("Open DB...");
-  db_connect();
-  puts("Create data...");
-  int64_t t = getClockUs();
-  for (i = 0; i < REC_COUNT; i++) {
-    int64_t id = obj_id++;
-    create_record(id);
-    add_id_to_pool(id);
-    if (i % 1000 == 0) {
-      int64_t now = getClockUs();
-      if ((now - t) > 1000000L) {
-        periodic_stat();
-        t = now;
-      }
-    }
-  }
-  periodic_stat();
-  while (1) {
-    int i;
-    for (i = 0; i < 1000; i++) {
-      int64_t id = obj_id++;
-      create_record(id);
-      add_id_to_pool(id);
-      id = get_id_from_pool();
-      delete_record(id);
-    }
-    for (i = 0; i < 50; i++) {
-      int64_t id = obj_id++;
-      create_record(id);
-      add_id_to_pool(id);
-    }
-    int64_t id = obj_id++;
-    create_record(id);
-    add_id_to_pool(id);
-    int64_t now = getClockUs();
-    if ((now - t) > 10000000L) {
-      periodic_stat();
-      t = now;
-    }
-  }
-  db_disconnect();
-  return 0;
-}