Lines Matching refs:ipver
104 my ($proto, $ipver, $idnum) = @_;
110 $ipver = (not $ipver) ? 'ipv4' : lc($ipver);
111 die "unsupported IP version: '$ipver'" unless($ipver &&
112 ($ipver =~ /^(4|6|ipv4|ipv6|-ipv4|-ipv6|unix)$/));
113 $ipver = ($ipver =~ /6$/) ? '-IPv6' : (($ipver =~ /unix$/) ? '-unix' : '');
120 return "${proto}${idnum}${ipver}";
128 my ($proto, $ipver, $idnum) = @_;
129 return lc(servername_str($proto, $ipver, $idnum));
137 my ($proto, $ipver, $idnum) = @_;
138 my $string = lc(servername_str($proto, $ipver, $idnum));
149 my ($proto, $ipver, $idnum) = @_;
151 return '.'. servername_canon($proto, $ipver, $idnum) ."$trailer";
159 my ($logdir, $proto, $ipver, $idnum) = @_;
162 return "${logdir}/". servername_canon($proto, $ipver, $idnum) ."$trailer";
170 my ($logdir, $proto, $ipver, $idnum) = @_;
172 return "${logdir}/". servername_canon($proto, $ipver, $idnum) ."$trailer";
180 my ($logdir, $proto, $ipver, $idnum) = @_;
182 return "${logdir}/". servername_canon($proto, $ipver, $idnum) ."$trailer";
190 my ($logdir, $proto, $ipver, $idnum) = @_;
192 return "${logdir}/". servername_canon($proto, $ipver, $idnum) ."$trailer";
200 my ($proto, $ipver, $idnum) = @_;
204 return '.'. servername_canon($proto, $ipver, $idnum) ."$trailer";
212 my ($logdir, $proto, $ipver, $idnum) = @_;
216 return "${logdir}/". servername_canon($proto, $ipver, $idnum) ."$trailer";
224 my ($proto, $ipver, $idnum) = @_;
228 return '.'. servername_canon($proto, $ipver, $idnum) ."$trailer";
236 my ($logdir, $proto, $ipver, $idnum) = @_;
240 return "${logdir}/". servername_canon($proto, $ipver, $idnum) ."$trailer";
