#! /usr/bin/env ruby
# -*- coding: UTF-8 -*-

require 'colonial_twilight/board'
require 'colonial_twilight/cards'
require 'colonial_twilight/player'
require 'colonial_twilight/fln_bot'

module ColonialTwilight

  class Game

    @scenarios = ['Short:  1960-1962: The End Game',
                  'Medium: 1957-1962: Midgame Development',
                  'Full:   1955-1962: Algérie Francaise!'].freeze
    @rules = ['Standard Rules      - No Support Phase in final Propaganda round',
              'Optional Rule 8.5.1 - Conduct Support Phase in final Propaganda round'].freeze
    @states = {
      :event        => 'Event:                        execute the Event card',
      :ope_special  => 'Operation & Special Activity: conduct an Operation in any number of spaces with a Special Activity',
      :ope_only     => 'Operation Only:               conduct an Operation in any number of spaces without a Special Activity',
      :ope_limited  => 'Limited Operation:            conduct an Operation in 1 space without a Special Activity',
      :pass         => 'Pass:                         increase your Resources'
    }.freeze
    class << self
      attr_reader :scenarios, :rules, :states, :cards
    end
    def rules; Game.rules end
    def scenarios; Game.scenarios end
    def possible_actions used=nil
      ks = Game.states.keys
      if not used.nil?
        if used == :event
          ks.delete :event
          ks.delete :ope_only
          ks.delete :ope_limited
        elsif used == :ope_special
          ks.delete :ope_special
          ks.delete :ope_only
        elsif used == :ope_limited
          ks.delete :ope_limited
          ks.delete :event
        elsif used == :ope_only
          ks.delete :ope_only
          ks.delete :event
          ks.delete :ope_special
        end
      end
      Game.states.select { |k,v| ks.include? k }
    end

    attr_reader :scenario, :ruleset, :board, :ui, :cards
    def initialize options
      @options = options
      @board = ColonialTwilight::Board.new
      @deck = ColonialTwilight::Deck.new
    end

    def start ui, s, rs
      @ui = ui
      @ruleset = rs
      @scenario = s
      @board.load [:short, :medium, :long][s]
      @max_card = 71
      @turn = 1
      @cards = []
      @actions = []
      @players = [FLNBot.new(self, :FLN), Player.new(self, :GOV)]
      play
    end

    def play
      while true
        ui.turn_start @turn, *@players
        c = ui.pull_card @max_card
        @cards << @deck.pull(1) # FIXME
        ui.show_card @cards[-1]

        continue? @players[0].instance_of? FLNBot
        ui.player @players[0], true
        @actions[0] = @players[0].play possible_actions

        continue? @players[1].instance_of? FLNBot
        ui.player @players[1], false
        @actions[1] = @players[1].play possible_actions @actions[0]

        @cards.shift if @cards.length > 2
        @turn += 1
        # TURN END ...
      end
    end

    def continue? bot
      l = bot ? ["FLN :\t\tlet the FLN bot play", "Pivotal Event:\tplay a Pivotal Event"] : ["Play:\t\tplay your turn"]
      ret = ui.chose('Next action', l, true) { |s| a = s.split(':'); a[0] = a[0].yellow; a.join(':') }
      exit(0) if ret < 0
    end

  end

end