1/*
2 * Copyright (c) 2011, Google Inc.
3 */
4#include "cache.h"
5#include "streaming.h"
6
7enum input_source {
8 stream_error = -1,
9 incore = 0,
10 loose = 1,
11 pack_non_delta = 2
12};
13
14typedef int (*open_istream_fn)(struct git_istream *,
15 struct object_info *,
16 const unsigned char *,
17 enum object_type *);
18typedef int (*close_istream_fn)(struct git_istream *);
19typedef ssize_t (*read_istream_fn)(struct git_istream *, char *, size_t);
20
21struct stream_vtbl {
22 close_istream_fn close;
23 read_istream_fn read;
24};
25
26#define open_method_decl(name) \
27 int open_istream_ ##name \
28 (struct git_istream *st, struct object_info *oi, \
29 const unsigned char *sha1, \
30 enum object_type *type)
31
32#define close_method_decl(name) \
33 int close_istream_ ##name \
34 (struct git_istream *st)
35
36#define read_method_decl(name) \
37 ssize_t read_istream_ ##name \
38 (struct git_istream *st, char *buf, size_t sz)
39
40/* forward declaration */
41static open_method_decl(incore);
42static open_method_decl(loose);
43static open_method_decl(pack_non_delta);
44static struct git_istream *attach_stream_filter(struct git_istream *st,
45 struct stream_filter *filter);
46
47
48static open_istream_fn open_istream_tbl[] = {
49 open_istream_incore,
50 open_istream_loose,
51 open_istream_pack_non_delta,
52};
53
54#define FILTER_BUFFER (1024*16)
55
56struct filtered_istream {
57 struct git_istream *upstream;
58 struct stream_filter *filter;
59 char ibuf[FILTER_BUFFER];
60 char obuf[FILTER_BUFFER];
61 int i_end, i_ptr;
62 int o_end, o_ptr;
63 int input_finished;
64};
65
66struct git_istream {
67 const struct stream_vtbl *vtbl;
68 unsigned long size; /* inflated size of full object */
69 git_zstream z;
70 enum { z_unused, z_used, z_done, z_error } z_state;
71
72 union {
73 struct {
74 char *buf; /* from read_object() */
75 unsigned long read_ptr;
76 } incore;
77
78 struct {
79 void *mapped;
80 unsigned long mapsize;
81 char hdr[32];
82 int hdr_avail;
83 int hdr_used;
84 } loose;
85
86 struct {
87 struct packed_git *pack;
88 off_t pos;
89 } in_pack;
90
91 struct filtered_istream filtered;
92 } u;
93};
94
95int close_istream(struct git_istream *st)
96{
97 int r = st->vtbl->close(st);
98 free(st);
99 return r;
100}
101
102ssize_t read_istream(struct git_istream *st, void *buf, size_t sz)
103{
104 return st->vtbl->read(st, buf, sz);
105}
106
107static enum input_source istream_source(const unsigned char *sha1,
108 enum object_type *type,
109 struct object_info *oi)
110{
111 unsigned long size;
112 int status;
113
114 oi->typep = type;
115 oi->sizep = &size;
116 status = sha1_object_info_extended(sha1, oi, 0);
117 if (status < 0)
118 return stream_error;
119
120 switch (oi->whence) {
121 case OI_LOOSE:
122 return loose;
123 case OI_PACKED:
124 if (!oi->u.packed.is_delta && big_file_threshold < size)
125 return pack_non_delta;
126 /* fallthru */
127 default:
128 return incore;
129 }
130}
131
132struct git_istream *open_istream(const unsigned char *sha1,
133 enum object_type *type,
134 unsigned long *size,
135 struct stream_filter *filter)
136{
137 struct git_istream *st;
138 struct object_info oi = {NULL};
139 const unsigned char *real = lookup_replace_object(sha1);
140 enum input_source src = istream_source(real, type, &oi);
141
142 if (src < 0)
143 return NULL;
144
145 st = xmalloc(sizeof(*st));
146 if (open_istream_tbl[src](st, &oi, real, type)) {
147 if (open_istream_incore(st, &oi, real, type)) {
148 free(st);
149 return NULL;
150 }
151 }
152 if (filter) {
153 /* Add "&& !is_null_stream_filter(filter)" for performance */
154 struct git_istream *nst = attach_stream_filter(st, filter);
155 if (!nst) {
156 close_istream(st);
157 return NULL;
158 }
159 st = nst;
160 }
161
162 *size = st->size;
163 return st;
164}
165
166
167/*****************************************************************
168 *
169 * Common helpers
170 *
171 *****************************************************************/
172
173static void close_deflated_stream(struct git_istream *st)
174{
175 if (st->z_state == z_used)
176 git_inflate_end(&st->z);
177}
178
179
180/*****************************************************************
181 *
182 * Filtered stream
183 *
184 *****************************************************************/
185
186static close_method_decl(filtered)
187{
188 free_stream_filter(st->u.filtered.filter);
189 return close_istream(st->u.filtered.upstream);
190}
191
192static read_method_decl(filtered)
193{
194 struct filtered_istream *fs = &(st->u.filtered);
195 size_t filled = 0;
196
197 while (sz) {
198 /* do we already have filtered output? */
199 if (fs->o_ptr < fs->o_end) {
200 size_t to_move = fs->o_end - fs->o_ptr;
201 if (sz < to_move)
202 to_move = sz;
203 memcpy(buf + filled, fs->obuf + fs->o_ptr, to_move);
204 fs->o_ptr += to_move;
205 sz -= to_move;
206 filled += to_move;
207 continue;
208 }
209 fs->o_end = fs->o_ptr = 0;
210
211 /* do we have anything to feed the filter with? */
212 if (fs->i_ptr < fs->i_end) {
213 size_t to_feed = fs->i_end - fs->i_ptr;
214 size_t to_receive = FILTER_BUFFER;
215 if (stream_filter(fs->filter,
216 fs->ibuf + fs->i_ptr, &to_feed,
217 fs->obuf, &to_receive))
218 return -1;
219 fs->i_ptr = fs->i_end - to_feed;
220 fs->o_end = FILTER_BUFFER - to_receive;
221 continue;
222 }
223
224 /* tell the filter to drain upon no more input */
225 if (fs->input_finished) {
226 size_t to_receive = FILTER_BUFFER;
227 if (stream_filter(fs->filter,
228 NULL, NULL,
229 fs->obuf, &to_receive))
230 return -1;
231 fs->o_end = FILTER_BUFFER - to_receive;
232 if (!fs->o_end)
233 break;
234 continue;
235 }
236 fs->i_end = fs->i_ptr = 0;
237
238 /* refill the input from the upstream */
239 if (!fs->input_finished) {
240 fs->i_end = read_istream(fs->upstream, fs->ibuf, FILTER_BUFFER);
241 if (fs->i_end < 0)
242 return -1;
243 if (fs->i_end)
244 continue;
245 }
246 fs->input_finished = 1;
247 }
248 return filled;
249}
250
251static struct stream_vtbl filtered_vtbl = {
252 close_istream_filtered,
253 read_istream_filtered,
254};
255
256static struct git_istream *attach_stream_filter(struct git_istream *st,
257 struct stream_filter *filter)
258{
259 struct git_istream *ifs = xmalloc(sizeof(*ifs));
260 struct filtered_istream *fs = &(ifs->u.filtered);
261
262 ifs->vtbl = &filtered_vtbl;
263 fs->upstream = st;
264 fs->filter = filter;
265 fs->i_end = fs->i_ptr = 0;
266 fs->o_end = fs->o_ptr = 0;
267 fs->input_finished = 0;
268 ifs->size = -1; /* unknown */
269 return ifs;
270}
271
272/*****************************************************************
273 *
274 * Loose object stream
275 *
276 *****************************************************************/
277
278static read_method_decl(loose)
279{
280 size_t total_read = 0;
281
282 switch (st->z_state) {
283 case z_done:
284 return 0;
285 case z_error:
286 return -1;
287 default:
288 break;
289 }
290
291 if (st->u.loose.hdr_used < st->u.loose.hdr_avail) {
292 size_t to_copy = st->u.loose.hdr_avail - st->u.loose.hdr_used;
293 if (sz < to_copy)
294 to_copy = sz;
295 memcpy(buf, st->u.loose.hdr + st->u.loose.hdr_used, to_copy);
296 st->u.loose.hdr_used += to_copy;
297 total_read += to_copy;
298 }
299
300 while (total_read < sz) {
301 int status;
302
303 st->z.next_out = (unsigned char *)buf + total_read;
304 st->z.avail_out = sz - total_read;
305 status = git_inflate(&st->z, Z_FINISH);
306
307 total_read = st->z.next_out - (unsigned char *)buf;
308
309 if (status == Z_STREAM_END) {
310 git_inflate_end(&st->z);
311 st->z_state = z_done;
312 break;
313 }
314 if (status != Z_OK && (status != Z_BUF_ERROR || total_read < sz)) {
315 git_inflate_end(&st->z);
316 st->z_state = z_error;
317 return -1;
318 }
319 }
320 return total_read;
321}
322
323static close_method_decl(loose)
324{
325 close_deflated_stream(st);
326 munmap(st->u.loose.mapped, st->u.loose.mapsize);
327 return 0;
328}
329
330static struct stream_vtbl loose_vtbl = {
331 close_istream_loose,
332 read_istream_loose,
333};
334
335static open_method_decl(loose)
336{
337 st->u.loose.mapped = map_sha1_file(sha1, &st->u.loose.mapsize);
338 if (!st->u.loose.mapped)
339 return -1;
340 if ((unpack_sha1_header(&st->z,
341 st->u.loose.mapped,
342 st->u.loose.mapsize,
343 st->u.loose.hdr,
344 sizeof(st->u.loose.hdr)) < 0) ||
345 (parse_sha1_header(st->u.loose.hdr, &st->size) < 0)) {
346 git_inflate_end(&st->z);
347 munmap(st->u.loose.mapped, st->u.loose.mapsize);
348 return -1;
349 }
350
351 st->u.loose.hdr_used = strlen(st->u.loose.hdr) + 1;
352 st->u.loose.hdr_avail = st->z.total_out;
353 st->z_state = z_used;
354
355 st->vtbl = &loose_vtbl;
356 return 0;
357}
358
359
360/*****************************************************************
361 *
362 * Non-delta packed object stream
363 *
364 *****************************************************************/
365
366static read_method_decl(pack_non_delta)
367{
368 size_t total_read = 0;
369
370 switch (st->z_state) {
371 case z_unused:
372 memset(&st->z, 0, sizeof(st->z));
373 git_inflate_init(&st->z);
374 st->z_state = z_used;
375 break;
376 case z_done:
377 return 0;
378 case z_error:
379 return -1;
380 case z_used:
381 break;
382 }
383
384 while (total_read < sz) {
385 int status;
386 struct pack_window *window = NULL;
387 unsigned char *mapped;
388
389 mapped = use_pack(st->u.in_pack.pack, &window,
390 st->u.in_pack.pos, &st->z.avail_in);
391
392 st->z.next_out = (unsigned char *)buf + total_read;
393 st->z.avail_out = sz - total_read;
394 st->z.next_in = mapped;
395 status = git_inflate(&st->z, Z_FINISH);
396
397 st->u.in_pack.pos += st->z.next_in - mapped;
398 total_read = st->z.next_out - (unsigned char *)buf;
399 unuse_pack(&window);
400
401 if (status == Z_STREAM_END) {
402 git_inflate_end(&st->z);
403 st->z_state = z_done;
404 break;
405 }
406 if (status != Z_OK && status != Z_BUF_ERROR) {
407 git_inflate_end(&st->z);
408 st->z_state = z_error;
409 return -1;
410 }
411 }
412 return total_read;
413}
414
415static close_method_decl(pack_non_delta)
416{
417 close_deflated_stream(st);
418 return 0;
419}
420
421static struct stream_vtbl pack_non_delta_vtbl = {
422 close_istream_pack_non_delta,
423 read_istream_pack_non_delta,
424};
425
426static open_method_decl(pack_non_delta)
427{
428 struct pack_window *window;
429 enum object_type in_pack_type;
430
431 st->u.in_pack.pack = oi->u.packed.pack;
432 st->u.in_pack.pos = oi->u.packed.offset;
433 window = NULL;
434
435 in_pack_type = unpack_object_header(st->u.in_pack.pack,
436 &window,
437 &st->u.in_pack.pos,
438 &st->size);
439 unuse_pack(&window);
440 switch (in_pack_type) {
441 default:
442 return -1; /* we do not do deltas for now */
443 case OBJ_COMMIT:
444 case OBJ_TREE:
445 case OBJ_BLOB:
446 case OBJ_TAG:
447 break;
448 }
449 st->z_state = z_unused;
450 st->vtbl = &pack_non_delta_vtbl;
451 return 0;
452}
453
454
455/*****************************************************************
456 *
457 * In-core stream
458 *
459 *****************************************************************/
460
461static close_method_decl(incore)
462{
463 free(st->u.incore.buf);
464 return 0;
465}
466
467static read_method_decl(incore)
468{
469 size_t read_size = sz;
470 size_t remainder = st->size - st->u.incore.read_ptr;
471
472 if (remainder <= read_size)
473 read_size = remainder;
474 if (read_size) {
475 memcpy(buf, st->u.incore.buf + st->u.incore.read_ptr, read_size);
476 st->u.incore.read_ptr += read_size;
477 }
478 return read_size;
479}
480
481static struct stream_vtbl incore_vtbl = {
482 close_istream_incore,
483 read_istream_incore,
484};
485
486static open_method_decl(incore)
487{
488 st->u.incore.buf = read_sha1_file_extended(sha1, type, &st->size, 0);
489 st->u.incore.read_ptr = 0;
490 st->vtbl = &incore_vtbl;
491
492 return st->u.incore.buf ? 0 : -1;
493}
494
495
496/****************************************************************
497 * Users of streaming interface
498 ****************************************************************/
499
500int stream_blob_to_fd(int fd, const struct object_id *oid, struct stream_filter *filter,
501 int can_seek)
502{
503 struct git_istream *st;
504 enum object_type type;
505 unsigned long sz;
506 ssize_t kept = 0;
507 int result = -1;
508
509 st = open_istream(oid->hash, &type, &sz, filter);
510 if (!st) {
511 if (filter)
512 free_stream_filter(filter);
513 return result;
514 }
515 if (type != OBJ_BLOB)
516 goto close_and_exit;
517 for (;;) {
518 char buf[1024 * 16];
519 ssize_t wrote, holeto;
520 ssize_t readlen = read_istream(st, buf, sizeof(buf));
521
522 if (readlen < 0)
523 goto close_and_exit;
524 if (!readlen)
525 break;
526 if (can_seek && sizeof(buf) == readlen) {
527 for (holeto = 0; holeto < readlen; holeto++)
528 if (buf[holeto])
529 break;
530 if (readlen == holeto) {
531 kept += holeto;
532 continue;
533 }
534 }
535
536 if (kept && lseek(fd, kept, SEEK_CUR) == (off_t) -1)
537 goto close_and_exit;
538 else
539 kept = 0;
540 wrote = write_in_full(fd, buf, readlen);
541
542 if (wrote != readlen)
543 goto close_and_exit;
544 }
545 if (kept && (lseek(fd, kept - 1, SEEK_CUR) == (off_t) -1 ||
546 xwrite(fd, "", 1) != 1))
547 goto close_and_exit;
548 result = 0;
549
550 close_and_exit:
551 close_istream(st);
552 return result;
553}