annotate app/models/repository/subversion.rb @ 861:b8105f717bf7 bug_182

Close obsolete branch bug_182
author Chris Cannam
date Fri, 10 Jun 2011 16:49:58 +0100
parents 513646585e45
children 051f544170fe
rev   line source
Chris@0 1 # redMine - project management software
Chris@0 2 # Copyright (C) 2006-2007 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@0 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@0 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/subversion_adapter'
Chris@0 19
Chris@0 20 class Repository::Subversion < Repository
Chris@0 21 attr_protected :root_url
Chris@0 22 validates_presence_of :url
Chris@0 23 validates_format_of :url, :with => /^(http|https|svn(\+[^\s:\/\\]+)?|file):\/\/.+/i
Chris@0 24
Chris@0 25 def scm_adapter
Chris@0 26 Redmine::Scm::Adapters::SubversionAdapter
Chris@0 27 end
Chris@0 28
Chris@0 29 def self.scm_name
Chris@0 30 'Subversion'
Chris@0 31 end
Chris@0 32
Chris@0 33 def latest_changesets(path, rev, limit=10)
Chris@0 34 revisions = scm.revisions(path, rev, nil, :limit => limit)
Chris@0 35 revisions ? changesets.find_all_by_revision(revisions.collect(&:identifier), :order => "committed_on DESC", :include => :user) : []
Chris@0 36 end
Chris@0 37
Chris@0 38 # Returns a path relative to the url of the repository
Chris@0 39 def relative_path(path)
Chris@0 40 path.gsub(Regexp.new("^\/?#{Regexp.escape(relative_url)}"), '')
Chris@0 41 end
Chris@0 42
Chris@0 43 def fetch_changesets
Chris@0 44 scm_info = scm.info
Chris@0 45 if scm_info
Chris@0 46 # latest revision found in database
Chris@0 47 db_revision = latest_changeset ? latest_changeset.revision.to_i : 0
Chris@0 48 # latest revision in the repository
Chris@0 49 scm_revision = scm_info.lastrev.identifier.to_i
Chris@0 50 if db_revision < scm_revision
Chris@0 51 logger.debug "Fetching changesets for repository #{url}" if logger && logger.debug?
Chris@0 52 identifier_from = db_revision + 1
Chris@0 53 while (identifier_from <= scm_revision)
Chris@0 54 # loads changesets by batches of 200
Chris@0 55 identifier_to = [identifier_from + 199, scm_revision].min
Chris@0 56 revisions = scm.revisions('', identifier_to, identifier_from, :with_paths => true)
Chris@0 57 revisions.reverse_each do |revision|
Chris@0 58 transaction do
Chris@0 59 changeset = Changeset.create(:repository => self,
Chris@0 60 :revision => revision.identifier,
Chris@0 61 :committer => revision.author,
Chris@0 62 :committed_on => revision.time,
Chris@0 63 :comments => revision.message)
Chris@0 64
Chris@0 65 revision.paths.each do |change|
Chris@0 66 changeset.create_change(change)
Chris@0 67 end unless changeset.new_record?
Chris@0 68 end
Chris@0 69 end unless revisions.nil?
Chris@0 70 identifier_from = identifier_to + 1
Chris@0 71 end
Chris@0 72 end
Chris@0 73 end
Chris@0 74 end
Chris@0 75
Chris@0 76 private
Chris@0 77
Chris@0 78 # Returns the relative url of the repository
Chris@0 79 # Eg: root_url = file:///var/svn/foo
Chris@0 80 # url = file:///var/svn/foo/bar
Chris@0 81 # => returns /bar
Chris@0 82 def relative_url
Chris@0 83 @relative_url ||= url.gsub(Regexp.new("^#{Regexp.escape(root_url || scm.root_url)}", Regexp::IGNORECASE), '')
Chris@0 84 end
Chris@0 85 end