]> wimlib.net Git - wimlib/blob - src/split.c
Encodings update (IN PROGRESS)
[wimlib] / src / split.c
1 /*
2  * split.c
3  *
4  * Split a WIM file into parts.
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
14  * Software Foundation; either version 3 of the License, or (at your option)
15  * any later 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
20  * details.
21  *
22  * You should have received a copy of the GNU General Public License
23  * along with wimlib; if not, see http://www.gnu.org/licenses/.
24  */
25
26 #include "wimlib_internal.h"
27 #include "lookup_table.h"
28 #include "xml.h"
29 #include "buffer_io.h"
30
31 #if TCHAR_IS_UTF16LE
32 #  include <wchar.h>
33 #endif
34
35 struct split_args {
36         WIMStruct *w;
37         tchar *swm_base_name;
38         size_t swm_base_name_len;
39         const tchar *swm_suffix;
40         struct list_head lte_list;
41         int cur_part_number;
42         int write_flags;
43         long size_remaining;
44         size_t part_size;
45         wimlib_progress_func_t progress_func;
46         union wimlib_progress_info progress;
47 };
48
49 static int
50 finish_swm(WIMStruct *w, struct list_head *lte_list,
51            int write_flags, wimlib_progress_func_t progress_func)
52 {
53         off_t lookup_table_offset = ftello(w->out_fp);
54         int ret;
55         struct wim_lookup_table_entry *lte;
56
57         list_for_each_entry(lte, lte_list, staging_list) {
58                 ret = write_lookup_table_entry(lte, w->out_fp);
59                 if (ret != 0)
60                         return ret;
61         }
62
63         off_t xml_data_offset = ftello(w->out_fp);
64
65         if (lookup_table_offset == -1 || xml_data_offset == -1)
66                 return WIMLIB_ERR_WRITE;
67         w->hdr.lookup_table_res_entry.offset = lookup_table_offset;
68         w->hdr.lookup_table_res_entry.size =
69                                 xml_data_offset - lookup_table_offset;
70         w->hdr.lookup_table_res_entry.original_size =
71                                 xml_data_offset - lookup_table_offset;
72         w->hdr.lookup_table_res_entry.flags = WIM_RESHDR_FLAG_METADATA;
73         return finish_write(w, WIMLIB_ALL_IMAGES,
74                             write_flags | WIMLIB_WRITE_FLAG_NO_LOOKUP_TABLE,
75                             progress_func);
76 }
77
78 static int
79 copy_resource_to_swm(struct wim_lookup_table_entry *lte, void *__args)
80 {
81         struct split_args *args = (struct split_args*)__args;
82         WIMStruct *w = args->w;
83         int ret;
84
85         /* metadata resources were already written. */
86         if (lte->resource_entry.flags & WIM_RESHDR_FLAG_METADATA)
87                 return 0;
88
89         if (args->size_remaining < 0 ||
90                         (u64)args->size_remaining < lte->resource_entry.size) {
91
92                 /* No space for this resource.  Finish the previous swm and
93                  * start a new one. */
94
95                 ret = finish_swm(w, &args->lte_list, args->write_flags,
96                                  args->progress_func);
97                 if (ret != 0)
98                         return ret;
99
100                 if (args->progress_func) {
101                         args->progress_func(WIMLIB_PROGRESS_MSG_SPLIT_END_PART,
102                                             &args->progress);
103                 }
104
105                 INIT_LIST_HEAD(&args->lte_list);
106                 args->cur_part_number++;
107
108                 tsprintf(args->swm_base_name + args->swm_base_name_len, T("%d%"TS),
109                          args->cur_part_number, args->swm_suffix);
110
111                 w->hdr.part_number = args->cur_part_number;
112
113                 if (args->progress_func) {
114                         args->progress.split.cur_part_number = args->cur_part_number;
115                         args->progress_func(WIMLIB_PROGRESS_MSG_SPLIT_BEGIN_PART,
116                                             &args->progress);
117                 }
118
119                 ret = begin_write(w, args->swm_base_name, args->write_flags);
120                 if (ret != 0)
121                         return ret;
122                 args->size_remaining = args->part_size;
123         }
124         args->size_remaining -= lte->resource_entry.size;
125         args->progress.split.completed_bytes += lte->resource_entry.size;
126         list_add(&lte->staging_list, &args->lte_list);
127         return copy_resource(lte, w);
128 }
129
130 /* Splits the WIM file @w into multiple parts prefixed by @swm_name with size at
131  * most @part_size bytes. */
132 WIMLIBAPI int
133 wimlib_split(WIMStruct *w, const tchar *swm_name,
134              size_t part_size, int write_flags,
135              wimlib_progress_func_t progress_func)
136 {
137         int ret;
138         struct wim_header hdr_save;
139         struct split_args args;
140         const tchar *swm_suffix;
141         size_t swm_name_len;
142         size_t swm_base_name_len;
143
144         if (!swm_name || part_size == 0)
145                 return WIMLIB_ERR_INVALID_PARAM;
146
147         if (w->hdr.total_parts != 1)
148                 return WIMLIB_ERR_SPLIT_UNSUPPORTED;
149
150         write_flags &= WIMLIB_WRITE_MASK_PUBLIC;
151
152         swm_name_len = tstrlen(swm_name);
153         tchar swm_base_name[swm_name_len + 20];
154
155         memcpy(&hdr_save, &w->hdr, sizeof(struct wim_header));
156         w->hdr.flags |= WIM_HDR_FLAG_SPANNED;
157         w->hdr.boot_idx = 0;
158         randomize_byte_array(w->hdr.guid, WIM_GID_LEN);
159         ret = begin_write(w, swm_name, write_flags);
160         if (ret != 0)
161                 goto out;
162
163         tmemcpy(swm_base_name, swm_name, swm_name_len + 1);
164
165         swm_suffix = tstrchr(swm_name, T('.'));
166         if (swm_suffix) {
167                 swm_base_name_len = swm_suffix - swm_name;
168         } else {
169                 swm_base_name_len = swm_name_len;
170                 swm_base_name[ARRAY_LEN(swm_base_name) - 1] = T('\0');
171                 swm_suffix = &swm_base_name[ARRAY_LEN(swm_base_name) - 1];
172         }
173
174         args.w                              = w;
175         args.swm_base_name                  = swm_base_name;
176         args.swm_base_name_len              = swm_base_name_len;
177         args.swm_suffix                     = swm_suffix;
178         INIT_LIST_HEAD(&args.lte_list);
179         args.cur_part_number                = 1;
180         args.write_flags                    = write_flags;
181         args.size_remaining                 = part_size;
182         args.part_size                      = part_size;
183         args.progress_func                  = progress_func;
184         args.progress.split.total_bytes     = lookup_table_total_stream_size(w->lookup_table);
185         args.progress.split.cur_part_number = 1;
186         args.progress.split.completed_bytes = 0;
187         args.progress.split.part_name       = swm_base_name;
188
189         if (progress_func) {
190                 progress_func(WIMLIB_PROGRESS_MSG_SPLIT_BEGIN_PART,
191                               &args.progress);
192         }
193
194         w->write_metadata = true;
195         for (int i = 0; i < w->hdr.image_count; i++) {
196                 struct wim_lookup_table_entry *metadata_lte;
197                 metadata_lte = w->image_metadata[i].metadata_lte;
198                 ret = copy_resource(metadata_lte, w);
199                 if (ret != 0)
200                         goto out;
201                 args.size_remaining -= metadata_lte->resource_entry.size;
202                 args.progress.split.completed_bytes += metadata_lte->resource_entry.size;
203                 list_add(&metadata_lte->staging_list, &args.lte_list);
204         }
205         w->write_metadata = false;
206
207         ret = for_lookup_table_entry(w->lookup_table,
208                                      copy_resource_to_swm, &args);
209         if (ret != 0)
210                 goto out;
211
212         ret = finish_swm(w, &args.lte_list, write_flags, progress_func);
213         if (ret != 0)
214                 goto out;
215
216         if (progress_func) {
217                 progress_func(WIMLIB_PROGRESS_MSG_SPLIT_END_PART,
218                               &args.progress);
219         }
220
221         /* The swms are all ready now, except the total_parts and part_number
222          * fields in their headers are wrong (since we don't know the total
223          * parts until they are all written).  Fix them. */
224         int total_parts = args.cur_part_number;
225         for (int i = 1; i <= total_parts; i++) {
226                 const tchar *part_name;
227                 if (i == 1) {
228                         part_name = swm_name;
229                 } else {
230                         tsprintf(swm_base_name + swm_base_name_len, T("%d%"TS),
231                                  i, swm_suffix);
232                         part_name = swm_base_name;
233                 }
234
235                 FILE *fp = tfopen(part_name, T("r+b"));
236                 if (!fp) {
237                         ERROR_WITH_ERRNO("Failed to open `%"TS"'", part_name);
238                         ret = WIMLIB_ERR_OPEN;
239                         goto out;
240                 }
241                 u8 buf[4];
242                 put_u16(&buf[0], i);
243                 put_u16(&buf[2], total_parts);
244
245                 if (fseek(fp, 40, SEEK_SET) != 0 ||
246                     fwrite(buf, 1, sizeof(buf), fp) != sizeof(buf) ||
247                     fclose(fp) != 0)
248                 {
249                         ERROR_WITH_ERRNO("Error overwriting header of `%"TS"'",
250                                          part_name);
251                         ret = WIMLIB_ERR_WRITE;
252                         break;
253                 }
254         }
255 out:
256         close_wim_writable(w);
257         memcpy(&w->hdr, &hdr_save, sizeof(struct wim_header));
258         return ret;
259 }