#ifndef lint
static const char rcsid[] =
- "$Id: main.c,v 1.40 2001/03/23 14:40:12 stelian Exp $";
+ "$Id: main.c,v 1.61 2001/11/11 00:06:39 stelian Exp $";
#endif /* not lint */
#include <config.h>
+#include <compatlfs.h>
#include <ctype.h>
#include <compaterr.h>
#include <fcntl.h>
#include <sys/param.h>
#include <sys/time.h>
+#include <time.h>
#ifdef __linux__
+#include <linux/fs.h>
+#ifdef HAVE_EXT2FS_EXT2_FS_H
+#include <ext2fs/ext2_fs.h>
+#else
#include <linux/ext2_fs.h>
+#endif
#include <ext2fs/ext2fs.h>
-#include <time.h>
#include <sys/stat.h>
#include <bsdcompat.h>
#elif defined sunos
#define SBOFF (SBLOCK * DEV_BSIZE)
#endif
+/*
+ * Dump maps used to describe what is to be dumped.
+ */
+int mapsize; /* size of the state maps */
+char *usedinomap; /* map of allocated inodes */
+char *dumpdirmap; /* map of directories to be dumped */
+char *dumpinomap; /* map of files to be dumped */
+
+const char *disk; /* name of the disk file */
+char tape[MAXPATHLEN];/* name of the tape file */
+char *tapeprefix; /* prefix of the tape file */
+char *dumpdates; /* name of the file containing dump date information*/
+char lastlevel; /* dump level of previous dump */
+char level; /* dump level of this dump */
+int bzipflag; /* compression is done using bzlib */
+int uflag; /* update flag */
+int Mflag; /* multi-volume flag */
+int qflag; /* quit on errors flag */
+int breademax = 32; /* maximum number of bread errors before we quit */
+char *eot_script; /* end of volume script fiag */
+int diskfd; /* disk file descriptor */
+int tapefd; /* tape file descriptor */
+int pipeout; /* true => output to standard output */
+int fifoout; /* true => output to fifo */
+dump_ino_t curino; /* current inumber; used globally */
+int newtape; /* new tape flag */
+int density; /* density in 0.1" units */
+long tapesize; /* estimated tape size, blocks */
+long tsize; /* tape size in 0.1" units */
+long asize; /* number of 0.1" units written on current tape */
+int etapes; /* estimated number of tapes */
+int nonodump; /* if set, do not honor UF_NODUMP user flags */
+int unlimited; /* if set, write to end of medium */
+int compressed; /* if set, dump is to be compressed */
+long long bytes_written;/* total bytes written to tape */
+long uncomprblks; /* uncompressed blocks written to tape */
+int notify; /* notify operator flag */
+int blockswritten; /* number of blocks written on current tape */
+int tapeno; /* current tape number */
+time_t tstart_writing; /* when started writing the first tape block */
+time_t tend_writing; /* after writing the last tape block */
+#ifdef __linux__
+ext2_filsys fs;
+#else
+struct fs *sblock; /* the file system super block */
+char sblock_buf[MAXBSIZE];
+#endif
+long xferrate; /* averaged transfer rate of all volumes */
+long dev_bsize; /* block size of underlying disk device */
+int dev_bshift; /* log2(dev_bsize) */
+int tp_bshift; /* log2(TP_BSIZE) */
+
+#ifdef USE_QFA
+int gTapeposfd;
+char *gTapeposfile;
+char gTps[255];
+int32_t gThisDumpDate;
+#endif /* USE_QFA */
+
+struct dumptime *dthead; /* head of the list version */
+int nddates; /* number of records (might be zero) */
+int ddates_in; /* we have read the increment file */
+struct dumpdates **ddatev; /* the arrayfied version */
+
int notify = 0; /* notify operator flag */
int blockswritten = 0; /* number of blocks written on current tape */
int tapeno = 0; /* current tape number */
int density = 0; /* density in bytes/0.1" " <- this is for hilit19 */
int ntrec = NTREC; /* # tape blocks in each tape record */
int cartridge = 0; /* Assume non-cartridge tape */
+#ifdef USE_QFA
+int tapepos = 0; /* assume no QFA tapeposition needed by user */
+#endif /* USE_QFA */
int dokerberos = 0; /* Use Kerberos authentication */
long dev_bsize = 1; /* recalculated below */
long blocksperfile; /* output blocks per file */
static long numarg __P((const char *, long, long));
static void obsolete __P((int *, char **[]));
static void usage __P((void));
+static void do_exclude_from_file __P((char *));
+static void do_exclude_ino_str __P((char *));
+static void incompat_flags __P((int, char, char));
-dump_ino_t iexclude_list[IEXCLUDE_MAXNUM];/* the inode exclude list */
-int iexclude_num = 0; /* number of elements in the list */
+static dump_ino_t iexclude_list[IEXCLUDE_MAXNUM];/* the inode exclude list */
+static int iexclude_num = 0; /* number of elements in the list */
int
main(int argc, char *argv[])
register struct fstab *dt;
register char *map;
register int ch;
- int i, anydirskipped, bflag = 0, Tflag = 0, honorlevel = 1;
+ int i, anydirskipped;
+ int aflag = 0, bflag = 0, Tflag = 0, honorlevel = 1;
dump_ino_t maxino;
+ struct STAT statbuf;
+ dev_t filedev = 0;
#ifdef __linux__
errcode_t retval;
char directory[MAXPATHLEN];
obsolete(&argc, &argv);
+#ifdef USE_QFA
+ gTapeposfd = -1;
+#endif /* USE_QFA */
+
while ((ch = getopt(argc, argv,
- "0123456789aB:b:cd:e:f:F:h:L:"
+ "0123456789aB:b:cd:e:E:f:F:h:I:"
+#ifdef HAVE_BZLIB
+ "j::"
+#endif
+ "L:"
#ifdef KERBEROS
"k"
#endif
- "Mns:ST:uWw"
+ "Mnq"
+#ifdef USE_QFA
+ "Q:"
+#endif
+ "s:ST:uWw"
#ifdef HAVE_ZLIB
"z::"
#endif
)) != -1)
-#undef optstring
switch (ch) {
/* dump level */
case '0': case '1': case '2': case '3': case '4':
case 'a': /* `auto-size', Write to EOM. */
unlimited = 1;
+ aflag = 1;
break;
case 'B': /* blocks per output file */
if (ntrec > maxbsize/1024) {
msg("Please choose a blocksize <= %dkB\n",
maxbsize/1024);
+ msg("The ENTIRE dump is aborted.\n");
exit(X_STARTUP);
}
bflag = 1;
/* 04-Feb-00 ILC */
case 'e': /* exclude an inode */
- if (iexclude_num == IEXCLUDE_MAXNUM) {
- (void)fprintf(stderr, "Too many -e options\n");
- exit(X_STARTUP);
+ {
+ char *p = optarg, *q;
+ while ((q = strchr(p, ','))) {
+ *q = '\0';
+ do_exclude_ino_str(p);
+ p = q + 1;
}
- iexclude_list[iexclude_num++] = numarg("inode to exclude",0L,0L);
- if (iexclude_list[iexclude_num-1] <= ROOTINO) {
- (void)fprintf(stderr, "Cannot exclude inode %ld\n", (long)iexclude_list[iexclude_num-1]);
- exit(X_STARTUP);
+ do_exclude_ino_str(p);
}
- msg("Added %d to exclude list\n",
- iexclude_list[iexclude_num-1]);
+ break;
+
+ case 'E': /* exclude inodes read from file */
+ do_exclude_from_file(optarg);
break;
case 'f': /* output file */
honorlevel = numarg("honor level", 0L, 10L);
break;
+#ifdef HAVE_BZLIB
+ case 'j':
+ compressed = 2;
+ bzipflag = 1;
+ if (optarg)
+ compressed = numarg("compress level", 1L, 9L);
+ break;
+#endif /* HAVE_BZLIB */
+
+ case 'I':
+ breademax =
+ numarg ("number of errors to ignore", 1L, 0L);
+ break;
+
#ifdef KERBEROS
case 'k':
dokerberos = 1;
notify = 1;
break;
+ case 'q':
+ qflag = 1;
+ break;
+
+#ifdef USE_QFA
+ case 'Q': /* create tapeposfile */
+ gTapeposfile = optarg;
+ tapepos = 1;
+ break;
+#endif /* USE_QFA */
+
case 's': /* tape size, feet */
unlimited = 0;
tsize = numarg("tape size", 1L, 0L) * 12 * 10;
case 'T': /* time of last dump */
spcl.c_ddate = unctime(optarg);
if (spcl.c_ddate < 0) {
- (void)fprintf(stderr, "bad time \"%s\"\n",
- optarg);
+ msg("bad time \"%s\"\n", optarg);
+ msg("The ENTIRE dump is aborted.\n");
exit(X_STARTUP);
}
Tflag = 1;
argv += optind;
if (argc < 1) {
- (void)fprintf(stderr, "Must specify disk or filesystem\n");
+ msg("Must specify disk or filesystem\n");
+ msg("The ENTIRE dump is aborted.\n");
exit(X_STARTUP);
}
diskparam = *argv++;
if (strlen(diskparam) >= MAXPATHLEN) {
- (void)fprintf(stderr, "Disk or filesystem name too long: %s\n",
- diskparam);
+ msg("Disk or filesystem name too long: %s\n", diskparam);
+ msg("The ENTIRE dump is aborted.\n");
exit(X_STARTUP);
}
argc--;
- if (argc >= 1) {
- (void)fprintf(stderr, "Unknown arguments to dump:");
- while (argc--)
- (void)fprintf(stderr, " %s", *argv++);
- (void)fprintf(stderr, "\n");
- exit(X_STARTUP);
- }
- if (Tflag && uflag) {
- (void)fprintf(stderr,
- "You cannot use the T and u flags together.\n");
- exit(X_STARTUP);
- }
+ incompat_flags(Tflag && uflag, 'T', 'u');
+ incompat_flags(aflag && blocksperfile, 'a', 'B');
+ incompat_flags(aflag && cartridge, 'a', 'c');
+ incompat_flags(aflag && density, 'a', 'd');
+ incompat_flags(aflag && tsize, 'a', 's');
+
if (strcmp(tapeprefix, "-") == 0) {
pipeout++;
tapeprefix = "standard output";
}
- if (blocksperfile)
+ if (blocksperfile && !compressed)
blocksperfile = blocksperfile / ntrec * ntrec; /* round down */
else if (!unlimited) {
/*
*tapeprefix++ = '\0';
#ifdef RDUMP
if (index(tapeprefix, '\n')) {
- (void)fprintf(stderr, "invalid characters in tape\n");
- exit(X_STARTUP);
+ msg("invalid characters in tape\n");
+ msg("The ENTIRE dump is aborted.\n");
+ exit(X_STARTUP);
}
if (rmthost(host) == 0)
exit(X_STARTUP);
#else
- (void)fprintf(stderr, "remote dump not enabled\n");
+ msg("remote dump not enabled\n");
+ msg("The ENTIRE dump is aborted.\n");
exit(X_STARTUP);
#endif
}
of LABEL= or UID= but it was not
found */
msg("Cannot find a disk having %s\n", diskparam);
+ msg("The ENTIRE dump is aborted.\n");
exit(X_STARTUP);
}
/*
* the file system name with or without the leading '/'.
*/
if ((dt = fstabsearch(disk)) != NULL) {
+ /* if found then only one parameter (i.e. partition)
+ * is allowed */
+ if (argc >= 1) {
+ (void)fprintf(stderr, "Unknown arguments to dump:");
+ while (argc--)
+ (void)fprintf(stderr, " %s", *argv++);
+ (void)fprintf(stderr, "\n");
+ msg("The ENTIRE dump is aborted.\n");
+ exit(X_STARTUP);
+ }
disk = rawname(dt->fs_spec);
(void)strncpy(spcl.c_dev, dt->fs_spec, NAMELEN);
(void)strncpy(spcl.c_filesys, dt->fs_file, NAMELEN);
if (directory[0] != 0) {
if (level != '0') {
- (void)fprintf(stderr, "Only level 0 dumps are allowed on a subdirectory\n");
+ msg("Only level 0 dumps are allowed on a subdirectory\n");
+ msg("The ENTIRE dump is aborted.\n");
exit(X_STARTUP);
}
if (uflag) {
- (void)fprintf(stderr, "You can't update the dumpdates file when dumping a subdirectory\n");
+ msg("You can't update the dumpdates file when dumping a subdirectory\n");
+ msg("The ENTIRE dump is aborted.\n");
exit(X_STARTUP);
}
}
strncpy(tape, tapeprefix, MAXPATHLEN);
tape[MAXPATHLEN - 1] = '\0';
+ if (!pipeout) {
+ if (STAT(tape, &statbuf) != -1)
+ fifoout= statbuf.st_mode & S_IFIFO;
+ }
+
if (!sizest) {
msg("Date of this level %c dump: %s", level,
ctime4(&spcl.c_date));
+#ifdef USE_QFA
+ gThisDumpDate = spcl.c_date;
+#endif
if (spcl.c_ddate)
msg("Date of last level %c dump: %s", lastlevel,
ctime4(&spcl.c_ddate));
} /* end of size estimate */
#ifdef __linux__
+ if ((diskfd = OPEN(disk, O_RDONLY)) < 0) {
+ msg("Cannot open %s\n", disk);
+ msg("The ENTIRE dump is aborted.\n");
+ exit(X_STARTUP);
+ }
+#ifdef BLKFLSBUF
+ (void)ioctl(diskfd, BLKFLSBUF);
+#endif
retval = dump_fs_open(disk, &fs);
if (retval) {
com_err(disk, retval, "while opening filesystem");
if (retval == EXT2_ET_REV_TOO_HIGH)
- printf ("Get a newer version of dump!\n");
+ msg("Get a newer version of dump!\n");
+ msg("The ENTIRE dump is aborted.\n");
exit(X_STARTUP);
}
if (fs->super->s_rev_level > DUMP_CURRENT_REV) {
com_err(disk, retval, "while opening filesystem");
- printf ("Get a newer version of dump!\n");
- exit(X_STARTUP);
- }
- if ((diskfd = open(disk, O_RDONLY)) < 0) {
- msg("Cannot open %s\n", disk);
+ msg("Get a newer version of dump!\n");
+ msg("The ENTIRE dump is aborted.\n");
exit(X_STARTUP);
}
/* if no user label specified, use ext2 filesystem label if available */
#else /* __linux __*/
if ((diskfd = open(disk, O_RDONLY)) < 0) {
msg("Cannot open %s\n", disk);
+ msg("The ENTIRE dump is aborted.\n");
exit(X_STARTUP);
}
sync();
nonodump = spcl.c_level < honorlevel;
- msg("Label: %s\n", spcl.c_label);
+ if (!sizest) {
+ msg("Label: %s\n", spcl.c_label);
- if (compressed)
- msg("Compressing output at compression level %d\n", compressed);
+ if (compressed)
+ msg("Compressing output at compression level %d (%s)\n",
+ compressed, bzipflag ? "bzlib" : "zlib");
+ }
#if defined(SIGINFO)
(void)signal(SIGINFO, statussig);
#ifdef __linux__
if (directory[0] == 0)
anydirskipped = mapfiles(maxino, &tapesize);
- else
- anydirskipped = mapfilesfromdir(maxino, &tapesize, directory);
+ else {
+ if (STAT(pathname, &statbuf) == -1) {
+ msg("File cannot be accessed (%s).\n", pathname);
+ msg("The ENTIRE dump is aborted.\n");
+ exit(X_STARTUP);
+ }
+ filedev = statbuf.st_dev;
+ if (!(statbuf.st_mode & S_IFDIR)) /* is a file */
+ anydirskipped = maponefile(maxino, &tapesize,
+ directory);
+ else
+ anydirskipped = mapfilesfromdir(maxino, &tapesize,
+ directory);
+ }
+ while (argc--) {
+ int anydirskipped2;
+ char *p = *argv;
+ /* check if file is available */
+ if (STAT(p, &statbuf) == -1) {
+ msg("File cannot be accessed (%s).\n", p);
+ msg("The ENTIRE dump is aborted.\n");
+ exit(X_STARTUP);
+ }
+ /* check if file is on same unix partiton as the first
+ * argument */
+ if (statbuf.st_dev != filedev) {
+ msg("Files are not on same file system (%s).\n", p);
+ msg("The ENTIRE dump is aborted.\n");
+ exit(X_STARTUP);
+ }
+ /* check if file is a directory */
+ if (!(statbuf.st_mode & S_IFDIR))
+ anydirskipped2 = maponefile(maxino, &tapesize,
+ p+strlen(dt->fs_file));
+ else
+ /* read directory inodes.
+ * NOTE: nested directories are not recognized
+ * so inodes may be umped twice!
+ */
+ anydirskipped2 = mapfilesfromdir(maxino, &tapesize,
+ p+strlen(dt->fs_file));
+ if (!anydirskipped)
+ anydirskipped = anydirskipped2;
+ argv++;
+ }
#else
anydirskipped = mapfiles(maxino, &tapesize);
#endif
}
if (sizest) {
- printf("%.0f\n", ((double)tapesize + 11) * TP_BSIZE);
+ printf("%.0f\n", ((double)tapesize + 1 + ntrec) * TP_BSIZE);
exit(X_FINOK);
} /* stop here for size estimate */
if (pipeout || unlimited) {
- tapesize += 11; /* 10 trailer blocks + 1 map header */
+ tapesize += 1 + ntrec; /* 1 map header + trailer blocks */
msg("estimated %ld tape blocks.\n", tapesize);
} else {
double fetapes;
/* count the dumped inodes map on each additional tape */
tapesize += (etapes - 1) *
(howmany(mapsize * sizeof(char), TP_BSIZE) + 1);
- tapesize += etapes + 10; /* headers + 10 trailer blks */
+ tapesize += etapes + ntrec; /* headers + trailer blks */
msg("estimated %ld tape blocks on %3.2f tape(s).\n",
tapesize, fetapes);
}
+#ifdef USE_QFA
+ if (tapepos) {
+ msg("writing QFA positions to %s\n", gTapeposfile);
+ if ((gTapeposfd = open(gTapeposfile, O_RDWR|O_CREAT, S_IRUSR | S_IWUSR)) < 0)
+ quit("can't open tapeposfile\n");
+ /* print QFA-file header */
+ sprintf(gTps, "%s\n%s\n%ld\n\n", QFA_MAGIC, QFA_VERSION, (unsigned long)spcl.c_date);
+ if (write(gTapeposfd, gTps, strlen(gTps)) != strlen(gTps))
+ quit("can't write tapeposfile\n");
+ sprintf(gTps, "ino\ttapeno\ttapepos\n");
+ if (write(gTapeposfd, gTps, strlen(gTps)) != strlen(gTps))
+ quit("can't write tapeposfile\n");
+ }
+#endif /* USE_QFA */
+
/*
* Allocate tape buffer.
*/
continue;
#ifdef __linux__
/*
- * No need to check here for deleted and not yes reallocated inodes
- * since this is done in dumpino().
+ * No need to check here for deleted and not yet reallocated
+ * inodes since this is done in dumpino().
*/
#endif
(void)dumpino(dp, ino);
tend_writing = time(NULL);
spcl.c_type = TS_END;
- for (i = 0; i < ntrec; i++)
+ /*
+ * Finish off the current tape record with trailer blocks, to ensure
+ * at least the data in the last partial record makes it to tape.
+ * Also make sure we write at least 1 trailer block.
+ */
+ for (i = ntrec - (spcl.c_tapea % ntrec); i; --i)
writeheader(maxino - 1);
tnow = trewind();
- if (pipeout)
+ if (pipeout || fifoout)
msg("%ld tape blocks (%.2fMB)\n", spcl.c_tapea,
((double)spcl.c_tapea * TP_BSIZE / 1048576));
else
((double)spcl.c_tapea * TP_BSIZE / 1048576),
spcl.c_volume);
- /* report dump performance, avoid division through zero */
+ /* report dump performance, avoid division by zero */
if (tend_writing - tstart_writing == 0)
msg("finished in less than a second\n");
else
if (compressed) {
long tapekb = bytes_written / 1024;
double rate = .0005 + (double) spcl.c_tapea / tapekb;
- msg("Wrote %ldkB uncompressed, %ldKB compressed, %1.3f:1\n",
+ msg("Wrote %ldkB uncompressed, %ldkB compressed, %1.3f:1\n",
spcl.c_tapea, tapekb, rate);
}
#ifdef KERBEROS
"k"
#endif
- "MnSu"
- "] [-B records] [-b blocksize]\n"
- "\t%s [-d density] [-e inode#] [-f file] [-h level] [-s feet]\n"
- "\t%s [-T date] "
+ "MnqSu"
+ "] [-B records] [-b blocksize] [-d density]\n"
+ "\t%s [-e inode#,inode#,...] [-E file] [-f file] [-h level] "
+ "[-I nr errors] "
+#ifdef HAVE_BZLIB
+ "[-j zlevel] "
+#endif
+ "\n\t%s "
+#ifdef USE_QFA
+ "[-Q file] "
+#endif
+ "[-s feet] [-T date] "
#ifdef HAVE_ZLIB
"[-z zlevel] "
#endif
case SIGHUP:
case SIGTERM:
case SIGTRAP:
- if (pipeout)
+ if (pipeout || fifoout)
quit("Signal on pipe: cannot recover\n");
- msg("Rewriting attempted as response to unknown signal.\n");
+ msg("Rewriting attempted as response to unknown signal: %d.\n", signo);
(void)fflush(stderr);
(void)fflush(stdout);
close_rewind();
case 'b':
case 'd':
case 'e':
+ case 'E':
case 'f':
case 'F':
case 'h':
case 'L':
+ case 'Q':
case 's':
case 'T':
if (*argv == NULL) {
/* Update argument count. */
*argcp = nargv - *argvp - 1;
}
+
+/*
+ * This tests whether an inode is in the exclude list
+ */
+int
+exclude_ino(dump_ino_t ino)
+{
+ /* 04-Feb-00 ILC */
+ if (iexclude_num) { /* if there are inodes in the exclude list */
+ int idx; /* then check this inode against it */
+ for (idx = 0; idx < iexclude_num; idx++)
+ if (ino == iexclude_list[idx])
+ return 1;
+ }
+ return 0;
+}
+
+/*
+ * This tests adds an inode to the exclusion list if it isn't already there
+ */
+void
+do_exclude_ino(dump_ino_t ino, const char *reason)
+{
+ if (!exclude_ino(ino)) {
+ if (iexclude_num == IEXCLUDE_MAXNUM) {
+ msg("Too many exclude options\n");
+ msg("The ENTIRE dump is aborted.\n");
+ exit(X_STARTUP);
+ }
+ if (reason)
+ msg("Added inode %u to exclude list (%s)\n",
+ ino, reason);
+ else
+ msg("Added inode %u to exclude list\n", ino);
+ iexclude_list[iexclude_num++] = ino;
+ }
+}
+
+static void
+do_exclude_ino_str(char * ino) {
+ char *r;
+ unsigned long inod;
+
+ inod = strtoul(ino, &r, 10);
+ if (*r != '\0' || inod <= ROOTINO) {
+ msg("Invalid inode argument %s\n", ino);
+ msg("The ENTIRE dump is aborted.\n");
+ exit(X_STARTUP);
+ }
+ do_exclude_ino(inod, NULL);
+}
+
+/*
+ * This reads a file containing one inode number per line and exclude them all
+ */
+static void
+do_exclude_from_file(char *file) {
+ FILE *f;
+ char *p, fname[MAXPATHLEN];
+
+
+ if (!( f = fopen(file, "r")) ) {
+ msg("Cannot open file for reading: %s\n", file);
+ msg("The ENTIRE dump is aborted.\n");
+ exit(X_STARTUP);
+ }
+ while (( p = fgets(fname, MAXPATHLEN, f))) {
+ if ( *p && *(p + strlen(p) - 1) == '\n' ) /* possible null string */
+ *(p + strlen(p) - 1) = '\0';
+ if ( !*p ) /* skip empty lines */
+ continue;
+ do_exclude_ino_str(p);
+ }
+ fclose(f);
+}
+
+static void incompat_flags(int cond, char flag1, char flag2) {
+ if (cond) {
+ msg("You cannot use the %c and %c flags together.\n",
+ flag1, flag2);
+ msg("The ENTIRE dump is aborted.\n");
+ exit(X_STARTUP);
+ }
+}