Lines Matching refs:server

182     my $server = IO::Socket->new(LocalPort => 0,
189 return $server->sockport();
348 my $server = "${1}";
351 if($server =~ /^(httptls)(\+)(ext|srp)(\d*)(-ipv6|)$/) {
352 $server = "${1}${4}${5}";
355 if(! grep /^\Q$server\E$/, @protocols) {
356 if(substr($server,0,5) ne "socks") {
361 return ("curl lacks $server server support", 4);
365 $what[$i] = "$server$lnrest" if($tlsext);
466 my ($server, $pidlist) = @_;
472 if($server =~ /^(ftp|imap|pop3|smtp)s?(\d*)(-ipv6|)$/) {
482 if($server =~ /^(ftp|http|imap|pop3|smtp)s((\d*)(-ipv6|-unix|))$/) {
486 elsif($server =~ /^(ftp|http|imap|pop3|smtp)((\d*)(-ipv6|-unix|))$/) {
490 elsif($server =~ /^(socks)((\d*)(-ipv6|))$/) {
494 elsif($server =~ /^(ssh)((\d*)(-ipv6|))$/) {
498 if($server eq "http" or $server eq "https") {
505 push @killservers, $server;
509 foreach my $server (@killservers) {
510 if($run{$server}) {
512 $pidlist .= " $run{$server}";
513 $run{$server} = 0;
515 $runcert{$server} = 0 if($runcert{$server});
522 foreach my $server (@killservers) {
523 my $pidfile = $serverpidfile{$server};
529 foreach my $server (@killservers) {
532 "$LOGDIR/$LOCKDIR/$server.lock",
533 "$LOGDIR/$LOCKDIR/$server-IPv$ipvnum.lock",
534 "$LOGDIR/$LOCKDIR/sws-".uc($server)."-IPv$ipvnum.lock"
539 logmsg "RUN: kill $server, cleaned up $lockfile\n" if ($verbose);
563 my $server = servername_id($proto, $ipvnum, $idnum);
636 logmsg "RUN: Unknown server on our $server port: $port ($res)\n";
650 my $server = servername_id($proto, $ipvnum, $idnum);
694 logmsg "RUN: Unknown server on our $server port: $port\n";
702 logmsg "RUN: Verifying our test $server server took $took seconds\n";
717 my $server = servername_id($proto, $ipvnum, $idnum);
779 logmsg "RUN: Unknown server on our $server port: $port\n";
807 my $server = servername_id($proto, $ipvnum, $idnum);
846 my $server = servername_id($proto, $ipvnum, $idnum);
904 logmsg "RUN: $server server has died after starting up\n";
914 logmsg "RUN: Unknown server on our $server port: $port ($res)\n";
956 my $server = servername_id($proto, $ipvnum, $idnum);
994 logmsg "RUN: Unknown server on our $server port: $port\n";
1002 logmsg "RUN: Verifying our test $server server took $took seconds\n";
1016 my $server = servername_id($proto, $ipvnum, $idnum);
1054 logmsg "RUN: Unknown server on our $server port: $port\n";
1062 logmsg "RUN: Verifying our test $server server took $took seconds\n";
1175 my $server = servername_id($proto, $ipvnum, $idnum);
1177 my $pidfile = $serverpidfile{$server};
1186 stopserver($server, "$pid");
1191 my $portfile = $serverportfile{$server};
1218 stopserver($server, "$pid2");
1234 stopserver($server, "$httppid $pid2");
1259 my $server = servername_id($proto, $ipvnum, $idnum);
1261 my $pidfile = $serverpidfile{$server};
1270 stopserver($server, "$pid");
1292 stopserver($server, "$pid2");
1320 my $server = servername_id($proto, $ipvnum, $idnum);
1322 my $pidfile = $serverpidfile{$server};
1331 stopserver($server, "$pid");
1353 stopserver($server, "$pid3");
1386 my $server = servername_id($proto, $ipvnum, $idnum);
1388 my $pidfile = $serverpidfile{$server};
1397 stopserver($server, "$pid");
1445 $runcert{$server} = $certfile;
1464 my $server = servername_id($proto, $ipvnum, $idnum);
1466 my $pidfile = $serverpidfile{$server};
1475 stopserver($server, "$pid");
1496 stopserver($server, "$pid2");
1526 my $server = servername_id($proto, $ipvnum, $idnum);
1528 my $pidfile = $serverpidfile{$server};
1529 my $portfile = $serverportfile{$server};
1538 stopserver($server, "$pid");
1560 stopserver($server, "$pid2");
1575 stopserver($server, "$ftppid $pid2");
1602 my $server = servername_id($proto, $ipvnum, $idnum);
1604 my $pidfile = $serverpidfile{$server};
1613 stopserver($server, "$pid");
1648 $runcert{$server} = $certfile;
1673 my $server = servername_id($proto, $ipvnum, $idnum);
1675 my $pidfile = $serverpidfile{$server};
1684 stopserver($server, "$pid");
1689 my $portfile = $serverportfile{$server};
1707 stopserver($server, "$pid2");
1719 stopserver($server, "$tftppid $pid2");
1749 my $server = servername_id($proto, $ipvnum, $idnum);
1751 my $pidfile = $serverpidfile{$server};
1752 my $portfile = $serverportfile{$server};
1761 stopserver($server, "$pid");
1783 stopserver($server, "$pid2");
1795 stopserver($server, "$rtsppid $pid2");
1824 my $server = servername_id($proto, $ipvnum, $idnum);
1826 my $pidfile = $serverpidfile{$server};
1841 stopserver($server, "$pid");
1873 stopserver($server, "$pid2");
1895 stopserver($server, "$sshpid $pid2");
1942 my $server = servername_id($proto, $ipvnum, $idnum);
1943 my $pidfile = $serverpidfile{$server};
1944 my $portfile = $serverportfile{$server};
1953 stopserver($server, "$pid");
1973 stopserver($server, "$pid2");
1997 my $server = servername_id($proto, $ipvnum, $idnum);
1999 my $pidfile = $serverpidfile{$server};
2008 stopserver($server, "$pid");
2013 my $portfile = $serverportfile{$server};
2041 stopserver($server, "$pid2");
2069 my $server = servername_id($proto, $ipvnum, $idnum);
2071 my $pidfile = $serverpidfile{$server};
2080 stopserver($server, "$pid");
2101 stopserver($server, "$pid2");
2130 my $server = servername_id($proto, $ipvnum, $idnum);
2132 my $pidfile = $serverpidfile{$server};
2141 stopserver($server, "$pid");
2162 stopserver($server, "$pid2");
2191 my $server = servername_id($proto, $ipvnum, $idnum);
2193 my $pidfile = $serverpidfile{$server};
2202 stopserver($server, "$pid");
2222 stopserver($server, "$pid2");
3007 foreach my $server (keys %run) {
3008 if($run{$server}) {
3011 my $pids = $run{$server};
3015 $server, $pid);
3020 $pidlist .= "$run{$server} ";
3021 $run{$server} = 0;
3023 $runcert{$server} = 0 if($runcert{$server});
3030 foreach my $server (keys %serverpidfile) {
3031 my $pidfile = $serverpidfile{$server};
3041 logmsg "$server server unexpectedly alive\n";