sam-dm-core 0.9.6

data/spec/unit/type_map_spec.rb

@@ -0,0 +1,114 @@
+require 'pathname'
+require Pathname(__FILE__).dirname.expand_path.parent + 'spec_helper'
+
+describe DataMapper::TypeMap do
+
+  before(:each) do
+    @tm = DataMapper::TypeMap.new
+  end
+
+  describe "#map" do
+    it "should return a type map chain" do
+      @tm.map(String).should be_instance_of(DataMapper::TypeMap::TypeChain)
+    end
+
+    it "should return the original chain if the type has already been mapped" do
+      tc = @tm.map(String)
+      @tm.map(String).should == tc
+    end
+  end
+
+  describe "#lookup" do
+    it "should the primitive's mapping the class has a primitive type" do
+      @tm.map(String).to(:varchar)
+
+      lambda { @tm.lookup(DM::Text) }.should_not raise_error
+    end
+
+    it "should merge in the parent type map's translated match" do
+
+    end
+
+    describe "#lookup_from_map" do
+      it "should merge the translated type match into the parent match" do
+        @tm.map(String).to(:varchar)
+
+        child = DataMapper::TypeMap.new(@tm)
+        child.map(String).with(:size => 100)
+
+        child.lookup_from_map(String).should == {:primitive => :varchar, :size => 100}
+      end
+    end
+
+    describe "#lookup_by_type" do
+      it "should raise an exception if the type is not mapped and does not have a primitive" do
+        klass = Class.new
+        lambda { @tm.lookup(klass) }.should raise_error("Type #{klass} must have a default primitive or type map entry")
+      end
+    end
+  end
+
+  describe "#map" do
+    it "should create a new TypeChain if there is no match" do
+      @tm.chains.should_not have_key(String)
+
+      DataMapper::TypeMap::TypeChain.should_receive(:new)
+
+      @tm.map(String)
+    end
+
+    it "should not create a new TypeChain if there is a match" do
+      @tm.map(String)
+
+      DataMapper::TypeMap::TypeChain.should_not_receive(:new)
+
+      @tm.map(String)
+    end
+  end
+
+  describe DataMapper::TypeMap::TypeChain do
+    describe "#to" do
+      it "should be a setter for @primitive" do
+        tc = DataMapper::TypeMap::TypeChain.new
+
+        lambda { tc.to(:primitive) }.should change { tc.primitive }.to(:primitive)
+      end
+
+      it "should return itself" do
+        tc = DataMapper::TypeMap::TypeChain.new
+
+        tc.to(:primitive).should == tc
+      end
+    end
+
+    describe "#with" do
+      it "should return itself" do
+        tc = DataMapper::TypeMap::TypeChain.new
+
+        tc.with(:key => :value).should == tc
+      end
+
+      it "should raise an error if the argument is not a hash" do
+        tc = DataMapper::TypeMap::TypeChain.new
+
+        lambda { tc.with(:key) }.should raise_error("method 'with' expects a hash")
+      end
+
+      it "should merge the argument hash into the attributes hash" do
+        tc = DataMapper::TypeMap::TypeChain.new
+
+        tc.with(:key => :value).with(:size => 10).attributes.should == {:key => :value, :size => 10}
+      end
+    end
+
+    describe "#translate" do
+      it "should merge the attributes hash with the primitive value" do
+        DataMapper::TypeMap::TypeChain.new.to(:int).with(:size => 10).translate.should == {:primitive => :int, :size => 10}
+      end
+
+      it "should overwrite any :primitive entry set using the 'with' method" do
+        DataMapper::TypeMap::TypeChain.new.to(:int).with(:primitive => :varchar).translate.should == {:primitive => :int}
+      end
+    end
+  end
+end

data/spec/unit/type_spec.rb

@@ -0,0 +1,119 @@
+require File.expand_path(File.join(File.dirname(__FILE__), '..', 'spec_helper'))
+
+describe DataMapper::Type do
+
+  before(:each) do
+    class TestType < DataMapper::Type
+      primitive String
+      size 10
+    end
+
+    class TestType2 < DataMapper::Type
+      primitive String
+      size 10
+
+      def self.load(value, property)
+        value.reverse
+      end
+
+      def self.dump(value, property)
+        value.reverse
+      end
+    end
+
+    class TestResource
+      include DataMapper::Resource
+    end
+
+    class TestType3 < DataMapper::Type
+      primitive String
+      size 10
+      attr_accessor :property, :value
+
+      def self.load(value, property)
+        type = self.new
+        type.property = property
+        type.value    = value
+        type
+      end
+
+      def self.dump(value, property)
+        value.value
+      end
+    end
+  end
+
+  it "should have the same PROPERTY_OPTIONS array as DataMapper::Property" do
+    DataMapper::Type::PROPERTY_OPTIONS.should == DataMapper::Property::PROPERTY_OPTIONS
+  end
+
+  it "should create a new type based on String primitive" do
+    TestType.primitive.should == String
+  end
+
+  it "should have size of 10" do
+    TestType.size.should == 10
+  end
+
+  it "should have options hash exactly equal to options specified in custom type" do
+    #ie. it should not include null elements
+    TestType.options.should == { :size => 10, :length => 10 }
+  end
+
+  it "should have length aliased to size" do
+    TestType.length.should == TestType.size
+  end
+
+  it "should pass through the value if load wasn't overridden" do
+    TestType.load("test", nil).should == "test"
+  end
+
+  it "should pass through the value if dump wasn't overridden" do
+    TestType.dump("test", nil).should == "test"
+  end
+
+  it "should not raise NotImplementedException if load was overridden" do
+    TestType2.dump("helo", nil).should == "oleh"
+  end
+
+  it "should not raise NotImplementedException if dump was overridden" do
+    TestType2.load("oleh", nil).should == "helo"
+  end
+
+  describe "using a custom type" do
+    before do
+      @property = DataMapper::Property.new TestResource, :name, TestType3, {}
+    end
+
+    it "should return a object of the same type" do
+      TestType3.load("helo", @property).class.should == TestType3
+    end
+
+    it "should contain the property" do
+      TestType3.load("helo", @property).property.should == @property
+    end
+
+    it "should contain the value" do
+      TestType3.load("helo", @property).value.should == "helo"
+    end
+
+    it "should return the value" do
+      obj = TestType3.load("helo", @property)
+      TestType3.dump(obj, @property).should == "helo"
+    end
+  end
+
+  describe "using def Type" do
+    before do
+      @class = Class.new(DataMapper::Type(String, :size => 20))
+    end
+
+    it "should be of the specified type" do
+      @class.primitive.should == String
+    end
+
+    it "should have the right options set" do
+      @class.size.should == 20
+    end
+  end
+end

data/tasks/ci.rb

@@ -0,0 +1,68 @@
+task 'ci:doc' => :doc
+
+namespace :ci do
+
+  task :prepare do
+    rm_rf ROOT + "ci"
+    mkdir_p ROOT + "ci"
+    mkdir_p ROOT + "ci/doc"
+    mkdir_p ROOT + "ci/cyclomatic"
+    mkdir_p ROOT + "ci/token"
+  end
+
+  Spec::Rake::SpecTask.new("spec:unit" => :prepare) do |t|
+    t.spec_opts = ["--format", "specdoc", "--format", "html:#{ROOT}/ci/unit_rspec_report.html", "--diff"]
+    t.spec_files = Pathname.glob(ROOT + "spec/unit/**/*_spec.rb")
+    unless ENV['NO_RCOV']
+      t.rcov = true
+      t.rcov_opts << '--exclude' << "spec,gems"
+      t.rcov_opts << '--text-summary'
+      t.rcov_opts << '--sort' << 'coverage' << '--sort-reverse'
+      t.rcov_opts << '--only-uncovered'
+    end
+  end
+
+  Spec::Rake::SpecTask.new("spec:integration" => :prepare) do |t|
+    t.spec_opts = ["--format", "specdoc", "--format", "html:#{ROOT}/ci/integration_rspec_report.html", "--diff"]
+    t.spec_files = Pathname.glob(ROOT + "spec/integration/**/*_spec.rb")
+    unless ENV['NO_RCOV']
+      t.rcov = true
+      t.rcov_opts << '--exclude' << "spec,gems"
+      t.rcov_opts << '--text-summary'
+      t.rcov_opts << '--sort' << 'coverage' << '--sort-reverse'
+      t.rcov_opts << '--only-uncovered'
+    end
+  end
+
+  task :spec do
+    Rake::Task["ci:spec:unit"].invoke
+    mv ROOT + "coverage", ROOT + "ci/unit_coverage"
+
+    Rake::Task["ci:spec:integration"].invoke
+    mv ROOT + "coverage", ROOT + "ci/integration_coverage"
+  end
+
+  task :saikuro => :prepare do
+    system "saikuro -c -i lib -y 0 -w 10 -e 15 -o ci/cyclomatic"
+    mv 'ci/cyclomatic/index_cyclo.html', 'ci/cyclomatic/index.html'
+
+    system "saikuro -t -i lib -y 0 -w 20 -e 30 -o ci/token"
+    mv 'ci/token/index_token.html', 'ci/token/index.html'
+  end
+
+  task :publish do
+    out = ENV['CC_BUILD_ARTIFACTS'] || "out"
+    mkdir_p out unless File.directory? out
+
+    mv "ci/unit_rspec_report.html", "#{out}/unit_rspec_report.html"
+    mv "ci/unit_coverage", "#{out}/unit_coverage"
+    mv "ci/integration_rspec_report.html", "#{out}/integration_rspec_report.html"
+    mv "ci/integration_coverage", "#{out}/integration_coverage"
+    mv "ci/doc", "#{out}/doc"
+    mv "ci/cyclomatic", "#{out}/cyclomatic_complexity"
+    mv "ci/token", "#{out}/token_complexity"
+  end
+end
+
+#task :ci => %w[ ci:spec ci:doc ci:saikuro install ci:publish ]  # yard-related tasks do not work yet
+task :ci => %w[ ci:spec ci:saikuro install ]

data/tasks/dm.rb

@@ -0,0 +1,63 @@
+task :default => 'dm:spec'
+task :spec    => 'dm:spec'
+task :rcov    => 'dm:rcov'
+
+namespace :spec do
+  task :unit        => 'dm:spec:unit'
+  task :integration => 'dm:spec:integration'
+end
+
+namespace :rcov do
+  task :unit        => 'dm:rcov:unit'
+  task :integration => 'dm:rcov:integration'
+end
+
+namespace :dm do
+  def run_spec(name, files, rcov)
+    Spec::Rake::SpecTask.new(name) do |t|
+      t.spec_opts << '--colour' << '--loadby' << 'random'
+      t.spec_files = Pathname.glob(ENV['FILES'] || files)
+      t.rcov = rcov
+      t.rcov_opts << '--exclude' << 'spec,environment.rb'
+      t.rcov_opts << '--text-summary'
+      t.rcov_opts << '--sort' << 'coverage' << '--sort-reverse'
+      t.rcov_opts << '--only-uncovered'
+    end
+  end
+
+  unit_specs = ROOT + 'spec/unit/**/*_spec.rb'
+  integration_specs = ROOT + 'spec/integration/**/*_spec.rb'
+  all_specs = ROOT + 'spec/**/*_spec.rb'
+
+  desc "Run all specifications"
+  run_spec('spec', all_specs, false)
+
+  desc "Run all specifications with rcov"
+  run_spec('rcov', all_specs, true)
+
+  namespace :spec do
+    desc "Run unit specifications"
+    run_spec('unit', unit_specs, false)
+
+    desc "Run integration specifications"
+    run_spec('integration', integration_specs, false)
+  end
+
+  namespace :rcov do
+    desc "Run unit specifications with rcov"
+    run_spec('unit', unit_specs, true)
+
+    desc "Run integration specifications with rcov"
+    run_spec('integration', integration_specs, true)
+  end
+
+  desc "Run all comparisons with ActiveRecord"
+  task :perf do
+    sh ROOT + 'script/performance.rb'
+  end
+
+  desc "Profile DataMapper"
+  task :profile do
+    sh ROOT + 'script/profile.rb'
+  end
+end

data/tasks/doc.rb

@@ -0,0 +1,20 @@
+# when yard's ready, it'll have to come back, but for now...
+Rake::RDocTask.new("doc") do |t|
+  t.rdoc_dir = 'doc'
+  t.title    = "DataMapper - Ruby Object Relational Mapper"
+  t.options  = ['--line-numbers', '--inline-source', '--all']
+  t.rdoc_files.include("README.txt", "QUICKLINKS", "FAQ", "lib/**/**/*.rb")
+end
+
+begin
+  gem 'yard', '>=0.2.1'
+  require 'yard'
+
+  YARD::Rake::YardocTask.new("yardoc") do |t|
+    t.options << '--protected'
+    # t.options << '-q'
+    # t.files << '...anyglobshere...'
+  end
+rescue Exception
+  # yard not installed
+end

data/tasks/gemspec.rb

@@ -0,0 +1,23 @@
+desc "Generate gemspec"
+task :gemspec do |x|
+  # Clean up extraneous files before checking manifest
+  %x[rake clean]
+
+  # Check the manifest before generating the gemspec
+  manifest = %x[rake check_manifest]
+  manifest.gsub!("(in /usr/local/projects/dm/dm-core)\n", "")
+
+  unless manifest.empty?
+    print "\n", "#"*68, "\n"
+    print <<-EOS
+  Manifest.txt is not up-to-date. Please review the changes below.
+  If the changes are correct, run 'rake check_manifest | patch'
+  and then run this command again.
+EOS
+    print "#"*68, "\n\n"
+    puts manifest
+  else
+    %x[rake debug_gem > #{GEM_NAME}.gemspec]
+    puts "Successfully created gemspec for #{GEM_NAME}!"
+  end
+end

data/tasks/hoe.rb

@@ -0,0 +1,46 @@
+require 'hoe'
+
+@config_file = "~/.rubyforge/user-config.yml"
+@config = nil
+RUBYFORGE_USERNAME = "unknown"
+def rubyforge_username
+  unless @config
+    begin
+      @config = YAML.load(File.read(File.expand_path(@config_file)))
+    rescue
+      puts <<-EOS
+ERROR: No rubyforge config file found: #{@config_file}
+Run 'rubyforge setup' to prepare your env for access to Rubyforge
+ - See http://newgem.rubyforge.org/rubyforge.html for more details
+      EOS
+      exit
+    end
+  end
+  RUBYFORGE_USERNAME.replace @config["username"]
+end
+
+# Remove hoe dependency
+class Hoe
+  def extra_dev_deps
+    @extra_dev_deps.reject! { |dep| dep[0] == "hoe" }
+    @extra_dev_deps
+  end
+end
+
+hoe = Hoe.new(GEM_NAME, GEM_VERSION) do |p|
+
+  p.developer(AUTHOR, EMAIL)
+
+  p.description = PROJECT_DESCRIPTION
+  p.summary = PROJECT_SUMMARY
+  p.url = PROJECT_URL
+
+  p.rubyforge_name = PROJECT_NAME if PROJECT_NAME
+
+  p.clean_globs |= ["{coverage,doc,log,tmp}", "**/*.{log,db}", "profile_results.*", "**/.DS_Store"]
+
+  GEM_DEPENDENCIES.each do |dep|
+    p.extra_deps << dep
+  end
+
+end