ref: ff4daa7e93f4ea09506276ecdb69fa1cca19a7a7
dir: /sys/src/cmd/disk/kfs/console.c/
#include "all.h"
#include "9p1.h"
void
fcall9p1(Chan *cp, Oldfcall *in, Oldfcall *ou)
{
int t;
rlock(&mainlock);
t = in->type;
if(t < 0 || t >= MAXSYSCALL || (t&1) || !call9p1[t]) {
print("bad message type %d\n", t);
panic("");
}
ou->type = t+1;
ou->err = 0;
rlock(&cp->reflock);
(*call9p1[t])(cp, in, ou);
runlock(&cp->reflock);
if(ou->err)
if(CHAT(cp))
print(" error: %s\n", errstring[ou->err]);
cons.work.count++;
runlock(&mainlock);
}
int
con_session(void)
{
Oldfcall in, ou;
in.type = Tsession9p1;
fcall9p1(cons.chan, &in, &ou);
return ou.err;
}
int
con_attach(int fid, char *uid, char *arg)
{
Oldfcall in, ou;
in.type = Tattach9p1;
in.fid = fid;
strncpy(in.uname, uid, NAMELEN);
strncpy(in.aname, arg, NAMELEN);
fcall9p1(cons.chan, &in, &ou);
return ou.err;
}
int
con_clone(int fid1, int fid2)
{
Oldfcall in, ou;
in.type = Tclone9p1;
in.fid = fid1;
in.newfid = fid2;
fcall9p1(cons.chan, &in, &ou);
return ou.err;
}
int
con_path(int fid, char *path)
{
Oldfcall in, ou;
char *p;
in.type = Twalk9p1;
in.fid = fid;
loop:
if(*path == 0)
return 0;
strncpy(in.name, path, NAMELEN);
if(p = strchr(path, '/')) {
path = p+1;
if(p = strchr(in.name, '/'))
*p = 0;
} else
path = strchr(path, 0);
if(in.name[0]) {
fcall9p1(cons.chan, &in, &ou);
if(ou.err)
return ou.err;
}
goto loop;
}
int
con_walk(int fid, char *name)
{
Oldfcall in, ou;
in.type = Twalk9p1;
in.fid = fid;
strncpy(in.name, name, NAMELEN);
fcall9p1(cons.chan, &in, &ou);
return ou.err;
}
int
con_stat(int fid, char *data)
{
Oldfcall in, ou;
in.type = Tstat9p1;
in.fid = fid;
fcall9p1(cons.chan, &in, &ou);
if(ou.err == 0)
memmove(data, ou.stat, sizeof ou.stat);
return ou.err;
}
int
con_wstat(int fid, char *data)
{
Oldfcall in, ou;
in.type = Twstat9p1;
in.fid = fid;
memmove(in.stat, data, sizeof in.stat);
fcall9p1(cons.chan, &in, &ou);
return ou.err;
}
int
con_open(int fid, int mode)
{
Oldfcall in, ou;
in.type = Topen9p1;
in.fid = fid;
in.mode = mode;
fcall9p1(cons.chan, &in, &ou);
return ou.err;
}
int
con_read(int fid, char *data, long offset, int count)
{
Oldfcall in, ou;
in.type = Tread9p1;
in.fid = fid;
in.offset = offset;
in.count = count;
ou.data = data;
fcall9p1(cons.chan, &in, &ou);
if(ou.err)
return 0;
return ou.count;
}
int
con_write(int fid, char *data, long offset, int count)
{
Oldfcall in, ou;
in.type = Twrite9p1;
in.fid = fid;
in.data = data;
in.offset = offset;
in.count = count;
fcall9p1(cons.chan, &in, &ou);
if(ou.err)
return 0;
return ou.count;
}
int
con_remove(int fid)
{
Oldfcall in, ou;
in.type = Tremove9p1;
in.fid = fid;
fcall9p1(cons.chan, &in, &ou);
return ou.err;
}
int
con_create(int fid, char *name, int uid, int gid, long perm, int mode)
{
Oldfcall in, ou;
in.type = Tcreate9p1;
in.fid = fid;
strncpy(in.name, name, NAMELEN);
in.perm = perm;
in.mode = mode;
cons.uid = uid; /* beyond ugly */
cons.gid = gid;
fcall9p1(cons.chan, &in, &ou);
return ou.err;
}
int
doclri(File *f)
{
Iobuf *p, *p1;
Dentry *d, *d1;
int err;
err = 0;
p = 0;
p1 = 0;
if(isro(f->fs->dev)) {
err = Eronly;
goto out;
}
/*
* check on parent directory of file to be deleted
*/
if(f->wpath == 0 || f->wpath->addr == f->addr) {
err = Ephase;
goto out;
}
p1 = getbuf(f->fs->dev, f->wpath->addr, Bread);
d1 = getdir(p1, f->wpath->slot);
if(!d1 || checktag(p1, Tdir, QPNONE) || !(d1->mode & DALLOC)) {
err = Ephase;
goto out;
}
accessdir(p1, d1, FWRITE);
putbuf(p1);
p1 = 0;
/*
* check on file to be deleted
*/
p = getbuf(f->fs->dev, f->addr, Bread);
d = getdir(p, f->slot);
/*
* do it
*/
memset(d, 0, sizeof(Dentry));
settag(p, Tdir, QPNONE);
freewp(f->wpath);
freefp(f);
out:
if(p1)
putbuf(p1);
if(p)
putbuf(p);
return err;
}
void
f_clri(Chan *cp, Oldfcall *in, Oldfcall *ou)
{
File *f;
if(CHAT(cp)) {
print("c_clri %d\n", cp->chan);
print(" fid = %d\n", in->fid);
}
f = filep(cp, in->fid, 0);
if(!f) {
ou->err = Efid;
goto out;
}
ou->err = doclri(f);
out:
ou->fid = in->fid;
if(f)
qunlock(f);
}
int
con_clri(int fid)
{
Oldfcall in, ou;
Chan *cp;
in.type = Tremove9p1;
in.fid = fid;
cp = cons.chan;
rlock(&mainlock);
ou.type = Tremove9p1+1;
ou.err = 0;
rlock(&cp->reflock);
f_clri(cp, &in, &ou);
runlock(&cp->reflock);
cons.work.count++;
runlock(&mainlock);
return ou.err;
}
int
con_swap(int fid1, int fid2)
{
int err;
Iobuf *p1, *p2;
File *f1, *f2;
Dentry *d1, *d2;
Dentry dt1, dt2;
Chan *cp;
cp = cons.chan;
err = 0;
rlock(&mainlock);
rlock(&cp->reflock);
f2 = nil;
p1 = p2 = nil;
f1 = filep(cp, fid1, 0);
if(!f1){
err = Efid;
goto out;
}
p1 = getbuf(f1->fs->dev, f1->addr, Bread|Bmod);
d1 = getdir(p1, f1->slot);
if(!d1 || !(d1->mode&DALLOC)){
err = Ealloc;
goto out;
}
f2 = filep(cp, fid2, 0);
if(!f2){
err = Efid;
goto out;
}
if(memcmp(&f1->fs->dev, &f2->fs->dev, 4)==0
&& f2->addr == f1->addr)
p2 = p1;
else
p2 = getbuf(f2->fs->dev, f2->addr, Bread|Bmod);
d2 = getdir(p2, f2->slot);
if(!d2 || !(d2->mode&DALLOC)){
err = Ealloc;
goto out;
}
dt1 = *d1;
dt2 = *d2;
*d1 = dt2;
*d2 = dt1;
memmove(d1->name, dt1.name, NAMELEN);
memmove(d2->name, dt2.name, NAMELEN);
mkqid(&f1->qid, d1, 1);
mkqid(&f2->qid, d2, 1);
out:
if(f1)
qunlock(f1);
if(f2)
qunlock(f2);
if(p1)
putbuf(p1);
if(p2 && p2!=p1)
putbuf(p2);
runlock(&cp->reflock);
cons.work.count++;
runlock(&mainlock);
return err;
}