[PATCH v2 1/2] Fix multi-glob assertion in git-svn
- From
Marcus Griep <marcus@griep.us>
- Date
- Aug 7, 2008, 15:34 UTC
- Message-ID
- <1218123242-26260-2-git-send-email-marcus@griep.us>
- In-Reply-To
- <1218123242-26260-1-git-send-email-marcus@griep.us>
Fixes bad regex match check for multiple globs (would always return one glob regardless of actual number).
Signed-off-by: Marcus Griep <marcus@griep.us> --- git-svn.perl | 5 +++-- t/t9108-git-svn-glob.sh | 19 +++++++++++++++++++ 2 files changed, 22 insertions(+), 2 deletions(-)
diff --git a/git-svn.perl b/git-svn.perl index df0ed90..5974a06 100755 --- a/git-svn.perl +++ b/git-svn.perl @@ -4912,14 +4912,15 @@ sub new { my ($class, $glob) = @_; my $re = $glob; $re =~ s!/+$!!g; # no need for trailing slashes - my $nr = ($re =~ s!^(.*)\*(.*)$!\(\[^/\]+\)!g); - my ($left, $right) = ($1, $2); + my $nr = $re =~ tr/*/*/; if ($nr > 1) { die "Only one '*' wildcard expansion ", "is supported (got $nr): '$glob'\n"; } elsif ($nr == 0) { die "One '*' is needed for glob: '$glob'\n"; } + $re =~ s!^(.*)\*(.*)$!\(\[^/\]+\)!g; + my ($left, $right) = ($1, $2); $re = quotemeta($left) . $re . quotemeta($right); if (length $left && !($left =~ s!/+$!!g)) { die "Missing trailing '/' on left side of: '$glob' ($left)\n"; diff --git a/t/t9108-git-svn-glob.sh b/t/t9108-git-svn-glob.sh index f6f71d0..ef6d88e 100755 --- a/t/t9108-git-svn-glob.sh +++ b/t/t9108-git-svn-glob.sh @@ -83,4 +83,23 @@ test_expect_success 'test left-hand-side only globbing' ' cmp expect.two output.two ' +echo "Only one '*' wildcard expansion is supported (got 2): 'branches/*/*'" > expect.three +echo "" >> expect.three + +test_expect_success 'test disallow multi-globs' ' + git config --add svn-remote.three.url "$svnrepo" && + git config --add svn-remote.three.fetch trunk:refs/remotes/three/trunk && + git config --add svn-remote.three.branches \ + "branches/*/*:refs/remotes/three/branches/*" && + git config --add svn-remote.three.tags \ + "tags/*/*:refs/remotes/three/tags/*" && + cd tmp && + echo "try try" >> tags/end/src/b/readme && + poke tags/end/src/b/readme && + svn commit -m "try to try" + cd .. && + test_must_fail git-svn fetch three &> stderr.three && + cmp expect.three stderr.three + ' + test_done
-- 1.6.0.rc2.4.g39f8