2 #include "../port/lib.h"
6 #include "../port/error.h"
9 typedef struct Srv Srv;
25 srvlookup(char *name, ulong qidpath)
29 for(sp = srv; sp != nil; sp = sp->link) {
30 if(sp->path == qidpath || (name != nil && strcmp(sp->name, name) == 0))
37 srvgen(Chan *c, char *name, Dirtab*, int, int s, Dir *dp)
43 devdir(c, c->qid, "#s", 0, eve, 0555, dp);
49 sp = srvlookup(name, -1);
51 for(sp = srv; sp != nil && s > 0; sp = sp->link)
54 if(sp == nil || (name != nil && (strlen(sp->name) >= sizeof(up->genbuf)))) {
58 mkqid(&q, sp->path, 0, QTFILE);
59 /* make sure name string continues to exist after we release lock */
60 kstrcpy(up->genbuf, sp->name, sizeof up->genbuf);
61 devdir(c, q, up->genbuf, 0, sp->owner, sp->perm, dp);
75 return devattach('s', spec);
79 srvwalk(Chan *c, Chan *nc, char **name, int nname)
81 return devwalk(c, nc, name, nname, 0, 0, srvgen);
85 srvstat(Chan *c, uchar *db, int n)
87 return devstat(c, db, n, 0, 0, srvgen);
98 for(sp = srv; sp != nil; sp = sp->link) {
100 s = malloc(3+strlen(sp->name)+1);
102 sprint(s, "#s/%s", sp->name);
111 srvopen(Chan *c, int omode)
116 if(c->qid.type == QTDIR){
132 sp = srvlookup(nil, c->qid.path);
133 if(sp == nil || sp->chan == nil)
138 if(openmode(omode)!=sp->chan->mode && sp->chan->mode!=ORDWR)
140 devpermcheck(sp->owner, sp->perm, omode);
153 srvcreate(Chan *c, char *name, int omode, ulong perm)
157 if(openmode(omode) != OWRITE)
160 if(strlen(name) >= sizeof(up->genbuf))
163 sp = smalloc(sizeof *sp);
164 kstrdup(&sp->name, name);
165 kstrdup(&sp->owner, up->user);
175 if(srvlookup(name, -1) != nil)
178 sp->perm = perm&0777;
179 sp->path = qidpath++;
181 c->qid.path = sp->path;
182 c->qid.type = QTFILE;
201 if(c->qid.type == QTDIR)
210 for(sp = *l; sp != nil; sp = *l) {
211 if(sp->path == c->qid.path)
219 * Only eve can remove system services.
221 if(strcmp(sp->owner, eve) == 0 && !iseve())
225 * No removing personal services.
227 if((sp->perm&7) != 7 && strcmp(sp->owner, up->user) && !iseve())
244 srvwstat(Chan *c, uchar *dp, int n)
250 if(c->qid.type & QTDIR)
258 n = convM2D(dp, n, &d, strs);
268 sp = srvlookup(nil, c->qid.path);
272 if(strcmp(sp->owner, up->user) != 0 && !iseve())
275 if(d.name != nil && *d.name && strcmp(sp->name, d.name) != 0) {
276 if(strchr(d.name, '/') != nil)
278 if(strlen(d.name) >= sizeof(up->genbuf))
280 kstrdup(&sp->name, d.name);
282 if(d.uid != nil && *d.uid)
283 kstrdup(&sp->owner, d.uid);
285 sp->perm = d.mode & 0777;
300 * in theory we need to override any changes in removability
301 * since open, but since all that's checked is the owner,
302 * which is immutable, all is well.
304 if(c->flag & CRCLOSE){
313 srvread(Chan *c, void *va, long n, vlong)
316 return devdirread(c, va, n, 0, 0, srvgen);
320 srvwrite(Chan *c, void *va, long n, vlong)
329 memmove(buf, va, n); /* so we can NUL-terminate */
331 fd = strtoul(buf, 0, 0);
333 c1 = fdtochan(fd, -1, 0, 1); /* error check and inc ref */
341 if(c1->flag & (CCEXEC|CRCLOSE))
342 error("posted fd has remove-on-close or close-on-exec");
343 if(c1->qid.type & QTAUTH)
344 error("cannot post auth file in srv");
345 sp = srvlookup(nil, c->qid.path);
381 srvrenameuser(char *old, char *new)
386 for(sp = srv; sp != nil; sp = sp->link) {
387 if(sp->owner != nil && strcmp(old, sp->owner) == 0)
388 kstrdup(&sp->owner, new);