3 * Dumb program to do an "ls" of a Bacula 1.0 mortal file.
8 Copyright (C) 2000, 2001, 2002 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"
31 static void do_blocks(char *infname);
32 static void do_jobs(char *infname);
33 static void do_ls(char *fname);
34 static void do_close(JCR *jcr);
35 static void get_session_record(DEVICE *dev, DEV_RECORD *rec, SESSION_LABEL *sessrec);
36 static void record_cb(JCR *jcr, DEVICE *dev, DEV_BLOCK *block, DEV_RECORD *rec);
39 static int default_tape = FALSE;
40 static int dump_label = FALSE;
41 static int list_blocks = FALSE;
42 static int list_jobs = FALSE;
43 static int verbose = 0;
44 static DEV_RECORD *rec;
45 static DEV_BLOCK *block;
47 static SESSION_LABEL sessrec;
48 static uint32_t num_files = 0;
49 static long record_file_index;
51 extern char BaculaId[];
55 static BSR *bsr = NULL;
60 "\nVersion: " VERSION " (" DATE ")\n\n"
61 "Usage: bls [-d debug_level] <physical-device-name>\n"
62 " -b <file> specify a bootstrap file\n"
63 " -e <file> exclude list\n"
64 " -i <file> include list\n"
67 " -L list tape label\n"
68 " (none of above) list saved files\n"
69 " -t use default tape device\n"
71 " -? print this message\n\n");
76 int main (int argc, char *argv[])
82 my_name_is(argc, argv, "bls");
83 init_msg(NULL, NULL); /* initialize message handler */
85 memset(&ff, 0, sizeof(ff));
86 init_include_exclude_files(&ff);
88 while ((ch = getopt(argc, argv, "b:d:e:i:jkLtv?")) != -1) {
91 bsr = parse_bsr(NULL, optarg);
94 case 'd': /* debug level */
95 debug_level = atoi(optarg);
100 case 'e': /* exclude list */
101 if ((fd = fopen(optarg, "r")) == NULL) {
102 Pmsg2(0, "Could not open exclude file: %s, ERR=%s\n",
103 optarg, strerror(errno));
106 while (fgets(line, sizeof(line), fd) != NULL) {
107 strip_trailing_junk(line);
108 Dmsg1(100, "add_exclude %s\n", line);
109 add_fname_to_exclude_list(&ff, line);
114 case 'i': /* include list */
115 if ((fd = fopen(optarg, "r")) == NULL) {
116 Pmsg2(0, "Could not open include file: %s, ERR=%s\n",
117 optarg, strerror(errno));
120 while (fgets(line, sizeof(line), fd) != NULL) {
121 strip_trailing_junk(line);
122 Dmsg1(100, "add_include %s\n", line);
123 add_fname_to_include_list(&ff, 0, line);
157 if (!argc && !default_tape) {
158 Pmsg0(0, "No archive name specified\n");
162 if (ff.included_files_list == NULL) {
163 add_fname_to_include_list(&ff, 0, "/");
166 /* Try default device */
168 do_ls(DEFAULT_TAPE_DRIVE);
172 for (i=0; i < argc; i++) {
173 jcr = setup_jcr("bls", argv[i], bsr);
174 dev = setup_to_read_device(jcr);
179 block = new_block(dev);
181 * Assume that we have already read the volume label.
182 * If on second or subsequent volume, adjust buffer pointer
184 if (dev->VolHdr.PrevVolName[0] != 0) { /* second volume */
186 Warning, this Volume is a continuation of Volume %s\n",
187 dev->VolHdr.PrevVolName);
192 } else if (list_jobs) {
206 static void do_close(JCR *jcr)
208 release_device(jcr, dev);
216 /* List just block information */
217 static void do_blocks(char *infname)
220 dump_volume_label(dev);
226 if (!read_block_from_device(dev, block)) {
227 Dmsg0(20, "!read_block()\n");
228 if (dev->state & ST_EOT) {
229 if (!mount_next_read_volume(jcr, dev, block)) {
230 printf("End of File on device\n");
234 record = new_record();
235 read_block_from_device(dev, block);
236 read_record_from_block(block, record);
237 get_session_record(dev, record, &sessrec);
239 printf("Volume %s mounted.\n", jcr->VolumeName);
242 if (dev->state & ST_EOF) {
243 Emsg1(M_INFO, 0, "Got EOF on device %s\n", dev_name(dev));
244 Dmsg0(20, "read_record got eof. try again\n");
247 if (dev->state & ST_SHORT) {
248 Emsg0(M_INFO, 0, dev->errmsg);
251 display_error_status(dev);
256 read_record_from_block(block, rec);
257 Pmsg6(-1, "Block: %d blen=%d First rec FI=%s SessId=%d Strm=%s rlen=%d\n",
258 block->BlockNumber, block->block_len,
259 FI_to_ascii(rec->FileIndex), rec->VolSessionId,
260 stream_to_ascii(rec->Stream), rec->data_len);
263 printf("Block: %d size=%d\n", block->BlockNumber, block->block_len);
271 * We are only looking for labels or in particula Job Session records
273 static void jobs_cb(JCR *jcr, DEVICE *dev, DEV_BLOCK *block, DEV_RECORD *rec)
275 if (rec->FileIndex < 0) {
276 dump_label_record(dev, rec, verbose);
281 /* Do list job records */
282 static void do_jobs(char *infname)
284 read_records(jcr, dev, jobs_cb, mount_next_read_volume);
287 /* Do an ls type listing of an archive */
288 static void do_ls(char *infname)
291 dump_volume_label(dev);
295 read_records(jcr, dev, record_cb, mount_next_read_volume);
299 * Called here for each record from read_records()
301 static void record_cb(JCR *jcr, DEVICE *dev, DEV_BLOCK *block, DEV_RECORD *rec)
307 if (rec->FileIndex < 0) {
308 get_session_record(dev, rec, &sessrec);
311 /* File Attributes stream */
312 if (rec->Stream == STREAM_UNIX_ATTRIBUTES) {
314 sscanf(rec->data, "%ld %d", &record_file_index, &type);
315 if (record_file_index != rec->FileIndex) {
316 Emsg2(M_ERROR_TERM, 0, "Record header file index %ld not equal record index %ld\n",
317 rec->FileIndex, record_file_index);
321 while (*ap++ != ' ') /* skip record file index */
323 while (*ap++ != ' ') /* skip type */
325 /* Save filename and position to attributes */
330 *fp = *ap++; /* terminate filename & point to attribs */
332 decode_stat(ap, &statp);
333 /* Skip to link name */
336 if (file_is_included(&ff, fname) && !file_is_excluded(&ff, fname)) {
337 print_ls_output(fname, ap, type, &statp);
342 printf("%u files found.\n", num_files);
348 static void get_session_record(DEVICE *dev, DEV_RECORD *rec, SESSION_LABEL *sessrec)
351 memset(sessrec, 0, sizeof(sessrec));
352 switch (rec->FileIndex) {
354 rtype = "Fresh Volume Label";
357 rtype = "Volume Label";
358 unser_volume_label(dev, rec);
361 rtype = "Begin Session";
362 unser_session_label(sessrec, rec);
365 rtype = "End Session";
368 rtype = "End of Media";
374 Dmsg5(10, "%s Record: VolSessionId=%d VolSessionTime=%d JobId=%d DataLen=%d\n",
375 rtype, rec->VolSessionId, rec->VolSessionTime, rec->Stream, rec->data_len);
379 /* Dummies to replace askdir.c */
380 int dir_get_volume_info(JCR *jcr) { return 1;}
381 int dir_find_next_appendable_volume(JCR *jcr) { return 1;}
382 int dir_update_volume_info(JCR *jcr, VOLUME_CAT_INFO *vol, int relabel) { return 1; }
383 int dir_create_jobmedia_record(JCR *jcr) { return 1; }
384 int dir_ask_sysop_to_mount_next_volume(JCR *jcr, DEVICE *dev) { return 1; }
385 int dir_update_file_attributes(JCR *jcr, DEV_RECORD *rec) { return 1;}
386 int dir_send_job_status(JCR *jcr) {return 1;}
389 int dir_ask_sysop_to_mount_volume(JCR *jcr, DEVICE *dev)
391 fprintf(stderr, "Mount Volume %s on device %s and press return when ready: ",
392 jcr->VolumeName, dev_name(dev));