]>
git.wh0rd.org - dump.git/blob - restore/utilities.c
b32c21f2a0614d6aaff0ef13a4a667d742bba603
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 <pop@cybercable.fr>, 1999-2000
6 * Stelian Pop <pop@cybercable.fr> - AlcĂ´ve <www.alcove.fr>, 2000
10 * Copyright (c) 1983, 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. All advertising materials mentioning features or use of this software
22 * must display the following acknowledgement:
23 * This product includes software developed by the University of
24 * California, Berkeley and its contributors.
25 * 4. Neither the name of the University nor the names of its contributors
26 * may be used to endorse or promote products derived from this software
27 * without specific prior written permission.
29 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
30 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
31 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
32 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
33 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
34 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
35 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
36 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
37 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
38 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
43 static const char rcsid
[] =
44 "$Id: utilities.c,v 1.9 2000/11/10 14:42:25 stelian Exp $";
47 #include <sys/param.h>
52 #include <linux/ext2_fs.h>
53 #include <bsdcompat.h>
55 #include <ufs/ufs/dinode.h>
56 #include <ufs/ufs/dir.h>
57 #endif /* __linux__ */
60 #include <compaterr.h>
66 #include <ext2fs/ext2fs.h>
73 * Insure that all the components of a pathname exist.
82 start
= strchr(name
, '/');
85 for (cp
= start
; *cp
!= '\0'; cp
++) {
89 ep
= lookupname(name
);
91 /* Safe; we know the pathname exists in the dump. */
92 ep
= addentry(name
, pathsearch(name
)->d_ino
, NODE
);
95 ep
->e_flags
|= NEW
|KEEP
;
101 * Change a name to a unique temporary name.
104 mktempname(struct entry
*ep
)
106 char oldname
[MAXPATHLEN
];
108 if (ep
->e_flags
& TMPNAME
)
109 badentry(ep
, "mktempname: called with TMPNAME");
110 ep
->e_flags
|= TMPNAME
;
111 (void) strcpy(oldname
, myname(ep
));
112 freename(ep
->e_name
);
113 ep
->e_name
= savename(gentempname(ep
));
114 ep
->e_namlen
= strlen(ep
->e_name
);
115 renameit(oldname
, myname(ep
));
119 * Generate a temporary name for an entry.
122 gentempname(struct entry
*ep
)
124 static char name
[MAXPATHLEN
];
128 for (np
= lookupino(ep
->e_ino
);
129 np
!= NULL
&& np
!= ep
; np
= np
->e_links
)
132 badentry(ep
, "not on ino list");
133 (void) snprintf(name
, sizeof(name
), "%s%ld%lu", TMPHDR
, i
, (unsigned long)ep
->e_ino
);
138 * Rename a file or directory.
141 renameit(char *from
, char *to
)
143 if (!Nflag
&& rename(from
, to
) < 0) {
144 warn("cannot rename %s to %s", from
, to
);
147 Vprintf(stdout
, "rename %s to %s\n", from
, to
);
151 * Create a new node (directory).
154 newnode(struct entry
*np
)
157 if (np
->e_type
!= NODE
)
158 badentry(np
, "newnode: not a node");
160 if (command
== 'C') return;
162 if (!Nflag
&& mkdir(cp
, 0777) < 0 && !uflag
) {
163 np
->e_flags
|= EXISTED
;
167 Vprintf(stdout
, "Make node %s\n", cp
);
171 * Remove an old node (directory).
174 removenode(struct entry
*ep
)
178 if (ep
->e_type
!= NODE
)
179 badentry(ep
, "removenode: not a node");
180 if (ep
->e_entries
!= NULL
)
181 badentry(ep
, "removenode: non-empty directory");
182 ep
->e_flags
|= REMOVED
;
183 ep
->e_flags
&= ~TMPNAME
;
185 if (!Nflag
&& rmdir(cp
) < 0) {
189 Vprintf(stdout
, "Remove node %s\n", cp
);
196 removeleaf(struct entry
*ep
)
200 if (command
== 'C') return;
202 if (ep
->e_type
!= LEAF
)
203 badentry(ep
, "removeleaf: not a leaf");
204 ep
->e_flags
|= REMOVED
;
205 ep
->e_flags
&= ~TMPNAME
;
207 if (!Nflag
&& unlink(cp
) < 0) {
211 Vprintf(stdout
, "Remove leaf %s\n", cp
);
218 linkit(char *existing
, char *new, int type
)
221 /* if we want to unlink first, do it now so *link() won't fail */
225 if (type
== SYMLINK
) {
226 if (!Nflag
&& symlink(existing
, new) < 0) {
227 warn("cannot create symbolic link %s->%s",
231 } else if (type
== HARDLINK
) {
234 if (!Nflag
&& (ret
= link(existing
, new)) < 0) {
240 * Most likely, the schg flag is set. Clear the
241 * flags and try again.
243 if (stat(existing
, &s
) == 0 && s
.st_flags
!= 0 &&
244 chflags(existing
, 0) == 0) {
245 ret
= link(existing
, new);
246 chflags(existing
, s
.st_flags
);
252 * Most likely, the immutable or append-only attribute
253 * is set. Clear the attributes and try again.
255 if (fgetflags (existing
, &s
) != -1 &&
256 fsetflags (existing
, 0) != -1) {
257 ret
= link(existing
, new);
258 fsetflags(existing
, s
);
262 warn("warning: cannot create hard link %s->%s",
268 panic("linkit: unknown type %d\n", type
);
271 Vprintf(stdout
, "Create %s link %s->%s\n",
272 type
== SYMLINK
? "symbolic" : "hard", new, existing
);
281 addwhiteout(char *name
)
284 if (!Nflag
&& mknod(name
, S_IFWHT
, 0) < 0) {
285 warn("cannot create whiteout %s", name
);
288 Vprintf(stdout
, "Create whiteout %s\n", name
);
296 delwhiteout(struct entry
*ep
)
300 if (ep
->e_type
!= LEAF
)
301 badentry(ep
, "delwhiteout: not a leaf");
302 ep
->e_flags
|= REMOVED
;
303 ep
->e_flags
&= ~TMPNAME
;
305 if (!Nflag
&& undelete(name
) < 0) {
306 warn("cannot delete whiteout %s", name
);
309 Vprintf(stdout
, "Delete whiteout %s\n", name
);
314 * find lowest number file (above "start") that needs to be extracted
317 lowerbnd(ino_t start
)
319 register struct entry
*ep
;
321 for ( ; start
< maxino
; start
++) {
322 ep
= lookupino(start
);
323 if (ep
== NULL
|| ep
->e_type
== NODE
)
325 if (ep
->e_flags
& (NEW
|EXTRACT
))
332 * find highest number file (below "start") that needs to be extracted
335 upperbnd(ino_t start
)
337 register struct entry
*ep
;
339 for ( ; start
> ROOTINO
; start
--) {
340 ep
= lookupino(start
);
341 if (ep
== NULL
|| ep
->e_type
== NODE
)
343 if (ep
->e_flags
& (NEW
|EXTRACT
))
350 * report on a badly formed entry
353 badentry(struct entry
*ep
, const char *msg
)
356 fprintf(stderr
, "bad entry: %s\n", msg
);
357 fprintf(stderr
, "name: %s\n", myname(ep
));
358 fprintf(stderr
, "parent name %s\n", myname(ep
->e_parent
));
359 if (ep
->e_sibling
!= NULL
)
360 fprintf(stderr
, "sibling name: %s\n", myname(ep
->e_sibling
));
361 if (ep
->e_entries
!= NULL
)
362 fprintf(stderr
, "next entry name: %s\n", myname(ep
->e_entries
));
363 if (ep
->e_links
!= NULL
)
364 fprintf(stderr
, "next link name: %s\n", myname(ep
->e_links
));
365 if (ep
->e_next
!= NULL
)
367 "next hashchain name: %s\n", myname(ep
->e_next
));
368 fprintf(stderr
, "entry type: %s\n",
369 ep
->e_type
== NODE
? "NODE" : "LEAF");
370 fprintf(stderr
, "inode number: %lu\n", (unsigned long)ep
->e_ino
);
371 panic("flags: %s\n", flagvalues(ep
));
375 * Construct a string indicating the active flag bits of an entry.
378 flagvalues(struct entry
*ep
)
380 static char flagbuf
[BUFSIZ
];
382 (void) strcpy(flagbuf
, "|NIL");
384 if (ep
->e_flags
& REMOVED
)
385 (void) strcat(flagbuf
, "|REMOVED");
386 if (ep
->e_flags
& TMPNAME
)
387 (void) strcat(flagbuf
, "|TMPNAME");
388 if (ep
->e_flags
& EXTRACT
)
389 (void) strcat(flagbuf
, "|EXTRACT");
390 if (ep
->e_flags
& NEW
)
391 (void) strcat(flagbuf
, "|NEW");
392 if (ep
->e_flags
& KEEP
)
393 (void) strcat(flagbuf
, "|KEEP");
394 if (ep
->e_flags
& EXISTED
)
395 (void) strcat(flagbuf
, "|EXISTED");
396 return (&flagbuf
[1]);
400 * Check to see if a name is on a dump tape.
403 dirlookup(const char *name
)
408 ino
= ((dp
= pathsearch(name
)) == NULL
) ? 0 : dp
->d_ino
;
410 if (ino
== 0 || TSTINO(ino
, dumpmap
) == 0)
411 fprintf(stderr
, "%s is not on the tape\n", name
);
419 reply(const char *question
)
424 fprintf(stderr
, "%s? [yn] ", question
);
425 (void) fflush(stderr
);
427 while (c
!= '\n' && getc(terminal
) != '\n')
430 } while (c
!= 'y' && c
!= 'n');
437 * handle unexpected inconsistencies
447 panic(const char *fmt
, ...)
461 vfprintf(stderr
, fmt
, ap
);
464 if (reply("abort") == GOOD
) {
465 if (reply("dump core") == GOOD
)