mirror/ git
1
0
Fork 0
mirror of https://github.com/git/git.git synced 2024-05-06 15:46:41 +02:00
Code

cvsserver: checkout faster by sending files in a sensible order 

Just by sending the files in an ordered fashion, clients can process them
much faster. And we can optimize our check of whether we created this
directory already -- faster.

Timings for a checkout on a commandline cvs client for a project with
~13K files totalling ~100MB:

Unsorted:
  603.12 real        16.89 user        42.88 sys

Sorted:
  298.19 real        26.37 user        42.42 sys
This commit is contained in:
Martin Langhoff 2006-03-03 16:38:03 +13:00 committed by Junio C Hamano
parent b8310152bc
commit 501c7372c7
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
git-cvsserver.perl
View File

@ -584,6 +584,7 @@ sub req_co
print "E cvs checkout: Updating $checkout_path\n";
my %seendirs = ();
my $lastdir ='';
foreach my $git ( @{$updater->gethead} )
{
@ -603,7 +604,8 @@ sub req_co
print "M U $checkout_path/$git->{name}\n";
}
if (length($git->{dir}) && $git->{dir} ne './' && !exists($seendirs{$git->{dir}})) {
if (length($git->{dir}) && $git->{dir} ne './'
&& $git->{dir} ne $lastdir && !exists($seendirs{$git->{dir}})) {
# Eclipse seems to need the Clear-sticky command
# to prepare the 'Entries' file for the new directory.
@ -612,6 +614,7 @@ sub req_co
print "Clear-static-directory $module/$git->{dir}\n";
print $state->{CVSROOT} . "/$module/$git->{dir}\n";
print "E cvs checkout: Updating /$module/$git->{dir}\n";
$lastdir = $git->{dir};
$seendirs{$git->{dir}} = 1;
}
@ -2349,7 +2352,7 @@ sub gethead
return $self->{gethead_cache} if ( defined ( $self->{gethead_cache} ) );
my $db_query = $self->{dbh}->prepare_cached("SELECT name, filehash, mode, revision, modified, commithash, author FROM head",{},1);
my $db_query = $self->{dbh}->prepare_cached("SELECT name, filehash, mode, revision, modified, commithash, author FROM head ORDER BY name ASC",{},1);
$db_query->execute();
my $tree = [];