delve 0.0.7

data/test/component/movement_test.rb

@@ -0,0 +1,155 @@
+require 'minitest'
+require 'minitest/autorun'
+require 'delve/component/movement'
+require 'mocha/setup'
+
+class MovementComponentTest < Minitest::Test
+
+  def setup
+    @parent = mock('object')
+    @position = mock('object')
+    @collision = mock('object')
+    @fourway = MovementComponent.new @parent
+    @eightway = MovementComponent.new @parent, :eightway
+  end
+
+  # test all movement styles
+
+  def test_id_is_movement
+    assert_equal :movement, @fourway.id
+  end
+
+  def test_initialize_component_with_nil_parent_fails
+    assert_raises RuntimeError do
+      MovementComponent.new nil, :fourway
+    end
+  end
+
+  def test_initialize_component_with_nil_movement_style_defaults_to_fourway
+    move = MovementComponent.new @parent, nil
+    assert_equal :fourway, move.style
+  end
+
+  def test_initialize_with_eight_way_movement
+    move = MovementComponent.new @parent, :eightway
+    assert_equal :eightway, move.style
+  end
+
+  def test_initialize_with_invalid_movement_style
+    assert_raises RuntimeError do
+      MovementComponent.new @parent, :unknown
+    end
+  end
+
+  def test_moving_north_west_in_fourway_fails
+    assert_raises RuntimeError do
+      @fourway.north_west
+    end
+  end
+
+  def test_moving_north_east_in_fourway_fails
+    assert_raises RuntimeError do
+      @fourway.north_east
+    end
+  end
+
+  def test_moving_south_west_in_fourway_fails
+    assert_raises RuntimeError do
+      @fourway.south_west
+    end
+  end
+
+  def test_moving_south_east_in_fourway_fails
+    assert_raises RuntimeError do
+      @fourway.south_east
+    end
+  end
+
+  def test_move_north
+    set_movement_expectations 0, -1
+    @parent.expects(:has?).with(:collision).returns(false)
+    @eightway.north
+  end
+
+  def test_move_north_east
+    set_movement_expectations 1, -1
+    @parent.expects(:has?).with(:collision).returns(false)
+    @eightway.north_east
+  end
+
+  def test_move_east
+    set_movement_expectations 1, 0
+    @parent.expects(:has?).with(:collision).returns(false)
+    @eightway.east
+  end
+
+  def test_move_south_east
+    set_movement_expectations 1, 1
+    @parent.expects(:has?).with(:collision).returns(false)
+    @eightway.south_east
+  end
+
+  def test_move_south
+    set_movement_expectations 0, 1
+    @parent.expects(:has?).with(:collision).returns(false)
+    @eightway.south
+  end
+
+  def test_move_south_west
+    set_movement_expectations -1, 1
+    @parent.expects(:has?).with(:collision).returns(false)
+    @eightway.south_west
+  end
+
+  def test_move_west
+    set_movement_expectations -1, 0
+    @parent.expects(:has?).with(:collision).returns(false)
+    @eightway.west
+  end
+
+  def test_move_north_west
+    set_movement_expectations -1, -1
+    @parent.expects(:has?).with(:collision).returns(false)
+    @eightway.north_west
+  end
+
+  def test_move_when_there_is_no_collision
+    @parent.expects(:has?).with(:collision).returns(true)
+    @parent.expects(:get).with(:collision).returns(@collision)
+    @collision.expects(:free?).returns(true)
+    @position.expects(:x).returns(1)
+    @position.expects(:y).returns(1)
+
+    set_movement_expectations 0, 1
+
+    @fourway.south
+  end
+
+  def test_dont_move_when_there_is_collision
+    @parent.expects(:has?).with(:collision).returns(true)
+    @parent.expects(:get).with(:collision).returns(@collision)
+    @collision.expects(:free?).returns(false)
+    @position.expects(:x).returns(1)
+    @position.expects(:y).returns(1)
+
+    @parent.expects(:has?).with(:position).returns(true)
+    @parent.expects(:get).with(:position).returns(@position)
+
+    @fourway.south
+  end
+  
+  def test_always_move_if_no_collision_component
+    set_movement_expectations 0, -1
+    @parent.expects(:has?).with(:collision).returns(false)
+
+    @fourway.north
+  end
+
+  private
+  def set_movement_expectations(dx, dy)
+    @parent.expects(:has?).with(:position).returns(true)
+    @parent.expects(:get).with(:position).returns(@position)
+    @position.expects(:displace).with(dx, dy)
+  end
+
+end

data/test/component/position_test.rb

@@ -0,0 +1,43 @@
+require 'minitest'
+require 'minitest/autorun'
+require 'delve/component/position'
+require 'mocha/setup'
+
+class PositionComponentTest < Minitest::Test
+
+  def setup
+    @parent = mock('object')
+    @pos = PositionComponent.new @parent
+  end
+
+  def test_initialize_component_with_nil_parent_fails
+    assert_raises RuntimeError do
+      PositionComponent.new nil
+    end
+  end
+
+  def test_initial_position_is_zero_zero
+    assert_equal 0, @pos.x
+    assert_equal 0, @pos.y
+  end
+
+  def test_id_is_position
+    assert_equal :position, @pos.id
+  end
+
+  def test_set_position
+    @pos.set 4, 6
+    
+    assert_equal 4, @pos.x
+    assert_equal 6, @pos.y
+  end
+
+  def test_displace_position
+    @pos.set 4, 6
+    @pos.displace -1, 1
+
+    assert_equal 3, @pos.x
+    assert_equal 7, @pos.y
+  end
+
+end

data/test/component/symbol_test.rb

@@ -0,0 +1,30 @@
+require 'minitest'
+require 'minitest/autorun'
+require 'delve/component/symbol'
+require 'mocha/setup'
+
+class SymbolComponentTest < Minitest::Test
+
+  def setup
+    @parent = mock('object')
+    @symbol = 'x'
+    @component = SymbolComponent.new @parent, @symbol
+  end
+
+  def test_initialize_component_with_nil_parent_fails
+    assert_raises RuntimeError do
+      SymbolComponent.new nil, @symbol
+    end
+  end
+
+  def test_initialize_component_with_nil_symbol_fails
+    assert_raises RuntimeError do
+      SymbolComponent.new @parent, nil
+    end
+  end
+
+  def test_get_symbol
+    assert_equal({ :char => @symbol, :color => :white }, @component.symbol)
+  end
+
+end

data/test/delve_test.rb

@@ -0,0 +1,61 @@
+require 'minitest'
+require 'minitest/autorun'
+require 'delve'
+require 'fileutils'
+
+class DelveTest < Minitest::Test
+
+  def setup
+    @base_path = '/home/me'
+    @name = 'crawler'
+    @full_path = "#{@base_path}/#{@name}"
+    @delve = Delve.new @name
+  end
+
+  def test_initialize_without_name_fails
+    assert_raises RuntimeError do
+      Delve.new nil
+    end
+  end
+
+  def test_set_unknown_renderer_fails
+    assert_raises RuntimeError do
+      @delve.use_renderer :train
+    end
+  end
+
+  def test_default_renderer_is_curses
+    assert_equal :curses, @delve.renderer
+  end
+
+  def test_set_unknown_generator_fails
+    assert_raises RuntimeError do
+      @delve.use_generator :window
+    end
+  end
+
+  def test_default_generator_is_rogue
+    assert_equal :rogue, @delve.generator
+  end
+
+  def test_create_project_fails_if_directory_already_exists
+    Dir.expects(:exist?).with(@full_path).returns(true)
+    assert_raises RuntimeError do
+      @delve.create_game @base_path
+    end
+  end
+
+  def test_directory_structure_is_created
+    Dir.expects(:exist?).with(@full_path).returns(false)
+    FileUtils.expects(:mkdir).with(@full_path)
+    FileUtils.expects(:mkdir).with(@full_path + '/bin')
+    FileUtils.expects(:mkdir).with(@full_path + '/lib')
+    FileUtils.expects(:mkdir).with(@full_path + '/lib/' + @name)
+    FileUtils.expects(:mkdir).with(@full_path + '/lib/' + @name + '/screens')
+
+    #TODO: test all files
+
+    @delve.create_game @base_path
+  end
+
+end

data/test/display/curses_renderer_test.rb

@@ -0,0 +1,60 @@
+require 'minitest'
+require 'minitest/autorun'
+require 'mocha/setup'
+require 'curses'
+require 'delve/display/curses_renderer'
+
+class CursesRendererTests < Minitest::Test
+
+  def setup
+    @renderer = CursesRenderer.new
+  end
+
+  def test_init_calls_curses_init
+    Curses.expects(:init_screen)
+    Curses.expects(:nl)
+    Curses.expects(:noecho)
+    Curses.expects(:curs_set).with(0)
+    @renderer.init
+  end
+
+  def test_exit_calls_curses_close
+    Curses.expects(:close_screen)
+    @renderer.exit
+  end
+
+  def test_draw
+    Curses.expects(:setpos)
+    Curses.expects(:addstr)
+    Curses.expects(:init_screen)
+    Curses.expects(:nl)
+    Curses.expects(:noecho)
+    Curses.expects(:curs_set).with(0)
+    @renderer.init
+    @renderer.draw 2, 2, '@', :white, :black
+    @renderer.exit
+  end
+
+  def test_render
+    Curses.expects(:refresh)
+    Curses.expects(:init_screen)
+    Curses.expects(:nl)
+    Curses.expects(:noecho)
+    Curses.expects(:curs_set).with(0)
+    Curses.expects(:clear)
+    @renderer.expects(:draw).with(2, 2, '@', :white, :black)
+    @renderer.init
+    @renderer.render({ '1,1' => {:x => 2, :y => 2, :char => '@', :foreground => :white, :background => :black} })
+    @renderer.exit
+  end
+
+  def test_height
+    Curses.expects(:lines)
+    @renderer.height
+  end
+
+  def test_width
+    Curses.expects(:cols)
+    @renderer.width
+  end
+end

data/test/display/display_test.rb

@@ -0,0 +1,86 @@
+require 'minitest'
+require 'minitest/autorun'
+require 'delve/display/display'
+require 'mocha/setup'
+
+class DisplayTests < MiniTest::Test
+
+  def setup
+    @renderer = mock('object')
+    @renderer.expects(:init)
+    @display = Display.new @renderer
+  end
+
+  def test_create_display_with_no_renderer_raises_error
+    assert_raises RuntimeError do
+      @display = Display.new nil
+    end
+  end
+
+  def test_create_display_with_no_options_sets_defaults
+    opts = @display.options
+
+    assert_equal 80, opts[:width]
+    assert_equal 24, opts[:height]
+    assert_equal :white, opts[:foreground]
+    assert_equal :black, opts[:background]
+  end
+
+  def test_partially_setting_options_keeps_changes_and_defults
+    renderer = mock('object')
+    renderer.expects(:init)
+    @display = Display.new(renderer, { :height => 36, :width => 120 })
+    opts = @display.options
+
+    assert_equal 120, opts[:width]
+    assert_equal 36, opts[:height]
+    assert_equal :white, opts[:foreground]
+    assert_equal :black, opts[:background]
+  end
+
+  def test_completely_define_options
+    renderer = mock('object')
+    renderer.expects(:init)
+    @display = Display.new(renderer, { :height => 36, :width => 120, :background => :gray, :foreground => :yellow })
+    opts = @display.options
+
+    assert_equal 120, opts[:width]
+    assert_equal 36, opts[:height]
+    assert_equal :yellow, opts[:foreground]
+    assert_equal :gray, opts[:background]
+  end
+ 
+  def test_not_initially_dirty_so_no_rendering_is_done
+    @display.render
+    # If it was dirty, then the renderer would be called, and the mock would report an error
+  end
+
+  def test_draw_with_no_colors_uses_default
+    @display.draw 1, 1, '@'
+    
+    @renderer.expects(:render).with({ '1,1' => { :x => 1, :y => 1, :char => '@', :foreground => :white, :background => :black } })
+    @display.render
+  end
+
+  def test_draw_with_colors
+    @display.draw 1, 1, '@', :red, :gray
+    
+    @renderer.expects(:render).with({ '1,1' => { :x => 1, :y => 1, :char => '@', :foreground => :red, :background => :gray} })
+    @display.render
+  end
+
+  def test_display_exit_defers_to_renderer
+    @renderer.expects(:exit)
+    @display.exit
+  end
+
+  def test_height_defers_to_renderer
+    @renderer.expects(:height)
+    @display.height
+  end
+
+  def test_width_defers_to_renderer
+    @renderer.expects(:width)
+    @display.width
+  end
+end

data/test/engine_test.rb

@@ -0,0 +1,36 @@
+require 'minitest'
+require 'minitest/autorun'
+require 'delve/engine'
+
+class EngineTest < Minitest::Test
+
+  def setup
+    @scheduler = mock('object')
+    @actor = mock('object')
+    @engine = Engine.new @scheduler
+  end
+
+  def test_create_engine_without_scheduler_fails
+    assert_raises RuntimeError do
+      Engine.new nil
+    end
+  end
+
+  def test_engine_initially_locked
+    assert @engine.locked?
+  end
+
+  def test_unlock_with_no_actors_calls_scheduler_then_relocks
+    @scheduler.expects(:next).returns(nil)
+    @engine.unlock
+    assert @engine.locked?
+  end
+
+  def test_scheduled_actor_acts_when_unlocked
+    @scheduler.expects(:next).twice.returns(@actor).returns(nil)
+    @actor.expects(:act)
+    @engine.unlock
+    assert @engine.locked?
+  end
+
+end