package connect4

import (
	"strings"
	"testing"

	"gno.land/p/moul/kit/store/v0"
	"gno.land/p/nt/testutils/v0"
	"gno.land/p/nt/uassert/v0"
)

var (
	alice = testutils.TestAddress("alice") // 🔴
	bob   = testutils.TestAddress("bob")   // 🟡
	carol = testutils.TestAddress("carol")
)

func resetState() {
	games = store.Named("game")
}

// TestVerticalWin plays 🔴 stacking column 0 four high while 🟡 plays column 1.
func TestVerticalWin(cur realm, t *testing.T) {
	resetState()

	testing.SetRealm(testing.NewUserRealm(alice))
	id := NewGame(cross(cur), bob)
	uassert.Equal(t, int64(1), id)

	for i := 0; i < 3; i++ {
		testing.SetRealm(testing.NewUserRealm(alice))
		Drop(cross(cur), id,0)
		testing.SetRealm(testing.NewUserRealm(bob))
		Drop(cross(cur), id,1)
	}
	// alice's 4th disc in column 0 -> vertical win
	testing.SetRealm(testing.NewUserRealm(alice))
	Drop(cross(cur), id,0)

	g, err := getGame(id)
	uassert.NoError(t, err)
	uassert.True(t, g.Finished)
	uassert.Equal(t, red, g.Winner)

	out := Render("1")
	uassert.True(t, strings.Contains(out, "🔴 Red wins!"))
}

// TestTurnOrderAndErrors covers turn enforcement, non-player, full-column and range checks.
func TestTurnOrderAndErrors(cur realm, t *testing.T) {
	resetState()

	testing.SetRealm(testing.NewUserRealm(alice))
	id := NewGame(cross(cur), bob)

	// bob cannot move first (red starts)
	testing.SetRealm(testing.NewUserRealm(bob))
	uassert.AbortsWithMessage(t, cur,"not your turn", func() {
		Drop(cross(cur), id,0)
	})

	// stranger cannot play
	testing.SetRealm(testing.NewUserRealm(carol))
	uassert.AbortsWithMessage(t, cur,"caller is not a player in this game", func() {
		Drop(cross(cur), id,0)
	})

	// out-of-range column
	testing.SetRealm(testing.NewUserRealm(alice))
	uassert.AbortsWithMessage(t, cur,"column out of range (0-6)", func() {
		Drop(cross(cur), id,7)
	})

	// fill column 3: alice & bob alternate, 6 discs total
	col := 3
	for i := 0; i < 3; i++ {
		testing.SetRealm(testing.NewUserRealm(alice))
		Drop(cross(cur), id,col)
		testing.SetRealm(testing.NewUserRealm(bob))
		Drop(cross(cur), id,col)
	}
	// column now full; whoever is on turn overflows it
	g, _ := getGame(id)
	var mover address
	if g.Turn == red {
		mover = alice
	} else {
		mover = bob
	}
	testing.SetRealm(testing.NewUserRealm(mover))
	uassert.AbortsWithMessage(t, cur,"column is full", func() {
		Drop(cross(cur), id,col)
	})
}

// TestHorizontalWin: 🔴 across columns 0-3 on the bottom row.
func TestHorizontalWin(cur realm, t *testing.T) {
	resetState()

	testing.SetRealm(testing.NewUserRealm(alice))
	id := NewGame(cross(cur), bob)

	// alice drops cols 0,1,2 ; bob answers on row above (col 0,1,2)
	for c := 0; c < 3; c++ {
		testing.SetRealm(testing.NewUserRealm(alice))
		Drop(cross(cur), id,c)
		testing.SetRealm(testing.NewUserRealm(bob))
		Drop(cross(cur), id,c)
	}
	// alice completes col 3 on bottom row -> 0,1,2,3 horizontal
	testing.SetRealm(testing.NewUserRealm(alice))
	Drop(cross(cur), id,3)

	g, err := getGame(id)
	uassert.NoError(t, err)
	uassert.True(t, g.Finished)
	uassert.Equal(t, red, g.Winner)
}

// TestRenderList checks the listing view renders created games.
func TestRenderList(cur realm, t *testing.T) {
	resetState()

	testing.SetRealm(testing.NewUserRealm(alice))
	NewGame(cross(cur), bob)

	out := Render("")
	uassert.True(t, strings.Contains(out, "Connect Four"))
	uassert.True(t, strings.Contains(out, "to move"))
}