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>
  4 d3df3087 2003-12-06 devnull 
  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);
  8 d3df3087 2003-12-06 devnull 
  9 d3df3087 2003-12-06 devnull #define	QIDFMT	"(%.16llux %lud %s)"
 10 d3df3087 2003-12-06 devnull 
 11 d3df3087 2003-12-06 devnull int
 12 d3df3087 2003-12-06 devnull fcallfmt(Fmt *fmt)
 13 d3df3087 2003-12-06 devnull {
 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;
 18 d3df3087 2003-12-06 devnull 	Dir *d;
 19 d3df3087 2003-12-06 devnull 	Qid *q;
 20 d3df3087 2003-12-06 devnull 
 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);
 29 d3df3087 2003-12-06 devnull 		break;
 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);
 32 d3df3087 2003-12-06 devnull 		break;
 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);
 36 d3df3087 2003-12-06 devnull 		break;
 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));
 40 d3df3087 2003-12-06 devnull 		break;
 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);
 44 d3df3087 2003-12-06 devnull 		break;
 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));
 48 d3df3087 2003-12-06 devnull 		break;
 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);
 51 d3df3087 2003-12-06 devnull 		break;
 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);
 54 d3df3087 2003-12-06 devnull 		break;
 55 d3df3087 2003-12-06 devnull 	case Rflush:
 56 d3df3087 2003-12-06 devnull 		seprint(buf, e, "Rflush tag %ud", tag);
 57 d3df3087 2003-12-06 devnull 		break;
 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]);
 63 d3df3087 2003-12-06 devnull 		break;
 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));
 71 d3df3087 2003-12-06 devnull 			}
 72 d3df3087 2003-12-06 devnull 		break;
 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);
 75 d3df3087 2003-12-06 devnull 		break;
 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);
 79 d3df3087 2003-12-06 devnull 		break;
 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);
 82 32f69c36 2003-12-11 devnull 		break;
 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);
 86 32f69c36 2003-12-11 devnull 		break;
 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);
 89 d3df3087 2003-12-06 devnull 		break;
 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);
 93 d3df3087 2003-12-06 devnull 		break;
 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);
 97 d3df3087 2003-12-06 devnull 		break;
 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);
101 d3df3087 2003-12-06 devnull 		break;
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);
106 d3df3087 2003-12-06 devnull 		break;
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);
109 d3df3087 2003-12-06 devnull 		break;
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);
112 d3df3087 2003-12-06 devnull 		break;
113 d3df3087 2003-12-06 devnull 	case Rclunk:
114 d3df3087 2003-12-06 devnull 		seprint(buf, e, "Rclunk tag %ud", tag);
115 d3df3087 2003-12-06 devnull 		break;
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);
118 d3df3087 2003-12-06 devnull 		break;
119 d3df3087 2003-12-06 devnull 	case Rremove:
120 d3df3087 2003-12-06 devnull 		seprint(buf, e, "Rremove tag %ud", tag);
121 d3df3087 2003-12-06 devnull 		break;
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);
124 d3df3087 2003-12-06 devnull 		break;
125 d3df3087 2003-12-06 devnull 	case Rstat:
126 d3df3087 2003-12-06 devnull 		p = seprint(buf, e, "Rstat tag %ud ", tag);
127 9e2f1d9b 2005-11-21 devnull 		if(f->stat == nil || f->nstat > sizeof tmp)
128 d3df3087 2003-12-06 devnull 			seprint(p, e, " stat(%d bytes)", f->nstat);
129 d3df3087 2003-12-06 devnull 		else{
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);
134 d3df3087 2003-12-06 devnull 		}
135 d3df3087 2003-12-06 devnull 		break;
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 9e2f1d9b 2005-11-21 devnull 		if(f->stat == nil || f->nstat > sizeof tmp)
139 d3df3087 2003-12-06 devnull 			seprint(p, e, " stat(%d bytes)", f->nstat);
140 d3df3087 2003-12-06 devnull 		else{
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);
145 d3df3087 2003-12-06 devnull 		}
146 d3df3087 2003-12-06 devnull 		break;
147 d3df3087 2003-12-06 devnull 	case Rwstat:
148 d3df3087 2003-12-06 devnull 		seprint(buf, e, "Rwstat tag %ud", tag);
149 d3df3087 2003-12-06 devnull 		break;
150 d3df3087 2003-12-06 devnull 	default:
151 d3df3087 2003-12-06 devnull 		seprint(buf, e,  "unknown type %d", type);
152 d3df3087 2003-12-06 devnull 	}
153 d3df3087 2003-12-06 devnull 	return fmtstrcpy(fmt, buf);
154 d3df3087 2003-12-06 devnull }
155 d3df3087 2003-12-06 devnull 
156 d3df3087 2003-12-06 devnull static char*
157 d3df3087 2003-12-06 devnull qidtype(char *s, uchar t)
158 d3df3087 2003-12-06 devnull {
159 d3df3087 2003-12-06 devnull 	char *p;
160 d3df3087 2003-12-06 devnull 
161 d3df3087 2003-12-06 devnull 	p = s;
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;
172 d3df3087 2003-12-06 devnull }
173 d3df3087 2003-12-06 devnull 
174 d3df3087 2003-12-06 devnull int
175 d3df3087 2003-12-06 devnull dirfmt(Fmt *fmt)
176 d3df3087 2003-12-06 devnull {
177 d3df3087 2003-12-06 devnull 	char buf[160];
178 d3df3087 2003-12-06 devnull 
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);
181 d3df3087 2003-12-06 devnull }
182 d3df3087 2003-12-06 devnull 
183 d3df3087 2003-12-06 devnull static void
184 d3df3087 2003-12-06 devnull fdirconv(char *buf, char *e, Dir *d)
185 d3df3087 2003-12-06 devnull {
186 d3df3087 2003-12-06 devnull 	char tmp[16];
187 d3df3087 2003-12-06 devnull 
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);
196 d3df3087 2003-12-06 devnull }
197 d3df3087 2003-12-06 devnull 
198 d3df3087 2003-12-06 devnull /*
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
202 d3df3087 2003-12-06 devnull  */
203 d3df3087 2003-12-06 devnull #define DUMPL 64
204 d3df3087 2003-12-06 devnull 
205 d3df3087 2003-12-06 devnull static uint
206 d3df3087 2003-12-06 devnull dumpsome(char *ans, char *e, char *buf, long count)
207 d3df3087 2003-12-06 devnull {
208 d3df3087 2003-12-06 devnull 	int i, printable;
209 d3df3087 2003-12-06 devnull 	char *p;
210 d3df3087 2003-12-06 devnull 
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);
214 d3df3087 2003-12-06 devnull 	}
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 b589fce2 2005-02-11 devnull 		if((buf[i]!=0 && buf[i]<32) || (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 b589fce2 2005-02-11 devnull 		if(2*count > e-p-2)
225 b589fce2 2005-02-11 devnull 			count = (e-p-2)/2;
226 b589fce2 2005-02-11 devnull 		for(i=0; i<count; i++){
227 b589fce2 2005-02-11 devnull 			if(buf[i] == 0){
228 b589fce2 2005-02-11 devnull 				*p++ = '\\';
229 b589fce2 2005-02-11 devnull 				*p++ = '0';
230 b589fce2 2005-02-11 devnull 			}else if(buf[i] == '\t'){
231 b589fce2 2005-02-11 devnull 				*p++ = '\\';
232 b589fce2 2005-02-11 devnull 				*p++ = 't';
233 b589fce2 2005-02-11 devnull 			}else if(buf[i] == '\n'){
234 b589fce2 2005-02-11 devnull 				*p++ = '\\';
235 b589fce2 2005-02-11 devnull 				*p++ = 'n';
236 b589fce2 2005-02-11 devnull 			}else
237 b589fce2 2005-02-11 devnull 				*p++ = buf[i];
238 b589fce2 2005-02-11 devnull 		}
239 d3df3087 2003-12-06 devnull 	}else{
240 d3df3087 2003-12-06 devnull 		if(2*count > e-p-2)
241 d3df3087 2003-12-06 devnull 			count = (e-p-2)/2;
242 d3df3087 2003-12-06 devnull 		for(i=0; i<count; i++){
243 d3df3087 2003-12-06 devnull 			if(i>0 && i%4==0)
244 d3df3087 2003-12-06 devnull 				*p++ = ' ';
245 b2e0da3e 2005-02-13 devnull 			sprint(p, "%2.2ux", (uchar)buf[i]);
246 d3df3087 2003-12-06 devnull 			p += 2;
247 d3df3087 2003-12-06 devnull 		}
248 d3df3087 2003-12-06 devnull 	}
249 d3df3087 2003-12-06 devnull 	*p++ = '\'';
250 d3df3087 2003-12-06 devnull 	*p = 0;
251 b589fce2 2005-02-11 devnull 	assert(p < e);
252 d3df3087 2003-12-06 devnull 	return p - ans;
253 d3df3087 2003-12-06 devnull }