-----------------------------------------------------------------------
-- AddOn namespace.
-----------------------------------------------------------------------
local LibStub = _G.LibStub
local ADDON_NAME, private = ...

-- Locales
local AL = LibStub("AceLocale-3.0"):GetLocale("RareScanner");

-- RareScanner database libraries
local RSGeneralDB = private.ImportLib("RareScannerGeneralDB")
local RSGuideDB = private.ImportLib("RareScannerGuideDB")
local RSContainerDB = private.ImportLib("RareScannerContainerDB")
local RSConfigDB = private.ImportLib("RareScannerConfigDB")
local RSNpcDB = private.ImportLib("RareScannerNpcDB")
local RSEventDB = private.ImportLib("RareScannerEventDB")

-- RareScanner general libraries
local RSLogger = private.ImportLib("RareScannerLogger")
local RSUtils = private.ImportLib("RareScannerUtils")
local RSConstants = private.ImportLib("RareScannerConstants")

-- RareScanner services libraries
local RSMinimap = private.ImportLib("RareScannerMinimap")
local RSMap = private.ImportLib("RareScannerMap")
local RSTooltip = private.ImportLib("RareScannerTooltip")
local RSGuidePOI = private.ImportLib("RareScannerGuidePOI")
local RSTomtom = private.ImportLib("RareScannerTomtom")
local RSRecentlySeenTracker = private.ImportLib("RareScannerRecentlySeenTracker")

RareScannerDataProviderMixin = CreateFromMixins(MapCanvasDataProviderMixin);

function RareScannerDataProviderMixin:OnAdded(mapCanvas)
	MapCanvasDataProviderMixin.OnAdded(self, mapCanvas);
	self:GetMap():RegisterCallback("SetBounty", self.SetBounty, self);
end

function RareScannerDataProviderMixin:OnRemoved(mapCanvas)
	self:GetMap():UnregisterCallback("SetBounty", self.SetBounty, self);
	MapCanvasDataProviderMixin.OnRemoved(self, mapCanvas);
end

local function pingAnimation(pin, animation, entityID, mapID, x, y)
	if (not animation or not entityID) then
		return
	end
	
	animation:Stop()
	animation:SetScript("OnLoop", function(self, loopState)
		if (self.loops) then
			self.loops = self.loops + 1
			
			if (self.loops == 3) then
				RSRecentlySeenTracker.DeletePendingAnimation(entityID, mapID, x, y)
				self:Stop()
				self:SetLooping("NONE")
			end
		end
	end)
		
	if (RSRecentlySeenTracker.ShouldPlayAnimation(entityID, mapID, x, y)) then
		animation.loops = 0
		animation:SetLooping("BOUNCE")
		animation:Play()
	end
end

function RareScannerDataProviderMixin:ShowAnimations()
	-- Show recently seen animations in world map vignettes
	if (RSConfigDB.IsShowingAnimationForVignettes()) then
		for pin in self:GetMap():EnumeratePinsByTemplate("VignettePinTemplate") do
			if (pin:GetObjectGUID()) then
				local _, _, _, _, _, vignetteObjectID = strsplit("-", pin:GetObjectGUID())
				
				local entityID = tonumber(vignetteObjectID)
				if (RSConfigDB.IsShowingAnimationForNpcs()) then
					-- If it's a pre-event
					if (RSConstants.NPCS_WITH_PRE_EVENT[entityID]) then
						entityID = RSConstants.NPCS_WITH_PRE_EVENT[entityID]
						vignetteObjectID = tostring(entityID)
					end
				
					-- If it's a pre-spawn event
					if (RSNpcDB.GetInternalNpcInfo(entityID)) then
						pingAnimation(pin, pin.ShowPingAnim, vignetteObjectID)
					end
				end	
				if ((RSConfigDB.IsShowingAnimationForContainers() and RSContainerDB.GetInternalContainerInfo(entityID)) or (RSConfigDB.IsShowingAnimationForEvents() and RSEventDB.GetInternalEventInfo(entityID))) then
					pingAnimation(pin, pin.ShowPingAnim, vignetteObjectID)
				end	
			end
		end
	end
	
	-- Show recently seen animations
	if (RSConfigDB.IsShowingAnimationForNpcs() or RSConfigDB.IsShowingAnimationForContainers() or RSConfigDB.IsShowingAnimationForEvents()) then
		for pin in self:GetMap():EnumeratePinsByTemplate("RSEntityPinTemplate") do
			if ((RSConfigDB.IsShowingAnimationForNpcs() and pin.POI.isNpc) or (RSConfigDB.IsShowingAnimationForContainers() and pin.POI.isContainer) or (RSConfigDB.IsShowingAnimationForEvents() and pin.POI.isEvent)) then
				pingAnimation(pin, pin.ShowPingAnim, pin.POI.entityID, pin.POI.mapID, pin.POI.x, pin.POI.y)
			end
		end
		for pin in self:GetMap():EnumeratePinsByTemplate("RSGroupPinTemplate") do
			for _, childPOI in ipairs (pin.POI.POIs) do
				if ((RSConfigDB.IsShowingAnimationForNpcs() and childPOI.isNpc) or (RSConfigDB.IsShowingAnimationForContainers() and childPOI.isContainer) or (RSConfigDB.IsShowingAnimationForEvents() and childPOI.isEvent)) then
					pingAnimation(pin, pin.ShowPingAnim, childPOI.entityID, childPOI.mapID, childPOI.x, childPOI.y)
				end
			end
		end
	end
end

function RareScannerDataProviderMixin:SetBounty(bountyQuestID, bountyFactionID, bountyFrameType)
	local changed = self.bountyQuestID ~= bountyQuestID;
	if (changed) then
		self.bountyQuestID = bountyQuestID;
		self.bountyFactionID = bountyFactionID;
		self.bountyFrameType = bountyFrameType;
		if (self:GetMap()) then
			self:RefreshAllData();
		end
	end
end

function RareScannerDataProviderMixin:GetBountyInfo()
	return self.bountyQuestID, self.bountyFactionID, self.bountyFrameType;
end

function RareScannerDataProviderMixin:OnMapChanged()
	self:RefreshAllData();
end

function RareScannerDataProviderMixin:OnHide()
	self:RemoveAllData()
end

function RareScannerDataProviderMixin:OnShow()
	self:ShowAnimations()
end

function RareScannerDataProviderMixin:RemoveAllData()
	self:GetMap():RemoveAllPinsByTemplate("RSEntityPinTemplate");
	self:GetMap():RemoveAllPinsByTemplate("RSOverlayTemplate");
	self:GetMap():RemoveAllPinsByTemplate("RSGuideTemplate");
	self:GetMap():RemoveAllPinsByTemplate("RSGroupPinTemplate");
end

function RareScannerDataProviderMixin:ShowGuideLayer(entityID, mapID)
	-- Gets the information of the entity
	local guide = nil
	local isNpc = false
	local isContainer = false
	local isEvent = false
	if (RSNpcDB.GetInternalNpcInfo(entityID)) then
		guide = RSGuideDB.GetNpcGuide(entityID, mapID)
		isNpc = true
	elseif (RSContainerDB.GetInternalContainerInfo(entityID)) then
		guide = RSGuideDB.GetContainerGuide(entityID, mapID)
		isContainer = true
	else 
		guide = RSGuideDB.GetEventGuide(entityID, mapID)
		isEvent = true
	end

	if (guide) then
		for pinType, info in pairs (guide) do
			local POI = RSGuidePOI.GetGuidePOI(entityID, pinType, info)
			if (not info.questID or not C_QuestLog.IsQuestFlaggedCompleted(info.questID)) then
				local guidePin = self:GetMap():AcquirePin("RSGuideTemplate", POI);
				if ((isNpc and not RSNpcDB.IsInternalNpcInMap(entityID, mapID)) or (isContainer and not RSContainerDB.IsInternalContainerInMap(entityID, mapID)) or (isEvent and not RSEventDB.IsInternalEventInMap(entityID, mapID))) then
					guidePin.ShowPingAnim:SetLooping("REPEAT")
					guidePin.ShowPingAnim:Play()
				else
					guidePin.ShowPingAnim:SetLooping("NONE")
					guidePin.ShowPingAnim:Play()
				end
			end
		end
	end
end

local function initWorldMapVignette(parentFrame, pin, vignetteObjectID)
	if (not pin or not vignetteObjectID) then
		return
	end
	
	if (not pin.SetPassThroughButtonsLoaded and not InCombatLockdown()) then
		pin:SetPassThroughButtons("MiddleButton");
		pin.SetPassThroughButtonsLoaded = true
	end
	
	-- This hook will be removed for entities not managed by this addon, so that's why it might be gone and it needs to rehook it
	if (pin:GetScript("OnMouseDown") == nil) then
		pin:SetScript("OnMouseDown", function(self, button)
			local POI = RSMap.GetWorldMapPOI(self:GetObjectGUID(), pin.vignetteInfo, self:GetMap():GetMapID())
			if (not POI) then	
				return
			end
					
			if (button == "LeftButton") then				
				--Toggle state (if showing tooltips)
				if (RSConfigDB.IsShowingTooltipsOnIngameIcons() and IsShiftKeyDown() and IsAltKeyDown()) then
					if (POI.isNpc) then
						if (RSConfigDB.GetDefaultNpcFilter() == RSConstants.ENTITY_FILTER_ALERTS) then
							RSConfigDB.SetNpcFiltered(POI.entityID, RSConstants.ENTITY_FILTER_ALL)
						else
							RSConfigDB.SetNpcFiltered(POI.entityID)
						end
						self:Hide();
					elseif (POI.isContainer) then
						if (RSConfigDB.GetDefaultContainerFilter() == RSConstants.ENTITY_FILTER_ALERTS) then
							RSConfigDB.SetContainerFiltered(POI.entityID, RSConstants.ENTITY_FILTER_ALL)
						else
							RSConfigDB.SetContainerFiltered(POI.entityID)
						end
						self:Hide();
					elseif (POI.isEvent) then
						if (RSConfigDB.GetDefaultEventFilter() == RSConstants.ENTITY_FILTER_ALERTS) then
							RSConfigDB.SetEventFiltered(POI.entityID, RSConstants.ENTITY_FILTER_ALL)
						else
							RSConfigDB.SetEventFiltered(POI.entityID)
						end
						self:Hide();
					end
					RSMinimap.RefreshEntityState(POI.entityID)
				end
			elseif (button == "RightButton") then
				-- Ignore all these events if not showing tooltips
				if (not RSConfigDB.IsShowingTooltipsOnIngameIcons()) then
					return
				end
							
				-- Add waypoint
				if (IsShiftKeyDown()) then
					if (RSConfigDB.IsAddingWorldMapTomtomWaypoints()) then
						RSTomtom.AddWorldMapTomtomWaypoint(POI.mapID, POI.x, POI.y, POI.name)
					end
				elseif (not IsShiftKeyDown() and not IsAltKeyDown() and not IsControlKeyDown()) then
					-- If already showing a guide toggle it first
					if (self:GetMap():GetNumActivePinsByTemplate("RSGuideTemplate") > 0) then	
						self:GetMap():RemoveAllPinsByTemplate("RSGuideTemplate");
											
						local guideEntityID = RSGeneralDB.GetGuideActive()
						if (guideEntityID) then
							-- If same guide showing then disable it
							if (guideEntityID ~= POI.entityID) then
								RSGeneralDB.SetGuideActive(POI.entityID)
								parentFrame:ShowGuideLayer(POI.entityID, self:GetMap():GetMapID())
							else
								RSGeneralDB.RemoveGuideActive()
							end
						end
					-- Otherwise show it
					else
						RSGeneralDB.SetGuideActive(POI.entityID)
						parentFrame:ShowGuideLayer(POI.entityID, self:GetMap():GetMapID())
					end
				end
	
				-- Refresh minimap
				RSMinimap.RefreshAllData(true)
			end
		end)
	end
	
	if (pin.initialized) then
		return
	end
	
	-- Saves name if we dont have it
	if (pin:GetVignetteType() == Enum.VignetteType.Treasure) then
		local containerID = tonumber(vignetteObjectID)
		if (not RSContainerDB.GetContainerName(containerID) and pin:GetVignetteName()) then
			RSContainerDB.SetContainerName(containerID, pin:GetVignetteName())
		end
	elseif (pin:GetVignetteType() == Enum.VignetteType.Normal) then
		-- If container
		if (RSConstants.IsContainerAtlas(pin.vignetteInfo.atlasName)) then
			local containerID = tonumber(vignetteObjectID)
			if (not RSContainerDB.GetContainerName(containerID) and pin:GetVignetteName()) then
				RSContainerDB.SetContainerName(containerID, pin:GetVignetteName())
			end
		end
	end
	
	-- Ping animation
	if (not pin.ShowPingAnim) then
		pin.ShowPingAnim = pin:CreateAnimationGroup() 
		pin.ShowPingAnim:SetLooping("BOUNCE")
		
		local a1 = pin.ShowPingAnim:CreateAnimation("Alpha")
		a1:SetDuration(0.1)
		a1:SetOrder(1)
		a1:SetFromAlpha(0)
		a1:SetToAlpha(1)
		
		local a2 = pin.ShowPingAnim:CreateAnimation("Alpha")
		a2:SetStartDelay(0.1)
		a2:SetDuration(0.5)
		a2:SetOrder(1)
		a2:SetFromAlpha(1)
		a2:SetToAlpha(0)
		
		local s1 = pin.ShowPingAnim:CreateAnimation("Scale")
		s1:SetDuration(0.25)
		s1:SetOrder(1)
		s1:SetScaleFrom(0.75, 0.75)
		s1:SetScaleTo(1.75, 1.75)
		
		local a3 = pin.ShowPingAnim:CreateAnimation("Alpha")
		a3:SetDuration(0.5)
		a3:SetOrder(1)
		a3:SetFromAlpha(0)
		a3:SetToAlpha(1)
		
		local a4 = pin.ShowPingAnim:CreateAnimation("Alpha")
		a4:SetStartDelay(0.5)
		a4:SetDuration(0.5)
		a4:SetOrder(1)
		a4:SetFromAlpha(1)
		a4:SetToAlpha(0)
		
		local s2 = pin.ShowPingAnim:CreateAnimation("Scale")
		s2:SetDuration(0.75)
		s2:SetOrder(1)
		s2:SetScaleFrom(1, 1)
		s2:SetScaleTo(1.5, 1.5)
	end
	if (not pin.ShowSearchAnim) then
		pin.ShowSearchAnim = pin.ShowPingAnim
		pin.ShowSearchAnim:SetLooping("NONE")
	end
	
	pin:HookScript("OnEnter", function(self)
		if (not RSConfigDB.IsShowingTooltipsOnIngameIcons()) then
			self.hasTooltip = true
			return
		end
		
		local POI = RSMap.GetWorldMapPOI(self:GetObjectGUID(), pin.vignetteInfo, self:GetMap():GetMapID())
		if (POI) then
			self.POI = POI
			
			-- With events ignore
			if (self.POI.isEvent) then
				return
			end
			
			-- Just in case the user didnt have the questID when he found it
			if (POI.isOpened) then
				RSContainerDB.DeleteContainerOpened(POI.entityID)
			elseif (POI.isDead) then
				RSNpcDB.DeleteNpcKilled(POI.entityID)
			end
			self.hasTooltip = false
			RSTooltip.ShowSimpleTooltip(self)
		else
			self.tooltip = nil
			self.POI = nil
		end
	end)
	pin:HookScript("OnLeave", function(self)
		if (not RSConfigDB.IsShowingTooltipsOnIngameIcons()) then
			return
		end
		
		pin.POI = nil
			
		if (RSTooltip.HideTooltip(self.tooltip)) then
			pin.tooltip = nil
		end
	end)

	RSLogger:PrintDebugMessage(string.format("Sobreescrito contenedor del mapa del mundo: %s, [%s]", pin:GetObjectGUID(), pin:GetVignetteType()))
	pin.initialized = true
end

function RareScannerDataProviderMixin:RefreshAllData(fromOnShow)
	self:RemoveAllData()

	local mapID = self:GetMap():GetMapID();
	RSLogger:PrintDebugMessage(string.format("MAPID [%s], ARTID [%s]", mapID, C_Map.GetMapArtID(mapID)))

	-- Loads new pins
	local POIs = RSMap.GetMapPOIs(mapID, true, false)
	if (not POIs) then
		return
	end

	-- Add support to ingame worldmap vignettes
	for pin in self:GetMap():EnumeratePinsByTemplate("VignettePinTemplate") do
		if (pin:GetObjectGUID()) then
			local _, _, _, _, _, vignetteObjectID = strsplit("-", pin:GetObjectGUID())
			
			local POI = RSMap.GetWorldMapPOI(pin:GetObjectGUID(), pin.vignetteInfo, mapID)
			if (POI) then
				initWorldMapVignette(self, pin, vignetteObjectID)
			else
				-- Avoids blocking mouse clicks on vignettes not managed by this addon
				pin:SetScript("OnMouseDown", nil)
			end
			
			-- Animate if matches with text filter
			if (RSGeneralDB.GetWorldMapTextFilter()) then
				if (POI and RSUtils.Contains(POI.name, RSGeneralDB.GetWorldMapTextFilter())) then
					if (not pin.ShowPingAnim:IsPlaying()) then
						pin.ShowSearchAnim:Play()
					end
				else
					pin.ShowSearchAnim:Stop()
				end
			end
		end
	end

	-- Adds all the POIs to the WorldMap
	local currentGuideActive = nil
	for _, POI in ipairs (POIs) do
		-- Skip if an ingame vignette is already showing this entity (on AreaPOIPinTemplate)
		-- Only vignettes on WorldMap are actually shown in this layer
		-- If its a group it doesn't matter, because there are several entities inside
		local filtered = false
		if (POI.isNpc) then
			for pin in self:GetMap():EnumeratePinsByTemplate("AreaPOIPinTemplate") do
				if (pin.name == POI.name) then
					RSLogger:PrintDebugMessageEntityID(POI.entityID, string.format("Saltado NPC [%s]: Hay un vignette del juego mostrándolo (AreaPOI).", POI.entityID))
					filtered = true
				end
			end
		end

		-- If the entity is only available when shown in the world map, there is no need to fill the map with useless icons
		if (POI.worldmap) then
			filtered = true
		elseif (POI.isGroup) then
			for _, subPOI in ipairs(POI.POIs) do
				if (subPOI.isContainer and subPOI.worldmap) then
					filtered = true
					break
				end
			end
		end

		if (not filtered) then
			local pin
			if (POI.isGroup) then
				pin = self:GetMap():AcquirePin("RSGroupPinTemplate", POI, self);

				-- Animates the ping in case the filter is on
				if (RSGeneralDB.GetWorldMapTextFilter()) then
					pin.ShowSearchAnim:Play();
				end

				-- Adds children overlay/guide
				for _, childPOI in ipairs (POI.POIs) do
					-- Adds overlay if active
					-- Avoids adding multiple spots if the entity spawns in multiple places at the same time
					if (RSGeneralDB.HasOverlayActive(childPOI.entityID) and (not currentGuideActive or currentGuideActive ~= childPOI.entityID)) then
						pin:ShowOverlay(childPOI)
						currentGuideActive = childPOI.entityID
					end
				end
			else
				RSLogger:PrintDebugMessageEntityID(POI.entityID, string.format("Mostrando Entidad [%s].", POI.entityID))
				pin = self:GetMap():AcquirePin("RSEntityPinTemplate", POI, self);

				-- Animates the ping in case the filter is on
				if (RSGeneralDB.GetWorldMapTextFilter()) then
					pin.ShowSearchAnim:Play();
				end

				-- Adds overlay if active
				-- Avoids adding multiple spots if the entity spawns in multiple places at the same time
				if (RSGeneralDB.HasOverlayActive(POI.entityID) and (not currentGuideActive or currentGuideActive ~= POI.entityID)) then
					RSLogger:PrintDebugMessageEntityID(POI.entityID, string.format("Mostrando Overlay [%s].", POI.entityID))
					pin:ShowOverlay()
					currentGuideActive = POI.entityID
				end
			end
		end
	end
	
	-- Adds guidance icons to the WorldMap
	if (RSGeneralDB.GetGuideActive()) then
		self:ShowGuideLayer(RSGeneralDB.GetGuideActive(), mapID)
	end
	
	-- Show animations
	if (self:GetMap():IsShown()) then
		self:ShowAnimations()
	end
end
