]> wimlib.net Git - wimlib/blob - src/resource.c
1a46e751184377863f53f7b11582db44e6662d00
[wimlib] / src / resource.c
1 /*
2  * resource.c
3  *
4  * Code for reading streams and resources, including compressed WIM resources.
5  */
6
7 /*
8  * Copyright (C) 2012, 2013 Eric Biggers
9  *
10  * This file is part of wimlib, a library for working with WIM files.
11  *
12  * wimlib is free software; you can redistribute it and/or modify it under the
13  * terms of the GNU General Public License as published by the Free Software
14  * Foundation; either version 3 of the License, or (at your option) any later
15  * version.
16  *
17  * wimlib is distributed in the hope that it will be useful, but WITHOUT ANY
18  * WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
19  * A PARTICULAR PURPOSE. See the GNU General Public License for more details.
20  *
21  * You should have received a copy of the GNU General Public License along with
22  * wimlib; if not, see http://www.gnu.org/licenses/.
23  */
24
25 #ifdef HAVE_CONFIG_H
26 #  include "config.h"
27 #endif
28
29 #include "wimlib.h"
30 #include "wimlib/endianness.h"
31 #include "wimlib/error.h"
32 #include "wimlib/file_io.h"
33 #include "wimlib/lookup_table.h"
34 #include "wimlib/resource.h"
35 #include "wimlib/sha1.h"
36
37 #ifdef __WIN32__
38 /* for read_win32_file_prefix(), read_win32_encrypted_file_prefix() */
39 #  include "wimlib/win32.h"
40 #endif
41
42 #ifdef WITH_NTFS_3G
43 /* for read_ntfs_file_prefix() */
44 #  include "wimlib/ntfs_3g.h"
45 #endif
46
47 #ifdef HAVE_ALLOCA_H
48 #  include <alloca.h>
49 #endif
50 #include <errno.h>
51 #include <fcntl.h>
52 #include <stdlib.h>
53 #include <unistd.h>
54
55 /*
56  *                         Compressed WIM resources
57  *
58  * A compressed resource in a WIM consists of a number of compressed chunks,
59  * each of which decompresses to a fixed chunk size (given in the WIM header;
60  * usually 32768) except possibly the last, which always decompresses to any
61  * remaining bytes.  In addition, immediately before the chunks, a table (the
62  * "chunk table") provides the offset, in bytes relative to the end of the chunk
63  * table, of the start of each compressed chunk, except for the first chunk
64  * which is omitted as it always has an offset of 0.  Therefore, a compressed
65  * resource with N chunks will have a chunk table with N - 1 entries.
66  *
67  * Additional information:
68  *
69  * - Entries in the chunk table are 4 bytes each, except if the uncompressed
70  *   size of the resource is greater than 4 GiB, in which case the entries in
71  *   the chunk table are 8 bytes each.  In either case, the entries are unsigned
72  *   little-endian integers.
73  *
74  * - The chunk table is included in the compressed size of the resource provided
75  *   in the corresponding entry in the WIM's stream lookup table.
76  *
77  * - The compressed size of a chunk is never greater than the uncompressed size.
78  *   From the compressor's point of view, chunks that would have compressed to a
79  *   size greater than or equal to their original size are in fact stored
80  *   uncompressed.  From the decompresser's point of view, chunks with
81  *   compressed size equal to their uncompressed size are in fact uncompressed.
82  *
83  * Furthermore, wimlib supports its own "pipable" WIM format, and for this the
84  * structure of compressed resources was modified to allow piped reading and
85  * writing.  To make sequential writing possible, the chunk table is placed
86  * after the chunks rather than before the chunks, and to make sequential
87  * reading possible, each chunk is prefixed with a 4-byte header giving its
88  * compressed size as a 32-bit, unsigned, little-endian integer.  Otherwise the
89  * details are the same.
90  */
91
92
93 struct data_range {
94         u64 offset;
95         u64 size;
96 };
97
98 /*
99  * read_compressed_wim_resource() -
100  *
101  * Read data from a compressed WIM resource.
102  *
103  * @rspec
104  *      Specification of the compressed WIM resource to read from.
105  * @ranges
106  *      Nonoverlapping, nonempty ranges of the uncompressed resource data to
107  *      read, sorted by increasing offset.
108  * @num_ranges
109  *      Number of ranges in @ranges; must be at least 1.
110  * @cb
111  *      Callback function to feed the data being read.  Each call provides the
112  *      next chunk of the requested data, uncompressed.  Each chunk will be of
113  *      nonzero size and will not cross range boundaries, but otherwise will be
114  *      of unspecified size.
115  * @cb_ctx
116  *      Parameter to pass to @cb_ctx.
117  *
118  * Possible return values:
119  *
120  *      WIMLIB_ERR_SUCCESS (0)
121  *      WIMLIB_ERR_READ                   (errno set)
122  *      WIMLIB_ERR_UNEXPECTED_END_OF_FILE (errno set to 0)
123  *      WIMLIB_ERR_NOMEM                  (errno set to ENOMEM)
124  *      WIMLIB_ERR_DECOMPRESSION          (errno set to EINVAL)
125  *
126  *      or other error code returned by the @cb function.
127  */
128 static int
129 read_compressed_wim_resource(const struct wim_resource_spec * const rspec,
130                              const struct data_range * const ranges,
131                              const size_t num_ranges,
132                              const consume_data_callback_t cb,
133                              void * const cb_ctx)
134 {
135         int ret;
136         int errno_save;
137
138         u64 *chunk_offsets = NULL;
139         u8 *ubuf = NULL;
140         void *cbuf = NULL;
141         bool chunk_offsets_malloced = false;
142         bool ubuf_malloced = false;
143         bool cbuf_malloced = false;
144         struct wimlib_decompressor *decompressor;
145
146         /* Sanity checks  */
147         wimlib_assert(rspec != NULL);
148         wimlib_assert(resource_is_compressed(rspec));
149         wimlib_assert(cb != NULL);
150         wimlib_assert(num_ranges != 0);
151         for (size_t i = 0; i < num_ranges; i++) {
152                 DEBUG("Range %zu/%zu: %"PRIu64"@+%"PRIu64" / %"PRIu64,
153                       i + 1, num_ranges, ranges[i].size, ranges[i].offset,
154                       rspec->uncompressed_size);
155                 wimlib_assert(ranges[i].size != 0);
156                 wimlib_assert(ranges[i].offset + ranges[i].size >= ranges[i].size);
157                 wimlib_assert(ranges[i].offset + ranges[i].size <= rspec->uncompressed_size);
158         }
159         for (size_t i = 0; i < num_ranges - 1; i++)
160                 wimlib_assert(ranges[i].offset + ranges[i].size <= ranges[i + 1].offset);
161
162         /* Get the offsets of the first and last bytes of the read.  */
163         const u64 first_offset = ranges[0].offset;
164         const u64 last_offset = ranges[num_ranges - 1].offset + ranges[num_ranges - 1].size - 1;
165
166         /* Get the file descriptor for the WIM.  */
167         struct filedes * const in_fd = &rspec->wim->in_fd;
168
169         /* Determine if we're reading a pipable resource from a pipe or not.  */
170         const bool is_pipe_read = !filedes_is_seekable(in_fd);
171
172         /* Determine if the chunk table is in an altenate format.  */
173         const bool alt_chunk_table = (rspec->flags & WIM_RESHDR_FLAG_PACKED_STREAMS)
174                                         && !is_pipe_read;
175
176         /* Get the maximum size of uncompressed chunks in this resource, which
177          * we require be a power of 2.  */
178         u32 chunk_size;
179         u64 cur_read_offset = rspec->offset_in_wim;
180         int ctype;
181         if (alt_chunk_table) {
182                 /* Alternate chunk table format.  Its header specifies the chunk
183                  * size and compression format.  */
184                 struct alt_chunk_table_header_disk hdr;
185
186                 ret = full_pread(in_fd, &hdr, sizeof(hdr), cur_read_offset);
187                 if (ret)
188                         goto read_error;
189                 cur_read_offset += sizeof(hdr);
190
191                 chunk_size = le32_to_cpu(hdr.chunk_size);
192                 ctype = le32_to_cpu(hdr.compression_format);
193
194                 /* Format numbers must be the same as in WIMGAPI to be
195                  * compatible.  */
196                 BUILD_BUG_ON(WIMLIB_COMPRESSION_TYPE_NONE != 0);
197                 BUILD_BUG_ON(WIMLIB_COMPRESSION_TYPE_LZX != 1);
198                 BUILD_BUG_ON(WIMLIB_COMPRESSION_TYPE_XPRESS != 2);
199                 BUILD_BUG_ON(WIMLIB_COMPRESSION_TYPE_LZMS != 3);
200         } else {
201                 /* "Normal" format: the maximum uncompressed chunk size and the
202                  * compression format default to those of the WIM itself.  */
203                 chunk_size = rspec->wim->chunk_size;
204                 ctype = rspec->wim->compression_type;
205         }
206         if (!is_power_of_2(chunk_size)) {
207                 ERROR("Invalid compressed resource: "
208                       "expected power-of-2 chunk size (got %u)", chunk_size);
209                 ret = WIMLIB_ERR_INVALID_CHUNK_SIZE;
210                 goto out_free_memory;
211         }
212
213         /* Get valid decompressor.  */
214         if (ctype == rspec->wim->decompressor_ctype &&
215             chunk_size == rspec->wim->decompressor_max_block_size)
216         {
217                 /* Cached decompressor.  */
218                 decompressor = rspec->wim->decompressor;
219                 rspec->wim->decompressor_ctype = WIMLIB_COMPRESSION_TYPE_NONE;
220                 rspec->wim->decompressor = NULL;
221         } else {
222                 ret = wimlib_create_decompressor(ctype, chunk_size, NULL,
223                                                  &decompressor);
224                 if (ret)
225                         goto out_free_memory;
226         }
227
228         const u32 chunk_order = bsr32(chunk_size);
229
230         /* Calculate the total number of chunks the resource is divided into.  */
231         const u64 num_chunks = (rspec->uncompressed_size + chunk_size - 1) >> chunk_order;
232
233         /* Calculate the 0-based indices of the first and last chunks containing
234          * data that needs to be passed to the callback.  */
235         const u64 first_needed_chunk = first_offset >> chunk_order;
236         const u64 last_needed_chunk = last_offset >> chunk_order;
237
238         /* Calculate the 0-based index of the first chunk that actually needs to
239          * be read.  This is normally first_needed_chunk, but for pipe reads we
240          * must always start from the 0th chunk.  */
241         const u64 read_start_chunk = (is_pipe_read ? 0 : first_needed_chunk);
242
243         /* Calculate the number of chunk offsets that are needed for the chunks
244          * being read.  */
245         const u64 num_needed_chunk_offsets =
246                 last_needed_chunk - read_start_chunk + 1 +
247                 (last_needed_chunk < num_chunks - 1);
248
249         /* Calculate the number of entries in the chunk table.  Normally, it's
250          * one less than the number of chunks, since the first chunk has no
251          * entry.  But in the alternate chunk table format, the chunk entries
252          * contain chunk sizes, not offsets, and there is one per chunk.  */
253         const u64 num_chunk_entries = (alt_chunk_table ? num_chunks : num_chunks - 1);
254
255         /* Set the size of each chunk table entry based on the resource's
256          * uncompressed size.  XXX:  Does the alternate chunk table really
257          * always have 4-byte entries?  */
258         const u64 chunk_entry_size =
259                 (rspec->uncompressed_size > (1ULL << 32) && !alt_chunk_table)
260                         ? 8 : 4;
261
262         /* Calculate the size of the chunk table in bytes.  */
263         const u64 chunk_table_size = num_chunk_entries * chunk_entry_size;
264
265         /* Calculate the size of the chunk table in bytes, including the header
266          * in the case of the alternate chunk table format.  */
267         const u64 chunk_table_full_size =
268                 (alt_chunk_table) ? chunk_table_size + sizeof(struct alt_chunk_table_header_disk)
269                                   : chunk_table_size;
270
271         if (!is_pipe_read) {
272                 /* Read the needed chunk table entries into memory and use them
273                  * to initialize the chunk_offsets array.  */
274
275                 u64 first_chunk_entry_to_read;
276                 u64 last_chunk_entry_to_read;
277
278                 if (alt_chunk_table) {
279                         /* The alternate chunk table contains chunk sizes, not
280                          * offsets, so we always must read all preceding entries
281                          * in order to determine offsets.  */
282                         first_chunk_entry_to_read = 0;
283                         last_chunk_entry_to_read = last_needed_chunk;
284                 } else {
285                         /* Here we must account for the fact that the first
286                          * chunk has no explicit chunk table entry.  */
287
288                         if (read_start_chunk == 0)
289                                 first_chunk_entry_to_read = 0;
290                         else
291                                 first_chunk_entry_to_read = read_start_chunk - 1;
292
293                         if (last_needed_chunk == 0)
294                                 last_chunk_entry_to_read = 0;
295                         else
296                                 last_chunk_entry_to_read = last_needed_chunk - 1;
297
298                         if (last_needed_chunk < num_chunks - 1)
299                                 last_chunk_entry_to_read++;
300                 }
301
302                 const u64 num_chunk_entries_to_read =
303                         last_chunk_entry_to_read - first_chunk_entry_to_read + 1;
304
305                 const u64 chunk_offsets_alloc_size =
306                         max(num_chunk_entries_to_read,
307                             num_needed_chunk_offsets) * sizeof(chunk_offsets[0]);
308
309                 if ((size_t)chunk_offsets_alloc_size != chunk_offsets_alloc_size)
310                         goto oom;
311
312                 if (chunk_offsets_alloc_size <= STACK_MAX) {
313                         chunk_offsets = alloca(chunk_offsets_alloc_size);
314                 } else {
315                         chunk_offsets = MALLOC(chunk_offsets_alloc_size);
316                         if (chunk_offsets == NULL)
317                                 goto oom;
318                         chunk_offsets_malloced = true;
319                 }
320
321                 const size_t chunk_table_size_to_read =
322                         num_chunk_entries_to_read * chunk_entry_size;
323
324                 const u64 file_offset_of_needed_chunk_entries =
325                         cur_read_offset
326                         + (first_chunk_entry_to_read * chunk_entry_size)
327                         + (rspec->is_pipable ? (rspec->size_in_wim - chunk_table_size) : 0);
328
329                 void * const chunk_table_data =
330                         (u8*)chunk_offsets +
331                         chunk_offsets_alloc_size -
332                         chunk_table_size_to_read;
333
334                 ret = full_pread(in_fd, chunk_table_data, chunk_table_size_to_read,
335                                  file_offset_of_needed_chunk_entries);
336                 if (ret)
337                         goto read_error;
338
339                 /* Now fill in chunk_offsets from the entries we have read in
340                  * chunk_tab_data.  We break aliasing rules here to avoid having
341                  * to allocate yet another array.  */
342                 typedef le64 __attribute__((may_alias)) aliased_le64_t;
343                 typedef le32 __attribute__((may_alias)) aliased_le32_t;
344                 u64 * chunk_offsets_p = chunk_offsets;
345
346                 if (alt_chunk_table) {
347                         u64 cur_offset = 0;
348                         aliased_le32_t *raw_entries = chunk_table_data;
349
350                         for (size_t i = 0; i < num_chunk_entries_to_read; i++) {
351                                 u32 entry = le32_to_cpu(raw_entries[i]);
352                                 if (i >= read_start_chunk)
353                                         *chunk_offsets_p++ = cur_offset;
354                                 cur_offset += entry;
355                         }
356                         if (last_needed_chunk < num_chunks - 1)
357                                 *chunk_offsets_p = cur_offset;
358                 } else {
359                         if (read_start_chunk == 0)
360                                 *chunk_offsets_p++ = 0;
361
362                         if (chunk_entry_size == 4) {
363                                 aliased_le32_t *raw_entries = chunk_table_data;
364                                 for (size_t i = 0; i < num_chunk_entries_to_read; i++)
365                                         *chunk_offsets_p++ = le32_to_cpu(raw_entries[i]);
366                         } else {
367                                 aliased_le64_t *raw_entries = chunk_table_data;
368                                 for (size_t i = 0; i < num_chunk_entries_to_read; i++)
369                                         *chunk_offsets_p++ = le64_to_cpu(raw_entries[i]);
370                         }
371                 }
372
373                 /* Set offset to beginning of first chunk to read.  */
374                 cur_read_offset += chunk_offsets[0];
375                 if (rspec->is_pipable)
376                         cur_read_offset += read_start_chunk * sizeof(struct pwm_chunk_hdr);
377                 else
378                         cur_read_offset += chunk_table_size;
379         }
380
381         /* Allocate buffer for holding the uncompressed data of each chunk.  */
382         if (chunk_size <= STACK_MAX) {
383                 ubuf = alloca(chunk_size);
384         } else {
385                 ubuf = MALLOC(chunk_size);
386                 if (ubuf == NULL)
387                         goto oom;
388                 ubuf_malloced = true;
389         }
390
391         /* Allocate a temporary buffer for reading compressed chunks, each of
392          * which can be at most @chunk_size - 1 bytes.  This excludes compressed
393          * chunks that are a full @chunk_size bytes, which are actually stored
394          * uncompressed.  */
395         if (chunk_size - 1 <= STACK_MAX) {
396                 cbuf = alloca(chunk_size - 1);
397         } else {
398                 cbuf = MALLOC(chunk_size - 1);
399                 if (cbuf == NULL)
400                         goto oom;
401                 cbuf_malloced = true;
402         }
403
404         /* Set current data range.  */
405         const struct data_range *cur_range = ranges;
406         const struct data_range * const end_range = &ranges[num_ranges];
407         u64 cur_range_pos = cur_range->offset;
408         u64 cur_range_end = cur_range->offset + cur_range->size;
409
410         /* Read and process each needed chunk.  */
411         for (u64 i = read_start_chunk; i <= last_needed_chunk; i++) {
412
413                 /* Calculate uncompressed size of next chunk.  */
414                 u32 chunk_usize;
415                 if ((i == num_chunks - 1) && (rspec->uncompressed_size & (chunk_size - 1)))
416                         chunk_usize = (rspec->uncompressed_size & (chunk_size - 1));
417                 else
418                         chunk_usize = chunk_size;
419
420                 /* Calculate compressed size of next chunk.  */
421                 u32 chunk_csize;
422                 if (is_pipe_read) {
423                         struct pwm_chunk_hdr chunk_hdr;
424
425                         ret = full_pread(in_fd, &chunk_hdr,
426                                          sizeof(chunk_hdr), cur_read_offset);
427                         if (ret)
428                                 goto read_error;
429                         chunk_csize = le32_to_cpu(chunk_hdr.compressed_size);
430                 } else {
431                         if (i == num_chunks - 1) {
432                                 chunk_csize = rspec->size_in_wim -
433                                               chunk_table_full_size -
434                                               chunk_offsets[i - read_start_chunk];
435                                 if (rspec->is_pipable)
436                                         chunk_csize -= num_chunks * sizeof(struct pwm_chunk_hdr);
437                         } else {
438                                 chunk_csize = chunk_offsets[i + 1 - read_start_chunk] -
439                                               chunk_offsets[i - read_start_chunk];
440                         }
441                 }
442                 if (chunk_csize == 0 || chunk_csize > chunk_usize) {
443                         ERROR("Invalid chunk size in compressed resource!");
444                         errno = EINVAL;
445                         ret = WIMLIB_ERR_DECOMPRESSION;
446                         goto out_save_decompressor;
447                 }
448                 if (rspec->is_pipable)
449                         cur_read_offset += sizeof(struct pwm_chunk_hdr);
450
451                 /* Offsets in the uncompressed resource at which this chunk
452                  * starts and ends.  */
453                 const u64 chunk_start_offset = i << chunk_order;
454                 const u64 chunk_end_offset = chunk_start_offset + chunk_usize;
455
456                 if (chunk_end_offset <= cur_range_pos) {
457
458                         /* The next range does not require data in this chunk,
459                          * so skip it.  */
460                         cur_read_offset += chunk_csize;
461                         if (is_pipe_read) {
462                                 u8 dummy;
463
464                                 ret = full_pread(in_fd, &dummy, 1, cur_read_offset - 1);
465                                 if (ret)
466                                         goto read_error;
467                         }
468                 } else {
469
470                         /* Read the chunk and feed data to the callback
471                          * function.  */
472                         u8 *read_buf;
473
474                         if (chunk_csize == chunk_usize)
475                                 read_buf = ubuf;
476                         else
477                                 read_buf = cbuf;
478
479                         ret = full_pread(in_fd,
480                                          read_buf,
481                                          chunk_csize,
482                                          cur_read_offset);
483                         if (ret)
484                                 goto read_error;
485
486                         if (read_buf == cbuf) {
487                                 DEBUG("Decompressing chunk %"PRIu64" "
488                                       "(csize=%"PRIu32" usize=%"PRIu32")",
489                                       i, chunk_csize, chunk_usize);
490                                 ret = wimlib_decompress(cbuf,
491                                                         chunk_csize,
492                                                         ubuf,
493                                                         chunk_usize,
494                                                         decompressor);
495                                 if (ret) {
496                                         ERROR("Failed to decompress data!");
497                                         ret = WIMLIB_ERR_DECOMPRESSION;
498                                         errno = EINVAL;
499                                         goto out_save_decompressor;
500                                 }
501                         }
502                         cur_read_offset += chunk_csize;
503
504                         /* At least one range requires data in this chunk.  */
505                         do {
506                                 size_t start, end, size;
507
508                                 /* Calculate how many bytes of data should be
509                                  * sent to the callback function, taking into
510                                  * account that data sent to the callback
511                                  * function must not overlap range boundaries.
512                                  */
513                                 start = cur_range_pos - chunk_start_offset;
514                                 end = min(cur_range_end, chunk_end_offset) - chunk_start_offset;
515                                 size = end - start;
516
517                                 ret = (*cb)(&ubuf[start], size, cb_ctx);
518
519                                 if (ret)
520                                         goto out_save_decompressor;
521
522                                 cur_range_pos += size;
523                                 if (cur_range_pos == cur_range_end) {
524                                         /* Advance to next range.  */
525                                         if (++cur_range == end_range) {
526                                                 cur_range_pos = ~0ULL;
527                                         } else {
528                                                 cur_range_pos = cur_range->offset;
529                                                 cur_range_end = cur_range->offset + cur_range->size;
530                                         }
531                                 }
532                         } while (cur_range_pos < chunk_end_offset);
533                 }
534         }
535
536         if (is_pipe_read &&
537             last_offset == rspec->uncompressed_size - 1 &&
538             chunk_table_size)
539         {
540                 u8 dummy;
541                 /* If reading a pipable resource from a pipe and the full data
542                  * was requested, skip the chunk table at the end so that the
543                  * file descriptor is fully clear of the resource after this
544                  * returns.  */
545                 cur_read_offset += chunk_table_size;
546                 ret = full_pread(in_fd, &dummy, 1, cur_read_offset - 1);
547                 if (ret)
548                         goto read_error;
549         }
550         ret = 0;
551 out_save_decompressor:
552         wimlib_free_decompressor(rspec->wim->decompressor);
553         rspec->wim->decompressor = decompressor;
554         rspec->wim->decompressor_ctype = ctype;
555         rspec->wim->decompressor_max_block_size = chunk_size;
556 out_free_memory:
557         errno_save = errno;
558         if (chunk_offsets_malloced)
559                 FREE(chunk_offsets);
560         if (ubuf_malloced)
561                 FREE(ubuf);
562         if (cbuf_malloced)
563                 FREE(cbuf);
564         errno = errno_save;
565         return ret;
566
567 oom:
568         ERROR("Not enough memory available to read size=%"PRIu64" bytes "
569               "from compressed WIM resource!", last_offset - first_offset + 1);
570         errno = ENOMEM;
571         ret = WIMLIB_ERR_NOMEM;
572         goto out_free_memory;
573
574 read_error:
575         ERROR_WITH_ERRNO("Error reading compressed WIM resource!");
576         goto out_free_memory;
577 }
578
579 /* Read raw data from a file descriptor at the specified offset, feeding the
580  * data it in chunks into the specified callback function.  */
581 static int
582 read_raw_file_data(struct filedes *in_fd, u64 offset, u64 size,
583                    consume_data_callback_t cb, void *cb_ctx)
584 {
585         u8 buf[BUFFER_SIZE];
586         size_t bytes_to_read;
587         int ret;
588
589         while (size) {
590                 bytes_to_read = min(sizeof(buf), size);
591                 ret = full_pread(in_fd, buf, bytes_to_read, offset);
592                 if (ret) {
593                         ERROR_WITH_ERRNO("Read error");
594                         return ret;
595                 }
596                 ret = cb(buf, bytes_to_read, cb_ctx);
597                 if (ret)
598                         return ret;
599                 size -= bytes_to_read;
600                 offset += bytes_to_read;
601         }
602         return 0;
603 }
604
605 /* A consume_data_callback_t implementation that simply concatenates all chunks
606  * into a buffer.  */
607 static int
608 bufferer_cb(const void *chunk, size_t size, void *_ctx)
609 {
610         u8 **buf_p = _ctx;
611
612         *buf_p = mempcpy(*buf_p, chunk, size);
613         return 0;
614 }
615
616 /*
617  * read_partial_wim_resource()-
618  *
619  * Read a range of data from an uncompressed or compressed resource in a WIM
620  * file.
621  *
622  * @rspec
623  *      Specification of the WIM resource to read from.
624  * @offset
625  *      Offset within the uncompressed resource at which to start reading.
626  * @size
627  *      Number of bytes to read.
628  * @cb
629  *      Callback function to feed the data being read.  Each call provides the
630  *      next chunk of the requested data, uncompressed.  Each chunk will be of
631  *      nonzero size and will not cross range boundaries, but otherwise will be
632  *      of unspecified size.
633  * @cb_ctx
634  *      Parameter to pass to @cb_ctx.
635  *
636  * Return values:
637  *      WIMLIB_ERR_SUCCESS (0)
638  *      WIMLIB_ERR_READ                   (errno set)
639  *      WIMLIB_ERR_UNEXPECTED_END_OF_FILE (errno set to 0)
640  *      WIMLIB_ERR_NOMEM                  (errno set to ENOMEM)
641  *      WIMLIB_ERR_DECOMPRESSION          (errno set to EINVAL)
642  *
643  *      or other error code returned by the @cb function.
644  */
645 static int
646 read_partial_wim_resource(const struct wim_resource_spec *rspec,
647                           u64 offset, u64 size,
648                           consume_data_callback_t cb, void *cb_ctx)
649 {
650         /* Sanity checks.  */
651         wimlib_assert(offset + size >= offset);
652         wimlib_assert(offset + size <= rspec->uncompressed_size);
653
654         DEBUG("Reading %"PRIu64" @ %"PRIu64" from WIM resource  "
655               "%"PRIu64" => %"PRIu64" @ %"PRIu64,
656               size, offset, rspec->uncompressed_size,
657               rspec->size_in_wim, rspec->offset_in_wim);
658
659         /* Trivial case.  */
660         if (size == 0)
661                 return 0;
662
663         if (resource_is_compressed(rspec)) {
664                 struct data_range range = {
665                         .offset = offset,
666                         .size = size,
667                 };
668                 return read_compressed_wim_resource(rspec, &range, 1,
669                                                     cb, cb_ctx);
670         } else {
671                 return read_raw_file_data(&rspec->wim->in_fd,
672                                           rspec->offset_in_wim + offset,
673                                           size,
674                                           cb,
675                                           cb_ctx);
676         }
677 }
678
679 /* Read the specified range of uncompressed data from the specified stream,
680  * which must be located into a WIM file, into the specified buffer.  */
681 int
682 read_partial_wim_stream_into_buf(const struct wim_lookup_table_entry *lte,
683                                  size_t size, u64 offset, void *_buf)
684 {
685         u8 *buf = _buf;
686
687         wimlib_assert(lte->resource_location == RESOURCE_IN_WIM);
688
689         return read_partial_wim_resource(lte->rspec,
690                                          lte->offset_in_res + offset,
691                                          size,
692                                          bufferer_cb,
693                                          &buf);
694 }
695
696 /* A consume_data_callback_t implementation that simply ignores the data
697  * received.  */
698 static int
699 skip_chunk_cb(const void *chunk, size_t size, void *_ctx)
700 {
701         return 0;
702 }
703
704 /* Skip over the data of the specified stream, which must correspond to a full
705  * WIM resource.  */
706 int
707 skip_wim_stream(struct wim_lookup_table_entry *lte)
708 {
709         wimlib_assert(lte->resource_location == RESOURCE_IN_WIM);
710         wimlib_assert(!(lte->flags & WIM_RESHDR_FLAG_PACKED_STREAMS));
711         DEBUG("Skipping stream (size=%"PRIu64")", lte->size);
712         return read_partial_wim_resource(lte->rspec,
713                                          0,
714                                          lte->rspec->uncompressed_size,
715                                          skip_chunk_cb,
716                                          NULL);
717 }
718
719 static int
720 read_wim_stream_prefix(const struct wim_lookup_table_entry *lte, u64 size,
721                        consume_data_callback_t cb, void *cb_ctx)
722 {
723         return read_partial_wim_resource(lte->rspec, lte->offset_in_res, size,
724                                          cb, cb_ctx);
725 }
726
727 #ifndef __WIN32__
728 /* This function handles reading stream data that is located in an external
729  * file,  such as a file that has been added to the WIM image through execution
730  * of a wimlib_add_command.
731  *
732  * This assumes the file can be accessed using the standard POSIX open(),
733  * read(), and close().  On Windows this will not necessarily be the case (since
734  * the file may need FILE_FLAG_BACKUP_SEMANTICS to be opened, or the file may be
735  * encrypted), so Windows uses its own code for its equivalent case.  */
736 static int
737 read_file_on_disk_prefix(const struct wim_lookup_table_entry *lte, u64 size,
738                          consume_data_callback_t cb, void *cb_ctx)
739 {
740         int ret;
741         int raw_fd;
742         struct filedes fd;
743
744         wimlib_assert(size <= lte->size);
745
746         DEBUG("Reading %"PRIu64" bytes from \"%"TS"\"", size, lte->file_on_disk);
747
748         raw_fd = open(lte->file_on_disk, O_BINARY | O_RDONLY);
749         if (raw_fd < 0) {
750                 ERROR_WITH_ERRNO("Can't open \"%"TS"\"", lte->file_on_disk);
751                 return WIMLIB_ERR_OPEN;
752         }
753         filedes_init(&fd, raw_fd);
754         ret = read_raw_file_data(&fd, 0, size, cb, cb_ctx);
755         filedes_close(&fd);
756         return ret;
757 }
758 #endif /* !__WIN32__ */
759
760 /* This function handles the trivial case of reading stream data that is, in
761  * fact, already located in an in-memory buffer.  */
762 static int
763 read_buffer_prefix(const struct wim_lookup_table_entry *lte,
764                    u64 size, consume_data_callback_t cb, void *cb_ctx)
765 {
766         wimlib_assert(size <= lte->size);
767         return (*cb)(lte->attached_buffer, size, cb_ctx);
768 }
769
770 typedef int (*read_stream_prefix_handler_t)(const struct wim_lookup_table_entry *lte,
771                                             u64 size,
772                                             consume_data_callback_t cb,
773                                             void *cb_ctx);
774
775 /*
776  * read_stream_prefix()-
777  *
778  * Reads the first @size bytes from a generic "stream", which may be located in
779  * any one of several locations, such as in a WIM file (compressed or
780  * uncompressed), in an external file, or directly in an in-memory buffer.
781  *
782  * This function feeds the data to a callback function @cb in chunks of
783  * unspecified size.
784  *
785  * Returns 0 on success; nonzero on error.  A nonzero value will be returned if
786  * the stream data cannot be successfully read (for a number of different
787  * reasons, depending on the stream location), or if @cb returned nonzero in
788  * which case that error code will be returned.
789  */
790 static int
791 read_stream_prefix(const struct wim_lookup_table_entry *lte, u64 size,
792                    consume_data_callback_t cb, void *cb_ctx)
793 {
794         static const read_stream_prefix_handler_t handlers[] = {
795                 [RESOURCE_IN_WIM]             = read_wim_stream_prefix,
796         #ifdef __WIN32__
797                 [RESOURCE_IN_FILE_ON_DISK]    = read_win32_file_prefix,
798         #else
799                 [RESOURCE_IN_FILE_ON_DISK]    = read_file_on_disk_prefix,
800         #endif
801                 [RESOURCE_IN_ATTACHED_BUFFER] = read_buffer_prefix,
802         #ifdef WITH_FUSE
803                 [RESOURCE_IN_STAGING_FILE]    = read_file_on_disk_prefix,
804         #endif
805         #ifdef WITH_NTFS_3G
806                 [RESOURCE_IN_NTFS_VOLUME]     = read_ntfs_file_prefix,
807         #endif
808         #ifdef __WIN32__
809                 [RESOURCE_WIN32_ENCRYPTED]    = read_win32_encrypted_file_prefix,
810         #endif
811         };
812         wimlib_assert(lte->resource_location < ARRAY_LEN(handlers)
813                       && handlers[lte->resource_location] != NULL);
814         return handlers[lte->resource_location](lte, size, cb, cb_ctx);
815 }
816
817 /* Read the full uncompressed data of the specified stream into the specified
818  * buffer, which must have space for at least lte->size bytes.  */
819 int
820 read_full_stream_into_buf(const struct wim_lookup_table_entry *lte, void *_buf)
821 {
822         u8 *buf = _buf;
823         return read_stream_prefix(lte, lte->size, bufferer_cb, &buf);
824 }
825
826 /* Retrieve the full uncompressed data of the specified stream.  A buffer large
827  * enough hold the data is allocated and returned in @buf_ret.  */
828 int
829 read_full_stream_into_alloc_buf(const struct wim_lookup_table_entry *lte,
830                                 void **buf_ret)
831 {
832         int ret;
833         void *buf;
834
835         if ((size_t)lte->size != lte->size) {
836                 ERROR("Can't read %"PRIu64" byte stream into "
837                       "memory", lte->size);
838                 return WIMLIB_ERR_NOMEM;
839         }
840
841         buf = MALLOC(lte->size);
842         if (buf == NULL)
843                 return WIMLIB_ERR_NOMEM;
844
845         ret = read_full_stream_into_buf(lte, buf);
846         if (ret) {
847                 FREE(buf);
848                 return ret;
849         }
850
851         *buf_ret = buf;
852         return 0;
853 }
854
855 /* Retrieve the full uncompressed data of the specified WIM resource.  A buffer
856  * large enough hold the data is allocated and returned in @buf_ret.  */
857 static int
858 wim_resource_spec_to_data(struct wim_resource_spec *rspec, void **buf_ret)
859 {
860         int ret;
861         struct wim_lookup_table_entry *lte;
862
863         lte = new_lookup_table_entry();
864         if (lte == NULL)
865                 return WIMLIB_ERR_NOMEM;
866
867         lte_bind_wim_resource_spec(lte, rspec);
868         lte->flags = rspec->flags;
869         lte->size = rspec->uncompressed_size;
870         lte->offset_in_res = 0;
871
872         ret = read_full_stream_into_alloc_buf(lte, buf_ret);
873
874         lte_unbind_wim_resource_spec(lte);
875         free_lookup_table_entry(lte);
876         return ret;
877 }
878
879 /* Retrieve the full uncompressed data of a WIM resource specified as a raw
880  * `wim_reshdr' and the corresponding WIM file.  A large enough hold the data is
881  * allocated and returned in @buf_ret.  */
882 int
883 wim_reshdr_to_data(const struct wim_reshdr *reshdr, WIMStruct *wim, void **buf_ret)
884 {
885         DEBUG("offset_in_wim=%"PRIu64", size_in_wim=%"PRIu64", "
886               "uncompressed_size=%"PRIu64,
887               reshdr->offset_in_wim, reshdr->size_in_wim,
888               reshdr->uncompressed_size);
889
890         struct wim_resource_spec rspec;
891         wim_res_hdr_to_spec(reshdr, wim, &rspec);
892         return wim_resource_spec_to_data(&rspec, buf_ret);
893 }
894
895 struct streamifier_context {
896         struct read_stream_list_callbacks cbs;
897         struct wim_lookup_table_entry *cur_stream;
898         struct wim_lookup_table_entry *next_stream;
899         u64 cur_stream_offset;
900         struct wim_lookup_table_entry *final_stream;
901         size_t list_head_offset;
902 };
903
904 static struct wim_lookup_table_entry *
905 next_stream(struct wim_lookup_table_entry *lte, size_t list_head_offset)
906 {
907         struct list_head *cur;
908
909         cur = (struct list_head*)((u8*)lte + list_head_offset);
910
911         return (struct wim_lookup_table_entry*)((u8*)cur->next - list_head_offset);
912 }
913
914 /* A consume_data_callback_t implementation that translates raw resource data
915  * into streams, calling the begin_stream, consume_chunk, and end_stream
916  * callback functions as appropriate.  */
917 static int
918 streamifier_cb(const void *chunk, size_t size, void *_ctx)
919 {
920         struct streamifier_context *ctx = _ctx;
921         int ret;
922
923         DEBUG("%zu bytes passed to streamifier", size);
924
925         wimlib_assert(ctx->cur_stream != NULL);
926         wimlib_assert(size <= ctx->cur_stream->size - ctx->cur_stream_offset);
927
928         if (ctx->cur_stream_offset == 0) {
929                 /* Starting a new stream.  */
930                 DEBUG("Begin new stream (size=%"PRIu64").",
931                       ctx->cur_stream->size);
932                 ret = (*ctx->cbs.begin_stream)(ctx->cur_stream, true,
933                                                ctx->cbs.begin_stream_ctx);
934                 if (ret)
935                         return ret;
936         }
937
938         /* Consume the chunk.  */
939         ret = (*ctx->cbs.consume_chunk)(chunk, size,
940                                         ctx->cbs.consume_chunk_ctx);
941         if (ret)
942                 return ret;
943         ctx->cur_stream_offset += size;
944
945         if (ctx->cur_stream_offset == ctx->cur_stream->size) {
946                 /* Finished reading all the data for a stream.  */
947
948                 DEBUG("End stream (size=%"PRIu64").", ctx->cur_stream->size);
949                 ret = (*ctx->cbs.end_stream)(ctx->cur_stream, 0,
950                                              ctx->cbs.end_stream_ctx);
951                 if (ret)
952                         return ret;
953
954                 /* Advance to next stream.  */
955                 ctx->cur_stream = ctx->next_stream;
956                 if (ctx->cur_stream != NULL) {
957                         if (ctx->cur_stream != ctx->final_stream)
958                                 ctx->next_stream = next_stream(ctx->cur_stream,
959                                                                ctx->list_head_offset);
960                         else
961                                 ctx->next_stream = NULL;
962                 }
963                 ctx->cur_stream_offset = 0;
964         }
965         return 0;
966 }
967
968 struct hasher_context {
969         SHA_CTX sha_ctx;
970         int flags;
971         struct read_stream_list_callbacks cbs;
972 };
973
974 /* Callback for starting to read a stream while calculating its SHA1 message
975  * digest.  */
976 static int
977 hasher_begin_stream(struct wim_lookup_table_entry *lte, bool is_partial_res,
978                     void *_ctx)
979 {
980         struct hasher_context *ctx = _ctx;
981
982         sha1_init(&ctx->sha_ctx);
983
984         if (ctx->cbs.begin_stream == NULL)
985                 return 0;
986         else
987                 return (*ctx->cbs.begin_stream)(lte, is_partial_res,
988                                                 ctx->cbs.begin_stream_ctx);
989 }
990
991 /* A consume_data_callback_t implementation that continues calculating the SHA1
992  * message digest of the stream being read, then optionally passes the data on
993  * to another consume_data_callback_t implementation.  This allows checking the
994  * SHA1 message digest of a stream being extracted, for example.  */
995 static int
996 hasher_consume_chunk(const void *chunk, size_t size, void *_ctx)
997 {
998         struct hasher_context *ctx = _ctx;
999
1000         sha1_update(&ctx->sha_ctx, chunk, size);
1001         if (ctx->cbs.consume_chunk == NULL)
1002                 return 0;
1003         else
1004                 return (*ctx->cbs.consume_chunk)(chunk, size, ctx->cbs.consume_chunk_ctx);
1005 }
1006
1007 /* Callback for finishing reading a stream while calculating its SHA1 message
1008  * digest.  */
1009 static int
1010 hasher_end_stream(struct wim_lookup_table_entry *lte, int status, void *_ctx)
1011 {
1012         struct hasher_context *ctx = _ctx;
1013         u8 hash[SHA1_HASH_SIZE];
1014         int ret;
1015
1016         if (status) {
1017                 /* Error occurred; the full stream may not have been read.  */
1018                 ret = status;
1019                 goto out_next_cb;
1020         }
1021
1022         /* Retrieve the final SHA1 message digest.  */
1023         sha1_final(hash, &ctx->sha_ctx);
1024
1025         if (lte->unhashed) {
1026                 if (ctx->flags & COMPUTE_MISSING_STREAM_HASHES) {
1027                         /* No SHA1 message digest was previously present for the
1028                          * stream.  Set it to the one just calculated.  */
1029                         DEBUG("Set SHA1 message digest for stream "
1030                               "(size=%"PRIu64").", lte->size);
1031                         copy_hash(lte->hash, hash);
1032                 }
1033         } else {
1034                 if (ctx->flags & VERIFY_STREAM_HASHES) {
1035                         /* The stream already had a SHA1 message digest present.  Verify
1036                          * that it is the same as the calculated value.  */
1037                         if (!hashes_equal(hash, lte->hash)) {
1038                                 if (wimlib_print_errors) {
1039                                         ERROR("Invalid SHA1 message digest "
1040                                               "on the following WIM stream:");
1041                                         print_lookup_table_entry(lte, stderr);
1042                                 }
1043                                 ret = WIMLIB_ERR_INVALID_RESOURCE_HASH;
1044                                 errno = EINVAL;
1045                                 goto out_next_cb;
1046                         }
1047                         DEBUG("SHA1 message digest okay for "
1048                               "stream (size=%"PRIu64").", lte->size);
1049                 }
1050         }
1051         ret = 0;
1052 out_next_cb:
1053         if (ctx->cbs.end_stream == NULL)
1054                 return ret;
1055         else
1056                 return (*ctx->cbs.end_stream)(lte, ret, ctx->cbs.end_stream_ctx);
1057 }
1058
1059 static int
1060 read_full_stream_with_cbs(struct wim_lookup_table_entry *lte,
1061                           const struct read_stream_list_callbacks *cbs)
1062 {
1063         int ret;
1064
1065         ret = (*cbs->begin_stream)(lte, false, cbs->begin_stream_ctx);
1066         if (ret)
1067                 return ret;
1068
1069         ret = read_stream_prefix(lte, lte->size, cbs->consume_chunk,
1070                                  cbs->consume_chunk_ctx);
1071
1072         return (*cbs->end_stream)(lte, ret, cbs->end_stream_ctx);
1073 }
1074
1075 /* Read the full data of the specified stream, passing the data into the
1076  * specified callbacks (all of which are optional) and either checking or
1077  * computing the SHA1 message digest of the stream.  */
1078 static int
1079 read_full_stream_with_sha1(struct wim_lookup_table_entry *lte,
1080                            const struct read_stream_list_callbacks *cbs)
1081 {
1082         struct hasher_context hasher_ctx = {
1083                 .flags = VERIFY_STREAM_HASHES | COMPUTE_MISSING_STREAM_HASHES,
1084                 .cbs = *cbs,
1085         };
1086         struct read_stream_list_callbacks hasher_cbs = {
1087                 .begin_stream           = hasher_begin_stream,
1088                 .begin_stream_ctx       = &hasher_ctx,
1089                 .consume_chunk          = hasher_consume_chunk,
1090                 .consume_chunk_ctx      = &hasher_ctx,
1091                 .end_stream             = hasher_end_stream,
1092                 .end_stream_ctx         = &hasher_ctx,
1093
1094         };
1095         return read_full_stream_with_cbs(lte, &hasher_cbs);
1096 }
1097
1098 /*
1099  * Read a list of streams, each of which may be in any supported location (e.g.
1100  * in a WIM or in an external file).  Unlike read_stream_prefix() or the
1101  * functions which call it, this function optimizes the case where multiple
1102  * streams are packed into a single compressed WIM resource and reads them all
1103  * consecutively, only decompressing the data one time.
1104  *
1105  * @stream_list
1106  *      List of streams (represented as `struct wim_lookup_table_entry's) to
1107  *      read.
1108  * @list_head_offset
1109  *      Offset of the `struct list_head' within each `struct
1110  *      wim_lookup_table_entry' that makes up the @stream_list.
1111  * @cbs
1112  *      Callback functions to accept the stream data.
1113  * @flags
1114  *      Bitwise OR of zero or more of the following flags:
1115  *
1116  *      VERIFY_STREAM_HASHES:
1117  *              For all streams being read that have already had SHA1 message
1118  *              digests computed, calculate the SHA1 message digest of the read
1119  *              data and compare it with the previously computed value.  If they
1120  *              do not match, return WIMLIB_ERR_INVALID_RESOURCE_HASH.
1121  *
1122  *      COMPUTE_MISSING_STREAM_HASHES
1123  *              For all streams being read that have not yet had their SHA1
1124  *              message digests computed, calculate and save their SHA1 message
1125  *              digests.
1126  *
1127  *      STREAM_LIST_ALREADY_SORTED
1128  *              @stream_list is already sorted in sequential order for reading.
1129  *
1130  * The callback functions are allowed to delete the current stream from the list
1131  * if necessary.
1132  *
1133  * Returns 0 on success; a nonzero error code on failure.  Failure can occur due
1134  * to an error reading the data or due to an error status being returned by any
1135  * of the callback functions.
1136  */
1137 int
1138 read_stream_list(struct list_head *stream_list,
1139                  size_t list_head_offset,
1140                  const struct read_stream_list_callbacks *cbs,
1141                  int flags)
1142 {
1143         int ret;
1144         struct list_head *cur, *next;
1145         struct wim_lookup_table_entry *lte;
1146         struct hasher_context *hasher_ctx;
1147         struct read_stream_list_callbacks *sink_cbs;
1148
1149         if (!(flags & STREAM_LIST_ALREADY_SORTED)) {
1150                 ret = sort_stream_list_by_sequential_order(stream_list, list_head_offset);
1151                 if (ret)
1152                         return ret;
1153         }
1154
1155         if (flags & (VERIFY_STREAM_HASHES | COMPUTE_MISSING_STREAM_HASHES)) {
1156                 hasher_ctx = alloca(sizeof(*hasher_ctx));
1157                 *hasher_ctx = (struct hasher_context) {
1158                         .flags  = flags,
1159                         .cbs    = *cbs,
1160                 };
1161                 sink_cbs = alloca(sizeof(*sink_cbs));
1162                 *sink_cbs = (struct read_stream_list_callbacks) {
1163                         .begin_stream           = hasher_begin_stream,
1164                         .begin_stream_ctx       = hasher_ctx,
1165                         .consume_chunk          = hasher_consume_chunk,
1166                         .consume_chunk_ctx      = hasher_ctx,
1167                         .end_stream             = hasher_end_stream,
1168                         .end_stream_ctx         = hasher_ctx,
1169                 };
1170         } else {
1171                 sink_cbs = (struct read_stream_list_callbacks*)cbs;
1172         }
1173
1174         for (cur = stream_list->next, next = cur->next;
1175              cur != stream_list;
1176              cur = next, next = cur->next)
1177         {
1178                 lte = (struct wim_lookup_table_entry*)((u8*)cur - list_head_offset);
1179
1180                 if (lte->flags & WIM_RESHDR_FLAG_PACKED_STREAMS &&
1181                     lte->size != lte->rspec->uncompressed_size)
1182                 {
1183
1184                         struct wim_lookup_table_entry *lte_next, *lte_last;
1185                         struct list_head *next2;
1186                         size_t stream_count;
1187
1188                         /* The next stream is a proper sub-sequence of a WIM
1189                          * resource.  See if there are other streams in the same
1190                          * resource that need to be read.  Since
1191                          * sort_stream_list_by_sequential_order() sorted the
1192                          * streams by offset in the WIM, this can be determined
1193                          * by simply scanning forward in the list.  */
1194
1195                         lte_last = lte;
1196                         stream_count = 1;
1197                         for (next2 = next;
1198                              next2 != stream_list
1199                              && (lte_next = (struct wim_lookup_table_entry*)
1200                                                 ((u8*)next2 - list_head_offset),
1201                                  lte_next->resource_location == RESOURCE_IN_WIM
1202                                  && lte_next->rspec == lte->rspec);
1203                              next2 = next2->next)
1204                         {
1205                                 lte_last = lte_next;
1206                                 stream_count++;
1207                         }
1208                         if (stream_count > 1) {
1209                                 /* Reading multiple streams combined into a
1210                                  * single WIM resource.  They are in the stream
1211                                  * list, sorted by offset; @lte specifies the
1212                                  * first stream in the resource that needs to be
1213                                  * read and @lte_last specifies the last stream
1214                                  * in the resource that needs to be read.  */
1215
1216                                 DEBUG("Reading %zu streams combined in same "
1217                                       "WIM resource", stream_count);
1218
1219                                 next = next2;
1220
1221                                 struct data_range ranges[stream_count];
1222
1223                                 {
1224                                         struct list_head *next3;
1225                                         size_t i;
1226                                         struct wim_lookup_table_entry *lte_cur;
1227
1228                                         next3 = cur;
1229                                         for (i = 0; i < stream_count; i++) {
1230                                                 lte_cur = (struct wim_lookup_table_entry*)
1231                                                         ((u8*)next3 - list_head_offset);
1232                                                 ranges[i].offset = lte_cur->offset_in_res;
1233                                                 ranges[i].size = lte_cur->size;
1234                                                 next3 = next3->next;
1235                                         }
1236                                 }
1237
1238                                 struct streamifier_context streamifier_ctx = {
1239                                         .cbs                    = *sink_cbs,
1240                                         .cur_stream             = lte,
1241                                         .next_stream            = next_stream(lte, list_head_offset),
1242                                         .cur_stream_offset      = 0,
1243                                         .final_stream           = lte_last,
1244                                         .list_head_offset       = list_head_offset,
1245                                 };
1246
1247                                 ret = read_compressed_wim_resource(lte->rspec,
1248                                                                    ranges,
1249                                                                    stream_count,
1250                                                                    streamifier_cb,
1251                                                                    &streamifier_ctx);
1252
1253                                 if (ret) {
1254                                         if (streamifier_ctx.cur_stream_offset != 0) {
1255                                                 ret = (*streamifier_ctx.cbs.end_stream)
1256                                                         (streamifier_ctx.cur_stream,
1257                                                          ret,
1258                                                          streamifier_ctx.cbs.end_stream_ctx);
1259                                         }
1260                                         return ret;
1261                                 }
1262                                 continue;
1263                         }
1264                 }
1265
1266                 ret = read_full_stream_with_cbs(lte, sink_cbs);
1267                 if (ret && ret != BEGIN_STREAM_STATUS_SKIP_STREAM)
1268                         return ret;
1269         }
1270         return 0;
1271 }
1272
1273 /* Extract the first @size bytes of the specified stream.
1274  *
1275  * If @size specifies the full uncompressed size of the stream, then the SHA1
1276  * message digest of the uncompressed stream is checked while being extracted.
1277  *
1278  * The uncompressed data of the resource is passed in chunks of unspecified size
1279  * to the @extract_chunk function, passing it @extract_chunk_arg.  */
1280 int
1281 extract_stream(struct wim_lookup_table_entry *lte, u64 size,
1282                consume_data_callback_t extract_chunk, void *extract_chunk_arg)
1283 {
1284         wimlib_assert(size <= lte->size);
1285         if (size == lte->size) {
1286                 /* Do SHA1.  */
1287                 struct read_stream_list_callbacks cbs = {
1288                         .consume_chunk          = extract_chunk,
1289                         .consume_chunk_ctx      = extract_chunk_arg,
1290                 };
1291                 return read_full_stream_with_sha1(lte, &cbs);
1292         } else {
1293                 /* Don't do SHA1.  */
1294                 return read_stream_prefix(lte, size, extract_chunk,
1295                                           extract_chunk_arg);
1296         }
1297 }
1298
1299 /* A consume_data_callback_t implementation that writes the chunk of data to a
1300  * file descriptor.  */
1301 int
1302 extract_chunk_to_fd(const void *chunk, size_t size, void *_fd_p)
1303 {
1304         struct filedes *fd = _fd_p;
1305
1306         int ret = full_write(fd, chunk, size);
1307         if (ret) {
1308                 ERROR_WITH_ERRNO("Error writing to file descriptor");
1309                 return ret;
1310         }
1311         return 0;
1312 }
1313
1314 /* Extract the first @size bytes of the specified stream to the specified file
1315  * descriptor.  */
1316 int
1317 extract_stream_to_fd(struct wim_lookup_table_entry *lte,
1318                      struct filedes *fd, u64 size)
1319 {
1320         return extract_stream(lte, size, extract_chunk_to_fd, fd);
1321 }
1322
1323 /* Calculate the SHA1 message digest of a stream and store it in @lte->hash.  */
1324 int
1325 sha1_stream(struct wim_lookup_table_entry *lte)
1326 {
1327         wimlib_assert(lte->unhashed);
1328         struct read_stream_list_callbacks cbs = {
1329         };
1330         return read_full_stream_with_sha1(lte, &cbs);
1331 }
1332
1333 /* Convert a short WIM resource header to a stand-alone WIM resource
1334  * specification.  */
1335 void
1336 wim_res_hdr_to_spec(const struct wim_reshdr *reshdr, WIMStruct *wim,
1337                     struct wim_resource_spec *rspec)
1338 {
1339         rspec->wim = wim;
1340         rspec->offset_in_wim = reshdr->offset_in_wim;
1341         rspec->size_in_wim = reshdr->size_in_wim;
1342         rspec->uncompressed_size = reshdr->uncompressed_size;
1343         INIT_LIST_HEAD(&rspec->stream_list);
1344         rspec->flags = reshdr->flags;
1345         rspec->is_pipable = wim_is_pipable(wim);
1346 }
1347
1348 /* Convert a stand-alone resource specification to a WIM resource header.  */
1349 void
1350 wim_res_spec_to_hdr(const struct wim_resource_spec *rspec,
1351                     struct wim_reshdr *reshdr)
1352 {
1353         reshdr->offset_in_wim     = rspec->offset_in_wim;
1354         reshdr->size_in_wim       = rspec->size_in_wim;
1355         reshdr->flags             = rspec->flags;
1356         reshdr->uncompressed_size = rspec->uncompressed_size;
1357 }
1358
1359 /* Translates a WIM resource header from the on-disk format into an in-memory
1360  * format.  */
1361 void
1362 get_wim_reshdr(const struct wim_reshdr_disk *disk_reshdr,
1363                struct wim_reshdr *reshdr)
1364 {
1365         reshdr->offset_in_wim = le64_to_cpu(disk_reshdr->offset_in_wim);
1366         reshdr->size_in_wim = (((u64)disk_reshdr->size_in_wim[0] <<  0) |
1367                                ((u64)disk_reshdr->size_in_wim[1] <<  8) |
1368                                ((u64)disk_reshdr->size_in_wim[2] << 16) |
1369                                ((u64)disk_reshdr->size_in_wim[3] << 24) |
1370                                ((u64)disk_reshdr->size_in_wim[4] << 32) |
1371                                ((u64)disk_reshdr->size_in_wim[5] << 40) |
1372                                ((u64)disk_reshdr->size_in_wim[6] << 48));
1373         reshdr->uncompressed_size = le64_to_cpu(disk_reshdr->uncompressed_size);
1374         reshdr->flags = disk_reshdr->flags;
1375 }
1376
1377 /* Translates a WIM resource header from an in-memory format into the on-disk
1378  * format.  */
1379 void
1380 put_wim_reshdr(const struct wim_reshdr *reshdr,
1381                struct wim_reshdr_disk *disk_reshdr)
1382 {
1383         disk_reshdr->size_in_wim[0] = reshdr->size_in_wim  >>  0;
1384         disk_reshdr->size_in_wim[1] = reshdr->size_in_wim  >>  8;
1385         disk_reshdr->size_in_wim[2] = reshdr->size_in_wim  >> 16;
1386         disk_reshdr->size_in_wim[3] = reshdr->size_in_wim  >> 24;
1387         disk_reshdr->size_in_wim[4] = reshdr->size_in_wim  >> 32;
1388         disk_reshdr->size_in_wim[5] = reshdr->size_in_wim  >> 40;
1389         disk_reshdr->size_in_wim[6] = reshdr->size_in_wim  >> 48;
1390         disk_reshdr->flags = reshdr->flags;
1391         disk_reshdr->offset_in_wim = cpu_to_le64(reshdr->offset_in_wim);
1392         disk_reshdr->uncompressed_size = cpu_to_le64(reshdr->uncompressed_size);
1393 }