Chris@441: # Redmine - project management software
Chris@1295: # Copyright (C) 2006-2013  Jean-Philippe Lang
Chris@0: #
Chris@0: # This program is free software; you can redistribute it and/or
Chris@0: # modify it under the terms of the GNU General Public License
Chris@0: # as published by the Free Software Foundation; either version 2
Chris@0: # of the License, or (at your option) any later version.
Chris@441: #
Chris@0: # This program is distributed in the hope that it will be useful,
Chris@0: # but WITHOUT ANY WARRANTY; without even the implied warranty of
Chris@0: # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
Chris@0: # GNU General Public License for more details.
Chris@441: #
Chris@0: # You should have received a copy of the GNU General Public License
Chris@0: # along with this program; if not, write to the Free Software
Chris@0: # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
Chris@0: 
Chris@119: require File.expand_path('../../test_helper', __FILE__)
Chris@0: require 'pp'
Chris@0: class RepositoryCvsTest < ActiveSupport::TestCase
Chris@0:   fixtures :projects
Chris@441: 
Chris@1115:   include Redmine::I18n
Chris@1115: 
Chris@909:   REPOSITORY_PATH = Rails.root.join('tmp/test/cvs_repository').to_s
Chris@0:   REPOSITORY_PATH.gsub!(/\//, "\\") if Redmine::Platform.mswin?
Chris@0:   # CVS module
Chris@441:   MODULE_NAME    = 'test'
Chris@441:   CHANGESETS_NUM = 7
Chris@441: 
Chris@0:   def setup
Chris@210:     @project = Project.find(3)
Chris@441:     @repository = Repository::Cvs.create(:project  => @project,
Chris@245:                                          :root_url => REPOSITORY_PATH,
Chris@441:                                          :url      => MODULE_NAME,
Chris@245:                                          :log_encoding => 'UTF-8')
Chris@245:     assert @repository
Chris@0:   end
Chris@441: 
Chris@1115:   def test_blank_module_error_message
Chris@1115:     set_language_if_valid 'en'
Chris@1115:     repo = Repository::Cvs.new(
Chris@1115:                           :project      => @project,
Chris@1115:                           :identifier   => 'test',
Chris@1115:                           :log_encoding => 'UTF-8',
Chris@1115:                           :root_url     => REPOSITORY_PATH
Chris@1115:                         )
Chris@1115:     assert !repo.save
Chris@1115:     assert_include "Module can't be blank",
Chris@1115:                    repo.errors.full_messages
Chris@1115:   end
Chris@1115: 
Chris@1115:   def test_blank_module_error_message_fr
Chris@1115:     set_language_if_valid 'fr'
Chris@1115:     str = "Module doit \xc3\xaatre renseign\xc3\xa9(e)"
Chris@1115:     str.force_encoding('UTF-8') if str.respond_to?(:force_encoding)
Chris@1115:     repo = Repository::Cvs.new(
Chris@1115:                           :project       => @project,
Chris@1115:                           :identifier    => 'test',
Chris@1115:                           :log_encoding  => 'UTF-8',
Chris@1115:                           :path_encoding => '',
Chris@1115:                           :url           => '',
Chris@1115:                           :root_url      => REPOSITORY_PATH
Chris@1115:                         )
Chris@1115:     assert !repo.save
Chris@1115:     assert_include str, repo.errors.full_messages
Chris@1115:   end
Chris@1115: 
Chris@1115:   def test_blank_cvsroot_error_message
Chris@1115:     set_language_if_valid 'en'
Chris@1115:     repo = Repository::Cvs.new(
Chris@1115:                           :project      => @project,
Chris@1115:                           :identifier   => 'test',
Chris@1115:                           :log_encoding => 'UTF-8',
Chris@1115:                           :url          => MODULE_NAME
Chris@1115:                         )
Chris@1115:     assert !repo.save
Chris@1115:     assert_include "CVSROOT can't be blank",
Chris@1115:                    repo.errors.full_messages
Chris@1115:   end
Chris@1115: 
Chris@1115:   def test_blank_cvsroot_error_message_fr
Chris@1115:     set_language_if_valid 'fr'
Chris@1115:     str = "CVSROOT doit \xc3\xaatre renseign\xc3\xa9(e)"
Chris@1115:     str.force_encoding('UTF-8') if str.respond_to?(:force_encoding)
Chris@1115:     repo = Repository::Cvs.new(
Chris@1115:                           :project       => @project,
Chris@1115:                           :identifier    => 'test',
Chris@1115:                           :log_encoding  => 'UTF-8',
Chris@1115:                           :path_encoding => '',
Chris@1115:                           :url           => MODULE_NAME,
Chris@1115:                           :root_url      => ''
Chris@1115:                         )
Chris@1115:     assert !repo.save
Chris@1115:     assert_include str, repo.errors.full_messages
Chris@1115:   end
Chris@1115: 
Chris@441:   if File.directory?(REPOSITORY_PATH)
Chris@0:     def test_fetch_changesets_from_scratch
Chris@210:       assert_equal 0, @repository.changesets.count
Chris@0:       @repository.fetch_changesets
Chris@909:       @project.reload
Chris@441: 
Chris@441:       assert_equal CHANGESETS_NUM, @repository.changesets.count
Chris@1115:       assert_equal 16, @repository.filechanges.count
Chris@0:       assert_not_nil @repository.changesets.find_by_comments('Two files changed')
Chris@210: 
Chris@210:       r2 = @repository.changesets.find_by_revision('2')
Chris@210:       assert_equal 'v1-20071213-162510', r2.scmid
Chris@0:     end
Chris@441: 
Chris@0:     def test_fetch_changesets_incremental
Chris@210:       assert_equal 0, @repository.changesets.count
Chris@0:       @repository.fetch_changesets
Chris@1115:       @project.reload
Chris@1115:       assert_equal CHANGESETS_NUM, @repository.changesets.count
Chris@1115: 
Chris@210:       # Remove changesets with revision > 3
Chris@1295:       @repository.changesets.all.each {|c| c.destroy if c.revision.to_i > 3}
Chris@1115:       @project.reload
Chris@210:       assert_equal 3, @repository.changesets.count
Chris@1115:       assert_equal %w|3 2 1|, @repository.changesets.all.collect(&:revision)
Chris@210: 
Chris@1295:       rev3_commit = @repository.changesets.reorder('committed_on DESC').first
Chris@210:       assert_equal '3', rev3_commit.revision
Chris@210:        # 2007-12-14 01:27:22 +0900
Chris@210:       rev3_committed_on = Time.gm(2007, 12, 13, 16, 27, 22)
Chris@210:       assert_equal 'HEAD-20071213-162722', rev3_commit.scmid
Chris@210:       assert_equal rev3_committed_on, rev3_commit.committed_on
Chris@210:       latest_rev = @repository.latest_changeset
Chris@210:       assert_equal rev3_committed_on, latest_rev.committed_on
Chris@210: 
Chris@0:       @repository.fetch_changesets
Chris@1115:       @project.reload
Chris@441:       assert_equal CHANGESETS_NUM, @repository.changesets.count
Chris@1115:       assert_equal %w|7 6 5 4 3 2 1|, @repository.changesets.all.collect(&:revision)
Chris@441:       rev5_commit = @repository.changesets.find_by_revision('5')
Chris@210:       assert_equal 'HEAD-20071213-163001', rev5_commit.scmid
Chris@210:        # 2007-12-14 01:30:01 +0900
Chris@210:       rev5_committed_on = Time.gm(2007, 12, 13, 16, 30, 1)
Chris@210:       assert_equal rev5_committed_on, rev5_commit.committed_on
Chris@0:     end
Chris@441: 
Chris@0:     def test_deleted_files_should_not_be_listed
Chris@210:       assert_equal 0, @repository.changesets.count
Chris@210:       @repository.fetch_changesets
Chris@909:       @project.reload
Chris@441:       assert_equal CHANGESETS_NUM, @repository.changesets.count
Chris@210: 
Chris@0:       entries = @repository.entries('sources')
Chris@0:       assert entries.detect {|e| e.name == 'watchers_controller.rb'}
Chris@0:       assert_nil entries.detect {|e| e.name == 'welcome_controller.rb'}
Chris@0:     end
Chris@441: 
Chris@441:     def test_entries_rev3
Chris@909:       assert_equal 0, @repository.changesets.count
Chris@441:       @repository.fetch_changesets
Chris@909:       @project.reload
Chris@909:       assert_equal CHANGESETS_NUM, @repository.changesets.count
Chris@441:       entries = @repository.entries('', '3')
Chris@1115:       assert_kind_of Redmine::Scm::Adapters::Entries, entries
Chris@441:       assert_equal 3, entries.size
Chris@441:       assert_equal entries[2].name, "README"
Chris@441:       assert_equal entries[2].lastrev.time, Time.gm(2007, 12, 13, 16, 27, 22)
Chris@441:       assert_equal entries[2].lastrev.identifier, '3'
Chris@441:       assert_equal entries[2].lastrev.revision, '3'
Chris@441:       assert_equal entries[2].lastrev.author, 'LANG'
Chris@441:     end
Chris@441: 
Chris@441:     def test_entries_invalid_path
Chris@909:       assert_equal 0, @repository.changesets.count
Chris@441:       @repository.fetch_changesets
Chris@909:       @project.reload
Chris@909:       assert_equal CHANGESETS_NUM, @repository.changesets.count
Chris@441:       assert_nil @repository.entries('missing')
Chris@441:       assert_nil @repository.entries('missing', '3')
Chris@441:     end
Chris@441: 
Chris@441:     def test_entries_invalid_revision
Chris@909:       assert_equal 0, @repository.changesets.count
Chris@441:       @repository.fetch_changesets
Chris@909:       @project.reload
Chris@909:       assert_equal CHANGESETS_NUM, @repository.changesets.count
Chris@441:       assert_nil @repository.entries('', '123')
Chris@441:     end
Chris@441: 
Chris@441:     def test_cat
Chris@909:       assert_equal 0, @repository.changesets.count
Chris@441:       @repository.fetch_changesets
Chris@909:       @project.reload
Chris@909:       assert_equal CHANGESETS_NUM, @repository.changesets.count
Chris@441:       buf = @repository.cat('README')
Chris@441:       assert buf
Chris@441:       lines = buf.split("\n")
Chris@441:       assert_equal 3, lines.length
Chris@441:       buf = lines[1].gsub(/\r$/, "")
Chris@441:       assert_equal 'with one change', buf
Chris@441:       buf = @repository.cat('README', '1')
Chris@441:       assert buf
Chris@441:       lines = buf.split("\n")
Chris@441:       assert_equal 1, lines.length
Chris@441:       buf = lines[0].gsub(/\r$/, "")
Chris@441:       assert_equal 'CVS test repository', buf
Chris@441:       assert_nil @repository.cat('missing.rb')
Chris@441: 
Chris@441:       # sources/welcome_controller.rb is removed at revision 5.
Chris@441:       assert @repository.cat('sources/welcome_controller.rb', '4')
Chris@441:       assert @repository.cat('sources/welcome_controller.rb', '5').blank?
Chris@441: 
Chris@441:       # invalid revision
Chris@441:       assert @repository.cat('README', '123').blank?
Chris@441:     end
Chris@441: 
Chris@441:     def test_annotate
Chris@909:       assert_equal 0, @repository.changesets.count
Chris@441:       @repository.fetch_changesets
Chris@909:       @project.reload
Chris@909:       assert_equal CHANGESETS_NUM, @repository.changesets.count
Chris@441:       ann = @repository.annotate('README')
Chris@441:       assert ann
Chris@441:       assert_equal 3, ann.revisions.length
Chris@441:       assert_equal '1.2', ann.revisions[1].revision
Chris@441:       assert_equal 'LANG', ann.revisions[1].author
Chris@441:       assert_equal 'with one change', ann.lines[1]
Chris@441: 
Chris@441:       ann = @repository.annotate('README', '1')
Chris@441:       assert ann
Chris@441:       assert_equal 1, ann.revisions.length
Chris@441:       assert_equal '1.1', ann.revisions[0].revision
Chris@441:       assert_equal 'LANG', ann.revisions[0].author
Chris@441:       assert_equal 'CVS test repository', ann.lines[0]
Chris@441: 
Chris@441:      # invalid revision
Chris@441:      assert_nil @repository.annotate('README', '123')
Chris@441:    end
Chris@441: 
Chris@0:   else
Chris@0:     puts "CVS test repository NOT FOUND. Skipping unit tests !!!"
Chris@0:     def test_fake; assert true end
Chris@0:   end
Chris@0: end