orange-core 0.5.3

data/spec/orange-core/core_spec.rb

@@ -0,0 +1,248 @@
+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 two events by default" do
+    c= Orange::Core.new
+    c.events.should have(2).events
+    c.events.should have_key(:stack_reloading)
+    c.events.should have_key(:stack_loaded)
+  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-core$/)
+    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-core$/)
+    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 return assigned app_dir with extra path if args passed" do
+    c= Orange::Core.new
+    c.options[:app_dir] = "/non/existent/dir"
+    c.app_dir('foo', 'bar').should_not == c.app_dir
+    c.app_dir('foo', 'bar').should == "/non/existent/dir/foo/bar"
+  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.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.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
+  
+  it "should have option to silently ignore resource calls" do
+    c= Orange::Core.new
+    lambda {
+      c[:mock].test
+    }.should raise_error
+    lambda {
+      c[:mock, true].test
+    }.should_not raise_error
+  end
+end

data/spec/orange-core/magick_spec.rb

@@ -0,0 +1,96 @@
+require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
+
+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::Ignore do
+  it "should silently accept method" do
+    o = Orange::Ignore.new 
+    lambda {
+      o.banana
+      o.args
+      o.foo.bar('banana').baz
+    }.should_not raise_error
+  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

data/spec/orange-core/middleware/base_spec.rb

@@ -0,0 +1,38 @@
+describe Orange::Middleware::Base do
+  it "should call init after initializing" do
+    lambda{
+      mid = MockOrangeDeathMiddleware.new(nil, Orange::Core.new, :foo => 'bar')
+    }.should raise_error(RuntimeError, "middleware_init with foo=bar")
+  end
+  
+  it "should create a packet and call packet call" do
+    mid = MockOrangeBasedMiddlewareTwo.new(nil, Orange::Core.new)
+    mid.should_receive(:packet_call).with(an_instance_of(Orange::Packet))
+    mid.call({})
+  end
+  
+  it "should pass the packet on by default for packet_call" do
+    mid = MockOrangeBasedMiddlewareTwo.new(nil, Orange::Core.new)
+    mid.should_receive(:pass).with(an_instance_of(Orange::Packet))
+    mid.packet_call(empty_packet)
+  end
+  
+  it "should call the downstream app on pass" do
+    app = mock("downstream")
+    app2 = mock("downstream_orange")
+    my_hash = {:foo => :bar}
+    app.should_receive(:call).with(my_hash).and_return([{},200,[]])
+    app2.should_receive(:packet_call).with(an_instance_of(Orange::Packet))
+    mid = MockOrangeBasedMiddlewareTwo.new(app, Orange::Core.new)
+    mid2 = MockOrangeBasedMiddlewareTwo.new(app2, Orange::Core.new)
+    mid.call(my_hash)
+    mid2.call(my_hash)
+  end
+  
+  it "should give access to the orange core on calling orange" do
+    c = Orange::Core.new
+    mid = MockOrangeBasedMiddlewareTwo.new(nil, c)
+    mid.orange.should equal c
+  end
+
+end

data/spec/orange-core/middleware/globals_spec.rb

@@ -0,0 +1,3 @@
+describe Orange::Middleware::Globals do
+  it "should be spec'ed"
+end

data/spec/orange-core/middleware/rerouter_spec.rb

@@ -0,0 +1,3 @@
+describe Orange::Middleware::Rerouter do
+  it "should be spec'ed"
+end

data/spec/orange-core/middleware/restful_router_spec.rb

@@ -0,0 +1,3 @@
+describe Orange::Middleware::RestfulRouter do
+  it "should be spec'ed"
+end

data/spec/orange-core/middleware/route_context_spec.rb

@@ -0,0 +1,3 @@
+describe Orange::Middleware::RouteContext do
+  it "should be spec'ed"
+end

data/spec/orange-core/middleware/route_site_spec.rb

@@ -0,0 +1,3 @@
+describe Orange::Middleware::RouteSite do
+  it "should be spec'ed"
+end

data/spec/orange-core/middleware/show_exceptions_spec.rb

@@ -0,0 +1,3 @@
+describe Orange::Middleware::ShowExceptions do
+  it "should be spec'ed"
+end

data/spec/orange-core/middleware/static_file_spec.rb

@@ -0,0 +1,3 @@
+describe Orange::Middleware::StaticFile do
+  it "should be spec'ed"
+end

data/spec/orange-core/middleware/static_spec.rb

@@ -0,0 +1,3 @@
+describe Orange::Middleware::Static do
+  it "should be spec'ed"
+end

data/spec/orange-core/mock/mock_app.rb

@@ -0,0 +1,16 @@
+require 'rubygems'
+require 'rack/abstract_format'
+
+class MockApplication < Orange::Application
+  
+end
+
+class MockApplication2 < Orange::Application
+  
+end
+
+class MockExitware
+  def call(env)
+    raise 'Mock Exitware'
+  end
+end

data/spec/orange-core/mock/mock_carton.rb

@@ -0,0 +1,43 @@
+class MockCarton < Orange::Carton
+  def self.scaffold_properties
+    @scaffold_properties
+  end
+  id
+  admin do
+    text :admin
+  end
+  orange do
+    text :orange
+  end
+  front do
+    text :front
+  end
+end
+
+class MockCartonTwo < Orange::Carton
+  id
+  def self.get(id)
+    'mock_get'
+  end
+  def self.all
+    'mock_all'
+  end
+  def save
+    raise 'mock_save'
+  end
+  def destroy!
+    raise 'mock_destroy'
+  end
+  def update(*args)
+    raise 'mock_update'
+  end
+end
+
+class MockCartonBlank < Orange::Carton
+  def self.levels
+    @levels
+  end
+end
+
+class MockCartonBlankTwo < Orange::Carton
+end