2 64f7506b 2006-02-24 devnull * old (V6 and before) PDP-11 Unix filesystem
4 64f7506b 2006-02-24 devnull #include <u.h>
5 64f7506b 2006-02-24 devnull #include <libc.h>
6 64f7506b 2006-02-24 devnull #include <auth.h>
7 64f7506b 2006-02-24 devnull #include <fcall.h>
8 64f7506b 2006-02-24 devnull #include "tapefs.h"
11 64f7506b 2006-02-24 devnull * v6 disk inode
13 64f7506b 2006-02-24 devnull #define V6NADDR 8
14 64f7506b 2006-02-24 devnull #define V6FMT 0160000
15 64f7506b 2006-02-24 devnull #define V6IFREG 0100000
16 64f7506b 2006-02-24 devnull #define V6IFDIR 0140000
17 64f7506b 2006-02-24 devnull #define V6IFCHR 0120000
18 64f7506b 2006-02-24 devnull #define V6IFBLK 0160000
19 64f7506b 2006-02-24 devnull #define V6MODE 0777
20 64f7506b 2006-02-24 devnull #define V6LARGE 010000
21 64f7506b 2006-02-24 devnull #define V6SUPERB 1
22 64f7506b 2006-02-24 devnull #define V6ROOT 1 /* root inode */
23 64f7506b 2006-02-24 devnull #define V6NAMELEN 14
24 64f7506b 2006-02-24 devnull #define BLSIZE 512
25 64f7506b 2006-02-24 devnull #define LINOPB (BLSIZE/sizeof(struct v6dinode))
26 64f7506b 2006-02-24 devnull #define LNINDIR (BLSIZE/sizeof(unsigned short))
28 64f7506b 2006-02-24 devnull struct v6dinode {
29 64f7506b 2006-02-24 devnull unsigned char flags[2];
30 64f7506b 2006-02-24 devnull unsigned char nlinks;
31 64f7506b 2006-02-24 devnull unsigned char uid;
32 64f7506b 2006-02-24 devnull unsigned char gid;
33 64f7506b 2006-02-24 devnull unsigned char hisize;
34 64f7506b 2006-02-24 devnull unsigned char losize[2];
35 64f7506b 2006-02-24 devnull unsigned char addr[V6NADDR][2];
36 64f7506b 2006-02-24 devnull unsigned char atime[4]; /* pdp-11 order */
37 64f7506b 2006-02-24 devnull unsigned char mtime[4]; /* pdp-11 order */
40 64f7506b 2006-02-24 devnull struct v6dir {
41 64f7506b 2006-02-24 devnull uchar ino[2];
42 64f7506b 2006-02-24 devnull char name[V6NAMELEN];
45 64f7506b 2006-02-24 devnull int tapefile;
46 64f7506b 2006-02-24 devnull Fileinf iget(int ino);
47 64f7506b 2006-02-24 devnull long bmap(Ram *r, long bno);
48 64f7506b 2006-02-24 devnull void getblk(Ram *r, long bno, char *buf);
51 64f7506b 2006-02-24 devnull populate(char *name)
53 64f7506b 2006-02-24 devnull Fileinf f;
55 64f7506b 2006-02-24 devnull replete = 0;
56 64f7506b 2006-02-24 devnull tapefile = open(name, OREAD);
57 64f7506b 2006-02-24 devnull if (tapefile<0)
58 64f7506b 2006-02-24 devnull error("Can't open argument file");
59 64f7506b 2006-02-24 devnull f = iget(V6ROOT);
60 64f7506b 2006-02-24 devnull ram->perm = f.mode;
61 64f7506b 2006-02-24 devnull ram->mtime = f.mdate;
62 64f7506b 2006-02-24 devnull ram->addr = f.addr;
63 64f7506b 2006-02-24 devnull ram->data = f.data;
64 64f7506b 2006-02-24 devnull ram->ndata = f.size;
68 64f7506b 2006-02-24 devnull popdir(Ram *r)
70 64f7506b 2006-02-24 devnull int i, ino;
71 64f7506b 2006-02-24 devnull char *cp;
72 64f7506b 2006-02-24 devnull struct v6dir *dp;
73 64f7506b 2006-02-24 devnull Fileinf f;
74 64f7506b 2006-02-24 devnull char name[V6NAMELEN+1];
77 64f7506b 2006-02-24 devnull for (i=0; i<r->ndata; i+=sizeof(struct v6dir)) {
78 64f7506b 2006-02-24 devnull if (i%BLSIZE==0)
79 64f7506b 2006-02-24 devnull cp = doread(r, i, BLSIZE);
80 64f7506b 2006-02-24 devnull dp = (struct v6dir *)(cp+i%BLSIZE);
81 64f7506b 2006-02-24 devnull ino = dp->ino[0] + (dp->ino[1]<<8);
82 64f7506b 2006-02-24 devnull if (strcmp(dp->name, ".")==0 || strcmp(dp->name, "..")==0)
83 64f7506b 2006-02-24 devnull continue;
84 64f7506b 2006-02-24 devnull if (ino==0)
85 64f7506b 2006-02-24 devnull continue;
86 64f7506b 2006-02-24 devnull f = iget(ino);
87 64f7506b 2006-02-24 devnull strncpy(name, dp->name, V6NAMELEN);
88 ada24b40 2008-05-10 rsc name[V6NAMELEN] = '\0';
89 64f7506b 2006-02-24 devnull f.name = name;
90 64f7506b 2006-02-24 devnull popfile(r, f);
92 64f7506b 2006-02-24 devnull r->replete = 1;
96 64f7506b 2006-02-24 devnull dotrunc(Ram *r)
102 64f7506b 2006-02-24 devnull docreate(Ram *r)
104 64f7506b 2006-02-24 devnull USED(r);
108 64f7506b 2006-02-24 devnull doread(Ram *r, vlong off, long cnt)
110 64f7506b 2006-02-24 devnull static char buf[Maxbuf+BLSIZE];
111 64f7506b 2006-02-24 devnull int bno, i;
113 64f7506b 2006-02-24 devnull bno = off/BLSIZE;
114 64f7506b 2006-02-24 devnull off -= bno*BLSIZE;
115 64f7506b 2006-02-24 devnull if (cnt>Maxbuf)
116 64f7506b 2006-02-24 devnull error("count too large");
117 64f7506b 2006-02-24 devnull if (off)
118 64f7506b 2006-02-24 devnull cnt += off;
120 64f7506b 2006-02-24 devnull while (cnt>0) {
121 64f7506b 2006-02-24 devnull getblk(r, bno, &buf[i*BLSIZE]);
122 64f7506b 2006-02-24 devnull cnt -= BLSIZE;
126 64f7506b 2006-02-24 devnull return buf;
130 64f7506b 2006-02-24 devnull dowrite(Ram *r, char *buf, long off, long cnt)
132 64f7506b 2006-02-24 devnull USED(r); USED(buf); USED(off); USED(cnt);
136 64f7506b 2006-02-24 devnull dopermw(Ram *r)
138 64f7506b 2006-02-24 devnull USED(r);
139 64f7506b 2006-02-24 devnull return 0;
143 64f7506b 2006-02-24 devnull * fetch an i-node
144 64f7506b 2006-02-24 devnull * -- no sanity check for now
145 64f7506b 2006-02-24 devnull * -- magic inode-to-disk-block stuff here
149 64f7506b 2006-02-24 devnull iget(int ino)
151 64f7506b 2006-02-24 devnull char buf[BLSIZE];
152 64f7506b 2006-02-24 devnull struct v6dinode *dp;
153 64f7506b 2006-02-24 devnull long flags, i;
154 64f7506b 2006-02-24 devnull Fileinf f;
156 71e936d7 2006-04-20 devnull memset(&f, 0, sizeof f);
157 64f7506b 2006-02-24 devnull seek(tapefile, BLSIZE*((ino-1)/LINOPB + V6SUPERB + 1), 0);
158 64f7506b 2006-02-24 devnull if (read(tapefile, buf, BLSIZE) != BLSIZE)
159 64f7506b 2006-02-24 devnull error("Can't read inode");
160 64f7506b 2006-02-24 devnull dp = ((struct v6dinode *)buf) + ((ino-1)%LINOPB);
161 64f7506b 2006-02-24 devnull flags = (dp->flags[1]<<8) + dp->flags[0];
162 64f7506b 2006-02-24 devnull f.size = (dp->hisize << 16) + (dp->losize[1]<<8) + dp->losize[0];
163 64f7506b 2006-02-24 devnull if ((flags&V6FMT)==V6IFCHR || (flags&V6FMT)==V6IFBLK)
164 64f7506b 2006-02-24 devnull f.size = 0;
165 64f7506b 2006-02-24 devnull f.data = emalloc(V6NADDR*sizeof(ushort));
166 64f7506b 2006-02-24 devnull for (i = 0; i < V6NADDR; i++)
167 64f7506b 2006-02-24 devnull ((ushort*)f.data)[i] = (dp->addr[i][1]<<8) + dp->addr[i][0];
168 64f7506b 2006-02-24 devnull f.mode = flags & V6MODE;
169 64f7506b 2006-02-24 devnull if ((flags&V6FMT)==V6IFDIR)
170 64f7506b 2006-02-24 devnull f.mode |= DMDIR;
171 64f7506b 2006-02-24 devnull f.uid = dp->uid;
172 64f7506b 2006-02-24 devnull f.gid = dp->gid;
173 64f7506b 2006-02-24 devnull f.mdate = (dp->mtime[2]<<0) + (dp->mtime[3]<<8)
174 64f7506b 2006-02-24 devnull +(dp->mtime[0]<<16) + (dp->mtime[1]<<24);
175 64f7506b 2006-02-24 devnull return f;
179 64f7506b 2006-02-24 devnull getblk(Ram *r, long bno, char *buf)
181 64f7506b 2006-02-24 devnull long dbno;
183 64f7506b 2006-02-24 devnull if ((dbno = bmap(r, bno)) == 0) {
184 64f7506b 2006-02-24 devnull memset(buf, 0, BLSIZE);
187 64f7506b 2006-02-24 devnull seek(tapefile, dbno*BLSIZE, 0);
188 64f7506b 2006-02-24 devnull if (read(tapefile, buf, BLSIZE) != BLSIZE)
189 64f7506b 2006-02-24 devnull error("bad read");
193 64f7506b 2006-02-24 devnull * logical to physical block
194 64f7506b 2006-02-24 devnull * only singly-indirect files for now
198 64f7506b 2006-02-24 devnull bmap(Ram *r, long bno)
200 64f7506b 2006-02-24 devnull unsigned char indbuf[LNINDIR][2];
202 64f7506b 2006-02-24 devnull if (r->ndata <= V6NADDR*BLSIZE) { /* assume size predicts largeness of file */
203 64f7506b 2006-02-24 devnull if (bno < V6NADDR)
204 64f7506b 2006-02-24 devnull return ((ushort*)r->data)[bno];
205 64f7506b 2006-02-24 devnull return 0;
207 64f7506b 2006-02-24 devnull if (bno < V6NADDR*LNINDIR) {
208 64f7506b 2006-02-24 devnull seek(tapefile, ((ushort *)r->data)[bno/LNINDIR]*BLSIZE, 0);
209 64f7506b 2006-02-24 devnull if (read(tapefile, (char *)indbuf, BLSIZE) != BLSIZE)
210 64f7506b 2006-02-24 devnull return 0;
211 64f7506b 2006-02-24 devnull return ((indbuf[bno%LNINDIR][1]<<8) + indbuf[bno%LNINDIR][0]);
213 64f7506b 2006-02-24 devnull return 0;