Lines Matching refs:idnum

79     my $idnum;
84         $idnum  = ($3 && ($3 > 1)) ? $3 : 1;
90         $idnum  = ($2 && ($2 > 1)) ? $2 : 1;
96     return($proto, $ipvnum, $idnum);
104     my ($proto, $ipver, $idnum) = @_;
115     $idnum = 1 if(not $idnum);
116     die "unsupported ID number: '$idnum'" unless($idnum &&
117         ($idnum =~ /^(\d+)$/));
118     $idnum = '' unless($idnum > 1);
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";