3 * Dumb program to extract files from a Bacula backup.
11 Copyright (C) 2000, 2001, 2002 Kern Sibbald and John Walker
13 This program is free software; you can redistribute it and/or
14 modify it under the terms of the GNU General Public License as
15 published by the Free Software Foundation; either version 2 of
16 the License, or (at your option) any later version.
18 This program is distributed in the hope that it will be useful,
19 but WITHOUT ANY WARRANTY; without even the implied warranty of
20 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
21 General Public License for more details.
23 You should have received a copy of the GNU General Public
24 License along with this program; if not, write to the Free
25 Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
32 #include "findlib/find.h"
41 static void do_extract(char *fname);
42 static void record_cb(JCR *jcr, DEVICE *dev, DEV_BLOCK *block, DEV_RECORD *rec);
44 static DEVICE *dev = NULL;
48 static FF_PKT *ff = &my_ff;
49 static BSR *bsr = NULL;
50 static int extract = FALSE;
51 static long record_file_index;
52 static long total = 0;
53 static POOLMEM *fname; /* original file name */
54 static POOLMEM *ofile; /* output name with prefix */
55 static POOLMEM *lname; /* link name */
56 static POOLMEM *attribsEx; /* extended attributes (Win32) */
58 static int wherelen; /* prefix length */
59 static uint32_t num_files = 0;
60 static struct stat statp;
61 static uint32_t compress_buf_size = 70000;
62 static POOLMEM *compress_buf;
65 static int prog_name_msg = 0;
66 static char *VolumeName = NULL;
68 static char *wbuf; /* write buffer address */
69 static uint32_t wsize; /* write size */
70 static uint64_t fileAddr = 0; /* file write address */
72 #define CONFIG_FILE "bacula-sd.conf"
79 "\nVersion: " VERSION " (" BDATE ")\n\n"
80 "Usage: bextract [-d debug_level] <bacula-archive> <directory-to-store-files>\n"
81 " -b <file> specify a bootstrap file\n"
82 " -c <file> specify a configuration file\n"
83 " -dnn set debug level to nn\n"
84 " -e <file> exclude list\n"
85 " -i <file> include list\n"
86 " -V specify Volume names (separated by |)\n"
87 " -? print this message\n\n");
92 int main (int argc, char *argv[])
99 working_directory = "/tmp";
100 my_name_is(argc, argv, "bextract");
101 init_msg(NULL, NULL); /* setup message handler */
103 memset(ff, 0, sizeof(FF_PKT));
104 init_include_exclude_files(ff);
106 while ((ch = getopt(argc, argv, "b:c:d:e:i:?")) != -1) {
108 case 'b': /* bootstrap file */
109 bsr = parse_bsr(NULL, optarg);
113 case 'c': /* specify config file */
114 if (configfile != NULL) {
117 configfile = bstrdup(optarg);
120 case 'd': /* debug level */
121 debug_level = atoi(optarg);
122 if (debug_level <= 0)
126 case 'e': /* exclude list */
127 if ((fd = fopen(optarg, "r")) == NULL) {
128 Pmsg2(0, "Could not open exclude file: %s, ERR=%s\n",
129 optarg, strerror(errno));
132 while (fgets(line, sizeof(line), fd) != NULL) {
133 strip_trailing_junk(line);
134 Dmsg1(900, "add_exclude %s\n", line);
135 add_fname_to_exclude_list(ff, line);
140 case 'i': /* include list */
141 if ((fd = fopen(optarg, "r")) == NULL) {
142 Pmsg2(0, "Could not open include file: %s, ERR=%s\n",
143 optarg, strerror(errno));
146 while (fgets(line, sizeof(line), fd) != NULL) {
147 strip_trailing_junk(line);
148 Dmsg1(900, "add_include %s\n", line);
149 add_fname_to_include_list(ff, 0, line);
155 case 'V': /* Volume name */
169 Pmsg0(0, "Wrong number of arguments: \n");
173 if (configfile == NULL) {
174 configfile = bstrdup(CONFIG_FILE);
177 parse_config(configfile);
179 if (!got_inc) { /* If no include file, */
180 add_fname_to_include_list(ff, 0, "/"); /* include everything */
192 static void do_extract(char *devname)
195 jcr = setup_jcr("bextract", devname, bsr, VolumeName);
196 dev = setup_to_access_device(jcr, 1); /* acquire for read */
201 /* Make sure where directory exists and that it is a directory */
202 if (stat(where, &statp) < 0) {
203 Emsg2(M_ERROR_TERM, 0, "Cannot stat %s. It must exist. ERR=%s\n",
204 where, strerror(errno));
206 if (!S_ISDIR(statp.st_mode)) {
207 Emsg1(M_ERROR_TERM, 0, "%s must be a directory.\n", where);
210 wherelen = strlen(where);
211 fname = get_pool_memory(PM_FNAME);
212 ofile = get_pool_memory(PM_FNAME);
213 lname = get_pool_memory(PM_FNAME);
214 attribsEx = get_pool_memory(PM_FNAME);
216 compress_buf = get_memory(compress_buf_size);
218 read_records(jcr, dev, record_cb, mount_next_read_volume);
219 /* If output file is still open, it was the last one in the
220 * archive since we just hit an end of file, so close the file.
223 set_attributes(jcr, fname, ofile, lname, type, stream, &statp,
226 release_device(jcr, dev);
228 free_pool_memory(fname);
229 free_pool_memory(ofile);
230 free_pool_memory(lname);
231 free_pool_memory(compress_buf);
234 printf("%u files restored.\n", num_files);
239 * Called here for each record from read_records()
241 static void record_cb(JCR *jcr, DEVICE *dev, DEV_BLOCK *block, DEV_RECORD *rec)
245 if (rec->FileIndex < 0) {
246 return; /* we don't want labels */
249 /* File Attributes stream */
250 if (rec->Stream == STREAM_UNIX_ATTRIBUTES || rec->Stream == STREAM_WIN32_ATTRIBUTES) {
251 char *ap, *lp, *fp, *apex;
253 stream = rec->Stream;
255 /* If extracting, it was from previous stream, so
256 * close the output file.
260 Emsg0(M_ERROR, 0, "Logic error output file should be open\n");
263 set_attributes(jcr, fname, ofile, lname, type, stream, &statp,
267 if (sizeof_pool_memory(fname) < rec->data_len) {
268 fname = realloc_pool_memory(fname, rec->data_len + 1);
270 if (sizeof_pool_memory(ofile) < rec->data_len + wherelen + 1) {
271 ofile = realloc_pool_memory(ofile, rec->data_len + wherelen + 1);
273 if (sizeof_pool_memory(lname) < rec->data_len) {
274 lname = realloc_pool_memory(lname, rec->data_len + wherelen + 1);
280 * An Attributes record consists of:
285 * Link name (if file linked i.e. FT_LNK)
286 * Extended Attributes (Win32)
289 sscanf(rec->data, "%ld %d", &record_file_index, &type);
290 if (record_file_index != rec->FileIndex)
291 Emsg2(M_ERROR_TERM, 0, "Record header file index %ld not equal record index %ld\n",
292 rec->FileIndex, record_file_index);
294 while (*ap++ != ' ') /* skip record file index */
296 while (*ap++ != ' ') /* skip type */
298 /* Save filename and position to attributes */
303 *fp = *ap++; /* terminate filename & point to attribs */
305 /* Skip to Link name */
306 if (type == FT_LNK || type == FT_LNKSAVED) {
315 if (rec->Stream == STREAM_WIN32_ATTRIBUTES) {
316 apex = ap; /* start at attributes */
317 while (*apex++ != 0) { /* skip attributes */
320 while (*apex++ != 0) { /* skip link name */
323 pm_strcpy(&attribsEx, apex); /* make a copy of Extended attributes */
325 *attribsEx = 0; /* no extended attributes */
329 if (file_is_included(ff, fname) && !file_is_excluded(ff, fname)) {
332 decode_stat(ap, &statp, &LinkFI);
334 * Prepend the where directory so that the
335 * files are put where the user wants.
337 * We do a little jig here to handle Win32 files with
338 * a drive letter -- we simply strip the drive: from
339 * every filename if a prefix is supplied.
342 strcpy(ofile, fname);
346 strcpy(ofile, where);
347 if (win32_client && fname[1] == ':') {
348 fn = fname+2; /* skip over drive: */
350 fn = fname; /* take whole name */
352 /* Ensure where is terminated with a slash */
353 if (where[wherelen-1] != '/' && fn[0] != '/') {
356 strcat(ofile, fn); /* copy rest of name */
357 /* Fixup link name */
358 if (type == FT_LNK || type == FT_LNKSAVED) {
359 if (lp[0] == '/') { /* if absolute path */
360 strcpy(lname, where);
362 if (win32_client && lp[1] == ':') {
363 strcat(lname, lp+2); /* copy rest of name */
365 strcat(lname, lp); /* On Unix systems we take everything */
370 /* Pmsg1(000, "Restoring: %s\n", ofile); */
373 stat = create_file(jcr, fname, ofile, lname, type, stream,
374 &statp, attribsEx, &ofd, REPLACE_ALWAYS);
381 /* Fall-through wanted */
383 print_ls_output(ofile, lname, type, &statp);
390 /* Data stream and extracting */
391 } else if (rec->Stream == STREAM_FILE_DATA || rec->Stream == STREAM_SPARSE_DATA) {
393 if (rec->Stream == STREAM_SPARSE_DATA) {
396 wbuf = rec->data + SPARSE_FADDR_SIZE;
397 wsize = rec->data_len - SPARSE_FADDR_SIZE;
398 ser_begin(rec->data, SPARSE_FADDR_SIZE);
400 if (fileAddr != faddr) {
402 if (lseek(ofd, (off_t)fileAddr, SEEK_SET) < 0) {
403 Emsg2(M_ERROR_TERM, 0, _("Seek error on %s: %s\n"), ofile, strerror(errno));
408 wsize = rec->data_len;
411 Dmsg2(8, "Write %u bytes, total=%u\n", wsize, total);
412 if ((uint32_t)write(ofd, wbuf, wsize) != wsize) {
413 Emsg2(M_ERROR_TERM, 0, _("Write error on %s: %s\n"), ofile, strerror(errno));
418 } else if (rec->Stream == STREAM_GZIP_DATA || rec->Stream == STREAM_SPARSE_GZIP_DATA) {
424 if (rec->Stream == STREAM_SPARSE_GZIP_DATA) {
427 wbuf = rec->data + SPARSE_FADDR_SIZE;
428 wsize = rec->data_len - SPARSE_FADDR_SIZE;
429 ser_begin(rec->data, SPARSE_FADDR_SIZE);
431 if (fileAddr != faddr) {
433 if (lseek(ofd, (off_t)fileAddr, SEEK_SET) < 0) {
434 Emsg2(M_ERROR, 0, _("Seek error on %s: %s\n"), ofile, strerror(errno));
439 wsize = rec->data_len;
441 compress_len = compress_buf_size;
442 if ((stat=uncompress((Bytef *)compress_buf, &compress_len,
443 (const Bytef *)wbuf, (uLong)wsize) != Z_OK)) {
444 Emsg1(M_ERROR_TERM, 0, _("Uncompression error. ERR=%d\n"), stat);
447 Dmsg2(100, "Write uncompressed %d bytes, total before write=%d\n", compress_len, total);
448 if ((uLongf)write(ofd, compress_buf, (size_t)compress_len) != compress_len) {
449 Pmsg0(0, "===Write error===\n");
450 Emsg2(M_ERROR_TERM, 0, _("Write error on %s: %s\n"), ofile, strerror(errno));
452 total += compress_len;
453 fileAddr += compress_len;
454 Dmsg2(100, "Compress len=%d uncompressed=%d\n", rec->data_len,
459 Emsg0(M_ERROR, 0, "GZIP data stream found, but GZIP not configured!\n");
464 /* If extracting, wierd stream (not 1 or 2), close output file anyway */
465 } else if (extract) {
467 Emsg0(M_ERROR, 0, "Logic error output file should be open\n");
470 set_attributes(jcr, fname, ofile, lname, type, stream, &statp,
472 } else if (rec->Stream == STREAM_PROGRAM_NAMES || rec->Stream == STREAM_PROGRAM_DATA) {
473 if (!prog_name_msg) {
474 Pmsg0(000, "Got Program Name or Data Stream. Ignored.\n");
477 } else if (!(rec->Stream == STREAM_MD5_SIGNATURE ||
478 rec->Stream == STREAM_SHA1_SIGNATURE)) {
479 Pmsg2(0, "None of above!!! stream=%d data=%s\n", rec->Stream, rec->data);
486 /* Dummies to replace askdir.c */
487 int dir_get_volume_info(JCR *jcr, int writing) { return 1;}
488 int dir_find_next_appendable_volume(JCR *jcr) { return 1;}
489 int dir_update_volume_info(JCR *jcr, VOLUME_CAT_INFO *vol, int relabel) { return 1; }
490 int dir_create_jobmedia_record(JCR *jcr) { return 1; }
491 int dir_ask_sysop_to_mount_next_volume(JCR *jcr, DEVICE *dev) { return 1; }
492 int dir_update_file_attributes(JCR *jcr, DEV_RECORD *rec) { return 1;}
493 int dir_send_job_status(JCR *jcr) {return 1;}
496 int dir_ask_sysop_to_mount_volume(JCR *jcr, DEVICE *dev)
498 fprintf(stderr, "Mount Volume %s on device %s and press return when ready: ",
499 jcr->VolumeName, dev_name(dev));