Imported Upstream version 2.10
[debian/cpmtools] / cpmchmod.c
1 /* #includes */ /*{{{C}}}*//*{{{*/
2 #include "config.h"
3
4 #include <ctype.h>
5 #include <errno.h>
6 #include <stdio.h>
7 #include <string.h>
8 #include <stdlib.h>
9
10 #include "getopt_.h"
11 #include "cpmfs.h"
12
13 #ifdef USE_DMALLOC
14 #include <dmalloc.h>
15 #endif
16 /*}}}*/
17
18 const char cmd[]="cpmchmod";
19
20 int main(int argc, char *argv[]) /*{{{*/
21 {
22   /* variables */ /*{{{*/
23   const char *err;
24   const char *image;
25   const char *format=FORMAT;
26   const char *devopts=NULL;
27   int c,i,usage=0,exitcode=0;
28   struct cpmSuperBlock drive;
29   struct cpmInode root;
30   int gargc;
31   char **gargv;
32   unsigned int mode; 
33   /*}}}*/
34
35   /* parse options */ /*{{{*/
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     if (!sscanf(argv[optind++], "%o", &mode)) usage=1;
49   }    
50
51   if (usage)
52   {
53     fprintf(stderr,"Usage: %s [-f format] image mode 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
70     if (cpmNamei(&root,gargv[i], &ino)==-1)
71     {
72       fprintf(stderr,"%s: can not find %s: %s\n",cmd,gargv[i],boo);
73       exitcode=1;
74     }
75     else if (cpmChmod(&ino, mode) == -1)
76     {
77       fprintf(stderr,"%s: Failed to set attributes for %s: %s\n",cmd,gargv[i],boo);
78       exitcode=1;
79     }
80   }
81   exit(exitcode);
82 }
83 /*}}}*/