diff options
| author | Frank Lichtenheld <frank@lichtenheld.de> | 2007-03-19 16:55:57 +0100 |
|---|---|---|
| committer | Junio C Hamano <junkio@cox.net> | 2007-03-22 01:26:26 -0700 |
| commit | 80573baec4a6211fc9a01d83690c0d73015cfbdc (patch) | |
| tree | 394ebd1fc892ba6ff66741d757d3ae2a2bce5bef /git-cvsserver.perl | |
| parent | 1d848f643cd8ba86044d729d08d6866425c1539e (diff) | |
| download | git-80573baec4a6211fc9a01d83690c0d73015cfbdc.tar.gz | |
cvsserver: Introduce new state variable 'method'
$state->{method} contains the CVS access method used,
either 'ext' or 'pserver'
Signed-off-by: Frank Lichtenheld <frank@lichtenheld.de>
Signed-off-by: Junio C Hamano <junkio@cox.net>
Diffstat (limited to 'git-cvsserver.perl')
| -rwxr-xr-x | git-cvsserver.perl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/git-cvsserver.perl b/git-cvsserver.perl index 68aa75255e..e9d489bc30 100755 --- a/git-cvsserver.perl +++ b/git-cvsserver.perl @@ -91,7 +91,9 @@ $log->debug("Temporary directory is '$TEMP_DIR'"); # if we are called with a pserver argument, # deal with the authentication cat before entering the # main loop +$state->{method} = 'ext'; if (@ARGV && $ARGV[0] eq 'pserver') { + $state->{method} = 'pserver'; my $line = <STDIN>; chomp $line; unless( $line eq 'BEGIN AUTH REQUEST') { die "E Do not understand $line - expecting BEGIN AUTH REQUEST\n"; @@ -1026,7 +1028,7 @@ sub req_ci $log->info("req_ci : " . ( defined($data) ? $data : "[NULL]" )); - if ( @ARGV && $ARGV[0] eq 'pserver') + if ( $state->{method} eq 'pserver') { print "error 1 pserver access cannot commit\n"; exit; |