// Copyright (c) 2017 PSForever
package objects

import net.psforever.objects.GlobalDefinitions._
import net.psforever.objects._
import net.psforever.objects.definition.{ImplantDefinition, SimpleItemDefinition}
import net.psforever.objects.equipment.EquipmentSize
import net.psforever.packet.game.PlanetSideGUID
import net.psforever.types.{CharacterGender, ExoSuitType, ImplantType, PlanetSideEmpire}
import org.specs2.mutable._

import scala.util.Success

class PlayerTest extends Specification {
  def TestPlayer(name : String, faction : PlanetSideEmpire.Value, sex : CharacterGender.Value, head : Int, voice : Int) : Player = {
    new Player(Avatar(name, faction, sex, head, voice))
  }

  "Player" should {
    "construct" in {
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      obj.isAlive mustEqual false
      obj.FacingYawUpper mustEqual 0
      obj.Jumping mustEqual false
      obj.Crouching mustEqual false
      obj.Cloaked mustEqual false

      obj.FacingYawUpper = 1.3f
      obj.Jumping = true
      obj.Crouching = true
      obj.Cloaked = true
      obj.FacingYawUpper mustEqual 1.3f
      obj.Jumping mustEqual true
      obj.Crouching mustEqual true
      obj.Cloaked mustEqual true
    }

    "different players" in {
      (TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5) ==
        TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)) mustEqual true

      (TestPlayer("Chord1", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5) ==
        TestPlayer("Chord2", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)) mustEqual false

      (TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5) ==
        TestPlayer("Chord", PlanetSideEmpire.NC, CharacterGender.Male, 0, 5)) mustEqual false

      (TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5) ==
        TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Female, 0, 5)) mustEqual false

      (TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5) ==
        TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 1, 5)) mustEqual false

      (TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5) ==
        TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 6)) mustEqual false
    }

    "(re)spawn" in {
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      obj.isAlive mustEqual false
      obj.Health mustEqual 0
      obj.Stamina mustEqual 0
      obj.Armor mustEqual 0
      obj.MaxHealth mustEqual 100
      obj.MaxStamina mustEqual 100
      obj.MaxArmor mustEqual 50
      obj.Spawn
      obj.isAlive mustEqual true
      obj.Health mustEqual 100
      obj.Stamina mustEqual 100
      obj.Armor mustEqual 50
    }

    "will not (re)spawn if not dead" in {
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      obj.Spawn
      obj.Health mustEqual 100
      obj.Armor mustEqual 50
      obj.isAlive mustEqual true

      obj.Health = 10
      obj.Armor = 10
      obj.Health mustEqual 10
      obj.Armor mustEqual 10
      obj.Spawn
      obj.Health mustEqual 10
      obj.Armor mustEqual 10
    }

    "can die" in {
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      obj.Spawn
      obj.Armor = 35 //50 -> 35
      obj.isAlive mustEqual true
      obj.Health mustEqual obj.MaxHealth
      obj.Stamina mustEqual obj.MaxStamina
      obj.Armor mustEqual 35
      obj.Die
      obj.isAlive mustEqual false
      obj.Health mustEqual 0
      obj.Stamina mustEqual 0
      obj.Armor mustEqual 35
    }

    "can not become a backpack if alive" in {
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      obj.Spawn
      obj.isAlive mustEqual true
      obj.isBackpack mustEqual false
      obj.Release
      obj.isAlive mustEqual true
      obj.isBackpack mustEqual false
    }

    "can become a backpack" in {
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      obj.isAlive mustEqual false
      obj.isBackpack mustEqual false
      obj.Release
      obj.isAlive mustEqual false
      obj.isBackpack mustEqual true
    }

    "set new maximum values (health, stamina)" in {
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      obj.MaxHealth mustEqual 100
      obj.MaxStamina mustEqual 100
      obj.MaxHealth = 123
      obj.MaxStamina = 456
      obj.Spawn
      obj.Health mustEqual 123
      obj.Stamina mustEqual 456
    }

    "set new values (health, armor, stamina) but only when alive" in {
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      obj.Health = 23
      obj.Armor = 34
      obj.Stamina = 45
      obj.Health mustEqual 0
      obj.Armor mustEqual 0
      obj.Stamina mustEqual 0

      obj.Spawn
      obj.Health mustEqual obj.MaxHealth
      obj.Armor mustEqual obj.MaxArmor
      obj.Stamina mustEqual obj.MaxStamina
      obj.Health = 23
      obj.Armor = 34
      obj.Stamina = 45
      obj.Health mustEqual 23
      obj.Armor mustEqual 34
      obj.Stamina mustEqual 45
    }

    "has visible slots" in {
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      obj.VisibleSlots mustEqual Set(0,1,2,3,4)
      obj.ExoSuit = ExoSuitType.MAX
      obj.VisibleSlots mustEqual Set(0)
    }

    "init (Standard Exo-Suit)" in {
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      obj.ExoSuit mustEqual ExoSuitType.Standard
      obj.Slot(0).Size mustEqual EquipmentSize.Pistol
      obj.Slot(1).Size mustEqual EquipmentSize.Blocked
      obj.Slot(2).Size mustEqual EquipmentSize.Rifle
      obj.Slot(3).Size mustEqual EquipmentSize.Blocked
      obj.Slot(4).Size mustEqual EquipmentSize.Melee
      obj.Inventory.Width mustEqual 9
      obj.Inventory.Height mustEqual 6
      obj.Inventory.Offset mustEqual 6
    }

    "draw equipped holsters only" in {
      val wep = SimpleItem(SimpleItemDefinition(149))
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      obj.Slot(1).Size = EquipmentSize.Pistol
      obj.Slot(1).Equipment = wep
      obj.DrawnSlot mustEqual Player.HandsDownSlot
      obj.DrawnSlot = 0
      obj.DrawnSlot mustEqual Player.HandsDownSlot
      obj.DrawnSlot = 1
      obj.DrawnSlot mustEqual 1
    }

    "remember the last drawn holster" in {
      val wep1 = SimpleItem(SimpleItemDefinition(149))
      val wep2 = SimpleItem(SimpleItemDefinition(149))
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      obj.Slot(0).Size = EquipmentSize.Pistol
      obj.Slot(0).Equipment = wep1
      obj.Slot(1).Size = EquipmentSize.Pistol
      obj.Slot(1).Equipment = wep2
      obj.DrawnSlot mustEqual Player.HandsDownSlot //default value
      obj.LastDrawnSlot mustEqual Player.HandsDownSlot //default value

      obj.DrawnSlot = 1
      obj.DrawnSlot mustEqual 1
      obj.LastDrawnSlot mustEqual 1

      obj.DrawnSlot = 0
      obj.DrawnSlot mustEqual 0
      obj.LastDrawnSlot mustEqual 0

      obj.DrawnSlot = Player.HandsDownSlot
      obj.DrawnSlot mustEqual Player.HandsDownSlot
      obj.LastDrawnSlot mustEqual 0

      obj.DrawnSlot = 1
      obj.DrawnSlot mustEqual 1
      obj.LastDrawnSlot mustEqual 1

      obj.DrawnSlot = 0
      obj.DrawnSlot mustEqual 0
      obj.LastDrawnSlot mustEqual 0

      obj.DrawnSlot = 1
      obj.DrawnSlot mustEqual 1
      obj.LastDrawnSlot mustEqual 1

      obj.DrawnSlot = Player.HandsDownSlot
      obj.DrawnSlot mustEqual Player.HandsDownSlot
      obj.LastDrawnSlot mustEqual 1
    }

    "hold something in their free hand" in {
      val wep = SimpleItem(SimpleItemDefinition(149))
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      obj.Slot(Player.FreeHandSlot).Equipment = wep

      obj.Slot(Player.FreeHandSlot).Equipment.get.Definition.ObjectId mustEqual 149
    }

    "provide an invalid hand that can not hold anything" in {
      val wep = SimpleItem(SimpleItemDefinition(149))
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      obj.Slot(-1).Equipment = wep

      obj.Slot(-1).Equipment mustEqual None
    }

    "search for the smallest available slot in which to store equipment" in {
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      obj.Inventory.Resize(3,3) //fits one item

      obj.Fit(Tool(GlobalDefinitions.beamer)) mustEqual Some(0)

      obj.Fit(Tool(GlobalDefinitions.suppressor)) mustEqual Some(2)

      val ammo = AmmoBox(GlobalDefinitions.bullet_9mm)
      val ammo2 = AmmoBox(GlobalDefinitions.bullet_9mm)
      val ammo3 = AmmoBox(GlobalDefinitions.bullet_9mm)
      obj.Fit(ammo) mustEqual Some(6)
      obj.Slot(6).Equipment = ammo
      obj.Fit(ammo2) mustEqual Some(Player.FreeHandSlot)
      obj.Slot(Player.FreeHandSlot).Equipment = ammo2
      obj.Fit(ammo3) mustEqual None
    }

    "can use their free hand to hold things" in {
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      val ammo = AmmoBox(GlobalDefinitions.bullet_9mm)
      obj.FreeHand.Equipment mustEqual None

      obj.FreeHand.Equipment = ammo
      obj.FreeHand.Equipment mustEqual Some(ammo)
    }

    "can access the player's locker-space" in {
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      obj.Slot(5).Equipment.get.isInstanceOf[LockerContainer] mustEqual true
    }

    "can find equipment" in {
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      obj.Slot(0).Equipment = {
        val item = Tool(beamer)
        item.GUID = PlanetSideGUID(1)
        item
      }
      obj.Slot(4).Equipment = {
        val item = Tool(forceblade)
        item.GUID = PlanetSideGUID(2)
        item
      }
      obj.Slot(6).Equipment = {
        val item = ConstructionItem(ace)
        item.GUID = PlanetSideGUID(3)
        item
      }
      obj.Locker.Slot(6).Equipment = {
        val item = Kit(medkit)
        item.GUID = PlanetSideGUID(4)
        item
      }
      obj.FreeHand.Equipment = {
        val item = SimpleItem(remote_electronics_kit)
        item.GUID = PlanetSideGUID(5)
        item
      }

      obj.Find(PlanetSideGUID(1)) mustEqual Some(0) //holsters
      obj.Find(PlanetSideGUID(2)) mustEqual Some(4) //holsters, melee
      obj.Find(PlanetSideGUID(3)) mustEqual Some(6) //inventory
      obj.Find(PlanetSideGUID(4)) mustEqual None //can not find in locker-space
      obj.Find(PlanetSideGUID(5)) mustEqual Some(Player.FreeHandSlot) //free hand
      obj.Find(PlanetSideGUID(6)) mustEqual None //not here
    }

    "does equipment collision checking (are we already holding something there?)" in {
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      val item1 = Tool(beamer)
      val item2 = Kit(medkit)
      val item3 = AmmoBox(GlobalDefinitions.bullet_9mm)
      obj.Slot(0).Equipment = item1
      obj.Slot(6).Equipment = item2
      obj.FreeHand.Equipment = item3

      obj.Collisions(0, 1, 1) match {
        case Success(List(item)) =>
          item.obj mustEqual item1
          item.start mustEqual 0
        case _ =>
          ko
      } //holsters

      obj.Collisions(1, 1, 1) match {
        case Success(List()) => ;
        case _ =>
          ko
      } //holsters, nothing

      obj.Collisions(6, 1, 1)match {
        case Success(List(item)) =>
          item.obj mustEqual item2
          item.start mustEqual 6
        case _ =>
          ko
      } //inventory

      obj.Collisions(Player.FreeHandSlot, 1, 1)match {
        case Success(List(item)) =>
          item.obj mustEqual item3
          item.start mustEqual Player.FreeHandSlot
        case _ =>
          ko
      } //free hand
    }

    "battle experience point values of the avatar" in {
      val avatar = Avatar("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      val player = Player(avatar)

      player.BEP mustEqual avatar.BEP
      avatar.BEP = 1002
      player.BEP mustEqual avatar.BEP
    }

    "command experience point values of the avatar" in {
      val avatar = Avatar("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      val player = Player(avatar)

      player.CEP mustEqual avatar.CEP
      avatar.CEP = 1002
      player.CEP mustEqual avatar.CEP
    }

    "can get a quick summary of implant slots (default)" in {
      val avatar = Avatar("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      val player = Player(avatar)

      player.Implants mustEqual Array.empty
    }

    "can get a quick summary of implant slots (two unlocked, one installed)" in {
      val avatar = Avatar("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      val player = Player(avatar)
      val temp = new ImplantDefinition(1)
      avatar.Implants(0).Unlocked = true
      avatar.InstallImplant(new ImplantDefinition(1))
      avatar.Implants(1).Unlocked = true
      avatar.InstallImplant(new ImplantDefinition(2))
      avatar.UninstallImplant(temp.Type)

      val list = player.Implants
      //slot 0
      val (implant1, init1, active1) = list(0)
      implant1 mustEqual ImplantType.None
      init1 mustEqual -1
      active1 mustEqual false
      //slot 1
      val (implant2, init2, active2) = list(1)
      implant2 mustEqual ImplantType(2)
      init2 mustEqual 0
      active2 mustEqual false
    }

    "can get a quick summary of implant slots (all unlocked, first two installed)" in {
      val avatar = Avatar("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      val player = Player(avatar)
      avatar.Implants(0).Unlocked = true
      avatar.InstallImplant(new ImplantDefinition(1))
      avatar.Implants(0).Initialized = true
      avatar.Implants(0).Active = true
      avatar.Implants(1).Unlocked = true
      avatar.InstallImplant(new ImplantDefinition(2))
      avatar.Implants(1).Initialized = true
      avatar.Implants(1).Active = false
      avatar.Implants(2).Unlocked = true

      val list = player.Implants
      //slot 0
      val (implant1, init1, active1) = list(0)
      implant1 mustEqual ImplantType(1)
      init1 mustEqual 0
      active1 mustEqual true
      //slot 1
      val (implant2, init2, active2) = list(1)
      implant2 mustEqual ImplantType(2)
      init2 mustEqual 0
      active2 mustEqual false
      //slot 2
      val (implant3, init3, active3) = list(2)
      implant3 mustEqual ImplantType.None
      init3 mustEqual -1
      active3 mustEqual false
    }

    "seat in a vehicle" in {
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      obj.VehicleSeated mustEqual None
      obj.VehicleSeated = PlanetSideGUID(65)
      obj.VehicleSeated mustEqual Some(PlanetSideGUID(65))
      obj.VehicleSeated = None
      obj.VehicleSeated mustEqual None
    }

    "own in a vehicle" in {
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      obj.VehicleOwned mustEqual None
      obj.VehicleOwned = PlanetSideGUID(65)
      obj.VehicleOwned mustEqual Some(PlanetSideGUID(65))
      obj.VehicleOwned = None
      obj.VehicleOwned mustEqual None
    }

    "remember what zone he is in" in {
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      obj.Continent mustEqual "home2"
      obj.Continent = "ugd01"
      obj.Continent mustEqual "ugd01"
    }

    "special is typically normal and can not be changed from normal" in {
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      obj.UsingSpecial mustEqual SpecialExoSuitDefinition.Mode.Normal
      obj.UsingSpecial = SpecialExoSuitDefinition.Mode.Shielded
      obj.UsingSpecial mustEqual SpecialExoSuitDefinition.Mode.Normal
    }

    "a TR MAX can change its special to Overdrive or Anchored" in {
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      obj.ExoSuit = ExoSuitType.MAX
      obj.UsingSpecial mustEqual SpecialExoSuitDefinition.Mode.Normal
      obj.UsingSpecial = SpecialExoSuitDefinition.Mode.Anchored
      obj.UsingSpecial mustEqual SpecialExoSuitDefinition.Mode.Anchored
      obj.UsingSpecial = SpecialExoSuitDefinition.Mode.Normal
      obj.UsingSpecial mustEqual SpecialExoSuitDefinition.Mode.Normal
      obj.UsingSpecial = SpecialExoSuitDefinition.Mode.Overdrive
      obj.UsingSpecial mustEqual SpecialExoSuitDefinition.Mode.Overdrive
      //note
      obj.UsingSpecial = SpecialExoSuitDefinition.Mode.Anchored
      obj.UsingSpecial mustEqual SpecialExoSuitDefinition.Mode.Overdrive
    }

    "an NC MAX can change its special to Shielded" in {
      val obj = TestPlayer("Chord", PlanetSideEmpire.NC, CharacterGender.Male, 0, 5)
      obj.ExoSuit = ExoSuitType.MAX
      obj.UsingSpecial mustEqual SpecialExoSuitDefinition.Mode.Normal
      obj.UsingSpecial = SpecialExoSuitDefinition.Mode.Shielded
      obj.UsingSpecial mustEqual SpecialExoSuitDefinition.Mode.Shielded
      obj.UsingSpecial = SpecialExoSuitDefinition.Mode.Normal
      obj.UsingSpecial mustEqual SpecialExoSuitDefinition.Mode.Normal
    }

    "one faction can not use the other's specials" in {
      val objtr = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      objtr.ExoSuit = ExoSuitType.MAX
      objtr.UsingSpecial mustEqual SpecialExoSuitDefinition.Mode.Normal
      objtr.UsingSpecial = SpecialExoSuitDefinition.Mode.Shielded
      objtr.UsingSpecial mustEqual SpecialExoSuitDefinition.Mode.Normal

      val objnc = TestPlayer("Chord", PlanetSideEmpire.NC, CharacterGender.Male, 0, 5)
      objnc.ExoSuit = ExoSuitType.MAX
      objnc.UsingSpecial mustEqual SpecialExoSuitDefinition.Mode.Normal
      objnc.UsingSpecial = SpecialExoSuitDefinition.Mode.Overdrive
      objnc.UsingSpecial mustEqual SpecialExoSuitDefinition.Mode.Normal
      objnc.UsingSpecial = SpecialExoSuitDefinition.Mode.Anchored
      objnc.UsingSpecial mustEqual SpecialExoSuitDefinition.Mode.Normal
    }

    "changing exo-suit type resets the special to Normal (and changing back does not revert it again)" in {
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      obj.ExoSuit = ExoSuitType.MAX
      obj.UsingSpecial mustEqual SpecialExoSuitDefinition.Mode.Normal
      obj.UsingSpecial = SpecialExoSuitDefinition.Mode.Anchored
      obj.UsingSpecial mustEqual SpecialExoSuitDefinition.Mode.Anchored

      val test = obj.UsingSpecial
      obj.ExoSuit = ExoSuitType.Standard
      obj.UsingSpecial mustEqual SpecialExoSuitDefinition.Mode.Normal
      obj.ExoSuit = ExoSuitType.MAX
      obj.UsingSpecial != test mustEqual true
    }

    "toString" in {
      val obj = TestPlayer("Chord", PlanetSideEmpire.TR, CharacterGender.Male, 0, 5)
      obj.toString mustEqual "TR Chord 0/100 0/50"

      obj.GUID = PlanetSideGUID(455)
      obj.Continent = "z3"
      obj.toString mustEqual "TR Chord z3-455 0/100 0/50"
    }
  }
}