dm-svn 0.2.0

data/spec/dm-svn/mock_models.rb

@@ -0,0 +1,53 @@
+require 'spec_helper'
+require 'dm-svn'
+
+class MockArticle
+  include DataMapper::Resource
+  include DmSvn::Svn
+  
+  property :id, Serial
+  property :title, String
+  property :contents, Text, :body_property => true
+end
+
+class MockArticleNoSvn
+  include DataMapper::Resource
+  
+  property :id, Serial
+  property :title, String
+  property :contents, Text
+end
+
+class MockSyncModel
+  include DataMapper::Resource
+  include DmSvn::Svn
+  
+  property :id, Serial
+  property :title, String
+  property :body, Text, :body_property => true
+  property :published_at, DateTime
+  property :random_number, Integer # because some tests need a non-datetime prop
+end
+
+class MockCategory
+  include DataMapper::Resource
+  include DmSvn::Svn
+  has n, :mock_categorized_articles
+  
+  property :id, Serial
+  property :title, String
+  property :random_number, Integer
+end
+
+class MockCategorizedArticle
+  include DataMapper::Resource
+  include DmSvn::Svn
+  belongs_to :mock_category, :svn => true
+  
+  property :id, Serial
+  property :title, String
+  property :article, String
+  property :body, Text, :body_property => true
+  property :published_at, DateTime
+  property :random_number, Integer # because some tests need a non-datetime prop
+end

data/spec/dm-svn/model_spec.rb

@@ -0,0 +1,5 @@
+require 'spec_helper'
+
+describe DmSvn::Model do
+
+end

data/spec/dm-svn/spec_helper.rb

@@ -0,0 +1,50 @@
+class MockArticle
+  include DataMapper::Resource
+  include DmSvn::Svn
+  
+  property :id, Integer, :serial => true
+  property :title, String
+  property :contents, Text, :body_property => true
+end
+
+class MockArticleNoSvn
+  include DataMapper::Resource
+  
+  property :id, Integer, :serial => true
+  property :title, String
+  property :contents, Text
+end
+
+class MockSyncModel
+  include DataMapper::Resource
+  include DmSvn::Svn
+  
+  property :id, Integer, :serial => true
+  property :title, String
+  property :body, Text, :body_property => true
+  property :published_at, DateTime
+  property :random_number, Integer # because some tests need a non-datetime prop
+end
+
+class MockCategory
+  include DataMapper::Resource
+  include DmSvn::Svn
+  has n, :mock_categorized_articles
+  
+  property :id, Integer, :serial => true
+  property :title, String
+  property :random_number, Integer
+end
+
+class MockCategorizedArticle
+  include DataMapper::Resource
+  include DmSvn::Svn
+  belongs_to :mock_category, :svn => true
+  
+  property :id, Integer, :serial => true
+  property :title, String
+  property :article, String
+  property :body, Text, :body_property => true
+  property :published_at, DateTime
+  property :random_number, Integer # because some tests need a non-datetime prop
+end

data/spec/dm-svn/svn/categorized_spec.rb

@@ -0,0 +1,138 @@
+require 'spec_helper'
+require 'dm-svn/mock_models'
+
+describe DmSvn::Svn::Categorized do
+  before(:all) do
+    DmSvn::Model.auto_migrate!
+    MockCategory.auto_migrate!
+    MockCategorizedArticle.auto_migrate!
+  end
+  
+  before(:each) do
+    MockCategory.all.each { |m| m.destroy }
+  end
+  
+  describe ".belongs_to" do
+    it "should initialize @svn_category" do
+      MockCategorizedArticle.instance_variable_get('@svn_category').should ==
+        :mock_category
+    end
+    
+    it 'should initialize @svn_category_model' do
+      MockCategorizedArticle.instance_variable_get('@svn_category_model').should ==
+        'MockCategory'
+    end
+  end
+  
+  it '.svn_category should get name of category (as method name)' do
+    MockCategorizedArticle.svn_category.should == :mock_category
+  end
+  
+  it '.svn_category_model should get name of category (as constant)' do
+    MockCategorizedArticle.svn_category_model.should == 'MockCategory'
+  end
+  
+  describe "#path" do
+    before(:each) do
+      @article = MockCategorizedArticle.new(:svn_name => 'article')
+      @category = MockCategory.new(:svn_name => 'cat/path')
+      @article.mock_category = @category
+    end
+    
+    it "should append @svn_name to svn_category.path" do
+      @article.path.should == 'cat/path/article'
+    end
+    
+    it "should return just @svn_name if svn_category.path is blank" do
+      @category.path = ''
+      @article.path.should == 'article'
+    end
+    
+    it "should return just @svn_name if svn_category is nil" do
+      @article.mock_category = nil
+      @article.path.should == 'article'
+    end
+  end
+  
+  describe "#path=" do
+    before(:each) do
+      @article = MockCategorizedArticle.new(:svn_name => 'article')
+      @category = MockCategory.create(:svn_name => 'cat/path')
+      @article.mock_category = @category
+    end
+    
+    it "should move instance to a different category" do
+      new_cat = MockCategory.create(:svn_name => 'cat/new')
+      @article.path = "cat/new/article"
+      @article.mock_category.should == new_cat
+    end
+    
+    it "should update @svn_name" do
+      @article.path = "cat/path/article2"
+      @article.svn_name.should == 'article2'
+    end
+    
+    it "should remove any category if only one path level" do
+      MockCategory.should_not_receive(:get_or_create)
+      @article.path = "article"
+      @article.mock_category.should be_nil
+      @article.path.should == 'article'
+    end
+    
+    it "should ignore leading slash" do
+      new_cat = MockCategory.create(:svn_name => 'cat/new')
+      MockCategory.should_receive(:get_or_create).with('cat/new')
+      @article.path = "//cat/new/article"
+    end
+    
+  end
+  
+  describe ".get" do
+    it "should get an instance if possible" do
+      MockCategorizedArticle.should_receive(:get_by_path).
+        with('path/to/name').
+        and_return(1)
+      
+      MockCategorizedArticle.get('path/to/name', true) == 1
+    end
+    
+    it "should try to get an instance of parent if needed (and get_parent is true)" do
+      MockCategorizedArticle.should_receive(:get_by_path).
+        with('path/to/name').
+        and_return(nil)
+      
+      MockCategory.should_receive(:get_by_path).with('path/to/name').and_return(2)
+      MockCategorizedArticle.get('path/to/name', true) == 2
+    end
+
+    it "should not try to get an instance of parent by default" do
+      MockCategorizedArticle.should_receive(:get_by_path).
+        with('path/to/name').
+        and_return(nil)
+      
+      MockCategory.should_not_receive(:get_by_path)
+      
+      MockCategorizedArticle.get('path/to/name').should be_nil
+    end
+    
+  end
+  
+  describe ".get_by_path" do
+    it "should scope by category" do
+      category = mock(MockCategory)
+      
+      MockCategory.should_receive(:first).
+        with(:svn_name => 'path/to').
+        and_return(category)
+      
+      category.should_receive(:id).and_return(3)
+      
+      MockCategorizedArticle.should_receive(:first).
+        with(:svn_name => 'name', :mock_category_id => 3).
+        and_return(nil)
+        
+      MockCategorizedArticle.get_by_path('path/to/name')
+    end
+  end
+  
+end

data/spec/dm-svn/svn/changeset_spec.rb

@@ -0,0 +1,42 @@
+require 'spec_helper'
+require 'dm-svn/mock_models'
+
+describe DmSvn::Svn::Changeset do
+  before(:all) do
+    DmSvn::Model.auto_migrate!
+  end
+  
+  describe "#short_path" do
+    before(:each) do
+      DmSvn::Model.all.each { |m| m.destroy }
+      sync = mock('DmSvn::Svn::Sync')
+      @config = DmSvn::Config.new
+      @config.extension = nil
+      @config.path_from_root = "/articles"
+      sync.stub!(:config).and_return @config
+      sync.stub!(:model).and_return nil
+      sync.stub!(:repos).and_return nil
+      
+      @changeset = DmSvn::Svn::Changeset.new([], 1, '', Time.now, sync)
+    end
+    
+    it "should remove 'leading path'" do
+      @changeset.__send__(:short_path, "/articles/something").should == "something"
+    end
+    
+    it "should remove extension if configured" do
+      @config.extension = 'txt'
+      @changeset.__send__(:short_path, "/articles/something.txt").should == "something"
+    end
+
+    it "should not remove other extensions" do
+      @config.extension = 'txt'
+      @changeset.__send__(:short_path, "/articles/something.jpg").should == "something.jpg"
+    end
+
+    it "should not remove extension if not configured" do
+      @changeset.__send__(:short_path, "/articles/something.txt").should == "something.txt"
+    end
+  end
+  
+end

data/spec/dm-svn/svn/node_spec.rb

@@ -0,0 +1,125 @@
+require 'spec_helper'
+require 'dm-svn/mock_models'
+
+describe DmSvn::Svn::Node do
+  before(:all) do
+    @repos_uri = load_svn_fixture('articles_comments')
+    
+    DmSvn::Model.auto_migrate!
+    @ws_model = DmSvn::Model.create(:name => 'MockSyncModel', :revision => 0)
+    @ws_model.config = DmSvn::Config.new
+    @ws_model.config.uri = @repos_uri
+    @sync = DmSvn::Svn::Sync.new(@ws_model)
+    @sync.__send__(:connect, @repos_uri)
+    
+    @cs   = @sync.changesets[1] # revision 2
+    @cs3  = @sync.changesets[2] # revision 9
+    @cs9  = @sync.changesets[7] # revision 9
+    @dir  = DmSvn::Svn::Node.new(@cs, "/articles")
+    @file = DmSvn::Svn::Node.new(@cs3, "/articles/unpublished.txt")
+  end
+  
+  after(:all) do
+    SvnFixture::Repository.destroy_all
+  end
+  
+  it "should get short_path" do
+    @file.short_path.should == "unpublished"
+  end
+  
+  it "should check if file" do
+    @dir.file?.should be_false
+    @file.file?.should be_true
+  end
+  
+  it "should check if directory" do
+    @dir.directory?.should be_true
+    @file.directory?.should be_false
+  end
+  
+  it "should get body" do
+    @dir.body.should be_nil
+    @file.body.should == "See, it's not published.\nYou can't read it."
+  end
+  
+  it "should remove yaml from body" do
+    DmSvn::Svn::Node.new(@cs9, "/articles/turtle.txt").body.should == 'Hi, turtle.'
+  end
+  
+  describe "#properties" do
+    it "should get properties from svn properties" do
+      @dir.properties.should == 
+        {
+          'svn_updated_at' => @dir.date,
+          'svn_updated_by' => @dir.author,
+          'svn_updated_rev' => @dir.revision,
+          'title' => 'Articles'
+        } 
+        
+      @file.properties.should == 
+        {
+          'svn_updated_at' => @file.date,
+          'svn_updated_by' => @file.author,
+          'svn_updated_rev' => @file.revision,
+          'title' => 'Private Thoughts'
+        }
+        
+    end
+    
+    it "should get properties from yaml properties" do       
+      dir9 = DmSvn::Svn::Node.new(@cs9, "/articles")
+      dir9.properties.should ==
+        {
+          'svn_updated_at' => dir9.date,
+          'svn_updated_by' => dir9.author,
+          'svn_updated_rev' => dir9.revision,
+          'title' => 'Lots of Articles',
+          'random_number' => 7
+        }
+
+      file9 = DmSvn::Svn::Node.new(@cs9, "/articles/turtle.txt")
+      file9.properties.should == 
+        {
+          'svn_updated_at' => file9.date,
+          'svn_updated_by' => file9.author,
+          'svn_updated_rev' => file9.revision,
+          'title' => 'Turtle',
+          'random_number' => 2
+        }
+
+    end
+  end
+  
+  describe "variables from changeset" do
+    before(:each) do
+      @cs = mock(DmSvn::Svn::Changeset)
+      @node = DmSvn::Svn::Node.new(@cs, 'path')
+    end
+    
+    it "should get revision" do
+      @cs.should_receive(:revision).and_return(2)
+      @node.revision.should == 2
+    end
+    
+    it "should get author" do
+      @cs.should_receive(:author).and_return('jmorgan')
+      @node.author.should == 'jmorgan'
+    end
+    
+    it "should get date" do
+      @cs.should_receive(:date).and_return('2008-05-10')
+      @node.date.should == '2008-05-10'
+    end
+    
+    it "should get repos" do
+      @cs.should_receive(:repos).and_return(:repos)
+      @node.repos.should == :repos
+    end
+    
+    it "should get config" do
+      @cs.should_receive(:config).and_return(:config)
+      @node.config.should == :config
+    end
+  end
+  
+end

data/spec/dm-svn/svn/sync_spec.rb

@@ -0,0 +1,111 @@
+require 'spec_helper'
+require 'dm-svn/mock_models'
+
+describe DmSvn::Svn::Sync do
+  after(:all) do
+    SvnFixture::Repository.destroy_all
+  end
+  
+  describe "#run" do
+    before(:all) do
+      DmSvn::Model.auto_migrate!
+      MockSyncModel.auto_migrate!
+      @repos_uri = load_svn_fixture('articles_comments')
+    end
+    
+    before(:each) do
+      MockSyncModel.all.each { |m| m.destroy }
+      DmSvn::Model.all.each { |m| m.destroy }
+      @ws_model = DmSvn::Model.create(:name => 'MockSyncModel', :revision => 0)
+      @ws_model.config = DmSvn::Config.new
+      @ws_model.config.uri = @repos_uri
+      @sync = DmSvn::Svn::Sync.new(@ws_model)
+    end
+    
+    # This is a generic "it should just work" test
+    it "should update database" do
+      @sync.run
+      MockSyncModel.count.should == 4
+      
+      comp = MockSyncModel.first(:svn_name => "computations")
+      comp.body.should == 'Computers do not like salsa very much.'
+      comp.svn_updated_rev.to_i.should == 7
+      comp.svn_created_rev.to_i.should == 7
+      
+      phil = MockSyncModel.first(:svn_name => "philosophy")
+      phil.svn_updated_rev.to_i.should == 2
+      phil.svn_created_rev.to_i.should == 2
+  
+      pub  = MockSyncModel.first(:svn_name => "just_published")
+      published_time = Time.parse(pub.published_at.strftime("%Y-%m-%d %H:%M:%S"))
+      published_time.should be_close(Time.now - 3600, 100)
+      pub.svn_created_by.should == "author"
+      pub.title.should == "Private Thoughts"
+      pub.svn_updated_rev.to_i.should == 7
+      pub.svn_created_rev.to_i.should == 3
+      
+      MockSyncModel.first(:svn_name => "computers.txt").should be_nil
+    end
+    
+    it "should update DmSvn::Model entry" do
+      @sync.run
+      DmSvn::Model.get(@ws_model.id).revision.should == 9
+    end
+  
+    it "should return false if already at the youngest revision" do
+      @sync.run.should be_true
+      @ws_model = DmSvn::Model.get(@ws_model.id)
+      @ws_model.config = DmSvn::Config.new
+      @ws_model.config.uri = @repos_uri
+      @sync = DmSvn::Svn::Sync.new(@ws_model)
+      @sync.run.should be_false
+    end
+  end
+  
+  describe "#run (categorized)" do
+    before(:all) do
+      DmSvn::Model.auto_migrate!
+      MockCategory.auto_migrate!
+      MockCategorizedArticle.auto_migrate!
+      @repos_uri = load_svn_fixture('articles_comments')[0..-10]
+    end
+    
+    before(:each) do
+      MockCategory.all.each { |m| m.destroy }
+      MockCategorizedArticle.all.each { |m| m.destroy }
+      DmSvn::Model.all.each { |m| m.destroy }
+      @ws_model = DmSvn::Model.create(:name => 'MockCategorizedArticle', :revision => 0)
+      @ws_model.config = DmSvn::Config.new
+      @ws_model.config.uri = @repos_uri
+      @sync = DmSvn::Svn::Sync.new(@ws_model)
+    end
+    
+    it "should update database, when categorized" do
+      @sync.run
+      
+      MockCategory.count.should == 2
+      MockCategorizedArticle.count.should == 6
+      
+      comp = MockCategorizedArticle.first(:svn_name => "computations")
+      comp.body.should == 'Computers do not like salsa very much.'
+      comp.svn_updated_rev.to_i.should == 7
+      comp.svn_created_rev.to_i.should == 7
+      
+      phil = MockCategorizedArticle.first(:svn_name => "philosophy")
+      phil.svn_updated_rev.to_i.should == 2
+      phil.svn_created_rev.to_i.should == 2
+      
+      MockCategorizedArticle.first(:svn_name => "computers.txt").should be_nil
+      
+      articles = MockCategory.first(:svn_name => "articles")
+      articles.mock_categorized_articles.length.should == 4
+      comp.mock_category.id.should == articles.id
+      articles.title.should == "Lots of Articles"
+      
+      comments = MockCategory.first(:svn_name => "comments")
+      comments.mock_categorized_articles.length.should == 2
+    end
+
+  end
+    
+end