mirror of
https://github.com/redmine/redmine.git
synced 2025-11-03 20:06:24 +01:00
aa9d04a4a7
git-svn-id: http://redmine.rubyforge.org/svn/trunk@1499 e93f8b46-1217-0410-a6f0-8f06a7374b81
204 lines
8.0 KiB
Ruby
204 lines
8.0 KiB
Ruby
# 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 'redmine/scm/adapters/abstract_adapter'
|
|
|
|
module Redmine
|
|
module Scm
|
|
module Adapters
|
|
class MercurialAdapter < AbstractAdapter
|
|
|
|
# Mercurial executable name
|
|
HG_BIN = "hg"
|
|
TEMPLATES_DIR = File.dirname(__FILE__) + "/mercurial"
|
|
TEMPLATE_NAME = "hg-template"
|
|
TEMPLATE_EXTENSION = "tmpl"
|
|
|
|
def info
|
|
cmd = "#{HG_BIN} -R #{target('')} root"
|
|
root_url = nil
|
|
shellout(cmd) do |io|
|
|
root_url = io.gets
|
|
end
|
|
return nil if $? && $?.exitstatus != 0
|
|
info = Info.new({:root_url => root_url.chomp,
|
|
:lastrev => revisions(nil,nil,nil,{:limit => 1}).last
|
|
})
|
|
info
|
|
rescue CommandFailed
|
|
return nil
|
|
end
|
|
|
|
def entries(path=nil, identifier=nil)
|
|
path ||= ''
|
|
entries = Entries.new
|
|
cmd = "#{HG_BIN} -R #{target('')} --cwd #{target('')} locate"
|
|
cmd << " -r " + (identifier ? identifier.to_s : "tip")
|
|
cmd << " " + shell_quote("path:#{path}") unless path.empty?
|
|
shellout(cmd) do |io|
|
|
io.each_line do |line|
|
|
# HG uses antislashs as separator on Windows
|
|
line = line.gsub(/\\/, "/")
|
|
if path.empty? or e = line.gsub!(%r{^#{with_trailling_slash(path)}},'')
|
|
e ||= line
|
|
e = e.chomp.split(%r{[\/\\]})
|
|
entries << Entry.new({:name => e.first,
|
|
:path => (path.nil? or path.empty? ? e.first : "#{with_trailling_slash(path)}#{e.first}"),
|
|
:kind => (e.size > 1 ? 'dir' : 'file'),
|
|
:lastrev => Revision.new
|
|
}) unless entries.detect{|entry| entry.name == e.first}
|
|
end
|
|
end
|
|
end
|
|
return nil if $? && $?.exitstatus != 0
|
|
entries.sort_by_name
|
|
end
|
|
|
|
# Fetch the revisions by using a template file that
|
|
# makes Mercurial produce a xml output.
|
|
def revisions(path=nil, identifier_from=nil, identifier_to=nil, options={})
|
|
revisions = Revisions.new
|
|
cmd = "#{HG_BIN} --debug --encoding utf8 -R #{target('')} log -C --style #{self.template_path}"
|
|
if identifier_from && identifier_to
|
|
cmd << " -r #{identifier_from.to_i}:#{identifier_to.to_i}"
|
|
elsif identifier_from
|
|
cmd << " -r #{identifier_from.to_i}:"
|
|
end
|
|
cmd << " --limit #{options[:limit].to_i}" if options[:limit]
|
|
cmd << " #{path}" if path
|
|
shellout(cmd) do |io|
|
|
begin
|
|
# HG doesn't close the XML Document...
|
|
doc = REXML::Document.new(io.read << "</log>")
|
|
doc.elements.each("log/logentry") do |logentry|
|
|
paths = []
|
|
copies = logentry.get_elements('paths/path-copied')
|
|
logentry.elements.each("paths/path") do |path|
|
|
# Detect if the added file is a copy
|
|
if path.attributes['action'] == 'A' and c = copies.find{ |e| e.text == path.text }
|
|
from_path = c.attributes['copyfrom-path']
|
|
from_rev = logentry.attributes['revision']
|
|
end
|
|
paths << {:action => path.attributes['action'],
|
|
:path => "/#{path.text}",
|
|
:from_path => from_path ? "/#{from_path}" : nil,
|
|
:from_revision => from_rev ? from_rev : nil
|
|
}
|
|
end
|
|
paths.sort! { |x,y| x[:path] <=> y[:path] }
|
|
|
|
revisions << Revision.new({:identifier => logentry.attributes['revision'],
|
|
:scmid => logentry.attributes['node'],
|
|
:author => (logentry.elements['author'] ? logentry.elements['author'].text : ""),
|
|
:time => Time.parse(logentry.elements['date'].text).localtime,
|
|
:message => logentry.elements['msg'].text,
|
|
:paths => paths
|
|
})
|
|
end
|
|
rescue
|
|
logger.debug($!)
|
|
end
|
|
end
|
|
return nil if $? && $?.exitstatus != 0
|
|
revisions
|
|
end
|
|
|
|
def diff(path, identifier_from, identifier_to=nil, type="inline")
|
|
path ||= ''
|
|
if identifier_to
|
|
identifier_to = identifier_to.to_i
|
|
else
|
|
identifier_to = identifier_from.to_i - 1
|
|
end
|
|
cmd = "#{HG_BIN} -R #{target('')} diff -r #{identifier_to} -r #{identifier_from} --nodates"
|
|
cmd << " -I #{target(path)}" unless path.empty?
|
|
diff = []
|
|
shellout(cmd) do |io|
|
|
io.each_line do |line|
|
|
diff << line
|
|
end
|
|
end
|
|
return nil if $? && $?.exitstatus != 0
|
|
DiffTableList.new diff, type
|
|
end
|
|
|
|
def cat(path, identifier=nil)
|
|
cmd = "#{HG_BIN} -R #{target('')} cat"
|
|
cmd << " -r " + (identifier ? identifier.to_s : "tip")
|
|
cmd << " #{target(path)}"
|
|
cat = nil
|
|
shellout(cmd) do |io|
|
|
io.binmode
|
|
cat = io.read
|
|
end
|
|
return nil if $? && $?.exitstatus != 0
|
|
cat
|
|
end
|
|
|
|
def annotate(path, identifier=nil)
|
|
path ||= ''
|
|
cmd = "#{HG_BIN} -R #{target('')}"
|
|
cmd << " annotate -n -u"
|
|
cmd << " -r " + (identifier ? identifier.to_s : "tip")
|
|
cmd << " -r #{identifier.to_i}" if identifier
|
|
cmd << " #{target(path)}"
|
|
blame = Annotate.new
|
|
shellout(cmd) do |io|
|
|
io.each_line do |line|
|
|
next unless line =~ %r{^([^:]+)\s(\d+):(.*)$}
|
|
blame.add_line($3.rstrip, Revision.new(:identifier => $2.to_i, :author => $1.strip))
|
|
end
|
|
end
|
|
return nil if $? && $?.exitstatus != 0
|
|
blame
|
|
end
|
|
|
|
# The hg version version is expressed either as a
|
|
# release number (eg 0.9.5 or 1.0) or as a revision
|
|
# id composed of 12 hexa characters.
|
|
def hgversion
|
|
theversion = hgversion_from_command_line
|
|
if theversion.match(/^\d+(\.\d+)+/)
|
|
theversion.split(".").collect(&:to_i)
|
|
# elsif match = theversion.match(/[[:xdigit:]]{12}/)
|
|
# match[0]
|
|
else
|
|
"Unknown version"
|
|
end
|
|
end
|
|
|
|
def template_path
|
|
@template ||= begin
|
|
if hgversion.is_a?(String) or ((hgversion <=> [0,9,5]) > 0)
|
|
ver = "1.0"
|
|
else
|
|
ver = "0.9.5"
|
|
end
|
|
"#{TEMPLATES_DIR}/#{TEMPLATE_NAME}-#{ver}.#{TEMPLATE_EXTENSION}"
|
|
end
|
|
end
|
|
|
|
private
|
|
|
|
def hgversion_from_command_line
|
|
@hgversion ||= %x{#{HG_BIN} --version}.match(/\(version (.*)\)/)[1]
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|