git.gag.com Git - debian/cpmtools/blob - cpmchattr.c

   1 /* #includes */ /*{{{C}}}*//*{{{*/
   2 #include "config.h"
   3
   4 #include <ctype.h>
   5 #include <stdio.h>
   6 #include <string.h>
   7 #include <stdlib.h>
   8
   9 #include "getopt_.h"
  10 #include "cpmfs.h"
  11
  12 #ifdef USE_DMALLOC
  13 #include <dmalloc.h>
  14 #endif
  15 /*}}}*/
  16
  17 const char cmd[]="cpmchattr";
  18
  19 int main(int argc, char *argv[]) /*{{{*/
  20 {
  21   /* variables */ /*{{{*/
  22   const char *err;
  23   const char *image;
  24   const char *format;
  25   const char *devopts=NULL;
  26   int c,i,usage=0,exitcode=0;
  27   struct cpmSuperBlock drive;
  28   struct cpmInode root;
  29   int gargc;
  30   char **gargv;
  31   const char *attrs;
  32   /*}}}*/
  33
  34   /* parse options */ /*{{{*/
  35   if (!(format=getenv("CPMTOOLSFMT"))) format=FORMAT;
  36   while ((c=getopt(argc,argv,"T:f:h?"))!=EOF) switch(c)
  37   {
  38     case 'T': devopts=optarg; break;
  39     case 'f': format=optarg; break;
  40     case 'h':
  41     case '?': usage=1; break;
  42   }
  43
  44   if (optind>=(argc-2)) usage=1;
  45   else
  46   {
  47     image=argv[optind++];
  48     attrs = argv[optind++];
  49   }
  50
  51   if (usage)
  52   {
  53     fprintf(stderr,"Usage: %s [-f format] [-T dsktype] image [NMrsa1234] pattern ...\n",cmd);
  54     exit(1);
  55   }
  56   /*}}}*/
  57   /* open image */ /*{{{*/
  58   if ((err=Device_open(&drive.dev, image, O_RDWR, devopts)))
  59   {
  60     fprintf(stderr,"%s: can not open %s (%s)\n",cmd,image,err);
  61     exit(1);
  62   }
  63   cpmReadSuper(&drive,&root,format);
  64   /*}}}*/
  65   cpmglob(optind,argc,argv,&root,&gargc,&gargv);
  66   for (i=0; i<gargc; ++i)
  67   {
  68     struct cpmInode ino;
  69     int rc;
  70     cpm_attr_t attrib;
  71
  72     rc = cpmNamei(&root,gargv[i], &ino)==-1;
  73     if (!rc) rc = cpmAttrGet(&ino, &attrib);
  74     if (!rc)
  75     {
  76         int n, m;
  77         m = 0;
  78         for (n = 0; n < strlen(attrs); n++)
  79         {
  80           int mask = 0;
  81           switch (attrs[n])
  82           {
  83             case 'n':
  84             case 'N': mask = 0; attrib = 0; break;
  85             case 'm':
  86             case 'M': mask = 0; m = !m;   break;
  87             case '1': mask = CPM_ATTR_F1; break;
  88             case '2': mask = CPM_ATTR_F2; break;
  89             case '3': mask = CPM_ATTR_F3; break;
  90             case '4': mask = CPM_ATTR_F4; break;
  91             case 'r':
  92             case 'R': mask = CPM_ATTR_RO; break;
  93             case 's':
  94             case 'S': mask = CPM_ATTR_SYS; break;
  95             case 'a':
  96             case 'A': mask = CPM_ATTR_ARCV; break;
  97             default: fprintf(stderr, "%s: Unknown attribute %c\n", cmd, attrs[n]);
  98                      exit(1);
  99           }
 100           if (m) attrib &= ~mask; else attrib |= mask;
 101         }
 102         rc = cpmAttrSet(&ino, attrib);
 103     }
 104     if (rc)
 105     {
 106       fprintf(stderr,"%s: can not set attributes for %s: %s\n",cmd,gargv[i],boo);
 107       exitcode=1;
 108     }
 109   }
 110   cpmUmount(&drive);
 111   exit(exitcode);
 112 }
 113 /*}}}*/