@iobroker/db-objects-redis 7.2.3 → 8.0.0-alpha.1-20260921-e5941ca8a

package/build/cjs/index.d.ts

@@ -5,7 +5,7 @@
  */
 export declare function getDefaultPort(host: string): number;
 export declare const Server: null;
-export { ObjectsInRedisClient as Client } from './lib/objects/objectsInRedisClient.js';
+export { ObjectsInRedisClient as Client, type ObjectsSettings } from './lib/objects/objectsInRedisClient.js';
 export { interview } from './lib/objects/interview.js';
 export * as objectsUtils from './lib/objects/objectsUtils.js';
 //# sourceMappingURL=index.d.ts.map

package/build/cjs/index.js

@@ -5,6 +5,7 @@ var __getOwnPropDesc = Object.getOwnPropertyDescriptor;
 var __getOwnPropNames = Object.getOwnPropertyNames;
 var __getProtoOf = Object.getPrototypeOf;
 var __hasOwnProp = Object.prototype.hasOwnProperty;
+var __name = (target, value) => __defProp(target, "name", { value, configurable: true });
 var __export = (target, all) => {
   for (var name in all)
     __defProp(target, name, { get: all[name], enumerable: true });
@@ -26,21 +27,22 @@ var __toESM = (mod, isNodeMode, target) => (target = mod != null ? __create(__ge
   mod
 ));
 var __toCommonJS = (mod) => __copyProps(__defProp({}, "__esModule", { value: true }), mod);
-var esm_exports = {};
-__export(esm_exports, {
+var index_exports = {};
+__export(index_exports, {
   Client: () => import_objectsInRedisClient.ObjectsInRedisClient,
   Server: () => Server,
   getDefaultPort: () => getDefaultPort,
   interview: () => import_interview.interview,
   objectsUtils: () => objectsUtils
 });
-module.exports = __toCommonJS(esm_exports);
+module.exports = __toCommonJS(index_exports);
 var import_objectsInRedisClient = require("./lib/objects/objectsInRedisClient.js");
 var import_interview = require("./lib/objects/interview.js");
 var objectsUtils = __toESM(require("./lib/objects/objectsUtils.js"), 1);
 function getDefaultPort(host) {
   return host.includes(",") ? 26379 : 6379;
 }
+__name(getDefaultPort, "getDefaultPort");
 const Server = null;
 // Annotate the CommonJS export names for ESM import in node:
 0 && (module.exports = {

package/build/cjs/index.js.map

@@ -1,7 +1,7 @@
 {
   "version": 3,
   "sources": ["../../src/index.ts"],
-  "sourcesContent": ["/// <reference types=\"@iobroker/types-dev\" />\n/**\n * Get the default port for the database\n *\n * @param host string of host(s)\n */\nexport function getDefaultPort(host: string): number {\n    return host.includes(',') ? 26379 : 6379;\n}\nexport const Server = null;\nexport { ObjectsInRedisClient as Client } from '@/lib/objects/objectsInRedisClient.js';\nexport { interview } from '@/lib/objects/interview.js';\nexport * as objectsUtils from '@/lib/objects/objectsUtils.js';\n"],
-  "mappings": ";;;;;;;;;;;;;;;;;;;;;;;;;;;;AAAA;;;;;;;;;AAUA,kCAA+C;AAC/C,uBAA0B;AAC1B,mBAA8B;AANxB,SAAU,eAAe,MAAY;AACvC,SAAO,KAAK,SAAS,GAAG,IAAI,QAAQ;AACxC;AACO,MAAM,SAAS;",
+  "sourcesContent": ["/// <reference types=\"@iobroker/types-dev\" />\n/**\n * Get the default port for the database\n *\n * @param host string of host(s)\n */\nexport function getDefaultPort(host: string): number {\n    return host.includes(',') ? 26379 : 6379;\n}\nexport const Server = null;\nexport { ObjectsInRedisClient as Client, type ObjectsSettings } from '@/lib/objects/objectsInRedisClient.js';\nexport { interview } from '@/lib/objects/interview.js';\nexport * as objectsUtils from '@/lib/objects/objectsUtils.js';\n"],
+  "mappings": ";;;;;;;;;;;;;;;;;;;;;;;;;;;;;AAAA;;;;;;;;;AAUA,kCAAqE;AACrE,uBAA0B;AAC1B,mBAA8B;AANxB,SAAU,eAAe,MAAY;AACvC,SAAO,KAAK,SAAS,GAAG,IAAI,QAAQ;AACxC;AAFgB;AAGT,MAAM,SAAS;",
   "names": []
 }

package/build/cjs/lib/objects/constants.js.map

@@ -1,7 +1,7 @@
 {
   "version": 3,
   "sources": ["../../../../src/lib/objects/constants.ts"],
-  "sourcesContent": ["export enum ERRORS {\n    ERROR_PERMISSION = 'permissionError',\n    ERROR_NOT_FOUND = 'Not exists',\n    ERROR_DB_CLOSED = 'DB closed',\n}\n\nexport const SYSTEM_ADMIN_USER = 'system.user.admin';\nexport const SYSTEM_ADMIN_GROUP = 'system.group.administrator';\n\nexport const ACCESS_EVERY_EXEC = 0x1;\nexport const ACCESS_EVERY_WRITE = 0x2;\nexport const ACCESS_EVERY_READ = 0x4;\nexport const ACCESS_EVERY_RW = ACCESS_EVERY_WRITE | ACCESS_EVERY_READ;\nexport const ACCESS_EVERY_ALL = ACCESS_EVERY_WRITE | ACCESS_EVERY_READ | ACCESS_EVERY_EXEC;\n\nexport const ACCESS_GROUP_EXEC = 0x10;\nexport const ACCESS_GROUP_WRITE = 0x20;\nexport const ACCESS_GROUP_READ = 0x40;\nexport const ACCESS_GROUP_RW = ACCESS_GROUP_WRITE | ACCESS_GROUP_READ;\nexport const ACCESS_GROUP_ALL = ACCESS_GROUP_WRITE | ACCESS_GROUP_READ | ACCESS_GROUP_EXEC;\n\nexport const ACCESS_USER_EXEC = 0x100;\nexport const ACCESS_USER_WRITE = 0x200;\nexport const ACCESS_USER_READ = 0x400;\nexport const ACCESS_USER_RW = ACCESS_USER_WRITE | ACCESS_USER_READ;\nexport const ACCESS_USER_ALL = ACCESS_USER_WRITE | ACCESS_USER_READ | ACCESS_USER_EXEC;\n\nexport const ACCESS_WRITE = 0x2;\nexport const ACCESS_READ = 0x4;\nexport const ACCESS_LIST = 'list';\nexport const ACCESS_DELETE = 'delete';\nexport const ACCESS_CREATE = 'create';\n\nexport type GenericAccessFlags =\n    | typeof ACCESS_WRITE\n    | typeof ACCESS_READ\n    | typeof ACCESS_LIST\n    | typeof ACCESS_DELETE\n    | typeof ACCESS_CREATE;\n\nexport const REG_CHECK_ID = /[*?[\\]]|\\$%\\$/;\n\nexport const USER_STARTS_WITH = 'system.user.';\nexport const GROUP_STARTS_WITH = 'system.group.';\n"],
-  "mappings": ";;;;;;;;;;;;;;;;;;AAAA;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;AAAA,IAAY;CAAZ,SAAYA,SAAM;AACd,EAAAA,QAAA,kBAAA,IAAA;AACA,EAAAA,QAAA,iBAAA,IAAA;AACA,EAAAA,QAAA,iBAAA,IAAA;AACJ,GAJY,WAAA,SAAM,CAAA,EAAA;AAMX,MAAM,oBAAoB;AAC1B,MAAM,qBAAqB;AAE3B,MAAM,oBAAoB;AAC1B,MAAM,qBAAqB;AAC3B,MAAM,oBAAoB;AAC1B,MAAM,kBAAkB,qBAAqB;AAC7C,MAAM,mBAAmB,qBAAqB,oBAAoB;AAElE,MAAM,oBAAoB;AAC1B,MAAM,qBAAqB;AAC3B,MAAM,oBAAoB;AAC1B,MAAM,kBAAkB,qBAAqB;AAC7C,MAAM,mBAAmB,qBAAqB,oBAAoB;AAElE,MAAM,mBAAmB;AACzB,MAAM,oBAAoB;AAC1B,MAAM,mBAAmB;AACzB,MAAM,iBAAiB,oBAAoB;AAC3C,MAAM,kBAAkB,oBAAoB,mBAAmB;AAE/D,MAAM,eAAe;AACrB,MAAM,cAAc;AACpB,MAAM,cAAc;AACpB,MAAM,gBAAgB;AACtB,MAAM,gBAAgB;AAStB,MAAM,eAAe;AAErB,MAAM,mBAAmB;AACzB,MAAM,oBAAoB;",
+  "sourcesContent": ["export enum ERRORS {\n    ERROR_PERMISSION = 'permissionError',\n    ERROR_NOT_FOUND = 'Not exists',\n    ERROR_DB_CLOSED = 'DB closed',\n}\n\nexport const SYSTEM_ADMIN_USER = 'system.user.admin';\nexport const SYSTEM_ADMIN_GROUP = 'system.group.administrator';\n\nexport const ACCESS_EVERY_EXEC = 0x1;\nexport const ACCESS_EVERY_WRITE = 0x2;\nexport const ACCESS_EVERY_READ = 0x4;\nexport const ACCESS_EVERY_RW = ACCESS_EVERY_WRITE | ACCESS_EVERY_READ;\nexport const ACCESS_EVERY_ALL = ACCESS_EVERY_WRITE | ACCESS_EVERY_READ | ACCESS_EVERY_EXEC;\n\nexport const ACCESS_GROUP_EXEC = 0x10;\nexport const ACCESS_GROUP_WRITE = 0x20;\nexport const ACCESS_GROUP_READ = 0x40;\nexport const ACCESS_GROUP_RW = ACCESS_GROUP_WRITE | ACCESS_GROUP_READ;\nexport const ACCESS_GROUP_ALL = ACCESS_GROUP_WRITE | ACCESS_GROUP_READ | ACCESS_GROUP_EXEC;\n\nexport const ACCESS_USER_EXEC = 0x100;\nexport const ACCESS_USER_WRITE = 0x200;\nexport const ACCESS_USER_READ = 0x400;\nexport const ACCESS_USER_RW = ACCESS_USER_WRITE | ACCESS_USER_READ;\nexport const ACCESS_USER_ALL = ACCESS_USER_WRITE | ACCESS_USER_READ | ACCESS_USER_EXEC;\n\nexport const ACCESS_WRITE = 0x2;\nexport const ACCESS_READ = 0x4;\nexport const ACCESS_LIST = 'list';\nexport const ACCESS_DELETE = 'delete';\nexport const ACCESS_CREATE = 'create';\n\nexport type GenericAccessFlags =\n    typeof ACCESS_WRITE | typeof ACCESS_READ | typeof ACCESS_LIST | typeof ACCESS_DELETE | typeof ACCESS_CREATE;\n\nexport const REG_CHECK_ID = /[*?[\\]]|\\$%\\$/;\n\nexport const USER_STARTS_WITH = 'system.user.';\nexport const GROUP_STARTS_WITH = 'system.group.';\n"],
+  "mappings": ";;;;;;;;;;;;;;;;;;AAAA;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;AAAA,IAAY;CAAZ,SAAYA,SAAM;AACd,EAAAA,QAAA,kBAAA,IAAA;AACA,EAAAA,QAAA,iBAAA,IAAA;AACA,EAAAA,QAAA,iBAAA,IAAA;AACJ,GAJY,WAAA,SAAM,CAAA,EAAA;AAMX,MAAM,oBAAoB;AAC1B,MAAM,qBAAqB;AAE3B,MAAM,oBAAoB;AAC1B,MAAM,qBAAqB;AAC3B,MAAM,oBAAoB;AAC1B,MAAM,kBAAkB,qBAAqB;AAC7C,MAAM,mBAAmB,qBAAqB,oBAAoB;AAElE,MAAM,oBAAoB;AAC1B,MAAM,qBAAqB;AAC3B,MAAM,oBAAoB;AAC1B,MAAM,kBAAkB,qBAAqB;AAC7C,MAAM,mBAAmB,qBAAqB,oBAAoB;AAElE,MAAM,mBAAmB;AACzB,MAAM,oBAAoB;AAC1B,MAAM,mBAAmB;AACzB,MAAM,iBAAiB,oBAAoB;AAC3C,MAAM,kBAAkB,oBAAoB,mBAAmB;AAE/D,MAAM,eAAe;AACrB,MAAM,cAAc;AACpB,MAAM,cAAc;AACpB,MAAM,gBAAgB;AACtB,MAAM,gBAAgB;AAKtB,MAAM,eAAe;AAErB,MAAM,mBAAmB;AACzB,MAAM,oBAAoB;",
   "names": ["ERRORS"]
 }

package/build/cjs/lib/objects/interview.js

@@ -3,6 +3,7 @@ var __defProp = Object.defineProperty;
 var __getOwnPropDesc = Object.getOwnPropertyDescriptor;
 var __getOwnPropNames = Object.getOwnPropertyNames;
 var __hasOwnProp = Object.prototype.hasOwnProperty;
+var __name = (target, value) => __defProp(target, "name", { value, configurable: true });
 var __export = (target, all) => {
   for (var name in all)
     __defProp(target, name, { get: all[name], enumerable: true });
@@ -25,6 +26,7 @@ var import_js_controller_common_db = require("@iobroker/js-controller-common-db"
 function interview(config) {
   return (0, import_js_controller_common_db.defaultRedisInterview)({ config, type: "objects" });
 }
+__name(interview, "interview");
 // Annotate the CommonJS export names for ESM import in node:
 0 && (module.exports = {
   interview

package/build/cjs/lib/objects/interview.js.map

@@ -2,6 +2,6 @@
   "version": 3,
   "sources": ["../../../../src/lib/objects/interview.ts"],
   "sourcesContent": ["import { defaultRedisInterview } from '@iobroker/js-controller-common-db';\n\n/**\n * Custom interview during setup\n *\n * @param config the prefilled database config\n * @returns the database options obtained by the answered questionnaire\n */\nexport function interview(config: ioBroker.ObjectsDatabaseOptions): Promise<ioBroker.ObjectsDatabaseOptions> {\n    return defaultRedisInterview<ioBroker.ObjectsDatabaseOptions>({ config, type: 'objects' });\n}\n"],
-  "mappings": ";;;;;;;;;;;;;;;;;;AAAA;;;;;AAAA,qCAAsC;AAQhC,SAAU,UAAU,QAAuC;AAC7D,aAAO,sDAAuD,EAAE,QAAQ,MAAM,UAAS,CAAE;AAC7F;",
+  "mappings": ";;;;;;;;;;;;;;;;;;;AAAA;;;;;AAAA,qCAAsC;AAQhC,SAAU,UAAU,QAAuC;AAC7D,aAAO,sDAAuD,EAAE,QAAQ,MAAM,UAAS,CAAE;AAC7F;AAFgB;",
   "names": []
 }

package/build/cjs/lib/objects/lua-v3/custom.lua

@@ -8,13 +8,35 @@ cursor = result[1]
 local keys = result[2]
 local argStart = KEYS[1] .. KEYS[2]
 local argEnd = KEYS[1] .. KEYS[3]
+-- Compare bytes: Lua's < uses strcoll(), so it depends on the locale the Redis
+-- server was started with, and argEnd ends in the U+9999 sentinel.
+local sLen = #argStart
+local endHasPrefix = argEnd:sub(1, sLen) == argStart
+local function byteLess(a, b, from)
+    local la, lb = #a, #b
+    local i = from or 1
+    while i <= la and i <= lb do
+        local ca, cb = a:byte(i), b:byte(i)
+        if ca ~= cb then
+            return ca < cb
+        end
+        i = i + 1
+    end
+    return la < lb
+end
+local function inRange(key)
+    if endHasPrefix then
+        return key:sub(1, sLen) == argStart and byteLess(key, argEnd, sLen + 1)
+    end
+    return not byteLess(key, argStart) and byteLess(key, argEnd)
+end
 local checkStr = string.format("%q:{", "custom")
 --  function(doc) {
 --      if (doc.type==="state" && (doc.common.custom || doc.common.history))
 --          emit(doc._id, doc.common.custom || doc.common.history)
 --   }
 for _, key in ipairs(keys) do
-    if (key >= argStart and key < argEnd) then
+    if (inRange(key)) then
         local obj = redis.call("get", key)
         if (obj:find(checkStr) ~= nil) then
             local success, decoded = pcall(cjson.decode, obj)

package/build/cjs/lib/objects/lua-v3/filter.lua

@@ -7,12 +7,34 @@ cursor = result[1]
 local keys = result[2]
 local argStart = KEYS[1] .. KEYS[2]
 local argEnd = KEYS[1] .. KEYS[3]
+-- Compare bytes: Lua's < uses strcoll(), so it depends on the locale the Redis
+-- server was started with, and argEnd ends in the U+9999 sentinel.
+local sLen = #argStart
+local endHasPrefix = argEnd:sub(1, sLen) == argStart
+local function byteLess(a, b, from)
+    local la, lb = #a, #b
+    local i = from or 1
+    while i <= la and i <= lb do
+        local ca, cb = a:byte(i), b:byte(i)
+        if ca ~= cb then
+            return ca < cb
+        end
+        i = i + 1
+    end
+    return la < lb
+end
+local function inRange(key)
+    if endHasPrefix then
+        return key:sub(1, sLen) == argStart and byteLess(key, argEnd, sLen + 1)
+    end
+    return not byteLess(key, argStart) and byteLess(key, argEnd)
+end
 local type = KEYS[4]
 local checkStr = string.format("%q:%q", "type", type)
 local skipCheck = not (type == "channel" or type == "device" or type == "folder")
 -- function(doc) { if (doc.type === "chart") emit(doc._id, doc); }
 for _, key in ipairs(keys) do
-    if (key >= argStart and key < argEnd) then
+    if (inRange(key)) then
         local obj = redis.call("get", key)
         if (skipCheck or obj:find(checkStr) ~= nil) then
             local success, decoded = pcall(cjson.decode, obj)

package/build/cjs/lib/objects/lua-v3/programs.lua

@@ -7,6 +7,28 @@ cursor = result[1]
 local keys = result[2]
 local argStart = KEYS[1] .. KEYS[2]
 local argEnd = KEYS[1] .. KEYS[3]
+-- Compare bytes: Lua's < uses strcoll(), so it depends on the locale the Redis
+-- server was started with, and argEnd ends in the U+9999 sentinel.
+local sLen = #argStart
+local endHasPrefix = argEnd:sub(1, sLen) == argStart
+local function byteLess(a, b, from)
+    local la, lb = #a, #b
+    local i = from or 1
+    while i <= la and i <= lb do
+        local ca, cb = a:byte(i), b:byte(i)
+        if ca ~= cb then
+            return ca < cb
+        end
+        i = i + 1
+    end
+    return la < lb
+end
+local function inRange(key)
+    if endHasPrefix then
+        return key:sub(1, sLen) == argStart and byteLess(key, argEnd, sLen + 1)
+    end
+    return not byteLess(key, argStart) and byteLess(key, argEnd)
+end
 local checkStr = string.format("%q:%q", "TypeName", "PROGRAM")
 --  function(doc) {
 --      if (doc._id.match(/^hm-rega\\.[0-9]+\\.[0-9,A-Z,a-z]+/) && (doc.native.TypeName === "PROGRAM")) {
@@ -14,7 +36,7 @@ local checkStr = string.format("%q:%q", "TypeName", "PROGRAM")
 --      }
 --  }
 for _, key in ipairs(keys) do
-    if (key >= argStart and key < argEnd and key:sub(7, 13) == "hm-rega") then
+    if (inRange(key) and key:sub(7, 13) == "hm-rega") then
         local obj = redis.call("get", key)
         if (obj:find(checkStr) ~= nil) then
             local success, decoded = pcall(cjson.decode, obj)

package/build/cjs/lib/objects/lua-v3/script.lua

@@ -7,11 +7,33 @@ cursor = result[1]
 local keys = result[2]
 local argStart = KEYS[1] .. KEYS[2]
 local argEnd = KEYS[1] .. KEYS[3]
+-- Compare bytes: Lua's < uses strcoll(), so it depends on the locale the Redis
+-- server was started with, and argEnd ends in the U+9999 sentinel.
+local sLen = #argStart
+local endHasPrefix = argEnd:sub(1, sLen) == argStart
+local function byteLess(a, b, from)
+    local la, lb = #a, #b
+    local i = from or 1
+    while i <= la and i <= lb do
+        local ca, cb = a:byte(i), b:byte(i)
+        if ca ~= cb then
+            return ca < cb
+        end
+        i = i + 1
+    end
+    return la < lb
+end
+local function inRange(key)
+    if endHasPrefix then
+        return key:sub(1, sLen) == argStart and byteLess(key, argEnd, sLen + 1)
+    end
+    return not byteLess(key, argStart) and byteLess(key, argEnd)
+end
 local checkStr = string.format("%q:%q", "type", "script")
 --  function(doc) {
 --      if (doc.type === "script" && doc.common.engineType.match(/^[jJ]ava[sS]cript|^[cC]offee[sS]cript|^[tT]ype[sS]cript|^Blockly/)) emit(doc.common.name, doc); }
 for _, key in ipairs(keys) do
-    if (key >= argStart and key < argEnd) then
+    if (inRange(key)) then
         local obj = redis.call("get", key)
         if (obj:find(checkStr) ~= nil) then
             local success, decoded = pcall(cjson.decode, obj)

package/build/cjs/lib/objects/lua-v3/variables.lua

@@ -8,6 +8,28 @@ cursor = result[1]
 local keys = result[2]
 local argStart = KEYS[1] .. KEYS[2]
 local argEnd = KEYS[1] .. KEYS[3]
+-- Compare bytes: Lua's < uses strcoll(), so it depends on the locale the Redis
+-- server was started with, and argEnd ends in the U+9999 sentinel.
+local sLen = #argStart
+local endHasPrefix = argEnd:sub(1, sLen) == argStart
+local function byteLess(a, b, from)
+    local la, lb = #a, #b
+    local i = from or 1
+    while i <= la and i <= lb do
+        local ca, cb = a:byte(i), b:byte(i)
+        if ca ~= cb then
+            return ca < cb
+        end
+        i = i + 1
+    end
+    return la < lb
+end
+local function inRange(key)
+    if endHasPrefix then
+        return key:sub(1, sLen) == argStart and byteLess(key, argEnd, sLen + 1)
+    end
+    return not byteLess(key, argStart) and byteLess(key, argEnd)
+end
 local checkStr = string.format("%q:", "TypeName");
 --  function(doc) {
 --      if (doc._id.match(/^hm-rega\\.[0-9]+\\.[0-9,A-Z,a-z]+/) && (doc.native.TypeName === "ALARMDP" || doc.native.TypeName === "VARDP")) {
@@ -15,7 +37,7 @@ local checkStr = string.format("%q:", "TypeName");
 --      }
 --  }
 for _, key in ipairs(keys) do
-    if (key >= argStart and key < argEnd and key:sub(7, 13) == "hm-rega") then
+    if (inRange(key) and key:sub(7, 13) == "hm-rega") then
         local obj = redis.call("get", key)
         if (obj:find(checkStr) ~= nil) then
             local success, decoded = pcall(cjson.decode, obj)

package/build/cjs/lib/objects/lua-v4/custom.lua

@@ -8,12 +8,34 @@ cursor = result[1]
 local keys = result[2]
 local argStart = KEYS[1] .. KEYS[2]
 local argEnd = KEYS[1] .. KEYS[3]
+-- Compare bytes: Lua's < uses strcoll(), so it depends on the locale the Redis
+-- server was started with, and argEnd ends in the U+9999 sentinel.
+local sLen = #argStart
+local endHasPrefix = argEnd:sub(1, sLen) == argStart
+local function byteLess(a, b, from)
+    local la, lb = #a, #b
+    local i = from or 1
+    while i <= la and i <= lb do
+        local ca, cb = a:byte(i), b:byte(i)
+        if ca ~= cb then
+            return ca < cb
+        end
+        i = i + 1
+    end
+    return la < lb
+end
+local function inRange(key)
+    if endHasPrefix then
+        return key:sub(1, sLen) == argStart and byteLess(key, argEnd, sLen + 1)
+    end
+    return not byteLess(key, argStart) and byteLess(key, argEnd)
+end
 --  function(doc) {
 --      if (doc.type==="state" && (doc.common.custom || doc.common.history))
 --          emit(doc._id, doc.common.custom || doc.common.history)
 --   }
 for _, key in ipairs(keys) do
-    if (key >= argStart and key < argEnd) then
+    if (inRange(key)) then
         rep[#rep + 1] = redis.call("get", key)
     end
 end

package/build/cjs/lib/objects/lua-v4/filter.lua

@@ -7,9 +7,31 @@ cursor = result[1]
 local keys = result[2]
 local argStart = KEYS[1] .. KEYS[2]
 local argEnd = KEYS[1] .. KEYS[3]
+-- Compare bytes: Lua's < uses strcoll(), so it depends on the locale the Redis
+-- server was started with, and argEnd ends in the U+9999 sentinel.
+local sLen = #argStart
+local endHasPrefix = argEnd:sub(1, sLen) == argStart
+local function byteLess(a, b, from)
+    local la, lb = #a, #b
+    local i = from or 1
+    while i <= la and i <= lb do
+        local ca, cb = a:byte(i), b:byte(i)
+        if ca ~= cb then
+            return ca < cb
+        end
+        i = i + 1
+    end
+    return la < lb
+end
+local function inRange(key)
+    if endHasPrefix then
+        return key:sub(1, sLen) == argStart and byteLess(key, argEnd, sLen + 1)
+    end
+    return not byteLess(key, argStart) and byteLess(key, argEnd)
+end
 -- function(doc) { if (doc.type === "chart") emit(doc._id, doc); }
 for _, key in ipairs(keys) do
-    if (key >= argStart and key < argEnd) then
+    if (inRange(key)) then
         rep[#rep + 1] = redis.call("get", key)
     end
 end

package/build/cjs/lib/objects/lua-v4/programs.lua

@@ -7,6 +7,28 @@ cursor = result[1]
 local keys = result[2]
 local argStart = KEYS[1] .. KEYS[2]
 local argEnd = KEYS[1] .. KEYS[3]
+-- Compare bytes: Lua's < uses strcoll(), so it depends on the locale the Redis
+-- server was started with, and argEnd ends in the U+9999 sentinel.
+local sLen = #argStart
+local endHasPrefix = argEnd:sub(1, sLen) == argStart
+local function byteLess(a, b, from)
+    local la, lb = #a, #b
+    local i = from or 1
+    while i <= la and i <= lb do
+        local ca, cb = a:byte(i), b:byte(i)
+        if ca ~= cb then
+            return ca < cb
+        end
+        i = i + 1
+    end
+    return la < lb
+end
+local function inRange(key)
+    if endHasPrefix then
+        return key:sub(1, sLen) == argStart and byteLess(key, argEnd, sLen + 1)
+    end
+    return not byteLess(key, argStart) and byteLess(key, argEnd)
+end
 local checkStr = string.format("%q:%q", "TypeName", "PROGRAM")
 --  function(doc) {
 --      if (doc._id.match(/^hm-rega\\.[0-9]+\\.[0-9,A-Z,a-z]+/) && (doc.native.TypeName === "PROGRAM")) {
@@ -14,7 +36,7 @@ local checkStr = string.format("%q:%q", "TypeName", "PROGRAM")
 --      }
 --  }
 for _, key in ipairs(keys) do
-    if (key >= argStart and key < argEnd) then
+    if (inRange(key)) then
         local obj = redis.call("get", key)
         if (obj:find(checkStr) ~= nil) then
             local success, decoded = pcall(cjson.decode, obj)

package/build/cjs/lib/objects/lua-v4/script.lua

@@ -7,10 +7,32 @@ cursor = result[1]
 local keys = result[2]
 local argStart = KEYS[1] .. KEYS[2]
 local argEnd = KEYS[1] .. KEYS[3]
+-- Compare bytes: Lua's < uses strcoll(), so it depends on the locale the Redis
+-- server was started with, and argEnd ends in the U+9999 sentinel.
+local sLen = #argStart
+local endHasPrefix = argEnd:sub(1, sLen) == argStart
+local function byteLess(a, b, from)
+    local la, lb = #a, #b
+    local i = from or 1
+    while i <= la and i <= lb do
+        local ca, cb = a:byte(i), b:byte(i)
+        if ca ~= cb then
+            return ca < cb
+        end
+        i = i + 1
+    end
+    return la < lb
+end
+local function inRange(key)
+    if endHasPrefix then
+        return key:sub(1, sLen) == argStart and byteLess(key, argEnd, sLen + 1)
+    end
+    return not byteLess(key, argStart) and byteLess(key, argEnd)
+end
 --  function(doc) {
 --      if (doc.type === "script" && doc.common.engineType.match(/^[jJ]ava[sS]cript|^[cC]offee[sS]cript|^[tT]ype[sS]cript|^Blockly/)) emit(doc.common.name, doc); }
 for _, key in ipairs(keys) do
-    if (key >= argStart and key < argEnd) then
+    if (inRange(key)) then
         rep[#rep + 1] = redis.call("get", key)
     end
 end

package/build/cjs/lib/objects/lua-v4/variables.lua

@@ -8,6 +8,28 @@ cursor = result[1]
 local keys = result[2]
 local argStart = KEYS[1] .. KEYS[2]
 local argEnd = KEYS[1] .. KEYS[3]
+-- Compare bytes: Lua's < uses strcoll(), so it depends on the locale the Redis
+-- server was started with, and argEnd ends in the U+9999 sentinel.
+local sLen = #argStart
+local endHasPrefix = argEnd:sub(1, sLen) == argStart
+local function byteLess(a, b, from)
+    local la, lb = #a, #b
+    local i = from or 1
+    while i <= la and i <= lb do
+        local ca, cb = a:byte(i), b:byte(i)
+        if ca ~= cb then
+            return ca < cb
+        end
+        i = i + 1
+    end
+    return la < lb
+end
+local function inRange(key)
+    if endHasPrefix then
+        return key:sub(1, sLen) == argStart and byteLess(key, argEnd, sLen + 1)
+    end
+    return not byteLess(key, argStart) and byteLess(key, argEnd)
+end
 local checkStr = string.format("%q:", "TypeName");
 --  function(doc) {
 --      if (doc._id.match(/^hm-rega\\.[0-9]+\\.[0-9,A-Z,a-z]+/) && (doc.native.TypeName === "ALARMDP" || doc.native.TypeName === "VARDP")) {
@@ -15,7 +37,7 @@ local checkStr = string.format("%q:", "TypeName");
 --      }
 --  }
 for _, key in ipairs(keys) do
-    if (key >= argStart and key < argEnd) then
+    if (inRange(key)) then
         local obj = redis.call("get", key)
         if (obj:find(checkStr) ~= nil) then
             local success, decoded = pcall(cjson.decode, obj)

package/build/cjs/lib/objects/lua-v4-no-sets/custom.lua

@@ -8,13 +8,35 @@ cursor = result[1]
 local keys = result[2]
 local argStart = KEYS[1] .. KEYS[2]
 local argEnd = KEYS[1] .. KEYS[3]
+-- Compare bytes: Lua's < uses strcoll(), so it depends on the locale the Redis
+-- server was started with, and argEnd ends in the U+9999 sentinel.
+local sLen = #argStart
+local endHasPrefix = argEnd:sub(1, sLen) == argStart
+local function byteLess(a, b, from)
+    local la, lb = #a, #b
+    local i = from or 1
+    while i <= la and i <= lb do
+        local ca, cb = a:byte(i), b:byte(i)
+        if ca ~= cb then
+            return ca < cb
+        end
+        i = i + 1
+    end
+    return la < lb
+end
+local function inRange(key)
+    if endHasPrefix then
+        return key:sub(1, sLen) == argStart and byteLess(key, argEnd, sLen + 1)
+    end
+    return not byteLess(key, argStart) and byteLess(key, argEnd)
+end
 local checkStr = string.format("%q:{", "custom")
 --  function(doc) {
 --      if (doc.type==="state" && (doc.common.custom || doc.common.history))
 --          emit(doc._id, doc.common.custom || doc.common.history)
 --   }
 for _, key in ipairs(keys) do
-    if (key >= argStart and key < argEnd) then
+    if (inRange(key)) then
         local obj = redis.call("get", key)
         if (obj:find(checkStr) ~= nil) then
             local success, decoded = pcall(cjson.decode, obj)

package/build/cjs/lib/objects/lua-v4-no-sets/filter.lua

@@ -7,12 +7,34 @@ cursor = result[1]
 local keys = result[2]
 local argStart = KEYS[1] .. KEYS[2]
 local argEnd = KEYS[1] .. KEYS[3]
+-- Compare bytes: Lua's < uses strcoll(), so it depends on the locale the Redis
+-- server was started with, and argEnd ends in the U+9999 sentinel.
+local sLen = #argStart
+local endHasPrefix = argEnd:sub(1, sLen) == argStart
+local function byteLess(a, b, from)
+    local la, lb = #a, #b
+    local i = from or 1
+    while i <= la and i <= lb do
+        local ca, cb = a:byte(i), b:byte(i)
+        if ca ~= cb then
+            return ca < cb
+        end
+        i = i + 1
+    end
+    return la < lb
+end
+local function inRange(key)
+    if endHasPrefix then
+        return key:sub(1, sLen) == argStart and byteLess(key, argEnd, sLen + 1)
+    end
+    return not byteLess(key, argStart) and byteLess(key, argEnd)
+end
 local type = KEYS[4]
 local checkStr = string.format("%q:%q", "type", type)
 local skipCheck = not (type == "channel" or type == "device" or type == "folder")
 -- function(doc) { if (doc.type === "chart") emit(doc._id, doc); }
 for _, key in ipairs(keys) do
-    if (key >= argStart and key < argEnd) then
+    if (inRange(key)) then
         local obj = redis.call("get", key)
         if (skipCheck or obj:find(checkStr) ~= nil) then
             local success, decoded = pcall(cjson.decode, obj)

package/build/cjs/lib/objects/lua-v4-no-sets/programs.lua

@@ -7,6 +7,28 @@ cursor = result[1]
 local keys = result[2]
 local argStart = KEYS[1] .. KEYS[2]
 local argEnd = KEYS[1] .. KEYS[3]
+-- Compare bytes: Lua's < uses strcoll(), so it depends on the locale the Redis
+-- server was started with, and argEnd ends in the U+9999 sentinel.
+local sLen = #argStart
+local endHasPrefix = argEnd:sub(1, sLen) == argStart
+local function byteLess(a, b, from)
+    local la, lb = #a, #b
+    local i = from or 1
+    while i <= la and i <= lb do
+        local ca, cb = a:byte(i), b:byte(i)
+        if ca ~= cb then
+            return ca < cb
+        end
+        i = i + 1
+    end
+    return la < lb
+end
+local function inRange(key)
+    if endHasPrefix then
+        return key:sub(1, sLen) == argStart and byteLess(key, argEnd, sLen + 1)
+    end
+    return not byteLess(key, argStart) and byteLess(key, argEnd)
+end
 local checkStr = string.format("%q:%q", "TypeName", "PROGRAM")
 --  function(doc) {
 --      if (doc._id.match(/^hm-rega\\.[0-9]+\\.[0-9,A-Z,a-z]+/) && (doc.native.TypeName === "PROGRAM")) {
@@ -14,7 +36,7 @@ local checkStr = string.format("%q:%q", "TypeName", "PROGRAM")
 --      }
 --  }
 for _, key in ipairs(keys) do
-    if (key >= argStart and key < argEnd and key:sub(7, 13) == "hm-rega") then
+    if (inRange(key) and key:sub(7, 13) == "hm-rega") then
         local obj = redis.call("get", key)
         if (obj:find(checkStr) ~= nil) then
             local success, decoded = pcall(cjson.decode, obj)

package/build/cjs/lib/objects/lua-v4-no-sets/script.lua

@@ -7,11 +7,33 @@ cursor = result[1]
 local keys = result[2]
 local argStart = KEYS[1] .. KEYS[2]
 local argEnd = KEYS[1] .. KEYS[3]
+-- Compare bytes: Lua's < uses strcoll(), so it depends on the locale the Redis
+-- server was started with, and argEnd ends in the U+9999 sentinel.
+local sLen = #argStart
+local endHasPrefix = argEnd:sub(1, sLen) == argStart
+local function byteLess(a, b, from)
+    local la, lb = #a, #b
+    local i = from or 1
+    while i <= la and i <= lb do
+        local ca, cb = a:byte(i), b:byte(i)
+        if ca ~= cb then
+            return ca < cb
+        end
+        i = i + 1
+    end
+    return la < lb
+end
+local function inRange(key)
+    if endHasPrefix then
+        return key:sub(1, sLen) == argStart and byteLess(key, argEnd, sLen + 1)
+    end
+    return not byteLess(key, argStart) and byteLess(key, argEnd)
+end
 local checkStr = string.format("%q:%q", "type", "script")
 --  function(doc) {
 --      if (doc.type === "script" && doc.common.engineType.match(/^[jJ]ava[sS]cript|^[cC]offee[sS]cript|^[tT]ype[sS]cript|^Blockly/)) emit(doc.common.name, doc); }
 for _, key in ipairs(keys) do
-    if (key >= argStart and key < argEnd) then
+    if (inRange(key)) then
         local obj = redis.call("get", key)
         if (obj:find(checkStr) ~= nil) then
             local success, decoded = pcall(cjson.decode, obj)

package/build/cjs/lib/objects/lua-v4-no-sets/variables.lua

@@ -8,6 +8,28 @@ cursor = result[1]
 local keys = result[2]
 local argStart = KEYS[1] .. KEYS[2]
 local argEnd = KEYS[1] .. KEYS[3]
+-- Compare bytes: Lua's < uses strcoll(), so it depends on the locale the Redis
+-- server was started with, and argEnd ends in the U+9999 sentinel.
+local sLen = #argStart
+local endHasPrefix = argEnd:sub(1, sLen) == argStart
+local function byteLess(a, b, from)
+    local la, lb = #a, #b
+    local i = from or 1
+    while i <= la and i <= lb do
+        local ca, cb = a:byte(i), b:byte(i)
+        if ca ~= cb then
+            return ca < cb
+        end
+        i = i + 1
+    end
+    return la < lb
+end
+local function inRange(key)
+    if endHasPrefix then
+        return key:sub(1, sLen) == argStart and byteLess(key, argEnd, sLen + 1)
+    end
+    return not byteLess(key, argStart) and byteLess(key, argEnd)
+end
 local checkStr = string.format("%q:", "TypeName");
 --  function(doc) {
 --      if (doc._id.match(/^hm-rega\\.[0-9]+\\.[0-9,A-Z,a-z]+/) && (doc.native.TypeName === "ALARMDP" || doc.native.TypeName === "VARDP")) {
@@ -15,7 +37,7 @@ local checkStr = string.format("%q:", "TypeName");
 --      }
 --  }
 for _, key in ipairs(keys) do
-    if (key >= argStart and key < argEnd and key:sub(7, 13) == "hm-rega") then
+    if (inRange(key) and key:sub(7, 13) == "hm-rega") then
         local obj = redis.call("get", key)
         if (obj:find(checkStr) ~= nil) then
             local success, decoded = pcall(cjson.decode, obj)