home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / archives / packetdrivers.tar.gz / pd.tar / src / manifest.awk < prev    next >
Text File  |  1995-06-25  |  403b  |  27 lines

  1. # defer printing of a line until we see that it is not a proper prefix of
  2. #   the following line.
  3.  
  4. BEGIN {
  5.     system("DIR /B >\\$$$");
  6.     while(getline <"\\$$$") {
  7.         files[$0] = "y"
  8.     }
  9. }
  10.  
  11. ($1 in files) {
  12.     delete files[$1]
  13.     print
  14.     next
  15. }
  16.  
  17. {
  18.     print "!!!!!!!!!!!!  Following file is in manifest but doesn't exist"
  19.     print
  20. }
  21.  
  22. END {
  23.     for (i in files) {
  24.         printf("%-12s  !!! not listed in manifest !!!\n", i)
  25.     }
  26. }
  27.