Lines Matching refs:pid
318 my $pid = $_[0];
319 if((not defined $pid) || $pid <= 0) {
323 my $rc = pidwait($pid, &WNOHANG);
324 return ($rc == $pid)?1:0;
626 my $pid = 0;
628 $pid = 0+$1;
639 return $pid;
684 my $pid = 0;
688 $pid = 0+$1;
692 if($pid <= 0 && @data && $data[0]) {
706 return $pid;
769 my $pid = 0;
771 $pid = 0+$1;
782 return $pid;
794 my $pid = processexists($pidfile);
795 if($pid < 0) {
798 return $pid;
901 my $pid = 0;
902 if($data && ($data =~ /(GNUTLS|GnuTLS)/) && ($pid = processexists($pidfile))) {
903 if($pid < 0) {
906 return $pid;
917 return $pid;
927 my $pid = processexists($pidfile);
928 if($pid < 0) {
931 return $pid;
941 my $pid = processexists($pidfile);
942 if($pid < 0) {
945 return $pid;
984 my $pid = 0;
988 $pid = 0+$1;
992 if($pid <= 0 && @data && $data[0]) {
1005 return $pid;
1044 my $pid = 0;
1048 $pid = 0+$1;
1052 if($pid <= 0 && @data && $data[0]) {
1065 return $pid;
1106 my $pid;
1111 $pid = &$fun($proto, $ipvnum, $idnum, $ip, $port);
1113 if($pid > 0) {
1116 elsif($pid < 0) {
1122 return $pid;
1135 my $pid = &$fun($proto, $ipvnum, $idnum, $ip, $port, $do_http3);
1138 if($pid > 0) {
1184 my $pid = processexists($pidfile);
1185 if($pid > 0) {
1186 stopserver($server, "$pid");
1268 my $pid = processexists($pidfile);
1269 if($pid > 0) {
1270 stopserver($server, "$pid");
1329 my $pid = processexists($pidfile);
1330 if($pid > 0) {
1331 stopserver($server, "$pid");
1395 my $pid = processexists($pidfile);
1396 if($pid > 0) {
1397 stopserver($server, "$pid");
1473 my $pid = processexists($pidfile);
1474 if($pid > 0) {
1475 stopserver($server, "$pid");
1536 my $pid = processexists($pidfile);
1537 if($pid > 0) {
1538 stopserver($server, "$pid");
1611 my $pid = processexists($pidfile);
1612 if($pid > 0) {
1613 stopserver($server, "$pid");
1682 my $pid = processexists($pidfile);
1683 if($pid > 0) {
1684 stopserver($server, "$pid");
1759 my $pid = processexists($pidfile);
1760 if($pid > 0) {
1761 stopserver($server, "$pid");
1839 my $pid = processexists($pidfile);
1840 if($pid > 0) {
1841 stopserver($server, "$pid");
1951 my $pid = processexists($pidfile);
1952 if($pid > 0) {
1953 stopserver($server, "$pid");
2006 my $pid = processexists($pidfile);
2007 if($pid > 0) {
2008 stopserver($server, "$pid");
2078 my $pid = processexists($pidfile);
2079 if($pid > 0) {
2080 stopserver($server, "$pid");
2139 my $pid = processexists($pidfile);
2140 if($pid > 0) {
2141 stopserver($server, "$pid");
2200 my $pid = processexists($pidfile);
2201 if($pid > 0) {
2202 stopserver($server, "$pid");
2379 my ($pid, $pid2);
2402 ($serr, $pid, $pid2) = runpingpongserver($what, "", $verbose);
2403 if($pid <= 0) {
2406 logmsg sprintf("* pid $what => %d %d\n", $pid, $pid2) if($verbose);
2407 $run{$what}="$pid $pid2";
2418 ($serr, $pid, $pid2) = runpingpongserver("ftp", "", $verbose, "ipv6");
2419 if($pid <= 0) {
2422 logmsg sprintf("* pid ftp-ipv6 => %d %d\n", $pid,
2424 $run{'ftp-ipv6'}="$pid $pid2";
2436 ($serr, $pid, $pid2, $PORT{'gopher'}) =
2438 if($pid <= 0) {
2441 logmsg sprintf ("* pid gopher => %d %d\n", $pid, $pid2)
2443 $run{'gopher'}="$pid $pid2";
2455 ($serr, $pid, $pid2, $PORT{"gopher6"}) =
2457 if($pid <= 0) {
2460 logmsg sprintf("* pid gopher-ipv6 => %d %d\n", $pid,
2462 $run{'gopher-ipv6'}="$pid $pid2";
2474 ($serr, $pid, $pid2, $PORT{'http'}) =
2476 if($pid <= 0) {
2479 logmsg sprintf ("* pid http => %d %d\n", $pid, $pid2)
2481 $run{'http'}="$pid $pid2";
2493 ($serr, $pid, $pid2, $PORT{"httpproxy"}) =
2495 if($pid <= 0) {
2498 logmsg sprintf ("* pid http-proxy => %d %d\n", $pid, $pid2)
2500 $run{'http-proxy'}="$pid $pid2";
2512 ($serr, $pid, $pid2, $PORT{"http6"}) =
2514 if($pid <= 0) {
2517 logmsg sprintf("* pid http-ipv6 => %d %d\n", $pid, $pid2)
2519 $run{'http-ipv6'}="$pid $pid2";
2530 ($serr, $pid, $pid2, $PORT{'rtsp'}) = runrtspserver($verbose);
2531 if($pid <= 0) {
2534 logmsg sprintf("* pid rtsp => %d %d\n", $pid, $pid2) if($verbose);
2535 $run{'rtsp'}="$pid $pid2";
2546 ($serr, $pid, $pid2, $PORT{'rtsp6'}) = runrtspserver($verbose, "ipv6");
2547 if($pid <= 0) {
2550 logmsg sprintf("* pid rtsp-ipv6 => %d %d\n", $pid, $pid2)
2552 $run{'rtsp-ipv6'}="$pid $pid2";
2574 ($serr, $pid, $pid2) = runpingpongserver($cproto, "", $verbose);
2575 if($pid <= 0) {
2578 logmsg sprintf("* pid $cproto => %d %d\n", $pid, $pid2) if($verbose);
2579 $run{$cproto}="$pid $pid2";
2582 ($serr, $pid, $pid2, $PORT{$what}) =
2585 if($pid <= 0) {
2588 logmsg sprintf("* pid $what => %d %d\n", $pid, $pid2)
2590 $run{$what}="$pid $pid2";
2631 ($serr, $pid, $pid2, $PORT{'http'}) =
2633 if($pid <= 0) {
2636 logmsg sprintf("* pid http => %d %d\n", $pid, $pid2) if($verbose);
2637 $run{'http'}="$pid $pid2";
2640 ($serr, $pid, $pid2, $PORT{'https'}) =
2642 if($pid <= 0) {
2645 logmsg sprintf("* pid https => %d %d\n", $pid, $pid2)
2647 $run{'https'}="$pid $pid2";
2672 ($serr, $pid, $pid2, $PORT{'http'}) =
2674 if($pid <= 0) {
2677 logmsg sprintf("* pid http => %d %d\n", $pid, $pid2) if($verbose);
2678 $run{'http'}="$pid $pid2";
2681 ($serr, $pid, $pid2, $PORT{"http2"}, $PORT{"http2tls"}) =
2683 if($pid <= 0) {
2686 logmsg sprintf ("* pid http/2 => %d %d\n", $pid, $pid2)
2688 $run{'http/2'}="$pid $pid2";
2713 ($serr, $pid, $pid2, $PORT{'http'}) =
2715 if($pid <= 0) {
2718 logmsg sprintf("* pid http => %d %d\n", $pid, $pid2) if($verbose);
2719 $run{'http'}="$pid $pid2";
2722 ($serr, $pid, $pid2, $PORT{"http3"}) = runhttp3server($verbose);
2723 if($pid <= 0) {
2726 logmsg sprintf ("* pid http/3 => %d %d\n", $pid, $pid2)
2728 $run{'http/3'}="$pid $pid2";
2751 ($serr, $pid, $pid2, $port) =
2754 if($pid <= 0) {
2757 logmsg sprintf("* pid gopher => %d %d\n", $pid, $pid2) if($verbose);
2759 $run{'gopher'}="$pid $pid2";
2763 ($serr, $pid, $pid2, $port) =
2766 if($pid <= 0) {
2769 logmsg sprintf("* pid gophers => %d %d\n", $pid, $pid2)
2772 $run{'gophers'}="$pid $pid2";
2796 ($serr, $pid, $pid2, $PORT{"httpsproxy"}) =
2798 if($pid <= 0) {
2801 logmsg sprintf("* pid https-proxy => %d %d\n", $pid, $pid2)
2803 $run{'https-proxy'}="$pid $pid2";
2818 ($serr, $pid, $pid2, $PORT{'httptls'}) =
2820 if($pid <= 0) {
2823 logmsg sprintf("* pid httptls => %d %d\n", $pid, $pid2)
2825 $run{'httptls'}="$pid $pid2";
2840 ($serr, $pid, $pid2, $PORT{"httptls6"}) =
2842 if($pid <= 0) {
2845 logmsg sprintf("* pid httptls-ipv6 => %d %d\n", $pid, $pid2)
2847 $run{'httptls-ipv6'}="$pid $pid2";
2858 ($serr, $pid, $pid2, $PORT{'tftp'}) =
2860 if($pid <= 0) {
2863 logmsg sprintf("* pid tftp => %d %d\n", $pid, $pid2) if($verbose);
2864 $run{'tftp'}="$pid $pid2";
2875 ($serr, $pid, $pid2, $PORT{'tftp6'}) =
2877 if($pid <= 0) {
2880 logmsg sprintf("* pid tftp-ipv6 => %d %d\n", $pid, $pid2) if($verbose);
2881 $run{'tftp-ipv6'}="$pid $pid2";
2886 ($serr, $pid, $pid2, $PORT{'ssh'}) = runsshserver("", $verbose);
2887 if($pid <= 0) {
2890 logmsg sprintf("* pid ssh => %d %d\n", $pid, $pid2) if($verbose);
2891 $run{'ssh'}="$pid $pid2";
2896 ($serr, $pid, $pid2, $PORT{"socks"}) = runsocksserver("", $verbose);
2897 if($pid <= 0) {
2900 logmsg sprintf("* pid socks => %d %d\n", $pid, $pid2) if($verbose);
2901 $run{'socks'}="$pid $pid2";
2906 ($serr, $pid, $pid2) = runsocksserver("2", $verbose, "", "unix");
2907 if($pid <= 0) {
2910 logmsg sprintf("* pid socks5unix => %d %d\n", $pid, $pid2) if($verbose);
2911 $run{'socks5unix'}="$pid $pid2";
2922 ($serr, $pid, $pid2, $PORT{"mqtt"}) = runmqttserver("", $verbose);
2923 if($pid <= 0) {
2926 logmsg sprintf("* pid mqtt => %d %d\n", $pid, $pid2) if($verbose);
2927 $run{'mqtt'}="$pid $pid2";
2939 ($serr, $pid, $pid2, $unused) =
2941 if($pid <= 0) {
2944 logmsg sprintf("* pid http-unix => %d %d\n", $pid, $pid2)
2946 $run{'http-unix'}="$pid $pid2";
2951 ($serr, $pid, $pid2, $PORT{"dict"}) = rundictserver($verbose, "");
2952 if($pid <= 0) {
2955 logmsg sprintf ("* pid DICT => %d %d\n", $pid, $pid2)
2957 $run{'dict'}="$pid $pid2";
2962 ($serr, $pid, $pid2, $PORT{"smb"}) = runsmbserver($verbose, "");
2963 if($pid <= 0) {
2966 logmsg sprintf ("* pid SMB => %d %d\n", $pid, $pid2)
2968 $run{'smb'}="$pid $pid2";
2973 ($serr, $pid, $pid2, $PORT{"telnet"}) =
2975 if($pid <= 0) {
2978 logmsg sprintf ("* pid neg TELNET => %d %d\n", $pid, $pid2)
2980 $run{'telnet'}="$pid $pid2";
3012 foreach my $pid (split(' ', $pids)) {
3013 if($pid != $prev) {
3015 $server, $pid);
3016 $prev = $pid;
3032 my $pid = processexists($pidfile);
3033 if($pid > 0) {
3042 killpid($verb, $pid);
