net/smb4k/files/smb2awk


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30

#!/usr/bin/awk -f
# AWK part for generating Windows/Samba boxes list in .nsmbrc format
# Incoming - findsmb output, outgoing - NetBIOS names list
# $Id: smb2awk,v 1.2 2003/10/30 09:41:10 shelton Exp $

{
  while ((getline nline) > 0)
   {
     if (substr(nline,1,1) == "-")
       {
         sig = 1
         continue
       }

     if (sig == 0)
       continue
      else
        {
          split(nline,narray," ")

          if (narray[2] == "unknown")
            next
           else
             if (index(narray[2],".") != 0)
               next
              else
                 print narray[2]
        }
   }
}