pentix 1.0.0

data/spec/lib/glass_spec.rb

@@ -0,0 +1,377 @@
+require File.dirname(__FILE__) + "/../spec_helper"
+
+describe Glass do
+
+  before do
+    @window = DummyWindow.new
+    @window.glass  = @glass  = Glass.new(@window, 1, 2)
+    @window.status = @status = Status.new(@window, 20, 2)
+  end
+
+  describe "initialization" do
+    it "should use correct blocks color" do
+      @glass.instance_variable_get('@block').color.should == Glass::COLOR
+    end
+
+    it "should assign the initial position" do
+      @glass.pos_x.should == 1
+      @glass.pos_y.should == 2
+    end
+
+    it "should render the glass walls correctly" do
+      @glass.should render_blocks(%Q{
+        |x. . . . . . . . . . . . .x|
+        |x. . . . . . . . . . . . .x|
+        |x. . . . . . . . . . . . .x|
+        |x. . . . . . . . . . . . .x|
+        |x. . . . . . . . . . . . .x|
+        |x. . . . . . . . . . . . .x|
+        |x. . . . . . . . . . . . .x|
+        |x. . . . . . . . . . . . .x|
+        |x. . . . . . . . . . . . .x|
+        |x. . . . . . . . . . . . .x|
+        |x. . . . . . . . . . . . .x|
+        |x. . . . . . . . . . . . .x|
+        |x. . . . . . . . . . . . .x|
+        |x. . . . . . . . . . . . .x|
+        |x. . . . . . . . . . . . .x|
+        |x. . . . . . . . . . . . .x|
+        |x. . . . . . . . . . . . .x|
+        |x. . . . . . . . . . . . .x|
+        |x. . . . . . . . . . . . .x|
+        |x. . . . . . . . . . . . .x|
+        |x. . . . . . . . . . . . .x|
+        |x. . . . . . . . . . . . .x|
+        |x. . . . . . . . . . . . .x|
+        |x. . . . . . . . . . . . .x|
+        |x.x.x.x.x.x.x.x.x.x.x.x.x.x|
+      })
+    end
+
+    it "should have an empty matrix" do
+      @glass.should have_matrix(%Q{
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+      })
+    end
+  end
+
+  describe "#spaces_below" do
+    before do
+      @glass  = Glass.new(@window, 1, 2)
+      @figure = Figure.new(@window, :l_crutch)
+      @figure.pos_x = 8
+      @figure.pos_y = 2
+    end
+
+    it "should calculate the distance correctly when the figure is vertical" do
+      @figure.rotate_left if @figure.size_x > @figure.size_y
+      @glass.spaces_below(@figure).should == Glass::HEIGHT - @figure.size_y
+    end
+
+    it "should calculate the distance correctly when the figure is vertical" do
+      @figure.rotate_left if @figure.size_y > @figure.size_y
+      @glass.spaces_below(@figure).should == Glass::HEIGHT - @figure.size_y
+    end
+
+    it "should calculate the distance correctly when a figure is hanging in the middle" do
+      @offset = Glass::HEIGHT / 2
+      @figure.pos_y = @glass.pos_y + @offset
+
+      @glass.spaces_below(@figure).should == Glass::HEIGHT - @figure.size_y - @offset
+    end
+
+    describe "with some blocks in the glass" do
+      before do
+        @stack_height = 3
+
+        @stack_height.times do |y|
+          3.times do |x|
+            @glass.matrix[Glass::HEIGHT - 1 - y][x] = Color::WHITE
+          end
+        end
+      end
+
+      it "should subtract the blocks height when the figure is above them" do
+        @figure.pos_x = @glass.pos_x + 1
+        @glass.spaces_below(@figure).should == Glass::HEIGHT - @figure.size_y - @stack_height
+      end
+
+      it "should not calculate the blocks height when the figure is not above them" do
+        @figure.pos_x = @glass.pos_x + 6
+        @glass.spaces_below(@figure).should == Glass::HEIGHT - @figure.size_y
+      end
+
+      it "should calculate the distance correctly when the figure is in the middle" do
+        @figure.pos_x = @glass.pos_x + 1
+        @figure.pos_y = 10
+
+        @glass.spaces_below(@figure).should == Glass::HEIGHT -
+          @figure.size_y - @stack_height - @figure.pos_y + @glass.pos_y
+      end
+    end
+  end
+
+  describe "#glue_in" do
+    before do
+      @figure = Figure.new(@window, :stairs)
+    end
+
+    it "should glue the figure in when it's on top" do
+      @figure.move_to(@glass.pos_x + 3, @glass.pos_y)
+      @glass.glue_in(@figure)
+      @glass.should have_matrix(%Q{
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . .x. . . . . . . . . |
+        | . .x.x. . . . . . . . |
+        | . . .x.x. . . . . . . |
+      })
+    end
+
+    it "should call the status for scores" do
+      @figure.move_to(@glass.pos_x + 3, @glass.pos_y)
+
+      @status.should_receive(:count_drop).with(@figure)
+      @status.should_receive(:count_kill).with([])
+
+      @glass.glue_in(@figure)
+    end
+
+    describe "with some blocks already in the glass" do
+      before do
+        figure = Figure.new(@window, :l_crutch)
+        figure.move_to(@glass.pos_x + 2, @glass.pos_y)
+        @glass.glue_in(figure)
+      end
+
+      it "should glue figures next to each other" do
+        @figure.move_to(@glass.pos_x + 7, @glass.pos_y + 6)
+        @glass.glue_in(@figure)
+
+        @glass.should have_matrix(%Q{
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | .x. . . . . . . . . . |
+          | .x.x. . . .x. . . . . |
+          | .x. . . . .x.x. . . . |
+          | .x. . . . . .x.x. . . |
+        })
+      end
+
+      it "should glue figures on top of each other" do
+        @figure.move_to(@glass.pos_x + 3, @glass.pos_y)
+        @glass.glue_in(@figure)
+
+        @figure.move_to(@glass.pos_x + 2, @glass.pos_y)
+        @glass.glue_in(@figure)
+
+        @glass.should have_matrix(%Q{
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | . . . . . . . . . . . |
+          | .x. . . . . . . . . . |
+          | .x.x. . . . . . . . . |
+          | . .x.x. . . . . . . . |
+          | . .x. . . . . . . . . |
+          | .x.x.x. . . . . . . . |
+          | .x.x.x.x. . . . . . . |
+          | .x. . . . . . . . . . |
+          | .x. . . . . . . . . . |
+        })
+      end
+    end
+  end
+
+  describe "#has_space_for?" do
+    before do
+      @figure = Figure.new(@window, :cross)
+    end
+
+    describe "in an empty glass" do
+      it "should say 'yes' when the figure is in the middle" do
+        @glass.should have_space_for(
+          @figure.matrix, @glass.pos_x + 4, @glass.pos_y + 4
+        )
+      end
+
+      it "should say 'nope' when the figure is out of the left border" do
+        @glass.should_not have_space_for(
+          @figure.matrix, @glass.pos_x, @glass.pos_y
+        )
+      end
+
+      it "should say 'nope' if a figure is out of the right border" do
+        @glass.should_not have_space_for(
+          @figure.matrix, @glass.pos_x + Glass::WIDTH + 2 - @figure.size_x, @glass.pos_y
+        )
+      end
+
+      it "should say 'nope' if a figure is below the bottom line" do
+        @glass.should_not have_space_for(
+          @figure.matrix, @glass.pos_x + 4, @glass.pos_y + Glass::HEIGHT - @figure.size_y + 1
+        )
+      end
+
+      it "should say 'yup' for a figure next to the left border" do
+        @glass.should have_space_for(
+          @figure.matrix, @glass.pos_x + 1, @glass.pos_y
+        )
+      end
+
+      it "should say 'yup' for a figure next to the right border" do
+        @glass.should have_space_for(
+          @figure.matrix, @glass.pos_x + Glass::WIDTH + 1 - @figure.size_x, @glass.pos_y
+        )
+      end
+
+      it "should say 'yup' for a figure next to the bottom border" do
+        @glass.should have_space_for(
+          @figure.matrix, @glass.pos_x + 4, @glass.pos_y + Glass::HEIGHT - @figure.size_y
+        )
+      end
+    end
+
+    describe "with some blocks in the glass" do
+      before do
+        10.times do |i|
+          @glass.matrix[i][i] = Color::GRAY
+        end
+      end
+
+      it "should say 'yup' for figures that are away from the blocks" do
+        @glass.should have_space_for(
+          @figure.matrix, @glass.pos_x + 8, @glass.pos_y
+        )
+      end
+
+      it "should say 'yup' for figures that fit the landscape" do
+        @glass.should have_space_for(
+          @figure.matrix, @glass.pos_x + 3, @glass.pos_y
+        )
+      end
+
+      it "should say 'nope' for figures that intersect with the landscape" do
+        @glass.should_not have_space_for(
+          @figure.matrix, @glass.pos_x + 1, @glass.pos_y
+        )
+      end
+    end
+  end
+
+  describe "#remove_full_lines" do
+
+    before do
+      10.times do |y|
+        @glass.matrix[y].each_with_index do |cell, x|
+          @glass.matrix[Glass::HEIGHT - y - 1][x] =
+            y % 2 == 0 || x % 2 == 0 ? 0xFFFFFFFF : nil
+        end
+      end
+
+      @glass.remove_full_lines
+    end
+
+    it "should have matrix like that" do
+      @glass.should have_matrix(%Q{
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        | . . . . . . . . . . . |
+        |x. .x. .x. .x. .x. .x. |
+        |x. .x. .x. .x. .x. .x. |
+        |x. .x. .x. .x. .x. .x. |
+        |x. .x. .x. .x. .x. .x. |
+        |x. .x. .x. .x. .x. .x. |
+      })
+    end
+  end
+
+end

data/spec/lib/status_spec.rb

@@ -0,0 +1,194 @@
+require File.dirname(__FILE__) + "/../spec_helper"
+
+describe Status do
+  before :all do
+    @window = DummyWindow.new
+    @window.glass = Glass.new(@window, 1, 1)
+
+    @head_font_args = [@window, Status::HEAD_FONT[0], Status::HEAD_FONT[1]]
+    @text_font_args = [@window, Status::TEXT_FONT[0], Status::TEXT_FONT[1]]
+
+    @head_font = Font.new(*@head_font_args)
+    @text_font = Font.new(*@text_font_args)
+
+    @status = Status.new(@window, 10, 20)
+  end
+
+  describe "initialization" do
+    it "should instantiate correct fonts" do
+      Font.should_receive(:new).with(*@head_font_args).and_return(@head_font)
+      Font.should_receive(:new).with(*@text_font_args).and_return(@text_font)
+
+      @status = Status.new(@window, 10, 20)
+    end
+
+    it "should set correct positions" do
+      @status.pos_x.should == 10
+      @status.pos_y.should == 20
+    end
+
+    it "should set first level" do
+      @status.level.should == 1
+    end
+
+    it "should set zero lines" do
+      @status.lines.should == 0
+    end
+
+    it "should set zero figures" do
+      @status.figures.should == 0
+    end
+
+    it "should set zero score" do
+      @status.score.should == 0
+    end
+  end
+
+  describe '#reset!' do
+    before :all do
+      @status.level   = 8
+      @status.score   = 9999
+      @status.lines   = 234
+      @status.figures = 1234
+
+      @status.reset!
+    end
+
+    it "should set the first level" do
+      @status.level.should == 1
+    end
+
+    it "should set zero lines" do
+      @status.lines.should == 0
+    end
+
+    it "should set zero figures" do
+      @status.figures.should == 0
+    end
+
+    it "should set zero score" do
+      @status.score.should == 0
+    end
+  end
+
+  describe "#draw" do
+    it "should draw the things" do
+      Font.should_receive(:new).with(*@head_font_args).and_return(@head_font)
+      Font.should_receive(:new).with(*@text_font_args).and_return(@text_font)
+
+      @figure = Figure.new(@window)
+      @status = Status.new(@window, 10, 20)
+      @status.figure = @figure
+
+      @figure.should_receive(:pos_x=).with(10)
+      @figure.should_receive(:pos_y=).with(22)
+      @figure.should_receive(:draw)
+
+      @head_font.should_receive(:draw).with("Next:",    200, 395, 0, 1.0, 1.0, Status::HEAD_FONT[2])
+      @head_font.should_receive(:draw).with("Score:",   200, 575, 0, 1.0, 1.0, Status::HEAD_FONT[2])
+      @head_font.should_receive(:draw).with("Winnars:", 200, 755, 0, 1.0, 1.0, Status::HEAD_FONT[2])
+
+      @status.draw
+    end
+  end
+
+  describe "scoring" do
+    before do
+      @figure = Figure.new(@window)
+
+      @status.score = 0
+      @status.level = 1
+      @status.lines = 0
+      @status.figures = 0
+    end
+
+    it "should calculate correctly a figure drop score" do
+      @figure.distance = 8
+
+      @status.count_drop @figure
+
+      @status.score.should == 8
+      @status.figures.should == 1
+    end
+
+    it "should multiply the drop score by the current level" do
+      @figure.distance = 9
+      @status.level = 3
+
+      @status.count_drop @figure
+
+      @status.score.should == 27
+      @status.figures.should == 1
+    end
+
+    it "should score lines kill according to the scoring system" do
+      Status::SCORING_SYSTEM.each do |lines_num, score|
+        @status.score = 0
+        @status.lines = 0
+
+        @status.count_kill Array.new(lines_num)
+
+        @status.score.should == score
+        @status.lines.should == lines_num
+      end
+    end
+
+    it "should multiply the lines kill score by the current level" do
+      Status::SCORING_SYSTEM.each do |lines_num, score|
+        @status.score = 0
+        @status.lines = 0
+        @status.level = 4
+
+        @status.count_kill Array.new(lines_num)
+
+        @status.score.should == score * 4
+        @status.lines.should == lines_num
+      end
+    end
+  end
+
+  describe "levelups" do
+    before do
+      @status.reset!
+    end
+
+    it "should not levelup until the user scores a minimum amount of lines" do
+      (Status::LEVELUP - 1).times do
+        @status.count_kill [1]
+      end
+
+      @status.level.should == 1
+    end
+
+    it "should levelup right after the user scores the needed amount of lines" do
+      Status::LEVELUP.times do
+        @status.count_kill [1]
+      end
+
+      @status.level.should == 2
+    end
+
+    it "should keep excessive lines count after each levelup" do
+      (Status::LEVELUP - 1).times do
+        @status.count_kill [1]
+      end
+
+      @status.level.should == 1
+
+      @status.count_kill [1,2,3]
+
+      @status.level.should == 2
+
+      (Status::LEVELUP - 3).times do
+        @status.count_kill [1]
+      end
+
+      @status.level.should == 2
+
+      @status.count_kill [1]
+
+      @status.level.should == 3
+    end
+  end
+
+end

data/spec/spec.opts

@@ -0,0 +1 @@
+--color

data/spec/spec_helper.rb

@@ -0,0 +1,103 @@
+require 'rspec'
+require File.join(File.dirname(__FILE__), '..', 'pentix.rb')
+
+# a dummy window class to test the modules separately from the main game
+class DummyWindow < Gosu::Window
+  attr_accessor :glass, :status
+
+  # converting `.new` into a singleton to avoid memory leaks in Gosu
+  def self.new
+    @@win ||= super
+  end
+
+  def initialize
+    super(100, 100, false)
+  end
+
+end
+
+#
+# Some pretty formatted matrixes handling helpers
+#
+module MatrixHelper
+  def str_to_matrix(str)
+    str.scan(/\s*\|(.+?)\|/).map do |line|
+      line[0].split('.').map{ |c| c != ' ' }
+    end
+  end
+
+  def matrix_to_str(matrix)
+    matrix.map do |row|
+      "|#{row.map{ |c| c ? 'x' : ' '}.join('.')}|"
+    end.join("\n          ")
+  end
+
+  def draw_matrix(figure)
+    block  = actual.instance_variable_get('@block')
+    matrix = figure.instance_variable_get('@matrix')
+    result = []
+    max_x  = 0
+
+    block.class.instance_eval do
+      define_method :draw do |x, y|
+        x = x - figure.pos_x
+        y = y - figure.pos_y
+
+        result[y]  ||= []
+        result[y][x] = true
+        max_x = x if max_x < x
+      end
+    end
+
+    figure.draw
+
+    # making the size of the rows even
+    result.map do |row|
+      (row || []).tap do |row|
+        (0..max_x).each do |x|
+          row[x] = false unless row[x]
+        end
+      end
+    end
+  end
+
+  # making a set of boolean values out of the matrix
+  def boolify(matrix)
+    matrix.map do |row|
+      row.map{ |cell| !!cell}
+    end
+  end
+end
+
+#
+# Figures rendering matcher
+#
+RSpec::Matchers.define :render_blocks do |expected|
+  extend MatrixHelper
+
+  match do |actual|
+    boolify(draw_matrix(actual)) == boolify(str_to_matrix(expected))
+  end
+
+  failure_message_for_should do |actual|
+    "expected: #{matrix_to_str(str_to_matrix(expected))}\n\n" \
+    "     got: #{matrix_to_str(draw_matrix(actual))}"
+  end
+end
+
+
+#
+# a readable matrix matcher
+#
+RSpec::Matchers.define :have_matrix do |expected|
+  extend MatrixHelper
+
+  match do |actual|
+    boolify(actual.matrix) == boolify(str_to_matrix(expected))
+  end
+
+  failure_message_for_should do |actual|
+    "expected: #{matrix_to_str(str_to_matrix(expected))}\n\n" \
+    "     got: #{matrix_to_str(actual.matrix)}"
+  end
+end