package systems

import (
	"log/slog"
	. "openquell/components"
	. "openquell/config"
	"openquell/grid"

	"github.com/hajimehoshi/ebiten/v2"
	"github.com/hajimehoshi/ebiten/v2/inpututil"
	"github.com/mlange-42/arche/ecs"
	"github.com/mlange-42/arche/generic"
)

type PlayerSystem struct {
	World         *ecs.World
	Selector      *generic.Filter5[Position, Velocity, Player, Renderable, Speed]
	GridContainer *grid.GridContainer
}

func NewPlayerSystem(world *ecs.World, gridcontainer *grid.GridContainer) System {
	system := &PlayerSystem{
		Selector:      generic.NewFilter5[Position, Velocity, Player, Renderable, Speed](),
		GridContainer: gridcontainer,
		World:         world,
	}

	return system
}

func (system PlayerSystem) Update() error {
	// first check if we need to switch player
	switchable := false
	query := system.Selector.Query(system.World)
	for query.Next() {
		_, _, player, _, _ := query.Get()
		if !player.IsPrimary {
			switchable = true
		}
	}

	if switchable {
		query := system.Selector.Query(system.World)
		for query.Next() {
			_, _, player, render, _ := query.Get()
			if inpututil.IsKeyJustPressed(ebiten.KeyTab) {
				slog.Debug("switch players")
				if player.IsPrimary {
					player.IsPrimary = false
					render.Image = player.SwitchSprite()
				} else {
					player.IsPrimary = true
					render.Image = player.SwitchSprite()
				}
			}
		}
	}

	// check player movements etc
	query = system.Selector.Query(system.World)
	for query.Next() {
		playerposition, velocity, player, _, _ := query.Get()

		if !player.IsPrimary {
			continue
		}

		if !velocity.Moving() {
			switch {
			case ebiten.IsKeyPressed(ebiten.KeyRight):
				velocity.Change(East)
			case ebiten.IsKeyPressed(ebiten.KeyLeft):
				velocity.Change(West)
			case ebiten.IsKeyPressed(ebiten.KeyDown):
				velocity.Change(South)
			case ebiten.IsKeyPressed(ebiten.KeyUp):
				velocity.Change(North)
				// other keys: <tab>: switch player, etc
			}
		}

		if velocity.Moving() {
			ok, newpos := system.GridContainer.Grid.BumpEdge(playerposition, velocity)
			if ok {
				//slog.Debug("falling off the edge", "newpos", newpos)
				playerposition.Set(newpos)
			} else {
				ok, tilepos := system.GridContainer.Grid.GetSolidNeighborPosition(playerposition, velocity, true)
				if ok {
					intersects, newpos := tilepos.Intersects(playerposition, velocity)
					if intersects {
						// slog.Debug("collision detected", "tile",
						// 	tilepos, "player", playerposition, "new", newpos)

						playerposition.Set(newpos)
						velocity.Change(Stop)
					}
				}
			}
		}
	}

	query = system.Selector.Query(system.World)
	for query.Next() {
		// move player after obstacle or collectible updates
		playerposition, velocity, _, _, speed := query.Get()
		playerposition.Move(velocity, speed)
	}

	return nil
}

func (system *PlayerSystem) Draw(screen *ebiten.Image) {
	// write the movable tiles
	op := &ebiten.DrawImageOptions{}
	query := system.Selector.Query(system.World)

	for query.Next() {
		pos, _, _, sprite, _ := query.Get()

		op.GeoM.Reset()
		op.GeoM.Translate(float64(pos.X), float64(pos.Y))

		screen.DrawImage(sprite.Image, op)
	}
}