-if ( !$opts{d} ) {
- #
- # In the non-DHCP case, make sure the host can be looked up
- # via NS, or otherwise find the IP address via NetBios.
- #
- if ( $Conf{ClientNameAlias} ne "" ) {
- $host = $Conf{ClientNameAlias};
- } else {
- $host = $client;
- }
- if ( !defined(gethostbyname($host)) ) {
- #
- # Ok, NS doesn't know about it. Maybe it is a NetBios name
- # instead.
- #
- print(STDERR "Name server doesn't know about $host; trying NetBios\n")
- if ( $opts{v} );
- if ( !defined($hostIP = $bpc->NetBiosHostIPFind($host)) ) {
- print(LOG $bpc->timeStamp, "Can't find host $host via netbios\n");
- print("host not found\n");
- exit(1);
- }
- } else {
- $hostIP = $host;
- }
-}
-