--[[
  @Authors: Ben Dol (BeniS)
  @Details: Auto targeting event logic
]]

TargetsModule.AutoTarget = {}
AutoTarget = TargetsModule.AutoTarget

-- Variables

AutoTarget.creatureData = {}

-- Methods

function AutoTarget.init()
  connect(Creature, { onAppear = AutoTarget.addCreature })
  connect(TargetsModule, { onAddTarget = AutoTarget.scan })
end

function AutoTarget.terminate()
  disconnect(Creature, { onAppear = AutoTarget.addCreature })
  disconnect(TargetsModule, { onAddTarget = AutoTarget.scan })
end

function AutoTarget.hasTargets()
  return AutoTarget.creatureData ~= nil and #AutoTarget.creatureData > 0
end

function AutoTarget.getCreatureData()
  return AutoTarget.creatureData
end

function AutoTarget.scan()
  print("scanning")
  local targetList = {}
  for k,v in pairs(TargetsModule.getTargets()) do
    table.insert(targetList, v:getName())
  end

  local player = g_game.getLocalPlayer()
  local targets = player:getTargetsInArea(targetList, true)

  for k,target in pairs(targets) do
    if not target:isDead() and not target:isRemoved() then
      if not AutoTarget.isAlreadyStored(target) then
        AutoTarget.addCreature(target)
      end
    else
      AutoTarget.removeCreature(target)
    end
  end
end

function AutoTarget.isAlreadyStored(creature)
  return AutoTarget.creatureData[creature:getId()] ~= nil
end

function AutoTarget.addCreature(creature)
  -- Avoid adding new targets when attacking
  if creature and creature:isMonster() then
    --connect(creature, { onHealthPercentChange = AutoTarget.onTargetHealthChange })
    connect(creature, { onDeath = AutoLoot.onTargetDeath })
    connect(creature, { onDisappear = AutoTarget.removeCreature })

    AutoTarget.creatureData[creature:getId()] = creature
  end
end

function AutoTarget.removeCreature(creature)
  if creature then
    --disconnect(creature, { onHealthPercentChange = AutoTarget.onTargetHealthChange })
    disconnect(creature, { onDeath = AutoLoot.onTargetDeath })
    disconnect(creature, { onDisappear = AutoTarget.removeCreature })

    AutoTarget.creatureData[creature:getId()] = nil
  end
end

function AutoTarget.checkChaseMode(target)
  if not target then return end
  local t = TargetsModule.getTarget(target:getName())
  if t then
    local setting = t:getSetting(1)
    if setting:getFollow() then
      g_game.setChaseMode(ChaseOpponent)
    else
      g_game.setChaseMode(DontChase)
    end
  end
end

function AutoTarget.checkStance(target)
  if not target then return end
  local t = TargetsModule.getTarget(target:getName())
  if t then
    local setting = t:getSetting(1)
    if setting then
      g_game.setFightMode(setting:getStance())
    end
  end
end

function AutoTarget.onTargetHealthChange(creature)

end

function AutoTarget.isValidTarget(creature)
  local player = g_game.getLocalPlayer()
  return TargetsModule.hasTarget(creature:getName()) and player:hasSight(creature:getPosition())
end

function AutoTarget.getBestTarget()
  local player = g_game.getLocalPlayer()
  local playerPos = player:getPosition()
  local target, distance = nil, nil

  for id,t in pairs(AutoTarget.creatureData) do
    if t and AutoTarget.isValidTarget(t) then
	  local toPos = t:getPosition()
	  if math.abs(playerPos.x - toPos.x) < 13 and math.abs(playerPos.y - toPos.y) < 8 then
		local d = Position.distance(playerPos, toPos)
		if not target or d < distance then
          -- print("Found closest target")
          target = t
          distance = d
		end
	  end
    end
  end
  return target
end

function AutoTarget.onStopped()
  --
end

function AutoTarget.Event(event)
  -- TODO: There seems to be a rare bug when changing
  -- attacker too fast the client gets confused thinking
  -- its attacking when on the server its not. To resolve
  -- this we will need to find out what is causing it and
  -- also add a fail safe timeout mechanism.
  -- See: https://github.com/BenDol/otclient-candybot/issues/20

  -- Cannot continue if still attacking or is in pz
  local player = g_game.getLocalPlayer()
  if player:hasState(PlayerStates.Pz) then
    return Helper.safeDelay(600, 2000)
  elseif g_game.isAttacking() then
    local target = g_game.getAttackingCreature()
    if not target or not AutoTarget.isValidTarget(target) then
      g_game.cancelAttackAndFollow()
    else
      return Helper.safeDelay(600, 2000)
    end
  end

  -- Find a valid target to attack
  local target = AutoTarget.getBestTarget()
  if target then
    -- If looting pause to prioritize targeting
    if AutoLoot.isLooting() then
      AutoLoot.pauseLooting()
    end

    AutoTarget.checkChaseMode(target)
    AutoTarget.checkStance(target)

    g_game.attack(target)
  end

  -- Keep the event live
  return Helper.safeDelay(600, 1400)
end