generic-library/curl
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

- In order to better reflect that the returned pid is extracted from the

Browse Source 
given file, serverpid sub is renamed to pidfromfile. In addition it is
  enhanced to make sure that it always returns zero unless a numerical
  positive value is returned.

- To better reflect that only process existance is actually checked,
  checkserver sub is renamed to processexists. In addition it is enhanced
  making it remove the given pid file when the extracted pid is no longer
  alive.
This commit is contained in:
Yang Tse
2009-11-30 13:48:51 +00:00
parent bfae1bd999
commit a72ce23f16
3 changed files with 43 additions and 25 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
tests/runtests.pl
View File

@@ -828,7 +828,7 @@ sub runhttpserver {
return (0,0);
}
my $pid = checkserver($pidfile);
my $pid = processexists($pidfile);
if($pid > 0) {
stopserver($pid);
}
@@ -898,7 +898,7 @@ sub runhttpsserver {
return (0,0);
}
my $pid = checkserver($pidfile);
my $pid = processexists($pidfile);
if($pid > 0) {
# kill previous stunnel!
stopserver($pid);
@@ -968,7 +968,7 @@ sub runftpserver {
return (0,0);
}
my $pid = checkserver($pidfile);
my $pid = processexists($pidfile);
if($pid > 0) {
stopserver($pid);
}
@@ -1045,7 +1045,7 @@ sub runftpsserver {
return (0,0);
}
my $pid = checkserver($pidfile);
my $pid = processexists($pidfile);
if($pid > 0) {
# kill previous stunnel!
stopserver($pid);
@@ -1114,7 +1114,7 @@ sub runtftpserver {
return (0,0);
}
my $pid = checkserver($pidfile);
my $pid = processexists($pidfile);
if($pid > 0) {
stopserver($pid);
}
@@ -1179,7 +1179,7 @@ sub runsshserver {
return (0,0);
}
my $pid = checkserver($pidfile);
my $pid = processexists($pidfile);
if($pid > 0) {
stopserver($pid);
}
@@ -1254,7 +1254,7 @@ sub runsocksserver {
return (0,0);
}
my $pid = checkserver($pidfile);
my $pid = processexists($pidfile);
if($pid > 0) {
stopserver($pid);
}