3 * Dumb program to do an "ls" of a Bacula 1.0 mortal file.
8 Copyright (C) 2000-2004 Kern Sibbald and John Walker
10 This program is free software; you can redistribute it and/or
11 modify it under the terms of the GNU General Public License as
12 published by the Free Software Foundation; either version 2 of
13 the License, or (at your option) any later version.
15 This program is distributed in the hope that it will be useful,
16 but WITHOUT ANY WARRANTY; without even the implied warranty of
17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18 General Public License for more details.
20 You should have received a copy of the GNU General Public
21 License along with this program; if not, write to the Free
22 Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
29 #include "findlib/find.h"
38 static void do_blocks(char *infname);
39 static void do_jobs(char *infname);
40 static void do_ls(char *fname);
41 static void do_close(JCR *jcr);
42 static void get_session_record(DEVICE *dev, DEV_RECORD *rec, SESSION_LABEL *sessrec);
43 static int record_cb(JCR *jcr, DEVICE *dev, DEV_BLOCK *block, DEV_RECORD *rec);
46 static int dump_label = FALSE;
47 static int list_blocks = FALSE;
48 static int list_jobs = FALSE;
49 static DEV_RECORD *rec;
50 static DEV_BLOCK *block;
52 static SESSION_LABEL sessrec;
53 static uint32_t num_files = 0;
56 #define CONFIG_FILE "bacula-sd.conf"
62 static BSR *bsr = NULL;
67 "\nVersion: " VERSION " (" BDATE ")\n\n"
68 "Usage: bls [-d debug_level] <physical-device-name>\n"
69 " -b <file> specify a bootstrap file\n"
70 " -c <file> specify a config file\n"
71 " -d <level> specify debug level\n"
72 " -e <file> exclude list\n"
73 " -i <file> include list\n"
76 " (none of above) list saved files\n"
78 " -V specify Volume names (separated by |)\n"
79 " -? print this message\n\n");
84 int main (int argc, char *argv[])
89 char *VolumeName= NULL;
92 working_directory = "/tmp";
93 my_name_is(argc, argv, "bls");
94 init_msg(NULL, NULL); /* initialize message handler */
96 memset(&ff, 0, sizeof(ff));
97 init_include_exclude_files(&ff);
99 while ((ch = getopt(argc, argv, "b:c:d:e:i:jkLtvV:?")) != -1) {
105 case 'c': /* specify config file */
106 if (configfile != NULL) {
109 configfile = bstrdup(optarg);
112 case 'd': /* debug level */
113 debug_level = atoi(optarg);
114 if (debug_level <= 0)
118 case 'e': /* exclude list */
119 if ((fd = fopen(optarg, "r")) == NULL) {
120 Pmsg2(0, _("Could not open exclude file: %s, ERR=%s\n"),
121 optarg, strerror(errno));
124 while (fgets(line, sizeof(line), fd) != NULL) {
125 strip_trailing_junk(line);
126 Dmsg1(100, "add_exclude %s\n", line);
127 add_fname_to_exclude_list(&ff, line);
132 case 'i': /* include list */
133 if ((fd = fopen(optarg, "r")) == NULL) {
134 Pmsg2(0, "Could not open include file: %s, ERR=%s\n",
135 optarg, strerror(errno));
138 while (fgets(line, sizeof(line), fd) != NULL) {
139 strip_trailing_junk(line);
140 Dmsg1(100, "add_include %s\n", line);
141 add_fname_to_include_list(&ff, 0, line);
162 case 'V': /* Volume name */
176 Pmsg0(0, _("No archive name specified\n"));
180 if (configfile == NULL) {
181 configfile = bstrdup(CONFIG_FILE);
184 parse_config(configfile);
186 if (ff.included_files_list == NULL) {
187 add_fname_to_include_list(&ff, 0, "/");
190 for (i=0; i < argc; i++) {
192 bsr = parse_bsr(NULL, bsrName);
194 jcr = setup_jcr("bls", argv[i], bsr, VolumeName);
195 dev = setup_to_access_device(jcr, 1); /* acquire for read */
200 block = new_block(dev);
203 * Assume that we have already read the volume label.
204 * If on second or subsequent volume, adjust buffer pointer
206 if (dev->VolHdr.PrevVolName[0] != 0) { /* second volume */
208 Warning, this Volume is a continuation of Volume %s\n",
209 dev->VolHdr.PrevVolName);
214 } else if (list_jobs) {
228 static void do_close(JCR *jcr)
230 release_device(jcr, dev);
239 /* List just block information */
240 static void do_blocks(char *infname)
243 dump_volume_label(dev);
247 if (!read_block_from_device(jcr, dev, block, NO_BLOCK_NUMBER_CHECK)) {
248 Dmsg1(100, "!read_block(): ERR=%s\n", strerror_dev(dev));
249 if (dev->state & ST_EOT) {
250 if (!mount_next_read_volume(jcr, dev, block)) {
251 Jmsg(jcr, M_INFO, 0, _("Got EOM at file %u on device %s, Volume \"%s\"\n"),
252 dev->file, dev_name(dev), jcr->VolumeName);
255 /* Read and discard Volume label */
257 record = new_record();
258 read_block_from_device(jcr, dev, block, NO_BLOCK_NUMBER_CHECK);
259 read_record_from_block(block, record);
260 get_session_record(dev, record, &sessrec);
262 Jmsg(jcr, M_INFO, 0, _("Mounted Volume \"%s\".\n"), jcr->VolumeName);
264 } else if (dev->state & ST_EOF) {
265 Jmsg(jcr, M_INFO, 0, _("Got EOF at file %u on device %s, Volume \"%s\"\n"),
266 dev->file, dev_name(dev), jcr->VolumeName);
267 Dmsg0(20, "read_record got eof. try again\n");
269 } else if (dev->state & ST_SHORT) {
270 Jmsg(jcr, M_INFO, 0, "%s", dev->errmsg);
274 display_tape_error_status(jcr, dev);
278 if (!match_bsr_block(bsr, block)) {
279 Dmsg5(100, "reject Blk=%u blen=%u bVer=%d SessId=%u SessTim=%u\n",
280 block->BlockNumber, block->block_len, block->BlockVer,
281 block->VolSessionId, block->VolSessionTime);
284 Dmsg5(100, "Blk=%u blen=%u bVer=%d SessId=%u SessTim=%u\n",
285 block->BlockNumber, block->block_len, block->BlockVer,
286 block->VolSessionId, block->VolSessionTime);
288 read_record_from_block(block, rec);
289 Pmsg7(-1, "Block: %u blen=%u First rec FI=%s SessId=%u SessTim=%u Strm=%s rlen=%d\n",
290 block->BlockNumber, block->block_len,
291 FI_to_ascii(rec->FileIndex), rec->VolSessionId, rec->VolSessionTime,
292 stream_to_ascii(rec->Stream, rec->FileIndex), rec->data_len);
294 } else if (verbose > 1) {
295 dump_block(block, "");
297 printf("Block: %d size=%d\n", block->BlockNumber, block->block_len);
305 * We are only looking for labels or in particula Job Session records
307 static int jobs_cb(JCR *jcr, DEVICE *dev, DEV_BLOCK *block, DEV_RECORD *rec)
309 if (rec->FileIndex < 0) {
310 dump_label_record(dev, rec, verbose);
316 /* Do list job records */
317 static void do_jobs(char *infname)
319 read_records(jcr, dev, jobs_cb, mount_next_read_volume);
322 /* Do an ls type listing of an archive */
323 static void do_ls(char *infname)
326 dump_volume_label(dev);
329 read_records(jcr, dev, record_cb, mount_next_read_volume);
330 printf("%u files found.\n", num_files);
334 * Called here for each record from read_records()
336 static int record_cb(JCR *jcr, DEVICE *dev, DEV_BLOCK *block, DEV_RECORD *rec)
338 if (rec->FileIndex < 0) {
339 get_session_record(dev, rec, &sessrec);
342 /* File Attributes stream */
343 if (rec->Stream == STREAM_UNIX_ATTRIBUTES ||
344 rec->Stream == STREAM_UNIX_ATTRIBUTES_EX) {
346 if (!unpack_attributes_record(jcr, rec->Stream, rec->data, attr)) {
347 Emsg0(M_ERROR_TERM, 0, _("Cannot continue.\n"));
350 if (attr->file_index != rec->FileIndex) {
351 Emsg2(M_ERROR_TERM, 0, _("Record header file index %ld not equal record index %ld\n"),
352 rec->FileIndex, attr->file_index);
355 attr->data_stream = decode_stat(attr->attr, &attr->statp, &attr->LinkFI);
356 build_attr_output_fnames(jcr, attr);
358 if (file_is_included(&ff, attr->fname) && !file_is_excluded(&ff, attr->fname)) {
359 print_ls_output(jcr, attr);
367 static void get_session_record(DEVICE *dev, DEV_RECORD *rec, SESSION_LABEL *sessrec)
370 memset(sessrec, 0, sizeof(sessrec));
371 switch (rec->FileIndex) {
373 rtype = "Fresh Volume Label";
376 rtype = "Volume Label";
377 unser_volume_label(dev, rec);
380 rtype = "Begin Session";
381 unser_session_label(sessrec, rec);
384 rtype = "End Session";
387 rtype = "End of Medium";
393 Dmsg5(10, "%s Record: VolSessionId=%d VolSessionTime=%d JobId=%d DataLen=%d\n",
394 rtype, rec->VolSessionId, rec->VolSessionTime, rec->Stream, rec->data_len);
398 /* Dummies to replace askdir.c */
399 int dir_get_volume_info(JCR *jcr, enum get_vol_info_rw writing) { return 1;}
400 int dir_find_next_appendable_volume(JCR *jcr) { return 1;}
401 int dir_update_volume_info(JCR *jcr, DEVICE *dev, int relabel) { return 1; }
402 int dir_create_jobmedia_record(JCR *jcr) { return 1; }
403 int dir_ask_sysop_to_create_appendable_volume(JCR *jcr, DEVICE *dev) { return 1; }
404 int dir_update_file_attributes(JCR *jcr, DEV_RECORD *rec) { return 1;}
405 int dir_send_job_status(JCR *jcr) {return 1;}
408 int dir_ask_sysop_to_mount_volume(JCR *jcr, DEVICE *dev)
410 fprintf(stderr, "Mount Volume \"%s\" on device %s and press return when ready: ",
411 jcr->VolumeName, dev_name(dev));