doodle 0.0.1

data/spec/flatten_first_level_spec.rb

@@ -0,0 +1,36 @@
+$:.unshift(File.join(File.dirname(__FILE__), '../.'))
+
+require 'lib/doodle'
+
+describe 'flatten_first_level' do
+
+  before :each do
+    @data = [
+      [1, 2, 3],
+      [1, [2], 3],
+      [[1, 2, 3]],
+      [1, [2, 3]],
+      [[1, 2], 3],
+      [[1, [2], 3]],
+      [1, [[2], 3]],
+      [1, [[2, 3]]],
+      ]
+    @results = [
+      [1, 2, 3],
+      [1, 2, 3],
+      [1, 2, 3],
+      [1, 2, 3],
+      [1, 2, 3],
+      [1, [2], 3],
+      [1, [2], 3],
+      [1, [2, 3]],
+      ]
+  end
+
+  it 'should flatten first level' do
+    @data.zip(@results).each do |input, result|
+      Doodle::Utils.flatten_first_level(input).should == result
+    end
+  end
+
+end

data/spec/required_spec.rb

@@ -0,0 +1,25 @@
+$:.unshift(File.join(File.dirname(__FILE__), '../.'))
+
+require 'lib/spec_helper'
+require 'date'
+
+describe Doodle, 'defaults which have not been set' do
+  after :each do
+    undefine_const(:Foo)
+  end
+  before :each do
+    raise_if_defined :Foo
+
+    class Foo < Doodle::Base
+      has :baz
+      has :start do
+        default { Date.today }
+      end
+    end
+  end
+
+  it 'should have raise error if required value not set' do
+    proc { Foo.new }.should raise_error(ArgumentError)
+  end
+end
+

data/spec/superclass_spec.rb

@@ -0,0 +1,27 @@
+require 'lib/spec_helper'
+
+describe 'Doodle', 'singleton superclass == self' do
+  after :each do
+    undefine_const(:Foo)
+  end
+  before :each do
+    raise_if_defined :Foo
+
+    class Foo < Doodle::Base
+    end
+    @foo = Foo.new
+    @sc = class << @foo; self; end
+    @scc = class << @sc; self; end
+    @sclass_doodle_root = class << Doodle::Base; self; end
+    @sclass_foo = class << @foo; class << self; self; end; end
+  end
+  
+  it 'should have singleton class superclass == self' do
+    @sc.parents.should == [@sclass_foo, @sclass_doodle_root]
+  end
+
+  it 'should have singleton class superclass == self' do
+    @scc.parents.should == []
+  end
+end
+

data/spec/validation_spec.rb

@@ -0,0 +1,108 @@
+$:.unshift(File.join(File.dirname(__FILE__), '../.'))
+
+require 'lib/spec_helper'
+require 'date'
+
+
+describe :DateRange, 'validation & conversions' do
+  after :each do
+    undefine_const :DateRange
+    undefine_const :Base
+    undefine_const :ClassMethods
+  end
+  before :each do
+    raise_if_defined :Base, :ClassMethods, :DateRange
+  
+    module ClassMethods
+      def date(*a, &b)
+#        if a.size > 0
+          name = a.shift
+#        else
+#          name = :date
+#        end
+        td = has(name, :kind => Date, *a) do
+          # it is a bit clumsy to define these conversions &
+          # conditions for every attribute/typedef - could define a
+          # subclass of Typedef which does this by default (so we
+          # instances can override or defer to class level conversions
+          # and conditions)
+          from String do |s|
+            Date.parse(s)
+          end
+          from Array do |y,m,d|
+            #p [:from, Array, y, m, d]
+            Date.new(y, m, d)
+          end
+          from Integer do |jd|
+            Doodle::Debug.d { [:converting_from, Integer, jd] }
+            Date.new(*Date.jd_to_civil(jd))
+          end
+        end
+        Doodle::Debug.d { [:date, td] }
+        td.instance_eval(&b) if block_given? # user's block should override default
+      end
+    end
+
+    class Base < Doodle::Base
+      extend ClassMethods
+    end
+
+    class DateRange < Base
+      date :start_date do
+        Doodle::Debug.d { [:start_date, self, self.class] }
+        default { Date.today }
+        must "be >= 2007-01-01" do |d|
+          d >= Date.new(2007, 01, 01)
+        end
+      end
+      date :end_date do
+        default { start_date }
+      end
+      must "have end_date >= start_date" do
+        end_date >= start_date
+      end
+    end
+  end
+  
+  it 'should not raise an exception if end_date >= start_date' do
+    proc { DateRange.new('2007-01-01', '2007-01-02') }.should_not raise_error
+  end
+  
+  it 'should raise an exception if end_date < start_date' do
+    proc { DateRange.new('2007-01-02', '2007-01-01') }.should raise_error
+  end
+
+  it 'should raise an exception if end_date < start_date' do
+    proc { DateRange.new('2007-01-01', '2007-01-01') }.should_not raise_error
+  end
+
+  it 'should have start_date kind == Date' do
+    d = DateRange.new
+    d.attributes[:start_date].kind == Date
+  end
+
+  it 'should have two validations' do
+    d = DateRange.new
+    d.attributes[:start_date].validations.size.should == 2    
+    d.attributes[:start_date].validations(false).size.should == 2
+  end
+
+  it 'should have two conversions' do
+    d = DateRange.new
+    d.attributes[:start_date].conversions.size.should == 3    
+    d.attributes[:start_date].conversions(false).size.should == 3
+  end
+
+  it 'should convert from Array' do
+    d = DateRange.new [2007,01,01], [2007,01,02]
+    d.start_date.should == Date.new(2007,01,01)
+    d.end_date.should == Date.new(2007,01,02)
+  end
+  
+  it 'should convert Integer representing Julian date to Date' do
+    d = DateRange.new 2454428, 2454429
+    d.start_date.should == Date.new(2007,11,23)
+    d.end_date.should == Date.new(2007,11,24)
+  end
+
+end

metadata

@@ -0,0 +1,74 @@
+--- !ruby/object:Gem::Specification 
+name: doodle
+version: !ruby/object:Gem::Version 
+  version: 0.0.1
+platform: ruby
+authors: 
+- Sean O'Halpin
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2008-03-08 00:00:00 +00:00
+default_executable: 
+dependencies: []
+
+description: 
+email: sean.ohalpin@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- README
+- COPYING
+files: 
+- lib/doodle.rb
+- lib/molic_orderedhash.rb
+- lib/spec_helper.rb
+- examples/event.rb
+- examples/event1.rb
+- examples/event2.rb
+- examples/example-01.rb
+- examples/example-01.rdoc
+- examples/example-02.rb
+- examples/example-02.rdoc
+- README
+- COPYING
+has_rdoc: true
+homepage: http://doodle.rubyforge.org/
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: doodle
+rubygems_version: 1.0.1
+signing_key: 
+specification_version: 2
+summary: Declarative attribute definitions and validations
+test_files: 
+- spec/arg_order_spec.rb
+- spec/attributes_spec.rb
+- spec/class_spec.rb
+- spec/conversion_spec.rb
+- spec/defaults_spec.rb
+- spec/doodle_spec.rb
+- spec/flatten_first_level_spec.rb
+- spec/required_spec.rb
+- spec/superclass_spec.rb
+- spec/validation_spec.rb