yasuhito/text2048

# encoding: utf-8

require 'text2048'
require 'timeout'

# This module smells of :reek:UncommunicativeModuleName
module Text2048
  # Controller class.
  class App
    attr_reader :board
    attr_reader :view

    def initialize(view = CursesView.new,
                   board = Board.new,
                   high_score = HighScore.new)
      @view = view
      @board = board
      @high_score = high_score
    end

    def show_title
      @view.high_score(@high_score)
      @view.message = 'PRESS ANY KEY TO START'
      @board = Board.new([[nil, nil, nil, nil],
                          [2, 0, 4, 8],
                          [nil, nil, nil, nil],
                          [nil, nil, nil, nil]])
      @view.update(@board)
      @view.wait_any_key
    end

    def generate(num_tiles = 1)
      num_tiles.times { @board = @board.generate }
      @view.update(@board)
      @view.zoom_tiles(@board.generated_tiles)
    end

    def step
      @view.win if @board.win?
      @view.game_over if @board.lose?
      input @view.command
      @view.high_score(@high_score)
    end

    def wait_any_key(seconds)
      begin
        timeout(seconds) { @view.wait_any_key }
      rescue Timeout::Error
        return false
      end
      true
    end

    def demo
      input [:left, :right, :up, :down][rand(5)]
    end

    private

    def input(command)
      case command
      when :larger, :smaller
        @view.__send__ command, @board
      when :left, :right, :up, :down
        move_and_generate(command)
      when :quit
        exit 0
      end
    end

    def move_and_generate(command)
      last = move(command)
      generate if @board.generate?(last)
      @high_score.maybe_update(@board.score)
    end

    def move(command)
      last = @board
      @board = @board.__send__(command)
      @view.update(@board)
      @view.pop_tiles(@board.merged_tiles)
      last
    end
  end
end