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