added check for one more error case

[bbaumbach/samba-autobuild/.git] / packaging / SGI / findsmb

diff --git a/packaging/SGI/findsmb b/packaging/SGI/findsmb
index 82aeb28dab31d96f223a83e7f72ec8e3981b3a78..4cb3c80a428e2e6e5bbcfbbff426b0e5f5528b2a 100755 (executable)
--- a/packaging/SGI/findsmb
+++ b/packaging/SGI/findsmb
@@ -65,9 +65,17 @@ foreach $ip (@ipaddrs)               # loop through each IP address found
 
   @name = grep(/<00>/,@nmblookup);
   $_ = @name[0];
-  if ($_) {                    # we have a netbios name
-    /(\S+)/;
-    $name = $1;
+  if ($_) {                     # we have a netbios name
+    if (/GROUP/) {             # is it a group name
+       ($name, $aliases, $type, $length, @addresses) = 
+       gethostbyaddr(pack('C4',split('\.',$ip)),2);
+       if (! $name) {                  # could not get name
+           $name = "unknown nis name";
+       }
+    } else {
+       /(\S+)/;
+       $name = $1;
+    }
 
 # do an smbclient command on the netbios name.