serverhelp.pm - OpenGrok cross reference for /curl/tests/serverhelp.pm

Lines Matching refs:proto
105     my $proto;
111         $proto  = $1;
117         $proto  = $1;
124     return($proto, $ipvnum, $idnum);
132     my ($proto, $ipver, $idnum) = @_;
134     $proto = uc($proto) if($proto);
135     die "unsupported protocol: '$proto'" unless($proto &&
136 …($proto =~ /^(((FTP|HTTP|HTTP\/2|HTTP\/3|IMAP|POP3|GOPHER|SMTP|HTTP-PIPE)S?)|(TFTP|SFTP|SOCKS|SSH|…
148     return "${proto}${idnum}${ipver}";
156     my ($proto, $ipver, $idnum) = @_;
157     return lc(servername_str($proto, $ipver, $idnum));
165     my ($proto, $ipver, $idnum) = @_;
166     my $string = lc(servername_str($proto, $ipver, $idnum));
177     my ($piddir, $proto, $ipver, $idnum) = @_;
179     return "${piddir}/". servername_canon($proto, $ipver, $idnum) ."$trailer";
186     my ($piddir, $proto, $ipver, $idnum) = @_;
188     return "${piddir}/". servername_canon($proto, $ipver, $idnum) ."$trailer";
196     my ($logdir, $proto, $ipver, $idnum) = @_;
198     $trailer = '_stunnel.log' if(lc($proto) =~ /^(ftp|http|imap|pop3|smtp)s$/);
199     return "${logdir}/". servername_canon($proto, $ipver, $idnum) ."$trailer";
207     my ($logdir, $proto, $ipver, $idnum) = @_;
209     return "${logdir}/". servername_canon($proto, $ipver, $idnum) ."$trailer";
217     my ($logdir, $proto, $ipver, $idnum) = @_;
219     return "${logdir}/". servername_canon($proto, $ipver, $idnum) ."$trailer";
227     my ($logdir, $proto, $ipver, $idnum) = @_;
229     return "${logdir}/". servername_canon($proto, $ipver, $idnum) ."$trailer";
237     my ($piddir, $proto, $ipver, $idnum) = @_;
238     die "unsupported protocol: '$proto'" unless($proto &&
239         (lc($proto) =~ /^(ftp|imap|pop3|smtp)s?$/));
240     my $trailer = (lc($proto) =~ /^ftps?$/) ? '_sockctrl.pid':'_sockfilt.pid';
241     return "${piddir}/". servername_canon($proto, $ipver, $idnum) ."$trailer";
249     my ($logdir, $proto, $ipver, $idnum) = @_;
250     die "unsupported protocol: '$proto'" unless($proto &&
251         (lc($proto) =~ /^(ftp|imap|pop3|smtp)s?$/));
252     my $trailer = (lc($proto) =~ /^ftps?$/) ? '_sockctrl.log':'_sockfilt.log';
253     return "${logdir}/". servername_canon($proto, $ipver, $idnum) ."$trailer";
261     my ($piddir, $proto, $ipver, $idnum) = @_;
262     die "unsupported protocol: '$proto'" unless($proto &&
263         (lc($proto) =~ /^ftps?$/));
265     return "${piddir}/". servername_canon($proto, $ipver, $idnum) ."$trailer";
273     my ($logdir, $proto, $ipver, $idnum) = @_;
274     die "unsupported protocol: '$proto'" unless($proto &&
275         (lc($proto) =~ /^ftps?$/));
277     return "${logdir}/". servername_canon($proto, $ipver, $idnum) ."$trailer";