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"
  6 ff3adf60 2004-04-14 devnull 
  7 ff3adf60 2004-04-14 devnull enum
  8 ff3adf60 2004-04-14 devnull {
  9 ff3adf60 2004-04-14 devnull 	BufSize	= 4096
 10 ff3adf60 2004-04-14 devnull };
 11 ff3adf60 2004-04-14 devnull 
 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);
 29 ff3adf60 2004-04-14 devnull 
 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 */
 33 ff3adf60 2004-04-14 devnull 
 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;
 49 ff3adf60 2004-04-14 devnull 
 50 ff3adf60 2004-04-14 devnull static void
 51 ff3adf60 2004-04-14 devnull usage(void)
 52 ff3adf60 2004-04-14 devnull {
 53 ff3adf60 2004-04-14 devnull 	fprint(2, "usage: unzip [-tsv] [-f zipfile] [file ...]\n");
 54 ff3adf60 2004-04-14 devnull 	exits("usage");
 55 ff3adf60 2004-04-14 devnull }
 56 ff3adf60 2004-04-14 devnull 
 57 ff3adf60 2004-04-14 devnull void
 58 ff3adf60 2004-04-14 devnull main(int argc, char *argv[])
 59 ff3adf60 2004-04-14 devnull {
 60 ff3adf60 2004-04-14 devnull 	char *zfile;
 61 ff3adf60 2004-04-14 devnull 	int fd, ok, table, stream;
 62 ff3adf60 2004-04-14 devnull 
 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':
 68 ff3adf60 2004-04-14 devnull 		debug++;
 69 ff3adf60 2004-04-14 devnull 		break;
 70 ff3adf60 2004-04-14 devnull 	case 'c':
 71 ff3adf60 2004-04-14 devnull 		stdout++;
 72 ff3adf60 2004-04-14 devnull 		break;
 73 ff3adf60 2004-04-14 devnull 	case 'i':
 74 ff3adf60 2004-04-14 devnull 		lower++;
 75 ff3adf60 2004-04-14 devnull 		break;
 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)
 79 ff3adf60 2004-04-14 devnull 			usage();
 80 ff3adf60 2004-04-14 devnull 		break;
 81 ff3adf60 2004-04-14 devnull 	case 's':
 82 ff3adf60 2004-04-14 devnull 		stream++;
 83 ff3adf60 2004-04-14 devnull 		break;
 84 ff3adf60 2004-04-14 devnull 	case 't':
 85 ff3adf60 2004-04-14 devnull 		table++;
 86 ff3adf60 2004-04-14 devnull 		break;
 87 ff3adf60 2004-04-14 devnull 	case 'T':
 88 ff3adf60 2004-04-14 devnull 		settimes++;
 89 ff3adf60 2004-04-14 devnull 		break;
 90 ff3adf60 2004-04-14 devnull 	case 'v':
 91 ff3adf60 2004-04-14 devnull 		verbose++;
 92 ff3adf60 2004-04-14 devnull 		break;
 93 ff3adf60 2004-04-14 devnull 	default:
 94 ff3adf60 2004-04-14 devnull 		usage();
 95 ff3adf60 2004-04-14 devnull 		break;
 96 ff3adf60 2004-04-14 devnull 	}ARGEND
 97 ff3adf60 2004-04-14 devnull 
 98 ff3adf60 2004-04-14 devnull 	nwant = argc;
 99 ff3adf60 2004-04-14 devnull 	want = argv;
100 ff3adf60 2004-04-14 devnull 
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));
105 ff3adf60 2004-04-14 devnull 
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>";
109 ff3adf60 2004-04-14 devnull 	}else{
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);
114 ff3adf60 2004-04-14 devnull 	}
115 ff3adf60 2004-04-14 devnull 
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);
119 ff3adf60 2004-04-14 devnull 		else
120 ff3adf60 2004-04-14 devnull 			ok = unztable(&bin, zfile);
121 ff3adf60 2004-04-14 devnull 	}else{
122 ff3adf60 2004-04-14 devnull 		if(stream)
123 ff3adf60 2004-04-14 devnull 			ok = sunzip(&bin);
124 ff3adf60 2004-04-14 devnull 		else
125 ff3adf60 2004-04-14 devnull 			ok = unzip(&bin, zfile);
126 ff3adf60 2004-04-14 devnull 	}
127 ff3adf60 2004-04-14 devnull 
128 ff3adf60 2004-04-14 devnull 	exits(ok ? nil: "errors");
129 ff3adf60 2004-04-14 devnull }
130 ff3adf60 2004-04-14 devnull 
131 ff3adf60 2004-04-14 devnull /*
132 ff3adf60 2004-04-14 devnull  * print the table of contents from the "central directory structure"
133 ff3adf60 2004-04-14 devnull  */
134 ff3adf60 2004-04-14 devnull static int
135 ff3adf60 2004-04-14 devnull unztable(Biobuf *bin, char *file)
136 ff3adf60 2004-04-14 devnull {
137 ff3adf60 2004-04-14 devnull 	ZipHead zh;
138 f7b74c17 2004-12-28 devnull 	int volatile entries;
139 ff3adf60 2004-04-14 devnull 
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;
143 ff3adf60 2004-04-14 devnull 
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;
150 ff3adf60 2004-04-14 devnull 		}
151 ff3adf60 2004-04-14 devnull 
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;
155 ff3adf60 2004-04-14 devnull 
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)));
159 ff3adf60 2004-04-14 devnull 			else
160 ff3adf60 2004-04-14 devnull 				print("%s\n", zh.file);
161 ff3adf60 2004-04-14 devnull 
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);
175 ff3adf60 2004-04-14 devnull 			}
176 ff3adf60 2004-04-14 devnull 		}
177 ff3adf60 2004-04-14 devnull 
178 ff3adf60 2004-04-14 devnull 		free(zh.file);
179 ff3adf60 2004-04-14 devnull 		zh.file = nil;
180 ff3adf60 2004-04-14 devnull 	}
181 ff3adf60 2004-04-14 devnull 
182 ff3adf60 2004-04-14 devnull 	return 1;
183 ff3adf60 2004-04-14 devnull }
184 ff3adf60 2004-04-14 devnull 
185 ff3adf60 2004-04-14 devnull /*
186 ff3adf60 2004-04-14 devnull  * print the "local file header" table of contents
187 ff3adf60 2004-04-14 devnull  */
188 ff3adf60 2004-04-14 devnull static int
189 ff3adf60 2004-04-14 devnull sunztable(Biobuf *bin)
190 ff3adf60 2004-04-14 devnull {
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;
195 ff3adf60 2004-04-14 devnull 
196 ff3adf60 2004-04-14 devnull 	ok = 1;
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;
201 ff3adf60 2004-04-14 devnull 		}
202 ff3adf60 2004-04-14 devnull 
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;
206 ff3adf60 2004-04-14 devnull 
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;
210 ff3adf60 2004-04-14 devnull 
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;
215 ff3adf60 2004-04-14 devnull 
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;
225 ff3adf60 2004-04-14 devnull 		}else
226 ff3adf60 2004-04-14 devnull 			error("can't handle compression method %d for %s", zh.meth, zh.file);
227 ff3adf60 2004-04-14 devnull 
228 ff3adf60 2004-04-14 devnull 		trailer(bin, &zh);
229 ff3adf60 2004-04-14 devnull 
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)));
233 ff3adf60 2004-04-14 devnull 			else
234 ff3adf60 2004-04-14 devnull 				print("%s\n", zh.file);
235 ff3adf60 2004-04-14 devnull 
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);
249 ff3adf60 2004-04-14 devnull 				}
250 ff3adf60 2004-04-14 devnull 			}
251 ff3adf60 2004-04-14 devnull 		}
252 ff3adf60 2004-04-14 devnull 
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);
259 ff3adf60 2004-04-14 devnull 
260 ff3adf60 2004-04-14 devnull 
261 ff3adf60 2004-04-14 devnull 		free(zh.file);
262 ff3adf60 2004-04-14 devnull 		zh.file = nil;
263 ff3adf60 2004-04-14 devnull 	}
264 ff3adf60 2004-04-14 devnull 
265 ff3adf60 2004-04-14 devnull 	return ok;
266 ff3adf60 2004-04-14 devnull }
267 ff3adf60 2004-04-14 devnull 
268 ff3adf60 2004-04-14 devnull /*
269 ff3adf60 2004-04-14 devnull  * extract files using the info in the central directory structure
270 ff3adf60 2004-04-14 devnull  */
271 ff3adf60 2004-04-14 devnull static int
272 ff3adf60 2004-04-14 devnull unzip(Biobuf *bin, char *file)
273 ff3adf60 2004-04-14 devnull {
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;
277 ff3adf60 2004-04-14 devnull 
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;
281 ff3adf60 2004-04-14 devnull 
282 ff3adf60 2004-04-14 devnull 	ok = 1;
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;
287 ff3adf60 2004-04-14 devnull 		}
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;
291 ff3adf60 2004-04-14 devnull 
292 ff3adf60 2004-04-14 devnull 
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);
297 ff3adf60 2004-04-14 devnull 				ok = 0;
298 ff3adf60 2004-04-14 devnull 			}else{
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);
302 ff3adf60 2004-04-14 devnull 					ok = 0;
303 ff3adf60 2004-04-14 devnull 				}
304 ff3adf60 2004-04-14 devnull 			}
305 ff3adf60 2004-04-14 devnull 		}
306 ff3adf60 2004-04-14 devnull 
307 ff3adf60 2004-04-14 devnull 		free(zh.file);
308 ff3adf60 2004-04-14 devnull 		zh.file = nil;
309 ff3adf60 2004-04-14 devnull 
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;
313 ff3adf60 2004-04-14 devnull 		}
314 ff3adf60 2004-04-14 devnull 	}
315 ff3adf60 2004-04-14 devnull 
316 ff3adf60 2004-04-14 devnull 	return ok;
317 ff3adf60 2004-04-14 devnull }
318 ff3adf60 2004-04-14 devnull 
319 ff3adf60 2004-04-14 devnull /*
320 ff3adf60 2004-04-14 devnull  * extract files using the info the "local file headers"
321 ff3adf60 2004-04-14 devnull  */
322 ff3adf60 2004-04-14 devnull static int
323 ff3adf60 2004-04-14 devnull sunzip(Biobuf *bin)
324 ff3adf60 2004-04-14 devnull {
325 ff3adf60 2004-04-14 devnull 	int eok;
326 ff3adf60 2004-04-14 devnull 
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;
333 ff3adf60 2004-04-14 devnull 	}
334 ff3adf60 2004-04-14 devnull 
335 ff3adf60 2004-04-14 devnull 	return 1;
336 ff3adf60 2004-04-14 devnull }
337 ff3adf60 2004-04-14 devnull 
338 ff3adf60 2004-04-14 devnull /*
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
341 ff3adf60 2004-04-14 devnull  */
342 ff3adf60 2004-04-14 devnull static int
343 ff3adf60 2004-04-14 devnull unzipEntry(Biobuf *bin, ZipHead *czh)
344 ff3adf60 2004-04-14 devnull {
345 ff3adf60 2004-04-14 devnull 	Dir *d;
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;
350 ff3adf60 2004-04-14 devnull 
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;
356 ff3adf60 2004-04-14 devnull 	}
357 ff3adf60 2004-04-14 devnull 
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;
361 ff3adf60 2004-04-14 devnull 
362 ff3adf60 2004-04-14 devnull 	ok = 1;
363 ff3adf60 2004-04-14 devnull 	isdir = 0;
364 ff3adf60 2004-04-14 devnull 
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);
369 ff3adf60 2004-04-14 devnull 
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);
374 ff3adf60 2004-04-14 devnull 		}
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;
379 ff3adf60 2004-04-14 devnull 		}
380 ff3adf60 2004-04-14 devnull 
381 ff3adf60 2004-04-14 devnull 		if(stdout){
382 ff3adf60 2004-04-14 devnull 			if(ok && !isdir)
383 ff3adf60 2004-04-14 devnull 				fd = 1;
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);
390 ff3adf60 2004-04-14 devnull 					ok = 0;
391 ff3adf60 2004-04-14 devnull 				}
392 ff3adf60 2004-04-14 devnull 				free(d);
393 ff3adf60 2004-04-14 devnull 			}
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);
398 ff3adf60 2004-04-14 devnull 				ok = 0;
399 ff3adf60 2004-04-14 devnull 			}else
400 ff3adf60 2004-04-14 devnull 				delfile = zh.file;
401 ff3adf60 2004-04-14 devnull 		}
402 ff3adf60 2004-04-14 devnull 	}
403 ff3adf60 2004-04-14 devnull 
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;
408 ff3adf60 2004-04-14 devnull 
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;
418 ff3adf60 2004-04-14 devnull 	}else
419 ff3adf60 2004-04-14 devnull 		error("can't handle compression method %d for %s", zh.meth, zh.file);
420 ff3adf60 2004-04-14 devnull 
421 ff3adf60 2004-04-14 devnull 	trailer(bin, &zh);
422 ff3adf60 2004-04-14 devnull 
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);
429 ff3adf60 2004-04-14 devnull 
430 ff3adf60 2004-04-14 devnull 	delfile = nil;
431 ff3adf60 2004-04-14 devnull 	free(zh.file);
432 ff3adf60 2004-04-14 devnull 
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);
440 ff3adf60 2004-04-14 devnull 			}
441 ff3adf60 2004-04-14 devnull 		}
442 ff3adf60 2004-04-14 devnull 		close(fd);
443 ff3adf60 2004-04-14 devnull 	}
444 ff3adf60 2004-04-14 devnull 
445 ff3adf60 2004-04-14 devnull 	return ok;
446 ff3adf60 2004-04-14 devnull }
447 ff3adf60 2004-04-14 devnull 
448 ff3adf60 2004-04-14 devnull static int
449 ff3adf60 2004-04-14 devnull wantFile(char *file)
450 ff3adf60 2004-04-14 devnull {
451 ff3adf60 2004-04-14 devnull 	int i, n;
452 ff3adf60 2004-04-14 devnull 
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;
461 ff3adf60 2004-04-14 devnull 	}
462 ff3adf60 2004-04-14 devnull 	return 0;
463 ff3adf60 2004-04-14 devnull }
464 ff3adf60 2004-04-14 devnull 
465 ff3adf60 2004-04-14 devnull /*
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
469 ff3adf60 2004-04-14 devnull  */
470 ff3adf60 2004-04-14 devnull static int
471 ff3adf60 2004-04-14 devnull findCDir(Biobuf *bin, char *file)
472 ff3adf60 2004-04-14 devnull {
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;
476 ff3adf60 2004-04-14 devnull 
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;
481 ff3adf60 2004-04-14 devnull 	}
482 ff3adf60 2004-04-14 devnull 	if(setjmp(zjmp))
483 ff3adf60 2004-04-14 devnull 		return -1;
484 ff3adf60 2004-04-14 devnull 
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;
488 ff3adf60 2004-04-14 devnull 	}
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);
498 ff3adf60 2004-04-14 devnull 
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);
505 ff3adf60 2004-04-14 devnull 	}
506 ff3adf60 2004-04-14 devnull 
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;
510 ff3adf60 2004-04-14 devnull 	}
511 ff3adf60 2004-04-14 devnull 
512 ff3adf60 2004-04-14 devnull 	return entries;
513 ff3adf60 2004-04-14 devnull }
514 ff3adf60 2004-04-14 devnull 
515 ff3adf60 2004-04-14 devnull static int
516 ff3adf60 2004-04-14 devnull cheader(Biobuf *bin, ZipHead *zh)
517 ff3adf60 2004-04-14 devnull {
518 ff3adf60 2004-04-14 devnull 	ulong v;
519 ff3adf60 2004-04-14 devnull 	int flen, xlen, fclen;
520 ff3adf60 2004-04-14 devnull 
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);
526 ff3adf60 2004-04-14 devnull 	}
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);
545 ff3adf60 2004-04-14 devnull 
546 ff3adf60 2004-04-14 devnull 	zh->file = getname(bin, flen);
547 ff3adf60 2004-04-14 devnull 
548 ff3adf60 2004-04-14 devnull 	while(xlen-- > 0)
549 ff3adf60 2004-04-14 devnull 		get1(bin);
550 ff3adf60 2004-04-14 devnull 
551 ff3adf60 2004-04-14 devnull 	while(fclen-- > 0)
552 ff3adf60 2004-04-14 devnull 		get1(bin);
553 ff3adf60 2004-04-14 devnull 
554 ff3adf60 2004-04-14 devnull 	return 1;
555 ff3adf60 2004-04-14 devnull }
556 ff3adf60 2004-04-14 devnull 
557 ff3adf60 2004-04-14 devnull static int
558 ff3adf60 2004-04-14 devnull header(Biobuf *bin, ZipHead *zh)
559 ff3adf60 2004-04-14 devnull {
560 ff3adf60 2004-04-14 devnull 	ulong v;
561 ff3adf60 2004-04-14 devnull 	int flen, xlen;
562 ff3adf60 2004-04-14 devnull 
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);
568 ff3adf60 2004-04-14 devnull 	}
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);
580 ff3adf60 2004-04-14 devnull 
581 ff3adf60 2004-04-14 devnull 	zh->file = getname(bin, flen);
582 ff3adf60 2004-04-14 devnull 
583 ff3adf60 2004-04-14 devnull 	while(xlen-- > 0)
584 ff3adf60 2004-04-14 devnull 		get1(bin);
585 ff3adf60 2004-04-14 devnull 
586 ff3adf60 2004-04-14 devnull 	return 1;
587 ff3adf60 2004-04-14 devnull }
588 ff3adf60 2004-04-14 devnull 
589 ff3adf60 2004-04-14 devnull static void
590 ff3adf60 2004-04-14 devnull trailer(Biobuf *bin, ZipHead *zh)
591 ff3adf60 2004-04-14 devnull {
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);
596 ff3adf60 2004-04-14 devnull 	}
597 ff3adf60 2004-04-14 devnull }
598 ff3adf60 2004-04-14 devnull 
599 ff3adf60 2004-04-14 devnull static char*
600 ff3adf60 2004-04-14 devnull getname(Biobuf *bin, int len)
601 ff3adf60 2004-04-14 devnull {
602 ff3adf60 2004-04-14 devnull 	char *s;
603 ff3adf60 2004-04-14 devnull 	int i, c;
604 ff3adf60 2004-04-14 devnull 
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;
611 ff3adf60 2004-04-14 devnull 	}
612 ff3adf60 2004-04-14 devnull 	s[i] = '\0';
613 ff3adf60 2004-04-14 devnull 	return s;
614 ff3adf60 2004-04-14 devnull }
615 ff3adf60 2004-04-14 devnull 
616 ff3adf60 2004-04-14 devnull static int
617 ff3adf60 2004-04-14 devnull crcwrite(void *out, void *buf, int n)
618 ff3adf60 2004-04-14 devnull {
619 ff3adf60 2004-04-14 devnull 	int fd, nw;
620 ff3adf60 2004-04-14 devnull 
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;
630 ff3adf60 2004-04-14 devnull }
631 ff3adf60 2004-04-14 devnull 
632 ff3adf60 2004-04-14 devnull static int
633 ff3adf60 2004-04-14 devnull copyout(int ofd, Biobuf *bin, long len)
634 ff3adf60 2004-04-14 devnull {
635 ff3adf60 2004-04-14 devnull 	char buf[BufSize];
636 ff3adf60 2004-04-14 devnull 	int n;
637 ff3adf60 2004-04-14 devnull 
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;
648 ff3adf60 2004-04-14 devnull 	}
649 ff3adf60 2004-04-14 devnull 	return 1;
650 ff3adf60 2004-04-14 devnull }
651 ff3adf60 2004-04-14 devnull 
652 ff3adf60 2004-04-14 devnull static ulong
653 ff3adf60 2004-04-14 devnull get4(Biobuf *b)
654 ff3adf60 2004-04-14 devnull {
655 ff3adf60 2004-04-14 devnull 	ulong v;
656 ff3adf60 2004-04-14 devnull 	int i, c;
657 ff3adf60 2004-04-14 devnull 
658 ff3adf60 2004-04-14 devnull 	v = 0;
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);
664 ff3adf60 2004-04-14 devnull 	}
665 ff3adf60 2004-04-14 devnull 	return v;
666 ff3adf60 2004-04-14 devnull }
667 ff3adf60 2004-04-14 devnull 
668 ff3adf60 2004-04-14 devnull static int
669 ff3adf60 2004-04-14 devnull get2(Biobuf *b)
670 ff3adf60 2004-04-14 devnull {
671 ff3adf60 2004-04-14 devnull 	int i, c, v;
672 ff3adf60 2004-04-14 devnull 
673 ff3adf60 2004-04-14 devnull 	v = 0;
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);
679 ff3adf60 2004-04-14 devnull 	}
680 ff3adf60 2004-04-14 devnull 	return v;
681 ff3adf60 2004-04-14 devnull }
682 ff3adf60 2004-04-14 devnull 
683 ff3adf60 2004-04-14 devnull static int
684 ff3adf60 2004-04-14 devnull get1(Biobuf *b)
685 ff3adf60 2004-04-14 devnull {
686 ff3adf60 2004-04-14 devnull 	int c;
687 ff3adf60 2004-04-14 devnull 
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;
692 ff3adf60 2004-04-14 devnull }
693 ff3adf60 2004-04-14 devnull 
694 ff3adf60 2004-04-14 devnull static long
695 ff3adf60 2004-04-14 devnull msdos2time(int time, int date)
696 ff3adf60 2004-04-14 devnull {
697 ff3adf60 2004-04-14 devnull 	Tm tm;
698 ff3adf60 2004-04-14 devnull 
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;
707 ff3adf60 2004-04-14 devnull 
708 ff3adf60 2004-04-14 devnull 	return tm2sec(&tm);
709 ff3adf60 2004-04-14 devnull }
710 ff3adf60 2004-04-14 devnull 
711 ff3adf60 2004-04-14 devnull static void*
712 ff3adf60 2004-04-14 devnull emalloc(ulong n)
713 ff3adf60 2004-04-14 devnull {
714 ff3adf60 2004-04-14 devnull 	void *p;
715 ff3adf60 2004-04-14 devnull 
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;
720 ff3adf60 2004-04-14 devnull }
721 ff3adf60 2004-04-14 devnull 
722 ff3adf60 2004-04-14 devnull static void
723 ff3adf60 2004-04-14 devnull error(char *fmt, ...)
724 ff3adf60 2004-04-14 devnull {
725 ff3adf60 2004-04-14 devnull 	va_list arg;
726 ff3adf60 2004-04-14 devnull 
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");
732 ff3adf60 2004-04-14 devnull 
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;
737 ff3adf60 2004-04-14 devnull 	}
738 ff3adf60 2004-04-14 devnull 
739 ff3adf60 2004-04-14 devnull 	longjmp(zjmp, 1);
740 ff3adf60 2004-04-14 devnull }