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;
67 static char *wbuf; /* write buffer address */
68 static uint32_t wsize; /* write size */
69 static uint64_t fileAddr = 0; /* file write address */
71 #define CONFIG_FILE "bacula-sd.conf"
78 "\nVersion: " VERSION " (" DATE ")\n\n"
79 "Usage: bextract [-d debug_level] <bacula-archive> <directory-to-store-files>\n"
80 " -b <file> specify a bootstrap file\n"
81 " -c <file> specify a configuration file\n"
82 " -dnn set debug level to nn\n"
83 " -e <file> exclude list\n"
84 " -i <file> include list\n"
85 " -? print this message\n\n");
90 int main (int argc, char *argv[])
97 working_directory = "/tmp";
98 my_name_is(argc, argv, "bextract");
99 init_msg(NULL, NULL); /* setup message handler */
101 memset(ff, 0, sizeof(FF_PKT));
102 init_include_exclude_files(ff);
104 while ((ch = getopt(argc, argv, "b:c:d:e:i:?")) != -1) {
106 case 'b': /* bootstrap file */
107 bsr = parse_bsr(NULL, optarg);
111 case 'c': /* specify config file */
112 if (configfile != NULL) {
115 configfile = bstrdup(optarg);
118 case 'd': /* debug level */
119 debug_level = atoi(optarg);
120 if (debug_level <= 0)
124 case 'e': /* exclude list */
125 if ((fd = fopen(optarg, "r")) == NULL) {
126 Pmsg2(0, "Could not open exclude file: %s, ERR=%s\n",
127 optarg, strerror(errno));
130 while (fgets(line, sizeof(line), fd) != NULL) {
131 strip_trailing_junk(line);
132 Dmsg1(900, "add_exclude %s\n", line);
133 add_fname_to_exclude_list(ff, line);
138 case 'i': /* include list */
139 if ((fd = fopen(optarg, "r")) == NULL) {
140 Pmsg2(0, "Could not open include file: %s, ERR=%s\n",
141 optarg, strerror(errno));
144 while (fgets(line, sizeof(line), fd) != NULL) {
145 strip_trailing_junk(line);
146 Dmsg1(900, "add_include %s\n", line);
147 add_fname_to_include_list(ff, 0, line);
163 Pmsg0(0, "Wrong number of arguments: \n");
167 if (configfile == NULL) {
168 configfile = bstrdup(CONFIG_FILE);
171 parse_config(configfile);
173 if (!got_inc) { /* If no include file, */
174 add_fname_to_include_list(ff, 0, "/"); /* include everything */
186 static void do_extract(char *devname)
189 jcr = setup_jcr("bextract", devname, bsr);
190 dev = setup_to_access_device(jcr, 1); /* acquire for read */
195 /* Make sure where directory exists and that it is a directory */
196 if (stat(where, &statp) < 0) {
197 Emsg2(M_ERROR_TERM, 0, "Cannot stat %s. It must exist. ERR=%s\n",
198 where, strerror(errno));
200 if (!S_ISDIR(statp.st_mode)) {
201 Emsg1(M_ERROR_TERM, 0, "%s must be a directory.\n", where);
204 wherelen = strlen(where);
205 fname = get_pool_memory(PM_FNAME);
206 ofile = get_pool_memory(PM_FNAME);
207 lname = get_pool_memory(PM_FNAME);
208 attribsEx = get_pool_memory(PM_FNAME);
210 compress_buf = get_memory(compress_buf_size);
212 read_records(jcr, dev, record_cb, mount_next_read_volume);
213 /* If output file is still open, it was the last one in the
214 * archive since we just hit an end of file, so close the file.
217 set_attributes(jcr, fname, ofile, lname, type, stream, &statp,
220 release_device(jcr, dev);
222 free_pool_memory(fname);
223 free_pool_memory(ofile);
224 free_pool_memory(lname);
225 free_pool_memory(compress_buf);
228 printf("%u files restored.\n", num_files);
233 * Called here for each record from read_records()
235 static void record_cb(JCR *jcr, DEVICE *dev, DEV_BLOCK *block, DEV_RECORD *rec)
239 if (rec->FileIndex < 0) {
240 return; /* we don't want labels */
243 /* File Attributes stream */
244 if (rec->Stream == STREAM_UNIX_ATTRIBUTES || rec->Stream == STREAM_WIN32_ATTRIBUTES) {
245 char *ap, *lp, *fp, *apex;
247 stream = rec->Stream;
249 /* If extracting, it was from previous stream, so
250 * close the output file.
254 Emsg0(M_ERROR, 0, "Logic error output file should be open\n");
257 set_attributes(jcr, fname, ofile, lname, type, stream, &statp,
261 if (sizeof_pool_memory(fname) < rec->data_len) {
262 fname = realloc_pool_memory(fname, rec->data_len + 1);
264 if (sizeof_pool_memory(ofile) < rec->data_len + wherelen + 1) {
265 ofile = realloc_pool_memory(ofile, rec->data_len + wherelen + 1);
267 if (sizeof_pool_memory(lname) < rec->data_len) {
268 lname = realloc_pool_memory(lname, rec->data_len + wherelen + 1);
274 * An Attributes record consists of:
279 * Link name (if file linked i.e. FT_LNK)
280 * Extended Attributes (Win32)
283 sscanf(rec->data, "%ld %d", &record_file_index, &type);
284 if (record_file_index != rec->FileIndex)
285 Emsg2(M_ERROR_TERM, 0, "Record header file index %ld not equal record index %ld\n",
286 rec->FileIndex, record_file_index);
288 while (*ap++ != ' ') /* skip record file index */
290 while (*ap++ != ' ') /* skip type */
292 /* Save filename and position to attributes */
297 *fp = *ap++; /* terminate filename & point to attribs */
299 /* Skip to Link name */
300 if (type == FT_LNK || type == FT_LNKSAVED) {
309 if (rec->Stream == STREAM_WIN32_ATTRIBUTES) {
310 apex = ap; /* start at attributes */
311 while (*apex++ != 0) { /* skip attributes */
314 while (*apex++ != 0) { /* skip link name */
317 pm_strcpy(&attribsEx, apex); /* make a copy of Extended attributes */
319 *attribsEx = 0; /* no extended attributes */
323 if (file_is_included(ff, fname) && !file_is_excluded(ff, fname)) {
325 decode_stat(ap, &statp);
327 * Prepend the where directory so that the
328 * files are put where the user wants.
330 * We do a little jig here to handle Win32 files with
331 * a drive letter -- we simply strip the drive: from
332 * every filename if a prefix is supplied.
335 strcpy(ofile, fname);
339 strcpy(ofile, where);
340 if (win32_client && fname[1] == ':') {
341 fn = fname+2; /* skip over drive: */
343 fn = fname; /* take whole name */
345 /* Ensure where is terminated with a slash */
346 if (where[wherelen-1] != '/' && fn[0] != '/') {
349 strcat(ofile, fn); /* copy rest of name */
350 /* Fixup link name */
351 if (type == FT_LNK || type == FT_LNKSAVED) {
352 if (lp[0] == '/') { /* if absolute path */
353 strcpy(lname, where);
355 if (win32_client && lp[1] == ':') {
356 strcat(lname, lp+2); /* copy rest of name */
358 strcat(lname, lp); /* On Unix systems we take everything */
363 /* Pmsg1(000, "Restoring: %s\n", ofile); */
366 stat = create_file(jcr, fname, ofile, lname, type, stream,
367 &statp, attribsEx, &ofd, REPLACE_ALWAYS);
374 /* Fall-through wanted */
376 print_ls_output(ofile, lname, type, &statp);
383 /* Data stream and extracting */
384 } else if (rec->Stream == STREAM_FILE_DATA || rec->Stream == STREAM_SPARSE_DATA) {
386 if (rec->Stream == STREAM_SPARSE_DATA) {
389 wbuf = rec->data + SPARSE_FADDR_SIZE;
390 wsize = rec->data_len - SPARSE_FADDR_SIZE;
391 ser_begin(rec->data, SPARSE_FADDR_SIZE);
393 if (fileAddr != faddr) {
395 if (lseek(ofd, (off_t)fileAddr, SEEK_SET) < 0) {
396 Emsg2(M_ERROR_TERM, 0, _("Seek error on %s: %s\n"), ofile, strerror(errno));
401 wsize = rec->data_len;
404 Dmsg2(8, "Write %u bytes, total=%u\n", wsize, total);
405 if ((uint32_t)write(ofd, wbuf, wsize) != wsize) {
406 Emsg2(M_ERROR_TERM, 0, _("Write error on %s: %s\n"), ofile, strerror(errno));
411 } else if (rec->Stream == STREAM_GZIP_DATA || rec->Stream == STREAM_SPARSE_GZIP_DATA) {
417 if (rec->Stream == STREAM_SPARSE_GZIP_DATA) {
420 wbuf = rec->data + SPARSE_FADDR_SIZE;
421 wsize = rec->data_len - SPARSE_FADDR_SIZE;
422 ser_begin(rec->data, SPARSE_FADDR_SIZE);
424 if (fileAddr != faddr) {
426 if (lseek(ofd, (off_t)fileAddr, SEEK_SET) < 0) {
427 Emsg2(M_ERROR, 0, _("Seek error on %s: %s\n"), ofile, strerror(errno));
432 wsize = rec->data_len;
434 compress_len = compress_buf_size;
435 if ((stat=uncompress((Bytef *)compress_buf, &compress_len,
436 (const Bytef *)wbuf, (uLong)wsize) != Z_OK)) {
437 Emsg1(M_ERROR_TERM, 0, _("Uncompression error. ERR=%d\n"), stat);
440 Dmsg2(100, "Write uncompressed %d bytes, total before write=%d\n", compress_len, total);
441 if ((uLongf)write(ofd, compress_buf, (size_t)compress_len) != compress_len) {
442 Pmsg0(0, "===Write error===\n");
443 Emsg2(M_ERROR_TERM, 0, _("Write error on %s: %s\n"), ofile, strerror(errno));
445 total += compress_len;
446 fileAddr += compress_len;
447 Dmsg2(100, "Compress len=%d uncompressed=%d\n", rec->data_len,
452 Emsg0(M_ERROR, 0, "GZIP data stream found, but GZIP not configured!\n");
457 /* If extracting, wierd stream (not 1 or 2), close output file anyway */
458 } else if (extract) {
460 Emsg0(M_ERROR, 0, "Logic error output file should be open\n");
463 set_attributes(jcr, fname, ofile, lname, type, stream, &statp,
465 } else if (rec->Stream == STREAM_PROGRAM_NAMES || rec->Stream == STREAM_PROGRAM_DATA) {
466 if (!prog_name_msg) {
467 Pmsg0(000, "Got Program Name or Data Stream. Ignored.\n");
470 } else if (rec->Stream != STREAM_MD5_SIGNATURE) {
471 Pmsg2(0, "None of above!!! stream=%d data=%s\n", rec->Stream, rec->data);
478 /* Dummies to replace askdir.c */
479 int dir_get_volume_info(JCR *jcr, int writing) { return 1;}
480 int dir_find_next_appendable_volume(JCR *jcr) { return 1;}
481 int dir_update_volume_info(JCR *jcr, VOLUME_CAT_INFO *vol, int relabel) { return 1; }
482 int dir_create_jobmedia_record(JCR *jcr) { return 1; }
483 int dir_ask_sysop_to_mount_next_volume(JCR *jcr, DEVICE *dev) { return 1; }
484 int dir_update_file_attributes(JCR *jcr, DEV_RECORD *rec) { return 1;}
485 int dir_send_job_status(JCR *jcr) {return 1;}
488 int dir_ask_sysop_to_mount_volume(JCR *jcr, DEVICE *dev)
490 fprintf(stderr, "Mount Volume %s on device %s and press return when ready: ",
491 jcr->VolumeName, dev_name(dev));