// Copyright (c) 2016 Florian Fischer. All rights reserved.
// Use of this source code is governed by a MIT license found in the LICENSE file.

package main

import (
	"bufio"
	"fmt"
	"os"

	"muhq.space/go/muhq/goffel/logic"
)

var players []logic.Player
var dice logic.Dice
var reader = bufio.NewReader(os.Stdin)

func main() {
	getPlayers()
	for r := 1; r < 14; r++ {
		round(r)
	}
	broadcastWinner()
}

func getPlayers() {
	name := ""
	count := 0
	fmt.Println("Please enter your player names. An empty line ends the player registration.")
	for {
		fmt.Printf("%d: ", count+1)
		_, err := fmt.Scanln(&name)
		if err != nil {
			break
		}
		players = append(players, logic.NewPlayer(name))
		count++
	}
}

func round(r int) {
	fmt.Printf("Round %d\n", r)
	for i := range players {
		turn(&players[i])
	}
}

func turn(p *logic.Player) {
	dice.Roll(nil)

	fmt.Printf("%s's turn:\n", p.Name)
	fmt.Println(dice)

	var cmd logic.Cmd
	rerolls := 0

	for {
		fmt.Print("Please enter a command(h for help): ")
		input, err := reader.ReadString('\n')
		if err != nil {
			panic(err)
		}
		cmd, err = logic.ParseCmd(input[0 : len(input)-1])
		if err != nil {
			fmt.Printf("%v. Try \"h\".\n", err)
			continue
		}
		switch cmd.Cmd {
		case "h":
			fmt.Println()
			for _, helpLine := range logic.CmdHelp(cmd.Argv[0]) {
				fmt.Println(helpLine)
			}
		case "p":
			fmt.Println(p.Score)
		case "d":
			fmt.Println(dice)
		case "q":
			os.Exit(0)
		case "i":
			points, err := p.Score.Insert(dice, cmd.Argv[0])
			if err != nil {
				fmt.Println("Insert failed:", err)
				continue
			}
			fmt.Printf("You inserted %d into %v.\n", points, logic.ScoreNames[cmd.Argv[0]])
			return
		case "c":
			err = p.Score.Cancel(cmd.Argv[0])
			if err != nil {
				fmt.Println(err)
				continue
			}
			fmt.Println("You cancelled", logic.ScoreNames[cmd.Argv[0]])
			return
		case "r":
			if rerolls < 2 {
				err := dice.Roll(cmd.Argv)
				if err != nil {
					fmt.Println("Reroll failed:", err)
					continue
				}
				rerolls++
				fmt.Println(dice)
				continue
			}
			fmt.Println("You are not allowed to reroll more than twice.")
		default:
		}
	}
}

func broadcastWinner() {
	fmt.Println("Fin!")
	winners, max := logic.FindBest(players)

	for _,p := range players {
		fmt.Printf("%v scored %d\n", p, p.Score.Score())
	}

	if len(winners) == 1 {
		fmt.Println("The Winner is:")
	} else {
		fmt.Println("The Winners are:")
	}
	for _, winner := range winners {
		fmt.Printf("%v with %v points\n", winner.Name, max)
	}
}