servers.pm - OpenGrok cross reference for /third

Lines Matching refs:proto
219   for my $proto (('ftp', 'gopher', 'http', 'imap', 'pop3', 'smtp', 'http/2', 'http/3')) {
223           my $serv = servername_id("$proto$ssl", $ipvnum, $idnum);
224           my $pidf = server_pidfilename("$LOGDIR/$PIDDIR", "$proto$ssl",
227           my $portf = server_portfilename("$LOGDIR/$PIDDIR", "$proto$ssl",
234   for my $proto (('tftp', 'sftp', 'socks', 'ssh', 'rtsp', 'httptls',
238         my $serv = servername_id($proto, $ipvnum, $idnum);
239         my $pidf = server_pidfilename("$LOGDIR/$PIDDIR", $proto, $ipvnum,
242         my $portf = server_portfilename("$LOGDIR/$PIDDIR", $proto, $ipvnum,
248   for my $proto (('http', 'imap', 'pop3', 'smtp', 'http/2', 'http/3')) {
250       my $serv = servername_id("$proto$ssl", "unix", 1);
251       my $pidf = server_pidfilename("$LOGDIR/$PIDDIR", "$proto$ssl",
254       my $portf = server_portfilename("$LOGDIR/$PIDDIR", "$proto$ssl",
437     my ($proto) = @_;
438     return $PORT{$proto} || "[not running]";
453         my $proto  = $1;
456         killsockfilters("$LOGDIR/$PIDDIR", $proto, $ipvnum, $idnum, $verbose);
537     my ($proto, $ipvnum, $idnum, $ip, $port_or_path) = @_;
538     my $server = servername_id($proto, $ipvnum, $idnum);
544         servername_canon($proto, $ipvnum, $idnum) .'_verify.out';
548         servername_canon($proto, $ipvnum, $idnum) .'_verify.log';
551     if($proto eq "gopher") {
562     $flags .= "--insecure " if($proto eq 'https');
566     $flags .= "\"$proto://$ip:$port/${bonus}verifiedserver\"";
605         logmsg "RUN: failed to resolve host ($proto://$ip:$port/verifiedserver)\n";
622     my ($proto, $ipvnum, $idnum, $ip, $port) = @_;
623     my $server = servername_id($proto, $ipvnum, $idnum);
628         servername_canon($proto, $ipvnum, $idnum) .'_verify.log';
631     if($proto eq "ftps") {
643     $flags .= "\"$proto://$ip:$port/verifiedserver\"";
689     my ($proto, $ipvnum, $idnum, $ip, $port) = @_;
690     my $server = servername_id($proto, $ipvnum, $idnum);
693         servername_canon($proto, $ipvnum, $idnum) .'_verify.out';
697         servername_canon($proto, $ipvnum, $idnum) .'_verify.log';
748         logmsg "RUN: failed to resolve host ($proto://$ip:$port/verifiedserver)\n";
764     my ($proto, $ipvnum, $idnum, $ip, $port) = @_;
765     my $pidfile = server_pidfilename("$LOGDIR/$PIDDIR", $proto, $ipvnum,
779     my ($proto, $ipvnum, $idnum, $ip, $port) = @_;
780     my $server = servername_id($proto, $ipvnum, $idnum);
818     my ($proto, $ipvnum, $idnum, $ip, $port) = @_;
819     my $server = servername_id($proto, $ipvnum, $idnum);
820     my $pidfile = server_pidfilename("$LOGDIR/$PIDDIR", $proto, $ipvnum,
824         servername_canon($proto, $ipvnum, $idnum) .'_verify.out';
828         servername_canon($proto, $ipvnum, $idnum) .'_verify.log';
897     my ($proto, $ipvnum, $idnum, $ip, $port) = @_;
898     my $pidfile = server_pidfilename("$LOGDIR/$PIDDIR", $proto, $ipvnum,
914     my ($proto, $ipvnum, $idnum, $ip, $port) = @_;
915     my $server = servername_id($proto, $ipvnum, $idnum);
920         servername_canon($proto, $ipvnum, $idnum) .'_verify.log';
929     $flags .= "\"$proto://$ip:$port/SERVER/verifiedserver\"";
974     my ($proto, $ipvnum, $idnum, $ip, $port) = @_;
975     my $server = servername_id($proto, $ipvnum, $idnum);
980         servername_canon($proto, $ipvnum, $idnum) .'_verify.log';
989     $flags .= "\"$proto://$ip:$port\"";
1034 # as values for 'proto' variable in order to differentiate different
1061     my ($proto, $ipvnum, $idnum, $ip, $port) = @_;
1067         my $fun = $protofunc{$proto};
1069         $pid = &$fun($proto, $ipvnum, $idnum, $ip, $port);
1088     my ($proto, $ipvnum, $idnum, $ip, $port) = @_;
1092     my $fun = $protofunc{$proto};
1093     my $pid = &$fun($proto, $ipvnum, $idnum, $ip, $port);
1100     my $srvrname = servername_str($proto, $ipvnum, $idnum);
1110     my ($proto, $verb, $alt, $port_or_path) = @_;
1133     my $server = servername_id($proto, $ipvnum, $idnum);
1148     my $srvrname = servername_str($proto, $ipvnum, $idnum);
1151     my $logfile = server_logfilename($LOGDIR, $proto, $ipvnum, $idnum);
1154     $flags .= "--gopher " if($proto eq "gopher");
1188     my $pid3 = verifyserver($proto, $ipvnum, $idnum, $ip, $port_or_path);
1211     my $proto="http/2";
1217     my $server = servername_id($proto, $ipvnum, $idnum);
1232     my $srvrname = servername_str($proto, $ipvnum, $idnum);
1233     my $logfile = server_logfilename($LOGDIR, $proto, $ipvnum, $idnum);
1272     my $proto="http/3";
1278     my $server = servername_id($proto, $ipvnum, $idnum);
1293     my $srvrname = servername_str($proto, $ipvnum, $idnum);
1294     my $logfile = server_logfilename($LOGDIR, $proto, $ipvnum, $idnum);
1330     my ($verb, $proto, $proxy, $certfile) = @_;
1344     my $server = servername_id($proto, $ipvnum, $idnum);
1359     my $srvrname = servername_str($proto, $ipvnum, $idnum);
1361     my $logfile = server_logfilename($LOGDIR, $proto, $ipvnum, $idnum);
1368     $flags .= "--ipv$ipvnum --proto $proto ";
1371     if($proto eq "gophers") {
1413     my $proto = "httptls";
1422     my $server = servername_id($proto, $ipvnum, $idnum);
1437     my $srvrname = servername_str($proto, $ipvnum, $idnum);
1438     my $logfile = server_logfilename($LOGDIR, $proto, $ipvnum, $idnum);
1472     my ($proto, $id, $verb, $ipv6) = @_;
1475     if($proto !~ /^(?:ftp|imap|pop3|smtp)$/) {
1476         logmsg "Unsupported protocol $proto!!\n";
1484     my $server = servername_id($proto, $ipvnum, $idnum);
1500     my $srvrname = servername_str($proto, $ipvnum, $idnum);
1501     my $logfile = server_logfilename($LOGDIR, $proto, $ipvnum, $idnum);
1508     $flags .= "--srcdir \"$srcdir\" --proto $proto ";
1529     my $pid3 = verifyserver($proto, $ipvnum, $idnum, $ip, $port);
1542     $PORT{$proto . ($ipvnum == 6? '6': '')} = $port;
1551     my ($verb, $ipv6, $certfile, $proto, $clearport) = @_;
1560     my $server = servername_id($proto, $ipvnum, $idnum);
1575     my $srvrname = servername_str($proto, $ipvnum, $idnum);
1577     my $logfile = server_logfilename($LOGDIR, $proto, $ipvnum, $idnum);
1584     $flags .= "--ipv$ipvnum --proto $proto ";
1621     my $proto = 'tftp';
1631     my $server = servername_id($proto, $ipvnum, $idnum);
1646     my $srvrname = servername_str($proto, $ipvnum, $idnum);
1648     my $logfile = server_logfilename($LOGDIR, $proto, $ipvnum, $idnum);
1673     my $pid3 = verifyserver($proto, $ipvnum, $idnum, $ip, $port);
1697     my $proto = 'rtsp';
1707     my $server = servername_id($proto, $ipvnum, $idnum);
1723     my $srvrname = servername_str($proto, $ipvnum, $idnum);
1724     my $logfile = server_logfilename($LOGDIR, $proto, $ipvnum, $idnum);
1749     my $pid3 = verifyserver($proto, $ipvnum, $idnum, $ip, $port);
1773     my $proto = 'ssh';
1782     my $server = servername_id($proto, $ipvnum, $idnum);
1803     my $srvrname = servername_str($proto, $ipvnum, $idnum);
1804     my $logfile = server_logfilename($LOGDIR, $proto, $ipvnum, $idnum);
1895     my $proto = 'mqtt';
1896     my $port = protoport($proto);
1900     my $server = servername_id($proto, $ipvnum, $idnum);
1915     my $srvrname = servername_str($proto, $ipvnum, $idnum);
1916     my $logfile = server_logfilename($LOGDIR, $proto, $ipvnum, $idnum);
1952     my $proto = 'socks';
1956     my $server = servername_id($proto, $ipvnum, $idnum);
1971     my $srvrname = servername_str($proto, $ipvnum, $idnum);
1973     my $logfile = server_logfilename($LOGDIR, $proto, $ipvnum, $idnum);
2019     my $proto = "dict";
2028     my $server = servername_id($proto, $ipvnum, $idnum);
2043     my $srvrname = servername_str($proto, $ipvnum, $idnum);
2044     my $logfile = server_logfilename($LOGDIR, $proto, $ipvnum, $idnum);
2080     my $proto = "smb";
2089     my $server = servername_id($proto, $ipvnum, $idnum);
2104     my $srvrname = servername_str($proto, $ipvnum, $idnum);
2105     my $logfile = server_logfilename($LOGDIR, $proto, $ipvnum, $idnum);
2141     my $proto = "telnet";
2150     my $server = servername_id($proto, $ipvnum, $idnum);
2165     my $srvrname = servername_str($proto, $ipvnum, $idnum);
2166     my $logfile = server_logfilename($LOGDIR, $proto, $ipvnum, $idnum);
2204     my ($proto, $verb, $alt, $port_or_path) = @_;
2222     return &responsiveserver($proto, $ipvnum, $idnum, $ip, $port_or_path);
2230     my ($proto, $id, $verb, $ipv6) = @_;
2235     my $protoip = $proto . ($ipvnum == 6? '6': '');
2237     if($proto =~ /^(?:ftp|imap|pop3|smtp)$/) {
2241         logmsg "Unsupported protocol $proto!!\n";
2245     return &responsiveserver($proto, $ipvnum, $idnum, $ip, $port);
2254     my $proto = 'rtsp';
2255     my $port = protoport($proto);
2267     return &responsiveserver($proto, $ipvnum, $idnum, $ip, $port);
2276     my $proto = 'tftp';
2277     my $port = protoport($proto);
2289     return &responsiveserver($proto, $ipvnum, $idnum, $ip, $port);
2300     my $proto = "httptls";
2301     my $port = protoport($proto);
2310     return &responsiveserver($proto, $ipvnum, $idnum, $ip, $port);
2930     foreach my $proto ('DICT',
2948         $port = protoport(lc $proto);
2949         $$thing =~ s/${prefix}(?:$proto)PORT/$port/g;