Hooks.lua

if BattlePetToolTip_Show ~= nil then -- not Auctionator.Constants.IsClassic
  hooksecurefunc (_G, "BattlePetToolTip_Show",
    function(speciesID, ...)
      Auctionator.Tooltip.AddPetTip(speciesID)
    end
  )
end

local TooltipHandlers = {}

-- This is called when mousing over an item in your bags
TooltipHandlers["SetBagItem"] = function(tip, bag, slot)
  local itemLocation = ItemLocation:CreateFromBagAndSlot(bag, slot)

  if C_Item.DoesItemExist(itemLocation) then
    local itemLink = C_Item.GetItemLink(itemLocation);
    local itemCount = C_Item.GetStackCount(itemLocation)

    Auctionator.Tooltip.ShowTipWithPricing(tip, itemLink, itemCount)
  end
end

-- This is called when mousing over an item in a merchant window (Buyback Pane)
TooltipHandlers["SetBuybackItem"] = function(tip, slotIndex)
  local itemLink = GetBuybackItemLink(slotIndex)
  local _, _, _, itemCount = GetBuybackItemInfo(slotIndex);

  Auctionator.Tooltip.ShowTipWithPricing(tip, itemLink, itemCount)
end

local GetMerchantItemInfo = GetMerchantItemInfo or function(index)
  local info = C_MerchantFrame.GetItemInfo(index);
  if info then
    return info.name, info.texture, info.price, info.stackCount, info.numAvailable, info.isPurchasable, info.isUsable, info.hasExtendedCost, info.currencyID, info.spellID;
  end
end

-- This is called when mousing over an item in a merchant window (Merchant Pane)
TooltipHandlers["SetMerchantItem"] = function(tip, index)
  local itemLink = GetMerchantItemLink(index)
  local _, _, _, itemCount = GetMerchantItemInfo(index);

  Auctionator.Tooltip.ShowTipWithPricing(tip, itemLink, itemCount)
end

-- This is called when mousing over an item in your bank, or a bag in your bag list
TooltipHandlers["SetInventoryItem"] = function(tip, unit, slot)
  local itemLink = GetInventoryItemLink(unit, slot)
  local itemCount = GetInventoryItemCount(unit, slot)

  Auctionator.Tooltip.ShowTipWithPricing(tip, itemLink, itemCount ~= 0 and itemCount or 1)
end

-- This is called when mousing over an item in your guild bank
-- Guild banks don't keep track of pets inside them correctly, so showing the AH
-- price is difficult.
TooltipHandlers["SetGuildBankItem"] = function(tip, tab, slot)
  local itemLink = GetGuildBankItemLink(tab, slot)
  local _, itemCount = GetGuildBankItemInfo(tab, slot)

  Auctionator.Tooltip.ShowTipWithPricing(tip, itemLink, itemCount)
end

if GameTooltip.SetRecipeReagentItem then -- Dragonflight onwards
  -- Reagent in Dragonflight recipe tradeskill page, only for reagents without a
  -- quality rating.
  TooltipHandlers["SetRecipeReagentItem"] = function( tip, recipeID, slotID )
    local recipeLevel
    if ProfessionsFrame and ProfessionsFrame.CraftingPage:IsVisible() then
      recipeLevel = ProfessionsFrame.CraftingPage.SchematicForm:GetCurrentRecipeLevel()
    elseif ProfessionsFrame and ProfessionsFrame.OrdersPage:IsVisible() then
      recipeLevel =  ProfessionsFrame.OrdersPage.OrderView.OrderDetails.SchematicForm:GetCurrentRecipeLevel()
    end

    local schematic = C_TradeSkillUI.GetRecipeSchematic(recipeID, false, recipeLevel)

    for _, reagentSlotSchematic in ipairs(schematic.reagentSlotSchematics) do
      if reagentSlotSchematic.dataSlotIndex == slotID then
        local itemCount = reagentSlotSchematic.quantityRequired
        local _, itemLink = GetItemInfo(reagentSlotSchematic.reagents[1].itemID)

        Auctionator.Tooltip.ShowTipWithPricing(tip, itemLink, itemCount)
        break
      end
    end
  end
end

if GameTooltip.SetRecipeResultItem then -- Dragonflight onwards
  TooltipHandlers["SetRecipeResultItem"] = function(tip, recipeID, reagents, allocations, recipeLevel, qualityID)
    local outputLink
    -- Use GetRecipeOutputLink when Crafting page visible (same resolution as profit line for quality items)
    if ProfessionsFrame and ProfessionsFrame.CraftingPage and ProfessionsFrame.CraftingPage:IsVisible() then
      local schematicForm = ProfessionsFrame.CraftingPage.SchematicForm
      outputLink = schematicForm and Auctionator.CraftingInfo.GetRecipeOutputLink(schematicForm, qualityID)
    end
    if not outputLink then
      local rInfo = C_TradeSkillUI.GetRecipeInfo(recipeID, recipeLevel or 0)
      if rInfo and rInfo.qualityItemIDs and #rInfo.qualityItemIDs > 0 and qualityID and qualityID >= 13 and qualityID <= 14 then
        local outID = rInfo.qualityItemIDs[qualityID - 12]
        if outID then outputLink = select(2, C_Item.GetItemInfo(outID)) end
      end
    end
    if not outputLink then
      local out = C_TradeSkillUI.GetRecipeOutputItemData(recipeID, reagents or {}, allocations, qualityID)
      outputLink = out and out.hyperlink
    end
    if not outputLink and Auctionator.CraftingInfo and Auctionator.CraftingInfo.EnchantSpellsToItems and Auctionator.CraftingInfo.EnchantSpellsToItems[recipeID] then
      local itemID = Auctionator.CraftingInfo.EnchantSpellsToItems[recipeID][1]
      if itemID then outputLink = select(2, C_Item.GetItemInfo(itemID)) end
    end

    if outputLink then
      local schematic = C_TradeSkillUI.GetRecipeSchematic(recipeID, false, recipeLevel or 0)
      Auctionator.Tooltip.ShowTipWithPricing(tip, outputLink, schematic and schematic.quantityMin or 1)
    end
  end
end

if GameTooltip.SetItemByGUID then
  TooltipHandlers["SetItemByGUID"] = function(tip, guid)
    local itemLink = C_Item.GetItemLinkByGUID(guid)

    if itemLink then
      Auctionator.Tooltip.ShowTipWithPricing(tip, itemLink, 1)
    end
  end
end

if GameTooltip.SetTradeSkillItem then -- Classic
  TooltipHandlers["SetTradeSkillItem"] = function(tip, recipeIndex, reagentIndex)
    local itemLink, itemCount
    if reagentIndex ~= nil then
      itemLink = GetTradeSkillReagentItemLink(recipeIndex, reagentIndex)
      itemCount = select(3, GetTradeSkillReagentInfo(recipeIndex, reagentIndex))
    else
      itemLink = GetTradeSkillItemLink(recipeIndex);
      itemCount  = GetTradeSkillNumMade(recipeIndex);
    end
    Auctionator.Tooltip.ShowTipWithPricing(tip, itemLink, itemCount)
  end
end

if GameTooltip.SetCraftItem then -- TBC classic and earlier
  TooltipHandlers["SetCraftItem"] = function(tip, recipeIndex, reagentIndex)
    local itemLink, itemCount
    if reagentIndex ~= nil then
      itemLink = GetCraftReagentItemLink(recipeIndex, reagentIndex)
      itemCount = select(3, GetCraftReagentInfo(recipeIndex, reagentIndex))
    else
      itemLink = GetCraftItemLink(recipeIndex);
      itemCount  = GetCraftNumMade(recipeIndex);
    end
    Auctionator.Tooltip.ShowTipWithPricing(tip, itemLink, itemCount)
  end
end

-- This is called when mousing over an item in the loot window
TooltipHandlers["SetLootItem"] = function (tip, slot)
  if LootSlotHasItem(slot) then
    local itemLink, _, itemCount = GetLootSlotLink(slot);

    Auctionator.Tooltip.ShowTipWithPricing(tip, itemLink, itemCount)
  end
end

-- TODO Haven't tested this so making an educated guess:
-- This is called when mousing over an item in the loot roll window
TooltipHandlers["SetLootRollItem"] = function (tip, slot)
  local itemLink = GetLootRollItemLink(slot)

  local _, _, itemCount = GetLootRollItemInfo(slot)

  Auctionator.Tooltip.ShowTipWithPricing(tip, itemLink, itemCount)
end

-- This is called when mousing over an item in a quest window
TooltipHandlers["SetQuestItem"] = function (tip, type, index)
  local itemLink = GetQuestItemLink(type, index)

  local _, _, itemCount = GetQuestItemInfo(type, index);

  Auctionator.Tooltip.ShowTipWithPricing(tip, itemLink, itemCount)
end

-- This is called when mousing over an item in a quest description in your quest log
TooltipHandlers["SetQuestLogItem"] = function (tip, type, index)
  local itemLink = GetQuestLogItemLink(type, index)

  local itemCount, _;
  if type == "choice" then
    _, _, itemCount = GetQuestLogChoiceInfo(index);
  else
    _, _, itemCount = GetQuestLogRewardInfo(index)
  end

  Auctionator.Tooltip.ShowTipWithPricing(tip, itemLink, itemCount)
end

-- This is called when mousing over an item in the send mail window
TooltipHandlers["SetSendMailItem"] = function (tip, id)
  local _, _, _, itemCount = GetSendMailItem(id)
  local itemLink = GetSendMailItemLink(id);

  Auctionator.Tooltip.ShowTipWithPricing(tip, itemLink, itemCount)
end

-- This occurs when:
-- 1. mousing over an item in the Open Mail frame
-- 2. mousing over an item in the Inbox frame
TooltipHandlers["SetInboxItem"] = function(tip, index, attachIndex)
  if Auctionator.Config.Get(Auctionator.Config.Options.MAILBOX_TOOLTIPS) then
    local attachmentIndex = attachIndex or 1

    local itemLink = GetInboxItemLink(index, attachmentIndex)

    local _, _, _, itemCount = GetInboxItem(index, attachmentIndex);

    Auctionator.Tooltip.ShowTipWithPricing(tip, itemLink, itemCount)
  end
end

-- This occurs when mousing over an item in the Inbox frame
hooksecurefunc("InboxFrameItem_OnEnter",
  function(self)
    local itemCount = select(8, GetInboxHeaderInfo(self.index))
    local tooltipEnabled =
      Auctionator.Config.Get(Auctionator.Config.Options.MAILBOX_TOOLTIPS) and  (
      Auctionator.Config.Get(Auctionator.Config.Options.VENDOR_TOOLTIPS) or
      Auctionator.Config.Get(Auctionator.Config.Options.AUCTION_TOOLTIPS) or
      Auctionator.Config.Get(Auctionator.Config.Options.ENCHANT_TOOLTIPS)
    )

    if tooltipEnabled and itemCount and itemCount > 1 then
      local itemEntries = {}
      local name, itemCount, itemLink, _

      for attachmentIndex = 1, ATTACHMENTS_MAX_RECEIVE do
        name, _, _, itemCount = GetInboxItem(self.index, attachmentIndex)

        if name then
          itemLink = GetInboxItemLink(self.index, attachmentIndex)

          table.insert(itemEntries, {
            link = itemLink,
            count = itemCount,
            name = name
          })
        end
      end

      Auctionator.Tooltip.ShowTipWithMultiplePricing(GameTooltip, itemEntries)
    end
  end
);

-- Occurs when mousing over  items I'm trading
TooltipHandlers["SetTradePlayerItem"] = function (tip, id)
  local itemLink = GetTradePlayerItemLink(id)
  if itemLink ~= nil then
    local _, _, itemCount = GetTradePlayerItemInfo(id);

    Auctionator.Tooltip.ShowTipWithPricing(tip, itemLink, itemCount)
  end
end

-- Occurs when mousing over items other player are trading
TooltipHandlers["SetTradeTargetItem"] = function (tip, id)
  local itemLink = GetTradeTargetItemLink(id)
  if itemLink ~= nil then
    local _, _, itemCount = GetTradeTargetItemInfo(id)

    Auctionator.Tooltip.ShowTipWithPricing(tip, itemLink, itemCount)
  end
end

if GameTooltip.SetAuctionItem then
  TooltipHandlers["SetAuctionItem"] = function(tip, viewType, index)
    local itemCount = select(3, GetAuctionItemInfo(viewType, index))
    local itemLink = GetAuctionItemLink(viewType, index)

    Auctionator.Tooltip.ShowTipWithPricing(tip, itemLink, itemCount)
  end
end

if GameTooltip.SetItemKey then
  TooltipHandlers["SetItemKey"] = function(tip, itemID, itemLevel, itemSuffix)
    local itemLink
    if C_TooltipInfo then
      local info = C_TooltipInfo and C_TooltipInfo.GetItemKey(itemID, itemLevel, itemSuffix)
      if info == nil then
        return
      end
      itemLink = info.hyperlink
    else
      itemLink = select(2, tip:GetItem())
    end
    if itemLink then
      -- Necessary as for recipes the crafted item is returned info.hyperlink,
      -- so we check we actually got the recipe item
      if C_Item.GetItemInfoInstant(itemLink) ~= itemID then
        itemLink = select(2, C_Item.GetItemInfo(itemID))
      end
      Auctionator.Tooltip.ShowTipWithPricingDBKey(
        tip,
        Auctionator.Utilities.DBKeyFromBrowseResult({itemKey = {itemID = itemID, itemLevel = itemLevel, itemSuffix = itemSuffix, battlePetSpeciesID = 0}}),
        itemLink,
        1
      )
    end
  end
end

-- Occurs when mousing over items in the Refer-a-Friend frame, and a few other places
TooltipHandlers["SetItemByID"] = function (tip, itemID)
  if not itemID then
    return
  end

  local itemLink = select(2, C_Item.GetItemInfo(itemID))

  Auctionator.Tooltip.ShowTipWithPricing(tip, itemLink, 1)
end

-- Occurs mainly with addons (Blizzard and otherwise)
TooltipHandlers["SetHyperlink"] = function (tip, itemLink)
  Auctionator.Tooltip.ShowTipWithPricing(tip, itemLink, 1)
end

-- Magic to update the tooltip with the prices when it is cleared and still
-- retain stack size information
if TooltipDataProcessor and C_TooltipInfo then
  local function ValidateTooltip(tooltip)
    if tooltip == GameTooltip or tooltip == GameTooltipTooltip or tooltip == ItemRefTooltip or tooltip == GarrisonShipyardMapMissionTooltipTooltip then
      return true
    end
    if tooltip:IsForbidden() then
      return false
    end
    local name = tooltip:GetName() or ""
    return name:match("^NotGameTooltip") or name:match("^RSMap") -- Standard protocol, or RareScanner
  end
  TooltipDataProcessor.AddTooltipPostCall(Enum.TooltipDataType.Item, function(tooltip, data)
    if ValidateTooltip(tooltip) then
      local info = tooltip.info or tooltip.processingInfo
      if not info or not info.getterName or info.excludeLines then
        return
      end
      local handler = TooltipHandlers[info.getterName:gsub("^Get", "Set")]
      if handler ~= nil then
        handler(tooltip, unpack(info.getterArgs))
      end
    end
  end)
else
  -- This occurs when clicking on an item link (i.e. in chat)
  hooksecurefunc(ItemRefTooltip, "SetHyperlink", TooltipHandlers["SetHyperlink"])

  for func, handler in pairs(TooltipHandlers) do
    hooksecurefunc(GameTooltip, func, handler)
  end
end

EventUtil.ContinueOnAddOnLoaded("Blizzard_ProfessionsTemplates", function()
  local function QualityTooltip(slot, transaction, noInstruction)
    local display = {}
    local quantities = Professions.GetQuantitiesAllocated(transaction, slot:GetReagentSlotSchematic())
    for index, reagentDetails in ipairs(slot:GetReagentSlotSchematic().reagents) do
      table.insert(display, {
        itemID = reagentDetails.itemID,
        quality = C_TradeSkillUI.GetItemReagentQualityByItemInfo(reagentDetails.itemID),
        itemCount = quantities[index],
      })
    end
    table.sort(display, function(a, b)
      return a.quality < b.quality
    end)

    Auctionator.Tooltip.AddReagentsAuctionTip(GameTooltip, display)
  end
  local function OptionalTooltip(item)
  end
  if Professions.SetupQualityReagentTooltip then
    hooksecurefunc(Professions, "SetupQualityReagentTooltip", QualityTooltip)
    hooksecurefunc(Professions, "AddCommonOptionalTooltipInfo", function(item)
      Auctionator.Tooltip.AddReagentsAuctionTip(GameTooltip, {{itemID = item:GetItemID(), itemCount = 1}})
    end)
  elseif Professions.SetupReagentQualityPickerTooltip then
    hooksecurefunc(Professions, "SetupReagentQualityPickerTooltip", QualityTooltip)
    hooksecurefunc(Professions, "SetupOptionalReagentTooltip", function(slot, transaction)
      local reagent = slot.Button:GetReagent()
      if reagent and reagent.itemID then
        Auctionator.Tooltip.AddReagentsAuctionTip(GameTooltip, {{itemID = reagent.itemID, itemCount = 1}})
      end
    end)
  end
end)