2 * Vax 32V Unix filesystem (same as pre-FFS Berkeley)
15 #define VIFREG 0100000
16 #define VIFDIR 0040000
17 #define VIFCHR 0120000
18 #define VIFBLK 0160000
21 #define VROOT 2 /* root inode */
23 #define MAXBLSIZE 1024
25 #define LINOPB (BLSIZE/sizeof(struct v32dinode))
26 #define LNINDIR (BLSIZE/4)
27 #define MAXLNINDIR (MAXBLSIZE/4)
30 unsigned char flags[2];
31 unsigned char nlinks[2];
34 unsigned char size[4];
35 unsigned char addr[40];
36 unsigned char atime[4];
37 unsigned char mtime[4];
38 unsigned char ctime[4];
47 Fileinf iget(int ino);
48 long bmap(Ram *r, long bno);
49 void getblk(Ram *r, long bno, char *buf);
56 BLSIZE = 512; /* 32v */
59 if(blocksize != 512 && blocksize != 1024)
60 error("bad block size");
64 tapefile = open(name, OREAD);
66 error("Can't open argument file");
82 char name[VNAMELEN+1];
85 for (i=0; i<r->ndata; i+=sizeof(struct v32dir)) {
87 cp = doread(r, i, BLSIZE);
88 dp = (struct v32dir *)(cp+i%BLSIZE);
89 ino = g2byte(dp->ino);
90 if (strcmp(dp->name, ".")==0 || strcmp(dp->name, "..")==0)
95 strncpy(name, dp->name, VNAMELEN);
96 name[VNAMELEN] = '\0';
116 doread(Ram *r, vlong off, long cnt)
118 static char buf[Maxbuf+MAXBLSIZE];
124 error("count too large");
129 getblk(r, bno, &buf[i*BLSIZE]);
138 dowrite(Ram *r, char *buf, long off, long cnt)
140 USED(r); USED(buf); USED(off); USED(cnt);
152 * -- no sanity check for now
153 * -- magic inode-to-disk-block stuff here
160 struct v32dinode *dp;
164 memset(&f, 0, sizeof f);
165 seek(tapefile, BLSIZE*((ino-1)/LINOPB + VSUPERB + 1), 0);
166 if (read(tapefile, buf, BLSIZE) != BLSIZE)
167 error("Can't read inode");
168 dp = ((struct v32dinode *)buf) + ((ino-1)%LINOPB);
169 flags = g2byte(dp->flags);
170 f.size = g4byte(dp->size);
171 if ((flags&VFMT)==VIFCHR || (flags&VFMT)==VIFBLK)
173 f.data = emalloc(VNADDR*sizeof(long));
174 for (i = 0; i < VNADDR; i++)
175 ((long*)f.data)[i] = g3byte(dp->addr+3*i);
176 f.mode = flags & VMODE;
177 if ((flags&VFMT)==VIFDIR)
179 f.uid = g2byte(dp->uid);
180 f.gid = g2byte(dp->gid);
181 f.mdate = g4byte(dp->mtime);
186 getblk(Ram *r, long bno, char *buf)
190 if ((dbno = bmap(r, bno)) == 0) {
191 memset(buf, 0, BLSIZE);
194 seek(tapefile, dbno*BLSIZE, 0);
195 if (read(tapefile, buf, BLSIZE) != BLSIZE)
200 * logical to physical block
201 * only singly-indirect files for now
205 bmap(Ram *r, long bno)
207 unsigned char indbuf[LNINDIR][sizeof(long)];
210 return ((long*)r->data)[bno];
211 if (bno < VNADDR*LNINDIR) {
212 seek(tapefile, ((long *)r->data)[(bno-(VNADDR-3))/LNINDIR]*BLSIZE, 0);
213 if (read(tapefile, (char *)indbuf, BLSIZE) != BLSIZE)
215 return ((indbuf[bno%LNINDIR][1]<<8) + indbuf[bno%LNINDIR][0]);