package handlers

import (
	"context"
	"net/http"
	"strconv"

	"git.haelnorr.com/h/golib/hws"
	"git.haelnorr.com/h/oslstats/internal/db"
	"git.haelnorr.com/h/oslstats/internal/throw"
	seasonsview "git.haelnorr.com/h/oslstats/internal/view/seasonsview"
	"github.com/pkg/errors"
	"github.com/uptrace/bun"
)

// SeasonLeagueTeamDetailPage renders the detail page for a team within a season league
func SeasonLeagueTeamDetailPage(
	s *hws.Server,
	conn *db.DB,
) http.Handler {
	return http.HandlerFunc(func(w http.ResponseWriter, r *http.Request) {
		seasonShortName := r.PathValue("season_short_name")
		leagueShortName := r.PathValue("league_short_name")
		teamIDStr := r.PathValue("team_id")

		teamID, err := strconv.Atoi(teamIDStr)
		if err != nil {
			throw.NotFound(s, w, r, r.URL.Path)
			return
		}

		var twr *db.TeamWithRoster
		var fixtures []*db.Fixture
		var available []*db.Player
		var scheduleMap map[int]*db.FixtureSchedule
		var resultMap map[int]*db.FixtureResult
		var playerStats []*db.AggregatedPlayerStats
		var leaderboard []*db.LeaderboardEntry

		if ok := conn.WithReadTx(s, w, r, func(ctx context.Context, tx bun.Tx) (bool, error) {
			var err error
			twr, err = db.GetTeamRoster(ctx, tx, seasonShortName, leagueShortName, teamID)
			if err != nil {
				if db.IsBadRequest(err) {
					throw.NotFound(s, w, r, r.URL.Path)
					return false, nil
				}
				return false, errors.Wrap(err, "db.GetTeamRoster")
			}
			fixtures, err = db.GetFixturesForTeam(ctx, tx, twr.Season.ID, twr.League.ID, twr.Team.ID)
			if err != nil {
				return false, errors.Wrap(err, "db.GetFixturesForTeam")
			}
			fixtureIDs := make([]int, len(fixtures))
			for i, f := range fixtures {
				fixtureIDs[i] = f.ID
			}
			scheduleMap, err = db.GetAcceptedSchedulesForFixtures(ctx, tx, fixtureIDs)
			if err != nil {
				return false, errors.Wrap(err, "db.GetAcceptedSchedulesForFixtures")
			}
			resultMap, err = db.GetFinalizedResultsForFixtures(ctx, tx, fixtureIDs)
			if err != nil {
				return false, errors.Wrap(err, "db.GetFinalizedResultsForFixtures")
			}
			playerStats, err = db.GetAggregatedPlayerStatsForTeam(ctx, tx, teamID, fixtureIDs)
			if err != nil {
				return false, errors.Wrap(err, "db.GetAggregatedPlayerStatsForTeam")
			}

			available, err = db.GetPlayersNotOnTeam(ctx, tx, twr.Season.ID, twr.League.ID)
			if err != nil {
				return false, errors.Wrap(err, "db.GetPlayersNotOnTeam")
			}

			// Get all teams and all fixtures for the league to compute leaderboard
			var allTeams []*db.Team
			err = tx.NewSelect().
				Model(&allTeams).
				Join("INNER JOIN team_participations AS tp ON tp.team_id = t.id").
				Where("tp.season_id = ? AND tp.league_id = ?", twr.Season.ID, twr.League.ID).
				Scan(ctx)
			if err != nil {
				return false, errors.Wrap(err, "tx.NewSelect allTeams")
			}

			allFixtures, err := db.GetAllocatedFixtures(ctx, tx, twr.Season.ID, twr.League.ID)
			if err != nil {
				return false, errors.Wrap(err, "db.GetAllocatedFixtures")
			}
			allFixtureIDs := make([]int, len(allFixtures))
			for i, f := range allFixtures {
				allFixtureIDs[i] = f.ID
			}
			allResultMap, err := db.GetFinalizedResultsForFixtures(ctx, tx, allFixtureIDs)
			if err != nil {
				return false, errors.Wrap(err, "db.GetFinalizedResultsForFixtures allFixtures")
			}

			leaderboard = db.ComputeLeaderboard(allTeams, allFixtures, allResultMap)

			return true, nil
		}); !ok {
			return
		}

		// Find this team's position and record from the leaderboard
		var position int
		var record *db.TeamRecord
		for _, entry := range leaderboard {
			if entry.Team.ID == teamID {
				position = entry.Position
				record = entry.Record
				break
			}
		}
		if record == nil {
			record = &db.TeamRecord{}
		}

		renderSafely(seasonsview.SeasonLeagueTeamDetailPage(twr, fixtures, available, scheduleMap, resultMap, record, playerStats, position, len(leaderboard)), s, r, w)
	})
}