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));
148 my ($proto, $ipver, $idnum) = @_;
150 return '.'. servername_canon($proto, $ipver, $idnum) ."$trailer";
158 my ($logdir, $proto, $ipver, $idnum) = @_;
161 return "${logdir}/". servername_canon($proto, $ipver, $idnum) ."$trailer";
169 my ($logdir, $proto, $ipver, $idnum) = @_;
171 return "${logdir}/". servername_canon($proto, $ipver, $idnum) ."$trailer";
179 my ($logdir, $proto, $ipver, $idnum) = @_;
181 return "${logdir}/". servername_canon($proto, $ipver, $idnum) ."$trailer";
189 my ($logdir, $proto, $ipver, $idnum) = @_;
191 return "${logdir}/". servername_canon($proto, $ipver, $idnum) ."$trailer";
199 my ($proto, $ipver, $idnum) = @_;
203 return '.'. servername_canon($proto, $ipver, $idnum) ."$trailer";
211 my ($logdir, $proto, $ipver, $idnum) = @_;
215 return "${logdir}/". servername_canon($proto, $ipver, $idnum) ."$trailer";
223 my ($proto, $ipver, $idnum) = @_;
227 return '.'. servername_canon($proto, $ipver, $idnum) ."$trailer";
235 my ($logdir, $proto, $ipver, $idnum) = @_;
239 return "${logdir}/". servername_canon($proto, $ipver, $idnum) ."$trailer";