ConfigPanel.lua

local _, NS = ...
local ConfigPanel = {}

-- BSP-008: i18n hook. Identity today; future Locale ticket retrofits L.
local function L(s) return s end

-- BSP-009: GameTooltip helper for widget hover help. Mirrors HistoryPanel's
-- AttachTooltip; duplicated locally because the two files are independent
-- and a single shared module would require .toc load-order plumbing for
-- minor gain. `widget.frame or widget` is a historical AceGUI compatibility
-- fallback retained so any future widget wrapper that exposes `.frame` still
-- works without a refactor. EnableMouse is asserted because BackdropTemplate
-- hosts default mouse-disabled.
local function AttachTooltip(widget, title, body, hint)
  if not widget then return end
  local host = widget.frame or widget
  if not host.HookScript then return end
  if host.EnableMouse then host:EnableMouse(true) end
  host:HookScript("OnEnter", function(self)
    if not GameTooltip then return end
    GameTooltip:SetOwner(self, "ANCHOR_RIGHT")
    if title then GameTooltip:AddLine(L(title)) end
    if body  then GameTooltip:AddLine(L(body),  1.00, 1.00, 1.00, true) end
    if hint  then GameTooltip:AddLine(L(hint),  0.70, 0.70, 0.70, true) end
    GameTooltip:Show()
  end)
  host:HookScript("OnLeave", function()
    if GameTooltip then GameTooltip:Hide() end
  end)
end

local DEFAULT_WIDTH = 700
local DEFAULT_HEIGHT = 500
local MIN_WIDTH = 600
local MIN_HEIGHT = 400
local NAV_WIDTH = 128
local CONTENT_PAD = 14
local ROW_HEIGHT = 32
local PAGE_ROWS = 8

local SECTIONS = {
  "Detection",
  "Categories",
  "Surfaces",
  "Allowlist",
  "Blocked",
  "History",
  "UI",
  "Dev",
}

local CATEGORY_KEYS = { "RMT", "Boosting", "Casino", "Phishing", "Commercial", "Anti" }

local SURFACE_KEYS = { "chat", "whisper", "bn-whisper" }
local SURFACE_LABELS = {
  chat              = "Chat",
  whisper           = "Whisper",
  ["bn-whisper"]    = "Bnet whisper",
}

local DEFAULT_SETTINGS = {
  threshold = 4,
  enabledCategories = {
    RMT = true,
    Boosting = true,
    Casino = true,
    Phishing = true,
    Commercial = true,
    Anti = true,
  },
  mixedScriptEnabled = true,
  mixedScriptWeight = 1,
  antiSignalCap = -5,
  filterBubbles = false,
  historyMaxEntries = 300,
  historyGlobalMaxEntries = 1000,
  showMinimapButton = true,
  devMode = false,
}

local frame
local content
local navButtons = {}
local activeSection = "Detection"
local sizeDirty
local embeddedMode
local initialized
local popupsRegistered
-- BSP-022: aceWidgets ringbuffer removed in Commit 3 (Slider/CheckBox went
-- native then). MultiLineEditBox dialog went native in Commit 4. ConfigPanel
-- no longer touches AceGUI at all; embed removal lands in Commit 5.
local nativeChildren = {}
local sectionStatus = {}
local removedAllowlistEntry
local pendingImport
local pendingHistoryMax
local pendingHistoryGlobalMax
local dialogFrame

local listState = {
  allowlistSearch = "",
  allowlistPage = 1,
  allowlistAddText = "",
  blockedSearch = "",
  blockedPage = 1,
}

local function Print(message)
  message = "|cff33ff99Sift|r " .. tostring(message)
  if DEFAULT_CHAT_FRAME and DEFAULT_CHAT_FRAME.AddMessage then
    DEFAULT_CHAT_FRAME:AddMessage(message)
  else
    print(message)
  end
end

local function Now()
  if type(GetServerTime) == "function" then
    return GetServerTime()
  end
  return time()
end

local function GetSettings()
  if NS.DB and NS.DB.GetSettings then
    return NS.DB.GetSettings()
  end
  return nil
end

local function GetGlobal()
  if NS.DB and NS.DB.GetGlobal then
    return NS.DB.GetGlobal()
  end
  return nil
end

local function GetChar()
  if NS.DB and NS.DB.GetChar then
    return NS.DB.GetChar()
  end
  local db = NS.DB and NS.DB.db
  return db and db.char
end

local function GetHistoryStats()
  if NS.History and NS.History.GetStats then
    return NS.History.GetStats()
  end

  local entries = NS.History and NS.History.GetAll and NS.History.GetAll() or {}
  return {
    lifetime = {
      detections = #entries,
      blocked = #entries,
      restored = 0,
    },
    retained = {
      detections = #entries,
      blocked = #entries,
      restored = 0,
    },
  }
end

local function CopyTable(tbl)
  local out = {}
  if type(tbl) == "table" then
    for key, value in pairs(tbl) do
      out[key] = value
    end
  end
  return out
end

local function SettingValue(key)
  local settings = GetSettings()
  if settings and settings[key] ~= nil then
    return settings[key]
  end
  return DEFAULT_SETTINGS[key]
end

local function SetSetting(key, value)
  if NS.DB and NS.DB.SetSetting then
    return NS.DB.SetSetting(key, value) ~= nil
  end

  local settings = GetSettings()
  if settings then
    settings[key] = value
    return true
  end
  return false
end

local function SetFilterBubblesEnabled(value)
  value = value == true
  SetSetting("filterBubbles", value)
  if not value and NS.BubbleSuppressor and NS.BubbleSuppressor.MaybeRestore then
    NS.BubbleSuppressor.MaybeRestore()
  end
end

local function ResetSettings()
  if NS.DB and NS.DB.ResetSettings then
    NS.DB.ResetSettings()
    return true
  end

  local settings = GetSettings()
  if not settings then
    return false
  end

  for key in pairs(settings) do
    settings[key] = nil
  end
  for key, value in pairs(DEFAULT_SETTINGS) do
    if type(value) == "table" then
      settings[key] = CopyTable(value)
    else
      settings[key] = value
    end
  end
  return true
end

local function ClampNumber(value, minValue, maxValue, fallback)
  value = tonumber(value) or fallback
  if value < minValue then value = minValue end
  if value > maxValue then value = maxValue end
  return value
end

local function ClearTable(tbl)
  if type(wipe) == "function" then
    wipe(tbl)
    return
  end
  for key in pairs(tbl) do
    tbl[key] = nil
  end
end

local function GetCharStore()
  local char = GetChar()
  if not char then
    return nil
  end
  char.configPanel = char.configPanel or {}
  return char.configPanel
end

local function SavePosition()
  if not frame then
    return
  end
  local store = GetCharStore()
  if not store then
    return
  end
  store.x = frame:GetLeft()
  store.y = frame:GetTop()
end

local function SaveSize()
  if not frame then
    return
  end
  local store = GetCharStore()
  if not store then
    return
  end
  store.width = frame:GetWidth()
  store.height = frame:GetHeight()
  sizeDirty = false
end

local function ApplyStoredGeometry()
  local store = GetCharStore() or {}
  local width = ClampNumber(store.width, MIN_WIDTH, 2000, DEFAULT_WIDTH)
  local height = ClampNumber(store.height, MIN_HEIGHT, 1600, DEFAULT_HEIGHT)

  frame:SetSize(width, height)
  frame:ClearAllPoints()
  if store.x and store.y then
    frame:SetPoint("TOPLEFT", UIParent, "BOTTOMLEFT", store.x, store.y)
  else
    frame:SetPoint("CENTER", UIParent, "CENTER", 0, 0)
  end
end

local function TrackNative(child)
  nativeChildren[#nativeChildren + 1] = child
  return child
end

local function ReleaseNativeChild(child)
  if not child then return end

  if child.GetRegions then
    for i = 1, select("#", child:GetRegions()) do
      local region = select(i, child:GetRegions())
      if region and region.Hide then
        region:Hide()
      end
      if region and region.ClearAllPoints then
        region:ClearAllPoints()
      end
    end
  end

  if child.GetChildren then
    for i = 1, select("#", child:GetChildren()) do
      ReleaseNativeChild(select(i, child:GetChildren()))
    end
  end

  if child.Hide then child:Hide() end
  if child.ClearAllPoints then child:ClearAllPoints() end
end

local function ReleaseContent()
  for _, child in ipairs(nativeChildren) do
    ReleaseNativeChild(child)
  end
  nativeChildren = {}
end

local function AddText(text, template, x, y, width)
  local fs = TrackNative(content:CreateFontString(nil, "OVERLAY", template or "GameFontNormal"))
  fs:SetPoint("TOPLEFT", content, "TOPLEFT", x or CONTENT_PAD, y)
  if width then
    fs:SetWidth(width)
  else
    fs:SetPoint("RIGHT", content, "RIGHT", -CONTENT_PAD, 0)
  end
  fs:SetJustifyH("LEFT")
  fs:SetText(text or "")
  fs:Show()
  return fs
end

local function AddSectionTitle(title, subtitle)
  AddText(title, "GameFontNormalLarge", CONTENT_PAD, -12)
  if subtitle and subtitle ~= "" then
    local body = AddText(subtitle, "GameFontHighlightSmall", CONTENT_PAD, -36)
    body:SetWordWrap(true)
    return -70
  end
  return -48
end

local function AddStatus(y, message, good)
  if not message or message == "" then
    return y
  end

  local text = good and "|cff5ad080" or "|cffffd100"
  AddText(text .. message .. "|r", "GameFontHighlightSmall", CONTENT_PAD, y)
  return y - 22
end

local function AddNativeButton(label, x, y, width, onClick, tooltipBody)
  local button = TrackNative(CreateFrame("Button", nil, content, "UIPanelButtonTemplate"))
  button:SetSize(width or 120, 24)
  button:SetPoint("TOPLEFT", content, "TOPLEFT", x, y)
  button:SetText(label)
  button:SetScript("OnClick", onClick)
  if tooltipBody then AttachTooltip(button, label, tooltipBody) end
  button:Show()
  return button
end

local function AddEditBox(x, y, width, initialText, tooltipTitle, tooltipBody)
  local editBox = TrackNative(CreateFrame("EditBox", nil, content, "InputBoxTemplate"))
  editBox:SetSize(width or 180, 24)
  editBox:SetPoint("TOPLEFT", content, "TOPLEFT", x, y)
  editBox:SetAutoFocus(false)
  editBox:SetText(initialText or "")
  if tooltipTitle then AttachTooltip(editBox, tooltipTitle, tooltipBody) end
  editBox:Show()
  return editBox
end

local function AddDisabledRow(label, value, y)
  local row = TrackNative(CreateFrame("Frame", nil, content, "BackdropTemplate"))
  row:SetHeight(30)
  row:SetPoint("TOPLEFT", content, "TOPLEFT", CONTENT_PAD, y)
  row:SetPoint("RIGHT", content, "RIGHT", -CONTENT_PAD, 0)
  if row.SetBackdrop then
    row:SetBackdrop({ bgFile = "Interface\\Buttons\\WHITE8X8" })
    row:SetBackdropColor(0.12, 0.12, 0.14, 0.55)
  end
  row:Show()

  local left = TrackNative(row:CreateFontString(nil, "OVERLAY", "GameFontDisable"))
  left:SetPoint("LEFT", row, "LEFT", 8, 0)
  left:SetJustifyH("LEFT")
  left:SetText(label)
  left:Show()

  local right = TrackNative(row:CreateFontString(nil, "OVERLAY", "GameFontDisableSmall"))
  right:SetPoint("RIGHT", row, "RIGHT", -8, 0)
  right:SetJustifyH("RIGHT")
  right:SetText(value)
  right:Show()

  return y - 36
end

-- BSP-022 Commit 2: native sliders, dual-path.
-- Retail uses MinimalSliderWithSteppersTemplate (MWS) — the modern Settings-UI
-- slider with stepper buttons on each end, matching the look of Edit Mode and
-- Retail's Settings panels. Classic-family falls back to OptionsSliderTemplate
-- (MCP-confirmed present in DeprecatedTemplates.xml on all 3 flavors, used by
-- Classic's own Interface Options screens today). Both paths return a slider
-- object exposing the same AceGUI-compatible facade so the call sites are
-- identical regardless of flavor:
--   SetLabel(text), SetSliderValues(min, max, step),
--   SetValue(value), SetCallback("OnValueChanged", fn).
--
-- MWS-specific API reference (verified in Blizzard_SharedXML\Shared\Slider\
-- MinimalSlider.lua): Init(value, minValue, maxValue, steps, formatters) takes
-- `steps` as a count, not a step size — we compute steps = (max-min)/step.
-- The formatter table is keyed by MinimalSliderWithSteppersMixin.Label.{Top,
-- Min, Max} enum values; we use Top for "Label: value", Min/Max for range
-- bounds. The OnValueChanged event is registered through CallbackRegistryMixin
-- (RegisterCallback), not the native OnValueChanged script.
local nextSliderId = 0

local function MakeMWSSlider(x, y, width, label, minValue, maxValue, step)
  local mws = TrackNative(CreateFrame("Frame", nil, content, "MinimalSliderWithSteppersTemplate"))
  mws:SetSize(width or 280, 40)
  mws:SetPoint("TOPLEFT", content, "TOPLEFT", x or CONTENT_PAD, y)

  local labelText = label or ""

  local function buildFormatters(minV, maxV)
    return {
      [MinimalSliderWithSteppersMixin.Label.Top] = function(v)
        return string.format("%s: %d", labelText, math.floor((tonumber(v) or 0) + 0.5))
      end,
      [MinimalSliderWithSteppersMixin.Label.Min] = CreateMinimalSliderFormatter(
        MinimalSliderWithSteppersMixin.Label.Min, tostring(minV)),
      [MinimalSliderWithSteppersMixin.Label.Max] = CreateMinimalSliderFormatter(
        MinimalSliderWithSteppersMixin.Label.Max, tostring(maxV)),
    }
  end

  local function reInit(value, minV, maxV, stepV)
    local span = (maxV - minV)
    local stepSize = stepV or 1
    local steps = math.max(1, math.floor(span / stepSize + 0.5))
    mws:Init(value, minV, maxV, steps, buildFormatters(minV, maxV))
  end

  -- Initial setup: caller's subsequent SetValue replaces the initial value.
  reInit(minValue, minValue, maxValue, step)

  local valueCb

  function mws:SetLabel(text)
    labelText = text or ""
    -- Refresh the Top label so the new name appears immediately.
    self:FormatValue(self.Slider:GetValue())
  end
  function mws:SetSliderValues(minV, maxV, stepV)
    local v = self.Slider:GetValue()
    if v < minV then v = minV end
    if v > maxV then v = maxV end
    reInit(v, minV, maxV, stepV)
  end
  -- mws:SetValue already exists from MinimalSliderWithSteppersMixin (line 169
  -- of MinimalSlider.lua) — proxies to self.Slider:SetValue.
  function mws:SetCallback(event, fn)
    if event ~= "OnValueChanged" then return end
    if valueCb then
      -- Already registered the dispatch closure; just swap the user fn.
      valueCb = fn
      return
    end
    valueCb = fn
    self:RegisterCallback(MinimalSliderWithSteppersMixin.Event.OnValueChanged,
      function(_, value)
        if valueCb then valueCb(self, "OnValueChanged", value) end
      end, self)
  end

  mws:Show()
  return mws
end

local function MakeOptionsSlider(x, y, width, label, minValue, maxValue, step)
  nextSliderId = nextSliderId + 1
  local name = "SiftConfigSlider" .. nextSliderId
  local slider = TrackNative(CreateFrame("Slider", name, content, "OptionsSliderTemplate"))
  slider:SetSize(width or 280, 17)
  slider:SetPoint("TOPLEFT", content, "TOPLEFT", x or CONTENT_PAD, y)
  slider:SetMinMaxValues(minValue, maxValue)
  slider:SetValueStep(step or 1)
  if slider.SetObeyStepOnDrag then
    slider:SetObeyStepOnDrag(true)
  end

  -- OptionsSliderTemplate auto-creates these via $parent name resolution.
  local textFS = _G[name .. "Text"]
  local lowFS = _G[name .. "Low"]
  local highFS = _G[name .. "High"]
  if textFS then textFS:SetText(label or "") end
  if lowFS then lowFS:SetText(tostring(minValue)) end
  if highFS then highFS:SetText(tostring(maxValue)) end

  -- Current-value readout below the slider; preserves the AceGUI visual
  -- where the current value sat near the slider.
  local valueFS = slider:CreateFontString(nil, "OVERLAY", "GameFontHighlightSmall")
  valueFS:SetPoint("TOP", slider, "BOTTOM", 0, -2)

  local callbacks = {}

  function slider:SetLabel(text)
    if textFS then textFS:SetText(text or "") end
  end
  function slider:SetSliderValues(minV, maxV, stepV)
    slider:SetMinMaxValues(minV, maxV)
    slider:SetValueStep(stepV or 1)
    if lowFS then lowFS:SetText(tostring(minV)) end
    if highFS then highFS:SetText(tostring(maxV)) end
  end
  -- Wrap native SetValue so the value readout updates even on initial set
  -- (which happens before the OnValueChanged script binds the callback).
  local nativeSetValue = slider.SetValue
  function slider:SetValue(value)
    nativeSetValue(slider, value)
    valueFS:SetText(tostring(math.floor((tonumber(value) or 0) + 0.5)))
  end
  function slider:SetCallback(event, fn)
    callbacks[event] = fn
  end

  slider:SetScript("OnValueChanged", function(self, value)
    value = tonumber(value)
    if value == nil then return end
    valueFS:SetText(tostring(math.floor(value + 0.5)))
    local fn = callbacks.OnValueChanged
    if fn then fn(self, "OnValueChanged", value) end
  end)

  slider:Show()
  return slider
end

local function MakeNativeSlider(x, y, width, label, minValue, maxValue, step)
  if NS.Compat and NS.Compat.isClassicFamily then
    return MakeOptionsSlider(x, y, width, label, minValue, maxValue, step)
  end
  -- Retail path: MWS. If the template is somehow missing at runtime, fall
  -- back gracefully so the panel still renders.
  if type(MinimalSliderWithSteppersMixin) ~= "table" then
    return MakeOptionsSlider(x, y, width, label, minValue, maxValue, step)
  end
  return MakeMWSSlider(x, y, width, label, minValue, maxValue, step)
end

local function AddSlider(label, key, minValue, maxValue, step, y, tooltipBody)
  local slider = MakeNativeSlider(CONTENT_PAD, y, 330, label, minValue, maxValue, step)
  slider:SetValue(tonumber(SettingValue(key)) or tonumber(DEFAULT_SETTINGS[key]) or minValue)
  slider:SetCallback("OnValueChanged", function(_, _, value)
    value = ClampNumber(value, minValue, maxValue, DEFAULT_SETTINGS[key] or minValue)
    if step >= 1 then
      value = math.floor(value + 0.5)
    end
    SetSetting(key, value)
  end)
  if tooltipBody then AttachTooltip(slider, label, tooltipBody) end
  return y - 48
end

-- BSP-022 Commit 3: native checkboxes via UICheckButtonTemplate.
-- Universal template (works on all 3 flavors), so no flavor branch.
-- The label is a FontString anchored to the right of the checkbox.
-- The onChange callback receives a boolean (the new checked state).
local function MakeNativeCheckbox(x, y, label, initialChecked, onChange, tooltipBody)
  local cb = TrackNative(CreateFrame("CheckButton", nil, content, "UICheckButtonTemplate"))
  cb:SetSize(24, 24)
  cb:SetPoint("TOPLEFT", content, "TOPLEFT", x or CONTENT_PAD, y)
  cb:SetChecked(initialChecked and true or false)

  local labelFS = cb:CreateFontString(nil, "OVERLAY", "GameFontNormal")
  labelFS:SetPoint("LEFT", cb, "RIGHT", 4, 0)
  labelFS:SetJustifyH("LEFT")
  labelFS:SetText(label or "")

  cb:SetScript("OnClick", function(self)
    local value = self:GetChecked() and true or false
    if onChange then onChange(value) end
  end)

  if tooltipBody then AttachTooltip(cb, label, tooltipBody) end

  cb:Show()
  return cb
end

local function AddCheckbox(label, key, y, onChanged, tooltipBody)
  MakeNativeCheckbox(CONTENT_PAD, y, label, SettingValue(key) == true, function(value)
    if onChanged then
      onChanged(value)
    else
      SetSetting(key, value)
    end
  end, tooltipBody)
  return y - 32
end

local function SectionExists(section)
  for _, name in ipairs(SECTIONS) do
    if name == section then
      return true
    end
  end
  return false
end

local function SetNavHighlight()
  for name, button in pairs(navButtons) do
    if name == activeSection then
      button:LockHighlight()
    else
      button:UnlockHighlight()
    end
  end
end

local function RelativeTime(ts)
  ts = tonumber(ts)
  if not ts then
    return "-"
  end
  local delta = Now() - ts
  if delta < 0 then return "0s" end
  if delta < 60 then return tostring(delta) .. "s" end
  if delta < 3600 then return tostring(math.floor(delta / 60)) .. "m" end
  if delta < 86400 then return tostring(math.floor(delta / 3600)) .. "h" end
  if delta < 90 * 86400 then return tostring(math.floor(delta / 86400)) .. "d" end
  return date("%Y-%m-%d", ts)
end

local function SenderLabel(entry)
  if type(entry) ~= "table" then
    return "?"
  end
  local name = entry.name or "?"
  if entry.realm and entry.realm ~= "" then
    return name .. "-" .. entry.realm
  end
  return name
end

local function Lower(value)
  return string.lower(tostring(value or ""))
end

local function MatchesSearch(entry, guid, search)
  search = Lower(search)
  if search == "" then
    return true
  end
  return string.find(Lower(guid), search, 1, true)
    or string.find(Lower(SenderLabel(entry)), search, 1, true)
    or string.find(Lower(entry and entry.source), search, 1, true)
end

local function SortedAllowlist()
  local allowlist = NS.Trust and NS.Trust.GetAllowlist and NS.Trust.GetAllowlist() or {}
  local out = {}
  for guid, entry in pairs(allowlist) do
    if type(guid) == "string" and type(entry) == "table"
       and MatchesSearch(entry, guid, listState.allowlistSearch) then
      out[#out + 1] = { guid = guid, entry = entry }
    end
  end
  table.sort(out, function(a, b)
    return Lower(SenderLabel(a.entry)) < Lower(SenderLabel(b.entry))
  end)
  return out
end

local function GetBlockedActors()
  local global = GetGlobal()
  if not global then
    return {}
  end
  global.blockedActors = global.blockedActors or {}
  return global.blockedActors
end

local function BlockedEntryLabel(key, entry)
  if type(entry) == "table" then
    local name = entry.name or entry.sender or entry.player
    local realm = entry.realm
    if name and realm and realm ~= "" then
      return tostring(name) .. "-" .. tostring(realm)
    end
    if name then
      return tostring(name)
    end
  end
  return tostring(key)
end

local function BlockedEntryCount(entry)
  if type(entry) == "table" then
    return tonumber(entry.count or entry.blockCount or entry.blocks or entry.total) or 1
  end
  return 1
end

local function BlockedEntryLastSeen(entry)
  if type(entry) == "table" then
    return entry.lastBlockedAt or entry.lastSeenAt or entry.updatedAt or entry.ts
  end
  return nil
end

local function SortedBlockedActors()
  local blocked = GetBlockedActors()
  local search = Lower(listState.blockedSearch)
  local out = {}
  for key, entry in pairs(blocked) do
    local label = BlockedEntryLabel(key, entry)
    if search == "" or string.find(Lower(key), search, 1, true)
       or string.find(Lower(label), search, 1, true) then
      out[#out + 1] = { key = key, entry = entry, label = label }
    end
  end
  table.sort(out, function(a, b)
    local ats = tonumber(BlockedEntryLastSeen(a.entry)) or 0
    local bts = tonumber(BlockedEntryLastSeen(b.entry)) or 0
    if ats ~= bts then
      return ats > bts
    end
    return Lower(a.label) < Lower(b.label)
  end)
  return out
end

local function MaxPage(total)
  local maxPage = math.ceil(total / PAGE_ROWS)
  if maxPage < 1 then
    maxPage = 1
  end
  return maxPage
end

local function FindHistorySender(text)
  text = tostring(text or "")
  local name, realm = string.match(text, "^%s*([^%-]+)%-(.-)%s*$")
  if not name or name == "" or not realm or realm == "" then
    return nil, "Enter a sender as Name-Realm."
  end

  local entries = NS.History and NS.History.GetAll and NS.History.GetAll() or {}
  local wantedName = Lower(name)
  local wantedRealm = Lower(realm)
  for _, entry in ipairs(entries) do
    if entry.guid and entry.guid ~= ""
       and Lower(entry.name) == wantedName
       and Lower(entry.realm) == wantedRealm then
      return entry
    end
  end

  return nil, "Sift can only manually allow players already present in History."
end

local function AddAllowlistFromText(text)
  local entry, err = FindHistorySender(text)
  if not entry then
    sectionStatus.Allowlist = err
    return false
  end
  if not NS.Trust or not NS.Trust.AddAllowlist then
    sectionStatus.Allowlist = "Allowlist API is unavailable."
    return false
  end
  if NS.Trust.AddAllowlist(entry.guid, entry.name, entry.realm, "manual") then
    sectionStatus.Allowlist = "Added " .. SenderLabel(entry) .. "."
    listState.allowlistAddText = ""
    removedAllowlistEntry = nil
    return true
  end
  sectionStatus.Allowlist = SenderLabel(entry) .. " is already allowlisted."
  return false
end

local function RemoveAllowlist(guid, entry)
  if not NS.Trust or not NS.Trust.RemoveAllowlist then
    sectionStatus.Allowlist = "Allowlist API is unavailable."
    return
  end
  if NS.Trust.RemoveAllowlist(guid) then
    removedAllowlistEntry = { guid = guid, entry = CopyTable(entry) }
    sectionStatus.Allowlist = "Removed " .. SenderLabel(entry) .. "."
    ConfigPanel.ShowSection("Allowlist")
  end
end

local function UndoAllowlistRemove()
  local removed = removedAllowlistEntry
  if not removed or not NS.Trust or not NS.Trust.AddAllowlist then
    return
  end
  local entry = removed.entry or {}
  NS.Trust.AddAllowlist(removed.guid, entry.name, entry.realm, entry.source or "manual")
  removedAllowlistEntry = nil
  sectionStatus.Allowlist = "Restored " .. SenderLabel(entry) .. "."
  ConfigPanel.ShowSection("Allowlist")
end

local function RemoveBlocked(key)
  if NS.DB and NS.DB.RemoveBlockedActor and NS.DB.RemoveBlockedActor(key) then
    sectionStatus.Blocked = "Removed blocked actor."
    ConfigPanel.ShowSection("Blocked")
    return
  end
  local blocked = GetBlockedActors()
  blocked[key] = nil
  sectionStatus.Blocked = "Removed blocked actor."
  ConfigPanel.ShowSection("Blocked")
end

local function RefreshHistoryPanelMinimap()
  if NS.HistoryPanel and NS.HistoryPanel.RefreshMinimap then
    NS.HistoryPanel.RefreshMinimap()
  end
end

local function SetHistoryPanelMinimapShown(shown)
  if NS.HistoryPanel and NS.HistoryPanel.SetMinimapShown then
    NS.HistoryPanel.SetMinimapShown(shown)
  end
  RefreshHistoryPanelMinimap()
end

local function EscapeField(value)
  value = tostring(value or "")
  value = string.gsub(value, "\\", "\\\\")
  value = string.gsub(value, "|", "\\p")
  value = string.gsub(value, "\r", "\\r")
  value = string.gsub(value, "\n", "\\n")
  return value
end

local function UnescapeField(value)
  local out = {}
  local i = 1
  while i <= #value do
    local ch = string.sub(value, i, i)
    if ch == "\\" then
      local nextCh = string.sub(value, i + 1, i + 1)
      if nextCh == "\\" then
        out[#out + 1] = "\\"
      elseif nextCh == "p" then
        out[#out + 1] = "|"
      elseif nextCh == "n" then
        out[#out + 1] = "\n"
      elseif nextCh == "r" then
        out[#out + 1] = "\r"
      else
        return nil
      end
      i = i + 2
    else
      out[#out + 1] = ch
      i = i + 1
    end
  end
  return table.concat(out)
end

local function SplitPipeFields(value)
  local fields = {}
  local field = {}
  local i = 1
  while i <= #value do
    local ch = string.sub(value, i, i)
    if ch == "\\" then
      local nextCh = string.sub(value, i + 1, i + 1)
      if nextCh == "\\" or nextCh == "p" or nextCh == "n" or nextCh == "r" then
        field[#field + 1] = ch .. nextCh
        i = i + 2
      else
        return nil
      end
    elseif ch == "|" then
      fields[#fields + 1] = table.concat(field)
      field = {}
      i = i + 1
    else
      field[#field + 1] = ch
      i = i + 1
    end
  end
  fields[#fields + 1] = table.concat(field)

  for index, raw in ipairs(fields) do
    local parsed = UnescapeField(raw)
    if parsed == nil then
      return nil
    end
    fields[index] = parsed
  end
  return fields
end

local function ValidGuid(guid)
  return type(guid) == "string"
    and guid ~= ""
    and string.find(guid, "-", 1, true) ~= nil
    and string.find(guid, "^[%w%-]+$") ~= nil
end

local function ValidName(value)
  return value == "" or (type(value) == "string" and not string.find(value, "[%c|]"))
end

local function ValidSource(value)
  return value == "" or value == "manual" or value == "history" or value == "import"
end

local function ParseImportText(text)
  local formatName
  local version
  local exportedAt
  local entries = {}
  local seenGuids = {}

  if type(text) ~= "string" or text == "" then
    return nil, "Import text is empty."
  end

  local lineNumber = 0
  for line in string.gmatch(text .. "\n", "([^\n]*)\n") do
    lineNumber = lineNumber + 1
    line = string.gsub(line, "\r$", "")
    if line ~= "" then
      local key, value = string.match(line, "^([A-Za-z]+)=(.*)$")
      if not key then
        return nil, "Line " .. lineNumber .. " is not key=value."
      end

      if key == "format" then
        if formatName then return nil, "Duplicate format line." end
        formatName = value
      elseif key == "version" then
        if version then return nil, "Duplicate version line." end
        version = tonumber(value)
      elseif key == "exportedAt" then
        if exportedAt then return nil, "Duplicate exportedAt line." end
        exportedAt = tonumber(value)
      elseif key == "entry" then
        local fields = SplitPipeFields(value)
        if fields and #fields == 5 then
          fields[6] = ""
        end
        if not fields or #fields ~= 6 then
          return nil, "Line " .. lineNumber .. " must have 6 entry fields."
        end

        local guid = fields[1]
        local name = fields[2]
        local realm = fields[3]
        local source = fields[4]
        local addedAt = fields[5]
        local lastSeenAt = fields[6]

        if not ValidGuid(guid) then
          return nil, "Line " .. lineNumber .. " has an invalid GUID."
        end
        if seenGuids[guid] then
          return nil, "Line " .. lineNumber .. " repeats a GUID."
        end
        if not ValidName(name) or not ValidName(realm) then
          return nil, "Line " .. lineNumber .. " has invalid name fields."
        end
        if not ValidSource(source) then
          return nil, "Line " .. lineNumber .. " has an invalid source."
        end
        if addedAt ~= "" and not tonumber(addedAt) then
          return nil, "Line " .. lineNumber .. " has invalid addedAt."
        end
        if lastSeenAt ~= "" and not tonumber(lastSeenAt) then
          return nil, "Line " .. lineNumber .. " has invalid lastSeenAt."
        end

        seenGuids[guid] = true
        entries[#entries + 1] = {
          guid = guid,
          name = name ~= "" and name or nil,
          realm = realm ~= "" and realm or nil,
          source = source ~= "" and source or "import",
        }
      else
        return nil, "Line " .. lineNumber .. " has an unknown key."
      end
    end
  end

  if formatName ~= "Sift-allowlist" then
    return nil, "Import format must be Sift-allowlist."
  end
  if version ~= 1 then
    return nil, "Import version must be 1."
  end
  if exportedAt ~= nil and exportedAt < 0 then
    return nil, "exportedAt must be positive."
  end
  if #entries == 0 then
    return nil, "Import contains no entries."
  end

  return entries, nil
end

local function ExportAllowlistText()
  local allowlist = NS.Trust and NS.Trust.GetAllowlist and NS.Trust.GetAllowlist() or {}
  local rows = {
    "format=Sift-allowlist",
    "version=1",
    "exportedAt=" .. tostring(Now()),
  }

  local guids = {}
  for guid in pairs(allowlist) do
    guids[#guids + 1] = guid
  end
  table.sort(guids)

  for _, guid in ipairs(guids) do
    local entry = allowlist[guid] or {}
    rows[#rows + 1] = table.concat({
      "entry=" .. EscapeField(guid),
      EscapeField(entry.name),
      EscapeField(entry.realm),
      EscapeField(entry.source or "manual"),
      EscapeField(entry.addedAt),
      EscapeField(entry.lastSeenAt),
    }, "|")
  end

  return table.concat(rows, "\n")
end

local function ApplyImport(entries, overwrite)
  if not NS.Trust or not NS.Trust.AddAllowlist then
    sectionStatus.Allowlist = "Allowlist API is unavailable."
    return
  end

  local current = NS.Trust.GetAllowlist and NS.Trust.GetAllowlist() or {}
  local added = 0
  local skipped = 0
  for _, entry in ipairs(entries) do
    if current[entry.guid] and overwrite and NS.Trust.RemoveAllowlist then
      NS.Trust.RemoveAllowlist(entry.guid)
      current[entry.guid] = nil
    end

    if not current[entry.guid] then
      if NS.Trust.AddAllowlist(entry.guid, entry.name, entry.realm, entry.source or "import") then
        added = added + 1
      end
    else
      skipped = skipped + 1
    end
  end

  pendingImport = nil
  removedAllowlistEntry = nil
  sectionStatus.Allowlist = "Imported " .. tostring(added) .. " entries"
    .. (skipped > 0 and ("; skipped " .. tostring(skipped) .. ".") or ".")
  if activeSection == "Allowlist" and frame and frame:IsShown() then
    ConfigPanel.ShowSection("Allowlist")
  end
end

local function ImportNeedsOverwrite(entries)
  local current = NS.Trust and NS.Trust.GetAllowlist and NS.Trust.GetAllowlist() or {}
  for _, entry in ipairs(entries) do
    if current[entry.guid] then
      return true
    end
  end
  return false
end

local function CloseDialog()
  if dialogFrame then
    dialogFrame:Hide()
  end
end

local function EnsureDialog()
  if dialogFrame then
    return dialogFrame
  end

  dialogFrame = CreateFrame("Frame", "SiftConfigDialog", UIParent, "BackdropTemplate")
  dialogFrame:SetSize(520, 390)
  dialogFrame:SetPoint("CENTER", UIParent, "CENTER", 0, 0)
  dialogFrame:SetFrameStrata("DIALOG")
  dialogFrame:SetClampedToScreen(true)
  dialogFrame:EnableMouse(true)
  if dialogFrame.SetBackdrop then
    dialogFrame:SetBackdrop({
      bgFile = "Interface\\DialogFrame\\UI-DialogBox-Background-Dark",
      edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border",
      tile = true,
      tileSize = 16,
      edgeSize = 16,
      insets = { left = 4, right = 4, top = 4, bottom = 4 },
    })
    dialogFrame:SetBackdropColor(0.02, 0.02, 0.025, 0.96)
    dialogFrame:SetBackdropBorderColor(0.35, 0.36, 0.42, 1)
  end

  dialogFrame.title = dialogFrame:CreateFontString(nil, "OVERLAY", "GameFontNormalLarge")
  dialogFrame.title:SetPoint("TOPLEFT", dialogFrame, "TOPLEFT", 16, -14)
  dialogFrame.title:SetPoint("RIGHT", dialogFrame, "RIGHT", -42, 0)
  dialogFrame.title:SetJustifyH("LEFT")

  dialogFrame.close = CreateFrame("Button", nil, dialogFrame, "UIPanelCloseButton")
  dialogFrame.close:SetPoint("TOPRIGHT", dialogFrame, "TOPRIGHT", 0, 0)
  dialogFrame.close:SetScript("OnClick", CloseDialog)
  dialogFrame.close:Hide()

  dialogFrame.status = dialogFrame:CreateFontString(nil, "OVERLAY", "GameFontHighlightSmall")
  dialogFrame.status:SetPoint("BOTTOMLEFT", dialogFrame, "BOTTOMLEFT", 18, 50)
  dialogFrame.status:SetPoint("RIGHT", dialogFrame, "RIGHT", -18, 0)
  dialogFrame.status:SetJustifyH("LEFT")

  dialogFrame.primary = CreateFrame("Button", nil, dialogFrame, "UIPanelButtonTemplate")
  dialogFrame.primary:SetSize(110, 24)
  dialogFrame.primary:SetPoint("BOTTOMRIGHT", dialogFrame, "BOTTOMRIGHT", -128, 16)

  dialogFrame.cancel = CreateFrame("Button", nil, dialogFrame, "UIPanelButtonTemplate")
  dialogFrame.cancel:SetSize(100, 24)
  dialogFrame.cancel:SetPoint("BOTTOMRIGHT", dialogFrame, "BOTTOMRIGHT", -18, 16)
  dialogFrame.cancel:SetText("Close")
  dialogFrame.cancel:SetScript("OnClick", CloseDialog)

  dialogFrame:Hide()
  return dialogFrame
end

-- BSP-022 Commit 4: native multiline edit for import/export/FP-fixture
-- dialogs. Replaces AceGUI:Create("MultiLineEditBox") with a plain EditBox
-- (SetMultiLine=true) hosted in a UIPanelScrollFrameTemplate ScrollFrame —
-- the universal pattern present on all 3 flavors (verified in Classic Era
-- via Blizzard_FrameXML\Classic\ClassTrainerFrameTemplates.xml:81).
-- ScrollingEditBoxTemplate / InputScrollFrameTemplate are Retail-only and
-- offer no real upside here over the universal composite.
local function CreateNativeMultilineEdit(parent, leftInset, topInset, rightInset, bottomInset)
  local scroll = CreateFrame("ScrollFrame", nil, parent, "UIPanelScrollFrameTemplate")
  scroll:SetPoint("TOPLEFT", parent, "TOPLEFT", leftInset, topInset)
  -- -27 on the right reserves room for the scrollbar that ships with
  -- UIPanelScrollFrameTemplate (template default scrollbar width).
  scroll:SetPoint("BOTTOMRIGHT", parent, "BOTTOMRIGHT", rightInset - 27, bottomInset)

  local edit = CreateFrame("EditBox", nil, scroll)
  edit:SetMultiLine(true)
  edit:SetAutoFocus(false)
  edit:SetFontObject(ChatFontNormal)
  edit:SetMaxLetters(0)
  edit:SetWidth(scroll:GetWidth())
  edit:SetScript("OnEscapePressed", function(self) self:ClearFocus() end)
  -- Keep the EditBox width in sync with the scroll viewport on resize so
  -- text wraps to the visible width and doesn't overflow horizontally.
  scroll:SetScript("OnSizeChanged", function(self)
    edit:SetWidth(self:GetWidth())
  end)

  scroll:SetScrollChild(edit)
  scroll:Show()
  edit:Show()

  return edit, scroll
end

local function ShowTextDialog(title, text, primaryLabel, primaryHandler)
  local dialog = EnsureDialog()

  -- Tear down a previous edit/scroll pair so consecutive ShowTextDialog calls
  -- don't stack frames inside the dialog body.
  if dialog.editFrame then dialog.editFrame:Hide() end
  if dialog.editScroll then dialog.editScroll:Hide() end

  dialog.textValue = text or ""
  dialog.title:SetText(title)
  dialog.status:SetText("")
  dialog.primary:SetText(primaryLabel or "Close")
  dialog.primary:ClearAllPoints()
  if primaryHandler then
    dialog.primary:SetPoint("BOTTOMRIGHT", dialog, "BOTTOMRIGHT", -128, 16)
    dialog.cancel:Show()
  else
    dialog.primary:SetPoint("BOTTOMRIGHT", dialog, "BOTTOMRIGHT", -18, 16)
    dialog.cancel:Hide()
  end
  dialog.primary:SetScript("OnClick", function()
    if primaryHandler then
      primaryHandler(dialog.textValue or "")
    else
      CloseDialog()
    end
  end)
  dialog.close:Hide()

  -- Construct the edit lazily on first use; subsequent calls reuse it.
  if not dialog.editFrame then
    local edit, scroll = CreateNativeMultilineEdit(dialog, 16, -44, -16, 78)
    edit:SetScript("OnTextChanged", function(self)
      dialog.textValue = self:GetText() or ""
    end)
    dialog.editFrame = edit
    dialog.editScroll = scroll
  end

  dialog.editScroll:Show()
  dialog.editFrame:Show()
  dialog.editFrame:SetText(text or "")

  dialog:Show()
  dialog.editFrame:SetFocus()
  dialog.editFrame:HighlightText()
end

local function RegisterStaticPopups()
  if popupsRegistered or not StaticPopupDialogs then
    return
  end
  popupsRegistered = true

  StaticPopupDialogs["HUSH_CLEAR_HISTORY"] = {
    text = "Clear all Sift history?",
    button1 = "Clear",
    button2 = "Cancel",
    OnAccept = function()
      if NS.History and NS.History.Clear then
        NS.History.Clear()
        sectionStatus.History = "History cleared."
      else
        sectionStatus.History = "History clear API is unavailable."
      end
      if activeSection == "History" and frame and frame:IsShown() then
        ConfigPanel.ShowSection("History")
      end
    end,
    timeout = 0,
    whileDead = true,
    hideOnEscape = true,
  }

  StaticPopupDialogs["HUSH_CLEAR_BLOCKED"] = {
    text = "Clear all blocked actors?",
    button1 = "Clear",
    button2 = "Cancel",
    OnAccept = function()
      ClearTable(GetBlockedActors())
      sectionStatus.Blocked = "Blocked actors cleared."
      if activeSection == "Blocked" and frame and frame:IsShown() then
        ConfigPanel.ShowSection("Blocked")
      end
    end,
    timeout = 0,
    whileDead = true,
    hideOnEscape = true,
  }

  StaticPopupDialogs["HUSH_RESET_SETTINGS"] = {
    text = "Reset Sift settings to defaults?",
    button1 = "Reset",
    button2 = "Cancel",
    OnAccept = function()
      if ResetSettings() then
        sectionStatus.Dev = "Settings reset to defaults."
        SetHistoryPanelMinimapShown(SettingValue("showMinimapButton") ~= false)
      else
        sectionStatus.Dev = "Settings API is unavailable."
      end
      if activeSection == "Dev" and frame and frame:IsShown() then
        ConfigPanel.ShowSection("Dev")
      end
    end,
    timeout = 0,
    whileDead = true,
    hideOnEscape = true,
  }

  StaticPopupDialogs["HUSH_IMPORT_OVERWRITE"] = {
    text = "Import includes entries that are already allowlisted. Overwrite matching entries?",
    button1 = "Overwrite",
    button2 = "Cancel",
    OnAccept = function()
      if pendingImport then
        ApplyImport(pendingImport, true)
      end
    end,
    OnCancel = function()
      pendingImport = nil
    end,
    timeout = 0,
    whileDead = true,
    hideOnEscape = true,
  }

  StaticPopupDialogs["HUSH_TRIM_HISTORY"] = {
    text = "Trim history on every character down to the new maximum?",
    button1 = "Trim",
    button2 = "Cancel",
    OnAccept = function()
      local max = pendingHistoryMax
      pendingHistoryMax = nil
      if max then
        SetSetting("historyMaxEntries", max)
        if NS.History and NS.History.TrimAllCharacters then
          NS.History.TrimAllCharacters()
          sectionStatus.History = "History trimmed to " .. tostring(max) .. " entries per character."
        else
          sectionStatus.History = "History trim API is unavailable."
        end
      end
      if activeSection == "History" and frame and frame:IsShown() then
        ConfigPanel.ShowSection("History")
      end
    end,
    OnCancel = function()
      pendingHistoryMax = nil
      if activeSection == "History" and frame and frame:IsShown() then
        ConfigPanel.ShowSection("History")
      end
    end,
    timeout = 0,
    whileDead = true,
    hideOnEscape = true,
  }

  StaticPopupDialogs["HUSH_TRIM_HISTORY_GLOBAL"] = {
    text = "Trim history across all characters down to the new account-wide maximum?",
    button1 = "Trim",
    button2 = "Cancel",
    OnAccept = function()
      local max = pendingHistoryGlobalMax
      pendingHistoryGlobalMax = nil
      if max then
        SetSetting("historyGlobalMaxEntries", max)
        if NS.History and NS.History.TrimAllCharacters then
          NS.History.TrimAllCharacters()
          sectionStatus.History = "History trimmed account-wide to " .. tostring(max) .. " total entries."
        else
          sectionStatus.History = "History trim API is unavailable."
        end
      end
      if activeSection == "History" and frame and frame:IsShown() then
        ConfigPanel.ShowSection("History")
      end
    end,
    OnCancel = function()
      pendingHistoryGlobalMax = nil
      if activeSection == "History" and frame and frame:IsShown() then
        ConfigPanel.ShowSection("History")
      end
    end,
    timeout = 0,
    whileDead = true,
    hideOnEscape = true,
  }
end

local function RegisterInterfaceOptions()
  if type(CreateFrame) ~= "function" then
    return
  end

  local panel = CreateFrame("Frame", "SiftConfigOptionsPanel")
  panel.name = "Sift"

  local title = panel:CreateFontString(nil, "OVERLAY", "GameFontNormalLarge")
  title:SetPoint("TOPLEFT", panel, "TOPLEFT", 16, -16)
  title:SetText("Sift Configuration")

  local button = CreateFrame("Button", nil, panel, "UIPanelButtonTemplate")
  button:SetSize(190, 24)
  button:SetPoint("TOPLEFT", title, "BOTTOMLEFT", 0, -18)
  button:SetText("Open Sift Config...")
  button:SetScript("OnClick", function()
    -- BSP-055 Gate 2 followup: don't try to dismiss the Settings panel
    -- from addon code. The previous pcall(SettingsPanel.Close, ...) +
    -- pcall(InterfaceOptionsFrameCancel.Click, ...) approach triggered
    -- ADDON_ACTION_FORBIDDEN — SettingsPanel:Close routes through
    -- ExitWithCommit → TransitionBackOpeningPanel → ToggleGameMenu →
    -- SpellStopCasting (a protected function). pcall catches Lua errors
    -- but not taint warnings, so BugGrabber surfaces the warning to the
    -- player. Leaving Settings open also matches how most modern addons
    -- handle their Settings launcher — Esc dismisses Settings, our panel
    -- comes up on top via the C_Timer defer below.
    --
    -- C_Timer.After(0) is preserved from the prior commit so any residual
    -- secure-context taint unwinds before our frame creation runs.
    if C_Timer and C_Timer.After then
      C_Timer.After(0, ConfigPanel.Open)
    else
      ConfigPanel.Open()
    end
  end)

  -- FND-009 Phase E: adopt Foundry.Settings for panel registration.
  -- Replaces the hand-rolled dual-path pcall block. Foundry handles modern
  -- Settings.RegisterCanvasLayoutCategory + RegisterAddOnCategory and the
  -- legacy InterfaceOptions_AddCategory fallback, with fail-loud semantics.
  -- Duplicate-refusal is handled by Foundry's live-registry (replaces the
  -- interfaceRegistered upvalue guard). This function is called at most once
  -- via ConfigPanel.Initialize's `initialized` guard.
  local F = _G.Foundry_1_0
  if not (F and F.Settings) then return end
  ConfigPanel.settingsController = F.Settings:New({
    title = "Sift",
    frame = panel,
  })
end

-- BSP-008 Commit 6: shared 3-state pause-pill row for Categories and Surfaces.
-- Retail uses atlas icons; Classic-family clients use color textures because
-- some Retail atlas names are absent and can leave stale glyphs behind.
-- LevelUp-Dot-Green                  -> green dot
-- CreditsScreen-Assets-Buttons-Pause -> media pause icon
-- communities-icon-redx              -> red X
local PAUSE_ROW_ATLAS = {
  active = "LevelUp-Dot-Green",
  paused = "CreditsScreen-Assets-Buttons-Pause",
  off    = "communities-icon-redx",
}

local PAUSE_ROW_COLOR = {
  active = { 0.15, 0.85, 0.25, 1 },
  paused = { 1.00, 0.82, 0.10, 1 },
  off    = { 0.95, 0.12, 0.12, 1 },
}

local function ApplyPauseGlyph(glyph, state)
  if not glyph then return end
  state = (state == "paused" or state == "off") and state or "active"

  if NS.Compat and NS.Compat.isClassicFamily and glyph.SetColorTexture then
    local color = PAUSE_ROW_COLOR[state] or PAUSE_ROW_COLOR.active
    if glyph.SetTexture then
      glyph:SetTexture(nil)
    end
    if glyph.SetTexCoord then
      glyph:SetTexCoord(0, 1, 0, 1)
    end
    glyph:SetColorTexture(color[1], color[2], color[3], color[4])
    return
  end

  local atlas = PAUSE_ROW_ATLAS[state] or PAUSE_ROW_ATLAS.active
  if atlas and glyph.SetAtlas then
    glyph:SetAtlas(atlas, false)
  elseif glyph.SetColorTexture then
    local color = PAUSE_ROW_COLOR[state] or PAUSE_ROW_COLOR.active
    glyph:SetColorTexture(color[1], color[2], color[3], color[4])
  end
end

local function AddAxisPauseRow(axis, key, displayLabel, y)
  local row = TrackNative(CreateFrame("Frame", nil, content, "BackdropTemplate"))
  row:SetHeight(28)
  row:SetPoint("TOPLEFT", content, "TOPLEFT", CONTENT_PAD, y)
  row:SetPoint("RIGHT",   content, "RIGHT",   -CONTENT_PAD, 0)
  if row.SetBackdrop then
    row:SetBackdrop({ bgFile = "Interface\\Buttons\\WHITE8X8" })
    row:SetBackdropColor(0.10, 0.11, 0.13, 0.6)
  end
  row:Show()

  local label = TrackNative(row:CreateFontString(nil, "OVERLAY", "GameFontNormal"))
  label:SetPoint("LEFT", row, "LEFT", 8, 0)
  label:SetText(L(displayLabel))
  label:Show()

  local pill = TrackNative(CreateFrame("Button", nil, row))
  pill:SetSize(80, 20)
  pill:SetPoint("RIGHT", row, "RIGHT", -8, 0)
  pill:RegisterForClicks("LeftButtonUp", "RightButtonUp")
  pill.bg = pill:CreateTexture(nil, "BACKGROUND")
  pill.bg:SetAllPoints(pill)
  pill.bg:SetColorTexture(0.13, 0.13, 0.16, 1)
  pill.glyph = pill:CreateTexture(nil, "ARTWORK")
  pill.glyph:SetSize(14, 14)
  pill.glyph:SetPoint("LEFT", pill, "LEFT", 6, 0)
  pill.text = pill:CreateFontString(nil, "OVERLAY", "GameFontNormalSmall")
  pill.text:SetPoint("LEFT", pill.glyph, "RIGHT", 4, 0)

  local function Refresh()
    local state
    if axis == "surface" then
      state = NS.PauseState and NS.PauseState.GetSurface(key) or "active"
    else
      state = NS.PauseState and NS.PauseState.GetCategory(key) or "active"
    end
    ApplyPauseGlyph(pill.glyph, state)
    pill.text:SetText(L(state))
  end

  pill:SetScript("OnClick", function(self, mouseButton)
    if not NS.PauseState then return end
    local direction = (mouseButton == "RightButton") and "backward" or "forward"
    if axis == "surface" then
      NS.PauseState.CycleSurface(key, direction)
    else
      NS.PauseState.CycleCategory(key, direction)
    end
    Refresh()
  end)

  -- BSP-009: state-aware tooltip on each pause pill. Body reads live state
  -- from PauseState every hover, so cycling the pill never leaves a stale
  -- tooltip behind.
  pill:HookScript("OnEnter", function(self)
    if not GameTooltip then return end
    local state
    if axis == "surface" then
      state = NS.PauseState and NS.PauseState.GetSurface(key) or "active"
    else
      state = NS.PauseState and NS.PauseState.GetCategory(key) or "active"
    end
    local stateBody
    if state == "active" then
      stateBody = (axis == "surface")
        and "Active \194\183 detected spam on this surface is blocked from chat."
        or  "Active \194\183 messages in this category are blocked."
    elseif state == "paused" then
      stateBody = "Paused \194\183 detected spam is logged to History but stays visible."
    else
      stateBody = (axis == "surface")
        and "Off \194\183 this surface is not scanned at all."
        or  "Off \194\183 this category is not scored against messages."
    end
    GameTooltip:SetOwner(self, "ANCHOR_RIGHT")
    GameTooltip:AddLine(L(displayLabel))
    GameTooltip:AddLine(L(stateBody), 1.00, 1.00, 1.00, true)
    GameTooltip:AddLine(L("Left-click cycles forward \194\183 Right-click cycles back."),
      0.70, 0.70, 0.70, true)
    GameTooltip:Show()
  end)
  pill:HookScript("OnLeave", function()
    if GameTooltip then GameTooltip:Hide() end
  end)

  Refresh()
  return y - 34
end

local RenderDetection
local RenderCategories
local RenderSurfaces
local RenderAllowlist
local RenderBlocked
local RenderHistory
local RenderUI
local RenderDev

RenderDetection = function()
  local y = AddSectionTitle("Detection", "Tune the score threshold and mixed-script signal weight.")
  y = AddStatus(y, sectionStatus.Detection)
  y = AddSlider("Block threshold", "threshold", 1, 10, 1, y,
    "Messages scoring at or above this value are blocked. Higher = stricter.")
  y = AddSlider("Anti-signal cap", "antiSignalCap", -10, -1, 1, y,
    "Maximum negative score one anti-signal (e.g. guild affiliation) can contribute. " ..
    "Limits how much a single trusted indicator offsets spam weight.")
  y = AddSlider("Mixed-script weight", "mixedScriptWeight", 0, 3, 1, y,
    "Score weight added when a message mixes Latin with another script (Cyrillic, etc.) \194\151 " ..
    "the classic Unicode-confusable pattern. Set 0 to disable.")
  y = AddCheckbox("Use mixed-script detection", "mixedScriptEnabled", y, nil,
    "Enable Unicode-confusable script-mixing as a signal in scoring.")

  -- BSP-010: Throttle controls. Cannot reuse AddCheckbox helper because its
  -- SettingValue(key) read is flat-keyed and throttle.enabled lives under
  -- settings.throttle.*. Use MakeNativeCheckbox directly with a custom
  -- onChange that routes through NS.DB.SetThrottleEnabled.
  local throttle = (GetSettings() and GetSettings().throttle) or {}

  MakeNativeCheckbox(CONTENT_PAD, y, "Throttle confirmed-spam repeats",
    throttle.enabled ~= false,
    function(value)
      if NS.DB and NS.DB.SetThrottleEnabled then
        NS.DB.SetThrottleEnabled(value)
      end
    end,
    "When the same cleansed text and sender GUID repeats inside the buffer window, " ..
    "the second hit is auto-blocked. Only runs on messages already scored as spam \194\151 " ..
    "legitimate repeats are unaffected.")
  y = y - 32

  local throttleSlider = MakeNativeSlider(CONTENT_PAD, y, 330, "Throttle buffer size", 5, 50, 1)
  throttleSlider:SetValue(tonumber(throttle.bufferSize) or 20)
  throttleSlider:SetCallback("OnValueChanged", function(_, _, value)
    if NS.DB and NS.DB.SetThrottleBufferSize then
      NS.DB.SetThrottleBufferSize(math.floor((tonumber(value) or 20) + 0.5))
    end
  end)
  AttachTooltip(throttleSlider, "Throttle buffer size",
    "How many recent confirmed-spam messages per surface are remembered for dedupe. " ..
    "Larger = longer memory window. Range 5\194\17750.")
end

RenderCategories = function()
  local y = AddSectionTitle("Categories", "Three states per category: Active (block) / Paused (detect + log, don't hide) / Off (ignore).")
  y = AddStatus(y, sectionStatus.Categories)
  for _, category in ipairs(CATEGORY_KEYS) do
    y = AddAxisPauseRow("category", category, category, y)
  end
end

RenderSurfaces = function()
  local y = AddSectionTitle("Surfaces", "Three states per surface: Active (block) / Paused (detect + log, don't hide) / Off (don't scan).")
  y = AddStatus(y, sectionStatus.Surfaces)
  for _, surface in ipairs(SURFACE_KEYS) do
    local label = SURFACE_LABELS[surface] or surface
    y = AddAxisPauseRow("surface", surface, label, y)
  end
  -- Preserved settings (live toggles, not part of the pause taxonomy).
  AddCheckbox("Filter bubbles", "filterBubbles", y, SetFilterBubblesEnabled,
    "Hide blocked Say / Yell text from chat bubbles via a Blizzard cvar toggle. " ..
    "Auto-restores after each suppressed message and on logout.")
end

RenderAllowlist = function()
  local y = AddSectionTitle("Allowlist", "Manage senders that Sift should trust.")
  y = AddStatus(y, sectionStatus.Allowlist)

  AddText("Search", "GameFontNormalSmall", CONTENT_PAD, y + 2, 48)
  local search = AddEditBox(CONTENT_PAD + 54, y + 5, 160, listState.allowlistSearch,
    "Search allowlist",
    "Type to match by sender name, realm, GUID, or source. Click Apply to filter the list below.")
  AddNativeButton("Apply", CONTENT_PAD + 222, y + 6, 70, function()
    listState.allowlistSearch = search:GetText() or ""
    listState.allowlistPage = 1
    ConfigPanel.ShowSection("Allowlist")
  end, "Apply the search box to the allowlist below and reset to page 1.")
  y = y - 34

  AddNativeButton("Export", CONTENT_PAD, y + 6, 72, ConfigPanel.OpenExportDialog,
    "Export the entire allowlist to a text blob you can copy from a dialog.")
  AddNativeButton("Import", CONTENT_PAD + 82, y + 6, 72, ConfigPanel.OpenImportDialog,
    "Paste a previously exported allowlist blob to merge entries into your current set.")
  y = y - 34

  AddText("Add from History", "GameFontNormalSmall", CONTENT_PAD, y + 2, 104)
  local addBox = AddEditBox(CONTENT_PAD + 112, y + 5, 180, listState.allowlistAddText,
    "Add from History",
    "Enter as Name-Realm. The sender must already appear in your History \194\151 you can't " ..
    "allowlist arbitrary names, only ones Sift has actually seen.")
  AddNativeButton("Add", CONTENT_PAD + 300, y + 6, 72, function()
    listState.allowlistAddText = addBox:GetText() or ""
    AddAllowlistFromText(listState.allowlistAddText)
    ConfigPanel.ShowSection("Allowlist")
  end, "Add the Name-Realm in the box to the allowlist.")
  y = y - 34

  if removedAllowlistEntry then
    AddText("Removed " .. SenderLabel(removedAllowlistEntry.entry) .. ".", "GameFontHighlightSmall", CONTENT_PAD, y)
    AddNativeButton("Undo", CONTENT_PAD + 210, y + 4, 70, UndoAllowlistRemove,
      "Restore the entry you just removed.")
    y = y - 30
  end

  local entries = SortedAllowlist()
  local maxPage = MaxPage(#entries)
  if listState.allowlistPage > maxPage then listState.allowlistPage = maxPage end
  local startIndex = (listState.allowlistPage - 1) * PAGE_ROWS + 1
  local endIndex = math.min(startIndex + PAGE_ROWS - 1, #entries)

  AddText("Entries: " .. tostring(#entries), "GameFontNormalSmall", CONTENT_PAD, y)
  y = y - 20

  if #entries == 0 then
    AddDisabledRow("No allowlist entries", "Use History restore + allow, or import.", y)
    return
  end

  for index = startIndex, endIndex do
    local rowData = entries[index]
    local row = TrackNative(CreateFrame("Frame", nil, content, "BackdropTemplate"))
    row:SetHeight(ROW_HEIGHT)
    row:SetPoint("TOPLEFT", content, "TOPLEFT", CONTENT_PAD, y)
    row:SetPoint("RIGHT", content, "RIGHT", -CONTENT_PAD, 0)
    if row.SetBackdrop then
      row:SetBackdrop({ bgFile = "Interface\\Buttons\\WHITE8X8" })
      row:SetBackdropColor(0.10, 0.11, 0.13, 0.6)
    end
    row:Show()

    local label = TrackNative(row:CreateFontString(nil, "OVERLAY", "GameFontNormal"))
    label:SetPoint("LEFT", row, "LEFT", 8, 6)
    label:SetText(SenderLabel(rowData.entry))
    label:Show()

    local meta = TrackNative(row:CreateFontString(nil, "OVERLAY", "GameFontDisableSmall"))
    meta:SetPoint("LEFT", row, "LEFT", 8, -8)
    meta:SetText((rowData.entry.source or "manual") .. " - added " .. RelativeTime(rowData.entry.addedAt)
      .. " - seen " .. RelativeTime(rowData.entry.lastSeenAt))
    meta:Show()

    local remove = TrackNative(CreateFrame("Button", nil, row, "UIPanelButtonTemplate"))
    remove:SetSize(72, 22)
    remove:SetPoint("RIGHT", row, "RIGHT", -6, 0)
    remove:SetText("Remove")
    remove:SetScript("OnClick", function()
      RemoveAllowlist(rowData.guid, rowData.entry)
    end)
    AttachTooltip(remove, "Remove from allowlist",
      "Take " .. SenderLabel(rowData.entry) .. " off the allowlist. Use Undo above to revert.")
    remove:Show()

    y = y - (ROW_HEIGHT + 4)
  end

  AddText("Page " .. tostring(listState.allowlistPage) .. " of " .. tostring(maxPage),
    "GameFontDisableSmall", CONTENT_PAD, y)
  AddNativeButton("Prev", CONTENT_PAD + 170, y + 4, 60, function()
    if listState.allowlistPage > 1 then
      listState.allowlistPage = listState.allowlistPage - 1
      ConfigPanel.ShowSection("Allowlist")
    end
  end, "Show the previous page of allowlist entries.")
  AddNativeButton("Next", CONTENT_PAD + 236, y + 4, 60, function()
    if listState.allowlistPage < maxPage then
      listState.allowlistPage = listState.allowlistPage + 1
      ConfigPanel.ShowSection("Allowlist")
    end
  end, "Show the next page of allowlist entries.")
end

RenderBlocked = function()
  local y = AddSectionTitle("Blocked", "Review actors currently tracked as blocked.")
  y = AddStatus(y, sectionStatus.Blocked)

  AddText("Search", "GameFontNormalSmall", CONTENT_PAD, y + 2, 48)
  local search = AddEditBox(CONTENT_PAD + 54, y + 5, 160, listState.blockedSearch,
    "Search blocked actors",
    "Type to match by sender label or key. Click Apply to filter the list below.")
  AddNativeButton("Apply", CONTENT_PAD + 222, y + 6, 70, function()
    listState.blockedSearch = search:GetText() or ""
    listState.blockedPage = 1
    ConfigPanel.ShowSection("Blocked")
  end, "Apply the search box to the blocked-actors list and reset to page 1.")
  AddNativeButton("Clear All", CONTENT_PAD + 300, y + 6, 90, ConfigPanel.ConfirmClearBlocked,
    "Remove every blocked actor. Confirmation required.")
  y = y - 34

  y = AddDisabledRow("Manual blocked add", "Not supported; scanners add actors after confirmed blocks.", y)

  local entries = SortedBlockedActors()
  local maxPage = MaxPage(#entries)
  if listState.blockedPage > maxPage then listState.blockedPage = maxPage end
  local startIndex = (listState.blockedPage - 1) * PAGE_ROWS + 1
  local endIndex = math.min(startIndex + PAGE_ROWS - 1, #entries)

  AddText("Blocked actors: " .. tostring(#entries), "GameFontNormalSmall", CONTENT_PAD, y)
  y = y - 20

  if #entries == 0 then
    AddDisabledRow("No blocked actors", "Nothing to manage.", y)
    return
  end

  for index = startIndex, endIndex do
    local rowData = entries[index]
    local row = TrackNative(CreateFrame("Frame", nil, content, "BackdropTemplate"))
    row:SetHeight(ROW_HEIGHT)
    row:SetPoint("TOPLEFT", content, "TOPLEFT", CONTENT_PAD, y)
    row:SetPoint("RIGHT", content, "RIGHT", -CONTENT_PAD, 0)
    if row.SetBackdrop then
      row:SetBackdrop({ bgFile = "Interface\\Buttons\\WHITE8X8" })
      row:SetBackdropColor(0.10, 0.11, 0.13, 0.6)
    end
    row:Show()

    local label = TrackNative(row:CreateFontString(nil, "OVERLAY", "GameFontNormal"))
    label:SetPoint("LEFT", row, "LEFT", 8, 6)
    label:SetText(rowData.label)
    label:Show()

    local meta = TrackNative(row:CreateFontString(nil, "OVERLAY", "GameFontDisableSmall"))
    meta:SetPoint("LEFT", row, "LEFT", 8, -8)
    meta:SetText("blocks " .. tostring(BlockedEntryCount(rowData.entry))
      .. " - last " .. RelativeTime(BlockedEntryLastSeen(rowData.entry)))
    meta:Show()

    local remove = TrackNative(CreateFrame("Button", nil, row, "UIPanelButtonTemplate"))
    remove:SetSize(72, 22)
    remove:SetPoint("RIGHT", row, "RIGHT", -6, 0)
    remove:SetText("Remove")
    remove:SetScript("OnClick", function()
      RemoveBlocked(rowData.key)
    end)
    AttachTooltip(remove, "Remove blocked actor",
      "Take " .. rowData.label .. " off the blocked-actors list.")
    remove:Show()

    y = y - (ROW_HEIGHT + 4)
  end

  AddText("Page " .. tostring(listState.blockedPage) .. " of " .. tostring(maxPage),
    "GameFontDisableSmall", CONTENT_PAD, y)
  AddNativeButton("Prev", CONTENT_PAD + 170, y + 4, 60, function()
    if listState.blockedPage > 1 then
      listState.blockedPage = listState.blockedPage - 1
      ConfigPanel.ShowSection("Blocked")
    end
  end, "Show the previous page of blocked actors.")
  AddNativeButton("Next", CONTENT_PAD + 236, y + 4, 60, function()
    if listState.blockedPage < maxPage then
      listState.blockedPage = listState.blockedPage + 1
      ConfigPanel.ShowSection("Blocked")
    end
  end, "Show the next page of blocked actors.")
end

RenderHistory = function()
  local entries = NS.History and NS.History.GetAll and NS.History.GetAll() or {}
  local stats = GetHistoryStats()
  local lifetime = stats and stats.lifetime or {}
  local retained = stats and stats.retained or {}
  local y = AddSectionTitle("History", "Control retained block history.")
  y = AddStatus(y, sectionStatus.History)
  y = AddDisabledRow("Total detections", tostring(tonumber(lifetime.detections) or 0), y)
  y = AddDisabledRow("Total blocks", tostring(tonumber(lifetime.blocked) or 0), y)
  y = AddDisabledRow("Total restores", tostring(tonumber(lifetime.restored) or 0), y)
  AddText("Retained entries: " .. tostring(tonumber(retained.detections) or #entries),
    "GameFontNormalSmall", CONTENT_PAD, y)
  y = y - 28

  local slider = MakeNativeSlider(CONTENT_PAD, y, 360, "Maximum history entries", 100, 5000, 100)
  slider:SetValue(tonumber(SettingValue("historyMaxEntries")) or DEFAULT_SETTINGS.historyMaxEntries)
  slider:SetCallback("OnValueChanged", function(_, _, value)
    value = ClampNumber(value, 100, 5000, DEFAULT_SETTINGS.historyMaxEntries)
    value = math.floor((value + 50) / 100) * 100
    -- BSP-050 Argus nit: the per-char cap applies to every character on commit
    -- (via TrimAllCharacters), so the popup must fire when *any* char would be
    -- trimmed, not just the current one. Mirror the global slider's cross-char
    -- iteration at lines below, but track the *max* single-char length rather
    -- than the sum.
    local maxLen = 0
    if NS.DB and NS.DB.db and NS.DB.db.sv and type(NS.DB.db.sv.char) == "table" then
      for _, charData in pairs(NS.DB.db.sv.char) do
        if type(charData) == "table" and type(charData.history) == "table" then
          if #charData.history > maxLen then maxLen = #charData.history end
        end
      end
    end
    if value < maxLen then
      pendingHistoryMax = value
      if StaticPopup_Show then
        StaticPopup_Show("HUSH_TRIM_HISTORY")
      end
    else
      SetSetting("historyMaxEntries", value)
    end
  end)
  AttachTooltip(slider, "Maximum history entries",
    "Cap retained History at this many entries. Oldest entries are trimmed first. " ..
    "Lifetime stats counters are unaffected.")
  y = y - 52

  local globalSlider = MakeNativeSlider(CONTENT_PAD, y, 360, "Account total", 100, 5000, 100)
  globalSlider:SetValue(tonumber(SettingValue("historyGlobalMaxEntries")) or DEFAULT_SETTINGS.historyGlobalMaxEntries)
  globalSlider:SetCallback("OnValueChanged", function(_, _, value)
    value = ClampNumber(value, 100, 5000, DEFAULT_SETTINGS.historyGlobalMaxEntries)
    value = math.floor((value + 50) / 100) * 100
    local total = 0
    if NS.DB and NS.DB.db and NS.DB.db.sv and type(NS.DB.db.sv.char) == "table" then
      for _, charData in pairs(NS.DB.db.sv.char) do
        if type(charData) == "table" and type(charData.history) == "table" then
          total = total + #charData.history
        end
      end
    end
    if value < total then
      pendingHistoryGlobalMax = value
      if StaticPopup_Show then
        StaticPopup_Show("HUSH_TRIM_HISTORY_GLOBAL")
      end
    else
      SetSetting("historyGlobalMaxEntries", value)
    end
  end)
  AttachTooltip(globalSlider, "Account total",
    "Maximum spam-history records retained across all characters combined. " ..
    "Lowering this trims oldest records account-wide on next login.")
  y = y - 52

  AddNativeButton("Clear History", CONTENT_PAD, y, 120, ConfigPanel.ConfirmClearHistory,
    "Delete all retained History entries. Lifetime stats counters are preserved. Confirmation required.")
end

RenderUI = function()
  local y = AddSectionTitle("UI", "Panel position and minimap controls.")
  y = AddStatus(y, sectionStatus.UI)
  y = AddCheckbox("Show minimap button", "showMinimapButton", y, function(value)
    SetSetting("showMinimapButton", value)
    SetHistoryPanelMinimapShown(value)
  end, "Toggle the Sift launcher icon on the minimap.")

  AddNativeButton("Reset History Panel", CONTENT_PAD, y, 150, function()
    if NS.HistoryPanel and NS.HistoryPanel.ResetPosition then
      NS.HistoryPanel.ResetPosition()
      sectionStatus.UI = "History panel position reset."
    else
      sectionStatus.UI = "History panel reset API is unavailable."
    end
    ConfigPanel.ShowSection("UI")
  end, "Reset the History panel size and position to defaults (centered, 820 \195\151 540).")
  AddNativeButton("Reset Config Panel", CONTENT_PAD + 160, y, 150, function()
    ConfigPanel.ResetPosition()
    sectionStatus.UI = "Config panel position reset."
    ConfigPanel.ShowSection("UI")
  end, "Reset the Config panel size and position to defaults (centered, 700 \195\151 500).")
end

RenderDev = function()
  local y = AddSectionTitle("Dev", "Developer-only diagnostics and reset controls.")
  y = AddStatus(y, sectionStatus.Dev)
  y = AddCheckbox("Enable dev mode", "devMode", y, nil,
    "Enable developer-only diagnostics: extra logging, devMode-gated error reporting, " ..
    "/bdev slash commands, and other diagnostic affordances.")
  AddNativeButton("Reset Settings", CONTENT_PAD, y, 120, function()
    if StaticPopup_Show then
      StaticPopup_Show("HUSH_RESET_SETTINGS")
    end
  end, "Reset ALL settings to defaults. Does not touch History, Allowlist, or Blocked. Confirmation required.")
  -- BSP-018: FP-export tool. Same gating semantics as /bdev fpx — the
  -- OpenFPExportDialog function checks devMode and prints a status message
  -- if off, so the button is visible always (discoverability) but only
  -- functional when devMode is enabled.
  AddNativeButton("Export FP fixtures", CONTENT_PAD + 130, y, 150, function()
    ConfigPanel.OpenFPExportDialog(nil)
  end, "Export false-positive entries from History as a paste-ready Lua " ..
    "negatives block for fixtures.lua. Equivalent to /bdev fpx. " ..
    "Requires devMode to be enabled.")
end

local RENDERERS = {
  Detection = RenderDetection,
  Categories = RenderCategories,
  Surfaces = RenderSurfaces,
  Allowlist = RenderAllowlist,
  Blocked = RenderBlocked,
  History = RenderHistory,
  UI = RenderUI,
  Dev = RenderDev,
}

-- BSP-022 Commit 1: dual-path chrome. PortraitFrameTemplate and
-- ButtonFrameTemplateNoPortrait are Retail-only (MCP-confirmed: not in
-- Classic Era 1.15 or Pandaria Classic 5.5), so Classic-family falls back to
-- a manual BackdropTemplate shell. Embed mode (parent != nil) always uses a
-- plain Frame regardless of flavor so it nests inside HistoryPanel's Config
-- tab without portrait/border collision. Mirrors HistoryPanel's BSP-008
-- pattern (CreatePlainHistoryFrame / CreateHistoryFrame / CreateBackdropFrame).
local function HidePortraitChrome(f)
  if not f then return end
  local frameName = f.GetName and f:GetName() or nil
  local pieces = {
    f.PortraitContainer,
    f.Portrait,
    f.portrait,
    f.portraitFrame,
    frameName and _G[frameName .. "PortraitContainer"] or nil,
    frameName and _G[frameName .. "Portrait"] or nil,
    frameName and _G[frameName .. "PortraitFrame"] or nil,
  }
  for _, piece in ipairs(pieces) do
    if piece and piece.Hide then
      piece:Hide()
      if piece.SetAlpha then
        piece:SetAlpha(0)
      end
    end
  end
end

local function CreatePlainConfigFrame(parent)
  local ok, f = pcall(CreateFrame, "Frame", "SiftConfigFrame", parent, "BackdropTemplate")
  if not ok or not f then
    f = CreateFrame("Frame", "SiftConfigFrame", parent)
  end
  if f.SetBackdrop then
    f:SetBackdrop({
      bgFile = "Interface\\DialogFrame\\UI-DialogBox-Background-Dark",
      edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border",
      tile = true,
      tileSize = 16,
      edgeSize = 16,
      insets = { left = 4, right = 4, top = 4, bottom = 4 },
    })
    f:SetBackdropColor(0.02, 0.02, 0.025, 0.96)
    f:SetBackdropBorderColor(0.35, 0.36, 0.42, 1)
  end

  local header = CreateFrame("Frame", nil, f)
  header:SetHeight(28)
  header:SetPoint("TOPLEFT", f, "TOPLEFT", 6, -6)
  header:SetPoint("TOPRIGHT", f, "TOPRIGHT", -30, -6)
  header:EnableMouse(true)
  header:RegisterForDrag("LeftButton")
  header:SetScript("OnDragStart", function() f:StartMoving() end)
  header:SetScript("OnDragStop", function()
    f:StopMovingOrSizing()
    SavePosition()
  end)

  header.TitleText = header:CreateFontString(nil, "OVERLAY", "GameFontNormalLarge")
  header.TitleText:SetPoint("CENTER", header, "CENTER", 0, 0)
  header.TitleText:SetText(L("Sift \226\128\148 Config"))
  f.TitleContainer = header

  local close = CreateFrame("Button", nil, f, "UIPanelCloseButton")
  close:SetPoint("TOPRIGHT", f, "TOPRIGHT", 2, -2)
  close:SetScript("OnClick", function() f:Hide() end)
  f.CloseButton = close

  return f
end

local function CreatePortraitConfigFrame(parent)
  local template = "PortraitFrameTemplate"
  local ok, f = pcall(CreateFrame, "Frame", "SiftConfigFrame", parent, template)
  if ok and f then
    return f
  end
  -- Defensive fallback if Blizzard ever removes PortraitFrameTemplate from a
  -- future Retail interface revision: drop the template and let ApplyConfigChrome's
  -- method-existence guards no-op the Portrait-specific work. The frame name is
  -- preserved so UISpecialFrames + external addon-manager lookups still resolve.
  return CreateFrame("Frame", "SiftConfigFrame", parent)
end

local function CreateConfigFrame(parent)
  if NS.Compat and NS.Compat.isClassicFamily then
    return CreatePlainConfigFrame(parent)
  end
  return CreatePortraitConfigFrame(parent)
end

-- Post-processor: applies PortraitFrameTemplate-specific customization
-- (layout, portrait hide, title set, title centering). No-op on the Plain
-- path because every method is method-existence-guarded; the Plain path
-- already wires title + close button inline in CreatePlainConfigFrame.
local function ApplyConfigChrome(f)
  f.layoutType = "ButtonFrameTemplateNoPortrait"
  if f.SetBorder then
    f:SetBorder("ButtonFrameTemplateNoPortrait")
  end
  if f.SetPortraitShown then
    f:SetPortraitShown(false)
  end
  HidePortraitChrome(f)
  if f.SetTitle then
    f:SetTitle(L("Sift \226\128\148 Config"))
  elseif f.TitleContainer and f.TitleContainer.TitleText then
    f.TitleContainer.TitleText:SetText(L("Sift \226\128\148 Config"))
  end
  -- Center the title within TitleContainer (PortraitFrameTemplate default
  -- is LEFT-anchored; Plain path already centers, so this is a no-op there).
  if f.TitleContainer and f.TitleContainer.TitleText then
    f.TitleContainer.TitleText:ClearAllPoints()
    f.TitleContainer.TitleText:SetPoint("CENTER", f.TitleContainer, "CENTER", 0, 0)
  end
  f:SetFrameStrata("HIGH")
  f:SetClampedToScreen(true)
  f:Hide()
  return f
end

local function CreateResizeHandle(parent)
  local handle = CreateFrame("Button", nil, parent)
  handle:SetSize(16, 16)
  handle:SetPoint("BOTTOMRIGHT", parent, "BOTTOMRIGHT", -4, 4)
  handle:SetNormalTexture("Interface\\ChatFrame\\UI-ChatIM-SizeGrabber-Up")
  handle:SetHighlightTexture("Interface\\ChatFrame\\UI-ChatIM-SizeGrabber-Highlight")
  handle:SetPushedTexture("Interface\\ChatFrame\\UI-ChatIM-SizeGrabber-Down")
  handle:SetScript("OnMouseDown", function()
    parent:StartSizing("BOTTOMRIGHT")
  end)
  handle:SetScript("OnMouseUp", function()
    parent:StopMovingOrSizing()
    sizeDirty = true
  end)
  AttachTooltip(handle, "Resize panel",
    "Drag to resize the Config panel.",
    "Minimum size: 600 \195\151 400.")
end

-- BSP-009: per-section hover help for the left nav.
local NAV_TOOLTIPS = {
  Detection  = "Score threshold, mixed-script signal weight, anti-signal cap.",
  Categories = "Toggle each spam category between Active (block), Paused (log only), and Off (ignore).",
  Surfaces   = "Toggle each chat surface between Active, Paused, and Off. Also: filter bubbles.",
  Allowlist  = "Senders Sift will always trust. Add from History or import a saved list.",
  Blocked    = "Recently blocked actors. Manage repeat offenders.",
  History    = "Retained-history limit and clear control.",
  UI         = "Minimap launcher and panel-position resets.",
  Dev        = "Developer-only diagnostics and full settings reset.",
}

local function CreateNav(parent)
  local nav = CreateFrame("Frame", nil, parent)
  nav:SetPoint("TOPLEFT", parent, "TOPLEFT", 8, -40)
  nav:SetPoint("BOTTOMLEFT", parent, "BOTTOMLEFT", 8, 12)
  nav:SetWidth(NAV_WIDTH)

  local previous
  for _, section in ipairs(SECTIONS) do
    local button = CreateFrame("Button", nil, nav, "UIPanelButtonTemplate")
    button:SetSize(NAV_WIDTH - 8, 24)
    if previous then
      button:SetPoint("TOPLEFT", previous, "BOTTOMLEFT", 0, -6)
    else
      button:SetPoint("TOPLEFT", nav, "TOPLEFT", 0, 0)
    end
    button:SetText(section)
    button:SetScript("OnClick", function()
      ConfigPanel.ShowSection(section)
    end)
    AttachTooltip(button, section, NAV_TOOLTIPS[section])
    navButtons[section] = button
    previous = button
  end
end

-- BSP-022 / Argus N2: ConfigPanel.Open routes through HistoryPanel.ShowConfig
-- when HistoryPanel is loaded (the normal case), which always calls Attach()
-- and hits the embed-mode branch below. The standalone-no-parent branch is a
-- defensive fallback for the case where HistoryPanel.ShowConfig is missing.
-- New ConfigPanel callers should still pass through ConfigPanel.Open and let
-- this routing layer pick the right mode.
local function BuildFrame(parent)
  local embedded = parent ~= nil
  if frame then
    if embedded and frame.SetParent then
      frame:SetParent(parent)
      frame:ClearAllPoints()
      frame:SetAllPoints(parent)
      embeddedMode = true
    end
    return
  end

  if embedded then
    -- Embed mode: plain Frame, no chrome. HistoryPanel's Config tab owns
    -- the chrome; we just provide content inside its host frame.
    frame = CreateFrame("Frame", "SiftConfigFrame", parent)
    frame:SetAllPoints(parent)
    embeddedMode = true
  else
    -- Standalone: dispatcher picks PortraitFrameTemplate (Retail) or the
    -- Plain BackdropTemplate shell (Classic-family). ApplyConfigChrome
    -- handles Portrait-specific customization on Retail; method-existence
    -- guards make it a no-op on Plain.
    frame = CreateConfigFrame(UIParent)
    ApplyConfigChrome(frame)
    frame:SetMovable(true)
    frame:SetResizable(true)
    if frame.SetResizeBounds then
      frame:SetResizeBounds(MIN_WIDTH, MIN_HEIGHT)
    end
    CreateResizeHandle(frame)
  end
  CreateNav(frame)

  content = CreateFrame("Frame", nil, frame)
  if embedded then
    content:SetPoint("TOPLEFT", frame, "TOPLEFT", NAV_WIDTH + 8, 0)
    content:SetPoint("BOTTOMRIGHT", frame, "BOTTOMRIGHT", 0, 0)
  else
    content:SetPoint("TOPLEFT", frame, "TOPLEFT", NAV_WIDTH + 16, -40)
    content:SetPoint("BOTTOMRIGHT", frame, "BOTTOMRIGHT", -12, 12)
  end

  frame:SetScript("OnSizeChanged", function()
    sizeDirty = true
  end)
  frame:SetScript("OnHide", function()
    if sizeDirty then
      SaveSize()
    end
  end)

  if not embedded then
    ApplyStoredGeometry()
  end
  if not embedded and UISpecialFrames then
    tinsert(UISpecialFrames, "SiftConfigFrame")
  end
end

function ConfigPanel.Initialize()
  if initialized then
    return
  end
  initialized = true
  RegisterStaticPopups()
  RegisterInterfaceOptions()
end

function ConfigPanel.Open(section)
  ConfigPanel.Initialize()
  if NS.HistoryPanel and NS.HistoryPanel.ShowConfig then
    NS.HistoryPanel.ShowConfig(section)
    return
  end
  BuildFrame()
  ConfigPanel.ShowSection(section or activeSection or "Detection")
  frame:Show()
end

function ConfigPanel.Close()
  if embeddedMode and NS.HistoryPanel and NS.HistoryPanel.Show then
    NS.HistoryPanel.Show()
    return
  end
  if frame then
    frame:Hide()
  end
end

function ConfigPanel.Toggle(section)
  ConfigPanel.Initialize()
  if NS.HistoryPanel and NS.HistoryPanel.ShowConfig then
    NS.HistoryPanel.ShowConfig(section)
    return
  end
  BuildFrame()
  if frame:IsShown() then
    frame:Hide()
  else
    ConfigPanel.Open(section)
  end
end

function ConfigPanel.ResetPosition()
  if embeddedMode then
    if NS.HistoryPanel and NS.HistoryPanel.ResetPosition then
      NS.HistoryPanel.ResetPosition()
    end
    return
  end
  local store = GetCharStore()
  if store then
    store.x = nil
    store.y = nil
    store.width = DEFAULT_WIDTH
    store.height = DEFAULT_HEIGHT
  end
  if frame then
    ApplyStoredGeometry()
    SavePosition()
    SaveSize()
  end
end

function ConfigPanel.Attach(parent, section)
  if not parent then
    return nil
  end

  ConfigPanel.Initialize()
  BuildFrame(parent)
  ConfigPanel.ShowSection(section or activeSection or "Detection")
  frame:Show()
  return frame
end

function ConfigPanel.ShowSection(section)
  if not SectionExists(section) then
    section = "Detection"
  end
  BuildFrame()
  activeSection = section
  ReleaseContent()
  SetNavHighlight()

  local renderer = RENDERERS[section]
  if renderer then
    renderer()
  end
end

-- BSP-018: escape a string as a Lua double-quoted literal payload.
-- Order matters: backslash MUST come first, otherwise the subsequent escape
-- replacements would re-double their own leading backslashes. UTF-8 multibyte
-- sequences pass through verbatim — Lua's string parser treats those bytes
-- as literal. Low-ASCII control bytes (\0 + 0x01-0x08 + \v + \f + 0x0E-0x1F)
-- emit as decimal `\NNN` escapes — they're vanishingly rare in chat input but
-- the paste-into-fixtures.lua use case demands a clean source file.
-- BSP-018 polish (post-Argus): added \t escape and the low-ASCII catch-all
-- so a stray tab character in a chat line doesn't break fixtures.lua indent.
local function EscapeLuaString(value)
  value = tostring(value or "")
  value = string.gsub(value, "\\", "\\\\")
  value = string.gsub(value, "\"", "\\\"")
  value = string.gsub(value, "\n", "\\n")
  value = string.gsub(value, "\r", "\\r")
  value = string.gsub(value, "\t", "\\t")
  value = string.gsub(value, "[%z\1-\8\11\12\14-\31]", function(c)
    return string.format("\\%d", string.byte(c))
  end)
  return value
end

-- BSP-018: build a paste-ready Lua negatives block from History entries
-- where outcome == "restored". Newest-first per History.GetAll convention.
-- Optional `limit` clamps to the first N restored entries (also newest-first
-- since the source is already sorted that way).
local function BuildFPExportText(limit)
  -- BSP-018 polish (post-Argus): clamp non-positive limit to nil so the
  -- "no-limit" path is reached explicitly rather than via the > 0 side
  -- effect. Matches AC #6's "N is a positive integer" intent.
  if limit and limit <= 0 then limit = nil end

  local entries = NS.History and NS.History.GetAll and NS.History.GetAll() or {}
  local restored = {}
  for i = 1, #entries do
    if entries[i].outcome == "restored" then
      restored[#restored + 1] = entries[i]
    end
  end
  if limit and #restored > limit then
    local trimmed = {}
    for i = 1, limit do trimmed[i] = restored[i] end
    restored = trimmed
  end

  local lines = {
    "-- Sift FP-export (negative fixtures for Sift_Dev/patterns/fixtures.lua)",
    "-- Exported: " .. (date and date("%Y-%m-%d %H:%M:%S") or "?"),
    "-- Entries:  " .. tostring(#restored)
      .. (limit and (" (limited to last " .. tostring(limit) .. ")") or ""),
    "",
  }

  if #restored == 0 then
    lines[#lines + 1] = "-- No restored entries in History. Use the Restore button on false-positive blocks first."
  end

  for i = 1, #restored do
    local entry = restored[i]
    local senderLabel = entry.name or "?"
    if entry.realm and entry.realm ~= "" then
      senderLabel = senderLabel .. "-" .. entry.realm
    end
    local dateStr = (entry.ts and date) and date("%Y-%m-%d", entry.ts) or "?"
    lines[#lines + 1] = string.format("  -- [%s] %s  score=%s  %s",
      tostring(entry.surface or "?"),
      senderLabel,
      tostring(entry.score or "?"),
      dateStr)
    lines[#lines + 1] = string.format("  \"%s\",", EscapeLuaString(entry.original))
  end

  return table.concat(lines, "\n")
end

function ConfigPanel.OpenFPExportDialog(limit)
  ConfigPanel.Initialize()
  if NS.DB and NS.DB.IsDevMode and not NS.DB.IsDevMode() then
    Print("/bdev commands require devMode. Enable in Config \194\187 Dev.")
    return
  end
  -- BSP-018 polish (post-Argus): match BuildFPExportText's clamp so the
  -- title count is consistent with the body content.
  if limit and limit <= 0 then limit = nil end
  local count = 0
  local entries = NS.History and NS.History.GetAll and NS.History.GetAll() or {}
  for i = 1, #entries do
    if entries[i].outcome == "restored" then count = count + 1 end
  end
  if limit and count > limit then count = limit end
  ShowTextDialog(
    "Sift FP Fixture Export (" .. tostring(count) .. " entries)",
    BuildFPExportText(limit),
    "Close", nil)
end

-- BSP-049: meta breakdown keys that are never a content category. Mirrors
-- History.lua's IGNORED_BREAKDOWN_KEYS (the canonical set the spec points to)
-- so the dominant category here matches History/HistoryPanel stats logic.
local HISTORY_EXPORT_IGNORED_KEYS = {
  MixedScript = true,
  BlockedActor = true,
  Flood = true,
}

-- BSP-049: build a raw (NOT Lua-escaped) corpus-candidate export from ALL
-- History entries, deduped by exact `original` string. For each unique
-- original we accumulate: occurrence count, dominant content category (max
-- weight across occurrences), max score, and the set of outcomes seen. Sorted
-- by count descending so the most-repeated spam (highest-value corpus
-- candidates) lead. Optional `limit` caps to the top-N unique originals.
--
-- Read-only: History.GetAll returns live record refs; we iterate without
-- mutating and build our own dedup table. Output is plain text for hand
-- triage into spam_master.txt — not a fixtures block, so no Lua escaping.
local function BuildHistoryExportText(limit)
  if limit and limit <= 0 then limit = nil end

  local entries = NS.History and NS.History.GetAll and NS.History.GetAll() or {}
  local totalRecords = #entries

  -- Dedup by exact original string. uniques[original] = aggregate; order[]
  -- preserves first-seen order for stable sorting of equal-count entries.
  local uniques, order = {}, {}
  for i = 1, #entries do
    local record = entries[i]
    local original = record.original
    if type(original) == "string" and original ~= "" then
      local agg = uniques[original]
      if not agg then
        agg = {
          original = original,
          count = 0,
          maxScore = nil,
          catWeights = {},
          outcomes = {},
        }
        uniques[original] = agg
        order[#order + 1] = agg
      end
      agg.count = agg.count + 1

      local score = tonumber(record.score)
      if score and (not agg.maxScore or score > agg.maxScore) then
        agg.maxScore = score
      end

      -- Accumulate category weight across occurrences so the dominant
      -- category reflects the strongest signal this text ever produced.
      local breakdown = record.breakdown
      if type(breakdown) == "table" then
        for cat, val in pairs(breakdown) do
          local numeric = tonumber(val) or 0
          if not HISTORY_EXPORT_IGNORED_KEYS[cat] and numeric > 0 then
            agg.catWeights[cat] = math.max(agg.catWeights[cat] or 0, numeric)
          end
        end
      end

      agg.outcomes[record.outcome or "blocked"] = true
    end
  end

  local uniqueCount = #order

  -- Sort by count descending; ties keep first-seen (newest-first) order via
  -- the stored index so the sort is deterministic.
  for index, agg in ipairs(order) do
    agg.sortIndex = index
  end
  table.sort(order, function(a, b)
    if a.count ~= b.count then
      return a.count > b.count
    end
    return a.sortIndex < b.sortIndex
  end)

  if limit and #order > limit then
    local trimmed = {}
    for i = 1, limit do trimmed[i] = order[i] end
    order = trimmed
  end

  local lines = {
    string.format("-- Sift history export: %d records, %d unique%s",
      totalRecords, uniqueCount,
      limit and (" (top " .. tostring(limit) .. " shown)") or ""),
    "-- Exported: " .. (date and date("%Y-%m-%d %H:%M:%S") or "?"),
    "-- Format: [<count>x] <category>/<maxScore> <outcomes> | <raw original>",
    "",
  }

  if uniqueCount == 0 then
    lines[#lines + 1] = "-- No history records found."
  end

  for i = 1, #order do
    local agg = order[i]

    -- Dominant category across the accumulated per-category max weights.
    local bestCat, bestVal
    for cat, val in pairs(agg.catWeights) do
      if not bestVal or val > bestVal then
        bestCat, bestVal = cat, val
      end
    end

    -- Stable, sorted outcome list (blocked / pass-thru / restored).
    local outcomeList = {}
    for outcome in pairs(agg.outcomes) do
      outcomeList[#outcomeList + 1] = outcome
    end
    table.sort(outcomeList)

    lines[#lines + 1] = string.format("[%dx] %s/%s %s | %s",
      agg.count,
      bestCat or "?",
      agg.maxScore and tostring(agg.maxScore) or "?",
      table.concat(outcomeList, ","),
      agg.original)
  end

  return table.concat(lines, "\n")
end

function ConfigPanel.OpenHistoryExportDialog(limit)
  ConfigPanel.Initialize()
  if NS.DB and NS.DB.IsDevMode and not NS.DB.IsDevMode() then
    Print("/bdev commands require devMode. Enable in Config \194\187 Dev.")
    return
  end
  if limit and limit <= 0 then limit = nil end

  -- Count unique originals for the title; mirrors BuildHistoryExportText's
  -- dedup so the displayed count matches the body.
  local entries = NS.History and NS.History.GetAll and NS.History.GetAll() or {}
  local seen, uniqueCount = {}, 0
  for i = 1, #entries do
    local original = entries[i].original
    if type(original) == "string" and original ~= "" and not seen[original] then
      seen[original] = true
      uniqueCount = uniqueCount + 1
    end
  end
  local shown = uniqueCount
  if limit and shown > limit then shown = limit end

  ShowTextDialog(
    "Sift History Corpus Export (" .. tostring(shown) .. " unique)",
    BuildHistoryExportText(limit),
    "Close", nil)
end

function ConfigPanel.OpenExportDialog()
  ConfigPanel.Initialize()
  ShowTextDialog("Sift Allowlist Export", ExportAllowlistText(), "Close", nil)
end

function ConfigPanel.OpenImportDialog()
  ConfigPanel.Initialize()
  ShowTextDialog("Sift Allowlist Import", "", "Import", function(text)
    local entries, err = ParseImportText(text)
    if not entries then
      if dialogFrame and dialogFrame.status then
        dialogFrame.status:SetText("|cffff5577" .. tostring(err) .. "|r")
      end
      return
    end

    CloseDialog()
    pendingImport = entries
    if ImportNeedsOverwrite(entries) and StaticPopup_Show then
      StaticPopup_Show("HUSH_IMPORT_OVERWRITE")
    else
      ApplyImport(entries, false)
    end
  end)
end

function ConfigPanel.ConfirmClearHistory()
  ConfigPanel.Initialize()
  if StaticPopup_Show then
    StaticPopup_Show("HUSH_CLEAR_HISTORY")
  end
end

function ConfigPanel.ConfirmClearBlocked()
  ConfigPanel.Initialize()
  if StaticPopup_Show then
    StaticPopup_Show("HUSH_CLEAR_BLOCKED")
  end
end

NS.ConfigPanel = ConfigPanel
return ConfigPanel