From 5ff466b96625541a87b0f0d49b01f1cbe5fb8529 Mon Sep 17 00:00:00 2001 From: ueno Date: Tue, 22 Jan 2008 23:41:22 +0000 Subject: [PATCH] Simplified. --- find-changes-by-mia | 43 +++++++++++++++++++++---------------------- 1 file changed, 21 insertions(+), 22 deletions(-) diff --git a/find-changes-by-mia b/find-changes-by-mia index f118a56..14452a5 100755 --- a/find-changes-by-mia +++ b/find-changes-by-mia @@ -1,30 +1,29 @@ #!/usr/bin/env ruby -file, rev, author, lines, state = nil, nil, nil, nil, :F mia_authors = ARGV IO.popen('cvs log') do |io| - io.each_line do |line| - line.chomp! - case line - when /\A-+\z/ - state = :R - if rev && author && File.basename(file) != 'ChangeLog' && - mia_authors.include?(author) - prev_rev = rev.sub(/\d+\z/) {|s| (s.to_i - 1).to_s} - puts("cvs diff -u -r #{prev_rev} -r #{rev} #{File.basename(file)}\t# #{lines}") - end + io.read.split(/^=+\n/).each do |per_file| + file = nil + per_file.scan(/^RCS file:\s+(.+),v$/) do |match| + file = match[0] + break + end + break unless file + base = File.basename(file) + next if base =~ /\A(ChangeLog|\.cvsignore)\z/ + per_file.split(/^-+\n/).each do |per_rev| rev, author, lines = nil, nil, nil - when /\A=+\z/ - state = :F - file, rev, author, lines = nil, nil, nil, nil - when /\ARCS file:\s+(.+),v\z/ - file = $1 if state == :F - when /\Arevision\s+([0-9.]+)\z/ - rev = $1 if state == :R - when /\Adate:\s+(?:.+?);\s+author:\s+(.+?);\s+state:\s+(?:.+?);\s+lines:\s+(.+)/ - if state == :R - author = $1 - lines = $2 + per_rev.scan(/^revision\s+([0-9.]+) +date:\s+(?:.+?);\s+\ +author:\s+(.+?);\s+\ +state:\s+(?:.+?);\s+\ +lines:\s+(.+)$/) do |match| + rev, author, lines = match + if mia_authors.include?(author) + prev_rev = rev.sub(/\d+\z/) {|s| (s.to_i - 1).to_s} + puts("cvs diff -u -r #{prev_rev} -r #{rev} #{base}\t# #{lines}") + end + break end end end -- 1.7.10.4