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) 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. 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: utilities.c,v 1.24 2003/11/22 16:52:16 stelian Exp $";
44 #include <compatlfs.h>
45 #include <sys/types.h>
47 #include <compaterr.h>
52 #include <sys/param.h>
59 #ifdef HAVE_EXT2FS_EXT2_FS_H
60 #include <ext2fs/ext2_fs.h>
62 #include <linux/ext2_fs.h>
64 #include <ext2fs/ext2fs.h>
65 #include <bsdcompat.h>
69 #include <sys/fcntl.h>
70 #include <bsdcompat.h>
72 #include <ufs/ufs/dinode.h>
73 #include <ufs/ufs/dir.h>
75 #endif /* __linux__ */
83 * Insure that all the components of a pathname exist.
92 start = strchr(name, '/');
95 for (cp = start; *cp != '\0'; cp++) {
99 ep = lookupname(name);
101 /* Safe; we know the pathname exists in the dump. */
102 ep = addentry(name, pathsearch(name)->d_ino, NODE);
105 ep->e_flags |= NEW|KEEP;
111 * Change a name to a unique temporary name.
114 mktempname(struct entry *ep)
116 char oldname[MAXPATHLEN];
118 if (ep->e_flags & TMPNAME)
119 badentry(ep, "mktempname: called with TMPNAME");
120 ep->e_flags |= TMPNAME;
121 (void) strcpy(oldname, myname(ep));
122 freename(ep->e_name);
123 ep->e_name = savename(gentempname(ep));
124 ep->e_namlen = strlen(ep->e_name);
125 renameit(oldname, myname(ep));
129 * Generate a temporary name for an entry.
132 gentempname(struct entry *ep)
134 static char name[MAXPATHLEN];
138 for (np = lookupino(ep->e_ino);
139 np != NULL && np != ep; np = np->e_links)
142 badentry(ep, "not on ino list");
143 (void) snprintf(name, sizeof(name), "%s%ld%lu", TMPHDR, i, (unsigned long)ep->e_ino);
148 * Rename a file or directory.
151 renameit(char *from, char *to)
153 if (!Nflag && rename(from, to) < 0) {
154 warn("cannot rename %s to %s", from, to);
157 Vprintf(stdout, "rename %s to %s\n", from, to);
161 * Create a new node (directory).
164 newnode(struct entry *np)
167 if (np->e_type != NODE)
168 badentry(np, "newnode: not a node");
170 if (command == 'C') return;
172 if (!Nflag && mkdir(cp, 0777) < 0 && !uflag) {
173 np->e_flags |= EXISTED;
177 Vprintf(stdout, "Make node %s\n", cp);
181 * Remove an old node (directory).
184 removenode(struct entry *ep)
188 if (ep->e_type != NODE)
189 badentry(ep, "removenode: not a node");
190 if (ep->e_entries != NULL)
191 badentry(ep, "removenode: non-empty directory");
192 ep->e_flags |= REMOVED;
193 ep->e_flags &= ~TMPNAME;
195 if (!Nflag && rmdir(cp) < 0) {
199 Vprintf(stdout, "Remove node %s\n", cp);
206 removeleaf(struct entry *ep)
210 if (command == 'C') return;
212 if (ep->e_type != LEAF)
213 badentry(ep, "removeleaf: not a leaf");
214 ep->e_flags |= REMOVED;
215 ep->e_flags &= ~TMPNAME;
217 if (!Nflag && unlink(cp) < 0) {
221 Vprintf(stdout, "Remove leaf %s\n", cp);
228 linkit(char *existing, char *new, int type)
231 /* if we want to unlink first, do it now so *link() won't fail */
235 if (type == SYMLINK) {
236 if (!Nflag && symlink(existing, new) < 0) {
237 warn("cannot create symbolic link %s->%s",
241 } else if (type == HARDLINK) {
244 if (!Nflag && (ret = link(existing, new)) < 0) {
246 #if !defined(__linux__) && !defined(sunos)
250 * Most likely, the schg flag is set. Clear the
251 * flags and try again.
253 if (stat(existing, &s) == 0 && s.st_flags != 0 &&
254 chflags(existing, 0) == 0) {
255 ret = link(existing, new);
256 chflags(existing, s.st_flags);
262 * Most likely, the immutable or append-only attribute
263 * is set. Clear the attributes and try again.
267 if (fgetflags (existing, &s) != -1 &&
268 fsetflags (existing, 0) != -1) {
269 ret = link(existing, new);
270 fsetflags(existing, s);
275 warn("warning: cannot create hard link %s->%s",
281 panic("linkit: unknown type %d\n", type);
284 Vprintf(stdout, "Create %s link %s->%s\n",
285 type == SYMLINK ? "symbolic" : "hard", new, existing);
289 #if !defined(__linux__) && !defined(sunos)
294 addwhiteout(char *name)
297 if (!Nflag && mknod(name, S_IFWHT, 0) < 0) {
298 warn("cannot create whiteout %s", name);
301 Vprintf(stdout, "Create whiteout %s\n", name);
309 delwhiteout(struct entry *ep)
313 if (ep->e_type != LEAF)
314 badentry(ep, "delwhiteout: not a leaf");
315 ep->e_flags |= REMOVED;
316 ep->e_flags &= ~TMPNAME;
318 if (!Nflag && undelete(name) < 0) {
319 warn("cannot delete whiteout %s", name);
322 Vprintf(stdout, "Delete whiteout %s\n", name);
327 * find lowest number file (above "start") that needs to be extracted
330 lowerbnd(dump_ino_t start)
334 for ( ; start < maxino; start++) {
335 ep = lookupino(start);
336 if (ep == NULL || ep->e_type == NODE)
338 if (ep->e_flags & (NEW|EXTRACT))
345 * find highest number file (below "start") that needs to be extracted
348 upperbnd(dump_ino_t start)
352 for ( ; start > ROOTINO; start--) {
353 ep = lookupino(start);
354 if (ep == NULL || ep->e_type == NODE)
356 if (ep->e_flags & (NEW|EXTRACT))
363 * report on a badly formed entry
366 badentry(struct entry *ep, const char *msg)
369 fprintf(stderr, "bad entry: %s\n", msg);
370 fprintf(stderr, "name: %s\n", myname(ep));
371 fprintf(stderr, "parent name %s\n", myname(ep->e_parent));
372 if (ep->e_sibling != NULL)
373 fprintf(stderr, "sibling name: %s\n", myname(ep->e_sibling));
374 if (ep->e_entries != NULL)
375 fprintf(stderr, "next entry name: %s\n", myname(ep->e_entries));
376 if (ep->e_links != NULL)
377 fprintf(stderr, "next link name: %s\n", myname(ep->e_links));
378 if (ep->e_next != NULL)
380 "next hashchain name: %s\n", myname(ep->e_next));
381 fprintf(stderr, "entry type: %s\n",
382 ep->e_type == NODE ? "NODE" : "LEAF");
383 fprintf(stderr, "inode number: %lu\n", (unsigned long)ep->e_ino);
384 panic("flags: %s\n", flagvalues(ep));
388 * Construct a string indicating the active flag bits of an entry.
391 flagvalues(struct entry *ep)
393 static char flagbuf[BUFSIZ];
395 (void) strcpy(flagbuf, "|NIL");
397 if (ep->e_flags & REMOVED)
398 (void) strcat(flagbuf, "|REMOVED");
399 if (ep->e_flags & TMPNAME)
400 (void) strcat(flagbuf, "|TMPNAME");
401 if (ep->e_flags & EXTRACT)
402 (void) strcat(flagbuf, "|EXTRACT");
403 if (ep->e_flags & NEW)
404 (void) strcat(flagbuf, "|NEW");
405 if (ep->e_flags & KEEP)
406 (void) strcat(flagbuf, "|KEEP");
407 if (ep->e_flags & EXISTED)
408 (void) strcat(flagbuf, "|EXISTED");
409 return (&flagbuf[1]);
413 * Check to see if a name is on a dump tape.
416 dirlookup(const char *name)
421 ino = ((dp = pathsearch(name)) == NULL) ? 0 : dp->d_ino;
423 if (ino == 0 || TSTINO(ino, dumpmap) == 0)
424 fprintf(stderr, "%s is not on the tape\n", name);
432 reply(const char *question)
437 fprintf(stderr, "%s? [yn] ", question);
438 (void) fflush(stderr);
440 while (c != '\n' && getc(terminal) != '\n')
443 } while (c != 'y' && c != 'n');
450 * handle unexpected inconsistencies
460 panic(const char *fmt, ...)
474 vfprintf(stderr, fmt, ap);
477 if (reply("abort") == GOOD) {
478 if (reply("dump core") == GOOD)
484 void resizemaps(dump_ino_t oldmax, dump_ino_t newmax)
489 map = calloc((unsigned)1, (unsigned)howmany(newmax, NBBY));
491 errx(1, "no memory for active inode map");
492 memcpy(map, usedinomap, howmany(oldmax, NBBY));
497 map = calloc((unsigned)1, (unsigned)howmany(newmax, NBBY));
499 errx(1, "no memory for file dump list");
500 memcpy(map, dumpmap, howmany(oldmax, NBBY));
507 GetPathFile(char *source, char *path, char *fname)
523 strncpy(path, source, p - source);
524 path[p - source] = 0;
531 * search for ino in QFA file
534 * if ino found return tape number and tape position
535 * if ino not found return tnum=0 and tpos=0
538 * if ino found return tape number and tape position
539 * if ino not found return tape number and tape position of last smaller ino
540 * if no smaller inode found return tnum=0 and tpos=0
543 Inode2Tapepos(dump_ino_t ino, long *tnum, long long *tpos, int exactmatch)
547 unsigned long tmpino;
553 if (fseek(gTapeposfp, gSeekstart, SEEK_SET) == -1)
556 gSeekstart = ftell(gTapeposfp); /* remember for later use */
557 if (fgets(gTps, sizeof(gTps), gTapeposfp) == NULL) {
560 gTps[strlen(gTps) - 1] = 0; /* delete end of line */
562 bzero(numbuff, sizeof(numbuff));
565 while ((*p != 0) && (*p != '\t'))
567 tmpino = atol(numbuff);
569 return 1; /* may NOT happen */
571 bzero(numbuff, sizeof(numbuff));
574 while ((*p != 0) && (*p != '\t'))
577 return 1; /* may NOT happen */
578 tmptnum = atol(numbuff);
580 bzero(numbuff, sizeof(numbuff));
583 while ((*p != 0) && (*p != '\t'))
585 tmptpos = atoll(numbuff);
607 GetSCSIIDFromPath(char *devPath, long *id)
617 bzero(fbuff, sizeof(fbuff));
618 if ((len = readlink(devPath, fbuff, 2048)) == -1) {
622 GetPathFile(fbuff, path, fname);
623 (void)memset(idstr, 0, sizeof(idstr));
624 while (*fpn && (*fpn != ',')) {
625 if (*fpn <= '9' && *fpn >= '0') {
643 CreateAppleDoubleFileRes(char *oFile, FndrFileInfo *finderinfo, mode_t mode, int flags,
644 struct timeval *timep, u_int32_t uid, u_int32_t gid)
656 n = 1; /* number of entries in double file ._ only finderinfo */
660 currently no resource fork
664 thesize = sizeof(ASDHeader) + (n * sizeof(ASDEntry)) + INFOLEN;
665 if ((pp = p = (char *)malloc(thesize)) == NULL) {
670 hp = (ASDHeaderPtr)p;
671 p += sizeof(ASDHeader);
673 p += sizeof(ASDEntry) * n;
675 hp->magic = ADOUBLE_MAGIC;
676 hp->version = ASD_VERSION2;
678 bzero(&hp->filler, sizeof(hp->filler));
679 hp->entries = (short)n;
681 ep->entryID = EntryFinderInfo;
682 ep->offset = p - pp - CORRECT;
683 ep->len = INFOLEN; /* sizeof(MacFInfo) + sizeof(FXInfo); */
685 bcopy(finderinfo, p, sizeof(FndrFileInfo));
689 if ((fdout = open(oFile, O_WRONLY | O_CREAT | O_TRUNC, 0666)) < 0) {
695 /* write the ASDHeader */
696 if (write(fdout, pp, sizeof(ASDHeader) - CORRECT) == -1) {
703 /* write the ASDEntries */
704 if (write(fdout, pp + sizeof(ASDHeader), thesize - sizeof(ASDHeader)) == -1) {
712 (void)fchown(fdout, uid, gid);
713 (void)fchmod(fdout, mode);
715 (void)fsetflags(oFile, flags);
716 utimes(oFile, timep);
720 #endif /* DUMP_MACOSX */