---@class addonTablePlatynator
local addonTable = select(2, ...)

addonTable.CustomiseDialog.Components = {}

function addonTable.CustomiseDialog.Components.GetCheckbox(parent, label, spacing, callback)
  spacing = spacing or 0
  local holder = CreateFrame("Frame", nil, parent)
  holder:SetHeight(40)
  holder:SetPoint("LEFT", parent, "LEFT", 30, 0)
  holder:SetPoint("RIGHT", parent, "RIGHT", -15, 0)
  local checkBox = CreateFrame("CheckButton", nil, holder, "SettingsCheckboxTemplate")

  checkBox:SetPoint("LEFT", holder, "CENTER", -15 - spacing, 0)
  checkBox:SetText(label)
  checkBox:SetNormalFontObject(GameFontHighlight)
  checkBox:GetFontString():SetPoint("RIGHT", holder, "CENTER", -30 - spacing, 0)
  checkBox:GetFontString():SetPoint("LEFT", holder)
  checkBox:GetFontString():SetJustifyH("RIGHT")

  --addonTable.Skins.AddFrame("CheckBox", checkBox)

  function holder:SetValue(value)
    checkBox:SetChecked(value)
  end

  holder:SetScript("OnEnter", function()
    checkBox:OnEnter()
  end)

  holder:SetScript("OnLeave", function()
    checkBox:OnLeave()
  end)

  holder:SetScript("OnMouseUp", function()
    checkBox:Click()
  end)

  checkBox:SetScript("OnClick", function()
    callback(checkBox:GetChecked())
  end)

  return holder
end

function addonTable.CustomiseDialog.Components.GetHeader(parent, text)
  local holder = CreateFrame("Frame", nil, parent)
  holder:SetPoint("LEFT", 30, 0)
  holder:SetPoint("RIGHT", -30, 0)
  holder.text = holder:CreateFontString(nil, "OVERLAY", "GameFontHighlightLarge")
  holder.text:SetText(text)
  holder.text:SetPoint("LEFT", 20, -1)
  holder.text:SetPoint("RIGHT", 20, -1)
  holder:SetHeight(40)
  return holder
end

function addonTable.CustomiseDialog.Components.GetTab(parent, text)
  local tab
  if addonTable.Constants.IsRetail then
    tab = CreateFrame("Button", nil, parent, "PanelTopTabButtonTemplate")
    tab:SetScript("OnShow", function(self)
      PanelTemplates_TabResize(self, 15, nil, 70)
      PanelTemplates_DeselectTab(self)
    end)
  else
    tab = CreateFrame("Button", nil, parent, "TabButtonTemplate")
    tab:SetScript("OnShow", function(self)
      PanelTemplates_TabResize(self, 0, nil, 0)
      PanelTemplates_DeselectTab(self)
    end)
  end
  tab:SetText(text)
  tab:GetScript("OnShow")(tab)
  --addonTable.Skins.AddFrame("TopTabButton", tab)
  return tab
end

function addonTable.CustomiseDialog.Components.GetBasicDropdown(parent, labelText, isSelectedCallback, onSelectionCallback)
  local frame = CreateFrame("Frame", nil, parent)
  local dropdown = CreateFrame("DropdownButton", nil, frame, "WowStyle1DropdownTemplate")
  dropdown:SetWidth(250)
  dropdown:SetPoint("LEFT", frame, "CENTER", -32, 0)
  local label = frame:CreateFontString(nil, "OVERLAY", "GameFontHighlight")
  label:SetPoint("LEFT", 20, 0)
  label:SetPoint("RIGHT", frame, "CENTER", -50, 0)
  label:SetJustifyH("RIGHT")
  label:SetText(labelText)
  frame:SetPoint("LEFT", 30, 0)
  frame:SetPoint("RIGHT", -30, 0)
  frame.Init = function(_, entryLabels, values)
    local entries = {}
    for index = 1, #entryLabels do
      table.insert(entries, {entryLabels[index], values[index]})
    end
    dropdown:SetupMenu(function(menu, rootDescription)
      for index = 1, #entryLabels do
        local label, value = entryLabels[index], values[index]
        rootDescription:CreateRadio(label, isSelectedCallback, onSelectionCallback, value)
      end
      rootDescription:SetScrollMode(30 * 20)
    end)
  end
  frame.SetValue = function(_, _)
    dropdown:GenerateMenu()
    -- don't need to do anything as dropdown's onshow handles this
  end
  frame.Label = label
  frame.DropDown = dropdown
  frame:SetHeight(40)
  --addonTable.Skins.AddFrame("Dropdown", frame.DropDown)

  return frame
end

function addonTable.CustomiseDialog.Components.GetSlider(parent, label, min, max, formatter, callback)
  local holder = CreateFrame("Frame", nil, parent)
  holder:SetHeight(40)
  holder:SetPoint("LEFT", parent, "LEFT", 30, 0)
  holder:SetPoint("RIGHT", parent, "RIGHT", -30, 0)

  holder.Label = holder:CreateFontString(nil, "ARTWORK", "GameFontHighlight")
  holder.Label:SetJustifyH("RIGHT")
  holder.Label:SetPoint("LEFT", 20, 0)
  holder.Label:SetPoint("RIGHT", holder, "CENTER", -50, 0)
  holder.Label:SetText(label)

  holder.Slider = CreateFrame("Slider", nil, holder, "MinimalSliderWithSteppersTemplate")
  holder.Slider:SetPoint("LEFT", holder, "CENTER", -32, 0)
  holder.Slider:SetPoint("RIGHT", -45, 0)
  holder.Slider:SetHeight(20)
  holder.Slider:Init(max, min, max, max - min, {
    [MinimalSliderWithSteppersMixin.Label.Right]  = CreateMinimalSliderFormatter(MinimalSliderWithSteppersMixin.Label.Right, function(value)
      return WHITE_FONT_COLOR:WrapTextInColorCode(formatter(value))
    end)
  })

  holder.Slider:RegisterCallback(MinimalSliderWithSteppersMixin.Event.OnValueChanged, function(_, value)
    callback(value)
  end)
  holder.Slider.Slider:HookScript("OnEnter", function()
    if holder:GetScript("OnEnter") then
      holder:GetScript("OnEnter")(holder)
    end
  end)
  holder.Slider.Slider:HookScript("OnLeave", function()
    if holder:GetScript("OnLeave") then
      holder:GetScript("OnLeave")(holder)
    end
  end)

  function holder:GetValue()
    return holder.Slider.Slider:GetValue()
  end

  function holder:SetValue(value)
    return holder.Slider:SetValue(value)
  end

  --addonTable.Skins.AddFrame("Slider", holder.Slider)

  holder:SetScript("OnMouseWheel", function(_, delta)
    if holder.Slider.Slider:IsEnabled() then
      holder.Slider:SetValue(holder.Slider.Slider:GetValue() + delta)
    end
  end)

  return holder
end

function addonTable.CustomiseDialog.Components.GetColorSwatch(parent, callback)
  local colorSwatch
  local hasAlpha = false
  local colorPickerFrameMonitor = CreateFrame("Frame", nil, parent)
  colorPickerFrameMonitor.OnUpdate = function()
    if not ColorPickerFrame:IsVisible() then
      colorPickerFrameMonitor:SetScript("OnUpdate", nil)
    end
    if colorPickerFrameMonitor.changed then
      local c = {r = colorSwatch.pendingColor.r, g = colorSwatch.pendingColor.g, b = colorSwatch.pendingColor.b, a = hasAlpha and colorSwatch.pendingColor.a or nil}
      callback(c)
      colorSwatch.currentColor = CopyTable(c)
      colorSwatch.pendingColor = nil
    end
    colorPickerFrameMonitor.changed = false
  end
  local cancelColor
  colorPickerFrameMonitor:SetScript("OnHide", function() colorPickerFrameMonitor:SetScript("OnUpdate", nil) end)
  colorSwatch = CreateFrame("Button", nil, parent, "ColorSwatchTemplate")
  colorSwatch:RegisterForClicks("LeftButtonUp", "RightButtonUp")
  colorSwatch:SetScript("OnClick", function(_, button)
    hasAlpha = colorSwatch.currentColor.a ~= nil
    if button == "LeftButton" then
      local info = {}
      info.r, info.g, info.b, info.opacity = colorSwatch.currentColor.r, colorSwatch.currentColor.g, colorSwatch.currentColor.b, colorSwatch.currentColor.a
      info.hasOpacity = hasAlpha
      cancelColor = colorSwatch.currentColor
      info.swatchFunc = function()
        colorPickerFrameMonitor.changed = true
        local r, g, b = ColorPickerFrame:GetColorRGB()
        local a = info.hasOpacity and ColorPickerFrame:GetColorAlpha() or nil
        colorSwatch.pendingColor = CreateColor(r, g, b, a)
        colorSwatch:SetColorRGB(r, g, b)
      end
      info.cancelFunc = function()
        colorSwatch.pendingColor = cancelColor
        colorSwatch:SetColorRGB(cancelColor.r, cancelColor.g, cancelColor.b)
        callback({r = colorSwatch.pendingColor.r, g = colorSwatch.pendingColor.g, b = colorSwatch.pendingColor.b, a = hasAlpha and colorSwatch.pendingColor.a or nil})
        colorSwatch.currentColor = cancelColor
        colorSwatch.pendingColor = nil
      end
      colorPickerFrameMonitor:SetScript("OnUpdate", colorPickerFrameMonitor.OnUpdate)
      ColorPickerFrame:SetupColorPickerAndShow(info);
    else
      colorSwatch.pendingColor = CreateColor(1, 1, 1, 1)
      colorSwatch.currentColor = {r = colorSwatch.pendingColor.r, g = colorSwatch.pendingColor.g, b = colorSwatch.pendingColor.b, a = hasAlpha and colorSwatch.pendingColor.a or nil}
      colorSwatch:SetColorRGB(1, 1, 1)
      callback({r = colorSwatch.pendingColor.r, g = colorSwatch.pendingColor.g, b = colorSwatch.pendingColor.b, a = hasAlpha and colorSwatch.pendingColor.a or nil})
      -- Update tooltip to hide text about resetting the color
      colorSwatch:GetScript("OnLeave")(colorSwatch)
      colorSwatch:GetScript("OnEnter")(colorSwatch)
      colorSwatch.pendingColor = nil
    end
  end)

  return colorSwatch
end

function addonTable.CustomiseDialog.Components.GetColorPicker(parent, label, offset, callback)
  local holder = CreateFrame("Frame", nil, parent)
  holder:SetHeight(40)
  holder:SetPoint("LEFT", parent, "LEFT", 30, 0)
  holder:SetPoint("RIGHT", parent, "RIGHT", -30, 0)
  local swatch = addonTable.CustomiseDialog.Components.GetColorSwatch(holder, callback)

  swatch:SetPoint("LEFT", holder, "CENTER", -4 - offset, 0)
  local text = holder:CreateFontString(nil, nil, "GameFontHighlight")
  text:SetPoint("RIGHT", holder, "CENTER", -22 - offset, 0)
  text:SetText(label)

  function holder:SetValue(color)
    swatch.currentColor = CopyTable(color)
    swatch:SetColor(CreateColor(color.r, color.g, color.b))
  end

  function holder:GetValue()
    return CopyTable(swatch.pendingColor or swatch.currentColor)
  end

  holder:SetScript("OnEnter", function()
    swatch:GetScript("OnEnter")(swatch)
  end)

  holder:SetScript("OnLeave", function()
    swatch:GetScript("OnLeave")(swatch)
  end)

  holder:SetScript("OnMouseUp", function(_, mouseButton)
    swatch:Click(mouseButton)
  end)

  return holder
end

function addonTable.CustomiseDialog.Components.GetColorPickerWithCheckbox(parent, label, offset, callback)
  local wrapper = CreateFrame("Frame", nil, parent)
  wrapper:SetHeight(40)
  wrapper:SetPoint("LEFT")
  wrapper:SetPoint("RIGHT")
  local colorPicker, checkBox

  local function internalCallback()
    callback({color = colorPicker:GetValue(), enabled = checkBox:GetChecked()})
  end

  colorPicker = addonTable.CustomiseDialog.Components.GetColorPicker(wrapper, label, offset, internalCallback)
  checkBox = CreateFrame("CheckButton", nil, wrapper, "SettingsCheckboxTemplate")

  checkBox:SetPoint("LEFT", wrapper, "CENTER", 30 - offset, 0)
  checkBox:SetScript("OnClick", internalCallback)
  checkBox:SetFrameLevel(colorPicker:GetFrameLevel() + 5)

  function wrapper:SetValue(value)
    colorPicker:SetValue(value.color)
    checkBox:SetChecked(value.enabled)
  end

  return wrapper
end
