home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / CPM / BDSC / BDSC-3 / RMX.CQ / RMX.C
Text File  |  2000-06-30  |  1KB  |  55 lines

  1. /*
  2.     RMX.C
  3.     Written by Leor Zolman, 11/81
  4.  
  5.     Remove all given files having a certain extension.
  6.     Usage: rmx <ext> <name1> <name2> <name3> ...
  7. */
  8.  
  9. #include "bdscio.h"
  10.  
  11. main(argc,argv)
  12. char **argv;
  13. {
  14.     int i;
  15.     char extbuf[5];
  16.     char nambuf[30];
  17.     if (argc < 3) {
  18.         puts("Usage:\nrmx <ext> <name1> [<name2> <name3> ...]\n");
  19.         puts("(any name may have it's own explicit extension)\n");
  20.         exit();
  21.     }
  22.  
  23.     strcpy(extbuf,argv[1]);
  24.  
  25.     for (i = 2; i < argc; i++)
  26.     {
  27.         if (hasdot(argv[i])) unlink2(argv[i]);
  28.         else
  29.         {
  30.             strcpy(nambuf,argv[i]);
  31.             strcat(nambuf,".");
  32.             strcat(nambuf,extbuf);
  33.             unlink2(nambuf);
  34.         }
  35.     }
  36. }
  37.  
  38. int hasdot(str)
  39. char *str;
  40. {
  41.     while (*str) if (*str++ == '.') return 1;
  42.     return 0;
  43. }
  44.  
  45. unlink2(filename)
  46. char *filename;
  47. {
  48.     puts("Unlinking "); puts(filename); puts("...\n");    
  49.     if (unlink(filename) < 0)
  50.     {
  51.         puts(filename);
  52.         puts(" \7doesn't exist\n");
  53.     }
  54. }
  55.