BSD 4_4_Lite1 release
[unix-history] / usr / src / sbin / clri / clri.c
index 883762b..c2bdccc 100644 (file)
-static char sccsid[] = "@(#)clri.c 2.1 %G%";
-
-/* static char *sccsid = "@(#)clri.c   4.1 (Berkeley) 10/1/80"; */
-
 /*
 /*
- * clri filsys inumber ...
+ * Copyright (c) 1990, 1993
+ *     The Regents of the University of California.  All rights reserved.
+ *
+ * This code is derived from software contributed to Berkeley by
+ * Rich $alz of BBN Inc.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. All advertising materials mentioning features or use of this software
+ *    must display the following acknowledgement:
+ *     This product includes software developed by the University of
+ *     California, Berkeley and its contributors.
+ * 4. Neither the name of the University nor the names of its contributors
+ *    may be used to endorse or promote products derived from this software
+ *    without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
  */
 
  */
 
-#ifndef SIMFS
+#ifndef lint
+static char copyright[] =
+"@(#) Copyright (c) 1990, 1993\n\
+       The Regents of the University of California.  All rights reserved.\n";
+#endif /* not lint */
+
+#ifndef lint
+static char sccsid[] = "@(#)clri.c     8.2 (Berkeley) 9/23/93";
+#endif /* not lint */
+
 #include <sys/param.h>
 #include <sys/param.h>
-#include <sys/inode.h>
-#include <sys/fs.h>
-#else
-#include "../h/param.h"
-#include "../h/inode.h"
-#include "../h/fs.h"
-#endif
-
-#define ISIZE  (sizeof(struct dinode))
-#define        NI      (MAXBSIZE/ISIZE)
-struct ino {
-       char    junk[ISIZE];
-};
-struct ino     buf[NI];
-
-union {
-       char            dummy[SBSIZE];
-       struct fs       sblk;
-} sb_un;
-#define sblock sb_un.sblk
-
-int    status;
+#include <sys/time.h>
+
+#include <ufs/ufs/dinode.h>
+#include <ufs/ffs/fs.h>
 
 
+#include <err.h>
+#include <errno.h>
+#include <fcntl.h>
+#include <stdlib.h>
+#include <string.h>
+#include <stdio.h>
+#include <unistd.h>
+
+int
 main(argc, argv)
        int argc;
        char *argv[];
 {
 main(argc, argv)
        int argc;
        char *argv[];
 {
-       register i, f;
-       unsigned n;
-       int j, k;
-       long off;
+       register struct fs *sbp;
+       register struct dinode *ip;
+       register int fd;
+       struct dinode ibuf[MAXBSIZE / sizeof (struct dinode)];
+       long generation, bsize;
+       off_t offset;
+       int inonum;
+       char *fs, sblock[SBSIZE];
 
        if (argc < 3) {
 
        if (argc < 3) {
-               printf("usage: clri filsys inumber ...\n");
-               exit(4);
+               (void)fprintf(stderr, "usage: clri filesystem inode ...\n");
+               exit(1);
        }
        }
-       f = open(argv[1], 2);
-       if (f < 0) {
-               printf("cannot open %s\n", argv[1]);
-               exit(4);
+
+       fs = *++argv;
+
+       /* get the superblock. */
+       if ((fd = open(fs, O_RDWR, 0)) < 0)
+               err(1, "%s", fs);
+       if (lseek(fd, (off_t)(SBLOCK * DEV_BSIZE), SEEK_SET) < 0)
+               err(1, "%s", fs);
+       if (read(fd, sblock, sizeof(sblock)) != sizeof(sblock)) {
+               (void)fprintf(stderr,
+                   "clri: %s: can't read the superblock.\n", fs);
+               exit(1);
        }
        }
-       lseek(f, SBLOCK * DEV_BSIZE, 0);
-       if (read(f, &sblock, SBSIZE) != SBSIZE) {
-               printf("cannot read %s\n", argv[1]);
-               exit(4);
+
+       sbp = (struct fs *)sblock;
+       if (sbp->fs_magic != FS_MAGIC) {
+               (void)fprintf(stderr,
+                   "clri: %s: superblock magic number 0x%x, not 0x%x.\n",
+                   fs, sbp->fs_magic, FS_MAGIC);
+               exit(1);
        }
        }
-       for (i = 2; i < argc; i++) {
-               if (!isnumber(argv[i])) {
-                       printf("%s: is not a number\n", argv[i]);
-                       status = 1;
-                       continue;
-               }
-               n = atoi(argv[i]);
-               if (n == 0) {
-                       printf("%s: is zero\n", argv[i]);
-                       status = 1;
-                       continue;
-               }
-               off = fsbtodb(&sblock, itod(&sblock, n)) * DEV_BSIZE;
-               lseek(f, off, 0);
-               if (read(f, (char *)buf, sblock.fs_bsize) != sblock.fs_bsize) {
-                       printf("%s: read error\n", argv[i]);
-                       status = 1;
+       bsize = sbp->fs_bsize;
+
+       /* remaining arguments are inode numbers. */
+       while (*++argv) {
+               /* get the inode number. */
+               if ((inonum = atoi(*argv)) <= 0) {
+                       (void)fprintf(stderr,
+                           "clri: %s is not a valid inode number.\n", *argv);
+                       exit(1);
                }
                }
-       }
-       if (status)
-               exit(status);
-       for (i = 2; i < argc; i++) {
-               n = atoi(argv[i]);
-               printf("clearing %u\n", n);
-               off = fsbtodb(&sblock, itod(&sblock, n)) * DEV_BSIZE;
-               lseek(f, off, 0);
-               read(f, (char *)buf, sblock.fs_bsize);
-               j = itoo(&sblock, n);
-               for (k = 0; k < ISIZE; k++)
-                       buf[j].junk[k] = 0;
-               lseek(f, off, 0);
-               write(f, (char *)buf, sblock.fs_bsize);
-       }
-       exit(status);
-}
+               (void)printf("clearing %d\n", inonum);
 
 
-isnumber(s)
-       char *s;
-{
-       register c;
+               /* read in the appropriate block. */
+               offset = ino_to_fsba(sbp, inonum);      /* inode to fs blk */
+               offset = fsbtodb(sbp, offset);          /* fs blk disk blk */
+               offset *= DEV_BSIZE;                    /* disk blk to bytes */
+
+               /* seek and read the block */
+               if (lseek(fd, offset, SEEK_SET) < 0)
+                       err(1, "%s", fs);
+               if (read(fd, ibuf, bsize) != bsize)
+                       err(1, "%s", fs);
+
+               /* get the inode within the block. */
+               ip = &ibuf[ino_to_fsbo(sbp, inonum)];
 
 
-       while(c = *s++)
-               if (c < '0' || c > '9')
-                       return(0);
-       return(1);
+               /* clear the inode, and bump the generation count. */
+               generation = ip->di_gen + 1;
+               memset(ip, 0, sizeof(*ip));
+               ip->di_gen = generation;
+
+               /* backup and write the block */
+               if (lseek(fd, (off_t)-bsize, SEEK_CUR) < 0)
+                       err(1, "%s", fs);
+               if (write(fd, ibuf, bsize) != bsize)
+                       err(1, "%s", fs);
+               (void)fsync(fd);
+       }
+       (void)close(fd);
+       exit(0);
 }
 }