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