repository_cvs_test.rb
60 lines
| 2.2 KiB
| text/x-ruby
|
RubyLexer
Jean-Philippe Lang
|
r974 | # redMine - project management software | ||
| # Copyright (C) 2006-2007 Jean-Philippe Lang | ||||
| # | ||||
| # This program is free software; you can redistribute it and/or | ||||
| # modify it under the terms of the GNU General Public License | ||||
| # as published by the Free Software Foundation; either version 2 | ||||
| # of the License, or (at your option) any later version. | ||||
| # | ||||
| # This program is distributed in the hope that it will be useful, | ||||
| # but WITHOUT ANY WARRANTY; without even the implied warranty of | ||||
| # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | ||||
| # GNU General Public License for more details. | ||||
| # | ||||
| # You should have received a copy of the GNU General Public License | ||||
| # along with this program; if not, write to the Free Software | ||||
| # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. | ||||
| require File.dirname(__FILE__) + '/../test_helper' | ||||
| require 'pp' | ||||
| class RepositoryCvsTest < Test::Unit::TestCase | ||||
| fixtures :projects | ||||
| # No '..' in the repository path | ||||
| REPOSITORY_PATH = RAILS_ROOT.gsub(%r{config\/\.\.}, '') + '/tmp/test/cvs_repository' | ||||
| REPOSITORY_PATH.gsub!(/\//, "\\") if RUBY_PLATFORM =~ /mswin/ | ||||
| # CVS module | ||||
| MODULE_NAME = 'test' | ||||
| def setup | ||||
| @project = Project.find(1) | ||||
| assert @repository = Repository::Cvs.create(:project => @project, | ||||
| :root_url => REPOSITORY_PATH, | ||||
| :url => MODULE_NAME) | ||||
| end | ||||
| if File.directory?(REPOSITORY_PATH) | ||||
| def test_fetch_changesets_from_scratch | ||||
| @repository.fetch_changesets | ||||
| @repository.reload | ||||
| assert_equal 5, @repository.changesets.count | ||||
| assert_equal 14, @repository.changes.count | ||||
|
Jean-Philippe Lang
|
r1222 | assert_not_nil @repository.changesets.find_by_comments('Two files changed') | ||
|
Jean-Philippe Lang
|
r974 | end | ||
| def test_fetch_changesets_incremental | ||||
| @repository.fetch_changesets | ||||
|
Jean-Philippe Lang
|
r1222 | # Remove the 3 latest changesets | ||
| @repository.changesets.find(:all, :order => 'committed_on DESC', :limit => 3).each(&:destroy) | ||||
|
Jean-Philippe Lang
|
r974 | @repository.reload | ||
| assert_equal 2, @repository.changesets.count | ||||
| @repository.fetch_changesets | ||||
| assert_equal 5, @repository.changesets.count | ||||
| end | ||||
| else | ||||
| puts "CVS test repository NOT FOUND. Skipping unit tests !!!" | ||||
| def test_fake; assert true end | ||||
| end | ||||
| end | ||||