local AS, L, S, R = unpack(AddOnSkins)

if not AS:CheckAddOn('ArkInventory') then return end

function R:ArkInventory()
	hooksecurefunc(ArkInventory, 'Frame_Main_Paint', function(frame)
		if not ArkInventory.ValidFrame(frame, true) then return end
		for i = 1, select('#', frame:GetChildren()) do
			local subframe = select(i, frame:GetChildren())
			if subframe.IsSkinned then return end
			local name = subframe:GetName()
			if name then
				if _G[name..'ArkBorder'] then S:Kill(_G[name..'ArkBorder']) end
				if subframe.ArkBorder then S:Kill(subframe.ArkBorder) end
				if _G[name..'Background'] then S:Kill(_G[name..'Background']) end
			end
			S:HandleFrame(subframe)
			subframe.IsSkinned = true
		end
	end)

	hooksecurefunc(ArkInventory, 'Frame_Main_Anchor_Set', function(loc_id)
		local mainframe = ArkInventory.Frame_Main_Get(loc_id):GetName()
		local f = _G[mainframe..ArkInventory.Const.Frame.Search.Name..'Filter']
		local b = _G[mainframe..ArkInventory.Const.Frame.Search.Name..'Clear']

		if f then
			S:HandleEditBox(f)
			local bd = f.backdrop or f.Backdrop or nil
			if bd then
				local bbc = ArkInventory.GetLocationCodex(loc_id).style.bar.border.colour
				bd:SetFrameLevel(f:GetFrameLevel())
				S:SetOutside(bd, nil, 1, -5)
				bd:SetBackdropBorderColor(bbc.r, bbc.g, bbc.b, bbc.a or 1)
			end
		end

		if b then
			S:HandleButton(b)
			b:SetNormalTexture([[Interface\Buttons\UI-GroupLoot-Pass-Up]])
			b:SetHighlightTexture([[Interface\Buttons\UI-GroupLoot-Pass-Highlight]])
			b:SetPushedTexture([[Interface\Buttons\UI-GroupLoot-Pass-Down]])
		end
	end)

	hooksecurefunc(ArkInventory, 'Frame_Bar_Paint', function(bar)
		local loc_id = bar.ARK_Data.loc_id
		if not bar.IsSkinned then
			local name = bar:GetName()
			if _G[name..'ArkBorder'] then S:Kill(_G[name..'ArkBorder']) end
			if _G[name..'Background'] then S:Kill(_G[name..'Background']) end
			if bar.ArkBorder then S:Kill(bar.ArkBorder) end
			bar.IsSkinned = true
		end

		S:SetTemplate(bar)

		if ArkInventory.Global.Mode.Edit then
			bar:SetBackdropBorderColor(1, 0, 0, 1)
			bar:SetBackdropColor(1, 0, 0, .1)
		end
	end)

	hooksecurefunc(ArkInventory, 'SetItemButtonTexture', function(frame, texture, r, g, b)
		if not (frame and frame.icon) then return end

		S:HandleIcon(frame.icon)
		S:SetInside(frame.icon)
	end)

	hooksecurefunc(ArkInventory, 'Frame_Item_Update_Border', function(frame)
		if not ArkInventory.ValidFrame(frame, true) then return end
		local obj = frame.ArkBorder or _G[frame:GetName()..'ArkBorder']
		if not obj then return end
		S:Kill(obj)

		S:SetTemplate(frame)
		frame:SetBackdropBorderColor(obj:GetBackdropBorderColor())
		S:HandleIcon(frame.icon)
		frame:SetNormalTexture('')

		if _G[frame:GetName()] == ARKINV_Frame1ChangerWindowBag1 then
			ARKINV_Frame1ChangerWindowBag1IconTexture:SetTexture('interface\\icons\\inv_misc_bag_07_green')
			S:HandleIcon(ARKINV_Frame1ChangerWindowBag1IconTexture)
			S:SetInside(ARKINV_Frame1ChangerWindowBag1IconTexture)
		end
	end)

	hooksecurefunc(ArkInventory, 'Frame_Border_Paint', function(border, slot, file, size, offset, scale, r, g, b, a)
		local parent = border:GetParent()
		S:SetTemplate(parent)
		parent:SetBackdropBorderColor(r, g, b, a)
	end)

	if AS:CheckAddOn('ElvUI') then
		hooksecurefunc(ArkInventory, 'Frame_Item_Update_Clickable', function(frame)
			local obj = _G[frame:GetName()..ArkInventory.Const.Frame.Cooldown.Name]
			if obj then
				ElvUI[1]:RegisterCooldown(obj)
			end
		end)
	end
end

AS:RegisterSkin('ArkInventory', R.ArkInventory)
