home *** CD-ROM | disk | FTP | other *** search
/ back2roots/padua / padua.7z / padua / uucp / auucp+-1.02 / fuucp_plus_src.lzh / compress / test.c < prev    next >
Encoding:
C/C++ Source or Header  |  1990-11-21  |  1006 b   |  45 lines
  1. #include <string.h>
  2. #include <stdlib.h>
  3.  
  4. #include <exec/types.h>
  5. #include <exec/memory.h>
  6. #include <libraries/dos.h>
  7.  
  8. #include <proto/exec.h>
  9. #include <proto/dos.h>
  10.  
  11. void __stdargs fprintf(BPTR, const char *, ...);
  12.  
  13. void main(int argc, char *argv[])
  14. {
  15.   struct FileInfoBlock *fib;
  16.   BPTR lock, stdout;
  17.  
  18.   char *pattern = argv[1];
  19.  
  20.   stdout = Output();
  21.  
  22.   if((fib = AllocMem(sizeof(struct FileInfoBlock), MEMF_CLEAR)) != NULL)
  23.   {
  24.     if((lock = Lock("", ACCESS_READ)) != 0)
  25.     {
  26.       if((Examine(lock, fib)) != DOSFALSE)
  27.       {
  28.         if((astcsma(fib->fib_FileName, pattern)) > 0)
  29.           fprintf(stdout, "%s\n", fib->fib_FileName);
  30.  
  31.         while((ExNext(lock, fib)) != DOSFALSE)
  32.         {
  33.           if((astcsma(fib->fib_FileName, pattern)) > 0)
  34.             fprintf(stdout, "%s\n", fib->fib_FileName);
  35.         }
  36.  
  37.         if(IoErr() != ERROR_NO_MORE_ENTRIES)
  38.           fprintf(stdout, "Fehler bei ExNext()!\n");
  39.       }
  40.       UnLock(lock);
  41.     }
  42.     FreeMem(fib, sizeof(struct FileInfoBlock));
  43.   }
  44. }
  45.