mdbxmou 0.1.26

package/deps/libmdbx/src/lck.c

@@ -0,0 +1,174 @@
+/// \copyright SPDX-License-Identifier: Apache-2.0
+/// \author Леонид Юрьев aka Leonid Yuriev <leo@yuriev.ru> \date 2015-2025
+
+#include "internals.h"
+
+__cold static int lck_setup_locked(MDBX_env *env) {
+  int err = rthc_register(env);
+  if (unlikely(err != MDBX_SUCCESS))
+    return err;
+
+  int lck_seize_rc = lck_seize(env);
+  if (unlikely(MDBX_IS_ERROR(lck_seize_rc)))
+    return lck_seize_rc;
+
+  if (env->lck_mmap.fd == INVALID_HANDLE_VALUE) {
+    env->lck = lckless_stub(env);
+    env->max_readers = UINT_MAX;
+    DEBUG("lck-setup:%s%s%s", " lck-less", (env->flags & MDBX_RDONLY) ? " readonly" : "",
+          (lck_seize_rc == MDBX_RESULT_TRUE) ? " exclusive" : " cooperative");
+    return lck_seize_rc;
+  }
+
+  DEBUG("lck-setup:%s%s%s", " with-lck", (env->flags & MDBX_RDONLY) ? " readonly" : "",
+        (lck_seize_rc == MDBX_RESULT_TRUE) ? " exclusive" : " cooperative");
+
+  MDBX_env *inprocess_neighbor = nullptr;
+  err = rthc_uniq_check(&env->lck_mmap, &inprocess_neighbor);
+  if (unlikely(MDBX_IS_ERROR(err)))
+    return err;
+  if (inprocess_neighbor) {
+    if ((globals.runtime_flags & MDBX_DBG_LEGACY_MULTIOPEN) == 0 || (inprocess_neighbor->flags & MDBX_EXCLUSIVE) != 0)
+      return MDBX_BUSY;
+    if (lck_seize_rc == MDBX_RESULT_TRUE) {
+      err = lck_downgrade(env);
+      if (unlikely(err != MDBX_SUCCESS))
+        return err;
+      lck_seize_rc = MDBX_RESULT_FALSE;
+    }
+  }
+
+  uint64_t size = 0;
+  err = osal_filesize(env->lck_mmap.fd, &size);
+  if (unlikely(err != MDBX_SUCCESS))
+    return err;
+
+  if (lck_seize_rc == MDBX_RESULT_TRUE) {
+    size = ceil_powerof2(env->max_readers * sizeof(reader_slot_t) + sizeof(lck_t), globals.sys_pagesize);
+    jitter4testing(false);
+  } else {
+    if (env->flags & MDBX_EXCLUSIVE)
+      return MDBX_BUSY;
+    if (size > INT_MAX || (size & (globals.sys_pagesize - 1)) != 0 || size < globals.sys_pagesize) {
+      ERROR("lck-file has invalid size %" PRIu64 " bytes", size);
+      return MDBX_PROBLEM;
+    }
+  }
+
+  const size_t maxreaders = ((size_t)size - sizeof(lck_t)) / sizeof(reader_slot_t);
+  if (maxreaders < 4) {
+    ERROR("lck-size too small (up to %" PRIuPTR " readers)", maxreaders);
+    return MDBX_PROBLEM;
+  }
+  env->max_readers = (maxreaders <= MDBX_READERS_LIMIT) ? (unsigned)maxreaders : (unsigned)MDBX_READERS_LIMIT;
+
+  err =
+      osal_mmap((env->flags & MDBX_EXCLUSIVE) | MDBX_WRITEMAP, &env->lck_mmap, (size_t)size, (size_t)size,
+                lck_seize_rc ? MMAP_OPTION_TRUNCATE | MMAP_OPTION_SEMAPHORE : MMAP_OPTION_SEMAPHORE, env->pathname.lck);
+  if (unlikely(err != MDBX_SUCCESS))
+    return err;
+
+#ifdef MADV_DODUMP
+  err = madvise(env->lck_mmap.lck, size, MADV_DODUMP) ? ignore_enosys_and_eagain(errno) : MDBX_SUCCESS;
+  if (unlikely(MDBX_IS_ERROR(err)))
+    return err;
+#endif /* MADV_DODUMP */
+
+#ifdef MADV_WILLNEED
+  err = madvise(env->lck_mmap.lck, size, MADV_WILLNEED) ? ignore_enosys_and_eagain(errno) : MDBX_SUCCESS;
+  if (unlikely(MDBX_IS_ERROR(err)))
+    return err;
+#elif defined(POSIX_MADV_WILLNEED)
+  err = ignore_enosys(posix_madvise(env->lck_mmap.lck, size, POSIX_MADV_WILLNEED));
+  if (unlikely(MDBX_IS_ERROR(err)))
+    return err;
+#endif /* MADV_WILLNEED */
+
+  lck_t *lck = env->lck_mmap.lck;
+  if (lck_seize_rc == MDBX_RESULT_TRUE) {
+    /* If we succeed got exclusive lock, then nobody is using the lock region
+     * and we should initialize it. */
+    memset(lck, 0, (size_t)size);
+    jitter4testing(false);
+    lck->magic_and_version = MDBX_LOCK_MAGIC;
+    lck->os_and_format = MDBX_LOCK_FORMAT;
+#if MDBX_ENABLE_PGOP_STAT
+    lck->pgops.wops.weak = 1;
+#endif /* MDBX_ENABLE_PGOP_STAT */
+    err = osal_msync(&env->lck_mmap, 0, (size_t)size, MDBX_SYNC_DATA | MDBX_SYNC_SIZE);
+    if (unlikely(err != MDBX_SUCCESS)) {
+      ERROR("initial-%s for lck-file failed, err %d", "msync/fsync", err);
+      eASSERT(env, MDBX_IS_ERROR(err));
+      return err;
+    }
+  } else {
+    if (lck->magic_and_version != MDBX_LOCK_MAGIC) {
+      const bool invalid = (lck->magic_and_version >> 8) != MDBX_MAGIC;
+      ERROR("lock region has %s", invalid ? "invalid magic"
+                                          : "incompatible version (only applications with nearly or the "
+                                            "same versions of libmdbx can share the same database)");
+      return invalid ? MDBX_INVALID : MDBX_VERSION_MISMATCH;
+    }
+    if (lck->os_and_format != MDBX_LOCK_FORMAT) {
+      ERROR("lock region has os/format signature 0x%" PRIx32 ", expected 0x%" PRIx32, lck->os_and_format,
+            MDBX_LOCK_FORMAT);
+      return MDBX_VERSION_MISMATCH;
+    }
+  }
+
+  err = lck_init(env, inprocess_neighbor, lck_seize_rc);
+  if (unlikely(err != MDBX_SUCCESS)) {
+    eASSERT(env, MDBX_IS_ERROR(err));
+    return err;
+  }
+
+  env->lck = lck;
+  eASSERT(env, !MDBX_IS_ERROR(lck_seize_rc));
+  return lck_seize_rc;
+}
+
+__cold int lck_setup(MDBX_env *env, mdbx_mode_t mode) {
+  eASSERT(env, env->lazy_fd != INVALID_HANDLE_VALUE);
+  eASSERT(env, env->lck_mmap.fd == INVALID_HANDLE_VALUE);
+
+  int err = osal_openfile(MDBX_OPEN_LCK, env, env->pathname.lck, &env->lck_mmap.fd, mode);
+  if (err != MDBX_SUCCESS) {
+    switch (err) {
+    case MDBX_EACCESS:
+    case MDBX_EPERM:
+      if (F_ISSET(env->flags, MDBX_RDONLY | MDBX_EXCLUSIVE))
+        break;
+      __fallthrough /* fall through */;
+    case MDBX_ENOFILE:
+    case MDBX_EROFS:
+      if (env->flags & MDBX_RDONLY) {
+        /* ENSURE the file system is read-only */
+        int err_rofs = osal_check_fs_rdonly(env->lazy_fd, env->pathname.lck, err);
+        if (err_rofs == MDBX_SUCCESS ||
+            /* ignore ERROR_NOT_SUPPORTED for exclusive mode */
+            (err_rofs == MDBX_ENOSYS && (env->flags & MDBX_EXCLUSIVE)))
+          break;
+        if (err_rofs != MDBX_ENOSYS)
+          err = err_rofs;
+      }
+      __fallthrough /* fall through */;
+    default:
+      ERROR("unable to open lck-file %" MDBX_PRIsPATH ", env-flags 0x%X, err %d", env->pathname.lck, env->flags, err);
+      return err;
+    }
+
+    /* LY: without-lck mode (e.g. exclusive or on read-only filesystem) */
+    env->lck_mmap.fd = INVALID_HANDLE_VALUE;
+    NOTICE("continue %" MDBX_PRIsPATH " within without-lck mode, env-flags 0x%X, lck-error %d", env->pathname.dxb,
+           env->flags, err);
+  }
+
+  rthc_lock();
+  err = lck_setup_locked(env);
+  rthc_unlock();
+  return err;
+}
+
+void mincore_clean_cache(const MDBX_env *const env) {
+  memset(env->lck->mincore_cache.begin, -1, sizeof(env->lck->mincore_cache.begin));
+}

package/deps/libmdbx/src/lck.h

@@ -0,0 +1,110 @@
+/// \copyright SPDX-License-Identifier: Apache-2.0
+/// \author Леонид Юрьев aka Leonid Yuriev <leo@yuriev.ru> \date 2015-2025
+
+#pragma once
+
+#include "essentials.h"
+
+MDBX_INTERNAL int lck_setup(MDBX_env *env, mdbx_mode_t mode);
+#if MDBX_LOCKING > MDBX_LOCKING_SYSV
+MDBX_INTERNAL int lck_ipclock_stubinit(osal_ipclock_t *ipc);
+MDBX_INTERNAL int lck_ipclock_destroy(osal_ipclock_t *ipc);
+#endif /* MDBX_LOCKING > MDBX_LOCKING_SYSV */
+
+/// \brief Initialization of synchronization primitives linked with MDBX_env
+///   instance both in LCK-file and within the current process.
+/// \param
+///   global_uniqueness_flag = true - denotes that there are no other processes
+///     working with DB and LCK-file. Thus the function MUST initialize
+///     shared synchronization objects in memory-mapped LCK-file.
+///   global_uniqueness_flag = false - denotes that at least one process is
+///     already working with DB and LCK-file, including the case when DB
+///     has already been opened in the current process. Thus the function
+///     MUST NOT initialize shared synchronization objects in memory-mapped
+///     LCK-file that are already in use.
+/// \return Error code or zero on success.
+MDBX_INTERNAL int lck_init(MDBX_env *env, MDBX_env *inprocess_neighbor, int global_uniqueness_flag);
+
+/// \brief Disconnects from shared interprocess objects and destructs
+///   synchronization objects linked with MDBX_env instance
+///   within the current process.
+/// \param
+///   inprocess_neighbor = nullptr - if the current process does not have other
+///     instances of MDBX_env linked with the DB being closed.
+///     Thus the function MUST check for other processes working with DB or
+///     LCK-file, and keep or destroy shared synchronization objects in
+///     memory-mapped LCK-file depending on the result.
+///   inprocess_neighbor = not-nullptr - pointer to another instance of MDBX_env
+///     (anyone of there is several) working with DB or LCK-file within the
+///     current process. Thus the function MUST NOT try to acquire exclusive
+///     lock and/or try to destruct shared synchronization objects linked with
+///     DB or LCK-file. Moreover, the implementation MUST ensure correct work
+///     of other instances of MDBX_env within the current process, e.g.
+///     restore POSIX-fcntl locks after the closing of file descriptors.
+/// \return Error code (MDBX_PANIC) or zero on success.
+MDBX_INTERNAL int lck_destroy(MDBX_env *env, MDBX_env *inprocess_neighbor, const uint32_t current_pid);
+
+/// \brief Connects to shared interprocess locking objects and tries to acquire
+///   the maximum lock level (shared if exclusive is not available)
+///   Depending on implementation or/and platform (Windows) this function may
+///   acquire the non-OS super-level lock (e.g. for shared synchronization
+///   objects initialization), which will be downgraded to OS-exclusive or
+///   shared via explicit calling of lck_downgrade().
+/// \return
+///   MDBX_RESULT_TRUE (-1) - if an exclusive lock was acquired and thus
+///     the current process is the first and only after the last use of DB.
+///   MDBX_RESULT_FALSE (0) - if a shared lock was acquired and thus
+///     DB has already been opened and now is used by other processes.
+///   Otherwise (not 0 and not -1) - error code.
+MDBX_INTERNAL int lck_seize(MDBX_env *env);
+
+/// \brief Downgrades the level of initially acquired lock to
+///   operational level specified by argument. The reason for such downgrade:
+///    - unblocking of other processes that are waiting for access, i.e.
+///      if (env->flags & MDBX_EXCLUSIVE) != 0, then other processes
+///      should be made aware that access is unavailable rather than
+///      wait for it.
+///    - freeing locks that interfere file operation (especially for Windows)
+///   (env->flags & MDBX_EXCLUSIVE) == 0 - downgrade to shared lock.
+///   (env->flags & MDBX_EXCLUSIVE) != 0 - downgrade to exclusive
+///   operational lock.
+/// \return Error code or zero on success
+MDBX_INTERNAL int lck_downgrade(MDBX_env *env);
+
+MDBX_MAYBE_UNUSED MDBX_INTERNAL int lck_upgrade(MDBX_env *env, bool dont_wait);
+
+/// \brief Locks LCK-file or/and table of readers for (de)registering.
+/// \return Error code or zero on success
+MDBX_INTERNAL int lck_rdt_lock(MDBX_env *env);
+
+/// \brief Unlocks LCK-file or/and table of readers after (de)registering.
+MDBX_INTERNAL void lck_rdt_unlock(MDBX_env *env);
+
+/// \brief Acquires write-transaction lock.
+/// \return Error code or zero on success
+MDBX_INTERNAL int lck_txn_lock(MDBX_env *env, bool dont_wait);
+
+/// \brief Releases write-transaction lock..
+MDBX_INTERNAL void lck_txn_unlock(MDBX_env *env);
+
+/// \brief Sets alive-flag of reader presence (indicative lock) for PID of
+///   the current process. The function does no more than needed for
+///   the correct working of lck_rpid_check() in other processes.
+/// \return Error code or zero on success
+MDBX_INTERNAL int lck_rpid_set(MDBX_env *env);
+
+/// \brief Resets alive-flag of reader presence (indicative lock)
+///   for PID of the current process. The function does no more than needed
+///   for the correct working of lck_rpid_check() in other processes.
+/// \return Error code or zero on success
+MDBX_INTERNAL int lck_rpid_clear(MDBX_env *env);
+
+/// \brief Checks for reading process status with the given pid with help of
+///   alive-flag of presence (indicative lock) or using another way.
+/// \return
+///   MDBX_RESULT_TRUE (-1) - if the reader process with the given PID is alive
+///     and working with DB (indicative lock is present).
+///   MDBX_RESULT_FALSE (0) - if the reader process with the given PID is absent
+///     or not working with DB (indicative lock is not present).
+///   Otherwise (not 0 and not -1) - error code.
+MDBX_INTERNAL int lck_rpid_check(MDBX_env *env, uint32_t pid);

package/deps/libmdbx/src/logging_and_debug.c

@@ -0,0 +1,250 @@
+/// \copyright SPDX-License-Identifier: Apache-2.0
+/// \author Леонид Юрьев aka Leonid Yuriev <leo@yuriev.ru> \date 2015-2025
+
+#include "internals.h"
+
+__cold void debug_log_va(int level, const char *function, int line, const char *fmt, va_list args) {
+  ENSURE(nullptr, osal_fastmutex_acquire(&globals.debug_lock) == 0);
+  if (globals.logger.ptr) {
+    if (globals.logger_buffer == nullptr)
+      globals.logger.fmt(level, function, line, fmt, args);
+    else {
+      const int len = vsnprintf(globals.logger_buffer, globals.logger_buffer_size, fmt, args);
+      if (len > 0)
+        globals.logger.nofmt(level, function, line, globals.logger_buffer, len);
+    }
+  } else {
+#if defined(_WIN32) || defined(_WIN64)
+    if (IsDebuggerPresent()) {
+      int prefix_len = 0;
+      char *prefix = nullptr;
+      if (function && line > 0)
+        prefix_len = osal_asprintf(&prefix, "%s:%d ", function, line);
+      else if (function)
+        prefix_len = osal_asprintf(&prefix, "%s: ", function);
+      else if (line > 0)
+        prefix_len = osal_asprintf(&prefix, "%d: ", line);
+      if (prefix_len > 0 && prefix) {
+        OutputDebugStringA(prefix);
+        osal_free(prefix);
+      }
+      char *msg = nullptr;
+      int msg_len = osal_vasprintf(&msg, fmt, args);
+      if (msg_len > 0 && msg) {
+        OutputDebugStringA(msg);
+        osal_free(msg);
+      }
+    }
+#else
+    if (function && line > 0)
+      fprintf(stderr, "%s:%d ", function, line);
+    else if (function)
+      fprintf(stderr, "%s: ", function);
+    else if (line > 0)
+      fprintf(stderr, "%d: ", line);
+    vfprintf(stderr, fmt, args);
+    fflush(stderr);
+#endif
+  }
+  ENSURE(nullptr, osal_fastmutex_release(&globals.debug_lock) == 0);
+}
+
+__cold void debug_log(int level, const char *function, int line, const char *fmt, ...) {
+  va_list args;
+  va_start(args, fmt);
+  debug_log_va(level, function, line, fmt, args);
+  va_end(args);
+}
+
+__cold void log_error(const int err, const char *func, unsigned line) {
+  assert(err != MDBX_SUCCESS);
+  if (unlikely(globals.loglevel >= MDBX_LOG_DEBUG)) {
+    const bool is_error = err != MDBX_RESULT_TRUE && err != MDBX_NOTFOUND;
+    char buf[256];
+    debug_log(is_error ? MDBX_LOG_ERROR : MDBX_LOG_VERBOSE, func, line, "%s %d (%s)\n",
+              is_error ? "error" : "condition", err, mdbx_strerror_r(err, buf, sizeof(buf)));
+  }
+}
+
+/* Dump a val in ascii or hexadecimal. */
+__cold const char *mdbx_dump_val(const MDBX_val *val, char *const buf, const size_t bufsize) {
+  if (!val)
+    return "<null>";
+  if (!val->iov_len)
+    return "<empty>";
+  if (!buf || bufsize < 4)
+    return nullptr;
+
+  if (!val->iov_base) {
+    int len = snprintf(buf, bufsize, "<nullptr.%zu>", val->iov_len);
+    assert(len > 0 && (size_t)len < bufsize);
+    (void)len;
+    return buf;
+  }
+
+  bool is_ascii = true;
+  const uint8_t *const data = val->iov_base;
+  for (size_t i = 0; i < val->iov_len; i++)
+    if (data[i] < ' ' || data[i] > '~') {
+      is_ascii = false;
+      break;
+    }
+
+  if (is_ascii) {
+    int len = snprintf(buf, bufsize, "%.*s", (val->iov_len > INT_MAX) ? INT_MAX : (int)val->iov_len, data);
+    assert(len > 0 && (size_t)len < bufsize);
+    (void)len;
+  } else {
+    char *const detent = buf + bufsize - 2;
+    char *ptr = buf;
+    *ptr++ = '<';
+    for (size_t i = 0; i < val->iov_len && ptr < detent; i++) {
+      const char hex[16] = {'0', '1', '2', '3', '4', '5', '6', '7', '8', '9', 'a', 'b', 'c', 'd', 'e', 'f'};
+      *ptr++ = hex[data[i] >> 4];
+      *ptr++ = hex[data[i] & 15];
+    }
+    if (ptr < detent)
+      *ptr++ = '>';
+    *ptr = '\0';
+  }
+  return buf;
+}
+
+/*------------------------------------------------------------------------------
+ LY: debug stuff */
+
+__cold const char *pagetype_caption(const uint8_t type, char buf4unknown[16]) {
+  switch (type) {
+  case P_BRANCH:
+    return "branch";
+  case P_LEAF:
+    return "leaf";
+  case P_LEAF | P_SUBP:
+    return "subleaf";
+  case P_LEAF | P_DUPFIX:
+    return "dupfix-leaf";
+  case P_LEAF | P_DUPFIX | P_SUBP:
+    return "dupfix-subleaf";
+  case P_LEAF | P_DUPFIX | P_SUBP | P_LEGACY_DIRTY:
+    return "dupfix-subleaf.legacy-dirty";
+  case P_LARGE:
+    return "large";
+  default:
+    snprintf(buf4unknown, 16, "unknown_0x%x", type);
+    return buf4unknown;
+  }
+}
+
+__cold static const char *leafnode_type(node_t *n) {
+  static const char *const tp[2][2] = {{"", ": DB"}, {": sub-page", ": sub-DB"}};
+  return (node_flags(n) & N_BIG) ? ": large page" : tp[!!(node_flags(n) & N_DUP)][!!(node_flags(n) & N_TREE)];
+}
+
+/* Display all the keys in the page. */
+__cold void page_list(page_t *mp) {
+  pgno_t pgno = mp->pgno;
+  const char *type;
+  node_t *node;
+  size_t i, nkeys, nsize, total = 0;
+  MDBX_val key;
+  DKBUF;
+
+  switch (page_type(mp)) {
+  case P_BRANCH:
+    type = "Branch page";
+    break;
+  case P_LEAF:
+    type = "Leaf page";
+    break;
+  case P_LEAF | P_SUBP:
+    type = "Leaf sub-page";
+    break;
+  case P_LEAF | P_DUPFIX:
+    type = "Leaf2 page";
+    break;
+  case P_LEAF | P_DUPFIX | P_SUBP:
+    type = "Leaf2 sub-page";
+    break;
+  case P_LARGE:
+    VERBOSE("Overflow page %" PRIaPGNO " pages %u\n", pgno, mp->pages);
+    return;
+  case P_META:
+    VERBOSE("Meta-page %" PRIaPGNO " txnid %" PRIu64 "\n", pgno, unaligned_peek_u64(4, page_meta(mp)->txnid_a));
+    return;
+  default:
+    VERBOSE("Bad page %" PRIaPGNO " flags 0x%X\n", pgno, mp->flags);
+    return;
+  }
+
+  nkeys = page_numkeys(mp);
+  VERBOSE("%s %" PRIaPGNO " numkeys %zu\n", type, pgno, nkeys);
+
+  for (i = 0; i < nkeys; i++) {
+    if (is_dupfix_leaf(mp)) { /* DUPFIX pages have no entries[] or node headers */
+      key = page_dupfix_key(mp, i, nsize = mp->dupfix_ksize);
+      total += nsize;
+      VERBOSE("key %zu: nsize %zu, %s\n", i, nsize, DKEY(&key));
+      continue;
+    }
+    node = page_node(mp, i);
+    key.iov_len = node_ks(node);
+    key.iov_base = node->payload;
+    nsize = NODESIZE + key.iov_len;
+    if (is_branch(mp)) {
+      VERBOSE("key %zu: page %" PRIaPGNO ", %s\n", i, node_pgno(node), DKEY(&key));
+      total += nsize;
+    } else {
+      if (node_flags(node) & N_BIG)
+        nsize += sizeof(pgno_t);
+      else
+        nsize += node_ds(node);
+      total += nsize;
+      nsize += sizeof(indx_t);
+      VERBOSE("key %zu: nsize %zu, %s%s\n", i, nsize, DKEY(&key), leafnode_type(node));
+    }
+    total = EVEN_CEIL(total);
+  }
+  VERBOSE("Total: header %u + contents %zu + unused %zu\n", is_dupfix_leaf(mp) ? PAGEHDRSZ : PAGEHDRSZ + mp->lower,
+          total, page_room(mp));
+}
+
+__cold static int setup_debug(MDBX_log_level_t level, MDBX_debug_flags_t flags, union logger_union logger, char *buffer,
+                              size_t buffer_size) {
+  ENSURE(nullptr, osal_fastmutex_acquire(&globals.debug_lock) == 0);
+
+  const int rc = globals.runtime_flags | (globals.loglevel << 16);
+  if (level != MDBX_LOG_DONTCHANGE)
+    globals.loglevel = (uint8_t)level;
+
+  if (flags != MDBX_DBG_DONTCHANGE) {
+    flags &=
+#if MDBX_DEBUG
+        MDBX_DBG_ASSERT | MDBX_DBG_AUDIT | MDBX_DBG_JITTER |
+#endif
+        MDBX_DBG_DUMP | MDBX_DBG_LEGACY_MULTIOPEN | MDBX_DBG_LEGACY_OVERLAP | MDBX_DBG_DONT_UPGRADE;
+    globals.runtime_flags = (uint8_t)flags;
+  }
+
+  assert(MDBX_LOGGER_DONTCHANGE == ((MDBX_debug_func *)(intptr_t)-1));
+  if (logger.ptr != (void *)((intptr_t)-1)) {
+    globals.logger.ptr = logger.ptr;
+    globals.logger_buffer = buffer;
+    globals.logger_buffer_size = buffer_size;
+  }
+
+  ENSURE(nullptr, osal_fastmutex_release(&globals.debug_lock) == 0);
+  return rc;
+}
+
+__cold int mdbx_setup_debug_nofmt(MDBX_log_level_t level, MDBX_debug_flags_t flags, MDBX_debug_func_nofmt *logger,
+                                  char *buffer, size_t buffer_size) {
+  union logger_union thunk;
+  thunk.nofmt = (logger && buffer && buffer_size) ? logger : MDBX_LOGGER_NOFMT_DONTCHANGE;
+  return setup_debug(level, flags, thunk, buffer, buffer_size);
+}
+
+__cold int mdbx_setup_debug(MDBX_log_level_t level, MDBX_debug_flags_t flags, MDBX_debug_func *logger) {
+  union logger_union thunk;
+  thunk.fmt = logger;
+  return setup_debug(level, flags, thunk, nullptr, 0);
+}