git-svn: fix dcommit clobbering when committing a series of diffs
Our revision number sent to SVN is set to the last revision we committed if we've made any previous commits in a dcommit invocation. Although our SVN Editor code uses the delta of two (old) trees to generate information to send upstream, it'll still send complete resultant files upstream; even if the tree they're based against is out-of-date. The combination of sending a file that does not include the latest changes, but set with a revision number of a commit we just made will cause SVN to accept the resultant file even if it was generated against an old tree. More trouble was caused when fixing this because we were rebasing uncessarily at times. We used git-diff-tree to check the imported SVN revision against our HEAD, not the last tree we committed to SVN. The unnecessary rebasing caused merge commits upstream to SVN to fail. Signed-off-by: Eric Wong <normalperson@yhbt.net> Signed-off-by: Junio C Hamano <gitster@pobox.com>
This commit is contained in:
Eric Wong
Junio C Hamano
parent
ee787400de
commit
c74d9acf20
48
git-svn.perl
48
git-svn.perl
@ -390,7 +390,8 @@ sub cmd_dcommit {
|
||||
"If these changes depend on each other, re-running ",
|
||||
"without --no-rebase will be required."
|
||||
}
|
||||
foreach my $d (@$linear_refs) {
|
||||
while (1) {
|
||||
my $d = shift @$linear_refs or last;
|
||||
unless (defined $last_rev) {
|
||||
(undef, $last_rev, undef) = cmt_metadata("$d~1");
|
||||
unless (defined $last_rev) {
|
||||
@ -423,14 +424,14 @@ sub cmd_dcommit {
|
||||
|
||||
# we always want to rebase against the current HEAD,
|
||||
# not any head that was passed to us
|
||||
my @diff = command('diff-tree', 'HEAD',
|
||||
my @diff = command('diff-tree', $d,
|
||||
$gs->refname, '--');
|
||||
my @finish;
|
||||
if (@diff) {
|
||||
@finish = rebase_cmd();
|
||||
print STDERR "W: HEAD and ", $gs->refname,
|
||||
print STDERR "W: $d and ", $gs->refname,
|
||||
" differ, using @finish:\n",
|
||||
"@diff";
|
||||
join("\n", @diff), "\n";
|
||||
} else {
|
||||
print "No changes between current HEAD and ",
|
||||
$gs->refname,
|
||||
@ -439,6 +440,45 @@ sub cmd_dcommit {
|
||||
@finish = qw/reset --mixed/;
|
||||
}
|
||||
command_noisy(@finish, $gs->refname);
|
||||
if (@diff) {
|
||||
@refs = ();
|
||||
my ($url_, $rev_, $uuid_, $gs_) =
|
||||
working_head_info($head, \@refs);
|
||||
my ($linear_refs_, $parents_) =
|
||||
linearize_history($gs_, \@refs);
|
||||
if (scalar(@$linear_refs) !=
|
||||
scalar(@$linear_refs_)) {
|
||||
fatal "# of revisions changed ",
|
||||
"\nbefore:\n",
|
||||
join("\n", @$linear_refs),
|
||||
"\n\nafter:\n",
|
||||
join("\n", @$linear_refs_), "\n",
|
||||
'If you are attempting to commit ',
|
||||
"merges, try running:\n\t",
|
||||
'git rebase --interactive',
|
||||
'--preserve-merges ',
|
||||
$gs->refname,
|
||||
"\nBefore dcommitting";
|
||||
}
|
||||
if ($url_ ne $url) {
|
||||
fatal "URL mismatch after rebase: ",
|
||||
"$url_ != $url";
|
||||
}
|
||||
if ($uuid_ ne $uuid) {
|
||||
fatal "uuid mismatch after rebase: ",
|
||||
"$uuid_ != $uuid";
|
||||
}
|
||||
# remap parents
|
||||
my (%p, @l, $i);
|
||||
for ($i = 0; $i < scalar @$linear_refs; $i++) {
|
||||
my $new = $linear_refs_->[$i] or next;
|
||||
$p{$new} =
|
||||
$parents->{$linear_refs->[$i]};
|
||||
push @l, $new;
|
||||
}
|
||||
$parents = \%p;
|
||||
$linear_refs = \@l;
|
||||
}
|
||||
$last_rev = $cmt_rev;
|
||||
}
|
||||
}
|
||||
|
||||
56
t/t9106-git-svn-dcommit-clobber-series.sh
Executable file
56
t/t9106-git-svn-dcommit-clobber-series.sh
Executable file
@ -0,0 +1,56 @@
|
||||
#!/bin/sh
|
||||
#
|
||||
# Copyright (c) 2007 Eric Wong
|
||||
test_description='git-svn dcommit clobber series'
|
||||
. ./lib-git-svn.sh
|
||||
|
||||
test_expect_success 'initialize repo' "
|
||||
mkdir import &&
|
||||
cd import &&
|
||||
awk 'BEGIN { for (i = 1; i < 64; i++) { print i } }' > file
|
||||
svn import -m 'initial' . $svnrepo &&
|
||||
cd .. &&
|
||||
git svn init $svnrepo &&
|
||||
git svn fetch &&
|
||||
test -e file
|
||||
"
|
||||
|
||||
test_expect_success '(supposedly) non-conflicting change from SVN' "
|
||||
test x\"\`sed -n -e 58p < file\`\" = x58 &&
|
||||
test x\"\`sed -n -e 61p < file\`\" = x61 &&
|
||||
svn co $svnrepo tmp &&
|
||||
cd tmp &&
|
||||
perl -i -p -e 's/^58\$/5588/' file &&
|
||||
perl -i -p -e 's/^61\$/6611/' file &&
|
||||
test x\"\`sed -n -e 58p < file\`\" = x5588 &&
|
||||
test x\"\`sed -n -e 61p < file\`\" = x6611 &&
|
||||
svn commit -m '58 => 5588, 61 => 6611' &&
|
||||
cd ..
|
||||
"
|
||||
|
||||
test_expect_success 'some unrelated changes to git' "
|
||||
echo hi > life &&
|
||||
git update-index --add life &&
|
||||
git commit -m hi-life &&
|
||||
echo bye >> life &&
|
||||
git commit -m bye-life life
|
||||
"
|
||||
|
||||
test_expect_success 'change file but in unrelated area' "
|
||||
test x\"\`sed -n -e 4p < file\`\" = x4 &&
|
||||
test x\"\`sed -n -e 7p < file\`\" = x7 &&
|
||||
perl -i -p -e 's/^4\$/4444/' file &&
|
||||
perl -i -p -e 's/^7\$/7777/' file &&
|
||||
test x\"\`sed -n -e 4p < file\`\" = x4444 &&
|
||||
test x\"\`sed -n -e 7p < file\`\" = x7777 &&
|
||||
git commit -m '4 => 4444, 7 => 7777' file &&
|
||||
git svn dcommit &&
|
||||
svn up tmp &&
|
||||
cd tmp &&
|
||||
test x\"\`sed -n -e 4p < file\`\" = x4444 &&
|
||||
test x\"\`sed -n -e 7p < file\`\" = x7777 &&
|
||||
test x\"\`sed -n -e 58p < file\`\" = x5588 &&
|
||||
test x\"\`sed -n -e 61p < file\`\" = x6611
|
||||
"
|
||||
|
||||
test_done
|
||||
Loading…
Reference in New Issue
Block a user