1 ff3adf60 2004-04-14 devnull #include <u.h>
2 ff3adf60 2004-04-14 devnull #include <libc.h>
3 ff3adf60 2004-04-14 devnull #include <bio.h>
4 ff3adf60 2004-04-14 devnull #include <flate.h>
5 ff3adf60 2004-04-14 devnull #include "zip.h"
9 ff3adf60 2004-04-14 devnull BufSize = 4096
12 ff3adf60 2004-04-14 devnull static int cheader(Biobuf *bin, ZipHead *zh);
13 ff3adf60 2004-04-14 devnull static int copyout(int ofd, Biobuf *bin, long len);
14 ff3adf60 2004-04-14 devnull static int crcwrite(void *ofd, void *buf, int n);
15 ff3adf60 2004-04-14 devnull static int findCDir(Biobuf *bin, char *file);
16 ff3adf60 2004-04-14 devnull static int get1(Biobuf *b);
17 ff3adf60 2004-04-14 devnull static int get2(Biobuf *b);
18 ff3adf60 2004-04-14 devnull static ulong get4(Biobuf *b);
19 ff3adf60 2004-04-14 devnull static char *getname(Biobuf *b, int len);
20 ff3adf60 2004-04-14 devnull static int header(Biobuf *bin, ZipHead *zh);
21 ff3adf60 2004-04-14 devnull static long msdos2time(int time, int date);
22 ff3adf60 2004-04-14 devnull static int sunzip(Biobuf *bin);
23 ff3adf60 2004-04-14 devnull static int sunztable(Biobuf *bin);
24 ff3adf60 2004-04-14 devnull static void trailer(Biobuf *bin, ZipHead *zh);
25 ff3adf60 2004-04-14 devnull static int unzip(Biobuf *bin, char *file);
26 ff3adf60 2004-04-14 devnull static int unzipEntry(Biobuf *bin, ZipHead *czh);
27 ff3adf60 2004-04-14 devnull static int unztable(Biobuf *bin, char *file);
28 ff3adf60 2004-04-14 devnull static int wantFile(char *file);
30 ff3adf60 2004-04-14 devnull static void *emalloc(ulong);
31 ff3adf60 2004-04-14 devnull static void error(char*, ...);
32 ff3adf60 2004-04-14 devnull /* #pragma varargck argpos error 1 */
34 ff3adf60 2004-04-14 devnull static Biobuf bin;
35 ff3adf60 2004-04-14 devnull static ulong crc;
36 ff3adf60 2004-04-14 devnull static ulong *crctab;
37 ff3adf60 2004-04-14 devnull static int debug;
38 ff3adf60 2004-04-14 devnull static char *delfile;
39 ff3adf60 2004-04-14 devnull static int lower;
40 ff3adf60 2004-04-14 devnull static int nwant;
41 ff3adf60 2004-04-14 devnull static ulong rlen;
42 ff3adf60 2004-04-14 devnull static int settimes;
43 ff3adf60 2004-04-14 devnull static int stdout;
44 ff3adf60 2004-04-14 devnull static int verbose;
45 ff3adf60 2004-04-14 devnull static char **want;
46 ff3adf60 2004-04-14 devnull static int wbad;
47 ff3adf60 2004-04-14 devnull static ulong wlen;
48 ff3adf60 2004-04-14 devnull static jmp_buf zjmp;
50 ff3adf60 2004-04-14 devnull static void
51 ff3adf60 2004-04-14 devnull usage(void)
53 ff3adf60 2004-04-14 devnull fprint(2, "usage: unzip [-tsv] [-f zipfile] [file ...]\n");
54 ff3adf60 2004-04-14 devnull exits("usage");
58 ff3adf60 2004-04-14 devnull main(int argc, char *argv[])
60 ff3adf60 2004-04-14 devnull char *zfile;
61 ff3adf60 2004-04-14 devnull int fd, ok, table, stream;
63 ff3adf60 2004-04-14 devnull table = 0;
64 ff3adf60 2004-04-14 devnull stream = 0;
65 ff3adf60 2004-04-14 devnull zfile = nil;
66 ff3adf60 2004-04-14 devnull ARGBEGIN{
67 ff3adf60 2004-04-14 devnull case 'D':
70 ff3adf60 2004-04-14 devnull case 'c':
71 ff3adf60 2004-04-14 devnull stdout++;
73 ff3adf60 2004-04-14 devnull case 'i':
76 ff3adf60 2004-04-14 devnull case 'f':
77 ff3adf60 2004-04-14 devnull zfile = ARGF();
78 ff3adf60 2004-04-14 devnull if(zfile == nil)
81 ff3adf60 2004-04-14 devnull case 's':
82 ff3adf60 2004-04-14 devnull stream++;
84 ff3adf60 2004-04-14 devnull case 't':
87 ff3adf60 2004-04-14 devnull case 'T':
88 ff3adf60 2004-04-14 devnull settimes++;
90 ff3adf60 2004-04-14 devnull case 'v':
91 ff3adf60 2004-04-14 devnull verbose++;
98 ff3adf60 2004-04-14 devnull nwant = argc;
99 ff3adf60 2004-04-14 devnull want = argv;
101 ff3adf60 2004-04-14 devnull crctab = mkcrctab(ZCrcPoly);
102 ff3adf60 2004-04-14 devnull ok = inflateinit();
103 ff3adf60 2004-04-14 devnull if(ok != FlateOk)
104 ff3adf60 2004-04-14 devnull sysfatal("inflateinit failed: %s\n", flateerr(ok));
106 ff3adf60 2004-04-14 devnull if(zfile == nil){
107 ff3adf60 2004-04-14 devnull Binit(&bin, 0, OREAD);
108 ff3adf60 2004-04-14 devnull zfile = "<stdin>";
110 ff3adf60 2004-04-14 devnull fd = open(zfile, OREAD);
111 ff3adf60 2004-04-14 devnull if(fd < 0)
112 ff3adf60 2004-04-14 devnull sysfatal("can't open %s: %r", zfile);
113 ff3adf60 2004-04-14 devnull Binit(&bin, fd, OREAD);
116 ff3adf60 2004-04-14 devnull if(table){
117 ff3adf60 2004-04-14 devnull if(stream)
118 ff3adf60 2004-04-14 devnull ok = sunztable(&bin);
120 ff3adf60 2004-04-14 devnull ok = unztable(&bin, zfile);
122 ff3adf60 2004-04-14 devnull if(stream)
123 ff3adf60 2004-04-14 devnull ok = sunzip(&bin);
125 ff3adf60 2004-04-14 devnull ok = unzip(&bin, zfile);
128 ff3adf60 2004-04-14 devnull exits(ok ? nil: "errors");
132 ff3adf60 2004-04-14 devnull * print the table of contents from the "central directory structure"
134 ff3adf60 2004-04-14 devnull static int
135 ff3adf60 2004-04-14 devnull unztable(Biobuf *bin, char *file)
137 ff3adf60 2004-04-14 devnull ZipHead zh;
138 f7b74c17 2004-12-28 devnull int volatile entries;
140 ff3adf60 2004-04-14 devnull entries = findCDir(bin, file);
141 ff3adf60 2004-04-14 devnull if(entries < 0)
142 ff3adf60 2004-04-14 devnull return 0;
144 ff3adf60 2004-04-14 devnull if(verbose > 1)
145 ff3adf60 2004-04-14 devnull print("%d items in the archive\n", entries);
146 ff3adf60 2004-04-14 devnull while(entries-- > 0){
147 ff3adf60 2004-04-14 devnull if(setjmp(zjmp)){
148 ff3adf60 2004-04-14 devnull free(zh.file);
149 ff3adf60 2004-04-14 devnull return 0;
152 ff3adf60 2004-04-14 devnull memset(&zh, 0, sizeof(zh));
153 ff3adf60 2004-04-14 devnull if(!cheader(bin, &zh))
154 ff3adf60 2004-04-14 devnull return 1;
156 ff3adf60 2004-04-14 devnull if(wantFile(zh.file)){
157 ff3adf60 2004-04-14 devnull if(verbose)
158 ff3adf60 2004-04-14 devnull print("%-32s %10lud %s", zh.file, zh.uncsize, ctime(msdos2time(zh.modtime, zh.moddate)));
160 ff3adf60 2004-04-14 devnull print("%s\n", zh.file);
162 ff3adf60 2004-04-14 devnull if(verbose > 1){
163 ff3adf60 2004-04-14 devnull print("\tmade by os %d vers %d.%d\n", zh.madeos, zh.madevers/10, zh.madevers % 10);
164 ff3adf60 2004-04-14 devnull print("\textract by os %d vers %d.%d\n", zh.extos, zh.extvers/10, zh.extvers % 10);
165 ff3adf60 2004-04-14 devnull print("\tflags %x\n", zh.flags);
166 ff3adf60 2004-04-14 devnull print("\tmethod %d\n", zh.meth);
167 ff3adf60 2004-04-14 devnull print("\tmod time %d\n", zh.modtime);
168 ff3adf60 2004-04-14 devnull print("\tmod date %d\n", zh.moddate);
169 ff3adf60 2004-04-14 devnull print("\tcrc %lux\n", zh.crc);
170 ff3adf60 2004-04-14 devnull print("\tcompressed size %lud\n", zh.csize);
171 ff3adf60 2004-04-14 devnull print("\tuncompressed size %lud\n", zh.uncsize);
172 ff3adf60 2004-04-14 devnull print("\tinternal attributes %ux\n", zh.iattr);
173 ff3adf60 2004-04-14 devnull print("\texternal attributes %lux\n", zh.eattr);
174 ff3adf60 2004-04-14 devnull print("\tstarts at %ld\n", zh.off);
178 ff3adf60 2004-04-14 devnull free(zh.file);
179 ff3adf60 2004-04-14 devnull zh.file = nil;
182 ff3adf60 2004-04-14 devnull return 1;
186 ff3adf60 2004-04-14 devnull * print the "local file header" table of contents
188 ff3adf60 2004-04-14 devnull static int
189 ff3adf60 2004-04-14 devnull sunztable(Biobuf *bin)
191 ff3adf60 2004-04-14 devnull ZipHead zh;
192 ff3adf60 2004-04-14 devnull vlong off;
193 ff3adf60 2004-04-14 devnull ulong hcrc, hcsize, huncsize;
194 ff3adf60 2004-04-14 devnull int ok, err;
197 ff3adf60 2004-04-14 devnull for(;;){
198 ff3adf60 2004-04-14 devnull if(setjmp(zjmp)){
199 ff3adf60 2004-04-14 devnull free(zh.file);
200 ff3adf60 2004-04-14 devnull return 0;
203 ff3adf60 2004-04-14 devnull memset(&zh, 0, sizeof(zh));
204 ff3adf60 2004-04-14 devnull if(!header(bin, &zh))
205 ff3adf60 2004-04-14 devnull return ok;
207 ff3adf60 2004-04-14 devnull hcrc = zh.crc;
208 ff3adf60 2004-04-14 devnull hcsize = zh.csize;
209 ff3adf60 2004-04-14 devnull huncsize = zh.uncsize;
211 ff3adf60 2004-04-14 devnull wlen = 0;
212 ff3adf60 2004-04-14 devnull rlen = 0;
213 ff3adf60 2004-04-14 devnull crc = 0;
214 ff3adf60 2004-04-14 devnull wbad = 0;
216 ff3adf60 2004-04-14 devnull if(zh.meth == 0){
217 ff3adf60 2004-04-14 devnull if(!copyout(-1, bin, zh.csize))
218 ff3adf60 2004-04-14 devnull error("reading data for %s failed: %r", zh.file);
219 ff3adf60 2004-04-14 devnull }else if(zh.meth == 8){
220 ff3adf60 2004-04-14 devnull off = Boffset(bin);
221 ff3adf60 2004-04-14 devnull err = inflate((void*)-1, crcwrite, bin, (int(*)(void*))Bgetc);
222 ff3adf60 2004-04-14 devnull if(err != FlateOk)
223 ff3adf60 2004-04-14 devnull error("inflate %s failed: %s", zh.file, flateerr(err));
224 ff3adf60 2004-04-14 devnull rlen = Boffset(bin) - off;
226 ff3adf60 2004-04-14 devnull error("can't handle compression method %d for %s", zh.meth, zh.file);
228 ff3adf60 2004-04-14 devnull trailer(bin, &zh);
230 ff3adf60 2004-04-14 devnull if(wantFile(zh.file)){
231 ff3adf60 2004-04-14 devnull if(verbose)
232 ff3adf60 2004-04-14 devnull print("%-32s %10lud %s", zh.file, zh.uncsize, ctime(msdos2time(zh.modtime, zh.moddate)));
234 ff3adf60 2004-04-14 devnull print("%s\n", zh.file);
236 ff3adf60 2004-04-14 devnull if(verbose > 1){
237 ff3adf60 2004-04-14 devnull print("\textract by os %d vers %d.%d\n", zh.extos, zh.extvers / 10, zh.extvers % 10);
238 ff3adf60 2004-04-14 devnull print("\tflags %x\n", zh.flags);
239 ff3adf60 2004-04-14 devnull print("\tmethod %d\n", zh.meth);
240 ff3adf60 2004-04-14 devnull print("\tmod time %d\n", zh.modtime);
241 ff3adf60 2004-04-14 devnull print("\tmod date %d\n", zh.moddate);
242 ff3adf60 2004-04-14 devnull print("\tcrc %lux\n", zh.crc);
243 ff3adf60 2004-04-14 devnull print("\tcompressed size %lud\n", zh.csize);
244 ff3adf60 2004-04-14 devnull print("\tuncompressed size %lud\n", zh.uncsize);
245 ff3adf60 2004-04-14 devnull if((zh.flags & ZTrailInfo) && (hcrc || hcsize || huncsize)){
246 ff3adf60 2004-04-14 devnull print("\theader crc %lux\n", zh.crc);
247 ff3adf60 2004-04-14 devnull print("\theader compressed size %lud\n", zh.csize);
248 ff3adf60 2004-04-14 devnull print("\theader uncompressed size %lud\n", zh.uncsize);
253 ff3adf60 2004-04-14 devnull if(zh.crc != crc)
254 ff3adf60 2004-04-14 devnull error("crc mismatch for %s", zh.file);
255 ff3adf60 2004-04-14 devnull if(zh.uncsize != wlen)
256 ff3adf60 2004-04-14 devnull error("output size mismatch for %s", zh.file);
257 ff3adf60 2004-04-14 devnull if(zh.csize != rlen)
258 ff3adf60 2004-04-14 devnull error("input size mismatch for %s", zh.file);
261 ff3adf60 2004-04-14 devnull free(zh.file);
262 ff3adf60 2004-04-14 devnull zh.file = nil;
265 ff3adf60 2004-04-14 devnull return ok;
269 ff3adf60 2004-04-14 devnull * extract files using the info in the central directory structure
271 ff3adf60 2004-04-14 devnull static int
272 ff3adf60 2004-04-14 devnull unzip(Biobuf *bin, char *file)
274 ff3adf60 2004-04-14 devnull ZipHead zh;
275 ff3adf60 2004-04-14 devnull vlong off;
276 f7b74c17 2004-12-28 devnull int volatile ok, eok, entries;
278 ff3adf60 2004-04-14 devnull entries = findCDir(bin, file);
279 ff3adf60 2004-04-14 devnull if(entries < 0)
280 ff3adf60 2004-04-14 devnull return 0;
283 ff3adf60 2004-04-14 devnull while(entries-- > 0){
284 ff3adf60 2004-04-14 devnull if(setjmp(zjmp)){
285 ff3adf60 2004-04-14 devnull free(zh.file);
286 ff3adf60 2004-04-14 devnull return 0;
288 ff3adf60 2004-04-14 devnull memset(&zh, 0, sizeof(zh));
289 ff3adf60 2004-04-14 devnull if(!cheader(bin, &zh))
290 ff3adf60 2004-04-14 devnull return ok;
293 ff3adf60 2004-04-14 devnull off = Boffset(bin);
294 ff3adf60 2004-04-14 devnull if(wantFile(zh.file)){
295 ff3adf60 2004-04-14 devnull if(Bseek(bin, zh.off, 0) < 0){
296 ff3adf60 2004-04-14 devnull fprint(2, "unzip: can't seek to start of %s, skipping\n", zh.file);
299 ff3adf60 2004-04-14 devnull eok = unzipEntry(bin, &zh);
300 ff3adf60 2004-04-14 devnull if(eok <= 0){
301 ff3adf60 2004-04-14 devnull fprint(2, "unzip: skipping %s\n", zh.file);
307 ff3adf60 2004-04-14 devnull free(zh.file);
308 ff3adf60 2004-04-14 devnull zh.file = nil;
310 ff3adf60 2004-04-14 devnull if(Bseek(bin, off, 0) < 0){
311 ff3adf60 2004-04-14 devnull fprint(2, "unzip: can't seek to start of next entry, terminating extraction\n");
312 ff3adf60 2004-04-14 devnull return 0;
316 ff3adf60 2004-04-14 devnull return ok;
320 ff3adf60 2004-04-14 devnull * extract files using the info the "local file headers"
322 ff3adf60 2004-04-14 devnull static int
323 ff3adf60 2004-04-14 devnull sunzip(Biobuf *bin)
325 ff3adf60 2004-04-14 devnull int eok;
327 ff3adf60 2004-04-14 devnull for(;;){
328 ff3adf60 2004-04-14 devnull eok = unzipEntry(bin, nil);
329 ff3adf60 2004-04-14 devnull if(eok == 0)
330 ff3adf60 2004-04-14 devnull return 1;
331 ff3adf60 2004-04-14 devnull if(eok < 0)
332 ff3adf60 2004-04-14 devnull return 0;
335 ff3adf60 2004-04-14 devnull return 1;
339 ff3adf60 2004-04-14 devnull * extracts a single entry from a zip file
340 ff3adf60 2004-04-14 devnull * czh is the optional corresponding central directory entry
342 ff3adf60 2004-04-14 devnull static int
343 ff3adf60 2004-04-14 devnull unzipEntry(Biobuf *bin, ZipHead *czh)
346 ff3adf60 2004-04-14 devnull ZipHead zh;
347 ff3adf60 2004-04-14 devnull char *p;
348 ff3adf60 2004-04-14 devnull vlong off;
349 ff3adf60 2004-04-14 devnull int fd, isdir, ok, err;
351 ff3adf60 2004-04-14 devnull zh.file = nil;
352 ff3adf60 2004-04-14 devnull if(setjmp(zjmp)){
353 ff3adf60 2004-04-14 devnull delfile = nil;
354 ff3adf60 2004-04-14 devnull free(zh.file);
355 ff3adf60 2004-04-14 devnull return -1;
358 ff3adf60 2004-04-14 devnull memset(&zh, 0, sizeof(zh));
359 ff3adf60 2004-04-14 devnull if(!header(bin, &zh))
360 ff3adf60 2004-04-14 devnull return 0;
363 ff3adf60 2004-04-14 devnull isdir = 0;
365 ff3adf60 2004-04-14 devnull fd = -1;
366 ff3adf60 2004-04-14 devnull if(wantFile(zh.file)){
367 ff3adf60 2004-04-14 devnull if(verbose)
368 ff3adf60 2004-04-14 devnull fprint(2, "extracting %s\n", zh.file);
370 ff3adf60 2004-04-14 devnull if(czh != nil && czh->extos == ZDos){
371 ff3adf60 2004-04-14 devnull isdir = czh->eattr & ZDDir;
372 ff3adf60 2004-04-14 devnull if(isdir && zh.uncsize != 0)
373 ff3adf60 2004-04-14 devnull fprint(2, "unzip: ignoring directory data for %s\n", zh.file);
375 ff3adf60 2004-04-14 devnull if(zh.meth == 0 && zh.uncsize == 0){
376 ff3adf60 2004-04-14 devnull p = strchr(zh.file, '\0');
377 ff3adf60 2004-04-14 devnull if(p > zh.file && p[-1] == '/')
378 ff3adf60 2004-04-14 devnull isdir = 1;
381 ff3adf60 2004-04-14 devnull if(stdout){
382 ff3adf60 2004-04-14 devnull if(ok && !isdir)
384 ff3adf60 2004-04-14 devnull }else if(isdir){
385 ff3adf60 2004-04-14 devnull fd = create(zh.file, OREAD, DMDIR | 0775);
386 ff3adf60 2004-04-14 devnull if(fd < 0){
387 ff3adf60 2004-04-14 devnull d = dirstat(zh.file);
388 ff3adf60 2004-04-14 devnull if(d == nil || (d->mode & DMDIR) != DMDIR){
389 ff3adf60 2004-04-14 devnull fprint(2, "unzip: can't create directory %s: %r\n", zh.file);
392 ff3adf60 2004-04-14 devnull free(d);
394 ff3adf60 2004-04-14 devnull }else if(ok){
395 ff3adf60 2004-04-14 devnull fd = create(zh.file, OWRITE, 0664);
396 ff3adf60 2004-04-14 devnull if(fd < 0){
397 ff3adf60 2004-04-14 devnull fprint(2, "unzip: can't create %s: %r\n", zh.file);
400 ff3adf60 2004-04-14 devnull delfile = zh.file;
404 ff3adf60 2004-04-14 devnull wlen = 0;
405 ff3adf60 2004-04-14 devnull rlen = 0;
406 ff3adf60 2004-04-14 devnull crc = 0;
407 ff3adf60 2004-04-14 devnull wbad = 0;
409 ff3adf60 2004-04-14 devnull if(zh.meth == 0){
410 ff3adf60 2004-04-14 devnull if(!copyout(fd, bin, zh.csize))
411 ff3adf60 2004-04-14 devnull error("copying data for %s failed: %r", zh.file);
412 ff3adf60 2004-04-14 devnull }else if(zh.meth == 8){
413 ff3adf60 2004-04-14 devnull off = Boffset(bin);
414 ff3adf60 2004-04-14 devnull err = inflate((void*)fd, crcwrite, bin, (int(*)(void*))Bgetc);
415 ff3adf60 2004-04-14 devnull if(err != FlateOk)
416 ff3adf60 2004-04-14 devnull error("inflate failed: %s", flateerr(err));
417 ff3adf60 2004-04-14 devnull rlen = Boffset(bin) - off;
419 ff3adf60 2004-04-14 devnull error("can't handle compression method %d for %s", zh.meth, zh.file);
421 ff3adf60 2004-04-14 devnull trailer(bin, &zh);
423 ff3adf60 2004-04-14 devnull if(zh.crc != crc)
424 ff3adf60 2004-04-14 devnull error("crc mismatch for %s", zh.file);
425 ff3adf60 2004-04-14 devnull if(zh.uncsize != wlen)
426 ff3adf60 2004-04-14 devnull error("output size mismatch for %s", zh.file);
427 ff3adf60 2004-04-14 devnull if(zh.csize != rlen)
428 ff3adf60 2004-04-14 devnull error("input size mismatch for %s", zh.file);
430 ff3adf60 2004-04-14 devnull delfile = nil;
431 ff3adf60 2004-04-14 devnull free(zh.file);
433 ff3adf60 2004-04-14 devnull if(fd >= 0 && !stdout){
434 ff3adf60 2004-04-14 devnull if(settimes){
435 ff3adf60 2004-04-14 devnull d = dirfstat(fd);
436 ff3adf60 2004-04-14 devnull if(d != nil){
437 ff3adf60 2004-04-14 devnull d->mtime = msdos2time(zh.modtime, zh.moddate);
438 ff3adf60 2004-04-14 devnull if(d->mtime)
439 ff3adf60 2004-04-14 devnull dirfwstat(fd, d);
442 ff3adf60 2004-04-14 devnull close(fd);
445 ff3adf60 2004-04-14 devnull return ok;
448 ff3adf60 2004-04-14 devnull static int
449 ff3adf60 2004-04-14 devnull wantFile(char *file)
451 ff3adf60 2004-04-14 devnull int i, n;
453 ff3adf60 2004-04-14 devnull if(nwant == 0)
454 ff3adf60 2004-04-14 devnull return 1;
455 ff3adf60 2004-04-14 devnull for(i = 0; i < nwant; i++){
456 ff3adf60 2004-04-14 devnull if(strcmp(want[i], file) == 0)
457 ff3adf60 2004-04-14 devnull return 1;
458 ff3adf60 2004-04-14 devnull n = strlen(want[i]);
459 ff3adf60 2004-04-14 devnull if(strncmp(want[i], file, n) == 0 && file[n] == '/')
460 ff3adf60 2004-04-14 devnull return 1;
462 ff3adf60 2004-04-14 devnull return 0;
466 ff3adf60 2004-04-14 devnull * find the start of the central directory
467 ff3adf60 2004-04-14 devnull * returns the number of entries in the directory,
468 ff3adf60 2004-04-14 devnull * or -1 if there was an error
470 ff3adf60 2004-04-14 devnull static int
471 ff3adf60 2004-04-14 devnull findCDir(Biobuf *bin, char *file)
473 ff3adf60 2004-04-14 devnull vlong ecoff;
474 ff3adf60 2004-04-14 devnull long off, size;
475 ff3adf60 2004-04-14 devnull int entries, zclen, dn, ds, de;
477 ff3adf60 2004-04-14 devnull ecoff = Bseek(bin, -ZECHeadSize, 2);
478 ff3adf60 2004-04-14 devnull if(ecoff < 0){
479 ff3adf60 2004-04-14 devnull fprint(2, "unzip: can't seek to contents of %s; try adding -s\n", file);
480 ff3adf60 2004-04-14 devnull return -1;
482 ff3adf60 2004-04-14 devnull if(setjmp(zjmp))
483 ff3adf60 2004-04-14 devnull return -1;
485 ff3adf60 2004-04-14 devnull if(get4(bin) != ZECHeader){
486 ff3adf60 2004-04-14 devnull fprint(2, "unzip: bad magic number for contents of %s\n", file);
487 ff3adf60 2004-04-14 devnull return -1;
489 ff3adf60 2004-04-14 devnull dn = get2(bin);
490 ff3adf60 2004-04-14 devnull ds = get2(bin);
491 ff3adf60 2004-04-14 devnull de = get2(bin);
492 ff3adf60 2004-04-14 devnull entries = get2(bin);
493 ff3adf60 2004-04-14 devnull size = get4(bin);
494 ff3adf60 2004-04-14 devnull off = get4(bin);
495 ff3adf60 2004-04-14 devnull zclen = get2(bin);
496 ff3adf60 2004-04-14 devnull while(zclen-- > 0)
497 ff3adf60 2004-04-14 devnull get1(bin);
499 ff3adf60 2004-04-14 devnull if(verbose > 1){
500 ff3adf60 2004-04-14 devnull print("table starts at %ld for %ld bytes\n", off, size);
501 ff3adf60 2004-04-14 devnull if(ecoff - size != off)
502 ff3adf60 2004-04-14 devnull print("\ttable should start at %lld-%ld=%lld\n", ecoff, size, ecoff-size);
503 ff3adf60 2004-04-14 devnull if(dn || ds || de != entries)
504 ff3adf60 2004-04-14 devnull print("\tcurrent disk=%d start disk=%d table entries on this disk=%d\n", dn, ds, de);
507 ff3adf60 2004-04-14 devnull if(Bseek(bin, off, 0) != off){
508 ff3adf60 2004-04-14 devnull fprint(2, "unzip: can't seek to start of contents of %s\n", file);
509 ff3adf60 2004-04-14 devnull return -1;
512 ff3adf60 2004-04-14 devnull return entries;
515 ff3adf60 2004-04-14 devnull static int
516 ff3adf60 2004-04-14 devnull cheader(Biobuf *bin, ZipHead *zh)
518 ff3adf60 2004-04-14 devnull ulong v;
519 ff3adf60 2004-04-14 devnull int flen, xlen, fclen;
521 ff3adf60 2004-04-14 devnull v = get4(bin);
522 ff3adf60 2004-04-14 devnull if(v != ZCHeader){
523 ff3adf60 2004-04-14 devnull if(v == ZECHeader)
524 ff3adf60 2004-04-14 devnull return 0;
525 ff3adf60 2004-04-14 devnull error("bad magic number %lux", v);
527 ff3adf60 2004-04-14 devnull zh->madevers = get1(bin);
528 ff3adf60 2004-04-14 devnull zh->madeos = get1(bin);
529 ff3adf60 2004-04-14 devnull zh->extvers = get1(bin);
530 ff3adf60 2004-04-14 devnull zh->extos = get1(bin);
531 ff3adf60 2004-04-14 devnull zh->flags = get2(bin);
532 ff3adf60 2004-04-14 devnull zh->meth = get2(bin);
533 ff3adf60 2004-04-14 devnull zh->modtime = get2(bin);
534 ff3adf60 2004-04-14 devnull zh->moddate = get2(bin);
535 ff3adf60 2004-04-14 devnull zh->crc = get4(bin);
536 ff3adf60 2004-04-14 devnull zh->csize = get4(bin);
537 ff3adf60 2004-04-14 devnull zh->uncsize = get4(bin);
538 ff3adf60 2004-04-14 devnull flen = get2(bin);
539 ff3adf60 2004-04-14 devnull xlen = get2(bin);
540 ff3adf60 2004-04-14 devnull fclen = get2(bin);
541 ff3adf60 2004-04-14 devnull get2(bin); /* disk number start */
542 ff3adf60 2004-04-14 devnull zh->iattr = get2(bin);
543 ff3adf60 2004-04-14 devnull zh->eattr = get4(bin);
544 ff3adf60 2004-04-14 devnull zh->off = get4(bin);
546 ff3adf60 2004-04-14 devnull zh->file = getname(bin, flen);
548 ff3adf60 2004-04-14 devnull while(xlen-- > 0)
549 ff3adf60 2004-04-14 devnull get1(bin);
551 ff3adf60 2004-04-14 devnull while(fclen-- > 0)
552 ff3adf60 2004-04-14 devnull get1(bin);
554 ff3adf60 2004-04-14 devnull return 1;
557 ff3adf60 2004-04-14 devnull static int
558 ff3adf60 2004-04-14 devnull header(Biobuf *bin, ZipHead *zh)
560 ff3adf60 2004-04-14 devnull ulong v;
561 ff3adf60 2004-04-14 devnull int flen, xlen;
563 ff3adf60 2004-04-14 devnull v = get4(bin);
564 ff3adf60 2004-04-14 devnull if(v != ZHeader){
565 ff3adf60 2004-04-14 devnull if(v == ZCHeader)
566 ff3adf60 2004-04-14 devnull return 0;
567 ff3adf60 2004-04-14 devnull error("bad magic number %lux at %lld", v, Boffset(bin)-4);
569 ff3adf60 2004-04-14 devnull zh->extvers = get1(bin);
570 ff3adf60 2004-04-14 devnull zh->extos = get1(bin);
571 ff3adf60 2004-04-14 devnull zh->flags = get2(bin);
572 ff3adf60 2004-04-14 devnull zh->meth = get2(bin);
573 ff3adf60 2004-04-14 devnull zh->modtime = get2(bin);
574 ff3adf60 2004-04-14 devnull zh->moddate = get2(bin);
575 ff3adf60 2004-04-14 devnull zh->crc = get4(bin);
576 ff3adf60 2004-04-14 devnull zh->csize = get4(bin);
577 ff3adf60 2004-04-14 devnull zh->uncsize = get4(bin);
578 ff3adf60 2004-04-14 devnull flen = get2(bin);
579 ff3adf60 2004-04-14 devnull xlen = get2(bin);
581 ff3adf60 2004-04-14 devnull zh->file = getname(bin, flen);
583 ff3adf60 2004-04-14 devnull while(xlen-- > 0)
584 ff3adf60 2004-04-14 devnull get1(bin);
586 ff3adf60 2004-04-14 devnull return 1;
589 ff3adf60 2004-04-14 devnull static void
590 ff3adf60 2004-04-14 devnull trailer(Biobuf *bin, ZipHead *zh)
592 ff3adf60 2004-04-14 devnull if(zh->flags & ZTrailInfo){
593 ff3adf60 2004-04-14 devnull zh->crc = get4(bin);
594 ff3adf60 2004-04-14 devnull zh->csize = get4(bin);
595 ff3adf60 2004-04-14 devnull zh->uncsize = get4(bin);
599 ff3adf60 2004-04-14 devnull static char*
600 ff3adf60 2004-04-14 devnull getname(Biobuf *bin, int len)
602 ff3adf60 2004-04-14 devnull char *s;
603 ff3adf60 2004-04-14 devnull int i, c;
605 ff3adf60 2004-04-14 devnull s = emalloc(len + 1);
606 ff3adf60 2004-04-14 devnull for(i = 0; i < len; i++){
607 ff3adf60 2004-04-14 devnull c = get1(bin);
608 ff3adf60 2004-04-14 devnull if(lower)
609 ff3adf60 2004-04-14 devnull c = tolower(c);
610 ff3adf60 2004-04-14 devnull s[i] = c;
612 ff3adf60 2004-04-14 devnull s[i] = '\0';
613 ff3adf60 2004-04-14 devnull return s;
616 ff3adf60 2004-04-14 devnull static int
617 ff3adf60 2004-04-14 devnull crcwrite(void *out, void *buf, int n)
619 ff3adf60 2004-04-14 devnull int fd, nw;
621 ff3adf60 2004-04-14 devnull wlen += n;
622 ff3adf60 2004-04-14 devnull crc = blockcrc(crctab, crc, buf, n);
623 ff3adf60 2004-04-14 devnull fd = (int)out;
624 ff3adf60 2004-04-14 devnull if(fd < 0)
625 ff3adf60 2004-04-14 devnull return n;
626 ff3adf60 2004-04-14 devnull nw = write(fd, buf, n);
627 ff3adf60 2004-04-14 devnull if(nw != n)
628 ff3adf60 2004-04-14 devnull wbad = 1;
629 ff3adf60 2004-04-14 devnull return nw;
632 ff3adf60 2004-04-14 devnull static int
633 ff3adf60 2004-04-14 devnull copyout(int ofd, Biobuf *bin, long len)
635 ff3adf60 2004-04-14 devnull char buf[BufSize];
638 ff3adf60 2004-04-14 devnull for(; len > 0; len -= n){
639 ff3adf60 2004-04-14 devnull n = len;
640 ff3adf60 2004-04-14 devnull if(n > BufSize)
641 ff3adf60 2004-04-14 devnull n = BufSize;
642 ff3adf60 2004-04-14 devnull n = Bread(bin, buf, n);
643 ff3adf60 2004-04-14 devnull if(n <= 0)
644 ff3adf60 2004-04-14 devnull return 0;
645 ff3adf60 2004-04-14 devnull rlen += n;
646 ff3adf60 2004-04-14 devnull if(crcwrite((void*)ofd, buf, n) != n)
647 ff3adf60 2004-04-14 devnull return 0;
649 ff3adf60 2004-04-14 devnull return 1;
652 ff3adf60 2004-04-14 devnull static ulong
653 ff3adf60 2004-04-14 devnull get4(Biobuf *b)
655 ff3adf60 2004-04-14 devnull ulong v;
656 ff3adf60 2004-04-14 devnull int i, c;
659 ff3adf60 2004-04-14 devnull for(i = 0; i < 4; i++){
660 ff3adf60 2004-04-14 devnull c = Bgetc(b);
661 ff3adf60 2004-04-14 devnull if(c < 0)
662 ff3adf60 2004-04-14 devnull error("unexpected eof reading file information");
663 ff3adf60 2004-04-14 devnull v |= c << (i * 8);
665 ff3adf60 2004-04-14 devnull return v;
668 ff3adf60 2004-04-14 devnull static int
669 ff3adf60 2004-04-14 devnull get2(Biobuf *b)
671 ff3adf60 2004-04-14 devnull int i, c, v;
674 ff3adf60 2004-04-14 devnull for(i = 0; i < 2; i++){
675 ff3adf60 2004-04-14 devnull c = Bgetc(b);
676 ff3adf60 2004-04-14 devnull if(c < 0)
677 ff3adf60 2004-04-14 devnull error("unexpected eof reading file information");
678 ff3adf60 2004-04-14 devnull v |= c << (i * 8);
680 ff3adf60 2004-04-14 devnull return v;
683 ff3adf60 2004-04-14 devnull static int
684 ff3adf60 2004-04-14 devnull get1(Biobuf *b)
688 ff3adf60 2004-04-14 devnull c = Bgetc(b);
689 ff3adf60 2004-04-14 devnull if(c < 0)
690 ff3adf60 2004-04-14 devnull error("unexpected eof reading file information");
691 ff3adf60 2004-04-14 devnull return c;
694 ff3adf60 2004-04-14 devnull static long
695 ff3adf60 2004-04-14 devnull msdos2time(int time, int date)
699 ff3adf60 2004-04-14 devnull tm.hour = time >> 11;
700 ff3adf60 2004-04-14 devnull tm.min = (time >> 5) & 63;
701 ff3adf60 2004-04-14 devnull tm.sec = (time & 31) << 1;
702 ff3adf60 2004-04-14 devnull tm.year = 80 + (date >> 9);
703 ff3adf60 2004-04-14 devnull tm.mon = ((date >> 5) & 15) - 1;
704 ff3adf60 2004-04-14 devnull tm.mday = date & 31;
705 ff3adf60 2004-04-14 devnull tm.zone[0] = '\0';
706 ff3adf60 2004-04-14 devnull tm.yday = 0;
708 ff3adf60 2004-04-14 devnull return tm2sec(&tm);
711 ff3adf60 2004-04-14 devnull static void*
712 ff3adf60 2004-04-14 devnull emalloc(ulong n)
714 ff3adf60 2004-04-14 devnull void *p;
716 ff3adf60 2004-04-14 devnull p = malloc(n);
717 ff3adf60 2004-04-14 devnull if(p == nil)
718 ff3adf60 2004-04-14 devnull sysfatal("out of memory");
719 ff3adf60 2004-04-14 devnull return p;
722 ff3adf60 2004-04-14 devnull static void
723 ff3adf60 2004-04-14 devnull error(char *fmt, ...)
725 ff3adf60 2004-04-14 devnull va_list arg;
727 ff3adf60 2004-04-14 devnull fprint(2, "unzip: ");
728 ff3adf60 2004-04-14 devnull va_start(arg, fmt);
729 ff3adf60 2004-04-14 devnull vfprint(2, fmt, arg);
730 ff3adf60 2004-04-14 devnull va_end(arg);
731 ff3adf60 2004-04-14 devnull fprint(2, "\n");
733 ff3adf60 2004-04-14 devnull if(delfile != nil){
734 ff3adf60 2004-04-14 devnull fprint(2, "unzip: removing output file %s\n", delfile);
735 ff3adf60 2004-04-14 devnull remove(delfile);
736 ff3adf60 2004-04-14 devnull delfile = nil;
739 ff3adf60 2004-04-14 devnull longjmp(zjmp, 1);