2 #include <fcall.h> /* dirmodefmt */
5 #pragma varargck type "t" ulong
20 void unvac(VacFile*, char*, VacDir*);
25 fprint(2, "usage: unvac [-TVcdtv] [-h host] file.vac [file ...]\n");
26 threadexitsall("usage");
36 threadmain(int argc, char *argv[])
42 fmtinstall('H', encodefmt);
43 fmtinstall('V', vtscorefmt);
44 fmtinstall('F', vtfcallfmt);
45 fmtinstall('t', mtimefmt);
46 fmtinstall('M', dirmodefmt);
65 host = EARGF(usage());
84 fprint(2, "cannot use -c with -d\n");
90 sysfatal("could not connect to server: %r");
92 if(vtconnect(conn) < 0)
93 sysfatal("vtconnect: %r");
95 fs = vacfsopen(conn, argv[0], VtOREAD, 128);
97 sysfatal("vacfsopen: %r");
101 found = vtmallocz(nwant*sizeof found[0]);
103 if((f = vacfsgetroot(fs)) == nil)
104 sysfatal("vacfsgetroot: %r");
107 for(i=0; i<nwant; i++){
108 if(want[i] && !found[i]){
109 fprint(2, "warning: didn't find %s\n", want[i]);
114 threadexitsall("errors");
116 fprint(2, "%lld bytes read, %lld bytes skipped\n",
117 stats.data, stats.skipdata);
122 writen(int fd, char *buf, int n)
129 m = write(fd, buf, n);
146 namelen = strlen(name);
147 for(i=0; i<nwant; i++){
151 if(n < namelen && name[n] == '/' && memcmp(name, want[i], n) == 0)
153 if(namelen < n && want[i][namelen] == '/' && memcmp(want[i], name, namelen) == 0)
155 if(n == namelen && memcmp(name, want[i], n) == 0){
164 unvac(VacFile *f, char *name, VacDir *vdir)
166 static char buf[65536];
180 mode = vacfilegetmode(f);
185 mode9 = vdir->mode&0777;
190 if(mode&ModeExclusive)
192 print("%M %-10s %-10s %11lld %t %s\n",
193 mode9, vdir->uid, vdir->gid, vdir->size,
196 print("%s%s\n", name, (mode&ModeDir) ? "/" : "");
199 fprint(2, "%s%s\n", name, (mode&ModeDir) ? "/" : "");
202 if(mode&(ModeDevice|ModeLink|ModeNamedPipe|ModeExclusive)){
207 else if(mode&ModeLink)
209 else if(mode&ModeNamedPipe)
211 else if(mode&ModeExclusive)
214 what = "unknown type of file";
215 fprint(2, "warning: ignoring %s %s\n", what, name);
220 if((vde = vdeopen(f)) == nil){
221 fprint(2, "vdeopen %s: %r", name);
225 if(!table && !tostdout && vdir){
227 if((dp = dirstat(name)) == nil){
228 if((fd = create(name, OREAD, DMDIR|(mode&0777))) < 0){
229 fprint(2, "mkdir %s: %r\n", name);
234 if(!(dp->mode&DMDIR)){
235 fprint(2, "%s already exists and is not a directory\n", name);
244 while(vderead(vde, &newvdir) > 0){
246 newname = newvdir.elem;
248 newname = smprint("%s/%s", name, newvdir.elem);
249 if(wantfile(newname)){
250 if((newf = vacfilewalk(f, newvdir.elem)) == nil){
251 fprint(2, "walk %s: %r\n", name);
254 fprint(2, "walk loop: %s\n", newname);
257 unvac(newf, newname, &newvdir);
261 if(newname != newvdir.elem)
271 else if(diff && (fd = open(name, ORDWR)) >= 0){
272 bsize = vacfiledsize(f);
273 while((n = readn(fd, buf, bsize)) > 0){
274 if(sha1matches(f, off/bsize, (uchar*)buf, n)){
280 if((m = vacfileread(f, buf, n, off)) < 0)
282 if(writen(fd, buf, m) != m){
283 fprint(2, "write %s: %r\n", name);
291 if(dirfwstat(fd, &d) < 0){
292 fprint(2, "dirfwstat %s: %r\n", name);
299 else if((fd = create(name, OWRITE, mode&0777)) < 0){
300 fprint(2, "create %s: %r\n", name);
304 while((n = vacfileread(f, buf, sizeof buf, off)) > 0){
305 if(writen(fd, buf, n) != n){
306 fprint(2, "write %s: %r\n", name);
319 if(vdir && settimes && !tostdout){
321 d.mtime = vdir->mtime;
322 if(dirwstat(name, &d) < 0)
323 fprint(2, "warning: setting mtime on %s: %r", name);
332 tm = localtime(va_arg(f->args, ulong));
333 fmtprint(f, "%04d-%02d-%02d %02d:%02d",
334 tm->year+1900, tm->mon+1, tm->mday,