orange 0.0.2

data/spec/application_spec.rb

@@ -0,0 +1,146 @@
+require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
+
+describe Orange::Application do
+  before(:all) do
+    class MockApplication
+      set :banana, 'foo'
+      attr_accessor :quux, :wibble
+      def init
+        opts[:init] = true
+        @quux = true
+      end
+      def stack_init
+        opts[:stack_init] = true
+        @wibble = true
+      end
+    end
+  end
+  
+  def app
+    MockApplication.app
+  end
+  
+  it "should be a subclass of Orange::Application" do
+    MockApplication.new(Orange::Core.new).should be_a_kind_of(Orange::Application)
+  end
+  
+  it "should have a stack method" do
+    MockApplication.should respond_to(:stack)
+  end
+  
+  it "should have a different app stack after using stack method" do
+    lambda {
+      MockApplication.stack do
+      end
+    }.should change(MockApplication, :app)
+  end
+
+  it "should respond to the app method" do
+    MockApplication.should respond_to(:app)
+  end
+  
+  it "should return an Orange::Stack with the app method" do
+    MockApplication.stack do
+    end
+    MockApplication.app.should be_an_instance_of(Orange::Stack)
+  end
+  
+  it "should be able to set options" do
+    MockApplication.set(:test4, Time.now.to_f-5)
+    opts_test4 = MockApplication.opts[:test4]
+    MockApplication.set(:test4, Time.now.to_f)
+    MockApplication.opts[:test4].should_not == opts_test4
+    MockApplication.opts[:banana].should == 'foo'
+  end
+  
+  it "should be able to accept instance option setting" do
+    x= MockApplication.new(Orange::Core.new, {:test => 'go'}){
+      baz 'bar'
+    }
+    x.opts.should have_key(:baz)
+    x.opts.should have_key(:banana)
+    x.opts[:baz].should == 'bar'
+    x.opts[:test].should == 'go'
+  end
+  
+  it "should override class variables with instance ones" do
+    x= MockApplication.new(Orange::Core.new)
+    y= MockApplication.new(Orange::Core.new){
+      banana 'bar'
+    }
+    x.opts.should have_key(:banana)
+    y.opts.should have_key(:banana)
+    x.opts[:banana].should == 'foo'
+    y.opts[:banana].should == 'bar'
+    x.opts[:banana].should_not == y.opts[:banana]
+  end
+  
+  it "should be able to access options via #opts" do
+    x= MockApplication.new(Orange::Core.new){
+      baz 'bar'
+    }
+    x.opts.should be_an_instance_of(Hash)
+    x.opts.should respond_to(:[])
+    x.opts.should have_key(:baz)
+    x.opts[:baz].should == 'bar'
+  end
+  
+  it "should call init after being initialized" do
+    x=MockApplication.new(Orange::Core.new){
+      init false
+    }
+    x.opts[:init].should be_true
+    x.quux.should be_true
+  end
+  
+  it "should call stack_init after stack loaded" do
+    c = Orange::Core.new
+    app = MockApplication.new(c){
+      stack_init false
+    }
+    c.fire(:stack_loaded, false) # Falsify the stack_load call
+    app.opts[:stack_init].should be_true
+    app.wibble.should be_true
+  end
+  
+  it "should raise a default error if route isn't redefined" do
+    x= MockApplication.new(Orange::Core.new)
+    lambda{ 
+      x.route(Orange::Packet.new(x.orange, {})) 
+    }.should raise_error(Exception, 'default response from Orange::Application.route')
+  end
+  
+  it "should return the orange core on #orange" do
+    c = Orange::Core.new
+    x= MockApplication.new(c)
+    x.orange.should eql(c)
+  end
+  
+  it "should change the core on #set_core(orange_core)" do
+    c1 = Orange::Core.new
+    c2 = Orange::Core.new
+    x= MockApplication.new(c1)
+    c1.should_not eql(c2)
+    lambda {
+      x.set_core(c2)
+    }.should change(x, :orange)
+  end
+  
+  it "should respond correctly to call" do
+    x= MockApplication.new(Orange::Core.new)
+    lambda{
+      x.call({})
+    }.should raise_error(Exception, 'default response from Orange::Application.route')
+    r = TestRouter.new
+    lambda{
+      x.call({'orange.env' => {'route.router' => r}})
+    }.should change(r, :x)
+  end
+  
+  it "should auto initialize the self.opts" do
+    lambda{
+      MockApplication2.opts
+    }.should_not raise_error
+  end
+    
+end

data/spec/carton_spec.rb

@@ -0,0 +1,5 @@
+require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
+
+describe Orange::Carton do
+  it "should be spec'ed"
+end

data/spec/core_spec.rb

@@ -0,0 +1,231 @@
+require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
+
+describe Orange::Core do
+  before(:all) do
+    class Orange::Core; attr_reader :resources, :events, :file; end;
+  end
+  
+  it "should allow core mixin via class mixin method" do
+    c= Orange::Core.new
+    c.should_not respond_to(:mixin_core_one)
+    Orange::Core.mixin MockMixinCore1
+    c2= Orange::Core.new
+    c.should respond_to(:mixin_core_one)
+    c2.should respond_to(:mixin_core_one)
+  end
+  
+  it "should allow pulp mixin via class pulp method" do
+    c= Orange::Core.new
+    p= Orange::Packet.new(c, {})
+    p.should_not respond_to(:pulp_core_one)
+    Orange::Core.add_pulp MockPulpCore1
+    p2= Orange::Packet.new(c, {})
+    p.should respond_to(:pulp_core_one)
+    p2.should respond_to(:pulp_core_one)
+  end
+  
+  it "should allow core mixin via instance mixin method" do
+    c= Orange::Core.new
+    c.should_not respond_to(:mixin_core_two)
+    c.mixin MockMixinCore2
+    c2= Orange::Core.new
+    c.should respond_to(:mixin_core_two)
+    c2.should respond_to(:mixin_core_two)
+  end
+  
+  it "should allow pulp mixin via instance pulp method" do
+    c= Orange::Core.new
+    p= Orange::Packet.new(c, {})
+    p.should_not respond_to(:pulp_core_two)
+    c.add_pulp MockPulpCore2
+    p2= Orange::Packet.new(c, {})
+    p.should respond_to(:pulp_core_two)
+    p2.should respond_to(:pulp_core_two)
+  end
+  
+  it "should have three contexts by default" do
+    Orange::Core::DEFAULT_CORE_OPTIONS.should have_key(:contexts)
+    Orange::Core::DEFAULT_CORE_OPTIONS[:contexts].should have(3).items
+  end
+  
+  it "should default to live context" do
+    Orange::Core::DEFAULT_CORE_OPTIONS.should have_key(:default_context)
+    Orange::Core::DEFAULT_CORE_OPTIONS[:default_context].should == :live
+  end
+  
+  it "should load at least two resources by default" do
+    c= Orange::Core.new
+    c.resources.size.should >= 2
+    c.loaded?(:mapper).should be_true
+    c.loaded?(:parser).should be_true
+  end
+  
+  it "should have no events by default" do
+    c= Orange::Core.new
+    c.events.should have(0).events
+  end
+  
+  it "should return a directory that contains core.rb when calling core_dir" do
+    c= Orange::Core.new
+    c.core_dir.should match(/orange$/)
+    File.should exist(File.join(c.core_dir, 'core.rb'))
+    File.should exist(File.join(c.core_dir, 'stack.rb'))
+    File.should exist(File.join(c.core_dir, 'application.rb'))
+    File.should exist(File.join(c.core_dir, 'carton.rb'))
+    File.should exist(File.join(c.core_dir, 'views'))
+    File.should exist(File.join(c.core_dir, 'templates'))
+    File.should exist(File.join(c.core_dir, 'assets'))
+  end
+  
+  it "should return the directory of the super class when calling core_dir on subclass" do
+    c= MockCoreSubclass.new
+    c.core_dir.should match(/orange$/)
+    File.should exist(File.join(c.core_dir, 'core.rb'))
+    File.should exist(File.join(c.core_dir, 'stack.rb'))
+    File.should exist(File.join(c.core_dir, 'application.rb'))
+    File.should exist(File.join(c.core_dir, 'carton.rb'))
+    File.should exist(File.join(c.core_dir, 'views'))
+    File.should exist(File.join(c.core_dir, 'templates'))
+    File.should exist(File.join(c.core_dir, 'assets'))
+  end
+  
+  it "should call afterLoad after init" do
+    c1= MockCoreSubclass.new
+    class MockCoreSubclass
+      def afterLoad
+        options[:called_afterload_for_subclass] = true
+      end
+    end
+    c2= MockCoreSubclass.new
+    c1.options[:called_afterload_for_subclass].should_not == c2.options[:called_afterload_for_subclass]
+    c1.options.should_not have_key(:called_afterload_for_subclass)
+    c2.options.should have_key(:called_afterload_for_subclass)
+    c2.options[:called_afterload_for_subclass].should be_true
+  end
+  
+  it "should allow changing of default core_dir" do
+    c= Orange::Core.new
+    c.options[:core_dir] = "/non/existent/dir"
+    c.core_dir.should_not == File.dirname(c.file)
+    c.core_dir.should == "/non/existent/dir"
+    File.should exist(File.join(File.dirname(c.file), 'core.rb'))
+  end
+  
+  it "should return Dir.pwd for app_dir by default" do
+    Orange::Core.new.app_dir.should == Dir.pwd
+  end
+  
+  it "should return assigned app_dir if option set" do
+    c= Orange::Core.new
+    c.options[:app_dir] = "/non/existent/dir"
+    c.app_dir.should_not == Dir.pwd
+    c.app_dir.should == "/non/existent/dir"
+  end
+  
+  it "should allow options" do
+    c= Orange::Core.new(:opt_1 => true){ opt_2 true }
+    c.options[:opt_1].should == true
+    c.options[:opt_2].should == true
+    c.options.should have_key(:opt_1)
+    c.options.should_not have_key(:opt_3)
+  end
+  
+  it "should load a resource when passed resource instance" do
+    c= Orange::Core.new
+    c.load(MockResource.new, :mock_one)
+    c.resources.should have_key(:mock_one)
+    c.resources[:mock_one].should be_an_instance_of(MockResource)
+    
+  end
+  
+  it "should default to lowercase resource name to symbol as resource short name" do
+    c= Orange::Core.new
+    c.load(MockResource.new)
+    sym = MockResource.to_s.gsub(/::/, '_').downcase.to_sym
+    c.resources.should have_key(sym)
+    c.should be_loaded(sym)
+  end
+  
+  it "should say a resource is loaded after calling load for resource" do
+    c= Orange::Core.new
+    c.load(MockResource.new, :mock_one)
+    c.should be_loaded(:mock_one)
+    c.resources.should have_key(:mock_one)
+  end
+  
+  it "should return self on orange" do
+    c= Orange::Core.new
+    c.orange.should eql(c)
+  end
+  
+  it "should add event to events list when register called" do
+    c= Orange::Core.new
+    c.events.should be_empty
+    c.register(:mock_event) {|x| x }
+    c.events.should_not be_empty
+    c.events.should have_key(:mock_event)
+    c.events[:mock_event].should be_an_instance_of(Array)
+    c.events[:mock_event].should have(1).callback
+    c.register(:mock_event) {|x| x }
+    c.events[:mock_event].should have(2).callbacks
+  end
+  
+  it "should add events in specified order when registered with position" do
+    c= Orange::Core.new
+    c.events.should be_empty
+    c.register(:mock_event, 5) {|x| '5' }
+    c.events.should_not be_empty
+    c.events.should have_key(:mock_event)
+    c.events[:mock_event].compact.should have(1).callback
+    5.times{ |i| c.events[:mock_event][i].should be_nil }
+    c.register(:mock_event, 2) {|x| '2' }
+    c.events[:mock_event].compact.should have(2).callbacks
+    c.events[:mock_event][2].call(nil).should eql '2'
+    c.events[:mock_event][6].call(nil).should eql '5'
+    c.events[:mock_event].compact.first.call(nil).should eql '2'
+    c.events[:mock_event].compact.last.call(nil).should eql '5'
+    c.register(:mock_event, 5) {|x| '5.2' }
+    c.events[:mock_event].compact.should have(3).callbacks
+    c.events[:mock_event][2].call(nil).should eql '2'
+    c.events[:mock_event][5].call(nil).should eql '5.2'
+    c.events[:mock_event][7].call(nil).should eql '5'
+    c.events[:mock_event].compact.first.call(nil).should eql '2'
+    c.events[:mock_event].compact.last.call(nil).should eql '5'
+  end
+  
+  it "should fire registered events when fire called" do
+    class OtherMockCore < Orange::Core 
+      attr_accessor :mock_counter
+      def afterLoad
+        @mock_counter = 0
+      end
+    end
+    c= OtherMockCore.new
+    c.mock_counter.should == 0
+    c.register(:mock_event) {|i| c.mock_counter += i }
+    c.register(:mock_event_two) {|i| c.mock_counter -= i }
+    c.mock_counter.should == 0
+    c.fire(:mock_event, 3)
+    c.mock_counter.should_not == 0
+    c.mock_counter.should == 3
+    c.fire(:mock_event_two, 2)
+    c.mock_counter.should_not == 0
+    c.mock_counter.should == 1
+    c.register(:mock_event) {|i| c.mock_counter += i }
+    c.fire(:mock_event, 3)
+    c.mock_counter.should_not == 1
+    c.mock_counter.should == 7
+  end
+  
+  it "should have an options hash" do
+    Orange::Core.new.options.should be_an_instance_of(Hash)
+  end
+  
+  it "should allow access to the resources via []" do
+    c= Orange::Core.new
+    c.load(MockResource.new, :mock)
+    c[:mock].should be_an_instance_of(MockResource)
+    c[:mock].should be_an_kind_of(Orange::Resource)
+    c[:mock].mock_method.should eql 'MockResource#mock_method'
+  end
+end

data/spec/magick_spec.rb

@@ -0,0 +1,89 @@
+require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
+
+describe "Black::Magick" do
+  it "should be spec'ed"
+end
+
+describe Orange::DefaultHash do
+  it "should be a kind of Hash" do
+    Orange::DefaultHash.new.should be_a_kind_of Hash
+  end
+  it "should handle setting default" do
+    x = Orange::DefaultHash.new
+    y = Orange::DefaultHash.new
+    x.default = true
+    y.default = false
+    x[:not_there].should be_true
+    y[:not_there].should be_false
+  end
+  
+  it "should handle default in key access []" do
+    x = Orange::DefaultHash.new
+    x.default = 'baz'
+    x[:not_there].should == 'baz'
+    x[:not_there, 'bar'].should == 'bar'
+  end
+end
+
+describe "Orange::Options" do
+  it "should give a hash on hash" do
+    Orange::Options.new.hash.should be_an_instance_of(Hash)
+  end
+  
+  it "should accept hash key options" do
+    hash1 = Orange::Options.new(:one => '1', :two => ['foo']).hash
+    hash2 = Orange::Options.new(:one => '1').hash
+    hash3 = Orange::Options.new({:one => '1', :two => ['foo']}).hash
+    hash4 = Orange::Options.new({:one => '1'}).hash
+    hash5 = Orange::Options.new(1,2, {:one => '1', :two => ['foo']}).hash
+    hash6 = Orange::Options.new(1,2, {:one => '1'}).hash
+    [hash2, hash4, hash6].each{ |hash|
+      hash.should have_key(:one)
+      hash.should_not have_key(:three)
+      hash[:one].should == '1'
+    }
+    [hash1, hash3, hash5].each{ |hash|
+      hash.should have_key(:one)
+      hash.should have_key(:two)
+      hash.should_not have_key(:three)
+      hash[:one].should == '1'
+      hash[:two].should == ['foo']
+    }
+  end
+  
+  it "should accept block options" do
+    hash = Orange::Options.new {
+      one '1'
+      two ['foo']
+    }.hash
+    hash.should have_key(:one)
+    hash.should have_key(:two)
+    hash.should_not have_key(:three)
+    hash[:one].should == '1'
+    hash[:two].should == ['foo']
+  end
+  
+  it "should accept both kinds of options" do
+    hash = Orange::Options.new(:one => '1'){
+      two ['foo']
+    }.hash
+    
+    hash.should have_key(:one)
+    hash.should have_key(:two)
+    hash.should_not have_key(:three)
+    hash[:one].should == '1'
+    hash[:two].should == ['foo']
+  end
+  
+  it "should override hash key options with block options" do
+    hash = Orange::Options.new(:one => '1', :two => [:baz]){
+      two ['foo']
+    }.hash
+    
+    hash.should have_key(:one)
+    hash.should have_key(:two)
+    hash.should_not have_key(:three)
+    hash[:one].should == '1'
+    hash[:two].should == ['foo']
+  end
+end