ray 0.1.0.pre1 → 0.1.0

data/test/dsl_test.rb

@@ -15,6 +15,8 @@ context "an event runner" do
 
   def runner_asserts(name, method = :asserts, &block)
     send(method, "after #{name}") do
+      reset
+
       [:default, :test].each { |o| @obj.remove_event_group o }
       instance_eval(&block)
       topic.run
@@ -42,27 +44,27 @@ context "an event runner" do
     runner
   end
 
-  runner_asserts("sending a registred event") {
+  runner_asserts("sending a registered event") {
     register_for :event
     raise_event :event
   }.received(:event)
 
-  runner_denies("sending an unregistred event") {
+  runner_denies("sending an unregistered event") {
     register_for :foo
     raise_event :event
   }.received(:event)
 
-  runner_asserts("sending a registred event with the same arguments") {
+  runner_asserts("sending a registered event with the same arguments") {
     register_for :event, "argument"
     raise_event :event, "argument"
   }.received(:event, "argument")
 
-  runner_asserts("sending a registred event with matching arguments") {
+  runner_asserts("sending a registered event with matching arguments") {
     register_for :event, /arg/
     raise_event :event, "argument"
   }.received(:event, "argument")
 
-  runner_denies("sending a registred event with less arguments") {
+  runner_denies("sending a registered event with less arguments") {
     register_for :event, "argument1", "argument2"
     raise_event :event, "argument1"
   }.received(:event, "argument1")
@@ -72,7 +74,7 @@ context "an event runner" do
     raise_event :event, "bar"
   }.received(:event, "bar")
 
-  runner_denies("sending an event registred in a disabled event group") {
+  runner_denies("sending an event registered in a disabled event group") {
     event_group   :test
     register_for  :event
     disable_group :test
@@ -80,7 +82,7 @@ context "an event runner" do
     raise_event :event
   }.received(:event)
 
-  runner_asserts("sending an event registred in an enabled event_group") {
+  runner_asserts("sending an event registered in an enabled event_group") {
     event_group   :test
     register_for  :event
     disable_group :test
@@ -90,4 +92,20 @@ context "an event runner" do
   }.received(:event)
 end
 
+context "an object with no raiser runner" do
+  setup do
+    Object.new.extend Ray::DSL::EventRaiser
+  end
+
+  asserts(:raise_event, :test).raises_kind_of Ray::NoRunnerError
+end
+
+context "an object with no listener runner" do
+  setup do
+    Object.new.extend Ray::DSL::EventListener
+  end
+
+  asserts(:add_hook, :test, proc {}).raises_kind_of Ray::NoRunnerError
+end
+
 run_tests if __FILE__ == $0

data/test/font_test.rb

@@ -5,53 +5,19 @@ context Ray::Font do
 
   denies("creating a font from a file") {
     topic.new(path_of("VeraMono.ttf"))
-  }.raises(RuntimeError)
+  }.raises_kind_of RuntimeError
 
   asserts("creating a font from a non-existing file") {
     topic.new(path_of("doesnt_exist.ttf"))
-  }.raises(RuntimeError)
+  }.raises_kind_of RuntimeError
 
   denies("creating a font from an IO object") {
-    open(path_of("VeraMono.ttf")) { |io| topic.new(io) }
-  }.raises(RuntimeError)
+    open(path_of("VeraMono.ttf"), "rb") { |io| topic.new(io) }
+  }.raises_kind_of RuntimeError
 
   asserts("creating a font from an invalid IO object") {
-    open(path_of("aqua.png")) { |io| topic.new(io) }
-  }.raises(RuntimeError)
-end
-
-context "a font" do
-  setup { Ray::Font.default }
-
-  denies("height of a text containing two lines almost equals line skip") {
-    diff = (topic.size_of("Hello\nWorld", :size => 12).height - topic.line_skip(12)).abs
-    diff <= 1
-  }
-
-  asserts("width of a multi-line text") {
-    topic.width_of("Hello\nabcdefghijkmnopqrstuvwxyz\nWorld", :size => 12)
-  }.equals { topic.width_of("abcdefghijkmnopqrstuvwxyz", :size => 12) }
-
-  asserts("a drawn image's size") {
-    img = topic.draw("Hello world", :size => 12)
-    img.size
-  }.equals { topic.size_of("Hello world", :size => 12) }
-
-  asserts("return value of drawn when :on is set") {
-    topic.draw("Hello world", :on => Ray.screen, :size => 12)
-  }.equals { Ray.screen }
-
-  asserts("using an unknown style") {
-    topic.draw("Hello world", :size => 12, :style => [:foo])
-  }.raises(ArgumentError)
-
-  denies("using a know style") {
-    topic.draw("Hello world", :size => 12, :style => [:bold])
-  }.raises(ArgumentError)
-
-  asserts("not specifying the size") {
-    topic.draw("Hello world", {})
-  }.raises(ArgumentError)
+    open(path_of("aqua.png"), "rb") { |io| topic.new(io) }
+  }.raises_kind_of RuntimeError
 end
 
 run_tests if __FILE__ == $0

data/test/game_test.rb

@@ -0,0 +1,76 @@
+require File.expand_path(File.dirname(__FILE__)) + '/helpers.rb'
+
+context "a game" do
+  setup do
+    game = a_small_game("my game")
+    10.times do |i|
+      game.scene "scene_#{i}".to_sym do
+        always { exit! }
+      end
+    end
+
+    game
+  end
+
+  asserts(:title).equals "my game"
+
+  asserts(:scenes).kind_of Ray::SceneList
+  asserts("the scene list is empty") { topic.scenes.empty? }
+  denies :running?
+
+  asserts(:event_runner).equals {
+    topic.registered_scene(:scene_0).event_runner
+  }
+
+  context "with one scene" do
+    hookup { topic.scenes << :scene_0 }
+
+    asserts :running?
+
+    asserts("current scene") { topic.scenes.current }.equals {
+      topic.registered_scene(:scene_0)
+    }
+
+    context "run once" do
+      hookup do
+        [:scene_0, :scene_1].each do |name|
+          scene = topic.registered_scene name
+          stub(scene).run { scene.exit! }
+        end
+
+        stub(topic).register
+
+        topic.run
+      end
+
+      asserts_topic.received :register
+
+      asserts("its scene") { topic.registered_scene(:scene_0) }.received :run
+      denies("other scenes") { topic.registered_scene(:scene_1) }.received :run
+
+      denies :running?
+      asserts("the scene list is empty") { topic.scenes.empty? }
+    end
+
+    context "after #pop_scene" do
+      hookup { topic.pop_scene }
+
+      denies :running?
+      asserts("the scene list is empty") { topic.scenes.empty? }
+    end
+  end
+
+  context "after changing event_runner" do
+    hookup do
+      topic.event_runner = @runner = Ray::DSL::EventRunner.new
+    end
+
+    asserts(:event_runner).equals { @runner }
+
+    asserts(:event_runner).equals {
+      topic.registered_scene(:scene_0).event_runner
+    }
+  end
+end
+
+run_tests if __FILE__ == $0

data/test/gl_buffer_test.rb

@@ -0,0 +1,26 @@
+require File.expand_path("helpers.rb", File.dirname(__FILE__))
+
+MagicVertex = Ray::GL::Vertex.make [[:foo, "bar", :float]]
+
+context "a buffer" do
+  setup { Ray::GL::Buffer.new :static, Ray::Vertex }
+
+  asserts(:size).equals 256
+  asserts(:[]=, 10, MagicVertex.new).raises_kind_of TypeError
+
+  asserts(:[], 256).nil
+  asserts(:[]=, 257, Ray::Vertex.new).raises_kind_of RangeError
+
+  context "nth vertex after setting it" do
+    setup do
+      topic[34] = Ray::Vertex.new([10, 20], Ray::Color.red, [30, 40])
+      topic[34]
+    end
+
+    asserts(:pos).equals Ray::Vector2[10, 20]
+    asserts(:col).equals Ray::Color.red
+    asserts(:tex).equals Ray::Vector2[30, 40]
+  end
+end
+
+run_tests if __FILE__ == $0

data/test/gl_index_buffer_test.rb

@@ -0,0 +1,17 @@
+require File.expand_path("helpers.rb", File.dirname(__FILE__))
+
+context "an index buffer" do
+  setup { Ray::GL::IndexBuffer.new :static }
+
+  asserts(:size).equals 256
+
+  asserts(:[], 256).nil
+  asserts(:[]=, 257, 3).raises_kind_of RangeError
+
+  context "after changing an element" do
+    hookup { topic[34] = 30 }
+    asserts(:[], 34).equals 30
+  end
+end
+
+run_tests if __FILE__ == $0

data/test/gl_vertex_test.rb

@@ -0,0 +1,117 @@
+require File.expand_path("helpers.rb", File.dirname(__FILE__))
+
+TestVertex = Ray::GL::Vertex.make [
+  [:float,   "in_Float",    :float],
+  [:int,     "in_Int",      :int],
+  [:ubyte,   "in_Ubyte",    :ubyte],
+  [:bool,    "in_Bool",     :bool],
+  [:color,   "in_Color",    :color],
+  [:vector2, "in_Vector2",  :vector2],
+  [:vector3, "in_Vector3",  :vector3]
+]
+
+context "a custom vertex" do
+  setup { TestVertex.new }
+
+  asserts(:float).equals 0.0
+  asserts(:int).equals 0
+  asserts(:ubyte).equals 0
+  asserts(:bool)
+  asserts(:bool?)
+  asserts(:color).equals Ray::Color.white
+  asserts(:vector2).equals Ray::Vector2[0, 0]
+  asserts(:vector3).equals Ray::Vector3[0, 0, 0]
+
+  context "after changing float" do
+    hookup { topic.float = 5.4 }
+
+    asserts(:float).almost_equals 5.4, 1e-6
+    asserts(:int).equals 0
+    asserts(:ubyte).equals 0
+    asserts(:bool)
+    asserts(:bool?)
+    asserts(:color).equals Ray::Color.white
+    asserts(:vector2).equals Ray::Vector2[0, 0]
+    asserts(:vector3).equals Ray::Vector3[0, 0, 0]
+  end
+
+  context "after changing int" do
+    hookup { topic.int = 3.4 }
+
+    asserts(:float).equals 0.0
+    asserts(:int).equals 3
+    asserts(:ubyte).equals 0
+    asserts(:bool)
+    asserts(:bool?)
+    asserts(:color).equals Ray::Color.white
+    asserts(:vector2).equals Ray::Vector2[0, 0]
+    asserts(:vector3).equals Ray::Vector3[0, 0, 0]
+  end
+
+  context "after changing ubyte" do
+    hookup { topic.ubyte = 300 }
+
+    asserts(:float).equals 0.0
+    asserts(:int).equals 0
+    asserts(:ubyte).equals 255
+    asserts(:bool)
+    asserts(:bool?)
+    asserts(:color).equals Ray::Color.white
+    asserts(:vector2).equals Ray::Vector2[0, 0]
+    asserts(:vector3).equals Ray::Vector3[0, 0, 0]
+  end
+
+  context "after changing bool" do
+    hookup { topic.bool = false }
+
+    asserts(:float).equals 0.0
+    asserts(:int).equals 0
+    asserts(:ubyte).equals 0
+    denies(:bool)
+    denies(:bool?)
+    asserts(:color).equals Ray::Color.white
+    asserts(:vector2).equals Ray::Vector2[0, 0]
+    asserts(:vector3).equals Ray::Vector3[0, 0, 0]
+  end
+
+  context "after changing color" do
+    hookup { topic.color = Ray::Color.red }
+
+    asserts(:float).equals 0.0
+    asserts(:int).equals 0
+    asserts(:ubyte).equals 0
+    asserts(:bool)
+    asserts(:bool?)
+    asserts(:color).equals Ray::Color.red
+    asserts(:vector2).equals Ray::Vector2[0, 0]
+    asserts(:vector3).equals Ray::Vector3[0, 0, 0]
+  end
+
+  context "after changing vector2" do
+    hookup { topic.vector2 = [10, 15] }
+
+    asserts(:float).equals 0.0
+    asserts(:int).equals 0
+    asserts(:ubyte).equals 0
+    asserts(:bool)
+    asserts(:bool?)
+    asserts(:color).equals Ray::Color.white
+    asserts(:vector2).equals Ray::Vector2[10, 15]
+    asserts(:vector3).equals Ray::Vector3[0, 0, 0]
+  end
+
+  context "after changing vector3" do
+    hookup { topic.vector3 = [0, 30, 40] }
+
+    asserts(:float).equals 0.0
+    asserts(:int).equals 0
+    asserts(:ubyte).equals 0
+    asserts(:bool)
+    asserts(:bool?)
+    asserts(:color).equals Ray::Color.white
+    asserts(:vector2).equals Ray::Vector2[0, 0]
+    asserts(:vector3).equals Ray::Vector3[0, 30, 40]
+  end
+end
+
+run_tests if __FILE__ == $0

data/test/helpers.rb

@@ -2,10 +2,13 @@ $:.unshift File.expand_path(File.join(File.dirname(__FILE__), "..", "ext"))
 $:.unshift File.expand_path(File.join(File.dirname(__FILE__), "..", "lib"))
 
 require 'riot'
-require 'riot/rr'
+require 'rr'
 
 require 'ray'
 
+require 'ostruct'
+require 'stringio'
+
 include Math
 
 def path_of(res)
@@ -13,7 +16,6 @@ def path_of(res)
 end
 
 def run_tests
-  Ray.create_window(:w => 100, :h => 150)
   exit Riot.run.success?
 end
 
@@ -25,7 +27,13 @@ class AlmostEqualMacro < Riot::AssertionMacro
   register :almost_equals
 
   def test(actual, expected, epsilon)
-    (actual - expected).abs <= epsilon
+    diff = (actual - expected)
+    case diff
+    when Numeric
+      diff.abs <= epsilon
+    when Ray::Vector2, Ray::Vector3
+      diff.to_a.all? { |n| n.abs <= epsilon }
+    end
   end
 
   def evaluate(actual, expected, epsilon = Float::EPSILON)
@@ -78,7 +86,7 @@ class ReceivedMacro < Riot::AssertionMacro
       fail "#{recv.inspect} received ##{msg} with " +
         "#{args.map { |o| o.inspect }.join(', ') } " +
         "#{times} time#{'s' if times != 1}"
-    rescue ::RR::Errors::RRError
+    rescue ::RR::Errors::RRError => e
       pass "received ##{msg} with " +
         "#{args.map { |o| o.inspect }.join(', ') } " +
         "#{times} time#{'s' if times != 1}"
@@ -90,5 +98,37 @@ class Riot::Context
   include RR::Adapters::RRMethods
 end
 
-Riot.reporter = Riot::DotMatrixReporter unless ARGV.include? "--verbose"
+class Riot::Situation
+  include RR::Adapters::RRMethods
+end
+
+def animation_context(name, method, opts, &block)
+  obj = Object.new
+  obj.extend Ray::Helper
+
+  context name do
+    helper(:animation) { obj.send(method, opts.merge(:duration => 5)) }
+    helper(:finished_animation) { obj.send(method, opts.merge(:duration => 0)) }
+    helper(:reversed_animation) { -obj.send(method, opts.merge(:duration => 5)) }
+
+    instance_eval(&block)
+  end
+end
+
+class Object
+  win = nil
+
+  define_method :a_small_game do |*args|
+    name = args.first || "test"
+
+    unless win
+      win = Ray::Window.new
+      win.open name, [640, 480]
+    end
+
+    Ray::Game.new(name, :window => win)
+  end
+end
+
+Riot.reporter = Riot::PrettyDotMatrixReporter unless ARGV.include? "--verbose"
 Riot.alone!