2 * Ported to Linux's Second Extended File System as part of the
3 * dump and restore backup suit
4 * Remy Card <card@Linux.EU.Org>, 1994-1997
5 * Stelian Pop <stelian@popies.net>, 1999-2000
6 * Stelian Pop <stelian@popies.net> - AlcĂ´ve <www.alcove.com>, 2000-2002
10 * Copyright (c) 1980, 1988, 1991, 1993
11 * The Regents of the University of California. All rights reserved.
13 * Redistribution and use in source and binary forms, with or without
14 * modification, are permitted provided that the following conditions
16 * 1. Redistributions of source code must retain the above copyright
17 * notice, this list of conditions and the following disclaimer.
18 * 2. Redistributions in binary form must reproduce the above copyright
19 * notice, this list of conditions and the following disclaimer in the
20 * documentation and/or other materials provided with the distribution.
21 * 3. Neither the name of the University nor the names of its contributors
22 * may be used to endorse or promote products derived from this software
23 * without specific prior written permission.
25 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
26 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
27 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
28 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
29 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
30 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
31 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
32 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
33 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
34 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
39 static const char rcsid
[] =
40 "$Id: traverse.c,v 1.58 2004/03/08 14:04:04 stelian Exp $";
46 #include <sys/types.h>
53 #include <sys/param.h>
56 #ifdef HAVE_EXT2FS_EXT2_FS_H
57 #include <ext2fs/ext2_fs.h>
59 #include <linux/ext2_fs.h>
61 #include <ext2fs/ext2fs.h>
62 #include <bsdcompat.h>
63 #include <compaterr.h>
66 #include <sys/vnode.h>
69 #include <ufs/fsdir.h>
70 #include <ufs/inode.h>
72 #include <ufs/ufs/dir.h>
73 #include <ufs/ufs/dinode.h>
74 #include <ufs/ffs/fs.h>
75 #endif /* __linux__ */
77 #include <protocols/dumprestore.h>
81 #define HASDUMPEDFILE 0x1
82 #define HASSUBDIRS 0x2
85 typedef u_quad_t fsizeT
;
88 typedef quad_t fsizeT
;
95 static int searchdir
__P((struct ext2_dir_entry
*dp
, int offset
,
96 int blocksize
, char *buf
, void *private));
98 static int dirindir
__P((dump_ino_t ino
, daddr_t blkno
, int level
, long *size
));
99 static void dmpindir
__P((dump_ino_t ino
, daddr_t blk
, int level
, fsizeT
*size
));
100 static int searchdir
__P((dump_ino_t ino
, daddr_t blkno
, long size
, long filesize
));
102 static void mapfileino
__P((dump_ino_t ino
, struct dinode
const *dp
, long *tapesize
, int *dirskipped
));
104 #ifdef HAVE_EXT2_JOURNAL_INUM
105 #define ext2_journal_ino(sb) (sb->s_journal_inum)
107 #define ext2_journal_ino(sb) (*((u_int32_t *)sb + 0x38))
109 #ifndef HAVE_EXT2_INO_T
110 typedef ino_t ext2_ino_t
;
113 #ifndef EXT3_FEATURE_COMPAT_HAS_JOURNAL
114 #define EXT3_FEATURE_COMPAT_HAS_JOURNAL 0x0004
116 #ifndef EXT2_FEATURE_INCOMPAT_FILETYPE
117 #define EXT2_FEATURE_INCOMPAT_FILETYPE 0x0002
119 #ifndef EXT3_FEATURE_INCOMPAT_RECOVER
120 #define EXT3_FEATURE_INCOMPAT_RECOVER 0x0004
122 #ifndef EXT3_FEATURE_INCOMPAT_JOURNAL_DEV
123 #define EXT3_FEATURE_INCOMPAT_JOURNAL_DEV 0x0008
126 #ifndef EXT2_LIB_FEATURE_INCOMPAT_SUPP
127 #define EXT2_LIB_FEATURE_INCOMPAT_SUPP (EXT3_FEATURE_INCOMPAT_RECOVER | \
128 EXT2_FEATURE_INCOMPAT_FILETYPE)
130 #ifndef EXT2_RESIZE_INO
131 #define EXT2_RESIZE_INO 7
133 #ifndef EXT2_FT_UNKNOWN
134 #define EXT2_FT_UNKNOWN 0
135 #define EXT2_FT_REG_FILE 1
136 #define EXT2_FT_DIR 2
137 #define EXT2_FT_CHRDEV 3
138 #define EXT2_FT_BLKDEV 4
139 #define EXT2_FT_FIFO 5
140 #define EXT2_FT_SOCK 6
141 #define EXT2_FT_SYMLINK 7
142 #define EXT2_FT_MAX 8
145 int dump_fs_open(const char *disk
, ext2_filsys
*fs
)
149 retval
= ext2fs_open(disk
, EXT2_FLAG_FORCE
, 0, 0, unix_io_manager
, fs
);
151 struct ext2_super_block
*es
= (*fs
)->super
;
152 dump_ino_t journal_ino
= ext2_journal_ino(es
);
154 if (es
->s_feature_incompat
& EXT3_FEATURE_INCOMPAT_JOURNAL_DEV
){
155 msg("This is a journal, not a filesystem!\n");
156 retval
= EXT2_ET_UNSUPP_FEATURE
;
159 else if ((retval
= es
->s_feature_incompat
&
160 ~(EXT2_LIB_FEATURE_INCOMPAT_SUPP
|
161 EXT3_FEATURE_INCOMPAT_RECOVER
))) {
162 msg("Unsupported feature(s) 0x%x in filesystem\n",
164 retval
= EXT2_ET_UNSUPP_FEATURE
;
168 if (es
->s_feature_compat
&
169 EXT3_FEATURE_COMPAT_HAS_JOURNAL
&&
171 do_exclude_ino(journal_ino
, "journal inode");
172 do_exclude_ino(EXT2_RESIZE_INO
, "resize inode");
179 * This is an estimation of the number of TP_BSIZE blocks in the file.
180 * It estimates the number of blocks in files with holes by assuming
181 * that all of the blocks accounted for by di_blocks are data blocks
182 * (when some of the blocks are usually used for indirect pointers);
183 * hence the estimate may be high.
186 blockest(struct dinode
const *dp
)
188 long blkest
, sizeest
;
192 * dp->di_size is the size of the file in bytes.
193 * dp->di_blocks stores the number of sectors actually in the file.
194 * If there are more sectors than the size would indicate, this just
195 * means that there are indirect blocks in the file or unused
196 * sectors in the last file block; we can safely ignore these
197 * (blkest = sizeest below).
198 * If the file is bigger than the number of sectors would indicate,
199 * then the file has holes in it. In this case we must use the
200 * block count to estimate the number of data blocks used, but
201 * we use the actual size for estimating the number of indirect
202 * dump blocks (sizeest vs. blkest in the indirect block
205 blkest
= howmany((u_quad_t
)dp
->di_blocks
* 512, fs
->blocksize
) * (fs
->blocksize
/ TP_BSIZE
);
206 i_size
= dp
->di_size
+ ((u_quad_t
) dp
->di_size_high
<< 32);
207 sizeest
= howmany(i_size
, fs
->blocksize
) * (fs
->blocksize
/ TP_BSIZE
);
208 if (blkest
> sizeest
)
211 if ((dp
->di_mode
& IFMT
) == IFDIR
) {
213 * for directories, assume only half of space is filled
217 sizeest
= sizeest
/ 2;
219 if (i_size
> (u_quad_t
)fs
->blocksize
* NDADDR
) {
220 /* calculate the number of indirect blocks on the dump tape */
222 howmany(sizeest
- NDADDR
* fs
->blocksize
/ TP_BSIZE
,
226 if (i_size
> sblock
->fs_bsize
* NDADDR
) {
227 /* calculate the number of indirect blocks on the dump tape */
229 howmany(sizeest
- NDADDR
* sblock
->fs_bsize
/ TP_BSIZE
,
236 /* Auxiliary macro to pick up files changed since previous dump. */
237 #define CSINCE(dp, t) \
238 ((dp)->di_ctime >= (t))
239 #define MSINCE(dp, t) \
240 ((dp)->di_mtime >= (t))
241 #define CHANGEDSINCE(dp, t) \
242 (CSINCE(dp, t) || MSINCE(dp, t))
244 /* The NODUMP_FLAG macro tests if a file has the nodump flag. */
246 #define NODUMP_FLAG(dp) (!nonodump && (((dp)->di_flags & UF_NODUMP) == UF_NODUMP))
248 #define NODUMP_FLAG(dp) 0
251 /* The WANTTODUMP macro decides whether a file should be dumped. */
252 #define WANTTODUMP(dp, ino) \
253 (CHANGEDSINCE(dp, ((u_int32_t)spcl.c_ddate)) && \
254 (!NODUMP_FLAG(dp)) && \
258 * Determine if given inode should be dumped. "dp" must either point to a
259 * copy of the given inode, or be NULL (in which case it is fetched.)
262 mapfileino(dump_ino_t ino
, struct dinode
const *dp
, long *tapesize
, int *dirskipped
)
267 * Skip inode if we've already marked it for dumping
269 if (TSTINO(ino
, usedinomap
))
273 if ((mode
= (dp
->di_mode
& IFMT
)) == 0)
276 if (dp
->di_nlink
== 0 || dp
->di_dtime
!= 0)
280 * Put all dirs in dumpdirmap, inodes that are to be dumped in the
281 * used map. All inode but dirs who have the nodump attribute go
284 SETINO(ino
, usedinomap
);
287 SETINO(ino
, dumpdirmap
);
288 if (WANTTODUMP(dp
, ino
)) {
289 SETINO(ino
, dumpinomap
);
290 if (!MSINCE(dp
, (u_int32_t
)spcl
.c_ddate
))
291 SETINO(ino
, metainomap
);
292 if (mode
!= IFREG
&& mode
!= IFDIR
&& mode
!= IFLNK
)
295 *tapesize
+= blockest(dp
);
299 if ( NODUMP_FLAG(dp
) || exclude_ino(ino
) )
300 CLRINO(ino
, usedinomap
);
308 * Walk the inode list for a filesystem to find all allocated inodes
309 * that have been modified since the previous dump time. Also, find all
310 * the directories in the filesystem.
314 mapfiles(UNUSED(dump_ino_t maxino
), long *tapesize
)
317 int anydirskipped
= 0;
318 ext2_inode_scan scan
;
320 struct ext2_inode inode
;
323 * We use libext2fs's inode scanning routines, which are particularly
324 * robust. (Note that getino cannot return an error.)
326 err
= ext2fs_open_inode_scan(fs
, 0, &scan
);
328 com_err(disk
, err
, "while opening inodes\n");
332 err
= ext2fs_get_next_inode(scan
, &ino
, &inode
);
333 if (err
== EXT2_ET_BAD_BLOCK_IN_INODE_TABLE
)
336 com_err(disk
, err
, "while scanning inode #%ld\n",
344 mapfileino(ino
, (struct dinode
const *)&inode
, tapesize
,
347 ext2fs_close_inode_scan(scan
);
350 * Restore gets very upset if the root is not dumped,
351 * so ensure that it always is dumped.
353 SETINO(ROOTINO
, dumpinomap
);
354 return (anydirskipped
);
358 mapfiles(dump_ino_t maxino
, long *tapesize
)
361 int anydirskipped
= 0;
363 for (ino
= ROOTINO
; ino
< maxino
; ino
++)
364 mapfileino(ino
, tapesize
, &anydirskipped
);
367 * Restore gets very upset if the root is not dumped,
368 * so ensure that it always is dumped.
370 SETINO(ROOTINO
, dumpinomap
);
371 return (anydirskipped
);
373 #endif /* __linux__ */
377 maponefile(UNUSED(dump_ino_t maxino
), long *tapesize
, char *directory
)
381 char dir_name
[MAXPATHLEN
];
382 int i
, anydirskipped
= 0;
385 * Mark every directory in the path as being dumped
387 for (i
= 0; i
< (int)strlen (directory
); i
++) {
388 if (directory
[i
] == '/') {
389 strncpy (dir_name
, directory
, i
);
391 retval
= ext2fs_namei(fs
, ROOTINO
, ROOTINO
,
394 com_err(disk
, retval
,
395 "while translating %s", dir_name
);
398 mapfileino((dump_ino_t
) dir_ino
, 0,
399 tapesize
, &anydirskipped
);
403 * Mark the final directory
405 retval
= ext2fs_namei(fs
, ROOTINO
, ROOTINO
, directory
, &dir_ino
);
407 com_err(disk
, retval
, "while translating %s", directory
);
410 mapfileino((dump_ino_t
)dir_ino
, 0, tapesize
, &anydirskipped
);
412 mapfileino(ROOTINO
, 0, tapesize
, &anydirskipped
);
415 * Restore gets very upset if the root is not dumped,
416 * so ensure that it always is dumped.
418 SETINO(ROOTINO
, dumpdirmap
);
419 return anydirskipped
;
421 #endif /* __linux__ */
424 struct mapfile_context
{
430 mapfilesindir(struct ext2_dir_entry
*dirent
, UNUSED(int offset
),
431 UNUSED(int blocksize
), UNUSED(char *buf
), void *private)
433 struct dinode
const *dp
;
436 struct mapfile_context
*mfc
;
440 mfc
= (struct mapfile_context
*)private;
441 dp
= getino(dirent
->inode
);
443 mapfileino(dirent
->inode
, dp
, mfc
->tapesize
, mfc
->anydirskipped
);
445 mode
= dp
->di_mode
& IFMT
;
446 if (mode
== IFDIR
&& dp
->di_nlink
!= 0 && dp
->di_dtime
== 0) {
447 if ((dirent
->name
[0] != '.' || ( dirent
->name_len
& 0xFF ) != 1) &&
448 (dirent
->name
[0] != '.' || dirent
->name
[1] != '.' ||
449 ( dirent
->name_len
& 0xFF ) != 2)) {
450 retval
= ext2fs_dir_iterate(fs
, ino
, 0, NULL
,
451 mapfilesindir
, private);
462 * Walk the inode list for a filesystem to find all allocated inodes
463 * that have been modified since the previous dump time. Also, find all
464 * the directories in the filesystem.
467 mapfilesfromdir(UNUSED(dump_ino_t maxino
), long *tapesize
, char *directory
)
470 struct mapfile_context mfc
;
472 char dir_name
[MAXPATHLEN
];
473 int i
, anydirskipped
= 0;
476 * Mark every directory in the path as being dumped
478 for (i
= 0; i
< (int)strlen (directory
); i
++) {
479 if (directory
[i
] == '/') {
480 strncpy (dir_name
, directory
, i
);
482 retval
= ext2fs_namei(fs
, ROOTINO
, ROOTINO
, dir_name
,
485 com_err(disk
, retval
, "while translating %s",
489 mapfileino(dir_ino
, 0, tapesize
, &anydirskipped
);
493 * Mark the final directory
495 retval
= ext2fs_namei(fs
, ROOTINO
, ROOTINO
, directory
, &dir_ino
);
497 com_err(disk
, retval
, "while translating %s", directory
);
500 mapfileino(dir_ino
, 0, tapesize
, &anydirskipped
);
502 mfc
.tapesize
= tapesize
;
503 mfc
.anydirskipped
= &anydirskipped
;
504 retval
= ext2fs_dir_iterate(fs
, dir_ino
, 0, NULL
, mapfilesindir
,
508 com_err(disk
, retval
, "while mapping files in %s", directory
);
512 * Ensure that the root inode actually appears in the file list
515 mapfileino(ROOTINO
, 0, tapesize
, &anydirskipped
);
517 * Restore gets very upset if the root is not dumped,
518 * so ensure that it always is dumped.
520 SETINO(ROOTINO
, dumpinomap
);
521 return anydirskipped
;
526 struct mapdirs_context
{
536 * Scan each directory on the filesystem to see if it has any modified
537 * files in it. If it does, and has not already been added to the dump
538 * list (because it was itself modified), then add it. If a directory
539 * has not been modified itself, contains no modified files and has no
540 * subdirectories, then it can be deleted from the dump list and from
541 * the list of directories. By deleting it from the list of directories,
542 * its parent may now qualify for the same treatment on this or a later
543 * pass using this algorithm.
546 mapdirs(dump_ino_t maxino
, long *tapesize
)
556 struct mapdirs_context mdc
;
558 int ret
, change
= 0, nodump
;
560 isdir
= 0; /* XXX just to get gcc to shut up */
561 for (map
= dumpdirmap
, ino
= 1; ino
< maxino
; ino
++) {
562 if (((ino
- 1) % NBBY
) == 0) /* map is offset by 1 */
567 * If dir has been removed from the used map, it's either
568 * because it had the nodump flag, or it herited it from
569 * its parent. A directory can't be in dumpinomap if not
570 * in usedinomap, but we have to go through it anyway
571 * to propagate the nodump attribute.
573 nodump
= (TSTINO(ino
, usedinomap
) == 0);
574 if ((isdir
& 1) == 0 ||
575 (TSTINO(ino
, dumpinomap
) && nodump
== 0))
582 mdc
.tapesize
= tapesize
;
583 ext2fs_dir_iterate(fs
, ino
, 0, NULL
, searchdir
, (void *) &mdc
);
584 #else /* __linux__ */
585 filesize
= dp
->di_size
;
586 for (ret
= 0, i
= 0; filesize
> 0 && i
< NDADDR
; i
++) {
587 if (dp
->di_db
[i
] != 0)
588 ret
|= searchdir(ino
, dp
->di_db
[i
],
589 (long)dblksize(sblock
, dp
, i
),
591 if (ret
& HASDUMPEDFILE
)
594 filesize
-= sblock
->fs_bsize
;
596 for (i
= 0; filesize
> 0 && i
< NIADDR
; i
++) {
597 if (dp
->di_ib
[i
] == 0)
599 ret
|= dirindir(ino
, dp
->di_ib
[i
], i
, &filesize
);
601 #endif /* __linux__ */
602 if (ret
& HASDUMPEDFILE
) {
603 SETINO(ino
, dumpinomap
);
604 *tapesize
+= blockest(dp
);
609 if (ret
& HASSUBDIRS
)
610 change
= 1; /* subdirs have inherited nodump */
611 CLRINO(ino
, dumpdirmap
);
612 } else if ((ret
& HASSUBDIRS
) == 0) {
613 if (!TSTINO(ino
, dumpinomap
)) {
614 CLRINO(ino
, dumpdirmap
);
624 * Read indirect blocks, and pass the data blocks to be searched
625 * as directories. Quit as soon as any entry is found that will
626 * require the directory to be dumped.
629 dirindir(dump_ino_t ino
, daddr_t blkno
, int ind_level
, long *filesize
)
633 daddr_t idblk
[MAXNINDIR
];
635 bread(fsbtodb(sblock
, blkno
), (char *)idblk
, (int)sblock
->fs_bsize
);
636 if (ind_level
<= 0) {
637 for (i
= 0; *filesize
> 0 && i
< NINDIR(sblock
); i
++) {
640 ret
|= searchdir(ino
, blkno
, sblock
->fs_bsize
,
642 if (ret
& HASDUMPEDFILE
)
645 *filesize
-= sblock
->fs_bsize
;
650 for (i
= 0; *filesize
> 0 && i
< NINDIR(sblock
); i
++) {
653 ret
|= dirindir(ino
, blkno
, ind_level
, filesize
);
657 #endif /* !__linux__ */
660 * Scan a disk block containing directory information looking to see if
661 * any of the entries are on the dump list and to see if the directory
662 * contains any subdirectories.
666 searchdir(struct ext2_dir_entry
*dp
, UNUSED(int offset
),
667 UNUSED(int blocksize
), UNUSED(char *buf
), void *private)
669 struct mapdirs_context
*mdc
;
674 mdc
= (struct mapdirs_context
*)private;
676 tapesize
= mdc
->tapesize
;
680 if (dp
->name
[0] == '.') {
681 if (( dp
->name_len
& 0xFF ) == 1)
683 if (dp
->name
[1] == '.' && ( dp
->name_len
& 0xFF ) == 2)
687 ip
= getino(dp
->inode
);
688 if (TSTINO(dp
->inode
, dumpinomap
)) {
689 CLRINO(dp
->inode
, dumpinomap
);
690 *tapesize
-= blockest(ip
);
692 /* Add dir back to the dir map and remove from
693 * usedinomap to propagate nodump */
694 if ((ip
->di_mode
& IFMT
) == IFDIR
) {
695 SETINO(dp
->inode
, dumpdirmap
);
696 CLRINO(dp
->inode
, usedinomap
);
700 if (TSTINO(dp
->inode
, dumpinomap
)) {
701 *ret
|= HASDUMPEDFILE
;
702 if (*ret
& HASSUBDIRS
)
705 if (TSTINO(dp
->inode
, dumpdirmap
)) {
707 if (*ret
& HASDUMPEDFILE
)
714 #else /* __linux__ */
717 searchdir(dump_ino_t ino
, daddr_t blkno
, long size
, long filesize
)
723 bread(fsbtodb(sblock
, blkno
), dblk
, (int)size
);
726 for (loc
= 0; loc
< size
; ) {
727 dp
= (struct direct
*)(dblk
+ loc
);
728 if (dp
->d_reclen
== 0) {
729 msg("corrupted directory, inumber %d\n", ino
);
735 if (dp
->d_name
[0] == '.') {
736 if (dp
->d_name
[1] == '\0')
738 if (dp
->d_name
[1] == '.' && dp
->d_name
[2] == '\0')
741 if (TSTINO(dp
->d_ino
, dumpinomap
)) {
742 ret
|= HASDUMPEDFILE
;
743 if (ret
& HASSUBDIRS
)
746 if (TSTINO(dp
->d_ino
, dumpdirmap
)) {
748 if (ret
& HASDUMPEDFILE
)
754 #endif /* __linux__ */
758 struct block_context
{
767 * Dump a block to the tape
770 dumponeblock(UNUSED(ext2_filsys fs
), blk_t
*blocknr
, e2_blkcnt_t blockcnt
,
771 UNUSED(blk_t ref_block
), UNUSED(int ref_offset
), void * private)
773 struct block_context
*p
;
776 if (blockcnt
< NDADDR
)
778 p
= (struct block_context
*)private;
779 for (i
= p
->next_block
; i
< blockcnt
; i
++) {
780 p
->buf
[p
->cnt
++] = 0;
781 if (p
->cnt
== p
->max
) {
782 blksout (p
->buf
, p
->cnt
, p
->ino
);
786 p
->buf
[p
->cnt
++] = *blocknr
;
787 if (p
->cnt
== p
->max
) {
788 blksout (p
->buf
, p
->cnt
, p
->ino
);
791 p
->next_block
= blockcnt
+ 1;
797 * Dump passes 3 and 4.
799 * Dump the contents of an inode to tape.
802 dumpino(struct dinode
*dp
, dump_ino_t ino
, int metaonly
)
805 fsizeT size
, remaining
;
807 struct new_bsd_inode nbi
;
810 struct block_context bc
;
819 i_size
= dp
->di_size
+ ((u_quad_t
) dp
->di_size_high
<< 32);
823 dumpmap(dumpinomap
, TS_BITS
, ino
);
825 CLRINO(ino
, dumpinomap
);
827 memset(&nbi
, 0, sizeof(nbi
));
828 nbi
.di_mode
= dp
->di_mode
;
829 nbi
.di_nlink
= dp
->di_nlink
;
830 nbi
.di_ouid
= dp
->di_uid
;
831 nbi
.di_ogid
= dp
->di_gid
;
832 nbi
.di_size
= i_size
;
833 nbi
.di_atime
.tv_sec
= dp
->di_atime
;
834 nbi
.di_mtime
.tv_sec
= dp
->di_mtime
;
835 nbi
.di_ctime
.tv_sec
= dp
->di_ctime
;
836 memmove(&nbi
.di_db
, &dp
->di_db
, (NDADDR
+ NIADDR
) * sizeof(daddr_t
));
837 nbi
.di_flags
= dp
->di_flags
;
838 nbi
.di_blocks
= dp
->di_blocks
;
839 nbi
.di_gen
= dp
->di_gen
;
840 nbi
.di_uid
= (((int32_t)dp
->di_uidhigh
) << 16) | dp
->di_uid
;
841 nbi
.di_gid
= (((int32_t)dp
->di_gidhigh
) << 16) | dp
->di_gid
;
843 msg("ACLs in inode #%ld won't be dumped\n", (long)ino
);
844 memmove(&spcl
.c_dinode
, &nbi
, sizeof(nbi
));
845 #else /* __linux__ */
847 #endif /* __linux__ */
848 spcl
.c_type
= TS_INODE
;
851 if (metaonly
&& (dp
->di_mode
& S_IFMT
)) {
852 spcl
.c_flags
|= DR_METAONLY
;
855 spcl
.c_flags
&= ~DR_METAONLY
;
859 switch (dp
->di_mode
& S_IFMT
) {
869 msg("Warning: dumpino called on a directory (ino %d)\n", ino
);
875 * Check for short symbolic link.
879 i_size
< EXT2_N_BLOCKS
* sizeof (daddr_t
)) {
883 memmove(buf
, dp
->di_db
, (u_long
)dp
->di_size
);
884 buf
[dp
->di_size
] = '\0';
888 #endif /* __linux__ */
890 if (dp
->di_size
> 0 &&
891 dp
->di_size
< sblock
->fs_maxsymlinklen
) {
895 memmove(buf
, dp
->di_shortlink
, (u_long
)dp
->di_size
);
896 buf
[dp
->di_size
] = '\0';
919 msg("Warning: undefined file type 0%o\n", dp
->di_mode
& IFMT
);
922 if (i_size
> (u_quad_t
)NDADDR
* sblock
->fs_bsize
)
924 cnt
= NDADDR
* EXT2_FRAGS_PER_BLOCK(fs
->super
);
926 cnt
= NDADDR
* sblock
->fs_frag
;
929 cnt
= howmany(i_size
, sblock
->fs_fsize
);
930 blksout(&dp
->di_db
[0], cnt
, ino
);
931 if ((quad_t
) (size
= i_size
- NDADDR
* sblock
->fs_bsize
) <= 0)
934 bc
.max
= NINDIR(sblock
) * EXT2_FRAGS_PER_BLOCK(fs
->super
);
935 bc
.buf
= (int *)malloc (bc
.max
* sizeof (int));
938 bc
.next_block
= NDADDR
;
940 ext2fs_block_iterate2(fs
, (ext2_ino_t
)ino
, 0, NULL
, dumponeblock
, (void *)&bc
);
941 /* deal with holes at the end of the inode */
942 if (i_size
> ((u_quad_t
)bc
.next_block
) * sblock
->fs_fsize
) {
943 remaining
= i_size
- ((u_quad_t
)bc
.next_block
) * sblock
->fs_fsize
;
944 for (i
= 0; i
< (int)howmany(remaining
, sblock
->fs_fsize
); i
++) {
945 bc
.buf
[bc
.cnt
++] = 0;
946 if (bc
.cnt
== bc
.max
) {
947 blksout (bc
.buf
, bc
.cnt
, bc
.ino
);
953 blksout (bc
.buf
, bc
.cnt
, bc
.ino
);
957 for (ind_level
= 0; ind_level
< NIADDR
; ind_level
++) {
958 dmpindir(ino
, dp
->di_ib
[ind_level
], ind_level
, &size
);
967 struct convert_dir_context
{
975 * This function converts an ext2fs directory entry to the BSD format.
977 * Basically, it adds a null-character at the end of the name, recomputes the
978 * size of the entry, and creates it in a temporary buffer
981 convert_dir(struct ext2_dir_entry
*dirent
, UNUSED(int offset
),
982 UNUSED(int blocksize
), UNUSED(char *buf
), void *private)
984 struct convert_dir_context
*p
;
988 p
= (struct convert_dir_context
*)private;
990 reclen
= EXT2_DIR_REC_LEN((dirent
->name_len
& 0xFF) + 1);
991 if (((p
->offset
+ reclen
- 1) / p
->bs
) != (p
->offset
/ p
->bs
)) {
992 dp
= (struct direct
*)(p
->buf
+ p
->prev_offset
);
993 dp
->d_reclen
+= p
->bs
- (p
->offset
% p
->bs
);
994 p
->offset
+= p
->bs
- (p
->offset
% p
->bs
);
997 dp
= (struct direct
*)(p
->buf
+ p
->offset
);
998 dp
->d_ino
= dirent
->inode
;
999 dp
->d_reclen
= reclen
;
1000 dp
->d_namlen
= dirent
->name_len
& 0xFF;
1001 switch ((dirent
->name_len
& 0xFF00) >> 8) {
1003 dp
->d_type
= DT_UNKNOWN
;
1005 case EXT2_FT_REG_FILE
:
1006 dp
->d_type
= DT_REG
;
1009 dp
->d_type
= DT_DIR
;
1011 case EXT2_FT_CHRDEV
:
1012 dp
->d_type
= DT_CHR
;
1014 case EXT2_FT_BLKDEV
:
1015 dp
->d_type
= DT_BLK
;
1018 dp
->d_type
= DT_FIFO
;
1021 dp
->d_type
= DT_SOCK
;
1023 case EXT2_FT_SYMLINK
:
1024 dp
->d_type
= DT_LNK
;
1027 strncpy(dp
->d_name
, dirent
->name
, dp
->d_namlen
);
1028 dp
->d_name
[dp
->d_namlen
] = '\0';
1029 p
->prev_offset
= p
->offset
;
1030 p
->offset
+= reclen
;
1038 * Dumps a directory to tape after converting it to the BSD format
1041 dumpdirino(struct dinode
*dp
, dump_ino_t ino
)
1045 struct new_bsd_inode nbi
;
1046 struct convert_dir_context cdc
;
1048 struct ext2_dir_entry
*de
;
1053 dumpmap(dumpinomap
, TS_BITS
, ino
);
1055 CLRINO(ino
, dumpinomap
);
1058 * Convert the directory to the BSD format
1060 /* Allocate a buffer for the conversion (twice the size of the
1061 ext2fs directory to avoid problems ;-) */
1062 cdc
.buf
= (char *)malloc(dp
->di_size
* 2 * sizeof(char));
1063 if (cdc
.buf
== NULL
)
1064 err(1, "Cannot allocate buffer to convert directory #%lu\n",
1065 (unsigned long)ino
);
1067 cdc
.prev_offset
= 0;
1068 cdc
.bs
= MIN(DIRBLKSIZ
, TP_BSIZE
);
1069 /* Do the conversion */
1070 retval
= ext2fs_dir_iterate(fs
, (ext2_ino_t
)ino
, 0, NULL
, convert_dir
, (void *)&cdc
);
1072 com_err(disk
, retval
, "while converting directory #%ld\n", (long)ino
);
1075 /* Fix the last entry */
1076 if ((cdc
.offset
% cdc
.bs
) != 0) {
1077 de
= (struct ext2_dir_entry
*)(cdc
.buf
+ cdc
.prev_offset
);
1078 de
->rec_len
+= cdc
.bs
- (cdc
.offset
% cdc
.bs
);
1079 cdc
.offset
+= cdc
.bs
- (cdc
.offset
% cdc
.bs
);
1082 dir_size
= cdc
.offset
;
1085 memset(&nbi
, 0, sizeof(nbi
));
1086 nbi
.di_mode
= dp
->di_mode
;
1087 nbi
.di_nlink
= dp
->di_nlink
;
1088 nbi
.di_ouid
= dp
->di_uid
;
1089 nbi
.di_ogid
= dp
->di_gid
;
1090 nbi
.di_size
= dir_size
; /* (u_quad_t)dp->di_size; */
1091 nbi
.di_atime
.tv_sec
= dp
->di_atime
;
1092 nbi
.di_mtime
.tv_sec
= dp
->di_mtime
;
1093 nbi
.di_ctime
.tv_sec
= dp
->di_ctime
;
1094 memmove(&nbi
.di_db
, &dp
->di_db
, (NDADDR
+ NIADDR
) * sizeof(daddr_t
));
1095 nbi
.di_flags
= dp
->di_flags
;
1096 nbi
.di_blocks
= dp
->di_blocks
;
1097 nbi
.di_gen
= dp
->di_gen
;
1098 nbi
.di_uid
= (((int32_t)dp
->di_uidhigh
) << 16) | dp
->di_uid
;
1099 nbi
.di_gid
= (((int32_t)dp
->di_gidhigh
) << 16) | dp
->di_gid
;
1100 if (dp
->di_file_acl
)
1101 msg("ACLs in inode #%ld won't be dumped\n", (long)ino
);
1102 memmove(&spcl
.c_dinode
, &nbi
, sizeof(nbi
));
1103 #else /* __linux__ */
1104 spcl
.c_dinode
= *dp
;
1105 #endif /* __linux__ */
1106 spcl
.c_type
= TS_INODE
;
1108 switch (dp
->di_mode
& S_IFMT
) {
1119 msg("Warning: size of directory inode #%d is <= 0 (%d)!\n",
1124 msg("Warning: dumpdirino called with file type 0%o (inode #%d)\n",
1125 dp
->di_mode
& IFMT
, ino
);
1128 for (size
= 0; size
< dir_size
; size
+= TP_BSIZE
) {
1132 memmove(buf
, cdc
.buf
+ size
, TP_BSIZE
);
1134 spcl
.c_type
= TS_ADDR
;
1137 (void)free(cdc
.buf
);
1139 #endif /* __linux__ */
1143 * Read indirect blocks, and pass the data blocks to be dumped.
1146 dmpindir(dump_ino_t ino
, daddr_t blk
, int ind_level
, fsizeT
*size
)
1153 daddr_t idblk
[MAXNINDIR
];
1156 bread(fsbtodb(sblock
, blk
), (char *)idblk
, (int) sblock
->fs_bsize
);
1159 * My RedHat 4.0 system doesn't have these flags; I haven't
1160 * upgraded e2fsprogs yet
1162 #if defined(EXT2_FLAG_SWAP_BYTES)
1163 if ((fs
->flags
& EXT2_FLAG_SWAP_BYTES
) ||
1164 (fs
->flags
& EXT2_FLAG_SWAP_BYTES_READ
))
1167 max
= sblock
->fs_bsize
>> 2;
1168 swapme
= (blk_t
*) idblk
;
1169 for (i
= 0; i
< max
; i
++, swapme
++)
1170 *swapme
= ext2fs_swab32(*swapme
);
1172 #endif /* __linux__ */
1174 memset(idblk
, 0, (int)sblock
->fs_bsize
);
1175 if (ind_level
<= 0) {
1176 if (*size
< NINDIR(sblock
) * sblock
->fs_bsize
)
1177 cnt
= howmany(*size
, sblock
->fs_fsize
);
1180 cnt
= NINDIR(sblock
) * EXT2_FRAGS_PER_BLOCK(fs
->super
);
1182 cnt
= NINDIR(sblock
) * sblock
->fs_frag
;
1184 *size
-= NINDIR(sblock
) * sblock
->fs_bsize
;
1185 blksout(&idblk
[0], cnt
, ino
);
1189 for (i
= 0; i
< NINDIR(sblock
); i
++) {
1190 dmpindir(ino
, idblk
[i
], ind_level
, size
);
1198 * Collect up the data into tape record sized buffers and output them.
1201 blksout(daddr_t
*blkp
, int frags
, dump_ino_t ino
)
1204 int i
, j
, count
, blks
, tbperdb
;
1206 blks
= howmany(frags
* sblock
->fs_fsize
, TP_BSIZE
);
1207 tbperdb
= sblock
->fs_bsize
>> tp_bshift
;
1208 for (i
= 0; i
< blks
; i
+= TP_NINDIR
) {
1209 if (i
+ TP_NINDIR
> blks
)
1212 count
= i
+ TP_NINDIR
;
1213 for (j
= i
; j
< count
; j
++)
1214 if (blkp
[j
/ tbperdb
] != 0)
1215 spcl
.c_addr
[j
- i
] = 1;
1217 spcl
.c_addr
[j
- i
] = 0;
1218 spcl
.c_count
= count
- i
;
1220 bp
= &blkp
[i
/ tbperdb
];
1221 for (j
= i
; j
< count
; j
+= tbperdb
, bp
++) {
1223 if (j
+ tbperdb
<= count
)
1224 dumpblock(*bp
, (int)sblock
->fs_bsize
);
1226 dumpblock(*bp
, (count
- j
) * TP_BSIZE
);
1229 spcl
.c_type
= TS_ADDR
;
1234 * Dump a map to the tape.
1237 dumpmap(char *map
, int type
, dump_ino_t ino
)
1243 spcl
.c_count
= howmany(mapsize
* sizeof(char), TP_BSIZE
);
1245 for (i
= 0, cp
= map
; i
< spcl
.c_count
; i
++, cp
+= TP_BSIZE
)
1249 #if defined(__linux__) && !defined(int32_t)
1250 #define int32_t __s32
1254 * Compute and fill in checksum information.
1257 mkchecksum(union u_spcl
*tmpspcl
)
1259 int32_t sum
, cnt
, *lp
;
1261 tmpspcl
->s_spcl
.c_checksum
= 0;
1262 lp
= (int32_t *)&tmpspcl
->s_spcl
;
1264 cnt
= sizeof(union u_spcl
) / (4 * sizeof(int32_t));
1265 while (--cnt
>= 0) {
1271 tmpspcl
->s_spcl
.c_checksum
= CHECKSUM
- sum
;
1275 * Write a header record to the dump tape.
1278 writeheader(dump_ino_t ino
)
1280 spcl
.c_inumber
= ino
;
1281 spcl
.c_magic
= NFS_MAGIC
;
1282 mkchecksum((union u_spcl
*)&spcl
);
1283 writerec((char *)&spcl
, 1);
1288 getino(dump_ino_t inum
)
1290 static struct dinode dinode
;
1294 err
= ext2fs_read_inode(fs
, (ext2_ino_t
)inum
, (struct ext2_inode
*) &dinode
);
1296 com_err(disk
, err
, "while reading inode #%ld\n", (long)inum
);
1301 #else /* __linux__ */
1303 getino(dump_ino_t inum
)
1305 static daddr_t minino
, maxino
;
1306 static struct dinode inoblock
[MAXINOPB
];
1309 if (inum
>= minino
&& inum
< maxino
)
1310 return (&inoblock
[inum
- minino
]);
1311 bread(fsbtodb(sblock
, ino_to_fsba(sblock
, inum
)), (char *)inoblock
,
1312 (int)sblock
->fs_bsize
);
1313 minino
= inum
- (inum
% INOPB(sblock
));
1314 maxino
= minino
+ INOPB(sblock
);
1315 return (&inoblock
[inum
- minino
]);
1317 #endif /* __linux__ */
1320 * Read a chunk of data from the disk.
1321 * Try to recover from hard errors by reading in sector sized pieces.
1322 * Error recovery is attempted at most BREADEMAX times before seeking
1323 * consent from the operator to continue.
1325 int breaderrors
= 0;
1328 bread(daddr_t blkno
, char *buf
, int size
)
1334 if (ext2fs_llseek(diskfd
, (((ext2_loff_t
)blkno
) << dev_bshift
), 0) !=
1335 (((ext2_loff_t
)blkno
) << dev_bshift
))
1337 if (lseek(diskfd
, ((off_t
)blkno
<< dev_bshift
), 0) !=
1338 ((off_t
)blkno
<< dev_bshift
))
1340 msg("bread: lseek fails\n");
1341 if ((cnt
= read(diskfd
, buf
, size
)) == size
)
1343 if (blkno
+ (size
/ dev_bsize
) > fsbtodb(sblock
, sblock
->fs_size
)) {
1345 * Trying to read the final fragment.
1347 * NB - dump only works in TP_BSIZE blocks, hence
1348 * rounds `dev_bsize' fragments up to TP_BSIZE pieces.
1349 * It should be smarter about not actually trying to
1350 * read more than it can get, but for the time being
1351 * we punt and scale back the read only when it gets
1352 * us into trouble. (mkm 9/25/83)
1358 msg("read error from %s: %s: [block %d, ext2blk %d]: count=%d\n",
1359 disk
, strerror(errno
), blkno
,
1360 dbtofsb(sblock
, blkno
), size
);
1362 msg("short read error from %s: [block %d, ext2blk %d]: count=%d, got=%d\n",
1363 disk
, blkno
, dbtofsb(sblock
, blkno
), size
, cnt
);
1364 if (breademax
&& ++breaderrors
> breademax
) {
1365 msg("More than %d block read errors from %d\n",
1367 broadcast("DUMP IS AILING!\n");
1368 msg("This is an unrecoverable error.\n");
1369 if (!query("Do you want to attempt to continue?")){
1376 * Zero buffer, then try to read each sector of buffer separately.
1378 memset(buf
, 0, size
);
1379 for (i
= 0; i
< size
; i
+= dev_bsize
, buf
+= dev_bsize
, blkno
++) {
1381 if (ext2fs_llseek(diskfd
, (((ext2_loff_t
)blkno
) << dev_bshift
), 0) !=
1382 (((ext2_loff_t
)blkno
) << dev_bshift
))
1384 if (lseek(diskfd
, ((off_t
)blkno
<< dev_bshift
), 0) !=
1385 ((off_t
)blkno
<< dev_bshift
))
1387 msg("bread: lseek2 fails!\n");
1388 if ((cnt
= read(diskfd
, buf
, (int)dev_bsize
)) == dev_bsize
)
1391 msg("read error from %s: %s: [sector %d, ext2blk %d]: count=%d\n",
1392 disk
, strerror(errno
), blkno
,
1393 dbtofsb(sblock
, blkno
), dev_bsize
);
1396 msg("short read error from %s: [sector %d, ext2blk %d]: count=%d, got=%d\n",
1397 disk
, blkno
, dbtofsb(sblock
, blkno
), dev_bsize
, cnt
);