1 2277c5d7 2004-03-21 devnull #include <u.h>
2 2277c5d7 2004-03-21 devnull #include <libc.h>
3 2277c5d7 2004-03-21 devnull #include <auth.h>
4 2277c5d7 2004-03-21 devnull #include <fcall.h>
5 2277c5d7 2004-03-21 devnull #include <thread.h>
6 2277c5d7 2004-03-21 devnull #include <9p.h>
8 2277c5d7 2004-03-21 devnull // static char Ebadattach[] = "unknown specifier in attach";
9 2277c5d7 2004-03-21 devnull static char Ebadoffset[] = "bad offset";
10 2277c5d7 2004-03-21 devnull // static char Ebadcount[] = "bad count";
11 2277c5d7 2004-03-21 devnull static char Ebotch[] = "9P protocol botch";
12 2277c5d7 2004-03-21 devnull static char Ecreatenondir[] = "create in non-directory";
13 2277c5d7 2004-03-21 devnull static char Edupfid[] = "duplicate fid";
14 2277c5d7 2004-03-21 devnull static char Eduptag[] = "duplicate tag";
15 2277c5d7 2004-03-21 devnull static char Eisdir[] = "is a directory";
16 2277c5d7 2004-03-21 devnull static char Enocreate[] = "create prohibited";
17 2277c5d7 2004-03-21 devnull // static char Enomem[] = "out of memory";
18 2277c5d7 2004-03-21 devnull static char Enoremove[] = "remove prohibited";
19 2277c5d7 2004-03-21 devnull static char Enostat[] = "stat prohibited";
20 2277c5d7 2004-03-21 devnull static char Enotfound[] = "file not found";
21 2277c5d7 2004-03-21 devnull // static char Enowrite[] = "write prohibited";
22 2277c5d7 2004-03-21 devnull static char Enowstat[] = "wstat prohibited";
23 2277c5d7 2004-03-21 devnull static char Eperm[] = "permission denied";
24 2277c5d7 2004-03-21 devnull static char Eunknownfid[] = "unknown fid";
25 2277c5d7 2004-03-21 devnull static char Ebaddir[] = "bad directory in wstat";
26 2277c5d7 2004-03-21 devnull static char Ewalknodir[] = "walk in non-directory";
28 2277c5d7 2004-03-21 devnull static void
29 2277c5d7 2004-03-21 devnull setfcallerror(Fcall *f, char *err)
31 2277c5d7 2004-03-21 devnull f->ename = err;
32 2277c5d7 2004-03-21 devnull f->type = Rerror;
35 2277c5d7 2004-03-21 devnull static void
36 2277c5d7 2004-03-21 devnull changemsize(Srv *srv, int msize)
38 2277c5d7 2004-03-21 devnull if(srv->rbuf && srv->wbuf && srv->msize == msize)
40 2277c5d7 2004-03-21 devnull qlock(&srv->rlock);
41 2277c5d7 2004-03-21 devnull qlock(&srv->wlock);
42 2277c5d7 2004-03-21 devnull srv->msize = msize;
43 2277c5d7 2004-03-21 devnull free(srv->rbuf);
44 2277c5d7 2004-03-21 devnull free(srv->wbuf);
45 2277c5d7 2004-03-21 devnull srv->rbuf = emalloc9p(msize);
46 2277c5d7 2004-03-21 devnull srv->wbuf = emalloc9p(msize);
47 2277c5d7 2004-03-21 devnull qunlock(&srv->rlock);
48 2277c5d7 2004-03-21 devnull qunlock(&srv->wlock);
51 2277c5d7 2004-03-21 devnull static Req*
52 2277c5d7 2004-03-21 devnull getreq(Srv *s)
55 2277c5d7 2004-03-21 devnull uchar *buf;
59 2277c5d7 2004-03-21 devnull qlock(&s->rlock);
60 2277c5d7 2004-03-21 devnull if((n = read9pmsg(s->infd, s->rbuf, s->msize)) <= 0){
61 2277c5d7 2004-03-21 devnull qunlock(&s->rlock);
62 2277c5d7 2004-03-21 devnull return nil;
65 2277c5d7 2004-03-21 devnull buf = emalloc9p(n);
66 2277c5d7 2004-03-21 devnull memmove(buf, s->rbuf, n);
67 2277c5d7 2004-03-21 devnull qunlock(&s->rlock);
69 2277c5d7 2004-03-21 devnull if(convM2S(buf, n, &f) != n){
70 2277c5d7 2004-03-21 devnull free(buf);
71 2277c5d7 2004-03-21 devnull return nil;
74 2277c5d7 2004-03-21 devnull if((r=allocreq(s->rpool, f.tag)) == nil){ /* duplicate tag: cons up a fake Req */
75 2277c5d7 2004-03-21 devnull r = emalloc9p(sizeof *r);
76 2277c5d7 2004-03-21 devnull incref(&r->ref);
77 2277c5d7 2004-03-21 devnull r->tag = f.tag;
78 2277c5d7 2004-03-21 devnull r->ifcall = f;
79 2277c5d7 2004-03-21 devnull r->error = Eduptag;
80 2277c5d7 2004-03-21 devnull r->buf = buf;
81 2277c5d7 2004-03-21 devnull r->responded = 0;
82 2277c5d7 2004-03-21 devnull r->type = 0;
83 2277c5d7 2004-03-21 devnull r->srv = s;
84 2277c5d7 2004-03-21 devnull r->pool = nil;
85 2277c5d7 2004-03-21 devnull if(chatty9p)
86 2277c5d7 2004-03-21 devnull fprint(2, "<-%d- %F: dup tag\n", s->infd, &f);
87 2277c5d7 2004-03-21 devnull return r;
90 2277c5d7 2004-03-21 devnull r->srv = s;
91 2277c5d7 2004-03-21 devnull r->responded = 0;
92 2277c5d7 2004-03-21 devnull r->buf = buf;
93 2277c5d7 2004-03-21 devnull r->ifcall = f;
94 2277c5d7 2004-03-21 devnull memset(&r->ofcall, 0, sizeof r->ofcall);
95 2277c5d7 2004-03-21 devnull r->type = r->ifcall.type;
97 2277c5d7 2004-03-21 devnull if(chatty9p)
98 2277c5d7 2004-03-21 devnull if(r->error)
99 2277c5d7 2004-03-21 devnull fprint(2, "<-%d- %F: %s\n", s->infd, &r->ifcall, r->error);
101 2277c5d7 2004-03-21 devnull fprint(2, "<-%d- %F\n", s->infd, &r->ifcall);
103 2277c5d7 2004-03-21 devnull return r;
106 2277c5d7 2004-03-21 devnull static void
107 2277c5d7 2004-03-21 devnull filewalk(Req *r)
110 2277c5d7 2004-03-21 devnull File *f;
112 2277c5d7 2004-03-21 devnull f = r->fid->file;
113 2277c5d7 2004-03-21 devnull assert(f != nil);
115 2277c5d7 2004-03-21 devnull incref(&f->ref);
116 2277c5d7 2004-03-21 devnull for(i=0; i<r->ifcall.nwname; i++)
117 2277c5d7 2004-03-21 devnull if(f = walkfile(f, r->ifcall.wname[i]))
118 2277c5d7 2004-03-21 devnull r->ofcall.wqid[i] = f->dir.qid;
122 2277c5d7 2004-03-21 devnull r->ofcall.nwqid = i;
124 2277c5d7 2004-03-21 devnull r->newfid->file = f;
125 2277c5d7 2004-03-21 devnull r->newfid->qid = r->newfid->file->dir.qid;
127 2277c5d7 2004-03-21 devnull respond(r, nil);
131 2277c5d7 2004-03-21 devnull walkandclone(Req *r, char *(*walk1)(Fid*, char*, void*), char *(*clone)(Fid*, Fid*, void*), void *arg)
134 2277c5d7 2004-03-21 devnull char *e;
136 2277c5d7 2004-03-21 devnull if(r->fid == r->newfid && r->ifcall.nwname > 1){
137 2277c5d7 2004-03-21 devnull respond(r, "lib9p: unused documented feature not implemented");
141 2277c5d7 2004-03-21 devnull if(r->fid != r->newfid){
142 2277c5d7 2004-03-21 devnull r->newfid->qid = r->fid->qid;
143 2277c5d7 2004-03-21 devnull if(clone && (e = clone(r->fid, r->newfid, arg))){
144 2277c5d7 2004-03-21 devnull respond(r, e);
149 2277c5d7 2004-03-21 devnull e = nil;
150 2277c5d7 2004-03-21 devnull for(i=0; i<r->ifcall.nwname; i++){
151 2277c5d7 2004-03-21 devnull if(e = walk1(r->newfid, r->ifcall.wname[i], arg))
153 2277c5d7 2004-03-21 devnull r->ofcall.wqid[i] = r->newfid->qid;
156 2277c5d7 2004-03-21 devnull r->ofcall.nwqid = i;
157 2277c5d7 2004-03-21 devnull if(e && i==0)
158 2277c5d7 2004-03-21 devnull respond(r, e);
160 2277c5d7 2004-03-21 devnull respond(r, nil);
163 2277c5d7 2004-03-21 devnull static void
164 2277c5d7 2004-03-21 devnull sversion(Srv *srv, Req *r)
166 2277c5d7 2004-03-21 devnull USED(srv);
168 2277c5d7 2004-03-21 devnull if(strncmp(r->ifcall.version, "9P", 2) != 0){
169 2277c5d7 2004-03-21 devnull r->ofcall.version = "unknown";
170 2277c5d7 2004-03-21 devnull respond(r, nil);
174 2277c5d7 2004-03-21 devnull r->ofcall.version = "9P2000";
175 2277c5d7 2004-03-21 devnull r->ofcall.msize = r->ifcall.msize;
176 2277c5d7 2004-03-21 devnull respond(r, nil);
178 2277c5d7 2004-03-21 devnull static void
179 2277c5d7 2004-03-21 devnull rversion(Req *r, char *error)
181 2277c5d7 2004-03-21 devnull assert(error == nil);
182 2277c5d7 2004-03-21 devnull changemsize(r->srv, r->ofcall.msize);
185 2277c5d7 2004-03-21 devnull static void
186 2277c5d7 2004-03-21 devnull sauth(Srv *srv, Req *r)
188 2277c5d7 2004-03-21 devnull char e[ERRMAX];
190 2277c5d7 2004-03-21 devnull if((r->afid = allocfid(srv->fpool, r->ifcall.afid)) == nil){
191 2277c5d7 2004-03-21 devnull respond(r, Edupfid);
194 2277c5d7 2004-03-21 devnull if(srv->auth)
195 2277c5d7 2004-03-21 devnull srv->auth(r);
197 2277c5d7 2004-03-21 devnull snprint(e, sizeof e, "%s: authentication not required", argv0);
198 2277c5d7 2004-03-21 devnull respond(r, e);
201 2277c5d7 2004-03-21 devnull static void
202 2277c5d7 2004-03-21 devnull rauth(Req *r, char *error)
204 2277c5d7 2004-03-21 devnull if(error && r->afid)
205 2277c5d7 2004-03-21 devnull closefid(removefid(r->srv->fpool, r->afid->fid));
208 2277c5d7 2004-03-21 devnull static void
209 2277c5d7 2004-03-21 devnull sattach(Srv *srv, Req *r)
211 2277c5d7 2004-03-21 devnull if((r->fid = allocfid(srv->fpool, r->ifcall.fid)) == nil){
212 2277c5d7 2004-03-21 devnull respond(r, Edupfid);
215 2277c5d7 2004-03-21 devnull r->afid = nil;
216 2277c5d7 2004-03-21 devnull if(r->ifcall.afid != NOFID && (r->afid = lookupfid(srv->fpool, r->ifcall.afid)) == nil){
217 2277c5d7 2004-03-21 devnull respond(r, Eunknownfid);
220 2277c5d7 2004-03-21 devnull r->fid->uid = estrdup9p(r->ifcall.uname);
221 2277c5d7 2004-03-21 devnull if(srv->tree){
222 2277c5d7 2004-03-21 devnull r->fid->file = srv->tree->root;
223 2277c5d7 2004-03-21 devnull /* BUG? incref(r->fid->file) ??? */
224 2277c5d7 2004-03-21 devnull r->ofcall.qid = r->fid->file->dir.qid;
225 2277c5d7 2004-03-21 devnull r->fid->qid = r->ofcall.qid;
227 2277c5d7 2004-03-21 devnull if(srv->attach)
228 2277c5d7 2004-03-21 devnull srv->attach(r);
230 2277c5d7 2004-03-21 devnull respond(r, nil);
233 2277c5d7 2004-03-21 devnull static void
234 2277c5d7 2004-03-21 devnull rattach(Req *r, char *error)
236 2277c5d7 2004-03-21 devnull if(error && r->fid)
237 2277c5d7 2004-03-21 devnull closefid(removefid(r->srv->fpool, r->fid->fid));
240 2277c5d7 2004-03-21 devnull static void
241 2277c5d7 2004-03-21 devnull sflush(Srv *srv, Req *r)
243 2277c5d7 2004-03-21 devnull r->oldreq = lookupreq(srv->rpool, r->ifcall.oldtag);
244 2277c5d7 2004-03-21 devnull if(r->oldreq == nil || r->oldreq == r)
245 2277c5d7 2004-03-21 devnull respond(r, nil);
246 2277c5d7 2004-03-21 devnull else if(srv->flush)
247 2277c5d7 2004-03-21 devnull srv->flush(r);
249 2277c5d7 2004-03-21 devnull respond(r, nil);
251 2277c5d7 2004-03-21 devnull static int
252 2277c5d7 2004-03-21 devnull rflush(Req *r, char *error)
254 2277c5d7 2004-03-21 devnull Req *or;
256 2277c5d7 2004-03-21 devnull assert(error == nil);
257 2277c5d7 2004-03-21 devnull or = r->oldreq;
259 2277c5d7 2004-03-21 devnull qlock(&or->lk);
260 2277c5d7 2004-03-21 devnull if(or->responded == 0){
261 2277c5d7 2004-03-21 devnull or->flush = erealloc9p(or->flush, (or->nflush+1)*sizeof(or->flush[0]));
262 2277c5d7 2004-03-21 devnull or->flush[or->nflush++] = r;
263 2277c5d7 2004-03-21 devnull qunlock(&or->lk);
264 2277c5d7 2004-03-21 devnull return -1; /* delay response until or is responded */
266 2277c5d7 2004-03-21 devnull qunlock(&or->lk);
267 2277c5d7 2004-03-21 devnull closereq(or);
269 2277c5d7 2004-03-21 devnull r->oldreq = nil;
270 2277c5d7 2004-03-21 devnull return 0;
273 2277c5d7 2004-03-21 devnull static char*
274 2277c5d7 2004-03-21 devnull oldwalk1(Fid *fid, char *name, void *arg)
276 2277c5d7 2004-03-21 devnull char *e;
277 2277c5d7 2004-03-21 devnull Qid qid;
278 2277c5d7 2004-03-21 devnull Srv *srv;
280 2277c5d7 2004-03-21 devnull srv = arg;
281 2277c5d7 2004-03-21 devnull e = srv->walk1(fid, name, &qid);
283 2277c5d7 2004-03-21 devnull return e;
284 2277c5d7 2004-03-21 devnull fid->qid = qid;
285 2277c5d7 2004-03-21 devnull return nil;
288 2277c5d7 2004-03-21 devnull static char*
289 2277c5d7 2004-03-21 devnull oldclone(Fid *fid, Fid *newfid, void *arg)
291 2277c5d7 2004-03-21 devnull Srv *srv;
293 2277c5d7 2004-03-21 devnull srv = arg;
294 2277c5d7 2004-03-21 devnull if(srv->clone == nil)
295 2277c5d7 2004-03-21 devnull return nil;
296 2277c5d7 2004-03-21 devnull return srv->clone(fid, newfid);
299 2277c5d7 2004-03-21 devnull static void
300 2277c5d7 2004-03-21 devnull swalk(Srv *srv, Req *r)
302 2277c5d7 2004-03-21 devnull if((r->fid = lookupfid(srv->fpool, r->ifcall.fid)) == nil){
303 2277c5d7 2004-03-21 devnull respond(r, Eunknownfid);
306 2277c5d7 2004-03-21 devnull if(r->fid->omode != -1){
307 2277c5d7 2004-03-21 devnull respond(r, "cannot clone open fid");
310 2277c5d7 2004-03-21 devnull if(r->ifcall.nwname && !(r->fid->qid.type&QTDIR)){
311 2277c5d7 2004-03-21 devnull respond(r, Ewalknodir);
314 2277c5d7 2004-03-21 devnull if(r->ifcall.fid != r->ifcall.newfid){
315 2277c5d7 2004-03-21 devnull if((r->newfid = allocfid(srv->fpool, r->ifcall.newfid)) == nil){
316 2277c5d7 2004-03-21 devnull respond(r, Edupfid);
319 2277c5d7 2004-03-21 devnull r->newfid->uid = estrdup9p(r->fid->uid);
321 2277c5d7 2004-03-21 devnull incref(&r->fid->ref);
322 2277c5d7 2004-03-21 devnull r->newfid = r->fid;
324 2277c5d7 2004-03-21 devnull if(r->fid->file){
325 2277c5d7 2004-03-21 devnull filewalk(r);
326 2277c5d7 2004-03-21 devnull }else if(srv->walk1)
327 2277c5d7 2004-03-21 devnull walkandclone(r, oldwalk1, oldclone, srv);
328 2277c5d7 2004-03-21 devnull else if(srv->walk)
329 2277c5d7 2004-03-21 devnull srv->walk(r);
331 2277c5d7 2004-03-21 devnull sysfatal("no walk function, no file trees");
333 2277c5d7 2004-03-21 devnull static void
334 2277c5d7 2004-03-21 devnull rwalk(Req *r, char *error)
336 2277c5d7 2004-03-21 devnull if(error || r->ofcall.nwqid < r->ifcall.nwname){
337 2277c5d7 2004-03-21 devnull if(r->ifcall.fid != r->ifcall.newfid && r->newfid)
338 2277c5d7 2004-03-21 devnull closefid(removefid(r->srv->fpool, r->newfid->fid));
339 2277c5d7 2004-03-21 devnull if (r->ofcall.nwqid==0){
340 2277c5d7 2004-03-21 devnull if(error==nil && r->ifcall.nwname!=0)
341 2277c5d7 2004-03-21 devnull r->error = Enotfound;
343 2277c5d7 2004-03-21 devnull r->error = nil; // No error on partial walks
345 2277c5d7 2004-03-21 devnull if(r->ofcall.nwqid == 0){
346 2277c5d7 2004-03-21 devnull /* Just a clone */
347 2277c5d7 2004-03-21 devnull r->newfid->qid = r->fid->qid;
349 2277c5d7 2004-03-21 devnull /* if file trees are in use, filewalk took care of the rest */
350 2277c5d7 2004-03-21 devnull r->newfid->qid = r->ofcall.wqid[r->ofcall.nwqid-1];
355 2277c5d7 2004-03-21 devnull static void
356 2277c5d7 2004-03-21 devnull sopen(Srv *srv, Req *r)
360 2277c5d7 2004-03-21 devnull if((r->fid = lookupfid(srv->fpool, r->ifcall.fid)) == nil){
361 2277c5d7 2004-03-21 devnull respond(r, Eunknownfid);
364 2277c5d7 2004-03-21 devnull if(r->fid->omode != -1){
365 2277c5d7 2004-03-21 devnull respond(r, Ebotch);
368 2277c5d7 2004-03-21 devnull if((r->fid->qid.type&QTDIR) && (r->ifcall.mode&~ORCLOSE) != OREAD){
369 2277c5d7 2004-03-21 devnull respond(r, Eisdir);
372 2277c5d7 2004-03-21 devnull r->ofcall.qid = r->fid->qid;
373 2277c5d7 2004-03-21 devnull switch(r->ifcall.mode&3){
374 2277c5d7 2004-03-21 devnull default:
375 2277c5d7 2004-03-21 devnull assert(0);
376 2277c5d7 2004-03-21 devnull case OREAD:
377 2277c5d7 2004-03-21 devnull p = AREAD;
379 2277c5d7 2004-03-21 devnull case OWRITE:
380 2277c5d7 2004-03-21 devnull p = AWRITE;
382 2277c5d7 2004-03-21 devnull case ORDWR:
383 2277c5d7 2004-03-21 devnull p = AREAD|AWRITE;
385 2277c5d7 2004-03-21 devnull case OEXEC:
386 2277c5d7 2004-03-21 devnull p = AEXEC;
389 2277c5d7 2004-03-21 devnull if(r->ifcall.mode&OTRUNC)
390 2277c5d7 2004-03-21 devnull p |= AWRITE;
391 2277c5d7 2004-03-21 devnull if((r->fid->qid.type&QTDIR) && p!=AREAD){
392 2277c5d7 2004-03-21 devnull respond(r, Eperm);
395 2277c5d7 2004-03-21 devnull if(r->fid->file){
396 2277c5d7 2004-03-21 devnull if(!hasperm(r->fid->file, r->fid->uid, p)){
397 2277c5d7 2004-03-21 devnull respond(r, Eperm);
400 2277c5d7 2004-03-21 devnull /* BUG RACE */
401 2277c5d7 2004-03-21 devnull if((r->ifcall.mode&ORCLOSE)
402 2277c5d7 2004-03-21 devnull && !hasperm(r->fid->file->parent, r->fid->uid, AWRITE)){
403 2277c5d7 2004-03-21 devnull respond(r, Eperm);
406 2277c5d7 2004-03-21 devnull r->ofcall.qid = r->fid->file->dir.qid;
407 2277c5d7 2004-03-21 devnull if((r->ofcall.qid.type&QTDIR)
408 2277c5d7 2004-03-21 devnull && (r->fid->rdir = opendirfile(r->fid->file)) == nil){
409 2277c5d7 2004-03-21 devnull respond(r, "opendirfile failed");
413 2277c5d7 2004-03-21 devnull if(srv->open)
414 2277c5d7 2004-03-21 devnull srv->open(r);
416 2277c5d7 2004-03-21 devnull respond(r, nil);
418 2277c5d7 2004-03-21 devnull static void
419 2277c5d7 2004-03-21 devnull ropen(Req *r, char *error)
421 2277c5d7 2004-03-21 devnull char errbuf[ERRMAX];
422 2277c5d7 2004-03-21 devnull if(error)
424 2277c5d7 2004-03-21 devnull if(chatty9p){
425 2277c5d7 2004-03-21 devnull snprint(errbuf, sizeof errbuf, "fid mode is 0x%ux\n", r->ifcall.mode);
426 2277c5d7 2004-03-21 devnull write(2, errbuf, strlen(errbuf));
428 2277c5d7 2004-03-21 devnull r->fid->omode = r->ifcall.mode;
429 2277c5d7 2004-03-21 devnull r->fid->qid = r->ofcall.qid;
430 2277c5d7 2004-03-21 devnull if(r->ofcall.qid.type&QTDIR)
431 2277c5d7 2004-03-21 devnull r->fid->diroffset = 0;
434 2277c5d7 2004-03-21 devnull static void
435 2277c5d7 2004-03-21 devnull screate(Srv *srv, Req *r)
437 2277c5d7 2004-03-21 devnull if((r->fid = lookupfid(srv->fpool, r->ifcall.fid)) == nil)
438 2277c5d7 2004-03-21 devnull respond(r, Eunknownfid);
439 2277c5d7 2004-03-21 devnull else if(r->fid->omode != -1)
440 2277c5d7 2004-03-21 devnull respond(r, Ebotch);
441 2277c5d7 2004-03-21 devnull else if(!(r->fid->qid.type&QTDIR))
442 2277c5d7 2004-03-21 devnull respond(r, Ecreatenondir);
443 2277c5d7 2004-03-21 devnull else if(r->fid->file && !hasperm(r->fid->file, r->fid->uid, AWRITE))
444 2277c5d7 2004-03-21 devnull respond(r, Eperm);
445 2277c5d7 2004-03-21 devnull else if(srv->create)
446 2277c5d7 2004-03-21 devnull srv->create(r);
448 2277c5d7 2004-03-21 devnull respond(r, Enocreate);
450 2277c5d7 2004-03-21 devnull static void
451 2277c5d7 2004-03-21 devnull rcreate(Req *r, char *error)
453 2277c5d7 2004-03-21 devnull if(error)
455 2277c5d7 2004-03-21 devnull r->fid->omode = r->ifcall.mode;
456 2277c5d7 2004-03-21 devnull r->fid->qid = r->ofcall.qid;
459 2277c5d7 2004-03-21 devnull static void
460 2277c5d7 2004-03-21 devnull sread(Srv *srv, Req *r)
464 2277c5d7 2004-03-21 devnull if((r->fid = lookupfid(srv->fpool, r->ifcall.fid)) == nil){
465 2277c5d7 2004-03-21 devnull respond(r, Eunknownfid);
468 2277c5d7 2004-03-21 devnull if(r->ifcall.count < 0){
469 2277c5d7 2004-03-21 devnull respond(r, Ebotch);
472 2277c5d7 2004-03-21 devnull if(r->ifcall.offset < 0
473 2277c5d7 2004-03-21 devnull || ((r->fid->qid.type&QTDIR) && r->ifcall.offset != 0 && r->ifcall.offset != r->fid->diroffset)){
474 2277c5d7 2004-03-21 devnull respond(r, Ebadoffset);
478 2277c5d7 2004-03-21 devnull if(r->ifcall.count > srv->msize - IOHDRSZ)
479 2277c5d7 2004-03-21 devnull r->ifcall.count = srv->msize - IOHDRSZ;
480 2277c5d7 2004-03-21 devnull r->rbuf = emalloc9p(r->ifcall.count);
481 2277c5d7 2004-03-21 devnull r->ofcall.data = r->rbuf;
482 2277c5d7 2004-03-21 devnull o = r->fid->omode & 3;
483 2277c5d7 2004-03-21 devnull if(o != OREAD && o != ORDWR && o != OEXEC){
484 2277c5d7 2004-03-21 devnull respond(r, Ebotch);
487 2277c5d7 2004-03-21 devnull if((r->fid->qid.type&QTDIR) && r->fid->file){
488 2277c5d7 2004-03-21 devnull r->ofcall.count = readdirfile(r->fid->rdir, r->rbuf, r->ifcall.count);
489 2277c5d7 2004-03-21 devnull respond(r, nil);
492 2277c5d7 2004-03-21 devnull if(srv->read)
493 2277c5d7 2004-03-21 devnull srv->read(r);
495 2277c5d7 2004-03-21 devnull respond(r, "no srv->read");
497 2277c5d7 2004-03-21 devnull static void
498 2277c5d7 2004-03-21 devnull rread(Req *r, char *error)
500 2277c5d7 2004-03-21 devnull if(error==nil && (r->fid->qid.type&QTDIR))
501 2277c5d7 2004-03-21 devnull r->fid->diroffset += r->ofcall.count;
504 2277c5d7 2004-03-21 devnull static void
505 2277c5d7 2004-03-21 devnull swrite(Srv *srv, Req *r)
508 2277c5d7 2004-03-21 devnull char e[ERRMAX];
510 2277c5d7 2004-03-21 devnull if((r->fid = lookupfid(srv->fpool, r->ifcall.fid)) == nil){
511 2277c5d7 2004-03-21 devnull respond(r, Eunknownfid);
514 2277c5d7 2004-03-21 devnull if(r->ifcall.count < 0){
515 2277c5d7 2004-03-21 devnull respond(r, Ebotch);
518 2277c5d7 2004-03-21 devnull if(r->ifcall.offset < 0){
519 2277c5d7 2004-03-21 devnull respond(r, Ebotch);
522 2277c5d7 2004-03-21 devnull if(r->ifcall.count > srv->msize - IOHDRSZ)
523 2277c5d7 2004-03-21 devnull r->ifcall.count = srv->msize - IOHDRSZ;
524 2277c5d7 2004-03-21 devnull o = r->fid->omode & 3;
525 2277c5d7 2004-03-21 devnull if(o != OWRITE && o != ORDWR){
526 2277c5d7 2004-03-21 devnull snprint(e, sizeof e, "write on fid with open mode 0x%ux", r->fid->omode);
527 2277c5d7 2004-03-21 devnull respond(r, e);
530 2277c5d7 2004-03-21 devnull if(srv->write)
531 2277c5d7 2004-03-21 devnull srv->write(r);
533 2277c5d7 2004-03-21 devnull respond(r, "no srv->write");
535 2277c5d7 2004-03-21 devnull static void
536 2277c5d7 2004-03-21 devnull rwrite(Req *r, char *error)
538 2277c5d7 2004-03-21 devnull if(error)
540 2277c5d7 2004-03-21 devnull if(r->fid->file)
541 2277c5d7 2004-03-21 devnull r->fid->file->dir.qid.vers++;
544 2277c5d7 2004-03-21 devnull static void
545 2277c5d7 2004-03-21 devnull sclunk(Srv *srv, Req *r)
547 2277c5d7 2004-03-21 devnull if((r->fid = removefid(srv->fpool, r->ifcall.fid)) == nil)
548 2277c5d7 2004-03-21 devnull respond(r, Eunknownfid);
550 2277c5d7 2004-03-21 devnull respond(r, nil);
552 2277c5d7 2004-03-21 devnull static void
553 2277c5d7 2004-03-21 devnull rclunk(Req *r, char *msg)
555 2277c5d7 2004-03-21 devnull USED(r);
556 2277c5d7 2004-03-21 devnull USED(msg);
559 2277c5d7 2004-03-21 devnull static void
560 2277c5d7 2004-03-21 devnull sremove(Srv *srv, Req *r)
562 2277c5d7 2004-03-21 devnull if((r->fid = removefid(srv->fpool, r->ifcall.fid)) == nil){
563 2277c5d7 2004-03-21 devnull respond(r, Eunknownfid);
566 2277c5d7 2004-03-21 devnull /* BUG RACE */
567 2277c5d7 2004-03-21 devnull if(r->fid->file && !hasperm(r->fid->file->parent, r->fid->uid, AWRITE)){
568 2277c5d7 2004-03-21 devnull respond(r, Eperm);
571 2277c5d7 2004-03-21 devnull if(srv->remove)
572 2277c5d7 2004-03-21 devnull srv->remove(r);
574 2277c5d7 2004-03-21 devnull respond(r, r->fid->file ? nil : Enoremove);
576 2277c5d7 2004-03-21 devnull static void
577 2277c5d7 2004-03-21 devnull rremove(Req *r, char *error, char *errbuf)
579 2277c5d7 2004-03-21 devnull if(error)
581 2277c5d7 2004-03-21 devnull if(r->fid->file){
582 2277c5d7 2004-03-21 devnull if(removefile(r->fid->file) < 0){
583 2277c5d7 2004-03-21 devnull snprint(errbuf, ERRMAX, "remove %s: %r",
584 2277c5d7 2004-03-21 devnull r->fid->file->dir.name);
585 2277c5d7 2004-03-21 devnull r->error = errbuf;
587 2277c5d7 2004-03-21 devnull r->fid->file = nil;
591 2277c5d7 2004-03-21 devnull static void
592 2277c5d7 2004-03-21 devnull sstat(Srv *srv, Req *r)
594 2277c5d7 2004-03-21 devnull if((r->fid = lookupfid(srv->fpool, r->ifcall.fid)) == nil){
595 2277c5d7 2004-03-21 devnull respond(r, Eunknownfid);
598 2277c5d7 2004-03-21 devnull if(r->fid->file){
599 2277c5d7 2004-03-21 devnull r->d = r->fid->file->dir;
600 2277c5d7 2004-03-21 devnull if(r->d.name)
601 2277c5d7 2004-03-21 devnull r->d.name = estrdup9p(r->d.name);
602 2277c5d7 2004-03-21 devnull if(r->d.uid)
603 2277c5d7 2004-03-21 devnull r->d.uid = estrdup9p(r->d.uid);
604 2277c5d7 2004-03-21 devnull if(r->d.gid)
605 2277c5d7 2004-03-21 devnull r->d.gid = estrdup9p(r->d.gid);
606 2277c5d7 2004-03-21 devnull if(r->d.muid)
607 2277c5d7 2004-03-21 devnull r->d.muid = estrdup9p(r->d.muid);
609 2277c5d7 2004-03-21 devnull if(srv->stat)
610 2277c5d7 2004-03-21 devnull srv->stat(r);
611 2277c5d7 2004-03-21 devnull else if(r->fid->file)
612 2277c5d7 2004-03-21 devnull respond(r, nil);
614 2277c5d7 2004-03-21 devnull respond(r, Enostat);
616 2277c5d7 2004-03-21 devnull static void
617 2277c5d7 2004-03-21 devnull rstat(Req *r, char *error)
620 2277c5d7 2004-03-21 devnull uchar *statbuf;
621 2277c5d7 2004-03-21 devnull uchar tmp[BIT16SZ];
623 2277c5d7 2004-03-21 devnull if(error)
625 2277c5d7 2004-03-21 devnull if(convD2M(&r->d, tmp, BIT16SZ) != BIT16SZ){
626 2277c5d7 2004-03-21 devnull r->error = "convD2M(_,_,BIT16SZ) did not return BIT16SZ";
629 2277c5d7 2004-03-21 devnull n = GBIT16(tmp)+BIT16SZ;
630 2277c5d7 2004-03-21 devnull statbuf = emalloc9p(n);
631 2277c5d7 2004-03-21 devnull if(statbuf == nil){
632 2277c5d7 2004-03-21 devnull r->error = "out of memory";
635 2277c5d7 2004-03-21 devnull r->ofcall.nstat = convD2M(&r->d, statbuf, n);
636 2277c5d7 2004-03-21 devnull r->ofcall.stat = statbuf; /* freed in closereq */
637 2277c5d7 2004-03-21 devnull if(r->ofcall.nstat <= BIT16SZ){
638 2277c5d7 2004-03-21 devnull r->error = "convD2M fails";
639 2277c5d7 2004-03-21 devnull free(statbuf);
644 2277c5d7 2004-03-21 devnull static void
645 2277c5d7 2004-03-21 devnull swstat(Srv *srv, Req *r)
647 2277c5d7 2004-03-21 devnull if((r->fid = lookupfid(srv->fpool, r->ifcall.fid)) == nil){
648 2277c5d7 2004-03-21 devnull respond(r, Eunknownfid);
651 2277c5d7 2004-03-21 devnull if(srv->wstat == nil){
652 2277c5d7 2004-03-21 devnull respond(r, Enowstat);
655 2277c5d7 2004-03-21 devnull if(convM2D(r->ifcall.stat, r->ifcall.nstat, &r->d, (char*)r->ifcall.stat) != r->ifcall.nstat){
656 2277c5d7 2004-03-21 devnull respond(r, Ebaddir);
659 2277c5d7 2004-03-21 devnull if((ushort)~r->d.type){
660 2277c5d7 2004-03-21 devnull respond(r, "wstat -- attempt to change type");
663 2277c5d7 2004-03-21 devnull if((uint)~r->d.dev){
664 2277c5d7 2004-03-21 devnull respond(r, "wstat -- attempt to change dev");
667 2277c5d7 2004-03-21 devnull if((uchar)~r->d.qid.type || (ulong)~r->d.qid.vers || (uvlong)~r->d.qid.path){
668 2277c5d7 2004-03-21 devnull respond(r, "wstat -- attempt to change qid");
671 2277c5d7 2004-03-21 devnull if(r->d.muid && r->d.muid[0]){
672 2277c5d7 2004-03-21 devnull respond(r, "wstat -- attempt to change muid");
675 2277c5d7 2004-03-21 devnull if((ulong)~r->d.mode && ((r->d.mode&DMDIR)>>24) != (r->fid->qid.type&QTDIR)){
676 2277c5d7 2004-03-21 devnull respond(r, "wstat -- attempt to change DMDIR bit");
679 2277c5d7 2004-03-21 devnull srv->wstat(r);
681 2277c5d7 2004-03-21 devnull static void
682 2277c5d7 2004-03-21 devnull rwstat(Req *r, char *msg)
684 2277c5d7 2004-03-21 devnull USED(r);
685 2277c5d7 2004-03-21 devnull USED(msg);
689 2277c5d7 2004-03-21 devnull srv(Srv *srv)
693 2277c5d7 2004-03-21 devnull fmtinstall('D', dirfmt);
694 2277c5d7 2004-03-21 devnull fmtinstall('F', fcallfmt);
696 2277c5d7 2004-03-21 devnull if(srv->fpool == nil)
697 2277c5d7 2004-03-21 devnull srv->fpool = allocfidpool(srv->destroyfid);
698 2277c5d7 2004-03-21 devnull if(srv->rpool == nil)
699 2277c5d7 2004-03-21 devnull srv->rpool = allocreqpool(srv->destroyreq);
700 2277c5d7 2004-03-21 devnull if(srv->msize == 0)
701 2277c5d7 2004-03-21 devnull srv->msize = 8192+IOHDRSZ;
703 2277c5d7 2004-03-21 devnull changemsize(srv, srv->msize);
705 2277c5d7 2004-03-21 devnull srv->fpool->srv = srv;
706 2277c5d7 2004-03-21 devnull srv->rpool->srv = srv;
708 2277c5d7 2004-03-21 devnull while(r = getreq(srv)){
709 2277c5d7 2004-03-21 devnull if(r->error){
710 2277c5d7 2004-03-21 devnull respond(r, r->error);
711 2277c5d7 2004-03-21 devnull continue;
713 2277c5d7 2004-03-21 devnull switch(r->ifcall.type){
714 2277c5d7 2004-03-21 devnull default:
715 2277c5d7 2004-03-21 devnull respond(r, "unknown message");
717 2277c5d7 2004-03-21 devnull case Tversion: sversion(srv, r); break;
718 2277c5d7 2004-03-21 devnull case Tauth: sauth(srv, r); break;
719 2277c5d7 2004-03-21 devnull case Tattach: sattach(srv, r); break;
720 2277c5d7 2004-03-21 devnull case Tflush: sflush(srv, r); break;
721 2277c5d7 2004-03-21 devnull case Twalk: swalk(srv, r); break;
722 2277c5d7 2004-03-21 devnull case Topen: sopen(srv, r); break;
723 2277c5d7 2004-03-21 devnull case Tcreate: screate(srv, r); break;
724 2277c5d7 2004-03-21 devnull case Tread: sread(srv, r); break;
725 2277c5d7 2004-03-21 devnull case Twrite: swrite(srv, r); break;
726 2277c5d7 2004-03-21 devnull case Tclunk: sclunk(srv, r); break;
727 2277c5d7 2004-03-21 devnull case Tremove: sremove(srv, r); break;
728 2277c5d7 2004-03-21 devnull case Tstat: sstat(srv, r); break;
729 2277c5d7 2004-03-21 devnull case Twstat: swstat(srv, r); break;
733 2277c5d7 2004-03-21 devnull if(srv->end)
734 2277c5d7 2004-03-21 devnull srv->end(srv);
738 2277c5d7 2004-03-21 devnull respond(Req *r, char *error)
740 2277c5d7 2004-03-21 devnull int i, m, n;
741 2277c5d7 2004-03-21 devnull char errbuf[ERRMAX];
742 2277c5d7 2004-03-21 devnull Srv *srv;
744 2277c5d7 2004-03-21 devnull srv = r->srv;
745 2277c5d7 2004-03-21 devnull assert(srv != nil);
747 2277c5d7 2004-03-21 devnull assert(r->responded == 0);
748 2277c5d7 2004-03-21 devnull r->error = error;
750 2277c5d7 2004-03-21 devnull switch(r->ifcall.type){
751 2277c5d7 2004-03-21 devnull default:
752 2277c5d7 2004-03-21 devnull assert(0);
754 2277c5d7 2004-03-21 devnull * Flush is special. If the handler says so, we return
755 2277c5d7 2004-03-21 devnull * without further processing. Respond will be called
756 2277c5d7 2004-03-21 devnull * again once it is safe.
758 2277c5d7 2004-03-21 devnull case Tflush:
759 2277c5d7 2004-03-21 devnull if(rflush(r, error)<0)
762 2277c5d7 2004-03-21 devnull case Tversion: rversion(r, error); break;
763 2277c5d7 2004-03-21 devnull case Tauth: rauth(r, error); break;
764 2277c5d7 2004-03-21 devnull case Tattach: rattach(r, error); break;
765 2277c5d7 2004-03-21 devnull case Twalk: rwalk(r, error); break;
766 2277c5d7 2004-03-21 devnull case Topen: ropen(r, error); break;
767 2277c5d7 2004-03-21 devnull case Tcreate: rcreate(r, error); break;
768 2277c5d7 2004-03-21 devnull case Tread: rread(r, error); break;
769 2277c5d7 2004-03-21 devnull case Twrite: rwrite(r, error); break;
770 2277c5d7 2004-03-21 devnull case Tclunk: rclunk(r, error); break;
771 2277c5d7 2004-03-21 devnull case Tremove: rremove(r, error, errbuf); break;
772 2277c5d7 2004-03-21 devnull case Tstat: rstat(r, error); break;
773 2277c5d7 2004-03-21 devnull case Twstat: rwstat(r, error); break;
776 2277c5d7 2004-03-21 devnull r->ofcall.tag = r->ifcall.tag;
777 2277c5d7 2004-03-21 devnull r->ofcall.type = r->ifcall.type+1;
778 2277c5d7 2004-03-21 devnull if(r->error)
779 2277c5d7 2004-03-21 devnull setfcallerror(&r->ofcall, r->error);
781 2277c5d7 2004-03-21 devnull if(chatty9p)
782 2277c5d7 2004-03-21 devnull fprint(2, "-%d-> %F\n", srv->outfd, &r->ofcall);
784 2277c5d7 2004-03-21 devnull qlock(&srv->wlock);
785 2277c5d7 2004-03-21 devnull n = convS2M(&r->ofcall, srv->wbuf, srv->msize);
786 2277c5d7 2004-03-21 devnull if(n <= 0){
787 2277c5d7 2004-03-21 devnull fprint(2, "n = %d %F\n", n, &r->ofcall);
788 2277c5d7 2004-03-21 devnull abort();
790 2277c5d7 2004-03-21 devnull assert(n > 2);
791 2277c5d7 2004-03-21 devnull if(r->pool) /* not a fake */
792 2277c5d7 2004-03-21 devnull closereq(removereq(r->pool, r->ifcall.tag));
793 2277c5d7 2004-03-21 devnull m = write(srv->outfd, srv->wbuf, n);
794 2277c5d7 2004-03-21 devnull if(m != n)
795 2277c5d7 2004-03-21 devnull sysfatal("lib9p srv: write %d returned %d on fd %d: %r", n, m, srv->outfd);
796 2277c5d7 2004-03-21 devnull qunlock(&srv->wlock);
798 2277c5d7 2004-03-21 devnull qlock(&r->lk); /* no one will add flushes now */
799 2277c5d7 2004-03-21 devnull r->responded = 1;
800 2277c5d7 2004-03-21 devnull qunlock(&r->lk);
802 2277c5d7 2004-03-21 devnull for(i=0; i<r->nflush; i++)
803 2277c5d7 2004-03-21 devnull respond(r->flush[i], nil);
804 2277c5d7 2004-03-21 devnull free(r->flush);
806 2277c5d7 2004-03-21 devnull if(r->pool)
807 2277c5d7 2004-03-21 devnull closereq(r);
809 2277c5d7 2004-03-21 devnull free(r);
813 2277c5d7 2004-03-21 devnull postfd(char *name, int pfd)
816 2277c5d7 2004-03-21 devnull char buf[80];
818 2277c5d7 2004-03-21 devnull snprint(buf, sizeof buf, "/srv/%s", name);
819 2277c5d7 2004-03-21 devnull if(chatty9p)
820 2277c5d7 2004-03-21 devnull fprint(2, "postfd %s\n", buf);
821 2277c5d7 2004-03-21 devnull fd = create(buf, OWRITE|ORCLOSE|OCEXEC, 0600);
822 2277c5d7 2004-03-21 devnull if(fd < 0){
823 2277c5d7 2004-03-21 devnull if(chatty9p)
824 2277c5d7 2004-03-21 devnull fprint(2, "create fails: %r\n");
825 2277c5d7 2004-03-21 devnull return -1;
827 2277c5d7 2004-03-21 devnull if(fprint(fd, "%d", pfd) < 0){
828 2277c5d7 2004-03-21 devnull if(chatty9p)
829 2277c5d7 2004-03-21 devnull fprint(2, "write fails: %r\n");
830 2277c5d7 2004-03-21 devnull close(fd);
831 2277c5d7 2004-03-21 devnull return -1;
833 2277c5d7 2004-03-21 devnull if(chatty9p)
834 2277c5d7 2004-03-21 devnull fprint(2, "postfd successful\n");
835 2277c5d7 2004-03-21 devnull return 0;