tooltip_scanner.lua

local myname, ns = ...


local tip = CreateFrame("GameTooltip")
tip:SetOwner(WorldFrame, "ANCHOR_NONE")

ns.scantip = tip


local lcache, rcache = {}, {}
for i=1,30 do
	lcache[i], rcache[i] = tip:CreateFontString(), tip:CreateFontString()
	lcache[i]:SetFontObject(GameFontNormal)
	rcache[i]:SetFontObject(GameFontNormal)
	tip:AddFontStrings(lcache[i], rcache[i])
end


-- GetText cache tables, provide fast access to the tooltip's text
tip.L = setmetatable({}, {
	__index = function(t, key)
		if tip:NumLines() >= key and lcache[key] then
			local v = lcache[key]:GetText()
			t[key] = v
			return v
		end
		return nil
	end,
})


tip.R = setmetatable({}, {
	__index = function(t, key)
		if tip:NumLines() >= key and rcache[key] then
			local v = rcache[key]:GetText()
			t[key] = v
			return v
		end
		return nil
	end,
})


-- Performes a "full" erase of the tooltip
tip.Erase = function(self)
	self:ClearLines() -- Ensures tooltip's NumLines is reset
	for i in pairs(self.L) do self.L[i] = nil end -- Flush the metatable cache
	for i in pairs(self.R) do
		self.rcache[i]:SetText() -- Clear text from right side (ClearLines only hides them)
		self.R[i] = nil -- Flush the metatable cache
	end
	if not self:IsOwned(WorldFrame) then
		self:SetOwner(WorldFrame, "ANCHOR_NONE")
	end
end


-- Hooks the Set* methods to force a full erase beforehand
local methods = {"SetMerchantCostItem", "SetBagItem", "SetAction",
  "SetAuctionItem", "SetAuctionSellItem", "SetBuybackItem", "SetCraftItem",
  "SetCraftSpell", "SetHyperlink", "SetInboxItem", "SetInventoryItem",
  "SetLootItem", "SetLootRollItem", "SetMerchantItem", "SetPetAction",
  "SetPlayerBuff", "SetQuestItem", "SetQuestLogItem", "SetQuestRewardSpell",
  "SetSendMailItem", "SetShapeshift", "SetSpell", "SetTalent",
  "SetTrackingSpell", "SetTradePlayerItem", "SetTradeSkillItem",
  "SetTradeTargetItem", "SetTrainerService", "SetUnit", "SetUnitBuff",
  "SetUnitDebuff"}
for _,m in pairs(methods) do
	local orig = tip[m]
	tip[m] = function(self, ...)
		self:Erase()
		return orig(self, ...)
	end
end