2008-12-22 16:19:08 +03:00
|
|
|
#!/usr/bin/env ruby
|
|
|
|
|
2009-01-01 00:56:38 +03:00
|
|
|
ENV['LANG'] = ENV['LC_ALL'] = ENV['LC_MESSAGES'] = 'C'
|
|
|
|
ENV.delete('PWD')
|
|
|
|
|
2008-12-22 16:19:08 +03:00
|
|
|
require 'optparse'
|
|
|
|
require 'pathname'
|
|
|
|
|
2008-12-23 09:39:48 +03:00
|
|
|
SRCDIR = Pathname(File.dirname($0)).parent.freeze
|
2008-12-22 16:19:08 +03:00
|
|
|
class VCSNotFoundError < RuntimeError; end
|
|
|
|
|
|
|
|
def detect_vcs(path)
|
2008-12-23 09:39:48 +03:00
|
|
|
path = SRCDIR
|
|
|
|
return :svn, path.relative_path_from(SRCDIR) if File.directory?("#{path}/.svn")
|
2009-01-01 10:13:24 +03:00
|
|
|
return :git_svn, path.relative_path_from(SRCDIR) if File.directory?("#{path}/.git/svn")
|
2008-12-23 09:39:48 +03:00
|
|
|
return :git, path.relative_path_from(SRCDIR) if File.directory?("#{path}/.git")
|
2008-12-22 16:19:08 +03:00
|
|
|
raise VCSNotFoundError, "does not seem to be under a vcs"
|
|
|
|
end
|
|
|
|
|
|
|
|
def get_revisions(path)
|
|
|
|
vcs, path = detect_vcs(path)
|
|
|
|
|
|
|
|
info = case vcs
|
|
|
|
when :svn
|
2008-12-23 09:49:39 +03:00
|
|
|
`cd "#{SRCDIR}" && svn info "#{path}"`
|
2009-01-01 10:13:24 +03:00
|
|
|
when :git_svn
|
2008-12-23 09:49:39 +03:00
|
|
|
`cd "#{SRCDIR}" && git svn info "#{path}"`
|
2009-01-01 10:13:24 +03:00
|
|
|
when :git
|
|
|
|
git_log = `cd "#{SRCDIR}" && git log HEAD~1..HEAD "#{path}"`
|
|
|
|
git_log =~ /git-svn-id: .*?@(\d+)/
|
|
|
|
"Revision: #{$1}\nLast Changed Rev: #{$1}\n"
|
2008-12-22 16:19:08 +03:00
|
|
|
end
|
|
|
|
|
2008-12-24 14:19:32 +03:00
|
|
|
if /^Revision: (\d+)/ =~ info
|
2008-12-22 16:19:08 +03:00
|
|
|
last = $1
|
|
|
|
else
|
|
|
|
raise "last revision not found"
|
|
|
|
end
|
2008-12-24 14:19:32 +03:00
|
|
|
if /^Last Changed Rev: (\d+)/ =~ info
|
2008-12-22 16:19:08 +03:00
|
|
|
changed = $1
|
|
|
|
else
|
|
|
|
raise "changed revision not found"
|
|
|
|
end
|
|
|
|
|
|
|
|
return last, changed
|
|
|
|
end
|
|
|
|
|
|
|
|
def raise_if_conflict
|
|
|
|
raise "you can specify only one of --changed, --revision.h and --doxygen" if $output
|
|
|
|
end
|
|
|
|
|
|
|
|
parser = OptionParser.new {|opts|
|
|
|
|
opts.on("--changed", "changed rev") do
|
|
|
|
raise_if_conflict
|
|
|
|
$output = :changed
|
|
|
|
end
|
|
|
|
opts.on("--revision.h") do
|
|
|
|
raise_if_conflict
|
|
|
|
$output = :revision_h
|
|
|
|
end
|
|
|
|
opts.on("--doxygen") do
|
|
|
|
raise_if_conflict
|
|
|
|
$output = :doxygen
|
|
|
|
end
|
|
|
|
opts.on("-q", "--suppress_not_found") do
|
|
|
|
$suppress_not_found = true
|
|
|
|
end
|
|
|
|
}
|
|
|
|
parser.parse!
|
|
|
|
|
|
|
|
|
|
|
|
begin
|
|
|
|
last, changed = get_revisions(ARGV.shift)
|
|
|
|
rescue VCSNotFoundError
|
|
|
|
raise unless $suppress_not_found
|
|
|
|
end
|
|
|
|
|
|
|
|
case $output
|
|
|
|
when :changed, nil
|
|
|
|
puts changed
|
|
|
|
when :revision_h
|
|
|
|
puts "#define RUBY_REVISION #{changed}"
|
|
|
|
when :doxygen
|
|
|
|
puts "r#{changed}/r#{last}"
|
|
|
|
else
|
|
|
|
raise "unknown output format `#{$output}'"
|
|
|
|
end
|