manual page distributed with 4.1BSD

[unix-history] / usr / src / sbin / restore / dirs.c

diff --git a/usr/src/sbin/restore/dirs.c b/usr/src/sbin/restore/dirs.c
index f68011f..97db9c8 100644 (file)
--- a/usr/src/sbin/restore/dirs.c
+++ b/usr/src/sbin/restore/dirs.c
@@ -1,16 +1,17 @@
-/* Copyright (c) 1983 Regents of the University of California */
-

 #ifndef lint
 #ifndef lint

-static char sccsid[] = "@(#)dirs.c     3.5     (Berkeley)      83/03/23";
+static char sccsid[] = "@(#)dirs.c     3.20    (Berkeley)      85/02/18";

 #endif
 
 #endif
 

+/* Copyright (c) 1983 Regents of the University of California */
+

 #include "restore.h"
 #include <dumprestor.h>
 #include <sys/file.h>
 #include "restore.h"
 #include <dumprestor.h>
 #include <sys/file.h>

-#include <dir.h>

 
 

+/*
+ * Symbol table of directories read from tape.
+ */

 #define HASHSIZE       1000
 #define HASHSIZE       1000

-

 #define INOHASH(val) (val % HASHSIZE)
 struct inotab {
        struct inotab *t_next;
 #define INOHASH(val) (val % HASHSIZE)
 struct inotab {
        struct inotab *t_next;


@@ -22,6 +23,9 @@ static struct inotab *inotab[HASHSIZE];
 extern struct inotab *inotablookup();
 extern struct inotab *allocinotab();
 
 extern struct inotab *inotablookup();
 extern struct inotab *allocinotab();
 

+/*
+ * Information retained about directories.
+ */

 struct modeinfo {
        ino_t ino;
        time_t timep[2];
 struct modeinfo {
        ino_t ino;
        time_t timep[2];


@@ -30,12 +34,21 @@ struct modeinfo {
        short gid;
 };
 
        short gid;
 };
 

+/*
+ * Global variables for this file.
+ */

 static daddr_t seekpt;
 static FILE    *df, *mf;
 static DIR     *dirp;
 static daddr_t seekpt;
 static FILE    *df, *mf;
 static DIR     *dirp;

-static char    dirfile[] = "/tmp/rstaXXXXXX";
+static char    dirfile[32] = "#";      /* No file */
+static char    modefile[32] = "#";     /* No file */

 extern ino_t   search();
 extern ino_t   search();

+struct direct  *rst_readdir();
+extern void    rst_seekdir();

 
 

+/*
+ * Format of old style directories.
+ */

 #define ODIRSIZ 14
 struct odirect {
        u_short d_ino;
 #define ODIRSIZ 14
 struct odirect {
        u_short d_ino;


@@ -45,11 +58,11 @@ struct odirect {
 /*
  *     Extract directory contents, building up a directory structure
  *     on disk for extraction by name.
 /*
  *     Extract directory contents, building up a directory structure
  *     on disk for extraction by name.

- *     If modefile is requested, save mode, owner, and times for all
+ *     If genmode is requested, save mode, owner, and times for all

  *     directories on the tape.
  */
  *     directories on the tape.
  */

-extractdirs(modefile)
-       char *modefile;
+extractdirs(genmode)
+       int genmode;

 {
        register int i;
        register struct dinode *ip;
 {
        register int i;
        register struct dinode *ip;


@@ -58,20 +71,21 @@ extractdirs(modefile)
        int putdir(), null();
 
        vprintf(stdout, "Extract directories from tape\n");
        int putdir(), null();
 
        vprintf(stdout, "Extract directories from tape\n");

-       (void) mktemp(dirfile);
+       (void) sprintf(dirfile, "/tmp/rstdir%d", dumpdate);

        df = fopen(dirfile, "w");
        if (df == 0) {
                fprintf(stderr,
        df = fopen(dirfile, "w");
        if (df == 0) {
                fprintf(stderr,

-                   "restor: %s - cannot create directory temporary\n",
+                   "restore: %s - cannot create directory temporary\n",

                    dirfile);
                perror("fopen");
                done(1);
        }
                    dirfile);
                perror("fopen");
                done(1);
        }

-       if (modefile != NULL) {
+       if (genmode != 0) {
+               (void) sprintf(modefile, "/tmp/rstmode%d", dumpdate);

                mf = fopen(modefile, "w");
                if (mf == 0) {
                        fprintf(stderr,
                mf = fopen(modefile, "w");
                if (mf == 0) {
                        fprintf(stderr,

-                           "restor: %s - cannot create modefile \n",
+                           "restore: %s - cannot create modefile \n",

                            modefile);
                        perror("fopen");
                        done(1);
                            modefile);
                        perror("fopen");
                        done(1);


@@ -79,21 +93,21 @@ extractdirs(modefile)
        }
        nulldir.d_ino = 0;
        nulldir.d_namlen = 1;
        }
        nulldir.d_ino = 0;
        nulldir.d_namlen = 1;

-       strncpy(nulldir.d_name, "/", nulldir.d_namlen);
+       (void) strcpy(nulldir.d_name, "/");

        nulldir.d_reclen = DIRSIZ(&nulldir);
        for (;;) {
                curfile.name = "<directory file - name unknown>";
                curfile.action = USING;
                ip = curfile.dip;
        nulldir.d_reclen = DIRSIZ(&nulldir);
        for (;;) {
                curfile.name = "<directory file - name unknown>";
                curfile.action = USING;
                ip = curfile.dip;

-               i = ip->di_mode & IFMT;
-               if (i != IFDIR) {
-                       fclose(df);
+               if (ip == NULL || (ip->di_mode & IFMT) != IFDIR) {
+                       (void) fclose(df);

                        dirp = opendir(dirfile);
                        if (dirp == NULL)
                                perror("opendir");
                        if (mf != NULL)
                        dirp = opendir(dirfile);
                        if (dirp == NULL)
                                perror("opendir");
                        if (mf != NULL)

-                               fclose(mf);
-                       if ((i = psearch(".")) == 0 || BIT(i, dumpmap) == 0)
+                               (void) fclose(mf);
+                       i = dirlookup(".");
+                       if (i == 0)

                                panic("Root directory is not on tape\n");
                        return;
                }
                                panic("Root directory is not on tape\n");
                        return;
                }


@@ -123,12 +137,13 @@ skipdirs()
 treescan(pname, ino, todo)
        char *pname;
        ino_t ino;
 treescan(pname, ino, todo)
        char *pname;
        ino_t ino;

-       void (*todo)();
+       long (*todo)();

 {
        register struct inotab *itp;
 {
        register struct inotab *itp;

+       register struct direct *dp;
+       register struct entry *np;

        int namelen;
        daddr_t bpt;
        int namelen;
        daddr_t bpt;

-       register struct direct *dp;

        char locname[MAXPATHLEN + 1];
 
        itp = inotablookup(ino);
        char locname[MAXPATHLEN + 1];
 
        itp = inotablookup(ino);


@@ -136,39 +151,54 @@ treescan(pname, ino, todo)
                /*
                 * Pname is name of a simple file or an unchanged directory.
                 */
                /*
                 * Pname is name of a simple file or an unchanged directory.
                 */

-               (*todo)(pname, ino, LEAF);
+               (void) (*todo)(pname, ino, LEAF);

                return;
        }
        /*
         * Pname is a dumped directory name.
         */
                return;
        }
        /*
         * Pname is a dumped directory name.
         */

-       (*todo)(pname, ino, NODE);
+       if ((*todo)(pname, ino, NODE) == FAIL)
+               return;

        /*
         * begin search through the directory
         * skipping over "." and ".."
         */
        /*
         * begin search through the directory
         * skipping over "." and ".."
         */

-       strncpy(locname, pname, MAXPATHLEN);
-       strncat(locname, "/", MAXPATHLEN);
+       (void) strncpy(locname, pname, MAXPATHLEN);
+       (void) strncat(locname, "/", MAXPATHLEN);

        namelen = strlen(locname);
        namelen = strlen(locname);

-       seekdir(dirp, itp->t_seekpt, itp->t_seekpt);
-       dp = readdir(dirp); /* "." */
-       dp = readdir(dirp); /* ".." */
-       dp = readdir(dirp); /* first real entry */
+       rst_seekdir(dirp, itp->t_seekpt, itp->t_seekpt);
+       dp = rst_readdir(dirp); /* "." */
+       if (dp != NULL && strcmp(dp->d_name, ".") == 0) {
+               dp = rst_readdir(dirp); /* ".." */
+       } else {
+               np = lookupino(ino);
+               if (np == NULL)
+                       panic("corrupted symbol table\n");
+               fprintf(stderr, ". missing from directory %s\n", myname(np));
+       }
+       if (dp != NULL && strcmp(dp->d_name, "..") == 0) {
+               dp = rst_readdir(dirp); /* first real entry */
+       } else {
+               np = lookupino(ino);
+               if (np == NULL)
+                       panic("corrupted symbol table\n");
+               fprintf(stderr, ".. missing from directory %s\n", myname(np));
+       }

        bpt = telldir(dirp);
        /*
        bpt = telldir(dirp);
        /*

-        * "/" signals end of directory
+        * a zero inode signals end of directory

         */
         */

-       while (dp != NULL && !(dp->d_namlen == 1 && dp->d_name[0] == '/')) {
+       while (dp != NULL && dp->d_ino != 0) {

                locname[namelen] = '\0';
                if (namelen + dp->d_namlen >= MAXPATHLEN) {
                        fprintf(stderr, "%s%s: name exceeds %d char\n",
                                locname, dp->d_name, MAXPATHLEN);
                } else {
                locname[namelen] = '\0';
                if (namelen + dp->d_namlen >= MAXPATHLEN) {
                        fprintf(stderr, "%s%s: name exceeds %d char\n",
                                locname, dp->d_name, MAXPATHLEN);
                } else {

-                       strncat(locname, dp->d_name, dp->d_namlen);
+                       (void) strncat(locname, dp->d_name, (int)dp->d_namlen);

                        treescan(locname, dp->d_ino, todo);
                        treescan(locname, dp->d_ino, todo);

-                       seekdir(dirp, bpt, itp->t_seekpt);
+                       rst_seekdir(dirp, bpt, itp->t_seekpt);

                }
                }

-               dp = readdir(dirp);
+               dp = rst_readdir(dirp);

                bpt = telldir(dirp);
        }
        if (dp == NULL)
                bpt = telldir(dirp);
        }
        if (dp == NULL)


@@ -225,13 +255,13 @@ search(inum, cp)
        itp = inotablookup(inum);
        if (itp == NULL)
                return(0);
        itp = inotablookup(inum);
        if (itp == NULL)
                return(0);

-       seekdir(dirp, itp->t_seekpt, itp->t_seekpt);
+       rst_seekdir(dirp, itp->t_seekpt, itp->t_seekpt);

        len = strlen(cp);
        do {
        len = strlen(cp);
        do {

-               dp = readdir(dirp);
-               if (dp->d_namlen == 1 && dp->d_name[0] == '/')
-                       return(0);
-       } while (dp->d_namlen != len || strncmp(dp->d_name, cp, len));
+               dp = rst_readdir(dirp);
+               if (dp == NULL || dp->d_ino == 0)
+                       return (0);
+       } while (dp->d_namlen != len || strncmp(dp->d_name, cp, len) != 0);

        return(dp->d_ino);
 }
 
        return(dp->d_ino);
 }
 


@@ -288,7 +318,7 @@ putent(dp)
        if (dirloc + dp->d_reclen > DIRBLKSIZ) {
                ((struct direct *)(dirbuf + prev))->d_reclen =
                    DIRBLKSIZ - prev;
        if (dirloc + dp->d_reclen > DIRBLKSIZ) {
                ((struct direct *)(dirbuf + prev))->d_reclen =
                    DIRBLKSIZ - prev;

-               fwrite(dirbuf, 1, DIRBLKSIZ, df);
+               (void) fwrite(dirbuf, 1, DIRBLKSIZ, df);

                dirloc = 0;
        }
        bcopy((char *)dp, dirbuf + dirloc, (long)dp->d_reclen);
                dirloc = 0;
        }
        bcopy((char *)dp, dirbuf + dirloc, (long)dp->d_reclen);


@@ -303,7 +333,7 @@ flushent()
 {
 
        ((struct direct *)(dirbuf + prev))->d_reclen = DIRBLKSIZ - prev;
 {
 
        ((struct direct *)(dirbuf + prev))->d_reclen = DIRBLKSIZ - prev;

-       fwrite(dirbuf, (int)dirloc, 1, df);
+       (void) fwrite(dirbuf, (int)dirloc, 1, df);

        seekpt = ftell(df);
        dirloc = 0;
 }
        seekpt = ftell(df);
        dirloc = 0;
 }


@@ -315,46 +345,20 @@ dcvt(odp, ndp)
 
        bzero((char *)ndp, (long)(sizeof *ndp));
        ndp->d_ino =  odp->d_ino;
 
        bzero((char *)ndp, (long)(sizeof *ndp));
        ndp->d_ino =  odp->d_ino;

-       strncpy(ndp->d_name, odp->d_name, ODIRSIZ);
+       (void) strncpy(ndp->d_name, odp->d_name, ODIRSIZ);

        ndp->d_namlen = strlen(ndp->d_name);
        ndp->d_reclen = DIRSIZ(ndp);
        ndp->d_namlen = strlen(ndp->d_name);
        ndp->d_reclen = DIRSIZ(ndp);

-       /*
-        * this quickly calculates if this inode is a directory.
-        * Currently not maintained.
-        *
-       itp = inotablookup(odp->d_ino);
-       if (itp != NIL)
-               ndp->d_fmt = IFDIR;
-        */
-}
-
-/*
- * Open a directory.
- * Modified to allow any random file to be a legal directory.
- */
-DIR *
-opendir(name)
-       char *name;
-{
-       register DIR *dirp;
-
-       dirp = (DIR *)malloc((unsigned)sizeof(DIR));
-       dirp->dd_fd = open(name, 0);
-       if (dirp->dd_fd == -1) {
-               free((char *)dirp);
-               return NULL;
-       }
-       dirp->dd_loc = 0;
-       return dirp;

 }
 
 /*
  * Seek to an entry in a directory.
 }
 
 /*
  * Seek to an entry in a directory.

- * Only values returned by ``telldir'' should be passed to seekdir.
- * Modified to have many directories based in one file.
+ * Only values returned by ``telldir'' should be passed to rst_seekdir.
+ * This routine handles many directories in a single file.
+ * It takes the base of the directory in the file, plus
+ * the desired seek offset into it.

  */
 void
  */
 void

-seekdir(dirp, loc, base)
+rst_seekdir(dirp, loc, base)

        register DIR *dirp;
        daddr_t loc, base;
 {
        register DIR *dirp;
        daddr_t loc, base;
 {


@@ -363,7 +367,7 @@ seekdir(dirp, loc, base)
                return;
        loc -= base;
        if (loc < 0)
                return;
        loc -= base;
        if (loc < 0)

-               fprintf(stderr, "bad seek pointer to seekdir %d\n", loc);
+               fprintf(stderr, "bad seek pointer to rst_seekdir %d\n", loc);

        (void) lseek(dirp->dd_fd, base + (loc & ~(DIRBLKSIZ - 1)), 0);
        dirp->dd_loc = loc & (DIRBLKSIZ - 1);
        if (dirp->dd_loc != 0)
        (void) lseek(dirp->dd_fd, base + (loc & ~(DIRBLKSIZ - 1)), 0);
        dirp->dd_loc = loc & (DIRBLKSIZ - 1);
        if (dirp->dd_loc != 0)


@@ -374,7 +378,7 @@ seekdir(dirp, loc, base)
  * get next entry in a directory.
  */
 struct direct *
  * get next entry in a directory.
  */
 struct direct *

-readdir(dirp)
+rst_readdir(dirp)

        register DIR *dirp;
 {
        register struct direct *dp;
        register DIR *dirp;
 {
        register struct direct *dp;


@@ -383,8 +387,10 @@ readdir(dirp)
                if (dirp->dd_loc == 0) {
                        dirp->dd_size = read(dirp->dd_fd, dirp->dd_buf, 
                            DIRBLKSIZ);
                if (dirp->dd_loc == 0) {
                        dirp->dd_size = read(dirp->dd_fd, dirp->dd_buf, 
                            DIRBLKSIZ);

-                       if (dirp->dd_size <= 0)
+                       if (dirp->dd_size <= 0) {
+                               dprintf(stderr, "error reading directory\n");

                                return NULL;
                                return NULL;

+                       }

                }
                if (dirp->dd_loc >= dirp->dd_size) {
                        dirp->dd_loc = 0;
                }
                if (dirp->dd_loc >= dirp->dd_size) {
                        dirp->dd_loc = 0;


@@ -392,18 +398,45 @@ readdir(dirp)
                }
                dp = (struct direct *)(dirp->dd_buf + dirp->dd_loc);
                if (dp->d_reclen == 0 ||
                }
                dp = (struct direct *)(dirp->dd_buf + dirp->dd_loc);
                if (dp->d_reclen == 0 ||

-                   dp->d_reclen > DIRBLKSIZ + 1 - dirp->dd_loc)
+                   dp->d_reclen > DIRBLKSIZ + 1 - dirp->dd_loc) {
+                       dprintf(stderr, "corrupted directory: bad reclen %d\n",
+                               dp->d_reclen);

                        return NULL;
                        return NULL;

+               }

                dirp->dd_loc += dp->d_reclen;
                dirp->dd_loc += dp->d_reclen;

+               if (dp->d_ino == 0 && strcmp(dp->d_name, "/") != 0)
+                       continue;
+               if (dp->d_ino >= maxino) {
+                       dprintf(stderr, "corrupted directory: bad inum %d\n",
+                               dp->d_ino);
+                       continue;
+               }

                return (dp);
        }
 }
 
                return (dp);
        }
 }
 

+/*
+ * Simulate the opening of a directory
+ */
+DIR *
+rst_opendir(name)
+       char *name;
+{
+       struct inotab *itp;
+       ino_t ino;
+
+       if ((ino = dirlookup(name)) > 0 &&
+           (itp = inotablookup(ino)) != NULL) {
+               rst_seekdir(dirp, itp->t_seekpt, itp->t_seekpt);
+               return (dirp);
+       }
+       return (0);
+}
+

 /*
  * Set the mode, owner, and times for all new or changed directories
  */
 /*
  * Set the mode, owner, and times for all new or changed directories
  */

-setdirmodes(modefile)
-       char *modefile;
+setdirmodes()

 {
        FILE *mf;
        struct modeinfo node;
 {
        FILE *mf;
        struct modeinfo node;


@@ -411,31 +444,42 @@ setdirmodes(modefile)
        char *cp;
        
        vprintf(stdout, "Set directory mode, owner, and times.\n");
        char *cp;
        
        vprintf(stdout, "Set directory mode, owner, and times.\n");

+       (void) sprintf(modefile, "/tmp/rstmode%d", dumpdate);

        mf = fopen(modefile, "r");
        if (mf == NULL) {
                perror("fopen");
        mf = fopen(modefile, "r");
        if (mf == NULL) {
                perror("fopen");

-               panic("cannot open mode file %s\n", modefile);
+               fprintf(stderr, "cannot open mode file %s\n", modefile);
+               fprintf(stderr, "directory mode, owner, and times not set\n");
+               return;

        }
        clearerr(mf);
        for (;;) {
        }
        clearerr(mf);
        for (;;) {

-               fread((char *)&node, 1, sizeof(struct modeinfo), mf);
+               (void) fread((char *)&node, 1, sizeof(struct modeinfo), mf);

                if (feof(mf))
                        break;
                ep = lookupino(node.ino);
                if (feof(mf))
                        break;
                ep = lookupino(node.ino);

-               if (ep == NIL) {
-                       if (command == 'x')
+               if (command == 'i' || command == 'x') {
+                       if (ep == NIL)
+                               continue;
+                       if (ep->e_flags & EXISTED) {
+                               ep->e_flags &= ~NEW;
+                               continue;
+                       }
+                       if (node.ino == ROOTINO &&
+                           reply("set owner/mode for '.'") == FAIL)

                                continue;
                                continue;

-                       panic("cannot find directory inode %d\n", node.ino);

                }
                }

+               if (ep == NIL)
+                       panic("cannot find directory inode %d\n", node.ino);

                cp = myname(ep);
                cp = myname(ep);

-               chown(cp, node.uid, node.gid);
-               chmod(cp, node.mode);
+               (void) chown(cp, node.uid, node.gid);
+               (void) chmod(cp, node.mode);

                utime(cp, node.timep);
                utime(cp, node.timep);

+               ep->e_flags &= ~NEW;

        }
        if (ferror(mf))
                panic("error setting directory modes\n");
        }
        if (ferror(mf))
                panic("error setting directory modes\n");

-       fclose(mf);
-       (void) unlink(modefile);
+       (void) fclose(mf);

 }
 
 /*
 }
 
 /*


@@ -452,11 +496,13 @@ genliteraldir(name, ino)
        itp = inotablookup(ino);
        if (itp == NULL)
                panic("Cannot find directory inode %d named %s\n", ino, name);
        itp = inotablookup(ino);
        if (itp == NULL)
                panic("Cannot find directory inode %d named %s\n", ino, name);

-       if ((ofile = open(name, FWRONLY|FCREATE, 0666)) < 0) {
-               fprintf(stderr, "%s: cannot create file\n", name);
+       if ((ofile = creat(name, 0666)) < 0) {
+               fprintf(stderr, "%s: ", name);
+               (void) fflush(stderr);
+               perror("cannot create file");

                return (FAIL);
        }
                return (FAIL);
        }

-       seekdir(dirp, itp->t_seekpt, itp->t_seekpt);
+       rst_seekdir(dirp, itp->t_seekpt, itp->t_seekpt);

        dp = dup(dirp->dd_fd);
        for (i = itp->t_size; i > 0; i -= BUFSIZ) {
                size = i < BUFSIZ ? i : BUFSIZ;
        dp = dup(dirp->dd_fd);
        for (i = itp->t_size; i > 0; i -= BUFSIZ) {
                size = i < BUFSIZ ? i : BUFSIZ;


@@ -475,8 +521,8 @@ genliteraldir(name, ino)
                        done(1);
                }
        }
                        done(1);
                }
        }

-       close(dp);
-       close(ofile);
+       (void) close(dp);
+       (void) close(ofile);

        return (GOOD);
 }
 
        return (GOOD);
 }
 


@@ -508,6 +554,8 @@ allocinotab(ino, dip, seekpt)
        struct modeinfo node;
 
        itp = (struct inotab *)calloc(1, sizeof(struct inotab));
        struct modeinfo node;
 
        itp = (struct inotab *)calloc(1, sizeof(struct inotab));

+       if (itp == 0)
+               panic("no memory directory table\n");

        itp->t_next = inotab[INOHASH(ino)];
        inotab[INOHASH(ino)] = itp;
        itp->t_ino = ino;
        itp->t_next = inotab[INOHASH(ino)];
        inotab[INOHASH(ino)] = itp;
        itp->t_ino = ino;


@@ -520,7 +568,7 @@ allocinotab(ino, dip, seekpt)
        node.mode = dip->di_mode;
        node.uid = dip->di_uid;
        node.gid = dip->di_gid;
        node.mode = dip->di_mode;
        node.uid = dip->di_uid;
        node.gid = dip->di_gid;

-       fwrite((char *)&node, 1, sizeof(struct modeinfo), mf);
+       (void) fwrite((char *)&node, 1, sizeof(struct modeinfo), mf);

        return(itp);
 }
 
        return(itp);
 }
 


@@ -547,6 +595,9 @@ done(exitcode)
 {
 
        closemt();
 {
 
        closemt();

-       (void) unlink(dirfile);
+       if (modefile[0] != '#')
+               (void) unlink(modefile);
+       if (dirfile[0] != '#')
+               (void) unlink(dirfile);

        exit(exitcode);
 }
        exit(exitcode);
 }