Lines Matching refs:idnum

80     my $idnum;
85         $idnum  = ($3 && ($3 > 1)) ? $3 : 1;
91         $idnum  = ($2 && ($2 > 1)) ? $2 : 1;
97     return($proto, $ipvnum, $idnum);
105     my ($proto, $ipver, $idnum) = @_;
116     $idnum = 1 if(not $idnum);
117     die "unsupported ID number: '$idnum'" unless($idnum &&
118         ($idnum =~ /^(\d+)$/));
119     $idnum = '' unless($idnum > 1);
121     return "${proto}${idnum}${ipver}";
129     my ($proto, $ipver, $idnum) = @_;
130     return lc(servername_str($proto, $ipver, $idnum));
138     my ($proto, $ipver, $idnum) = @_;
139     my $string = lc(servername_str($proto, $ipver, $idnum));
150     my ($proto, $ipver, $idnum) = @_;
152     return '.'. servername_canon($proto, $ipver, $idnum) ."$trailer";
159     my ($proto, $ipver, $idnum) = @_;
161     return '.'. servername_canon($proto, $ipver, $idnum) ."$trailer";
169     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 ($logdir, $proto, $ipver, $idnum) = @_;
202     return "${logdir}/". servername_canon($proto, $ipver, $idnum) ."$trailer";
210     my ($proto, $ipver, $idnum) = @_;
214     return '.'. servername_canon($proto, $ipver, $idnum) ."$trailer";
222     my ($logdir, $proto, $ipver, $idnum) = @_;
226     return "${logdir}/". servername_canon($proto, $ipver, $idnum) ."$trailer";
234     my ($proto, $ipver, $idnum) = @_;
238     return '.'. servername_canon($proto, $ipver, $idnum) ."$trailer";
246     my ($logdir, $proto, $ipver, $idnum) = @_;
250     return "${logdir}/". servername_canon($proto, $ipver, $idnum) ."$trailer";