1 d3df3087 2003-12-06 devnull #include <u.h>
2 d3df3087 2003-12-06 devnull #include <libc.h>
3 d3df3087 2003-12-06 devnull #include <fcall.h>
5 d3df3087 2003-12-06 devnull static uint dumpsome(char*, char*, char*, long);
6 d3df3087 2003-12-06 devnull static void fdirconv(char*, char*, Dir*);
7 d3df3087 2003-12-06 devnull static char *qidtype(char*, uchar);
9 d3df3087 2003-12-06 devnull #define QIDFMT "(%.16llux %lud %s)"
12 d3df3087 2003-12-06 devnull fcallfmt(Fmt *fmt)
14 d3df3087 2003-12-06 devnull Fcall *f;
15 d3df3087 2003-12-06 devnull int fid, type, tag, i;
16 d3df3087 2003-12-06 devnull char buf[512], tmp[200];
17 d3df3087 2003-12-06 devnull char *p, *e;
21 d3df3087 2003-12-06 devnull e = buf+sizeof(buf);
22 d3df3087 2003-12-06 devnull f = va_arg(fmt->args, Fcall*);
23 d3df3087 2003-12-06 devnull type = f->type;
24 d3df3087 2003-12-06 devnull fid = f->fid;
25 d3df3087 2003-12-06 devnull tag = f->tag;
26 d3df3087 2003-12-06 devnull switch(type){
27 d3df3087 2003-12-06 devnull case Tversion: /* 100 */
28 d3df3087 2003-12-06 devnull seprint(buf, e, "Tversion tag %ud msize %ud version '%s'", tag, f->msize, f->version);
30 d3df3087 2003-12-06 devnull case Rversion:
31 d3df3087 2003-12-06 devnull seprint(buf, e, "Rversion tag %ud msize %ud version '%s'", tag, f->msize, f->version);
33 d3df3087 2003-12-06 devnull case Tauth: /* 102 */
34 d3df3087 2003-12-06 devnull seprint(buf, e, "Tauth tag %ud afid %d uname %s aname %s", tag,
35 d3df3087 2003-12-06 devnull f->afid, f->uname, f->aname);
37 d3df3087 2003-12-06 devnull case Rauth:
38 d3df3087 2003-12-06 devnull seprint(buf, e, "Rauth tag %ud qid " QIDFMT, tag,
39 d3df3087 2003-12-06 devnull f->aqid.path, f->aqid.vers, qidtype(tmp, f->aqid.type));
41 d3df3087 2003-12-06 devnull case Tattach: /* 104 */
42 d3df3087 2003-12-06 devnull seprint(buf, e, "Tattach tag %ud fid %d afid %d uname %s aname %s", tag,
43 d3df3087 2003-12-06 devnull fid, f->afid, f->uname, f->aname);
45 d3df3087 2003-12-06 devnull case Rattach:
46 d3df3087 2003-12-06 devnull seprint(buf, e, "Rattach tag %ud qid " QIDFMT, tag,
47 d3df3087 2003-12-06 devnull f->qid.path, f->qid.vers, qidtype(tmp, f->qid.type));
49 d3df3087 2003-12-06 devnull case Rerror: /* 107; 106 (Terror) illegal */
50 d3df3087 2003-12-06 devnull seprint(buf, e, "Rerror tag %ud ename %s", tag, f->ename);
52 d3df3087 2003-12-06 devnull case Tflush: /* 108 */
53 d3df3087 2003-12-06 devnull seprint(buf, e, "Tflush tag %ud oldtag %ud", tag, f->oldtag);
55 d3df3087 2003-12-06 devnull case Rflush:
56 d3df3087 2003-12-06 devnull seprint(buf, e, "Rflush tag %ud", tag);
58 d3df3087 2003-12-06 devnull case Twalk: /* 110 */
59 d3df3087 2003-12-06 devnull p = seprint(buf, e, "Twalk tag %ud fid %d newfid %d nwname %d ", tag, fid, f->newfid, f->nwname);
60 d3df3087 2003-12-06 devnull if(f->nwname <= MAXWELEM)
61 d3df3087 2003-12-06 devnull for(i=0; i<f->nwname; i++)
62 d3df3087 2003-12-06 devnull p = seprint(p, e, "%d:%s ", i, f->wname[i]);
64 d3df3087 2003-12-06 devnull case Rwalk:
65 d3df3087 2003-12-06 devnull p = seprint(buf, e, "Rwalk tag %ud nwqid %ud ", tag, f->nwqid);
66 d3df3087 2003-12-06 devnull if(f->nwqid <= MAXWELEM)
67 d3df3087 2003-12-06 devnull for(i=0; i<f->nwqid; i++){
68 d3df3087 2003-12-06 devnull q = &f->wqid[i];
69 d3df3087 2003-12-06 devnull p = seprint(p, e, "%d:" QIDFMT " ", i,
70 d3df3087 2003-12-06 devnull q->path, q->vers, qidtype(tmp, q->type));
73 d3df3087 2003-12-06 devnull case Topen: /* 112 */
74 d3df3087 2003-12-06 devnull seprint(buf, e, "Topen tag %ud fid %ud mode %d", tag, fid, f->mode);
76 d3df3087 2003-12-06 devnull case Ropen:
77 32f69c36 2003-12-11 devnull seprint(buf, e, "Ropen tag %ud qid " QIDFMT " iounit %ud", tag,
78 d3df3087 2003-12-06 devnull f->qid.path, f->qid.vers, qidtype(tmp, f->qid.type), f->iounit);
80 32f69c36 2003-12-11 devnull case Topenfd: /* 98 */
81 32f69c36 2003-12-11 devnull seprint(buf, e, "Topenfd tag %ud fid %ud mode %d", tag, fid, f->mode);
83 32f69c36 2003-12-11 devnull case Ropenfd:
84 32f69c36 2003-12-11 devnull seprint(buf, e, "Ropenfd tag %ud qid " QIDFMT " iounit %ud unixfd %d", tag,
85 32f69c36 2003-12-11 devnull f->qid.path, f->qid.vers, qidtype(tmp, f->qid.type), f->iounit, f->unixfd);
87 d3df3087 2003-12-06 devnull case Tcreate: /* 114 */
88 d3df3087 2003-12-06 devnull seprint(buf, e, "Tcreate tag %ud fid %ud name %s perm %M mode %d", tag, fid, f->name, (ulong)f->perm, f->mode);
90 d3df3087 2003-12-06 devnull case Rcreate:
91 d3df3087 2003-12-06 devnull seprint(buf, e, "Rcreate tag %ud qid " QIDFMT " iounit %ud ", tag,
92 d3df3087 2003-12-06 devnull f->qid.path, f->qid.vers, qidtype(tmp, f->qid.type), f->iounit);
94 d3df3087 2003-12-06 devnull case Tread: /* 116 */
95 d3df3087 2003-12-06 devnull seprint(buf, e, "Tread tag %ud fid %d offset %lld count %ud",
96 d3df3087 2003-12-06 devnull tag, fid, f->offset, f->count);
98 d3df3087 2003-12-06 devnull case Rread:
99 d3df3087 2003-12-06 devnull p = seprint(buf, e, "Rread tag %ud count %ud ", tag, f->count);
100 d3df3087 2003-12-06 devnull dumpsome(p, e, f->data, f->count);
102 d3df3087 2003-12-06 devnull case Twrite: /* 118 */
103 d3df3087 2003-12-06 devnull p = seprint(buf, e, "Twrite tag %ud fid %d offset %lld count %ud ",
104 d3df3087 2003-12-06 devnull tag, fid, f->offset, f->count);
105 d3df3087 2003-12-06 devnull dumpsome(p, e, f->data, f->count);
107 d3df3087 2003-12-06 devnull case Rwrite:
108 d3df3087 2003-12-06 devnull seprint(buf, e, "Rwrite tag %ud count %ud", tag, f->count);
110 d3df3087 2003-12-06 devnull case Tclunk: /* 120 */
111 d3df3087 2003-12-06 devnull seprint(buf, e, "Tclunk tag %ud fid %ud", tag, fid);
113 d3df3087 2003-12-06 devnull case Rclunk:
114 d3df3087 2003-12-06 devnull seprint(buf, e, "Rclunk tag %ud", tag);
116 d3df3087 2003-12-06 devnull case Tremove: /* 122 */
117 d3df3087 2003-12-06 devnull seprint(buf, e, "Tremove tag %ud fid %ud", tag, fid);
119 d3df3087 2003-12-06 devnull case Rremove:
120 d3df3087 2003-12-06 devnull seprint(buf, e, "Rremove tag %ud", tag);
122 d3df3087 2003-12-06 devnull case Tstat: /* 124 */
123 d3df3087 2003-12-06 devnull seprint(buf, e, "Tstat tag %ud fid %ud", tag, fid);
125 d3df3087 2003-12-06 devnull case Rstat:
126 d3df3087 2003-12-06 devnull p = seprint(buf, e, "Rstat tag %ud ", tag);
127 d3df3087 2003-12-06 devnull if(f->nstat > sizeof tmp)
128 d3df3087 2003-12-06 devnull seprint(p, e, " stat(%d bytes)", f->nstat);
130 d3df3087 2003-12-06 devnull d = (Dir*)tmp;
131 d3df3087 2003-12-06 devnull convM2D(f->stat, f->nstat, d, (char*)(d+1));
132 d3df3087 2003-12-06 devnull seprint(p, e, " stat ");
133 d3df3087 2003-12-06 devnull fdirconv(p+6, e, d);
136 d3df3087 2003-12-06 devnull case Twstat: /* 126 */
137 d3df3087 2003-12-06 devnull p = seprint(buf, e, "Twstat tag %ud fid %ud", tag, fid);
138 d3df3087 2003-12-06 devnull if(f->nstat > sizeof tmp)
139 d3df3087 2003-12-06 devnull seprint(p, e, " stat(%d bytes)", f->nstat);
141 d3df3087 2003-12-06 devnull d = (Dir*)tmp;
142 d3df3087 2003-12-06 devnull convM2D(f->stat, f->nstat, d, (char*)(d+1));
143 d3df3087 2003-12-06 devnull seprint(p, e, " stat ");
144 d3df3087 2003-12-06 devnull fdirconv(p+6, e, d);
147 d3df3087 2003-12-06 devnull case Rwstat:
148 d3df3087 2003-12-06 devnull seprint(buf, e, "Rwstat tag %ud", tag);
150 d3df3087 2003-12-06 devnull default:
151 d3df3087 2003-12-06 devnull seprint(buf, e, "unknown type %d", type);
153 d3df3087 2003-12-06 devnull return fmtstrcpy(fmt, buf);
156 d3df3087 2003-12-06 devnull static char*
157 d3df3087 2003-12-06 devnull qidtype(char *s, uchar t)
159 d3df3087 2003-12-06 devnull char *p;
162 d3df3087 2003-12-06 devnull if(t & QTDIR)
163 d3df3087 2003-12-06 devnull *p++ = 'd';
164 d3df3087 2003-12-06 devnull if(t & QTAPPEND)
165 d3df3087 2003-12-06 devnull *p++ = 'a';
166 d3df3087 2003-12-06 devnull if(t & QTEXCL)
167 d3df3087 2003-12-06 devnull *p++ = 'l';
168 d3df3087 2003-12-06 devnull if(t & QTAUTH)
169 d3df3087 2003-12-06 devnull *p++ = 'A';
170 d3df3087 2003-12-06 devnull *p = '\0';
171 d3df3087 2003-12-06 devnull return s;
175 d3df3087 2003-12-06 devnull dirfmt(Fmt *fmt)
177 d3df3087 2003-12-06 devnull char buf[160];
179 d3df3087 2003-12-06 devnull fdirconv(buf, buf+sizeof buf, va_arg(fmt->args, Dir*));
180 d3df3087 2003-12-06 devnull return fmtstrcpy(fmt, buf);
183 d3df3087 2003-12-06 devnull static void
184 d3df3087 2003-12-06 devnull fdirconv(char *buf, char *e, Dir *d)
186 d3df3087 2003-12-06 devnull char tmp[16];
188 d3df3087 2003-12-06 devnull seprint(buf, e, "'%s' '%s' '%s' '%s' "
189 d3df3087 2003-12-06 devnull "q " QIDFMT " m %#luo "
190 d3df3087 2003-12-06 devnull "at %ld mt %ld l %lld "
191 d3df3087 2003-12-06 devnull "t %d d %d",
192 d3df3087 2003-12-06 devnull d->name, d->uid, d->gid, d->muid,
193 d3df3087 2003-12-06 devnull d->qid.path, d->qid.vers, qidtype(tmp, d->qid.type), d->mode,
194 d3df3087 2003-12-06 devnull d->atime, d->mtime, d->length,
195 d3df3087 2003-12-06 devnull d->type, d->dev);
199 d3df3087 2003-12-06 devnull * dump out count (or DUMPL, if count is bigger) bytes from
200 d3df3087 2003-12-06 devnull * buf to ans, as a string if they are all printable,
201 d3df3087 2003-12-06 devnull * else as a series of hex bytes
203 d3df3087 2003-12-06 devnull #define DUMPL 64
205 d3df3087 2003-12-06 devnull static uint
206 d3df3087 2003-12-06 devnull dumpsome(char *ans, char *e, char *buf, long count)
208 d3df3087 2003-12-06 devnull int i, printable;
209 d3df3087 2003-12-06 devnull char *p;
211 d3df3087 2003-12-06 devnull if(buf == nil){
212 d3df3087 2003-12-06 devnull seprint(ans, e, "<no data>");
213 d3df3087 2003-12-06 devnull return strlen(ans);
215 d3df3087 2003-12-06 devnull printable = 1;
216 d3df3087 2003-12-06 devnull if(count > DUMPL)
217 d3df3087 2003-12-06 devnull count = DUMPL;
218 d3df3087 2003-12-06 devnull for(i=0; i<count && printable; i++)
219 d3df3087 2003-12-06 devnull if((buf[i]<32 && buf[i] !='\n' && buf[i] !='\t') || (uchar)buf[i]>127)
220 d3df3087 2003-12-06 devnull printable = 0;
221 d3df3087 2003-12-06 devnull p = ans;
222 d3df3087 2003-12-06 devnull *p++ = '\'';
223 d3df3087 2003-12-06 devnull if(printable){
224 d3df3087 2003-12-06 devnull if(count > e-p-2)
225 d3df3087 2003-12-06 devnull count = e-p-2;
226 d3df3087 2003-12-06 devnull memmove(p, buf, count);
227 d3df3087 2003-12-06 devnull p += count;
229 d3df3087 2003-12-06 devnull if(2*count > e-p-2)
230 d3df3087 2003-12-06 devnull count = (e-p-2)/2;
231 d3df3087 2003-12-06 devnull for(i=0; i<count; i++){
232 d3df3087 2003-12-06 devnull if(i>0 && i%4==0)
233 d3df3087 2003-12-06 devnull *p++ = ' ';
234 d3df3087 2003-12-06 devnull sprint(p, "%2.2ux", buf[i]);
238 d3df3087 2003-12-06 devnull *p++ = '\'';
240 d3df3087 2003-12-06 devnull return p - ans;