annotate app/models/repository/cvs.rb @ 507:0c939c159af4 redmine-1.2

Update to Redmine 1.2.1 on 1.2-stable branch (Redmine SVN rev 6270)
author Chris Cannam
date Thu, 14 Jul 2011 10:32:19 +0100
parents cbce1fd3b1b7
children 433d4f72a19b
rev   line source
Chris@441 1 # Redmine - project management software
Chris@441 2 # Copyright (C) 2006-2011 Jean-Philippe Lang
Chris@0 3 #
Chris@0 4 # This program is free software; you can redistribute it and/or
Chris@0 5 # modify it under the terms of the GNU General Public License
Chris@0 6 # as published by the Free Software Foundation; either version 2
Chris@0 7 # of the License, or (at your option) any later version.
Chris@441 8 #
Chris@0 9 # This program is distributed in the hope that it will be useful,
Chris@0 10 # but WITHOUT ANY WARRANTY; without even the implied warranty of
Chris@0 11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
Chris@0 12 # GNU General Public License for more details.
Chris@441 13 #
Chris@0 14 # You should have received a copy of the GNU General Public License
Chris@0 15 # along with this program; if not, write to the Free Software
Chris@0 16 # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
Chris@0 17
Chris@0 18 require 'redmine/scm/adapters/cvs_adapter'
Chris@0 19 require 'digest/sha1'
Chris@0 20
Chris@0 21 class Repository::Cvs < Repository
Chris@245 22 validates_presence_of :url, :root_url, :log_encoding
Chris@0 23
Chris@245 24 def self.human_attribute_name(attribute_key_name)
Chris@441 25 attr_name = attribute_key_name
Chris@441 26 if attr_name == "root_url"
Chris@441 27 attr_name = "cvsroot"
Chris@441 28 elsif attr_name == "url"
Chris@441 29 attr_name = "cvs_module"
Chris@441 30 end
Chris@441 31 super(attr_name)
Chris@245 32 end
Chris@245 33
Chris@245 34 def self.scm_adapter_class
Chris@0 35 Redmine::Scm::Adapters::CvsAdapter
Chris@0 36 end
Chris@245 37
Chris@0 38 def self.scm_name
Chris@0 39 'CVS'
Chris@0 40 end
Chris@245 41
Chris@0 42 def entry(path=nil, identifier=nil)
Chris@0 43 rev = identifier.nil? ? nil : changesets.find_by_revision(identifier)
Chris@0 44 scm.entry(path, rev.nil? ? nil : rev.committed_on)
Chris@0 45 end
Chris@441 46
Chris@0 47 def entries(path=nil, identifier=nil)
Chris@441 48 rev = nil
Chris@441 49 if ! identifier.nil?
Chris@441 50 rev = changesets.find_by_revision(identifier)
Chris@441 51 return nil if rev.nil?
Chris@441 52 end
Chris@0 53 entries = scm.entries(path, rev.nil? ? nil : rev.committed_on)
Chris@0 54 if entries
Chris@0 55 entries.each() do |entry|
Chris@441 56 if ( ! entry.lastrev.nil? ) && ( ! entry.lastrev.revision.nil? )
Chris@441 57 change=changes.find_by_revision_and_path(
Chris@441 58 entry.lastrev.revision,
Chris@441 59 scm.with_leading_slash(entry.path) )
Chris@0 60 if change
Chris@441 61 entry.lastrev.identifier = change.changeset.revision
Chris@441 62 entry.lastrev.revision = change.changeset.revision
Chris@441 63 entry.lastrev.author = change.changeset.committer
Chris@441 64 # entry.lastrev.branch = change.branch
Chris@0 65 end
Chris@0 66 end
Chris@0 67 end
Chris@0 68 end
Chris@0 69 entries
Chris@0 70 end
Chris@441 71
Chris@0 72 def cat(path, identifier=nil)
Chris@441 73 rev = nil
Chris@441 74 if ! identifier.nil?
Chris@441 75 rev = changesets.find_by_revision(identifier)
Chris@441 76 return nil if rev.nil?
Chris@441 77 end
Chris@0 78 scm.cat(path, rev.nil? ? nil : rev.committed_on)
Chris@0 79 end
Chris@441 80
Chris@441 81 def annotate(path, identifier=nil)
Chris@441 82 rev = nil
Chris@441 83 if ! identifier.nil?
Chris@441 84 rev = changesets.find_by_revision(identifier)
Chris@441 85 return nil if rev.nil?
Chris@441 86 end
Chris@441 87 scm.annotate(path, rev.nil? ? nil : rev.committed_on)
Chris@441 88 end
Chris@441 89
Chris@0 90 def diff(path, rev, rev_to)
Chris@441 91 # convert rev to revision. CVS can't handle changesets here
Chris@0 92 diff=[]
Chris@441 93 changeset_from = changesets.find_by_revision(rev)
Chris@441 94 if rev_to.to_i > 0
Chris@441 95 changeset_to = changesets.find_by_revision(rev_to)
Chris@0 96 end
Chris@0 97 changeset_from.changes.each() do |change_from|
Chris@441 98 revision_from = nil
Chris@441 99 revision_to = nil
Chris@441 100 if path.nil? || (change_from.path.starts_with? scm.with_leading_slash(path))
Chris@441 101 revision_from = change_from.revision
Chris@441 102 end
Chris@0 103 if revision_from
Chris@0 104 if changeset_to
Chris@0 105 changeset_to.changes.each() do |change_to|
Chris@441 106 revision_to = change_to.revision if change_to.path == change_from.path
Chris@0 107 end
Chris@0 108 end
Chris@0 109 unless revision_to
Chris@441 110 revision_to = scm.get_previous_revision(revision_from)
Chris@0 111 end
Chris@0 112 file_diff = scm.diff(change_from.path, revision_from, revision_to)
Chris@0 113 diff = diff + file_diff unless file_diff.nil?
Chris@0 114 end
Chris@0 115 end
Chris@0 116 return diff
Chris@0 117 end
Chris@441 118
Chris@0 119 def fetch_changesets
Chris@0 120 # some nifty bits to introduce a commit-id with cvs
Chris@441 121 # natively cvs doesn't provide any kind of changesets,
Chris@441 122 # there is only a revision per file.
Chris@0 123 # we now take a guess using the author, the commitlog and the commit-date.
Chris@441 124
Chris@441 125 # last one is the next step to take. the commit-date is not equal for all
Chris@0 126 # commits in one changeset. cvs update the commit-date when the *,v file was touched. so
Chris@0 127 # we use a small delta here, to merge all changes belonging to _one_ changeset
Chris@441 128 time_delta = 10.seconds
Chris@0 129 fetch_since = latest_changeset ? latest_changeset.committed_on : nil
Chris@0 130 transaction do
Chris@0 131 tmp_rev_num = 1
Chris@441 132 scm.revisions('', fetch_since, nil, :log_encoding => repo_log_encoding) do |revision|
Chris@0 133 # only add the change to the database, if it doen't exists. the cvs log
Chris@441 134 # is not exclusive at all.
Chris@210 135 tmp_time = revision.time.clone
Chris@210 136 unless changes.find_by_path_and_revision(
Chris@441 137 scm.with_leading_slash(revision.paths[0][:path]),
Chris@441 138 revision.paths[0][:revision]
Chris@441 139 )
Chris@245 140 cmt = Changeset.normalize_comments(revision.message, repo_log_encoding)
Chris@441 141 author_utf8 = Changeset.to_utf8(revision.author, repo_log_encoding)
Chris@441 142 cs = changesets.find(
Chris@441 143 :first,
Chris@441 144 :conditions => {
Chris@441 145 :committed_on => tmp_time - time_delta .. tmp_time + time_delta,
Chris@441 146 :committer => author_utf8,
Chris@441 147 :comments => cmt
Chris@441 148 }
Chris@441 149 )
Chris@441 150 # create a new changeset....
Chris@0 151 unless cs
Chris@0 152 # we use a temporaray revision number here (just for inserting)
Chris@0 153 # later on, we calculate a continous positive number
Chris@210 154 tmp_time2 = tmp_time.clone.gmtime
Chris@441 155 branch = revision.paths[0][:branch]
Chris@441 156 scmid = branch + "-" + tmp_time2.strftime("%Y%m%d-%H%M%S")
Chris@441 157 cs = Changeset.create(:repository => self,
Chris@441 158 :revision => "tmp#{tmp_rev_num}",
Chris@441 159 :scmid => scmid,
Chris@441 160 :committer => revision.author,
Chris@210 161 :committed_on => tmp_time,
Chris@441 162 :comments => revision.message)
Chris@0 163 tmp_rev_num += 1
Chris@0 164 end
Chris@441 165 # convert CVS-File-States to internal Action-abbrevations
Chris@441 166 # default action is (M)odified
Chris@441 167 action = "M"
Chris@441 168 if revision.paths[0][:action] == "Exp" && revision.paths[0][:revision] == "1.1"
Chris@441 169 action = "A" # add-action always at first revision (= 1.1)
Chris@441 170 elsif revision.paths[0][:action] == "dead"
Chris@441 171 action = "D" # dead-state is similar to Delete
Chris@0 172 end
Chris@441 173 Change.create(
Chris@441 174 :changeset => cs,
Chris@441 175 :action => action,
Chris@441 176 :path => scm.with_leading_slash(revision.paths[0][:path]),
Chris@441 177 :revision => revision.paths[0][:revision],
Chris@441 178 :branch => revision.paths[0][:branch]
Chris@441 179 )
Chris@0 180 end
Chris@0 181 end
Chris@441 182
Chris@0 183 # Renumber new changesets in chronological order
Chris@210 184 changesets.find(
Chris@441 185 :all,
Chris@441 186 :order => 'committed_on ASC, id ASC',
Chris@441 187 :conditions => "revision LIKE 'tmp%'"
Chris@210 188 ).each do |changeset|
Chris@0 189 changeset.update_attribute :revision, next_revision_number
Chris@0 190 end
Chris@0 191 end # transaction
Chris@210 192 @current_revision_number = nil
Chris@0 193 end
Chris@441 194
Chris@0 195 private
Chris@441 196
Chris@0 197 # Returns the next revision number to assign to a CVS changeset
Chris@0 198 def next_revision_number
Chris@0 199 # Need to retrieve existing revision numbers to sort them as integers
Chris@210 200 sql = "SELECT revision FROM #{Changeset.table_name} "
Chris@210 201 sql << "WHERE repository_id = #{id} AND revision NOT LIKE 'tmp%'"
Chris@210 202 @current_revision_number ||= (connection.select_values(sql).collect(&:to_i).max || 0)
Chris@0 203 @current_revision_number += 1
Chris@0 204 end
Chris@0 205 end