1
0
mirror of https://github.com/moparisthebest/curl synced 2024-11-11 12:05:06 -05:00

support --fork and pass that on to sws

This commit is contained in:
Daniel Stenberg 2006-04-10 13:09:56 +00:00
parent e174d374f2
commit 83b8de3d43

View File

@ -8,6 +8,7 @@ my $dir=".";
my $port = 8999; # just a default my $port = 8999; # just a default
my $ipv6; my $ipv6;
my $pid=".http.pid"; # name of the pidfile my $pid=".http.pid"; # name of the pidfile
my $fork;
do { do {
if($ARGV[0] eq "-v") { if($ARGV[0] eq "-v") {
$verbose=1; $verbose=1;
@ -20,6 +21,10 @@ do {
$pid=$ARGV[1]; $pid=$ARGV[1];
shift @ARGV; shift @ARGV;
} }
elsif($ARGV[0] eq "--fork") {
$fork = $ARGV[0];
shift @ARGV;
}
elsif($ARGV[0] =~ /^(\d+)$/) { elsif($ARGV[0] =~ /^(\d+)$/) {
$port = $1; $port = $1;
} }
@ -28,4 +33,4 @@ do {
} }
} while(shift @ARGV); } while(shift @ARGV);
exec("server/sws --pidfile $pid $ipv6$port $dir"); exec("server/sws --pidfile $pid$fork $ipv6$port $dir");