Line data Source code
1 : #include "../../burp.h"
2 : #include "../../alloc.h"
3 : #include "../../asfd.h"
4 : #include "../../async.h"
5 : #include "../../bu.h"
6 : #include "../../cmd.h"
7 : #include "../../cntr.h"
8 : #include "../../handy.h"
9 : #include "../../hexmap.h"
10 : #include "../../log.h"
11 : #include "../../prepend.h"
12 : #include "../../protocol1/handy.h"
13 : #include "../../server/protocol1/backup_phase4.h"
14 : #include "../../server/protocol1/link.h"
15 : #include "../../server/protocol1/zlibio.h"
16 : #include "../../server/protocol2/restore.h"
17 : #include "../../sbuf.h"
18 : #include "../../slist.h"
19 : #include "../sdirs.h"
20 : #include "dpth.h"
21 : #include "restore.h"
22 :
23 : #include <librsync.h>
24 :
25 0 : static int create_zero_length_file(const char *path)
26 : {
27 0 : int ret=0;
28 : struct fzp *dest;
29 0 : if(!(dest=fzp_open(path, "wb")))
30 0 : ret=-1;
31 0 : ret|=fzp_close(&dest);
32 0 : return ret;
33 : }
34 :
35 0 : static int inflate_or_link_oldfile(struct asfd *asfd, const char *oldpath,
36 : const char *infpath, struct conf **cconfs, int compression)
37 : {
38 0 : int ret=0;
39 : struct stat statp;
40 :
41 0 : if(lstat(oldpath, &statp))
42 : {
43 0 : logp("could not lstat %s\n", oldpath);
44 0 : return -1;
45 : }
46 :
47 0 : if(dpth_protocol1_is_compressed(compression, oldpath))
48 : {
49 : //logp("inflating...\n");
50 :
51 0 : if(!statp.st_size)
52 : {
53 : // Empty file - cannot inflate.
54 0 : logp("asked to inflate zero length file: %s\n",
55 : oldpath);
56 0 : return create_zero_length_file(infpath);
57 : }
58 :
59 0 : if((ret=zlib_inflate(asfd, oldpath, infpath, get_cntr(cconfs))))
60 0 : logp("zlib_inflate returned: %d\n", ret);
61 : }
62 : else
63 : {
64 : // Not compressed - just hard link it.
65 0 : if(do_link(oldpath, infpath, &statp, cconfs,
66 : 1 /* allow overwrite of infpath */))
67 : return -1;
68 : }
69 0 : return ret;
70 : }
71 :
72 4 : static int burp_send_file(struct asfd *asfd, struct sbuf *sb,
73 : int patches, const char *best, struct cntr *cntr)
74 : {
75 4 : enum send_e ret=SEND_FATAL;
76 : struct BFILE bfd;
77 4 : uint64_t bytes=0; // Unused.
78 :
79 4 : bfile_init(&bfd, 0, cntr);
80 4 : if(bfd.open_for_send(&bfd, asfd, best, sb->winattr,
81 : 1 /* no O_NOATIME */, cntr, PROTO_1))
82 : return SEND_FATAL;
83 4 : if(asfd->write(asfd, &sb->path))
84 : ret=SEND_FATAL;
85 4 : else if(patches)
86 : {
87 : // If we did some patches, the resulting file
88 : // is not gzipped. Gzip it during the send.
89 0 : ret=send_whole_file_gzl(
90 : asfd,
91 0 : sb->protocol1->datapth.buf,
92 : /*quick_read*/1,
93 : &bytes,
94 : /*encpassword*/NULL,
95 : cntr,
96 : /*compression*/9,
97 : &bfd,
98 : /*extrameta*/NULL,
99 : /*elen*/0,
100 : /*key_deriv*/ENCRYPTION_UNSET,
101 : /*salt*/0
102 : );
103 : }
104 : else
105 : {
106 : // If it was encrypted, it may or may not have been compressed
107 : // before encryption. Send it as it as, and let the client
108 : // sort it out.
109 4 : if(sbuf_is_encrypted(sb))
110 : {
111 2 : ret=send_whole_filel(asfd,
112 : #ifdef HAVE_WIN32
113 : sb->path.cmd
114 : #endif
115 2 : sb->protocol1->datapth.buf,
116 : 1, &bytes, cntr, &bfd, NULL, 0);
117 : }
118 : // It might have been stored uncompressed. Gzip it during
119 : // the send. If the client knew what kind of file it would be
120 : // receiving, this step could disappear.
121 2 : else if(!dpth_protocol1_is_compressed(sb->compression,
122 2 : sb->protocol1->datapth.buf))
123 : {
124 2 : ret=send_whole_file_gzl(
125 : asfd,
126 2 : sb->protocol1->datapth.buf,
127 : /*quick_read*/1,
128 : &bytes,
129 : /*encpassword*/NULL,
130 : cntr,
131 : /*compression*/9,
132 : &bfd,
133 : /*extrameta*/NULL,
134 : /*elen*/0,
135 : /*key_deriv*/ENCRYPTION_UNSET,
136 : /*salt*/0
137 : );
138 : }
139 : else
140 : {
141 : // If we did not do some patches, the resulting
142 : // file might already be gzipped. Send it as it is.
143 0 : ret=send_whole_filel(asfd,
144 : #ifdef HAVE_WIN32
145 : sb->path.cmd
146 : #endif
147 0 : sb->protocol1->datapth.buf,
148 : 1, &bytes, cntr, &bfd, NULL, 0);
149 : }
150 : }
151 4 : bfd.close(&bfd, asfd);
152 :
153 4 : switch(ret)
154 : {
155 : case SEND_OK:
156 : case SEND_ERROR: // Carry on.
157 : return 0;
158 : case SEND_FATAL:
159 : default:
160 0 : return -1;
161 : }
162 : }
163 :
164 : #ifndef UTEST
165 : static
166 : #endif
167 5 : int verify_file(struct asfd *asfd, struct sbuf *sb,
168 : int patches, const char *best, struct cntr *cntr)
169 : {
170 : MD5_CTX md5;
171 5 : int b=0;
172 5 : const char *cp=NULL;
173 5 : const char *newsum=NULL;
174 : uint8_t in[ZCHUNK];
175 : uint8_t checksum[MD5_DIGEST_LENGTH];
176 5 : uint64_t cbytes=0;
177 5 : struct fzp *fzp=NULL;
178 :
179 5 : if(!sb->endfile.buf
180 5 : || !(cp=strrchr(sb->endfile.buf, ':')))
181 : {
182 1 : logw(asfd, cntr,
183 1 : "%s has no md5sum!\n", sb->protocol1->datapth.buf);
184 1 : return 0;
185 : }
186 4 : cp++;
187 4 : if(!MD5_Init(&md5))
188 : {
189 0 : logp("MD5_Init() failed\n");
190 0 : return -1;
191 : }
192 4 : if(patches
193 4 : || sb->path.cmd==CMD_ENC_FILE
194 4 : || sb->path.cmd==CMD_ENC_METADATA
195 4 : || sb->path.cmd==CMD_EFS_FILE
196 4 : || sb->path.cmd==CMD_ENC_VSS
197 4 : || (!patches && !dpth_protocol1_is_compressed(sb->compression, best)))
198 2 : fzp=fzp_open(best, "rb");
199 : else
200 2 : fzp=fzp_gzopen(best, "rb");
201 :
202 4 : if(!fzp)
203 : {
204 1 : logw(asfd, cntr, "could not open %s\n", best);
205 1 : return 0;
206 : }
207 5 : while((b=fzp_read(fzp, in, ZCHUNK))>0)
208 : {
209 2 : cbytes+=b;
210 2 : if(!MD5_Update(&md5, in, b))
211 : {
212 0 : logp("MD5_Update() failed\n");
213 0 : fzp_close(&fzp);
214 0 : return -1;
215 : }
216 : }
217 3 : if(!fzp_eof(fzp))
218 : {
219 1 : logw(asfd, cntr, "error while reading %s\n", best);
220 1 : fzp_close(&fzp);
221 1 : return 0;
222 : }
223 2 : fzp_close(&fzp);
224 2 : if(!MD5_Final(checksum, &md5))
225 : {
226 0 : logp("MD5_Final() failed\n");
227 0 : return -1;
228 : }
229 2 : newsum=bytes_to_md5str(checksum);
230 :
231 2 : if(strcmp(newsum, cp))
232 : {
233 1 : logp("%s %s\n", newsum, cp);
234 1 : logw(asfd, cntr, "md5sum for '%s (%s)' did not match!\n",
235 1 : sb->path.buf, sb->protocol1->datapth.buf);
236 1 : logp("md5sum for '%s (%s)' did not match!\n",
237 1 : sb->path.buf, sb->protocol1->datapth.buf);
238 1 : return 0;
239 : }
240 :
241 : // Just send the file name to the client, so that it can show cntr.
242 1 : if(asfd->write(asfd, &sb->path)) return -1;
243 1 : return 0;
244 : }
245 :
246 4 : static int process_data_dir_file(struct asfd *asfd,
247 : struct bu *bu, struct bu *b, const char *path,
248 : struct sbuf *sb, enum action act, struct sdirs *sdirs,
249 : struct conf **cconfs)
250 : {
251 4 : int ret=-1;
252 4 : int patches=0;
253 4 : char *dpath=NULL;
254 : struct stat dstatp;
255 4 : const char *tmp=NULL;
256 4 : const char *best=NULL;
257 : static char *tmppath1=NULL;
258 : static char *tmppath2=NULL;
259 4 : struct cntr *cntr=NULL;
260 4 : if(cconfs) cntr=get_cntr(cconfs);
261 :
262 4 : if((!tmppath1 && !(tmppath1=prepend_s(bu->path, "tmp1")))
263 4 : || (!tmppath2 && !(tmppath2=prepend_s(bu->path, "tmp2"))))
264 : goto end;
265 :
266 4 : best=path;
267 4 : tmp=tmppath1;
268 : // Now go down the list, applying any deltas.
269 4 : for(b=b->prev; b && b->next!=bu; b=b->prev)
270 : {
271 0 : free_w(&dpath);
272 0 : if(!(dpath=prepend_s(b->delta, sb->protocol1->datapth.buf)))
273 : goto end;
274 :
275 0 : if(lstat(dpath, &dstatp) || !S_ISREG(dstatp.st_mode))
276 0 : continue;
277 :
278 0 : if(!patches)
279 : {
280 : // Need to gunzip the first one.
281 0 : if(inflate_or_link_oldfile(asfd, best, tmp,
282 : cconfs, sb->compression))
283 : {
284 0 : logw(asfd, cntr,
285 : "problem when inflating %s\n", best);
286 0 : ret=0;
287 : goto end;
288 : }
289 0 : best=tmp;
290 0 : if(tmp==tmppath1) tmp=tmppath2;
291 : else tmp=tmppath1;
292 : }
293 :
294 0 : if(do_patch(best, dpath, tmp,
295 : 0 /* do not gzip the result */,
296 : sb->compression /* from the manifest */))
297 : {
298 0 : logw(asfd, cntr, "problem when patching %s with %s\n", path, b->timestamp);
299 0 : ret=0;
300 : goto end;
301 : }
302 :
303 0 : best=tmp;
304 0 : if(tmp==tmppath1) tmp=tmppath2;
305 : else tmp=tmppath1;
306 0 : unlink(tmp);
307 0 : patches++;
308 : }
309 :
310 4 : switch(act)
311 : {
312 : case ACTION_RESTORE:
313 4 : if(burp_send_file(asfd, sb, patches, best, cntr))
314 : goto end;
315 : break;
316 : case ACTION_VERIFY:
317 0 : if(verify_file(asfd, sb, patches, best, cntr))
318 : goto end;
319 : break;
320 : default:
321 0 : logp("Unknown action: %d\n", act);
322 : goto end;
323 : }
324 4 : cntr_add(cntr, sb->path.cmd, 0);
325 4 : cntr_add_bytes(cntr, strtoull(sb->endfile.buf, NULL, 10));
326 :
327 4 : ret=0;
328 : end:
329 4 : free_w(&dpath);
330 4 : if(tmppath1) unlink(tmppath1);
331 4 : if(tmppath2) unlink(tmppath2);
332 4 : free_w(&tmppath1);
333 4 : free_w(&tmppath2);
334 4 : return ret;
335 : }
336 :
337 : // a = length of struct bu array
338 : // i = position to restore from
339 : #ifndef UTEST
340 : static
341 : #endif
342 5 : int restore_file(struct asfd *asfd, struct bu *bu,
343 : struct sbuf *sb, enum action act,
344 : struct sdirs *sdirs, struct conf **cconfs)
345 : {
346 5 : int ret=-1;
347 5 : char *path=NULL;
348 : struct bu *b;
349 5 : struct bu *hlwarn=NULL;
350 : struct stat statp;
351 5 : struct cntr *cntr=NULL;
352 5 : if(cconfs) cntr=get_cntr(cconfs);
353 :
354 : // Go up the array until we find the file in the data directory.
355 10 : for(b=bu; b; b=b->next)
356 : {
357 4 : free_w(&path);
358 4 : if(!(path=prepend_s(b->data, sb->protocol1->datapth.buf)))
359 : goto end;
360 :
361 8 : if(lstat(path, &statp) || !S_ISREG(statp.st_mode))
362 0 : continue;
363 :
364 4 : if(b!=bu && (bu->flags & BU_HARDLINKED)) hlwarn=b;
365 :
366 4 : if(process_data_dir_file(asfd, bu, b,
367 : path, sb, act, sdirs, cconfs))
368 : goto end;
369 :
370 : // This warning must be done after everything else,
371 : // Because the client does not expect another cmd after
372 : // the warning.
373 4 : if(hlwarn) logw(asfd, cntr, "restore found %s in %s\n",
374 : sb->path.buf, hlwarn->basename);
375 : ret=0; // All OK.
376 : break;
377 : }
378 :
379 5 : if(!b)
380 : {
381 1 : logw(asfd, cntr, "restore could not find %s (%s)\n",
382 1 : sb->path.buf, sb->protocol1->datapth.buf);
383 1 : ret=0; // Carry on to subsequent files.
384 : }
385 : end:
386 5 : free_w(&path);
387 5 : return ret;
388 : }
389 :
390 10 : int restore_sbuf_protocol1(struct asfd *asfd, struct sbuf *sb, struct bu *bu,
391 : enum action act, struct sdirs *sdirs, struct conf **cconfs)
392 : {
393 10 : if((sb->protocol1->datapth.buf
394 4 : && asfd->write(asfd, &(sb->protocol1->datapth)))
395 10 : || asfd->write(asfd, &sb->attr))
396 : return -1;
397 10 : else if(sbuf_is_filedata(sb)
398 6 : || sbuf_is_vssdata(sb))
399 : {
400 4 : if(!sb->protocol1->datapth.buf)
401 : {
402 0 : logw(asfd, get_cntr(cconfs),
403 : "Got filedata entry with no datapth: %s\n",
404 : iobuf_to_printable(&sb->path));
405 0 : return 0;
406 : }
407 4 : return restore_file(asfd, bu, sb, act, sdirs, cconfs);
408 : }
409 : else
410 : {
411 6 : if(asfd->write(asfd, &sb->path))
412 : return -1;
413 : // If it is a link, send what
414 : // it points to.
415 6 : else if(sbuf_is_link(sb)
416 4 : && asfd->write(asfd, &sb->link)) return -1;
417 6 : cntr_add(get_cntr(cconfs), sb->path.cmd, 0);
418 : }
419 6 : return 0;
420 : }
|