1 d3df3087 2003-12-06 devnull #include <u.h>
  2 3e610791 2004-10-22 devnull #include <signal.h>
  3 d3df3087 2003-12-06 devnull #include <libc.h>
  4 276bf4ed 2005-02-11 devnull #include <bio.h>
  5 d3df3087 2003-12-06 devnull #include <fcall.h>
  6 eb423b5c 2005-01-04 devnull #include <9pclient.h>
  7 0d4243f7 2005-02-11 devnull #include <auth.h>
  8 f063dad9 2004-02-29 devnull #include <thread.h>
  9 d3df3087 2003-12-06 devnull 
 10 d3df3087 2003-12-06 devnull char *addr;
 11 d3df3087 2003-12-06 devnull 
 12 d3df3087 2003-12-06 devnull void
 13 d3df3087 2003-12-06 devnull usage(void)
 14 d3df3087 2003-12-06 devnull {
 15 011090f0 2005-03-21 devnull 	fprint(2, "usage: 9p [-a address] [-A aname] cmd args...\n");
 16 d3df3087 2003-12-06 devnull 	fprint(2, "possible cmds:\n");
 17 d3df3087 2003-12-06 devnull 	fprint(2, "	read name\n");
 18 32f69c36 2003-12-11 devnull 	fprint(2, "	readfd name\n");
 19 276bf4ed 2005-02-11 devnull 	fprint(2, "	write [-l] name\n");
 20 32f69c36 2003-12-11 devnull 	fprint(2, "	writefd name\n");
 21 d3df3087 2003-12-06 devnull 	fprint(2, "	stat name\n");
 22 05abefb2 2005-02-13 devnull 	fprint(2, "	rdwr name\n");
 23 1d2f5612 2005-03-18 devnull 	fprint(2, "	ls [-ld] name\n");
 24 d3df3087 2003-12-06 devnull 	fprint(2, "without -a, name elem/path means /path on server unix!$ns/elem\n");
 25 38c10d1a 2005-01-17 devnull 	threadexitsall("usage");
 26 d3df3087 2003-12-06 devnull }
 27 d3df3087 2003-12-06 devnull 
 28 011090f0 2005-03-21 devnull char *aname;
 29 d3df3087 2003-12-06 devnull void xread(int, char**);
 30 d3df3087 2003-12-06 devnull void xwrite(int, char**);
 31 32f69c36 2003-12-11 devnull void xreadfd(int, char**);
 32 32f69c36 2003-12-11 devnull void xwritefd(int, char**);
 33 d3df3087 2003-12-06 devnull void xstat(int, char**);
 34 d3df3087 2003-12-06 devnull void xls(int, char**);
 35 05abefb2 2005-02-13 devnull void xrdwr(int, char**);
 36 e29d0c84 2006-01-06 devnull void xcon(int, char**);
 37 d3df3087 2003-12-06 devnull 
 38 d3df3087 2003-12-06 devnull struct {
 39 d3df3087 2003-12-06 devnull 	char *s;
 40 d3df3087 2003-12-06 devnull 	void (*f)(int, char**);
 41 d3df3087 2003-12-06 devnull } cmds[] = {
 42 e29d0c84 2006-01-06 devnull 	"con", xcon,
 43 d3df3087 2003-12-06 devnull 	"read", xread,
 44 d3df3087 2003-12-06 devnull 	"write", xwrite,
 45 32f69c36 2003-12-11 devnull 	"readfd", xreadfd,
 46 32f69c36 2003-12-11 devnull 	"writefd", xwritefd,
 47 d3df3087 2003-12-06 devnull 	"stat", xstat,
 48 05abefb2 2005-02-13 devnull 	"rdwr", xrdwr,
 49 1d2f5612 2005-03-18 devnull 	"ls", xls,
 50 d3df3087 2003-12-06 devnull };
 51 d3df3087 2003-12-06 devnull 
 52 d3df3087 2003-12-06 devnull void
 53 f063dad9 2004-02-29 devnull threadmain(int argc, char **argv)
 54 d3df3087 2003-12-06 devnull {
 55 d3df3087 2003-12-06 devnull 	char *cmd;
 56 d3df3087 2003-12-06 devnull 	int i;
 57 d3df3087 2003-12-06 devnull 
 58 d3df3087 2003-12-06 devnull 	ARGBEGIN{
 59 011090f0 2005-03-21 devnull 	case 'A':
 60 011090f0 2005-03-21 devnull 		aname = EARGF(usage());
 61 011090f0 2005-03-21 devnull 		break;
 62 d3df3087 2003-12-06 devnull 	case 'a':
 63 d3df3087 2003-12-06 devnull 		addr = EARGF(usage());
 64 1d2f5612 2005-03-18 devnull 		if(strchr(addr, '!') == nil)
 65 1d2f5612 2005-03-18 devnull 			addr = netmkaddr(addr, "tcp", "9fs");
 66 d3df3087 2003-12-06 devnull 		break;
 67 17cdbb90 2004-12-27 devnull 	case 'D':
 68 0d4243f7 2005-02-11 devnull 		chatty9pclient = 1;
 69 0d4243f7 2005-02-11 devnull 		break;
 70 d3df3087 2003-12-06 devnull 	default:
 71 d3df3087 2003-12-06 devnull 		usage();
 72 d3df3087 2003-12-06 devnull 	}ARGEND
 73 d3df3087 2003-12-06 devnull 
 74 3e610791 2004-10-22 devnull 	signal(SIGINT, SIG_DFL);
 75 3e610791 2004-10-22 devnull 
 76 d3df3087 2003-12-06 devnull 	if(argc < 1)
 77 d3df3087 2003-12-06 devnull 		usage();
 78 d3df3087 2003-12-06 devnull 
 79 d3df3087 2003-12-06 devnull 	cmd = argv[0];
 80 d3df3087 2003-12-06 devnull 	for(i=0; i<nelem(cmds); i++){
 81 d3df3087 2003-12-06 devnull 		if(strcmp(cmds[i].s, cmd) == 0){
 82 d3df3087 2003-12-06 devnull 			cmds[i].f(argc, argv);
 83 f063dad9 2004-02-29 devnull 			threadexitsall(0);
 84 d3df3087 2003-12-06 devnull 		}
 85 d3df3087 2003-12-06 devnull 	}
 86 d3df3087 2003-12-06 devnull 	usage();	
 87 d3df3087 2003-12-06 devnull }
 88 d3df3087 2003-12-06 devnull 
 89 eb423b5c 2005-01-04 devnull CFsys*
 90 d3df3087 2003-12-06 devnull xparse(char *name, char **path)
 91 d3df3087 2003-12-06 devnull {
 92 d3df3087 2003-12-06 devnull 	int fd;
 93 d3df3087 2003-12-06 devnull 	char *p;
 94 eb423b5c 2005-01-04 devnull 	CFsys *fs;
 95 d3df3087 2003-12-06 devnull 
 96 d3df3087 2003-12-06 devnull 	if(addr == nil){
 97 d3df3087 2003-12-06 devnull 		p = strchr(name, '/');
 98 d3df3087 2003-12-06 devnull 		if(p == nil)
 99 d3df3087 2003-12-06 devnull 			p = name+strlen(name);
100 d3df3087 2003-12-06 devnull 		else
101 d3df3087 2003-12-06 devnull 			*p++ = 0;
102 d3df3087 2003-12-06 devnull 		*path = p;
103 011090f0 2005-03-21 devnull 		fs = nsamount(name, aname);
104 32f69c36 2003-12-11 devnull 		if(fs == nil)
105 32f69c36 2003-12-11 devnull 			sysfatal("mount: %r");
106 32f69c36 2003-12-11 devnull 	}else{
107 d3df3087 2003-12-06 devnull 		*path = name;
108 32f69c36 2003-12-11 devnull 		if((fd = dial(addr, nil, nil, nil)) < 0)
109 32f69c36 2003-12-11 devnull 			sysfatal("dial: %r");
110 011090f0 2005-03-21 devnull 		if((fs = fsamount(fd, aname)) == nil)
111 011090f0 2005-03-21 devnull 			sysfatal("fsamount: %r");
112 32f69c36 2003-12-11 devnull 	}
113 d3df3087 2003-12-06 devnull 	return fs;
114 d3df3087 2003-12-06 devnull }
115 d3df3087 2003-12-06 devnull 
116 eb423b5c 2005-01-04 devnull CFid*
117 d3df3087 2003-12-06 devnull xopen(char *name, int mode)
118 d3df3087 2003-12-06 devnull {
119 eb423b5c 2005-01-04 devnull 	CFid *fid;
120 eb423b5c 2005-01-04 devnull 	CFsys *fs;
121 d3df3087 2003-12-06 devnull 
122 d3df3087 2003-12-06 devnull 	fs = xparse(name, &name);
123 d3df3087 2003-12-06 devnull 	fid = fsopen(fs, name, mode);
124 d3df3087 2003-12-06 devnull 	if(fid == nil)
125 d3df3087 2003-12-06 devnull 		sysfatal("fsopen %s: %r", name);
126 d3df3087 2003-12-06 devnull 	return fid;
127 d3df3087 2003-12-06 devnull }
128 d3df3087 2003-12-06 devnull 
129 32f69c36 2003-12-11 devnull int
130 32f69c36 2003-12-11 devnull xopenfd(char *name, int mode)
131 32f69c36 2003-12-11 devnull {
132 eb423b5c 2005-01-04 devnull 	CFsys *fs;
133 32f69c36 2003-12-11 devnull 
134 32f69c36 2003-12-11 devnull 	fs = xparse(name, &name);
135 32f69c36 2003-12-11 devnull 	return fsopenfd(fs, name, mode);
136 32f69c36 2003-12-11 devnull }
137 32f69c36 2003-12-11 devnull 
138 d3df3087 2003-12-06 devnull void
139 d3df3087 2003-12-06 devnull xread(int argc, char **argv)
140 d3df3087 2003-12-06 devnull {
141 05abefb2 2005-02-13 devnull 	char buf[4096];
142 d3df3087 2003-12-06 devnull 	int n;
143 eb423b5c 2005-01-04 devnull 	CFid *fid;
144 d3df3087 2003-12-06 devnull 
145 d3df3087 2003-12-06 devnull 	ARGBEGIN{
146 d3df3087 2003-12-06 devnull 	default:
147 d3df3087 2003-12-06 devnull 		usage();
148 d3df3087 2003-12-06 devnull 	}ARGEND
149 d3df3087 2003-12-06 devnull 
150 d3df3087 2003-12-06 devnull 	if(argc != 1)
151 d3df3087 2003-12-06 devnull 		usage();
152 d3df3087 2003-12-06 devnull 
153 d3df3087 2003-12-06 devnull 	fid = xopen(argv[0], OREAD);
154 d3df3087 2003-12-06 devnull 	while((n = fsread(fid, buf, sizeof buf)) > 0)
155 d3df3087 2003-12-06 devnull 		write(1, buf, n);
156 286237e0 2005-10-29 devnull 	fsclose(fid);
157 d3df3087 2003-12-06 devnull 	if(n < 0)
158 d3df3087 2003-12-06 devnull 		sysfatal("read error: %r");
159 38c10d1a 2005-01-17 devnull 	threadexitsall(0);	
160 d3df3087 2003-12-06 devnull }
161 d3df3087 2003-12-06 devnull 
162 d3df3087 2003-12-06 devnull void
163 32f69c36 2003-12-11 devnull xreadfd(int argc, char **argv)
164 32f69c36 2003-12-11 devnull {
165 05abefb2 2005-02-13 devnull 	char buf[4096];
166 32f69c36 2003-12-11 devnull 	int n;
167 32f69c36 2003-12-11 devnull 	int fd;
168 32f69c36 2003-12-11 devnull 
169 32f69c36 2003-12-11 devnull 	ARGBEGIN{
170 32f69c36 2003-12-11 devnull 	default:
171 32f69c36 2003-12-11 devnull 		usage();
172 32f69c36 2003-12-11 devnull 	}ARGEND
173 32f69c36 2003-12-11 devnull 
174 32f69c36 2003-12-11 devnull 	if(argc != 1)
175 32f69c36 2003-12-11 devnull 		usage();
176 32f69c36 2003-12-11 devnull 
177 32f69c36 2003-12-11 devnull 	fd = xopenfd(argv[0], OREAD);
178 32f69c36 2003-12-11 devnull 	while((n = read(fd, buf, sizeof buf)) > 0)
179 32f69c36 2003-12-11 devnull 		write(1, buf, n);
180 32f69c36 2003-12-11 devnull 	if(n < 0)
181 32f69c36 2003-12-11 devnull 		sysfatal("read error: %r");
182 38c10d1a 2005-01-17 devnull 	threadexitsall(0);	
183 32f69c36 2003-12-11 devnull }
184 32f69c36 2003-12-11 devnull 
185 32f69c36 2003-12-11 devnull void
186 d3df3087 2003-12-06 devnull xwrite(int argc, char **argv)
187 d3df3087 2003-12-06 devnull {
188 05abefb2 2005-02-13 devnull 	char buf[4096];
189 3e610791 2004-10-22 devnull 	int n, did;
190 eb423b5c 2005-01-04 devnull 	CFid *fid;
191 276bf4ed 2005-02-11 devnull 	Biobuf *b;
192 276bf4ed 2005-02-11 devnull 	char *p;
193 276bf4ed 2005-02-11 devnull 	int byline;
194 d3df3087 2003-12-06 devnull 
195 276bf4ed 2005-02-11 devnull 	byline = 0;
196 d3df3087 2003-12-06 devnull 	ARGBEGIN{
197 276bf4ed 2005-02-11 devnull 	case 'l':
198 276bf4ed 2005-02-11 devnull 		byline = 1;
199 05abefb2 2005-02-13 devnull 		break;
200 d3df3087 2003-12-06 devnull 	default:
201 d3df3087 2003-12-06 devnull 		usage();
202 d3df3087 2003-12-06 devnull 	}ARGEND
203 d3df3087 2003-12-06 devnull 
204 d3df3087 2003-12-06 devnull 	if(argc != 1)
205 d3df3087 2003-12-06 devnull 		usage();
206 d3df3087 2003-12-06 devnull 
207 3e610791 2004-10-22 devnull 	did = 0;
208 d3df3087 2003-12-06 devnull 	fid = xopen(argv[0], OWRITE|OTRUNC);
209 276bf4ed 2005-02-11 devnull 	if(byline){
210 276bf4ed 2005-02-11 devnull 		n = 0;
211 276bf4ed 2005-02-11 devnull 		b = malloc(sizeof *b);
212 276bf4ed 2005-02-11 devnull 		if(b == nil)
213 276bf4ed 2005-02-11 devnull 			sysfatal("out of memory");
214 276bf4ed 2005-02-11 devnull 		Binit(b, 0, OREAD);
215 276bf4ed 2005-02-11 devnull 		while((p = Brdstr(b, '\n', 0)) != nil){
216 276bf4ed 2005-02-11 devnull 			n = strlen(p);
217 276bf4ed 2005-02-11 devnull 			did = 1;
218 276bf4ed 2005-02-11 devnull 			if(fswrite(fid, p, n) != n)
219 05abefb2 2005-02-13 devnull 				fprint(2, "write: %r\n");
220 276bf4ed 2005-02-11 devnull 		}
221 276bf4ed 2005-02-11 devnull 		free(b);
222 276bf4ed 2005-02-11 devnull 	}else{
223 276bf4ed 2005-02-11 devnull 		while((n = read(0, buf, sizeof buf)) > 0){
224 276bf4ed 2005-02-11 devnull 			did = 1;
225 276bf4ed 2005-02-11 devnull 			if(fswrite(fid, buf, n) != n)
226 276bf4ed 2005-02-11 devnull 				sysfatal("write error: %r");
227 276bf4ed 2005-02-11 devnull 		}
228 3e610791 2004-10-22 devnull 	}
229 3e610791 2004-10-22 devnull 	if(n == 0 && !did){
230 3e610791 2004-10-22 devnull 		if(fswrite(fid, buf, 0) != 0)
231 3e610791 2004-10-22 devnull 			sysfatal("write error: %r");
232 3e610791 2004-10-22 devnull 	}
233 d3df3087 2003-12-06 devnull 	if(n < 0)
234 d3df3087 2003-12-06 devnull 		sysfatal("read error: %r");
235 286237e0 2005-10-29 devnull 	fsclose(fid);
236 38c10d1a 2005-01-17 devnull 	threadexitsall(0);	
237 d3df3087 2003-12-06 devnull }
238 d3df3087 2003-12-06 devnull 
239 d3df3087 2003-12-06 devnull void
240 32f69c36 2003-12-11 devnull xwritefd(int argc, char **argv)
241 32f69c36 2003-12-11 devnull {
242 05abefb2 2005-02-13 devnull 	char buf[4096];
243 32f69c36 2003-12-11 devnull 	int n;
244 32f69c36 2003-12-11 devnull 	int fd;
245 32f69c36 2003-12-11 devnull 
246 32f69c36 2003-12-11 devnull 	ARGBEGIN{
247 32f69c36 2003-12-11 devnull 	default:
248 32f69c36 2003-12-11 devnull 		usage();
249 32f69c36 2003-12-11 devnull 	}ARGEND
250 32f69c36 2003-12-11 devnull 
251 32f69c36 2003-12-11 devnull 	if(argc != 1)
252 32f69c36 2003-12-11 devnull 		usage();
253 32f69c36 2003-12-11 devnull 
254 32f69c36 2003-12-11 devnull 	fd = xopenfd(argv[0], OWRITE|OTRUNC);
255 32f69c36 2003-12-11 devnull 	while((n = read(0, buf, sizeof buf)) > 0)
256 32f69c36 2003-12-11 devnull 		if(write(fd, buf, n) != n)
257 32f69c36 2003-12-11 devnull 			sysfatal("write error: %r");
258 32f69c36 2003-12-11 devnull 	if(n < 0)
259 32f69c36 2003-12-11 devnull 		sysfatal("read error: %r");
260 38c10d1a 2005-01-17 devnull 	threadexitsall(0);	
261 32f69c36 2003-12-11 devnull }
262 32f69c36 2003-12-11 devnull 
263 32f69c36 2003-12-11 devnull void
264 d3df3087 2003-12-06 devnull xstat(int argc, char **argv)
265 d3df3087 2003-12-06 devnull {
266 d3df3087 2003-12-06 devnull 	Dir *d;
267 eb423b5c 2005-01-04 devnull 	CFsys *fs;
268 eb423b5c 2005-01-04 devnull 	char *name;
269 d3df3087 2003-12-06 devnull 
270 d3df3087 2003-12-06 devnull 	ARGBEGIN{
271 d3df3087 2003-12-06 devnull 	default:
272 d3df3087 2003-12-06 devnull 		usage();
273 d3df3087 2003-12-06 devnull 	}ARGEND
274 d3df3087 2003-12-06 devnull 
275 d3df3087 2003-12-06 devnull 	if(argc != 1)
276 d3df3087 2003-12-06 devnull 		usage();
277 d3df3087 2003-12-06 devnull 
278 eb423b5c 2005-01-04 devnull 	name = argv[0];
279 eb423b5c 2005-01-04 devnull 	fs = xparse(name, &name);
280 eb423b5c 2005-01-04 devnull 	if((d = fsdirstat(fs, name)) == 0)
281 eb423b5c 2005-01-04 devnull 		sysfatal("dirstat: %r");
282 d3df3087 2003-12-06 devnull 	fmtinstall('D', dirfmt);
283 d3df3087 2003-12-06 devnull 	fmtinstall('M', dirmodefmt);
284 d3df3087 2003-12-06 devnull 	print("%D\n", d);
285 38c10d1a 2005-01-17 devnull 	threadexitsall(0);
286 05abefb2 2005-02-13 devnull }
287 05abefb2 2005-02-13 devnull 
288 05abefb2 2005-02-13 devnull void
289 05abefb2 2005-02-13 devnull xrdwr(int argc, char **argv)
290 05abefb2 2005-02-13 devnull {
291 05abefb2 2005-02-13 devnull 	char buf[4096];
292 05abefb2 2005-02-13 devnull 	int n;
293 05abefb2 2005-02-13 devnull 	CFid *fid;
294 05abefb2 2005-02-13 devnull 
295 05abefb2 2005-02-13 devnull 	ARGBEGIN{
296 05abefb2 2005-02-13 devnull 	default:
297 05abefb2 2005-02-13 devnull 		usage();
298 05abefb2 2005-02-13 devnull 	}ARGEND
299 05abefb2 2005-02-13 devnull 
300 05abefb2 2005-02-13 devnull 	if(argc != 1)
301 05abefb2 2005-02-13 devnull 		usage();
302 05abefb2 2005-02-13 devnull 
303 05abefb2 2005-02-13 devnull 	fid = xopen(argv[0], ORDWR);
304 05abefb2 2005-02-13 devnull 	for(;;){
305 05abefb2 2005-02-13 devnull 		if((n = fsread(fid, buf, sizeof buf)) < 0)
306 05abefb2 2005-02-13 devnull 			fprint(2, "read: %r\n");
307 05abefb2 2005-02-13 devnull 		else{
308 05abefb2 2005-02-13 devnull 			write(1, buf, n);
309 05abefb2 2005-02-13 devnull 			write(1, "\n", 1);
310 05abefb2 2005-02-13 devnull 		}
311 05abefb2 2005-02-13 devnull 		n = read(0, buf, sizeof buf);
312 05abefb2 2005-02-13 devnull 		if(n <= 0)
313 05abefb2 2005-02-13 devnull 			break;
314 05abefb2 2005-02-13 devnull 		if(buf[n-1] == '\n')
315 05abefb2 2005-02-13 devnull 			n--;
316 05abefb2 2005-02-13 devnull 		if(fswrite(fid, buf, n) != n)
317 05abefb2 2005-02-13 devnull 			fprint(2, "write: %r\n");
318 05abefb2 2005-02-13 devnull 	}
319 286237e0 2005-10-29 devnull 	fsclose(fid);
320 05abefb2 2005-02-13 devnull 	threadexitsall(0);	
321 e29d0c84 2006-01-06 devnull }
322 e29d0c84 2006-01-06 devnull 
323 e29d0c84 2006-01-06 devnull void
324 e29d0c84 2006-01-06 devnull rdcon(void *v)
325 e29d0c84 2006-01-06 devnull {
326 ed0601ee 2006-01-06 devnull 	int n;
327 e29d0c84 2006-01-06 devnull 	char buf[4096];
328 e29d0c84 2006-01-06 devnull 	CFid *fid;
329 e29d0c84 2006-01-06 devnull 	
330 e29d0c84 2006-01-06 devnull 	fid = v;
331 e29d0c84 2006-01-06 devnull 	for(;;){
332 e29d0c84 2006-01-06 devnull 		n = read(0, buf, sizeof buf);
333 e29d0c84 2006-01-06 devnull 		if(n <= 0)
334 e29d0c84 2006-01-06 devnull 			threadexitsall(0);
335 ed0601ee 2006-01-06 devnull 		if(buf[0] == 'R'-'A'+1)
336 ed0601ee 2006-01-06 devnull 			threadexitsall(0);
337 e29d0c84 2006-01-06 devnull 		if(fswrite(fid, buf, n) != n)
338 e29d0c84 2006-01-06 devnull 			fprint(2, "write: %r\n");
339 e29d0c84 2006-01-06 devnull 	}
340 1d2f5612 2005-03-18 devnull }
341 1d2f5612 2005-03-18 devnull 
342 e29d0c84 2006-01-06 devnull void
343 e29d0c84 2006-01-06 devnull xcon(int argc, char **argv)
344 e29d0c84 2006-01-06 devnull {
345 e29d0c84 2006-01-06 devnull 	char buf[4096], *r, *w, *e;
346 e29d0c84 2006-01-06 devnull 	int n, nocr;
347 e29d0c84 2006-01-06 devnull 	CFid *fid;
348 e29d0c84 2006-01-06 devnull 	
349 e29d0c84 2006-01-06 devnull 	nocr = 1;
350 e29d0c84 2006-01-06 devnull 
351 e29d0c84 2006-01-06 devnull 	ARGBEGIN{
352 e29d0c84 2006-01-06 devnull 	case 'r':
353 e29d0c84 2006-01-06 devnull 		nocr = 0;
354 e29d0c84 2006-01-06 devnull 		break;
355 e29d0c84 2006-01-06 devnull 	default:
356 e29d0c84 2006-01-06 devnull 		usage();
357 e29d0c84 2006-01-06 devnull 	}ARGEND
358 e29d0c84 2006-01-06 devnull 
359 e29d0c84 2006-01-06 devnull 	if(argc != 1)
360 e29d0c84 2006-01-06 devnull 		usage();
361 e29d0c84 2006-01-06 devnull 
362 e29d0c84 2006-01-06 devnull 	fid = xopen(argv[0], ORDWR);
363 ed0601ee 2006-01-06 devnull 	proccreate(rdcon, fid, 32768);
364 e29d0c84 2006-01-06 devnull 	for(;;){
365 ed0601ee 2006-01-06 devnull 		n = fsread(fid, buf, sizeof buf);
366 e29d0c84 2006-01-06 devnull 		if(n <= 0)
367 e29d0c84 2006-01-06 devnull 			threadexitsall(0);
368 e29d0c84 2006-01-06 devnull 		if(nocr){
369 e29d0c84 2006-01-06 devnull 			for(r=w=buf, e=buf+n; r<e; r++)
370 e29d0c84 2006-01-06 devnull 				if(*r != '\r')
371 e29d0c84 2006-01-06 devnull 					*w++ = *r;
372 e29d0c84 2006-01-06 devnull 			n = w-buf;
373 e29d0c84 2006-01-06 devnull 		}
374 e29d0c84 2006-01-06 devnull 		if(write(1, buf, n) != n)
375 e29d0c84 2006-01-06 devnull 			threadexitsall(0);
376 e29d0c84 2006-01-06 devnull 	}
377 e29d0c84 2006-01-06 devnull 	fsclose(fid);
378 e29d0c84 2006-01-06 devnull 	threadexitsall(0);	
379 e29d0c84 2006-01-06 devnull }
380 e29d0c84 2006-01-06 devnull 
381 1d2f5612 2005-03-18 devnull static char *mon[] = 
382 1d2f5612 2005-03-18 devnull {
383 1d2f5612 2005-03-18 devnull 	"Jan", "Feb", "Mar", "Apr", "May", "Jun", 
384 1d2f5612 2005-03-18 devnull 	"Jul", "Aug", "Sep", "Oct", "Nov", "Dec"
385 1d2f5612 2005-03-18 devnull };
386 1d2f5612 2005-03-18 devnull 
387 1d2f5612 2005-03-18 devnull 
388 1d2f5612 2005-03-18 devnull int
389 1d2f5612 2005-03-18 devnull timefmt(Fmt *fmt)
390 1d2f5612 2005-03-18 devnull {
391 1d2f5612 2005-03-18 devnull 	ulong u;
392 1d2f5612 2005-03-18 devnull 	static ulong time0;
393 1d2f5612 2005-03-18 devnull 	Tm *tm;
394 1d2f5612 2005-03-18 devnull 	
395 1d2f5612 2005-03-18 devnull 	if(time0 == 0)
396 1d2f5612 2005-03-18 devnull 		time0 = time(0);
397 1d2f5612 2005-03-18 devnull 	u = va_arg(fmt->args, ulong);
398 1d2f5612 2005-03-18 devnull 	tm = localtime(u);
399 1d2f5612 2005-03-18 devnull 	if((long)(time0-u) < 6*30*86400)
400 1d2f5612 2005-03-18 devnull 		return fmtprint(fmt, "%s %2d %02d:%02d",
401 1d2f5612 2005-03-18 devnull 			mon[tm->mon], tm->mday, tm->hour, tm->min);
402 bcac59d8 2005-08-11 devnull 	return fmtprint(fmt, "%s %2d %5d",
403 bcac59d8 2005-08-11 devnull 		mon[tm->mon], tm->mday, tm->year+1900);
404 d3df3087 2003-12-06 devnull }
405 1d2f5612 2005-03-18 devnull 
406 1d2f5612 2005-03-18 devnull static int
407 1d2f5612 2005-03-18 devnull dircmp(const void *va, const void *vb)
408 1d2f5612 2005-03-18 devnull {
409 1d2f5612 2005-03-18 devnull 	Dir *a, *b;
410 1d2f5612 2005-03-18 devnull 	
411 1d2f5612 2005-03-18 devnull 	a = (Dir*)va;
412 1d2f5612 2005-03-18 devnull 	b = (Dir*)vb;
413 1d2f5612 2005-03-18 devnull 	return strcmp(a->name, b->name);
414 1d2f5612 2005-03-18 devnull }
415 1d2f5612 2005-03-18 devnull 
416 1d2f5612 2005-03-18 devnull void
417 1d2f5612 2005-03-18 devnull xls(int argc, char **argv)
418 1d2f5612 2005-03-18 devnull {
419 a919ad83 2005-08-10 devnull 	char *err, *name, *xname, *f[4], buf[4096];
420 1d2f5612 2005-03-18 devnull 	int nf, i, j, l;
421 1d2f5612 2005-03-18 devnull 	int lflag, dflag, n, len[4];
422 1d2f5612 2005-03-18 devnull 	Dir *d;
423 1d2f5612 2005-03-18 devnull 	CFid *fid;
424 1d2f5612 2005-03-18 devnull 	CFsys *fs;
425 a919ad83 2005-08-10 devnull 
426 a919ad83 2005-08-10 devnull 	err = nil;
427 1d2f5612 2005-03-18 devnull 	lflag = dflag = 0;
428 1d2f5612 2005-03-18 devnull 	ARGBEGIN{
429 1d2f5612 2005-03-18 devnull 	case 'l':
430 1d2f5612 2005-03-18 devnull 		lflag = 1;
431 1d2f5612 2005-03-18 devnull 		break;
432 1d2f5612 2005-03-18 devnull 	case 'd':
433 1d2f5612 2005-03-18 devnull 		dflag = 1;
434 1d2f5612 2005-03-18 devnull 		break;
435 1d2f5612 2005-03-18 devnull 	}ARGEND
436 1d2f5612 2005-03-18 devnull 	
437 1d2f5612 2005-03-18 devnull 	fmtinstall('D', dirfmt);
438 1d2f5612 2005-03-18 devnull 	fmtinstall('M', dirmodefmt);
439 1d2f5612 2005-03-18 devnull 	quotefmtinstall();
440 1d2f5612 2005-03-18 devnull 	fmtinstall('T', timefmt);
441 1d2f5612 2005-03-18 devnull 	
442 1d2f5612 2005-03-18 devnull 	for(i=0; i<argc; i++){
443 1d2f5612 2005-03-18 devnull 		name = argv[i];
444 1d2f5612 2005-03-18 devnull 		fs = xparse(name, &xname);
445 1d2f5612 2005-03-18 devnull 		if((d = fsdirstat(fs, xname)) == nil){
446 1d2f5612 2005-03-18 devnull 			fprint(2, "dirstat %s: %r\n", name);
447 1d2f5612 2005-03-18 devnull 			fsunmount(fs);
448 a919ad83 2005-08-10 devnull 			err = "errors";
449 1d2f5612 2005-03-18 devnull 			continue;
450 1d2f5612 2005-03-18 devnull 		}
451 1d2f5612 2005-03-18 devnull 		if((d->mode&DMDIR) && !dflag){
452 1d2f5612 2005-03-18 devnull 			if((fid = fsopen(fs, xname, OREAD)) == nil){
453 1d2f5612 2005-03-18 devnull 				fprint(2, "open %s: %r\n", name);
454 1d2f5612 2005-03-18 devnull 				fsunmount(fs);
455 1d2f5612 2005-03-18 devnull 				free(d);
456 a919ad83 2005-08-10 devnull 				err = "errors";
457 1d2f5612 2005-03-18 devnull 				continue;
458 1d2f5612 2005-03-18 devnull 			}
459 1d2f5612 2005-03-18 devnull 			free(d);
460 1d2f5612 2005-03-18 devnull 			n = fsdirreadall(fid, &d);
461 1d2f5612 2005-03-18 devnull 			fsclose(fid);
462 1d2f5612 2005-03-18 devnull 			if(n < 0){
463 1d2f5612 2005-03-18 devnull 				fprint(2, "dirreadall %s: %r\n", name);
464 1d2f5612 2005-03-18 devnull 				fsunmount(fs);
465 a919ad83 2005-08-10 devnull 				err = "errors";
466 1d2f5612 2005-03-18 devnull 				continue;
467 1d2f5612 2005-03-18 devnull 			}
468 1d2f5612 2005-03-18 devnull 			qsort(d, n, sizeof d[0], dircmp);
469 1d2f5612 2005-03-18 devnull 			for(j=0; j<5; j++)
470 1d2f5612 2005-03-18 devnull 				len[j] = 0;
471 1d2f5612 2005-03-18 devnull 			for(i=0; i<n; i++){
472 1d2f5612 2005-03-18 devnull 				d[i].type = 'M';
473 1d2f5612 2005-03-18 devnull 				d[i].dev = 0;
474 1d2f5612 2005-03-18 devnull 				snprint(buf, sizeof buf, "%d %s %s %lld",
475 1d2f5612 2005-03-18 devnull 					d[i].dev, d[i].uid, d[i].gid, d[i].length);
476 1d2f5612 2005-03-18 devnull 				nf = getfields(buf, f, 4, 0, " ");
477 1d2f5612 2005-03-18 devnull 				for(j=0; j<4; j++){
478 1d2f5612 2005-03-18 devnull 					l = strlen(f[j]);
479 1d2f5612 2005-03-18 devnull 					if(l > len[j])
480 1d2f5612 2005-03-18 devnull 						len[j] = l;
481 1d2f5612 2005-03-18 devnull 				}
482 1d2f5612 2005-03-18 devnull 			}
483 1d2f5612 2005-03-18 devnull 			for(i=0; i<n; i++)
484 1d2f5612 2005-03-18 devnull 				print("%M %C %*d %*s %*s %*lld %T %q\n",
485 1d2f5612 2005-03-18 devnull 					d[i].mode, d[i].type, len[0], d[i].dev,
486 1d2f5612 2005-03-18 devnull 					-len[1], d[i].uid, -len[2], d[i].gid,
487 1d2f5612 2005-03-18 devnull 					len[3], d[i].length, d[i].mtime, d[i].name);
488 1d2f5612 2005-03-18 devnull 			
489 1d2f5612 2005-03-18 devnull 		}else{
490 1d2f5612 2005-03-18 devnull 			d->type = 'M';
491 1d2f5612 2005-03-18 devnull 			d->dev = 0;
492 1d2f5612 2005-03-18 devnull 			print("%M %C %d %s %s %lld %T %q\n",
493 1d2f5612 2005-03-18 devnull 				d->mode, d->type, d->dev,
494 1d2f5612 2005-03-18 devnull 				d->uid, d->gid, d->length, d->mtime, d->name);
495 1d2f5612 2005-03-18 devnull 		}
496 1d2f5612 2005-03-18 devnull 		free(d);
497 1d2f5612 2005-03-18 devnull 	}
498 a919ad83 2005-08-10 devnull 	threadexitsall(err);
499 1d2f5612 2005-03-18 devnull }
500 1d2f5612 2005-03-18 devnull