mg-dbx 2.4.31 → 2.5.33

package/README.md

@@ -3,7 +3,7 @@
 High speed Synchronous and Asynchronous access to InterSystems Cache/IRIS and YottaDB from Node.js.
 
 Chris Munt <cmunt@mgateway.com>  
-9 December 2025, MGateway Ltd [http://www.mgateway.com](http://www.mgateway.com)
+18 February 2026, MGateway Ltd [http://www.mgateway.com](http://www.mgateway.com)
 
 * Verified to work with Node.js v8 to v24.
 * Two connectivity models to the InterSystems or YottaDB database are provided: High performance via the local database API or network based.
@@ -1243,3 +1243,14 @@ Unless required by applicable law or agreed to in writing, software distributed
 * Correct a potential memory access violation in the **dbx.setloglevel()** method.
 * Correct a potential memory access violation in the **mclass.reset()** method.
 
+### v2.5.32 (8 February 2025)
+
+* Introduce a basic sanity check for M global names.  Check that non-printable characters are not included in the name.
+* Correct a fault in setting extra long string values in M Globals.
+	* The fault occurred for strings longer than 32,767 Bytes (The old default limit for Cache databases).
+	* Newer Cache configurations and IRIS can accept strings of up to 3,641,144 Bytes in length.
+
+### v2.5.33 (18 February 2025)
+
+* Correct a buffer sizing issue affecting Node.js v24 (and later).
+

package/package.json

@@ -2,7 +2,7 @@
   "author": "Chris Munt <cmunt@mgateway.com> (http://www.gateway.com/)",
   "name": "mg-dbx",
   "description": "High speed Synchronous and Asynchronous access to InterSystems Cache/IRIS and YottaDB from Node.js.",
-  "version": "2.4.31",
+  "version": "2.5.33",
   "maintainers": "Chris Munt <cmunt@mgateway.com>",
   "homepage": "https://github.com/chrisemunt/mg-dbx",
   "repository": {

package/src/mg-dbx.cpp

@@ -188,6 +188,15 @@ Version 2.4.31 9 December 2025:
    Correct a potential memory access violation in the dbx.setloglevel() method.
    Correct a potential memory access violation in the mclass.reset() method.
 
+Version 2.5.32 8 February 2026:
+   Introduce a basic sanity check for M global names.  Check that non-printable characters are not included in the name.
+   Correct a fault in setting extra long string values in M Globals.
+      The fault occurred for strings longer than 32,767 Bytes (The old default limit for Cache databases).
+      Newer Cache configurations and IRIS can accept strings of up to 3,641,144 Bytes in length.
+
+Version 2.5.33 18 February 2026:
+   Correct a buffer sizing issue affecting Node.js v24 (and later).
+
 */
 
 
@@ -1464,6 +1473,12 @@ int DBX_DBNAME::GlobalReference(DBX_DBNAME *c, const FunctionCallbackInfo<Value>
       n ++;
    }
 
+/* v2.5.32
+   rc = pcon->utf16 ? dbx_validate_name(pmeth, (void *) pmeth->args[nx].cvalue.buf16_addr, (int) pmeth->args[nx].cvalue.len_used, pcon->utf16, 0) : dbx_validate_name(pmeth, (void *) pmeth->args[nx].svalue.buf_addr, (int) pmeth->args[nx].svalue.len_used, pcon->utf16, 0);
+   if (rc != CACHE_SUCCESS) {
+      return rc;
+   }
+
    if (pcon->dbtype != DBX_DBTYPE_YOTTADB && context == 0) {
       if (pmeth->lock) {
          rc = pcon->utf16 ? pcon->p_isc_so->p_CachePushLockW((int) pmeth->args[nx].cvalue.len_used, (unsigned short *) pmeth->args[nx].cvalue.buf16_addr) : pcon->p_isc_so->p_CachePushLock((int) pmeth->args[nx].svalue.len_used, (Callin_char_t *) pmeth->args[nx].svalue.buf_addr);
@@ -1483,6 +1498,10 @@ int DBX_DBNAME::GlobalReference(DBX_DBNAME *c, const FunctionCallbackInfo<Value>
          }
       }
    }
+   if (rc != CACHE_SUCCESS) {
+      return rc;
+   }
+*/
 
    nx ++;
    if (pgref && (pval = pgref->pkey)) {
@@ -1511,10 +1530,11 @@ int DBX_DBNAME::GlobalReference(DBX_DBNAME *c, const FunctionCallbackInfo<Value>
    printf("\r\n pval->type=%d; pval->num.int32=%d; pval->svalue.buf_addr=%s", pval->type, pval->num.int32, buffer);
 }
 */
-
+/* v2.5.32
          if (pcon->dbtype != DBX_DBTYPE_YOTTADB && context == 0) {
             rc = dbx_reference(pmeth, nx);
          }
+*/
          nx ++;
          pval = pval->pnext;
       }
@@ -1555,6 +1575,7 @@ int DBX_DBNAME::GlobalReference(DBX_DBNAME *c, const FunctionCallbackInfo<Value>
          }
          else if (!pcon->utf16 && pmeth->args[nx].svalue.len_used < 32) {
             T_STRNCPY(buffer, _dbxso(buffer), pmeth->args[nx].svalue.buf_addr, pmeth->args[nx].svalue.len_used);
+            buffer[pmeth->args[nx].svalue.len_used] = '\0';
          }
          else {
             buffer[0] = '1';
@@ -1563,11 +1584,10 @@ int DBX_DBNAME::GlobalReference(DBX_DBNAME *c, const FunctionCallbackInfo<Value>
          pmeth->args[nx].type = DBX_DTYPE_DOUBLE;
          pmeth->args[nx].num.real = (double) strtod(buffer, NULL);
       }
-
+/* v2.5.32
       if (pcon->dbtype != DBX_DBTYPE_YOTTADB && context == 0) {
-
          if (pmeth->lock == 1) {
-            if (n < (pmeth->argc - 1)) { /* don't push lock timeout */
+            if (n < (pmeth->argc - 1)) {
                rc = dbx_reference(pmeth, nx);
             }
          }
@@ -1575,10 +1595,56 @@ int DBX_DBNAME::GlobalReference(DBX_DBNAME *c, const FunctionCallbackInfo<Value>
             rc = dbx_reference(pmeth, nx);
          }
       }
+*/
    }
 
    pmeth->cargc = nx;
 
+   /* v2.5.32 */
+   if (pcon->dbtype != DBX_DBTYPE_YOTTADB && context == 0) {
+      rc = dbx_global_reference(pmeth);
+#if 0
+      nx = 0;
+      rc = pcon->utf16 ? dbx_validate_name(pmeth, (void *) pmeth->args[nx].cvalue.buf16_addr, (int) pmeth->args[nx].cvalue.len_used, pcon->utf16, 0) : dbx_validate_name(pmeth, (void *) pmeth->args[nx].svalue.buf_addr, (int) pmeth->args[nx].svalue.len_used, pcon->utf16, 0);
+      if (rc != CACHE_SUCCESS) {
+         return rc;
+      }
+
+      if (pmeth->lock) {
+         rc = pcon->utf16 ? pcon->p_isc_so->p_CachePushLockW((int) pmeth->args[nx].cvalue.len_used, (unsigned short *) pmeth->args[nx].cvalue.buf16_addr) : pcon->p_isc_so->p_CachePushLock((int) pmeth->args[nx].svalue.len_used, (Callin_char_t *) pmeth->args[nx].svalue.buf_addr);
+      }
+      else {
+         if (pcon->utf16) {
+            if (pmeth->args[nx].cvalue.buf16_addr[0] == 94)
+               rc = pcon->p_isc_so->p_CachePushGlobalW((int) pmeth->args[nx].cvalue.len_used - 1, (unsigned short *) pmeth->args[nx].cvalue.buf16_addr + 1);
+            else
+               rc = pcon->p_isc_so->p_CachePushGlobalW((int) pmeth->args[nx].cvalue.len_used, (unsigned short *) pmeth->args[nx].cvalue.buf16_addr);
+         }
+         else {
+            if (pmeth->args[nx].svalue.buf_addr[0] == '^')
+               rc = pcon->p_isc_so->p_CachePushGlobal((int) pmeth->args[nx].svalue.len_used - 1, (Callin_char_t *) pmeth->args[nx].svalue.buf_addr + 1);
+            else
+               pcon->p_isc_so->p_CachePushGlobal((int) pmeth->args[nx].svalue.len_used, (Callin_char_t *) pmeth->args[nx].svalue.buf_addr);
+         }
+      }
+
+      if (rc != CACHE_SUCCESS) {
+         return rc;
+      }
+
+      for (nx = 1; nx < pmeth->cargc; nx ++) {
+         if (pmeth->lock == 1) {
+            if (nx < (pmeth->cargc - 1)) { /* don't push lock timeout */
+               rc = dbx_reference(pmeth, nx);
+            }
+         }
+         else {
+            rc = dbx_reference(pmeth, nx);
+         }
+      }
+#endif
+   }
+
    return rc;
 }
 
@@ -1630,6 +1696,7 @@ void DBX_DBNAME::GetEx(const FunctionCallbackInfo<Value>& args, int binary)
    DBX_DBFUN_START(c, pcon, pmeth);
 
    rc = GlobalReference(c, args, pmeth, NULL, (async || pcon->net_connection || pcon->tlevel));
+   DBX_DB_CHECK(rc);
 
    if (pcon->log_transmissions) {
       dbx_log_transmission(pcon, pmeth, (char *) DBX_DBNAME_STR "::get");
@@ -1740,6 +1807,7 @@ void DBX_DBNAME::Set(const FunctionCallbackInfo<Value>& args)
    DBX_DBFUN_START(c, pcon, pmeth);
 
    rc = GlobalReference(c, args, pmeth, NULL, (async || pcon->net_connection || pcon->tlevel));
+   DBX_DB_CHECK(rc);
 
    if (pcon->log_transmissions) {
       dbx_log_transmission(pcon, pmeth, (char *) DBX_DBNAME_STR "::set");
@@ -1837,6 +1905,7 @@ void DBX_DBNAME::Defined(const FunctionCallbackInfo<Value>& args)
    DBX_DBFUN_START(c, pcon, pmeth);
 
    rc = GlobalReference(c, args, pmeth, NULL, (async || pcon->net_connection || pcon->tlevel));
+   DBX_DB_CHECK(rc);
 
    if (pcon->log_transmissions) {
       dbx_log_transmission(pcon, pmeth, (char *) DBX_DBNAME_STR "::defined");
@@ -1935,6 +2004,7 @@ void DBX_DBNAME::Delete(const FunctionCallbackInfo<Value>& args)
    DBX_DBFUN_START(c, pcon, pmeth);
 
    rc = GlobalReference(c, args, pmeth, NULL, (async || pcon->net_connection || pcon->tlevel));
+   DBX_DB_CHECK(rc);
 
    if (pcon->log_transmissions) {
       dbx_log_transmission(pcon, pmeth, (char *) DBX_DBNAME_STR "::delete");
@@ -2032,6 +2102,7 @@ void DBX_DBNAME::Next(const FunctionCallbackInfo<Value>& args)
    DBX_DBFUN_START(c, pcon, pmeth);
 
    rc = GlobalReference(c, args, pmeth, NULL, (async || pcon->net_connection || pcon->tlevel));
+   DBX_DB_CHECK(rc);
 
    if (pcon->log_transmissions) {
       dbx_log_transmission(pcon, pmeth, (char *) DBX_DBNAME_STR "::next");
@@ -2128,6 +2199,7 @@ void DBX_DBNAME::Previous(const FunctionCallbackInfo<Value>& args)
    DBX_DBFUN_START(c, pcon, pmeth);
 
    rc = GlobalReference(c, args, pmeth, NULL, (async || pcon->net_connection || pcon->tlevel));
+   DBX_DB_CHECK(rc);
 
    if (pcon->log_transmissions) {
       dbx_log_transmission(pcon, pmeth, (char *) DBX_DBNAME_STR "::previous");
@@ -2226,6 +2298,7 @@ void DBX_DBNAME::Increment(const FunctionCallbackInfo<Value>& args)
 
    pmeth->increment = 1;
    rc = GlobalReference(c, args, pmeth, NULL, (async || pcon->net_connection || pcon->tlevel));
+   DBX_DB_CHECK(rc);
 
    if (pcon->log_transmissions) {
       dbx_log_transmission(pcon, pmeth, (char *) DBX_DBNAME_STR "::increment");
@@ -2325,6 +2398,7 @@ void DBX_DBNAME::Lock(const FunctionCallbackInfo<Value>& args)
 
    pmeth->lock = 1;
    rc = GlobalReference(c, args, pmeth, NULL, (async || pcon->net_connection || pcon->tlevel));
+   DBX_DB_CHECK(rc);
 
    if (pcon->log_transmissions) {
       dbx_log_transmission(pcon, pmeth, (char *) DBX_DBNAME_STR "::lock");
@@ -2449,6 +2523,7 @@ void DBX_DBNAME::Unlock(const FunctionCallbackInfo<Value>& args)
 
    pmeth->lock = 2;
    rc = GlobalReference(c, args, pmeth, NULL, (async || pcon->net_connection || pcon->tlevel));
+   DBX_DB_CHECK(rc);
 
    if (pcon->log_transmissions) {
       dbx_log_transmission(pcon, pmeth, (char *) DBX_DBNAME_STR "::unlock");
@@ -4258,7 +4333,8 @@ __try {
    str = DBX_TO_STRING(args[argc_offset]);
    global_name16_len = 0;
    global_name_len = dbx_string8_length(isolate, str, pcon->utf8);
-   dbx_write_char8(isolate, str, global_name, 256, pcon->utf8);
+   dbx_write_char8(isolate, str, global_name, 266, pcon->utf8);
+
    if (global_name_len == 0) {
       return -1;
    }
@@ -4347,8 +4423,8 @@ __try {
                pval->cvalue.buf16_addr = (unsigned short *) dbx_malloc(sizeof(unsigned short) * (len + 32), 0);
                pval->type = DBX_DTYPE_STR16;
                pval->svalue.buf_addr = NULL;
+               pval->cvalue.len_alloc = len + 32; /* v2.5.33 */
                dbx_write_char16(isolate, str, pval->cvalue.buf16_addr);
-               pval->cvalue.len_alloc = len + 32;
                pval->cvalue.len_used = len;
             }
             else {
@@ -4357,8 +4433,8 @@ __try {
                pval->cvalue.buf16_addr = NULL;
                pval->type = DBX_DTYPE_STR;
                pval->svalue.buf_addr = ((char *) pval) + sizeof(DBXVAL);
+               pval->svalue.len_alloc = len + 32; /* v2.5.33 */
                dbx_write_char8(isolate, str, pval->svalue.buf_addr, pval->svalue.len_alloc, 1);
-               pval->svalue.len_alloc = len + 32;
                pval->svalue.len_used = len;
             }
          }
@@ -7286,7 +7362,6 @@ __try {
       if (pcon->p_isc_so && no_connections == 0 && pcon->p_isc_so->multiple_connections == 0) { /* v2.0.16 */
 
          if (pcon->p_isc_so->loaded) {
-            /* pcon->p_isc_so->p_CacheEnd(); */
             pcon->p_isc_so->p_CacheEnd();
             dbx_dso_unload(pcon->p_isc_so->p_library);
             pcon->p_isc_so->p_library = NULL;
@@ -7530,25 +7605,32 @@ __try {
    for (n = 0; n < pmeth->cargc; n ++) {
 
       if (n == 0) {
-         if (pcon->dbtype != DBX_DBTYPE_YOTTADB) {
-            if (pmeth->lock) {
-               rc = pcon->utf16 ? pcon->p_isc_so->p_CachePushLockW((int) pmeth->args[n].cvalue.len_used, (unsigned short *) pmeth->args[n].cvalue.buf16_addr) : pcon->p_isc_so->p_CachePushLock((int) pmeth->args[n].svalue.len_used, (Callin_char_t *) pmeth->args[n].svalue.buf_addr);
+
+         /* v2.5.32 */
+         rc = pcon->utf16 ? dbx_validate_name(pmeth, (void *) pmeth->args[n].cvalue.buf16_addr, (int) pmeth->args[n].cvalue.len_used, pcon->utf16, 0) : dbx_validate_name(pmeth, (void *) pmeth->args[n].svalue.buf_addr, (int) pmeth->args[n].svalue.len_used, pcon->utf16, 0);
+         if (rc != CACHE_SUCCESS) {
+            break;
+         }
+         if (pmeth->lock) {
+            rc = pcon->utf16 ? pcon->p_isc_so->p_CachePushLockW((int) pmeth->args[n].cvalue.len_used, (unsigned short *) pmeth->args[n].cvalue.buf16_addr) : pcon->p_isc_so->p_CachePushLock((int) pmeth->args[n].svalue.len_used, (Callin_char_t *) pmeth->args[n].svalue.buf_addr);
+         }
+         else {
+            if (pcon->utf16) {
+               if (pmeth->args[n].cvalue.buf16_addr[0] == 94)
+                  rc = pcon->p_isc_so->p_CachePushGlobalW((int) pmeth->args[n].cvalue.len_used - 1, (unsigned short *) pmeth->args[n].cvalue.buf16_addr + 1);
+               else
+                  rc = pcon->p_isc_so->p_CachePushGlobalW((int) pmeth->args[n].cvalue.len_used, (unsigned short *) pmeth->args[n].cvalue.buf16_addr);
             }
             else {
-               if (pcon->utf16) {
-                  if (pmeth->args[n].cvalue.buf16_addr[0] == 94)
-                     rc = pcon->p_isc_so->p_CachePushGlobalW((int) pmeth->args[n].cvalue.len_used - 1, (unsigned short *) pmeth->args[n].cvalue.buf16_addr + 1);
-                  else
-                     rc = pcon->p_isc_so->p_CachePushGlobalW((int) pmeth->args[n].cvalue.len_used, (unsigned short *) pmeth->args[n].cvalue.buf16_addr);
-               }
-               else {
-                  if (pmeth->args[n].svalue.buf_addr[0] == '^')
-                     rc = pcon->p_isc_so->p_CachePushGlobal((int) pmeth->args[n].svalue.len_used - 1, (Callin_char_t *) pmeth->args[n].svalue.buf_addr + 1);
-                  else
-                     pcon->p_isc_so->p_CachePushGlobal((int) pmeth->args[n].svalue.len_used, (Callin_char_t *) pmeth->args[n].svalue.buf_addr);
-               }
+               if (pmeth->args[n].svalue.buf_addr[0] == '^')
+                  rc = pcon->p_isc_so->p_CachePushGlobal((int) pmeth->args[n].svalue.len_used - 1, (Callin_char_t *) pmeth->args[n].svalue.buf_addr + 1);
+               else
+                  rc = pcon->p_isc_so->p_CachePushGlobal((int) pmeth->args[n].svalue.len_used, (Callin_char_t *) pmeth->args[n].svalue.buf_addr);
             }
          }
+         if (rc != CACHE_SUCCESS) {
+            break;
+         } 
          continue;
       }
 
@@ -7560,6 +7642,9 @@ __try {
       else {
          rc = dbx_reference(pmeth, n);
       }
+      if (rc != CACHE_SUCCESS) {
+         break;
+      } 
    }
    return rc;
 
@@ -7602,7 +7687,6 @@ __try {
    }
 
    rc = dbx_global_reference(pmeth);
-
    if (rc != CACHE_SUCCESS) {
       dbx_error_message(pmeth, rc);
       goto dbx_get_exit;
@@ -7671,7 +7755,6 @@ __try {
    }
 
    rc = dbx_global_reference(pmeth);
-
    if (rc != CACHE_SUCCESS) {
       dbx_error_message(pmeth, rc);
       goto dbx_set_exit;
@@ -8248,6 +8331,8 @@ int dbx_merge(DBXMETH *pmeth)
 __try {
 #endif
 
+   rc = CACHE_SUCCESS;
+
    DBX_DB_LOCK(0);
 
    if (pcon->net_connection) {
@@ -10634,6 +10719,69 @@ __except (EXCEPTION_EXECUTE_HANDLER) {
 }
 
 
+/* v2.5.32 */
+int dbx_validate_name(DBXMETH *pmeth, void * pbuffer, int buffer_len, short char16, short context)
+{
+   int rc, n;
+   unsigned char c, *p, *pz;
+
+   rc = CACHE_SUCCESS;
+   if (char16) { /* TODO */
+      return rc;
+   }
+
+   p = (unsigned char *) pbuffer;
+   pz = (unsigned char *) ((unsigned char *) pbuffer + buffer_len);
+   n = 0;
+
+   if (strstr((char *) p, "[")) {
+      p = (unsigned char *) strstr((char *) p, "]");
+      if (!p) {
+         /* printf("dbx_validate_name: Invalid extended reference"); */
+         return CACHE_BAD_GLOBAL;
+      }
+   }
+   if (*p == '^') {
+      p ++;
+   }
+
+   c = (int) *p;
+   if (!((c == 37) || dbx_isalpha((int) c))) {
+      /* printf("dbx_validate_name: Invalid name - must begin with an alphabetic or '%%' (%d:%c)", (int) c, (char) c); */
+      return CACHE_BAD_GLOBAL;
+   }
+   else {
+      p ++;
+   }
+   c = (int) *(pz - 1);
+   if (!(isdigit((int) c) || dbx_isalpha((int) c))) {
+      /* printf("dbx_validate_name: Invalid name - must end with an alphanumeric (%d:%c)", (int) c, (char) c); */
+      return CACHE_BAD_GLOBAL;
+   }
+
+   /* Just test for control characters for now */
+   while (p < pz) {
+      c = (int) *p;
+      if (((int) c) < 32) {
+         /* printf("dbx_validate_name: Invalid name - must contain alphanumerics or '.' (%d:%c)", (int) c, (char) c); */
+         rc = CACHE_BAD_GLOBAL;
+         break;
+      }
+      p ++;
+   }
+/*
+   while (p < pz) {
+      c = (int) *p;
+      if (!((*p == '.') || isdigit((int) c) || dbx_isalpha((int) c))) {
+         printf("dbx_validate_name: Invalid name - must contain alphanumerics or '.' (%d:%c)", (int) c, (char) c);
+         rc = CACHE_BAD_GLOBAL;
+         break;
+      }
+      p ++;
+   }
+*/
+   return rc;
+}
 
 int cache_report_failure(DBXCON *pcon)
 {
@@ -11161,6 +11309,24 @@ int dbx_lcase(char *string)
 #endif
 }
 
+/* v2.5.32 */
+int dbx_isalpha(int c)
+{
+   if (isalpha(c))
+      return 1;
+   else if (c == 170)
+      return 1;
+   else if (c == 181)
+      return 1;
+   else if (c == 186)
+      return 1;
+   else if (c >= 192 && c <= 255)
+      return 1;
+   else
+      return 0;
+   return 0;
+}
+
 
 int dbx_create_string(DBXSTR *pstr, void *data, short type)
 {

package/src/mg-dbx.h

@@ -32,8 +32,8 @@
 #define DBX_NODE_VERSION         (NODE_MAJOR_VERSION * 10000) + (NODE_MINOR_VERSION * 100) + NODE_PATCH_VERSION
 
 #define DBX_VERSION_MAJOR        "2"
-#define DBX_VERSION_MINOR        "4"
-#define DBX_VERSION_BUILD        "31"
+#define DBX_VERSION_MINOR        "5"
+#define DBX_VERSION_BUILD        "33"
 
 #define DBX_VERSION              DBX_VERSION_MAJOR "." DBX_VERSION_MINOR "." DBX_VERSION_BUILD
 
@@ -702,6 +702,17 @@ typedef struct {
 #define YDB_TPCTX_QUERY    11
 #define YDB_TPCTX_ORDER    12
 
+/* v2.5.32 */
+
+#define DBX_DB_CHECK(RC) \
+   if (RC != CACHE_SUCCESS) { \
+      isolate->ThrowException(Exception::Error(dbx_new_string8(isolate, (char *) "Invalid global name", 1))); \
+      DBX_DBFUN_END(c); \
+      DBX_DB_UNLOCK(); \
+      dbx_request_memory_free(pcon, pmeth, 0); \
+      return; \
+   } \
+
 typedef struct {
    unsigned int   len_alloc;
    unsigned int   len_used;
@@ -1285,6 +1296,7 @@ int                        dbx_global_order              (DBXMETH *pmeth, DBXQR
 int                        dbx_global_query              (DBXMETH *pmeth, DBXQR *pqr_next, DBXQR *pqr_prev, short dir, short getdata);
 int                        dbx_parse_global_reference    (DBXMETH *pmeth, DBXQR *pqr, char *global_ref, int global_ref_len);
 int                        dbx_parse_global_reference16  (DBXMETH *pmeth, DBXQR *pqr, unsigned short *global_ref, int global_ref_len);
+int                        dbx_validate_name             (DBXMETH *pmeth, void * pbuffer, int buffer_len, short char16, short context);
 
 int                        dbx_launch_thread             (DBXMETH *pmeth);
 #if defined(_WIN32)
@@ -1310,6 +1322,7 @@ DBXQR *                    dbx_alloc_dbxqr               (DBXQR *pqr, int dsize,
 int                        dbx_free_dbxqr                (DBXQR *pqr);
 int                        dbx_ucase                     (char *string);
 int                        dbx_lcase                     (char *string);
+int                        dbx_isalpha                   (int c);
 
 int                        dbx_create_string             (DBXSTR *pstr, void *data, short type);
 

package/src/mg-global.cpp

@@ -274,6 +274,7 @@ void mglobal::GetEx(const FunctionCallbackInfo<Value>& args, int binary)
    DBX_DBFUN_START(c, pcon, pmeth);
 
    rc = c->GlobalReference(c, args, pmeth, &gref, (async || pcon->net_connection || pcon->tlevel));
+   DBX_DB_CHECK(rc);
 
    if (pcon->log_transmissions) {
       dbx_log_transmission(pcon, pmeth, (char *) "mglobal::get");
@@ -385,6 +386,7 @@ void mglobal::Set(const FunctionCallbackInfo<Value>& args)
    DBX_DBFUN_START(c, pcon, pmeth);
 
    rc = c->GlobalReference(c, args, pmeth, &gref, (async || pcon->net_connection || pcon->tlevel));
+   DBX_DB_CHECK(rc);
 
    if (pcon->log_transmissions) {
       dbx_log_transmission(pcon, pmeth, (char *) "mglobal::set");
@@ -489,6 +491,7 @@ void mglobal::Defined(const FunctionCallbackInfo<Value>& args)
    DBX_DBFUN_START(c, pcon, pmeth);
 
    rc = c->GlobalReference(c, args, pmeth, &gref, (async || pcon->net_connection || pcon->tlevel));
+   DBX_DB_CHECK(rc);
 
    if (pcon->log_transmissions) {
       dbx_log_transmission(pcon, pmeth, (char *) "mglobal::defined");
@@ -592,6 +595,7 @@ void mglobal::Delete(const FunctionCallbackInfo<Value>& args)
    DBX_DBFUN_START(c, pcon, pmeth);
 
    rc = c->GlobalReference(c, args, pmeth, &gref, (async || pcon->net_connection || pcon->tlevel));
+   DBX_DB_CHECK(rc);
 
    if (pcon->log_transmissions) {
       dbx_log_transmission(pcon, pmeth, (char *) "mglobal::delete");
@@ -695,6 +699,7 @@ void mglobal::Next(const FunctionCallbackInfo<Value>& args)
    DBX_DBFUN_START(c, pcon, pmeth);
 
    rc = c->GlobalReference(c, args, pmeth, &gref, (async || pcon->net_connection || pcon->tlevel));
+   DBX_DB_CHECK(rc);
 
    if (pcon->log_transmissions) {
       dbx_log_transmission(pcon, pmeth, (char *) "mglobal::next");
@@ -797,6 +802,7 @@ void mglobal::Previous(const FunctionCallbackInfo<Value>& args)
    DBX_DBFUN_START(c, pcon, pmeth);
 
    rc = c->GlobalReference(c, args, pmeth, &gref, (async || pcon->net_connection || pcon->tlevel));
+   DBX_DB_CHECK(rc);
 
    if (pcon->log_transmissions) {
       dbx_log_transmission(pcon, pmeth, (char *) "mglobal::previous");
@@ -900,6 +906,7 @@ void mglobal::Increment(const FunctionCallbackInfo<Value>& args)
 
    pmeth->increment = 1;
    rc = c->GlobalReference(c, args, pmeth, &gref, (async || pcon->net_connection || pcon->tlevel));
+   DBX_DB_CHECK(rc);
 
    if (pcon->log_transmissions) {
       dbx_log_transmission(pcon, pmeth, (char *) "mglobal::increment");
@@ -1009,6 +1016,7 @@ void mglobal::Lock(const FunctionCallbackInfo<Value>& args)
 
    pmeth->lock = 1;
    rc = c->GlobalReference(c, args, pmeth, &gref, (async || pcon->net_connection || pcon->tlevel));
+   DBX_DB_CHECK(rc);
 
    if (pcon->log_transmissions) {
       dbx_log_transmission(pcon, pmeth, (char *) "mglobal::lock");
@@ -1138,6 +1146,7 @@ void mglobal::Unlock(const FunctionCallbackInfo<Value>& args)
 
    pmeth->lock = 2;
    rc = c->GlobalReference(c, args, pmeth, &gref, (async || pcon->net_connection || pcon->tlevel));
+   DBX_DB_CHECK(rc);
 
    if (pcon->log_transmissions) {
       dbx_log_transmission(pcon, pmeth, (char *) "mglobal::unlock");