local _G = ShaguTweaks.GetGlobalEnv()
local T = ShaguTweaks.T
local round = ShaguTweaks.round
local rgbhex = ShaguTweaks.rgbhex
local Abbreviate = ShaguTweaks.Abbreviate
local API = ShaguTweaks.API

local tooltipSetStatusBarColor

local function GetUnit()
  local guid = API.GetTooltipUnitGUID(GameTooltip)
  if not guid then return end
  return API.UnitTokenFromGUID(guid)
end

local function ClearTooltipBarColor()
  GameTooltipStatusBar.ShaguTweaksColorR = nil
  GameTooltipStatusBar.ShaguTweaksColorG = nil
  GameTooltipStatusBar.ShaguTweaksColorB = nil
  GameTooltipStatusBar.ShaguTweaksColorA = nil
end

local function SetTooltipBarColor(r, g, b, a)
  if not r or not g or not b then return end

  GameTooltipStatusBar.ShaguTweaksColorR = r
  GameTooltipStatusBar.ShaguTweaksColorG = g
  GameTooltipStatusBar.ShaguTweaksColorB = b
  GameTooltipStatusBar.ShaguTweaksColorA = a or 1

  if tooltipSetStatusBarColor then
    tooltipSetStatusBarColor(GameTooltipStatusBar, r, g, b, a or 1)
  end
end

local function UpdateHealthText()
  local backdrop = GameTooltipStatusBar.backdrop
  if not backdrop or not backdrop.health then return end

  local hp = GameTooltipStatusBar:GetValue()
  local _, hpmax = GameTooltipStatusBar:GetMinMaxValues()

  local hasRealHealth = hpmax > 100
    or (hpmax > 0 and round(hpmax / 100 * hp) ~= hp)

  if hasRealHealth then
    backdrop.health:SetText(string.format("%s / %s",
      Abbreviate(hp, true), Abbreviate(hpmax, true)))
  elseif hpmax > 0 then
    backdrop.health:SetText(string.format("%s%%", ceil(hp / hpmax * 100)))
  else
    backdrop.health:SetText("")
  end
end

local function ResetTooltipState()
  ClearTooltipBarColor()

  if GameTooltipStatusBar.bg then
    GameTooltipStatusBar.bg:SetVertexColor(.1, .1, 0, .8)
  end

  if GameTooltipStatusBar.backdrop
    and GameTooltipStatusBar.backdrop.health then
    GameTooltipStatusBar.backdrop.health:SetText("")
  end
end

local updating = false

local function UpdateTooltip()
  if updating then return end
  updating = true

  -- ClassicAPI keeps the exact tooltip GUID and resolves it back to a live
  -- unit token natively. No party/raid scans or display-name fallback.
  local unit = GetUnit()
  if not unit then
    updating = false
    return
  end

  -- A newly resolved unit chooses its own class/reaction color below. Clear the
  -- previous enforcement first so a stale color cannot leak between tooltips.
  ClearTooltipBarColor()

  local pvpname = UnitPVPName(unit)
  local name = UnitName(unit)
  local target = UnitName(unit .. "target")
  local _, targetClass = UnitClass(unit .. "target")
  local targetReaction = UnitReaction("player", unit .. "target")
  local _, class = UnitClass(unit)
  local guild = GetGuildInfo(unit)
  local reaction = UnitReaction(unit, "player")
  local pvptitle = name and gsub(pvpname or name, " " .. name, "", 1) or nil

  if name then
    if UnitIsPlayer(unit) and class then
      local color = RAID_CLASS_COLORS[class]
      if color then
        SetTooltipBarColor(color.r, color.g, color.b, 1)
        GameTooltipStatusBar.bg:SetVertexColor(
          color.r * 0.15, color.g * 0.15, color.b * 0.15, 0.8)
        GameTooltipTextLeft1:SetText(
          rgbhex(color.r, color.g, color.b, color.a) .. name)
      else
        GameTooltipTextLeft1:SetText("|cff999999" .. name)
      end
    elseif reaction then
      local color = UnitReactionColor[reaction]
      if color then
        SetTooltipBarColor(color.r, color.g, color.b, 1)
        GameTooltipStatusBar.bg:SetVertexColor(
          color.r * 0.15, color.g * 0.15, color.b * 0.15, 0.8)
      end
    end

    if pvptitle and pvptitle ~= name then
      GameTooltip:AppendText(" |cff666666[" .. pvptitle .. "]|r")
    end
  end

  -- Guild name only (no rank)
  if guild then
    local guildAlready = false
    for i = 2, GameTooltip:NumLines() do
      local left = _G["GameTooltipTextLeft" .. i]
      if left and left:GetText() == "<" .. guild .. ">" then
        guildAlready = true
        break
      end
    end
    if not guildAlready then
      GameTooltip:AddLine("<" .. guild .. ">", 0.3, 1, 0.5)
    end
  end

  -- Current target, colored by class or reaction
  local alreadyAdded = false
  if target then
    for i = 2, GameTooltip:NumLines() do
      local left = _G["GameTooltipTextLeft" .. i]
      if left and left:GetText() == target then
        alreadyAdded = true
        break
      end
    end
  end

  if target and not alreadyAdded then
    if UnitIsPlayer(unit .. "target") and targetClass then
      local color = RAID_CLASS_COLORS[targetClass]
      if color then
        GameTooltip:AddLine(target, color.r, color.g, color.b)
      else
        GameTooltip:AddLine(target, .5, .5, .5)
      end
    elseif targetReaction then
      local color = UnitReactionColor[targetReaction]
      if color then
        GameTooltip:AddLine(target, color.r, color.g, color.b)
      else
        GameTooltip:AddLine(target, .5, .5, .5)
      end
    end
  end

  UpdateHealthText()
  GameTooltip:Show()
  updating = false
end

local module = ShaguTweaks:register({
  title = T["Tooltip Details"],
  description = T["Enriches unit tooltips with health, class color, guild name, rank, and current target."],
  expansions = { ["vanilla"] = true },
  category = T["Tooltip & Items"],
  enabled = true,
  order = 50,
})

local backdrop = {
  edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border",
  tile = true, tileSize = 8, edgeSize = 12,
  insets = { left = 3, right = 3, top = 3, bottom = 3 }
}

module.enable = function(self)
  -- Tooltip Details intentionally requires the native ClassicAPI tooltip
  -- identity + OnTooltipSetUnit path. Do not fall back to Vanilla name scans.
  if not API.tooltipsetunit then return end

  GameTooltipStatusBar:SetHeight(10)
  GameTooltipStatusBar:ClearAllPoints()
  GameTooltipStatusBar:SetPoint("BOTTOMLEFT", GameTooltip, "TOPLEFT", 4, 2)
  GameTooltipStatusBar:SetPoint("BOTTOMRIGHT", GameTooltip, "TOPRIGHT", -4, 2)

  GameTooltipStatusBar.bg = GameTooltipStatusBar:CreateTexture(nil, "BACKGROUND")
  GameTooltipStatusBar.bg:SetTexture("Interface\\TARGETINGFRAME\\UI-StatusBar")
  GameTooltipStatusBar.bg:SetVertexColor(.1, .1, 0, .8)
  GameTooltipStatusBar.bg:SetAllPoints(true)

  GameTooltipStatusBar.backdrop =
    CreateFrame("Frame", "GameTooltipStatusBarBackdrop", GameTooltipStatusBar)
  GameTooltipStatusBar.backdrop:SetPoint(
    "TOPLEFT", GameTooltipStatusBar, "TOPLEFT", -3, 3)
  GameTooltipStatusBar.backdrop:SetPoint(
    "BOTTOMRIGHT", GameTooltipStatusBar, "BOTTOMRIGHT", 3, -3)
  GameTooltipStatusBar.backdrop:SetBackdrop(backdrop)
  GameTooltipStatusBar.backdrop:SetBackdropBorderColor(.8,.8,.8,1)

  GameTooltipStatusBar.backdrop.health =
    GameTooltipStatusBar.backdrop:CreateFontString(
      "Status", "DIALOG", "GameFontWhite")
  GameTooltipStatusBar.backdrop.health:SetFont(
    STANDARD_TEXT_FONT, 12, "OUTLINE")
  GameTooltipStatusBar.backdrop.health:SetPoint("TOP", 0, 4)
  GameTooltipStatusBar.backdrop.health:SetNonSpaceWrap(false)

  -- Preserve the real statusbar method for Blizzard and other addons. A
  -- post-hook reapplies ShaguTweaks' class/reaction color only while a unit
  -- tooltip has an active desired color.
  tooltipSetStatusBarColor =
    tooltipSetStatusBarColor or GameTooltipStatusBar.SetStatusBarColor
  if not self.statusColorHooked then
    self.statusColorHooked = true
    ShaguTweaks.hooksecurefunc(
      GameTooltipStatusBar, "SetStatusBarColor", function()
        local r = GameTooltipStatusBar.ShaguTweaksColorR
        local g = GameTooltipStatusBar.ShaguTweaksColorG
        local b = GameTooltipStatusBar.ShaguTweaksColorB
        local a = GameTooltipStatusBar.ShaguTweaksColorA
        if r and g and b then
          tooltipSetStatusBarColor(
            GameTooltipStatusBar, r, g, b, a or 1)
        end
      end)
  end

  -- ClassicAPI fires this after the native unit-tooltip builder completes.
  -- This replaces OnShow + UPDATE_MOUSEOVER_UNIT identity refreshes.
  GameTooltip:HookScript("OnTooltipSetUnit", UpdateTooltip)
  -- OnTooltipCleared fires for every new Set* path, not only when the frame
  -- hides, so unit-only state cannot leak into a following item/spell tooltip.
  GameTooltip:HookScript("OnTooltipCleared", ResetTooltipState)

  -- StatusBar already has a native value-change script, so health text can be
  -- event-driven too. No permanent OnUpdate is needed.
  GameTooltipStatusBar:HookScript("OnValueChanged", UpdateHealthText)
end