1 /* $NetBSD: fsdbutil.c,v 1.2 1995/10/08 23:18:12 thorpej Exp $ */ 2 3 /* 4 * Copyright (c) 1995 John T. Kohl 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 3. The name of the author may not be used to endorse or promote products 16 * derived from this software without specific prior written permission. 17 * 18 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR `AS IS'' AND ANY EXPRESS OR 19 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED 20 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE 21 * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, 22 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES 23 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR 24 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 25 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, 26 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN 27 * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 28 * POSSIBILITY OF SUCH DAMAGE. 29 */ 30 31 #ifndef lint 32 static const char rcsid[] = 33 "$FreeBSD$"; 34 #endif /* not lint */ 35 36 #include <sys/param.h> 37 #include <ctype.h> 38 #include <err.h> 39 #include <grp.h> 40 #include <pwd.h> 41 #include <string.h> 42 #include <time.h> 43 44 #include <ufs/ufs/dinode.h> 45 #include <ufs/ffs/fs.h> 46 47 #include <sys/ioctl.h> 48 49 #include "fsdb.h" 50 #include "fsck.h" 51 52 static int charsperline __P((void)); 53 static int printindir __P((ufs_daddr_t blk, int level, char *bufp)); 54 static void printblocks __P((ino_t inum, struct dinode *dp)); 55 56 char ** 57 crack(line, argc) 58 char *line; 59 int *argc; 60 { 61 static char *argv[8]; 62 int i; 63 char *p, *val; 64 for (p = line, i = 0; p != NULL && i < 8; i++) { 65 while ((val = strsep(&p, " \t\n")) != NULL && *val == '\0') 66 /**/; 67 if (val) 68 argv[i] = val; 69 else 70 break; 71 } 72 *argc = i; 73 return argv; 74 } 75 76 char ** 77 recrack(line, argc, argc_max) 78 char *line; 79 int *argc; 80 int argc_max; 81 { 82 static char *argv[8]; 83 int i; 84 char *p, *val; 85 for (p = line, i = 0; p != NULL && i < 8 && i < argc_max - 1; i++) { 86 while ((val = strsep(&p, " \t\n")) != NULL && *val == '\0') 87 /**/; 88 if (val) 89 argv[i] = val; 90 else 91 break; 92 } 93 argv[i] = argv[i - 1] + strlen(argv[i - 1]) + 1; 94 argv[i][strcspn(argv[i], "\n")] = '\0'; 95 *argc = i + 1; 96 return argv; 97 } 98 99 int 100 argcount(cmdp, argc, argv) 101 struct cmdtable *cmdp; 102 int argc; 103 char *argv[]; 104 { 105 if (cmdp->minargc == cmdp->maxargc) 106 warnx("command `%s' takes %u arguments, got %u", cmdp->cmd, 107 cmdp->minargc-1, argc); 108 else 109 warnx("command `%s' takes from %u to %u arguments", 110 cmdp->cmd, cmdp->minargc-1, cmdp->maxargc-1); 111 112 warnx("usage: %s: %s", cmdp->cmd, cmdp->helptxt); 113 return 1; 114 } 115 116 void 117 printstat(cp, inum, dp) 118 const char *cp; 119 ino_t inum; 120 struct dinode *dp; 121 { 122 struct group *grp; 123 struct passwd *pw; 124 char *p; 125 time_t t; 126 127 printf("%s: ", cp); 128 switch (dp->di_mode & IFMT) { 129 case IFDIR: 130 puts("directory"); 131 break; 132 case IFREG: 133 puts("regular file"); 134 break; 135 case IFBLK: 136 printf("block special (%d,%d)", 137 major(dp->di_rdev), minor(dp->di_rdev)); 138 break; 139 case IFCHR: 140 printf("character special (%d,%d)", 141 major(dp->di_rdev), minor(dp->di_rdev)); 142 break; 143 case IFLNK: 144 fputs("symlink",stdout); 145 if (dp->di_size > 0 && dp->di_size < MAXSYMLINKLEN && 146 dp->di_blocks == 0) 147 printf(" to `%.*s'\n", (int) dp->di_size, (char *)dp->di_shortlink); 148 else 149 putchar('\n'); 150 break; 151 case IFSOCK: 152 puts("socket"); 153 break; 154 case IFIFO: 155 puts("fifo"); 156 break; 157 } 158 printf("I=%lu MODE=%o SIZE=%qu", (u_long)inum, dp->di_mode, dp->di_size); 159 t = dp->di_mtime; 160 p = ctime(&t); 161 printf("\n\tMTIME=%15.15s %4.4s [%d nsec]", &p[4], &p[20], 162 dp->di_mtimensec); 163 t = dp->di_ctime; 164 p = ctime(&t); 165 printf("\n\tCTIME=%15.15s %4.4s [%d nsec]", &p[4], &p[20], 166 dp->di_ctimensec); 167 t = dp->di_atime; 168 p = ctime(&t); 169 printf("\n\tATIME=%15.15s %4.4s [%d nsec]\n", &p[4], &p[20], 170 dp->di_atimensec); 171 172 if ((pw = getpwuid(dp->di_uid))) 173 printf("OWNER=%s ", pw->pw_name); 174 else 175 printf("OWNUID=%u ", dp->di_uid); 176 if ((grp = getgrgid(dp->di_gid))) 177 printf("GRP=%s ", grp->gr_name); 178 else 179 printf("GID=%u ", dp->di_gid); 180 181 printf("LINKCNT=%hd FLAGS=%#x BLKCNT=%x GEN=%x\n", dp->di_nlink, dp->di_flags, 182 dp->di_blocks, dp->di_gen); 183 } 184 185 186 /* 187 * Determine the number of characters in a 188 * single line. 189 */ 190 191 static int 192 charsperline() 193 { 194 int columns; 195 char *cp; 196 struct winsize ws; 197 198 columns = 0; 199 if (ioctl(0, TIOCGWINSZ, &ws) != -1) 200 columns = ws.ws_col; 201 if (columns == 0 && (cp = getenv("COLUMNS"))) 202 columns = atoi(cp); 203 if (columns == 0) 204 columns = 80; /* last resort */ 205 return (columns); 206 } 207 208 209 /* 210 * Recursively print a list of indirect blocks. 211 */ 212 static int 213 printindir(blk, level, bufp) 214 ufs_daddr_t blk; 215 int level; 216 char *bufp; 217 { 218 struct bufarea buf, *bp; 219 char tempbuf[32]; /* enough to print an ufs_daddr_t */ 220 int i, j, cpl, charssofar; 221 ufs_daddr_t blkno; 222 223 if (level == 0) { 224 /* for the final indirect level, don't use the cache */ 225 bp = &buf; 226 bp->b_un.b_buf = bufp; 227 bp->b_prev = bp->b_next = bp; 228 initbarea(bp); 229 230 getblk(bp, blk, sblock.fs_bsize); 231 } else 232 bp = getdatablk(blk, sblock.fs_bsize); 233 234 cpl = charsperline(); 235 for (i = charssofar = 0; i < NINDIR(&sblock); i++) { 236 blkno = bp->b_un.b_indir[i]; 237 if (blkno == 0) { 238 if (level == 0) 239 putchar('\n'); 240 return 0; 241 } 242 j = sprintf(tempbuf, "%d", blkno); 243 if (level == 0) { 244 charssofar += j; 245 if (charssofar >= cpl - 2) { 246 putchar('\n'); 247 charssofar = j; 248 } 249 } 250 fputs(tempbuf, stdout); 251 if (level == 0) { 252 printf(", "); 253 charssofar += 2; 254 } else { 255 printf(" =>\n"); 256 if (printindir(blkno, level - 1, bufp) == 0) 257 return 0; 258 } 259 } 260 if (level == 0) 261 putchar('\n'); 262 return 1; 263 } 264 265 266 /* 267 * Print the block pointers for one inode. 268 */ 269 static void 270 printblocks(inum, dp) 271 ino_t inum; 272 struct dinode *dp; 273 { 274 char *bufp; 275 int i, j, nfrags; 276 long ndb, offset; 277 278 printf("Blocks for inode %d:\n", inum); 279 printf("Direct blocks:\n"); 280 ndb = howmany(dp->di_size, sblock.fs_bsize); 281 for (i = 0; i < NDADDR; i++) { 282 if (dp->di_db[i] == 0) { 283 putchar('\n'); 284 return; 285 } 286 if (i > 0) 287 printf(", "); 288 printf("%d", dp->di_db[i]); 289 if (--ndb == 0 && (offset = blkoff(&sblock, dp->di_size)) != 0) { 290 nfrags = numfrags(&sblock, fragroundup(&sblock, offset)); 291 printf(" (%d frag%s)", nfrags, nfrags > 1? "s": ""); 292 } 293 } 294 putchar('\n'); 295 if (dp->di_ib[0] == 0) 296 return; 297 298 bufp = malloc((unsigned int)sblock.fs_bsize); 299 if (bufp == 0) 300 errx(EEXIT, "cannot allocate indirect block buffer"); 301 printf("Indirect blocks:\n"); 302 for (i = 0; i < NIADDR; i++) 303 if (printindir(dp->di_ib[i], i, bufp) == 0) 304 break; 305 free(bufp); 306 } 307 308 309 int 310 checkactive() 311 { 312 if (!curinode) { 313 warnx("no current inode\n"); 314 return 0; 315 } 316 return 1; 317 } 318 319 int 320 checkactivedir() 321 { 322 if (!curinode) { 323 warnx("no current inode\n"); 324 return 0; 325 } 326 if ((curinode->di_mode & IFMT) != IFDIR) { 327 warnx("inode %d not a directory", curinum); 328 return 0; 329 } 330 return 1; 331 } 332 333 int 334 printactive(doblocks) 335 int doblocks; 336 { 337 if (!checkactive()) 338 return 1; 339 switch (curinode->di_mode & IFMT) { 340 case IFDIR: 341 case IFREG: 342 case IFBLK: 343 case IFCHR: 344 case IFLNK: 345 case IFSOCK: 346 case IFIFO: 347 if (doblocks) 348 printblocks(curinum, curinode); 349 else 350 printstat("current inode", curinum, curinode); 351 break; 352 case 0: 353 printf("current inode %d: unallocated inode\n", curinum); 354 break; 355 default: 356 printf("current inode %d: screwy itype 0%o (mode 0%o)?\n", 357 curinum, curinode->di_mode & IFMT, curinode->di_mode); 358 break; 359 } 360 return 0; 361 } 362