forked from Dusk/ShaguTweaks-ClassicAPI
108 lines
6.4 KiB
Lua
108 lines
6.4 KiB
Lua
local root=(arg[1] or '.')..'/'
|
|
local frames,modules,pending={},{},{}
|
|
local shift=true
|
|
local methods={}
|
|
local function noop() end
|
|
local function frame(name)
|
|
local f=setmetatable({name=name,scripts={},events={},shown=false}, {__index=function(t,k)
|
|
return methods[k] or (string.find(k,'^[A-Z]') and noop or nil)
|
|
end})
|
|
table.insert(frames,f);return f
|
|
end
|
|
function methods:SetOwner(owner) self.owner=owner;self.nativeContent=nil end
|
|
function methods:GetOwner() return self.owner end
|
|
function methods:ClearAllPoints() self.point=nil end
|
|
function methods:SetPoint(...) self.point=arg end
|
|
function methods:GetPoint() if self.point then return unpack(self.point) end return 'TOPLEFT',UIParent end
|
|
function methods:GetItem() if self.link then return 'Item',self.link end end
|
|
function methods:HookScript(k,v) self.scripts[k]=v end
|
|
function methods:RegisterEvent(k) self.events[k]=true end
|
|
function methods:SetScript(k,v) self.scripts[k]=v end
|
|
function methods:IsShown() return self.shown end
|
|
function methods:Show()
|
|
local changed=not self.shown;self.shown=true
|
|
if changed and self.scripts.OnShow then self.scripts.OnShow() end
|
|
end
|
|
function methods:Hide()
|
|
local changed=self.shown
|
|
self.hides=(self.hides or 0)+1;self.shown=false;self.owner=nil
|
|
-- Stock source-tooltip hide scripts also hide the shared shopping tooltips.
|
|
if self==GameTooltip or self==ItemRefTooltip then ShoppingTooltip1:Hide();ShoppingTooltip2:Hide() end
|
|
if changed and self.scripts.OnHide then self.scripts.OnHide() end
|
|
end
|
|
local compared,builds={},0
|
|
function methods:SetHyperlinkCompareItem(link,index,button,source)
|
|
builds=builds+1
|
|
assert(source.link==link and button==true)
|
|
compared[index]=link
|
|
self.nativeContent=link
|
|
-- Simulate native/third-party callbacks during comparison construction.
|
|
source.scripts.OnTooltipCleared();source.scripts.OnTooltipSetItem()
|
|
return index==1 or source.two
|
|
end
|
|
UIParent=frame('UIParent');UIParent.GetEffectiveScale=function() return 1 end
|
|
local hover=frame('BagshuiItemButton')
|
|
GameTooltip=frame('GameTooltip');ItemRefTooltip=frame('ItemRefTooltip')
|
|
ShoppingTooltip1=frame('ShoppingTooltip1');ShoppingTooltip2=frame('ShoppingTooltip2')
|
|
CreateFrame=function() return frame() end
|
|
GetCursorPosition=function() return 100 end;GetScreenWidth=function() return 1000 end
|
|
ShaguTweaks={T=setmetatable({},{__index=function(t,k) return k end}),GetGlobalEnv=function() return getfenv(0) end,
|
|
API={tooltipsetitem=true,modifierstate=true,timer=true,IsShiftKeyDown=function() return shift end,
|
|
Defer=function(callback) table.insert(pending,callback) end},HookAddonOrVariable=function(_,callback) callback() end}
|
|
function ShaguTweaks:register(m) modules[m.title]=m;return m end
|
|
dofile(root..'mods/equip-compare.lua');local module=modules['Equip Compare'];module:enable()
|
|
local function flush()
|
|
local queue=pending;pending={}
|
|
for _,callback in ipairs(queue) do callback() end
|
|
assert(table.getn(pending)==0,'Comparison construction scheduled a recursive refresh')
|
|
end
|
|
GameTooltip:SetOwner(hover);GameTooltip.link='item:123:enchant:randomsuffix';GameTooltip.two=true;GameTooltip:Show()
|
|
GameTooltip.scripts.OnTooltipSetItem();GameTooltip.scripts.OnTooltipSetItem();assert(table.getn(pending)==1)
|
|
flush();assert(compared[1]==GameTooltip.link and compared[2]==GameTooltip.link)
|
|
assert(ShoppingTooltip1:IsShown() and ShoppingTooltip2:IsShown())
|
|
assert(ShoppingTooltip2.point[2]==ShoppingTooltip1)
|
|
assert(ShoppingTooltip1:GetOwner()==hover and ShoppingTooltip2:GetOwner()==hover)
|
|
local beforeBuild,beforeHide=builds,ShoppingTooltip1.hides
|
|
for i=1,50 do
|
|
GameTooltip.scripts.OnTooltipCleared();GameTooltip.scripts.OnTooltipSetItem()
|
|
assert(ShoppingTooltip1:IsShown())
|
|
flush()
|
|
end
|
|
assert(builds==beforeBuild and ShoppingTooltip1.hides==beforeHide,'Unchanged tooltip blinked/rebuilt')
|
|
-- Bag slots can hide/re-show the source every refresh. The prior regression
|
|
-- tested Clear/Set only and therefore missed this separate lifecycle.
|
|
for i=1,50 do
|
|
GameTooltip:Hide()
|
|
assert(not ShoppingTooltip1:IsShown()) -- native hide side effect
|
|
assert(not ShoppingTooltip1:GetOwner()) -- native Hide clears ownership
|
|
GameTooltip:SetOwner(hover)
|
|
GameTooltip.scripts.OnTooltipCleared()
|
|
GameTooltip.scripts.OnTooltipSetItem()
|
|
GameTooltip:Show()
|
|
assert(ShoppingTooltip1:IsShown() and ShoppingTooltip2:IsShown(),'Cached comparison was not restored synchronously')
|
|
assert(ShoppingTooltip1:GetOwner()==hover and ShoppingTooltip1.nativeContent==GameTooltip.link)
|
|
flush()
|
|
end
|
|
assert(builds==beforeBuild+100,'Lost native ownership must refill each hidden comparison once')
|
|
-- Independently hidden comparisons also recover when the source emits no event.
|
|
beforeBuild=builds;ShoppingTooltip1:Hide();flush()
|
|
assert(ShoppingTooltip1:IsShown() and ShoppingTooltip1:GetOwner()==hover and builds==beforeBuild+1)
|
|
arg1='LSHIFT';shift=false;module.nativeModifier.scripts.OnEvent();assert(not ShoppingTooltip1:IsShown())
|
|
shift=true;module.nativeModifier.scripts.OnEvent();assert(ShoppingTooltip1:IsShown())
|
|
GameTooltip.two=false;event='UNIT_INVENTORY_CHANGED';arg1='player';module.nativeModifier.scripts.OnEvent();flush()
|
|
assert(ShoppingTooltip1:IsShown() and not ShoppingTooltip2:IsShown())
|
|
beforeBuild=builds;GameTooltip.link='item:789:new-enchant';GameTooltip.scripts.OnTooltipSetItem();flush()
|
|
assert(builds==beforeBuild+2 and compared[1]==GameTooltip.link)
|
|
GameTooltip:Hide();flush();assert(not ShoppingTooltip1:IsShown())
|
|
ItemRefTooltip.link='item:456';ItemRefTooltip:Show();ItemRefTooltip.scripts.OnTooltipSetItem();flush()
|
|
assert(ShoppingTooltip1.owner==UIParent and ShoppingTooltip1.point[2]==ItemRefTooltip)
|
|
GameTooltip.scripts.OnTooltipCleared();flush();assert(ShoppingTooltip1:IsShown()) -- another tooltip cannot clear the active owner's comparisons
|
|
ItemRefTooltip.link=nil;ItemRefTooltip.scripts.OnTooltipCleared();flush();assert(not ShoppingTooltip1:IsShown())
|
|
local count=table.getn(frames);module:enable();assert(table.getn(frames)==count)
|
|
ItemRefTooltip.scripts.OnTooltipSetItem();ItemRefTooltip:Hide();flush();assert(not ShoppingTooltip1:IsShown())
|
|
-- Missing newer comparison methods select the existing compatibility path.
|
|
ShoppingTooltip1.SetHyperlinkCompareItem=false;module.installed=nil;module.nativeModifier=nil
|
|
ShaguTweaks.API.iteminventorytype=true;ShaguTweaks.API.iteminventoryslotkey=true
|
|
module:enable();assert(module.installed and not module.nativeModifier)
|
|
print('Equip Compare: links/Shift/invalidation, unchanged refresh reuse, hidden-owner loss/refill, hovered-button ownership, independent comparison-hide recovery, reentrancy and fallback passed')
|