/*  * This file is part of the UCB release of Plan 9. It is subject to the license * terms in the LICENSE file found in the top-level directory of this * distribution and at http://akaros.cs.berkeley.edu/files/Plan9License. No * part of the UCB release of Plan 9, including this file, may be copied, * modified, propagated, or distributed except according to the terms contained * in the LICENSE file. */ #include "all.h"#include "9p1.h" static void dumpsome(char*, char*, long);static void fdirconv(char*, Dentry*); intofcallfmt(Fmt *f1){	char buf[512];	Oldfcall *f;	int fid, type, tag, n;	Dentry d; 	f = va_arg(f1->args, Oldfcall*);	type = f->type;	fid = f->fid;	tag = f->tag;	switch(type){	case Tnop9p1:	/* 50 */		sprint(buf, "Tnop9p1 tag %ud", tag);		break;	case Rnop9p1:		sprint(buf, "Rnop9p1 tag %ud", tag);		break;	case Tsession9p1:	/* 52 */		sprint(buf, "Tsession9p1 tag %ud", tag);		break;	case Rsession9p1:		sprint(buf, "Rsession9p1 tag %ud", tag);		break;	case Rerror9p1:	/* 55 */		sprint(buf, "Rerror9p1 tag %ud error %.64s", tag, f->ename);		break;	case Tflush9p1:	/* 56 */		sprint(buf, "Tflush9p1 tag %ud oldtag %d", tag, f->oldtag);		break;	case Rflush9p1:		sprint(buf, "Rflush9p1 tag %ud", tag);		break;	case Tattach9p1:	/* 58 */		sprint(buf, "Tattach9p1 tag %ud fid %d uname %.28s aname %.28s auth %.28s",			tag, f->fid, f->uname, f->aname, f->auth);		break;	case Rattach9p1:		sprint(buf, "Rattach9p1 tag %ud fid %d qid 0x%lux|0x%lux",			tag, fid, f->qid.path, f->qid.version);		break;	case Tclone9p1:	/* 60 */		sprint(buf, "Tclone9p1 tag %ud fid %d newfid %d", tag, fid, f->newfid);		break;	case Rclone9p1:		sprint(buf, "Rclone9p1 tag %ud fid %d", tag, fid);		break;	case Twalk9p1:	/* 62 */		sprint(buf, "Twalk9p1 tag %ud fid %d name %.28s", tag, fid, f->name);		break;	case Rwalk9p1:		sprint(buf, "Rwalk9p1 tag %ud fid %d qid 0x%lux|0x%lux",			tag, fid, f->qid.path, f->qid.version);		break;	case Topen9p1:	/* 64 */		sprint(buf, "Topen9p1 tag %ud fid %d mode %d", tag, fid, f->mode);		break;	case Ropen9p1:		sprint(buf, "Ropen9p1 tag %ud fid %d qid 0x%lux|0x%lux",			tag, fid, f->qid.path, f->qid.version);		break;	case Tcreate9p1:	/* 66 */		sprint(buf, "Tcreate9p1 tag %ud fid %d name %.28s perm 0x%lux mode %d",			tag, fid, f->name, f->perm, f->mode);		break;	case Rcreate9p1:		sprint(buf, "Rcreate9p1 tag %ud fid %d qid 0x%lux|0x%lux",			tag, fid, f->qid.path, f->qid.version);		break;	case Tread9p1:	/* 68 */		sprint(buf, "Tread9p1 tag %ud fid %d offset %ld count %ld",			tag, fid, f->offset, f->count);		break;	case Rread9p1:		n = sprint(buf, "Rread9p1 tag %ud fid %d count %ld ", tag, fid, f->count);		dumpsome(buf+n, f->data, f->count);		break;	case Twrite9p1:	/* 70 */		n = sprint(buf, "Twrite9p1 tag %ud fid %d offset %ld count %ld ",			tag, fid, f->offset, f->count);		dumpsome(buf+n, f->data, f->count);		break;	case Rwrite9p1:		sprint(buf, "Rwrite9p1 tag %ud fid %d count %ld", tag, fid, f->count);		break;	case Tclunk9p1:	/* 72 */		sprint(buf, "Tclunk9p1 tag %ud fid %d", tag, fid);		break;	case Rclunk9p1:		sprint(buf, "Rclunk9p1 tag %ud fid %d", tag, fid);		break;	case Tremove9p1:	/* 74 */		sprint(buf, "Tremove9p1 tag %ud fid %d", tag, fid);		break;	case Rremove9p1:		sprint(buf, "Rremove9p1 tag %ud fid %d", tag, fid);		break;	case Tstat9p1:	/* 76 */		sprint(buf, "Tstat9p1 tag %ud fid %d", tag, fid);		break;	case Rstat9p1:		n = sprint(buf, "Rstat9p1 tag %ud fid %d", tag, fid);		convM2D9p1(f->stat, &d);		sprint(buf+n, " stat ");		fdirconv(buf+n+6, &d);		break;	case Twstat9p1:	/* 78 */		convM2D9p1(f->stat, &d);		n = sprint(buf, "Twstat9p1 tag %ud fid %d stat ", tag, fid);		fdirconv(buf+n, &d);		break;	case Rwstat9p1:		sprint(buf, "Rwstat9p1 tag %ud fid %d", tag, fid);		break;	case Tclwalk9p1:	/* 81 */		sprint(buf, "Tclwalk9p1 tag %ud fid %d newfid %d name %.28s",			tag, fid, f->newfid, f->name);		break;	case Rclwalk9p1:		sprint(buf, "Rclwalk9p1 tag %ud fid %d qid 0x%lux|0x%lux",			tag, fid, f->qid.path, f->qid.version);		break;	default:		sprint(buf,  "unknown type %d", type);	}	return fmtstrcpy(f1, buf);} static voidfdirconv(char *buf, Dentry *d){	sprint(buf, "'%s' uid=%d gid=%d "		"q %lux|%lux m %uo "		"at %ld mt %ld l %ld ",			d->name, d->uid, d->gid,			d->qid.path, d->qid.version, d->mode,			d->atime, d->mtime, d->size);} /* * dump out count (or DUMPL, if count is bigger) bytes from * buf to ans, as a string if they are all printable, * else as a series of hex bytes */#define DUMPL 24 static voiddumpsome(char *ans, char *buf, long count){	int i, printable;	char *p; 	printable = 1;	if(count > DUMPL)		count = DUMPL;	for(i=0; i<count && printable; i++)		if((buf[i]<32 && buf[i] !='\n' && buf[i] !='\t') || (uchar)buf[i]>127)			printable = 0;	p = ans;	*p++ = '\'';	if(printable){		memmove(p, buf, count);		p += count;	}else{		for(i=0; i<count; i++){			if(i>0 && i%4==0)				*p++ = ' ';			sprint(p, "%2.2ux", buf[i]);			p += 2;		}	}	*p++ = '\'';	*p = 0;}