feat(marksilo): opsætningsmodel (til/fra, gårdlagre, x 1-10, tærskel) + records

2026-09-27 10:40:24 +02:00
parent 1a8931116b
commit e9272b8b8f
2 changed files with 109 additions and 0 deletions
@@ -0,0 +1,76 @@
+-- AD Field Silo Config
+-- Marksilo-flowets opsætning som ren model (ny tabel ud, input muteres ikke) + flade records til XML-laget.
+
+ADFieldSiloConfig = {}
+
+ADFieldSiloConfig.MAX_VEHICLES = 10
+ADFieldSiloConfig.DEFAULT_MAX_VEHICLES = 2
+ADFieldSiloConfig.MIN_LITERS_CHOICES = {5000, 10000, 25000, 50000}
+ADFieldSiloConfig.DEFAULT_MIN_LITERS = 10000
+
+local function copy(cfg)
+    local ids = {}
+    for index, id in ipairs(cfg.storeIds or {}) do ids[index] = id end
+    return {enabled = cfg.enabled == true, storeIds = ids, maxVehicles = cfg.maxVehicles, minLiters = cfg.minLiters}
+end
+
+local function clampVehicles(value)
+    value = tonumber(value) or ADFieldSiloConfig.DEFAULT_MAX_VEHICLES
+    return math.max(1, math.min(ADFieldSiloConfig.MAX_VEHICLES, math.floor(value)))
+end
+
+local function snapLiters(value)
+    value = tonumber(value)
+    if value == nil then return ADFieldSiloConfig.DEFAULT_MIN_LITERS end
+    local best, bestDiff = nil, nil
+    for _, choice in ipairs(ADFieldSiloConfig.MIN_LITERS_CHOICES) do
+        local diff = math.abs(choice - value)
+        if bestDiff == nil or diff < bestDiff then best, bestDiff = choice, diff end
+    end
+    return best
+end
+
+function ADFieldSiloConfig.new()
+    return {enabled = false, storeIds = {}, maxVehicles = ADFieldSiloConfig.DEFAULT_MAX_VEHICLES, minLiters = ADFieldSiloConfig.DEFAULT_MIN_LITERS}
+end
+
+function ADFieldSiloConfig.with(cfg, changes)
+    local new = copy(cfg)
+    if changes.enabled ~= nil then new.enabled = changes.enabled == true end
+    if changes.maxVehicles ~= nil then new.maxVehicles = clampVehicles(changes.maxVehicles) end
+    if changes.minLiters ~= nil then new.minLiters = snapLiters(changes.minLiters) end
+    return new
+end
+
+function ADFieldSiloConfig.hasStore(cfg, id)
+    for _, storeId in ipairs(cfg.storeIds or {}) do
+        if storeId == id then return true end
+    end
+    return false
+end
+
+function ADFieldSiloConfig.toggleStore(cfg, id)
+    local new = copy(cfg)
+    local kept, found = {}, false
+    for _, storeId in ipairs(new.storeIds) do
+        if storeId == id then found = true else table.insert(kept, storeId) end
+    end
+    if not found then table.insert(kept, id) end
+    new.storeIds = kept
+    return new
+end
+
+function ADFieldSiloConfig.toRecord(cfg)
+    return {enabled = cfg.enabled and 1 or 0, stores = table.concat(cfg.storeIds or {}, " "),
+        maxVehicles = cfg.maxVehicles, minLiters = cfg.minLiters}
+end
+
+function ADFieldSiloConfig.fromRecord(record)
+    local cfg = ADFieldSiloConfig.new()
+    if record == nil then return cfg end
+    for token in string.gmatch(tostring(record.stores or ""), "%S+") do table.insert(cfg.storeIds, token) end
+    cfg.enabled = tonumber(record.enabled) == 1
+    cfg.maxVehicles = clampVehicles(record.maxVehicles)
+    cfg.minLiters = snapLiters(record.minLiters)
+    return cfg
+end