Blob


1 /*
2 * Copyright (c) 2019 Stefan Sperling <stsp@openbsd.org>
3 *
4 * Permission to use, copy, modify, and distribute this software for any
5 * purpose with or without fee is hereby granted, provided that the above
6 * copyright notice and this permission notice appear in all copies.
7 *
8 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
9 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
10 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
11 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
12 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
13 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
14 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
15 */
17 #include <sys/queue.h>
19 #include <errno.h>
20 #include <stdio.h>
21 #include <stdlib.h>
22 #include <string.h>
23 #include <sha1.h>
24 #include <zlib.h>
25 #include <time.h>
27 #include "got_error.h"
28 #include "got_object.h"
29 #include "got_path.h"
31 #include "got_lib_deflate.h"
32 #include "got_lib_poll.h"
34 #ifndef MIN
35 #define MIN(_a,_b) ((_a) < (_b) ? (_a) : (_b))
36 #endif
38 const struct got_error *
39 got_deflate_init(struct got_deflate_buf *zb, uint8_t *outbuf, size_t bufsize)
40 {
41 const struct got_error *err = NULL;
42 int zerr;
44 memset(&zb->z, 0, sizeof(zb->z));
46 zb->z.zalloc = Z_NULL;
47 zb->z.zfree = Z_NULL;
48 zerr = deflateInit(&zb->z, Z_DEFAULT_COMPRESSION);
49 if (zerr != Z_OK) {
50 if (zerr == Z_ERRNO)
51 return got_error_from_errno("deflateInit");
52 if (zerr == Z_MEM_ERROR) {
53 errno = ENOMEM;
54 return got_error_from_errno("deflateInit");
55 }
56 return got_error(GOT_ERR_COMPRESSION);
57 }
59 zb->inlen = zb->outlen = bufsize;
61 zb->inbuf = calloc(1, zb->inlen);
62 if (zb->inbuf == NULL) {
63 err = got_error_from_errno("calloc");
64 goto done;
65 }
67 zb->flags = 0;
68 if (outbuf == NULL) {
69 zb->outbuf = calloc(1, zb->outlen);
70 if (zb->outbuf == NULL) {
71 err = got_error_from_errno("calloc");
72 goto done;
73 }
74 zb->flags |= GOT_DEFLATE_F_OWN_OUTBUF;
75 } else
76 zb->outbuf = outbuf;
77 done:
78 if (err)
79 got_deflate_end(zb);
80 return err;
81 }
83 static void
84 csum_output(struct got_deflate_checksum *csum, const uint8_t *buf, size_t len)
85 {
86 if (csum->output_crc)
87 *csum->output_crc = crc32(*csum->output_crc, buf, len);
89 if (csum->output_sha1)
90 SHA1Update(csum->output_sha1, buf, len);
91 }
93 const struct got_error *
94 got_deflate_read(struct got_deflate_buf *zb, FILE *f, off_t len,
95 size_t *outlenp, off_t *consumed)
96 {
97 size_t last_total_out = zb->z.total_out;
98 z_stream *z = &zb->z;
99 int ret = Z_ERRNO;
101 z->next_out = zb->outbuf;
102 z->avail_out = zb->outlen;
104 *outlenp = 0;
105 *consumed = 0;
106 do {
107 size_t last_total_in = z->total_in;
108 if (z->avail_in == 0) {
109 size_t n = 0;
110 if (*consumed < len) {
111 n = fread(zb->inbuf, 1,
112 MIN(zb->inlen, len - *consumed), f);
114 if (n == 0) {
115 if (ferror(f))
116 return got_ferror(f, GOT_ERR_IO);
117 /* EOF */
118 ret = deflate(z, Z_FINISH);
119 break;
121 z->next_in = zb->inbuf;
122 z->avail_in = n;
124 ret = deflate(z, Z_NO_FLUSH);
125 *consumed += z->total_in - last_total_in;
126 } while (ret == Z_OK && z->avail_out > 0);
128 if (ret == Z_OK) {
129 zb->flags |= GOT_DEFLATE_F_HAVE_MORE;
130 } else {
131 if (ret != Z_STREAM_END)
132 return got_error(GOT_ERR_COMPRESSION);
133 zb->flags &= ~GOT_DEFLATE_F_HAVE_MORE;
136 *outlenp = z->total_out - last_total_out;
137 return NULL;
140 static const struct got_error *
141 deflate_read_mmap(struct got_deflate_buf *zb, uint8_t *map, size_t offset,
142 size_t len, size_t *outlenp, size_t *consumed, int flush_on_eof)
144 z_stream *z = &zb->z;
145 size_t last_total_out = z->total_out;
146 int ret = Z_ERRNO;
148 z->next_out = zb->outbuf;
149 z->avail_out = zb->outlen;
151 *outlenp = 0;
152 *consumed = 0;
153 do {
154 size_t last_total_in = z->total_in;
155 if (z->avail_in == 0) {
156 z->next_in = map + offset + *consumed;
157 if (len - *consumed > UINT_MAX)
158 z->avail_in = UINT_MAX;
159 else
160 z->avail_in = len - *consumed;
161 if (z->avail_in == 0) {
162 /* EOF */
163 if (flush_on_eof)
164 ret = deflate(z, Z_FINISH);
165 break;
168 ret = deflate(z, Z_NO_FLUSH);
169 *consumed += z->total_in - last_total_in;
170 } while (ret == Z_OK && z->avail_out > 0);
172 if (ret == Z_OK) {
173 zb->flags |= GOT_DEFLATE_F_HAVE_MORE;
174 } else {
175 if (ret != Z_STREAM_END)
176 return got_error(GOT_ERR_COMPRESSION);
177 zb->flags &= ~GOT_DEFLATE_F_HAVE_MORE;
180 *outlenp = z->total_out - last_total_out;
181 return NULL;
184 const struct got_error *
185 got_deflate_read_mmap(struct got_deflate_buf *zb, uint8_t *map, size_t offset,
186 size_t len, size_t *outlenp, size_t *consumed)
188 return deflate_read_mmap(zb, map, offset, len, outlenp, consumed, 1);
191 const struct got_error *
192 got_deflate_flush(struct got_deflate_buf *zb, FILE *outfile,
193 struct got_deflate_checksum *csum, off_t *outlenp)
195 int ret;
196 size_t n;
197 z_stream *z = &zb->z;
199 if (z->avail_in != 0)
200 return got_error_msg(GOT_ERR_COMPRESSION,
201 "cannot flush zb with pending input data");
203 do {
204 size_t avail, last_total_out = zb->z.total_out;
206 z->next_out = zb->outbuf;
207 z->avail_out = zb->outlen;
209 ret = deflate(z, Z_FINISH);
210 if (ret != Z_STREAM_END && ret != Z_OK)
211 return got_error(GOT_ERR_COMPRESSION);
213 avail = z->total_out - last_total_out;
214 if (avail > 0) {
215 n = fwrite(zb->outbuf, avail, 1, outfile);
216 if (n != 1)
217 return got_ferror(outfile, GOT_ERR_IO);
218 if (csum)
219 csum_output(csum, zb->outbuf, avail);
220 if (outlenp)
221 *outlenp += avail;
223 } while (ret != Z_STREAM_END);
225 zb->flags &= ~GOT_DEFLATE_F_HAVE_MORE;
226 return NULL;
229 void
230 got_deflate_end(struct got_deflate_buf *zb)
232 free(zb->inbuf);
233 if (zb->flags & GOT_DEFLATE_F_OWN_OUTBUF)
234 free(zb->outbuf);
235 deflateEnd(&zb->z);
238 const struct got_error *
239 got_deflate_to_fd(off_t *outlen, FILE *infile, off_t len, int outfd,
240 struct got_deflate_checksum *csum)
242 const struct got_error *err;
243 size_t avail;
244 off_t consumed;
245 struct got_deflate_buf zb;
247 err = got_deflate_init(&zb, NULL, GOT_DEFLATE_BUFSIZE);
248 if (err)
249 goto done;
251 *outlen = 0;
253 do {
254 err = got_deflate_read(&zb, infile, len, &avail, &consumed);
255 if (err)
256 goto done;
257 len -= consumed;
258 if (avail > 0) {
259 err = got_poll_write_full(outfd, zb.outbuf, avail);
260 if (err)
261 goto done;
262 if (csum)
263 csum_output(csum, zb.outbuf, avail);
264 *outlen += avail;
266 } while (zb.flags & GOT_DEFLATE_F_HAVE_MORE);
268 done:
269 got_deflate_end(&zb);
270 return err;
273 const struct got_error *
274 got_deflate_to_fd_mmap(off_t *outlen, uint8_t *map, size_t offset,
275 size_t len, int outfd, struct got_deflate_checksum *csum)
277 const struct got_error *err;
278 size_t avail, consumed;
279 struct got_deflate_buf zb;
281 err = got_deflate_init(&zb, NULL, GOT_DEFLATE_BUFSIZE);
282 if (err)
283 goto done;
285 *outlen = 0;
286 do {
287 err = got_deflate_read_mmap(&zb, map, offset, len, &avail,
288 &consumed);
289 if (err)
290 goto done;
291 offset += consumed;
292 len -= consumed;
293 if (avail > 0) {
294 err = got_poll_write_full(outfd, zb.outbuf, avail);
295 if (err)
296 goto done;
297 if (csum)
298 csum_output(csum, zb.outbuf, avail);
299 *outlen += avail;
301 } while (zb.flags & GOT_DEFLATE_F_HAVE_MORE);
303 done:
304 got_deflate_end(&zb);
305 return err;
308 const struct got_error *
309 got_deflate_to_file(off_t *outlen, FILE *infile, off_t len,
310 FILE *outfile, struct got_deflate_checksum *csum)
312 const struct got_error *err;
313 size_t avail;
314 off_t consumed;
315 struct got_deflate_buf zb;
317 err = got_deflate_init(&zb, NULL, GOT_DEFLATE_BUFSIZE);
318 if (err)
319 goto done;
321 *outlen = 0;
323 do {
324 err = got_deflate_read(&zb, infile, len, &avail, &consumed);
325 if (err)
326 goto done;
327 len -= consumed;
328 if (avail > 0) {
329 size_t n;
330 n = fwrite(zb.outbuf, avail, 1, outfile);
331 if (n != 1) {
332 err = got_ferror(outfile, GOT_ERR_IO);
333 goto done;
335 if (csum)
336 csum_output(csum, zb.outbuf, avail);
337 *outlen += avail;
339 } while (zb.flags & GOT_DEFLATE_F_HAVE_MORE);
341 done:
342 got_deflate_end(&zb);
343 return err;
346 const struct got_error *
347 got_deflate_to_file_mmap(off_t *outlen, uint8_t *map, size_t offset,
348 size_t len, FILE *outfile, struct got_deflate_checksum *csum)
350 const struct got_error *err;
351 size_t avail, consumed;
352 struct got_deflate_buf zb;
354 err = got_deflate_init(&zb, NULL, GOT_DEFLATE_BUFSIZE);
355 if (err)
356 goto done;
358 *outlen = 0;
359 do {
360 err = got_deflate_read_mmap(&zb, map, offset, len, &avail,
361 &consumed);
362 if (err)
363 goto done;
364 offset += consumed;
365 len -= consumed;
366 if (avail > 0) {
367 size_t n;
368 n = fwrite(zb.outbuf, avail, 1, outfile);
369 if (n != 1) {
370 err = got_ferror(outfile, GOT_ERR_IO);
371 goto done;
373 if (csum)
374 csum_output(csum, zb.outbuf, avail);
375 *outlen += avail;
377 } while (zb.flags & GOT_DEFLATE_F_HAVE_MORE);
379 done:
380 got_deflate_end(&zb);
381 return err;
384 const struct got_error *
385 got_deflate_append_to_file_mmap(struct got_deflate_buf *zb, off_t *outlen,
386 uint8_t *map, size_t offset, size_t len, FILE *outfile,
387 struct got_deflate_checksum *csum)
389 const struct got_error *err;
390 size_t avail, consumed;
392 do {
393 err = deflate_read_mmap(zb, map, offset, len, &avail,
394 &consumed, 0);
395 if (err)
396 break;
397 offset += consumed;
398 len -= consumed;
399 if (avail > 0) {
400 size_t n;
401 n = fwrite(zb->outbuf, avail, 1, outfile);
402 if (n != 1) {
403 err = got_ferror(outfile, GOT_ERR_IO);
404 break;
406 if (csum)
407 csum_output(csum, zb->outbuf, avail);
408 if (outlen)
409 *outlen += avail;
411 } while ((zb->flags & GOT_DEFLATE_F_HAVE_MORE) && len > 0);
413 return err;
416 const struct got_error *
417 got_deflate_to_mem_mmap(uint8_t **outbuf, size_t *outlen,
418 size_t *consumed_total, struct got_deflate_checksum *csum, uint8_t *map,
419 size_t offset, size_t len)
421 const struct got_error *err;
422 size_t avail, consumed;
423 struct got_deflate_buf zb;
424 void *newbuf;
425 size_t nbuf = 1;
427 if (outbuf) {
428 *outbuf = malloc(GOT_DEFLATE_BUFSIZE);
429 if (*outbuf == NULL)
430 return got_error_from_errno("malloc");
431 err = got_deflate_init(&zb, *outbuf, GOT_DEFLATE_BUFSIZE);
432 if (err) {
433 free(*outbuf);
434 *outbuf = NULL;
435 return err;
437 } else {
438 err = got_deflate_init(&zb, NULL, GOT_DEFLATE_BUFSIZE);
439 if (err)
440 return err;
443 *outlen = 0;
444 if (consumed_total)
445 *consumed_total = 0;
446 do {
447 err = got_deflate_read_mmap(&zb, map, offset, len, &avail,
448 &consumed);
449 if (err)
450 goto done;
451 offset += consumed;
452 if (consumed_total)
453 *consumed_total += consumed;
454 len -= consumed;
455 if (avail > 0 && csum)
456 csum_output(csum, zb.outbuf, avail);
457 *outlen += avail;
458 if ((zb.flags & GOT_DEFLATE_F_HAVE_MORE) && outbuf != NULL) {
459 newbuf = reallocarray(*outbuf, ++nbuf,
460 GOT_DEFLATE_BUFSIZE);
461 if (newbuf == NULL) {
462 err = got_error_from_errno("reallocarray");
463 free(*outbuf);
464 *outbuf = NULL;
465 *outlen = 0;
466 goto done;
468 *outbuf = newbuf;
469 zb.outbuf = newbuf + *outlen;
470 zb.outlen = (nbuf * GOT_DEFLATE_BUFSIZE) - *outlen;
472 } while (zb.flags & GOT_DEFLATE_F_HAVE_MORE);
473 done:
474 got_deflate_end(&zb);
475 return err;