annotate .svn/pristine/64/64c4b3023914b8e9badc4f2743e75346c30f91ab.svn-base @ 1464:261b3d9a4903 redmine-2.4

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