limelight 0.0.1-java

data/spec/prop_builder_spec.rb

@@ -0,0 +1,178 @@
+#- Copyright 2008 8th Light, Inc.
+#- Limelight and all included source files are distributed under terms of the GNU LGPL.
+
+require File.expand_path(File.dirname(__FILE__) + "/spec_helper")
+require 'limelight/prop_builder'
+
+describe Limelight::SceneBuilder do
+
+  before(:each) do
+    @caster = make_mock("caster", :fill_cast => nil)
+    @options = { :name => "root", :casting_director => @caster}
+  end
+  
+  it "should build root" do
+    root = Limelight.build_scene(@options)
+    
+    root.class.should == Limelight::Scene
+    root.name.should == "root"
+    root.panel.should_not == nil
+    root.children.size.should == 0
+  end
+  
+  it "should build one child prop" do
+    root = Limelight::build_scene(@options) do
+      child
+    end
+    
+    root.children.size.should == 1
+    child = root.children[0]
+    child.class.should == Limelight::Prop
+    child.name.should == "child"
+    child.panel.should_not == nil
+    child.children.size.should == 0
+  end
+  
+  it "should allow multiple children" do
+    root = Limelight::build_scene(@options) do
+      child1
+      child2
+    end
+    
+    root.children.size.should == 2
+    root.children[0].name.should == "child1"
+    root.children[1].name.should == "child2"
+  end
+
+  it "should allow nested children" do
+    root = Limelight::build_scene(@options) do
+      child do
+        grandchild
+      end
+    end
+
+    root.children.size.should == 1
+    root.children[0].name.should == "child"
+    root.children[0].children.size.should == 1
+    root.children[0].children[0].name.should == "grandchild"
+  end
+  
+  it "should be able to set the id" do
+    root = Limelight::build_scene(@options) do
+      child :id => "child_1", :players => "x, y, z"
+    end
+    
+    child = root.children[0]
+    child.id.should == "child_1"
+    child.players.should == "x, y, z"
+  end
+  
+  it "should allow setting styles" do
+    root = Limelight::build_scene(@options) do
+      child :width => "100", :font_size => "10", :top_border_color => "blue"
+    end
+    
+    child = root.children[0]
+    child.style.width.should == "100"
+    child.style.font_size.should == "10"
+    child.style.top_border_color.should == "blue"
+  end
+  
+  it "should allow defining events through constructor" do
+    root = Limelight::build_scene(@options) do
+      child :on_mouse_entered => "return [self, event]"
+    end  
+    
+    child = root.children[0]
+    child.mouse_entered("blah").should == [child, "blah"]
+  end
+  
+  it "should allow scene configuration" do
+    root = Limelight::build_scene(@options) do
+      __ :name => "root", :id => "123"
+    end
+    
+    root.children.size.should == 0
+    root.name.should == "root"
+    root.id.should == "123"
+  end
+  
+  it "should give every prop their scene" do
+    root = Limelight::build_scene(@options) do
+      child do
+        grandchild
+      end
+    end
+    
+    root.scene.should == root
+    root.children[0].scene.should == root
+    root.children[0].children[0].scene.should == root
+  end
+
+  it "should install external props" do
+    loader = make_mock("loader", :exists? => true)
+    loader.should_receive(:load).with("external.rb").and_return("child :id => 123")
+    
+    root = Limelight::build_scene(:id => 321, :build_loader => loader, :casting_director => @caster) do
+      __install "external.rb"
+    end  
+    
+    root.id.should == 321
+    root.children.size.should == 1
+    child = root.children[0]
+    child.name.should == "child"
+    child.id.should == 123
+  end
+  
+  it "should fail if no loader is provided" do
+    begin
+      root = Limelight::build_scene(@options.merge(:id => 321, :build_loader => nil)) do
+        __install "external.rb"
+      end
+      root.should == nil # should never get here
+    rescue Exception => e
+      e.message.should == "Cannot install external props because no loader was provided"
+    end
+  end
+  
+  it "should fail when the external file doesn't exist" do
+    loader = make_mock("loader")
+    loader.should_receive(:exists?).with("external.rb").and_return(false)
+    
+    begin
+      root = Limelight::build_scene(@options.merge(:id => 321, :build_loader => loader)) do
+        __install "external.rb"
+      end
+    rescue Exception => e
+      e.message.should == "External prop file: 'external.rb' doesn't exist"
+    end
+  end
+  
+  it "should fail with PropException when there's problem in the external file" do
+    loader = make_mock("loader", :exists? => true)
+    loader.should_receive(:load).with("external.rb").and_return("+")
+    
+    begin
+      root = Limelight::build_scene(@options.merge(:id => 321, :build_loader => loader)) do
+        __install "external.rb"
+      end  
+    rescue Limelight::BuildException => e
+      e.message.should include("external.rb:1: (eval):1: , unexpected end-of-file")
+    end
+  end
+  
+  it "should build onto an existing block" do
+    prop = Limelight::Prop.new
+    prop.set_scene(Limelight::Scene.new(:casting_director => make_mock(:casting_director, :fill_cast => nil)))
+    builder = Limelight::PropBuilder.new(prop)
+    block = Proc.new { one; two { three } }
+    builder.instance_eval(&block)
+    
+    prop.children.length.should == 2
+    prop.children[0].name.should == "one"
+    prop.children[1].name.should == "two"
+    prop.children[1].children.length.should == 1
+    prop.children[1].children[0].name.should == "three"
+  end
+  
+end

data/spec/prop_spec.rb

@@ -0,0 +1,216 @@
+#- Copyright 2008 8th Light, Inc.
+#- Limelight and all included source files are distributed under terms of the GNU LGPL.
+
+require File.expand_path(File.dirname(__FILE__) + "/spec_helper")
+require 'limelight/prop'
+require 'limelight/styles_builder'
+require 'limelight/scene'
+
+describe Limelight::Prop do
+
+  before(:each) do
+    @casting_director = make_mock("casting_director", :fill_cast => nil)
+    @scene = Limelight::Scene.new(:casting_director => @casting_director)
+    @prop = Limelight::Prop.new(:id => "root", :name => "root_class")
+    @scene << @prop
+  end
+  
+  it "should extend added controllers and invoke the extended hook" do
+    module TestController
+      class << self
+        attr_reader :extended_prop
+        def extended(prop)
+          @extended_prop = (prop)
+        end
+      end
+      
+      def test_method
+      end
+    end
+    
+    @prop.add_controller(TestController)
+    
+    TestController.extended_prop.should == @prop
+    @prop.respond_to?(:test_method).should == true
+  end
+  
+  it "should have an id" do
+    @prop.id.should == "root"
+  end
+  
+  def build_prop_tree
+    @child1 = Limelight::Prop.new(:id => "child1", :name => "child_class")
+    @child2 = Limelight::Prop.new(:id => "child2", :name => "child_class")
+    @grand_child1 = Limelight::Prop.new(:id => "grand_child1", :name => "grand_child_class")
+    @grand_child2 = Limelight::Prop.new(:id => "grand_child2", :name => "grand_child_class")
+    @grand_child3 = Limelight::Prop.new(:id => "grand_child3", :name => "grand_child_class")
+    @grand_child4 = Limelight::Prop.new(:id => "grand_child4", :name => "grand_child_class")
+    
+    @prop << @child1 << @child2
+    @child1 << @grand_child1 << @grand_child2
+    @child2 << @grand_child3 << @grand_child4
+  end
+  
+  it "should find children by id" do
+    build_prop_tree
+    @prop.find("blah").should == nil
+    @prop.find("root").should be(@prop)
+    @prop.find("child1").should be(@child1)
+    @prop.find("child2").should be(@child2)
+    @prop.find("grand_child1").should be(@grand_child1)
+    @prop.find("grand_child2").should be(@grand_child2)
+    @prop.find("grand_child3").should be(@grand_child3)
+    @prop.find("grand_child4").should be(@grand_child4)
+  end
+  
+  it "should find children by name" do
+    build_prop_tree
+    @prop.find_by_name("root_class").should == [@prop]
+    @prop.find_by_name("child_class").should == [@child1, @child2]
+    @prop.find_by_name("grand_child_class").should == [@grand_child1, @grand_child2, @grand_child3, @grand_child4]
+  end
+  
+  it "should get and set text" do
+    @prop.text = "blah"
+    @prop.text.should == "blah"
+  end
+  
+  it "should have controllers" do
+    prop = Limelight::Prop.new(:players => "abc, xyz")
+    @scene << prop
+    prop.players.should == "abc, xyz"
+  end
+  
+  it "should get populated through constructor" do
+    prop = Limelight::Prop.new(:name => "my_name", :id => "123", :players => "a, b, c")
+    @scene << prop
+    
+    prop.name.should == "my_name"
+    prop.id.should == "123"
+  end
+  
+  it "should populate styles through constructor" do
+    prop = Limelight::Prop.new(:width => "100", :text_color => "white", :background_image => "apple.jpg")
+    @scene << prop
+    
+    prop.style.width.should == "100"
+    prop.style.text_color.should == "white"
+    prop.style.background_image.should == "apple.jpg"
+  end
+  
+  it "should define event through constructor using a string" do
+    prop = Limelight::Prop.new(:on_mouse_entered => "return event")
+    @scene << prop
+    
+    value = prop.mouse_entered("my event")
+    
+    value.should == "my event"
+  end
+  
+  it "should pass scene on to children" do
+    child = Limelight::Prop.new(:name => "child")
+    
+    @prop.parent.should == @scene
+    @prop.scene.should == @scene
+    
+    @prop << child
+    child.parent.should == @prop
+    child.scene.should == @scene
+  end
+  
+  it "should set styles upon adding to parent" do
+    styles = Limelight::build_styles { child { width 123 } }
+    scene = Limelight::Scene.new(:casting_director => @casting_director, :styles => styles)
+    prop = Limelight::Prop.new(:name => "child")
+    
+    scene << prop
+    
+    prop.style.width.should == "123"
+  end
+  
+  it "should set styles upon adding to parent" do
+    prop = Limelight::Prop.new(:name => "child")
+    
+    @casting_director.should_receive(:fill_cast).with(prop)
+    
+    @scene << prop
+  end
+  
+  it "should use populate data included by players" do
+    prop = Limelight::Prop.new(:name => "child", :foo => "bar")
+    @casting_director.should_receive(:fill_cast).with(prop) do
+      prop.instance_eval "def foo=(value); @foo = value; end; def foo; return @foo; end;"
+    end
+    
+    @scene << prop
+    
+    prop.foo.should == "bar"
+  end
+  
+  it "should be able to remove children" do
+    child1 = Limelight::Prop.new()
+    child2 = Limelight::Prop.new()
+    child3 = Limelight::Prop.new()
+    @prop << child1 << child2 << child3
+    
+    @prop.remove(child2)
+    
+    @prop.children.length.should == 2
+    @prop.children.should_not include(child2)
+    @prop.panel.components.length.should == 2
+    @prop.panel.components.should_not include(child2.panel)
+  end
+  
+  it "should make dimensions accessible" do
+    @prop.panel.should_receive(:get_rectangle).and_return("whole area")
+    @prop.panel.should_receive(:get_rectangle_inside_borders).and_return("area inside borders")
+    
+    @prop.area.should == "whole area"
+    @prop.bordered_area.should == "area inside borders"
+  end
+  
+  it "should give you a pen" do
+    graphics = make_mock("graphics", :setColor => nil, :setStroke => nil, :setRenderingHint => nil)
+    @prop.panel.should_receive(:getGraphics).and_return(graphics)
+    
+    pen = @prop.pen
+    
+    pen.context.should be(graphics)
+  end
+  
+  it "should set after paint action" do
+    block = Proc.new { |pen| }
+    
+    @prop.after_painting &block
+    
+    action = @prop.panel.after_paint_action
+    action.should_not == nil
+    action.class.should == Limelight::PaintAction
+    action.block.should == block
+  end
+  
+  it "should clear after paint action" do
+    @prop.after_painting { |pen| puts "blah" }
+    
+    @prop.after_painting nil
+    
+    @prop.panel.after_paint_action.should == nil
+  end
+  
+  it "should build children" do
+    @prop.build do
+      one
+      two do
+        three
+      end
+    end
+    
+    @prop.children.length.should == 2
+    @prop.children[0].name.should == "one"
+    @prop.children[1].name.should == "two"
+    @prop.children[1].children.length.should == 1
+    @prop.children[1].children[0].name.should == "three"
+  end
+  
+end
+

data/spec/scene_spec.rb

@@ -0,0 +1,34 @@
+#- Copyright 2008 8th Light, Inc.
+#- Limelight and all included source files are distributed under terms of the GNU LGPL.
+
+require File.expand_path(File.dirname(__FILE__) + "/spec_helper")
+require 'limelight/scene'
+
+describe Limelight::Scene do
+
+  before(:each) do
+    @casting_director = make_mock("casting_director", :fill_cast => nil)
+    @scene = Limelight::Scene.new(:casting_director => @casting_director)
+  end
+  
+  it "should have a styles hash" do
+    @scene.styles.should_not == nil
+    @scene.styles.size.should == 0
+  end
+
+  it "should have a button group cache" do
+    @scene.button_groups.should_not == nil
+    @scene.button_groups.class.should == Java::limelight.ui.ButtonGroupCache
+  end
+  
+  it "should pullout sytles and casting_director from options" do
+    scene = Limelight::Scene.new(:styles => "styles", :casting_director => @casting_director)
+    
+    scene.styles.should == "styles"
+    scene.casting_director.should == @casting_director
+  end
+
+  it "should have opened event" do
+    @scene.should respond_to(:scene_opened)
+  end
+end

data/spec/spec_helper.rb

@@ -0,0 +1,18 @@
+#- Copyright 2008 8th Light, Inc.
+#- Limelight and all included source files are distributed under terms of the GNU LGPL.
+
+require File.expand_path(File.dirname(__FILE__) + "/../lib/init")
+
+require 'spec'
+
+def make_mock(name, stubs = {})
+  the_mock = mock(name)
+  the_mock.stubs!(stubs)
+  return the_mock
+end
+
+class Object
+  def stubs!(stubs = {})
+    stubs.each_pair { |key, value| self.stub!(key).and_return(value) }
+  end
+end

data/spec/stage_builder_spec.rb

@@ -0,0 +1,90 @@
+#- Copyright 2008 8th Light, Inc.
+#- Limelight and all included source files are distributed under terms of the GNU LGPL.
+
+require File.expand_path(File.dirname(__FILE__) + "/spec_helper")
+require 'limelight/stage_builder'
+require 'limelight/theater'
+
+describe Limelight::StageBuilder do
+  
+  before(:each) do
+    @theater = Limelight::Theater.new
+  end
+
+  it "should give no stages if empty" do
+    stages = Limelight::build_stages(@theater)
+    
+    stages.should == []
+  end
+  
+  it "should build one stage" do
+    stages = Limelight::build_stages(@theater) do
+      stage "George"
+    end
+    
+    stages.length.should == 1
+    stages[0].name.should == "George"
+  end
+  
+  it "should build multiple stages" do
+    stages = Limelight::build_stages(@theater) do
+      stage "George"
+      stage "Bill"
+      stage "Amy"
+    end
+    
+    stages.length.should == 3
+    stages[0].name.should == "George"
+    stages[1].name.should == "Bill"
+    stages[2].name.should == "Amy"
+  end
+  
+  it "should allow the setting of stage properties" do
+    stages = Limelight::build_stages(@theater) do
+      stage "George" do
+        title "The Curious"
+      end
+    end
+    
+    stages.length.should == 1
+    stages[0].title.should == "The Curious"
+  end
+  
+  it "should raise an exception when setting an invalid property" do
+    lambda do
+        Limelight::build_stages(@theater) do
+        stage "George" do
+          blah "blah"
+        end
+      end
+    end.should raise_error(Limelight::StageBuilderException, "'blah' is not a valid stage property")
+  end
+
+  it "should add stages to the theater" do
+    stages = Limelight::build_stages(@theater) do
+      stage "George" do
+        title "The Curious"
+      end
+    end
+    
+    @theater["George"].should == stages[0]
+  end
+
+  it "should add stages to the theater" do
+    stages = Limelight::build_stages(@theater) do
+      stage "George" do
+        title "The Curious"
+      end
+    end
+    stages = Limelight::build_stages(@theater) do
+      stage "George" do
+        title "The Monkey"
+      end
+    end
+    
+    @theater.stages.length.should == 1
+    @theater["George"].title.should == "The Monkey"
+  end
+  
+end
+

data/spec/stage_spec.rb

@@ -0,0 +1,57 @@
+#- Copyright 2008 8th Light, Inc.
+#- Limelight and all included source files are distributed under terms of the GNU LGPL.
+
+require File.expand_path(File.dirname(__FILE__) + "/spec_helper")
+require 'limelight/stage'
+
+describe Limelight::Stage do
+
+  before(:each) do
+    @theater = make_mock("theater")
+    @stage = Limelight::Stage.new(@theater, "George")
+  end
+  
+  it "should have a name" do
+    stage = Limelight::Stage.new(@theater, "Jose")
+    stage.theater.should be(@theater)
+    stage.name.should == "Jose"
+  end
+  
+  it "should have a title which default to it's name" do
+    @stage.title.should == "George"
+    
+    @stage.title = "Once Upon a Test"
+    
+    @stage.title.should == "Once Upon a Test"
+  end
+  
+  it "should have size" do
+    @stage.size.should == [800, 800]
+    
+    @stage.size = 123, 456
+    
+    @stage.size.should == [123, 456]
+  end
+  
+  it "should have size" do
+    @stage.location.should == [200, 25]
+    
+    @stage.location = 123, 456
+    
+    @stage.location.should == [123, 456]
+  end
+  
+  it "should not allow name changes" do
+    lambda { @stage.name = "new name" }.should raise_error
+  end
+
+  it "should call scene.scene_opened at the end of opening a scene" do
+    scene = make_mock("scene", :visible= => nil)
+    scene.should_receive(:scene_opened)
+
+    @stage.frame.stub!(:open)
+    @stage.stub!(:load_scene)
+    @stage.open(scene)
+  end
+
+end