home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS 1997 March / Simtel-MSDOS-Mar1997-CD2.iso / 00_info / simcvt.awk < prev    next >
Text File  |  1997-01-27  |  721b  |  33 lines
  1. #! /usr/bin/awk -f
  2. # simcvt.awk
  3. # Usage:  awk -f simcvt.awk simibm.idx > simibm.lst
  4. # Author: Daniel Lewart (d-lewart@uiuc.edu)
  5.  
  6. BEGIN {
  7.     FS = "\""
  8.     print "    Simtel.Net Public Domain, Freeware and Shareware listing"
  9.     print ""
  10.     print "NOTE: Type B is Binary; Type A is ASCII"
  11.     print ""
  12. }
  13.  
  14. {
  15.     dir2 = $2$4
  16.     if ( dir1 != dir2 ) {
  17.         if ( dir1 != "" ) print ""
  18.         print "Directory", dir2
  19.         print " Filename   Type Length   Date    Description"
  20.         print "=============================================="
  21.         dir1 = dir2
  22.     }
  23.     Name = $6
  24.     split($7,a,",")
  25.     Type = "?"
  26.     if (a[4] == 7) Type = "A"
  27.     if (a[4] == 8) Type = "B"
  28.     Size = a[3]
  29.     Date = a[5]
  30.     Description = $8
  31.     printf("%-12s  %s %7d  %6d  %s\n",Name,Type,Size,Date,Description)
  32. }
  33.