package controller_test

import (
	"slices"
	"testing"

	"github.com/google/uuid"
	"github.com/iliadenisov/galaxy/internal/controller"
	e "github.com/iliadenisov/galaxy/internal/error"
	"github.com/iliadenisov/galaxy/internal/model/game"
	"github.com/iliadenisov/galaxy/internal/number"
	"github.com/stretchr/testify/assert"
)

func TestRenamePlanet(t *testing.T) {
	c, g := newCache()

	assert.Equal(t, "Planet_0", c.MustPlanet(R0_Planet_0_num).Name)
	assert.NoError(t, g.RenamePlanet(Race_0.Name, int(R0_Planet_0_num), "Home_World"))
	assert.Equal(t, "Home_World", c.MustPlanet(R0_Planet_0_num).Name)

	assert.ErrorContains(t,
		g.RenamePlanet("UnknownRace", int(R0_Planet_0_num), "Home_World"),
		e.GenericErrorText(e.ErrInputUnknownRace))
	assert.ErrorContains(t,
		g.RenamePlanet(Race_0.Name, -1, "Home_World"),
		e.GenericErrorText(e.ErrInputPlanetNumber))
	assert.ErrorContains(t,
		g.RenamePlanet(Race_0.Name, 500, "Home_World"),
		e.GenericErrorText(e.ErrInputEntityNotExists))
	assert.ErrorContains(t,
		g.RenamePlanet(Race_0.Name, int(R1_Planet_1_num), "Home_World"),
		e.GenericErrorText(e.ErrInputEntityNotOwned))
}

func TestPlanetProduction(t *testing.T) {
	c, g := newCache()

	first := "Drive_Shields"
	assert.NoError(t, g.CreateScience(Race_0.Name, first, 0.4, 0, 0.6, 0))
	assert.Len(t, c.RaceScience(Race_0_idx), 1)
	scID := c.RaceScience(Race_0_idx)[0].ID

	pn := int(R0_Planet_0_num)
	assert.NoError(t, g.PlanetProduction(Race_0.Name, pn, "MAT", ""))
	assert.Equal(t, game.ProductionMaterial, c.MustPlanet(R0_Planet_0_num).Production.Type)
	assert.Nil(t, c.MustPlanet(R0_Planet_0_num).Production.SubjectID)
	assert.Nil(t, c.MustPlanet(R0_Planet_0_num).Production.Progress)

	assert.NoError(t, g.PlanetProduction(Race_0.Name, pn, "CAP", ""))
	assert.Equal(t, game.ProductionCapital, c.MustPlanet(R0_Planet_0_num).Production.Type)
	assert.Nil(t, c.MustPlanet(R0_Planet_0_num).Production.SubjectID)
	assert.Nil(t, c.MustPlanet(R0_Planet_0_num).Production.Progress)

	assert.NoError(t, g.PlanetProduction(Race_0.Name, pn, "Weapons", "500"))
	assert.Equal(t, game.ResearchWeapons, c.MustPlanet(R0_Planet_0_num).Production.Type)
	assert.Nil(t, c.MustPlanet(R0_Planet_0_num).Production.SubjectID)
	assert.Nil(t, c.MustPlanet(R0_Planet_0_num).Production.Progress)

	assert.NoError(t, g.PlanetProduction(Race_0.Name, pn, "cargo", ""))
	assert.Equal(t, game.ResearchCargo, c.MustPlanet(R0_Planet_0_num).Production.Type)
	assert.Nil(t, c.MustPlanet(R0_Planet_0_num).Production.SubjectID)
	assert.Nil(t, c.MustPlanet(R0_Planet_0_num).Production.Progress)

	assert.NoError(t, g.PlanetProduction(Race_0.Name, pn, "SHIELDS", first))
	assert.Equal(t, game.ResearchShields, c.MustPlanet(R0_Planet_0_num).Production.Type)
	assert.Nil(t, c.MustPlanet(R0_Planet_0_num).Production.SubjectID)
	assert.Nil(t, c.MustPlanet(R0_Planet_0_num).Production.Progress)

	assert.NoError(t, g.PlanetProduction(Race_0.Name, pn, "DrivE", ""))
	assert.Equal(t, game.ResearchDrive, c.MustPlanet(R0_Planet_0_num).Production.Type)
	assert.Nil(t, c.MustPlanet(R0_Planet_0_num).Production.SubjectID)
	assert.Nil(t, c.MustPlanet(R0_Planet_0_num).Production.Progress)

	assert.NoError(t, g.PlanetProduction(Race_0.Name, pn, "Science", first))
	assert.Equal(t, game.ResearchScience, c.MustPlanet(R0_Planet_0_num).Production.Type)
	assert.Nil(t, c.MustPlanet(R0_Planet_0_num).Production.Progress)
	assert.NotNil(t, c.MustPlanet(R0_Planet_0_num).Production.SubjectID)
	assert.Equal(t, scID, *c.MustPlanet(R0_Planet_0_num).Production.SubjectID)

	assert.NoError(t, g.PlanetProduction(Race_0.Name, pn, "SHIP", Race_0_Gunship))
	assert.Equal(t, game.ProductionShip, c.MustPlanet(R0_Planet_0_num).Production.Type)
	assert.NotNil(t, c.MustPlanet(R0_Planet_0_num).Production.Progress)
	assert.NotNil(t, c.MustPlanet(R0_Planet_0_num).Production.SubjectID)
	stID := c.MustShipClass(Race_0_idx, Race_0_Gunship).ID
	assert.Equal(t, stID, *c.MustPlanet(R0_Planet_0_num).Production.SubjectID)

	pn = int(R0_Planet_2_num)
	assert.ErrorContains(t,
		g.PlanetProduction("UnknownRace", pn, "DRIVE", ""),
		e.GenericErrorText(e.ErrInputUnknownRace))
	assert.ErrorContains(t,
		g.PlanetProduction(Race_0.Name, pn, "Hyperdrive", ""),
		e.GenericErrorText(e.ErrInputProductionInvalid))
	assert.ErrorContains(t,
		g.PlanetProduction(Race_0.Name, -1, "DRIVE", ""),
		e.GenericErrorText(e.ErrInputPlanetNumber))
	assert.ErrorContains(t,
		g.PlanetProduction(Race_0.Name, 500, "DRIVE", ""),
		e.GenericErrorText(e.ErrInputEntityNotExists))
	assert.ErrorContains(t,
		g.PlanetProduction(Race_0.Name, int(R1_Planet_1_num), "DRIVE", ""),
		e.GenericErrorText(e.ErrInputEntityNotOwned))
	assert.ErrorContains(t,
		g.PlanetProduction(Race_0.Name, pn, "Science", ""),
		e.GenericErrorText(e.ErrInputEntityTypeNameInvalid))
	assert.ErrorContains(t,
		g.PlanetProduction(Race_0.Name, pn, "SHIP", ""),
		e.GenericErrorText(e.ErrInputEntityTypeNameInvalid))
	assert.ErrorContains(t,
		g.PlanetProduction(Race_0.Name, pn, "Science", "Winning"),
		e.GenericErrorText(e.ErrInputEntityNotExists))
	assert.ErrorContains(t,
		g.PlanetProduction(Race_0.Name, pn, "SHIP", "Drone"),
		e.GenericErrorText(e.ErrInputEntityNotExists))
}

func TestPlanetProductionCapacity(t *testing.T) {
	c, _ := newCache()
	assert.NoError(t, c.CreateShips(Race_0_idx, ShipType_Cruiser, R0_Planet_0_num, 1))
	assert.Equal(t, 100., c.PlanetProductionCapacity(R0_Planet_0_num))
	c.UpgradeShipGroup(0, game.TechDrive, 1.6)
	assert.Equal(t, 53.125, c.PlanetProductionCapacity(R0_Planet_0_num))
}

func TestProduceShips(t *testing.T) {
	c, g := newCache()

	pn := int(R0_Planet_0_num)
	assert.NoError(t, g.PlanetProduction(Race_0.Name, pn, "SHIP", Race_0_Gunship))
	assert.Equal(t, game.ProductionShip, c.MustPlanet(R0_Planet_0_num).Production.Type)
	assert.NotNil(t, c.MustPlanet(R0_Planet_0_num).Production.Progress)
	assert.NotNil(t, c.MustPlanet(R0_Planet_0_num).Production.SubjectID)
	st := c.MustShipClass(Race_0_idx, Race_0_Gunship)
	assert.Equal(t, st.ID, *c.MustPlanet(R0_Planet_0_num).Production.SubjectID)

	c.MustPlanet(R0_Planet_0_num).Population = 1000.
	c.MustPlanet(R0_Planet_0_num).Industry = 1000.
	c.MustPlanet(R0_Planet_0_num).Resources = 10.
	shipMass := st.EmptyMass()

	c.ProduceShips()

	assert.Len(t, slices.Collect(c.RaceShipGroups(Race_0_idx)), 0)
	assert.NotNil(t, c.MustPlanet(R0_Planet_0_num).Production.Progress)
	progress := *c.MustPlanet(R0_Planet_0_num).Production.Progress
	assert.InDelta(t, 0.45, progress, 0.001)

	assert.NoError(t, c.CreateShipType(Race_0_idx, "Drone", 1, 0, 0, 0, 0))
	assert.NoError(t, g.PlanetProduction(Race_0.Name, pn, "SHIP", "Drone"))
	assert.InDelta(t, shipMass*progress, c.MustPlanet(R0_Planet_0_num).Material, 0.00001) // 99.(0099) material build

	c.ProduceShips()

	assert.Len(t, slices.Collect(c.RaceShipGroups(Race_0_idx)), 1)
	assert.Equal(t, uint(99), c.ShipGroup(0).Number)
	progress = *c.MustPlanet(R0_Planet_0_num).Production.Progress
	assert.InDelta(t, 0.0099, progress, 0.00001) // 1.(0099) drones with no CAP on planet
}

func TestProduceShip(t *testing.T) {
	Drone := game.ShipType{
		ShipTypeReport: game.ShipTypeReport{
			Name:     "Drone",
			Drive:    1,
			Armament: 0,
			Weapons:  0,
			Shields:  0,
			Cargo:    0,
		},
	}
	BattleShip := game.ShipType{
		ShipTypeReport: game.ShipTypeReport{
			Name:     "BattleShip",
			Drive:    25,
			Armament: 1,
			Weapons:  30,
			Shields:  35,
			Cargo:    0,
		},
	}
	p := controller.NewPlanet(0, "Planet_0", uuid.New(), 1, 1, 1000, 1000, 1000, 10, game.ProductionShip.AsType(uuid.Nil))

	r := controller.ProduceShip(&p, Drone.EmptyMass())
	assert.Equal(t, 99, r)
	assert.InDelta(t, 0.0099, *p.Production.Progress, 0.000001)

	(&p).Production = game.ProductionShip.AsType(uuid.Nil)
	(&p).Capital = 10.
	r = controller.ProduceShip(&p, Drone.EmptyMass())
	assert.Equal(t, 100, r)
	assert.Equal(t, 0., *p.Production.Progress)
	assert.Equal(t, 0., number.Fixed3(p.Capital)) // TODO: zero CAP is not actual zero after series of decrements

	(&p).Production = game.ProductionShip.AsType(uuid.Nil)
	(&p).Capital = 0.
	r = controller.ProduceShip(&p, BattleShip.EmptyMass())
	assert.Equal(t, 1, r)
	assert.InDelta(t, 0.1, *p.Production.Progress, 0.001)

	(&p).Production = game.ProductionShip.AsType(uuid.Nil)
	(&p).Capital = 20.
	r = controller.ProduceShip(&p, BattleShip.EmptyMass())
	assert.Equal(t, 1, r)
	assert.Equal(t, 1./9., *p.Production.Progress)
}