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 <stdint.h> 42 #include <string.h> 43 #include <time.h> 44 #include <timeconv.h> 45 46 #include <ufs/ufs/dinode.h> 47 #include <ufs/ffs/fs.h> 48 49 #include <sys/ioctl.h> 50 51 #include "fsdb.h" 52 #include "fsck.h" 53 54 static int charsperline(void); 55 static void printindir(ufs2_daddr_t blk, int level, char *bufp); 56 static void printblocks(ino_t inum, union dinode *dp); 57 58 char ** 59 crack(char *line, 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(char *line, int *argc, int argc_max) 78 { 79 static char *argv[8]; 80 int i; 81 char *p, *val; 82 for (p = line, i = 0; p != NULL && i < 8 && i < argc_max - 1; i++) { 83 while ((val = strsep(&p, " \t\n")) != NULL && *val == '\0') 84 /**/; 85 if (val) 86 argv[i] = val; 87 else 88 break; 89 } 90 argv[i] = argv[i - 1] + strlen(argv[i - 1]) + 1; 91 argv[i][strcspn(argv[i], "\n")] = '\0'; 92 *argc = i + 1; 93 return argv; 94 } 95 96 int 97 argcount(struct cmdtable *cmdp, int argc, char *argv[]) 98 { 99 if (cmdp->minargc == cmdp->maxargc) 100 warnx("command `%s' takes %u arguments, got %u", cmdp->cmd, 101 cmdp->minargc-1, argc-1); 102 else 103 warnx("command `%s' takes from %u to %u arguments", 104 cmdp->cmd, cmdp->minargc-1, cmdp->maxargc-1); 105 106 warnx("usage: %s: %s", cmdp->cmd, cmdp->helptxt); 107 return 1; 108 } 109 110 void 111 printstat(const char *cp, ino_t inum, union dinode *dp) 112 { 113 struct group *grp; 114 struct passwd *pw; 115 ufs2_daddr_t blocks; 116 int64_t gen; 117 char *p; 118 time_t t; 119 120 printf("%s: ", cp); 121 switch (DIP(dp, di_mode) & IFMT) { 122 case IFDIR: 123 puts("directory"); 124 break; 125 case IFREG: 126 puts("regular file"); 127 break; 128 case IFBLK: 129 printf("block special (%#jx)", (uintmax_t)DIP(dp, di_rdev)); 130 break; 131 case IFCHR: 132 printf("character special (%#jx)", DIP(dp, di_rdev)); 133 break; 134 case IFLNK: 135 fputs("symlink",stdout); 136 if (DIP(dp, di_size) > 0 && 137 DIP(dp, di_size) < sblock.fs_maxsymlinklen && 138 DIP(dp, di_blocks) == 0) { 139 if (sblock.fs_magic == FS_UFS1_MAGIC) 140 p = (caddr_t)dp->dp1.di_db; 141 else 142 p = (caddr_t)dp->dp2.di_db; 143 printf(" to `%.*s'\n", (int) DIP(dp, di_size), p); 144 } else { 145 putchar('\n'); 146 } 147 break; 148 case IFSOCK: 149 puts("socket"); 150 break; 151 case IFIFO: 152 puts("fifo"); 153 break; 154 } 155 printf("I=%ju MODE=%o SIZE=%ju", (uintmax_t)inum, DIP(dp, di_mode), 156 (uintmax_t)DIP(dp, di_size)); 157 if (sblock.fs_magic != FS_UFS1_MAGIC) { 158 t = _time64_to_time(dp->dp2.di_birthtime); 159 p = ctime(&t); 160 printf("\n\tBTIME=%15.15s %4.4s [%d nsec]", &p[4], &p[20], 161 dp->dp2.di_birthnsec); 162 } 163 if (sblock.fs_magic == FS_UFS1_MAGIC) 164 t = _time32_to_time(dp->dp1.di_mtime); 165 else 166 t = _time64_to_time(dp->dp2.di_mtime); 167 p = ctime(&t); 168 printf("\n\tMTIME=%15.15s %4.4s [%d nsec]", &p[4], &p[20], 169 DIP(dp, di_mtimensec)); 170 if (sblock.fs_magic == FS_UFS1_MAGIC) 171 t = _time32_to_time(dp->dp1.di_ctime); 172 else 173 t = _time64_to_time(dp->dp2.di_ctime); 174 p = ctime(&t); 175 printf("\n\tCTIME=%15.15s %4.4s [%d nsec]", &p[4], &p[20], 176 DIP(dp, di_ctimensec)); 177 if (sblock.fs_magic == FS_UFS1_MAGIC) 178 t = _time32_to_time(dp->dp1.di_atime); 179 else 180 t = _time64_to_time(dp->dp2.di_atime); 181 p = ctime(&t); 182 printf("\n\tATIME=%15.15s %4.4s [%d nsec]\n", &p[4], &p[20], 183 DIP(dp, di_atimensec)); 184 185 if ((pw = getpwuid(DIP(dp, di_uid)))) 186 printf("OWNER=%s ", pw->pw_name); 187 else 188 printf("OWNUID=%u ", DIP(dp, di_uid)); 189 if ((grp = getgrgid(DIP(dp, di_gid)))) 190 printf("GRP=%s ", grp->gr_name); 191 else 192 printf("GID=%u ", DIP(dp, di_gid)); 193 194 blocks = DIP(dp, di_blocks); 195 gen = DIP(dp, di_gen); 196 printf("LINKCNT=%d FLAGS=%#x BLKCNT=%jx GEN=%jx\n", DIP(dp, di_nlink), 197 DIP(dp, di_flags), (intmax_t)blocks, (intmax_t)gen); 198 } 199 200 201 /* 202 * Determine the number of characters in a 203 * single line. 204 */ 205 206 static int 207 charsperline(void) 208 { 209 int columns; 210 char *cp; 211 struct winsize ws; 212 213 columns = 0; 214 if (ioctl(0, TIOCGWINSZ, &ws) != -1) 215 columns = ws.ws_col; 216 if (columns == 0 && (cp = getenv("COLUMNS"))) 217 columns = atoi(cp); 218 if (columns == 0) 219 columns = 80; /* last resort */ 220 return (columns); 221 } 222 223 224 /* 225 * Recursively print a list of indirect blocks. 226 */ 227 static void 228 printindir(ufs2_daddr_t blk, int level, char *bufp) 229 { 230 struct bufarea buf, *bp; 231 char tempbuf[32]; /* enough to print an ufs2_daddr_t */ 232 int i, j, cpl, charssofar; 233 ufs2_daddr_t blkno; 234 235 if (blk == 0) 236 return; 237 printf("%jd (%d) =>\n", (intmax_t)blk, level); 238 if (level == 0) { 239 /* for the final indirect level, don't use the cache */ 240 bp = &buf; 241 bp->b_un.b_buf = bufp; 242 bp->b_prev = bp->b_next = bp; 243 initbarea(bp); 244 245 getblk(bp, blk, sblock.fs_bsize); 246 } else 247 bp = getdatablk(blk, sblock.fs_bsize); 248 249 cpl = charsperline(); 250 for (i = charssofar = 0; i < NINDIR(&sblock); i++) { 251 if (sblock.fs_magic == FS_UFS1_MAGIC) 252 blkno = bp->b_un.b_indir1[i]; 253 else 254 blkno = bp->b_un.b_indir2[i]; 255 if (blkno == 0) 256 continue; 257 j = sprintf(tempbuf, "%jd", (intmax_t)blkno); 258 if (level == 0) { 259 charssofar += j; 260 if (charssofar >= cpl - 2) { 261 putchar('\n'); 262 charssofar = j; 263 } 264 } 265 fputs(tempbuf, stdout); 266 if (level == 0) { 267 printf(", "); 268 charssofar += 2; 269 } else { 270 printf(" =>\n"); 271 printindir(blkno, level - 1, bufp); 272 printf("\n"); 273 charssofar = 0; 274 } 275 } 276 if (level == 0) 277 putchar('\n'); 278 return; 279 } 280 281 282 /* 283 * Print the block pointers for one inode. 284 */ 285 static void 286 printblocks(ino_t inum, union dinode *dp) 287 { 288 char *bufp; 289 int i, nfrags; 290 long ndb, offset; 291 ufs2_daddr_t blkno; 292 293 printf("Blocks for inode %ju:\n", (uintmax_t)inum); 294 printf("Direct blocks:\n"); 295 ndb = howmany(DIP(dp, di_size), sblock.fs_bsize); 296 for (i = 0; i < NDADDR && i < ndb; i++) { 297 if (i > 0) 298 printf(", "); 299 blkno = DIP(dp, di_db[i]); 300 printf("%jd", (intmax_t)blkno); 301 } 302 if (ndb <= NDADDR) { 303 offset = blkoff(&sblock, DIP(dp, di_size)); 304 if (offset != 0) { 305 nfrags = numfrags(&sblock, fragroundup(&sblock, offset)); 306 printf(" (%d frag%s)", nfrags, nfrags > 1? "s": ""); 307 } 308 } 309 putchar('\n'); 310 if (ndb <= NDADDR) 311 return; 312 313 bufp = malloc((unsigned int)sblock.fs_bsize); 314 if (bufp == 0) 315 errx(EEXIT, "cannot allocate indirect block buffer"); 316 printf("Indirect blocks:\n"); 317 for (i = 0; i < NIADDR; i++) 318 printindir(DIP(dp, di_ib[i]), i, bufp); 319 free(bufp); 320 } 321 322 323 int 324 checkactive(void) 325 { 326 if (!curinode) { 327 warnx("no current inode\n"); 328 return 0; 329 } 330 return 1; 331 } 332 333 int 334 checkactivedir(void) 335 { 336 if (!curinode) { 337 warnx("no current inode\n"); 338 return 0; 339 } 340 if ((DIP(curinode, di_mode) & IFMT) != IFDIR) { 341 warnx("inode %ju not a directory", (uintmax_t)curinum); 342 return 0; 343 } 344 return 1; 345 } 346 347 int 348 printactive(int doblocks) 349 { 350 if (!checkactive()) 351 return 1; 352 switch (DIP(curinode, di_mode) & IFMT) { 353 case IFDIR: 354 case IFREG: 355 case IFBLK: 356 case IFCHR: 357 case IFLNK: 358 case IFSOCK: 359 case IFIFO: 360 if (doblocks) 361 printblocks(curinum, curinode); 362 else 363 printstat("current inode", curinum, curinode); 364 break; 365 case 0: 366 printf("current inode %ju: unallocated inode\n", (uintmax_t)curinum); 367 break; 368 default: 369 printf("current inode %ju: screwy itype 0%o (mode 0%o)?\n", 370 (uintmax_t)curinum, DIP(curinode, di_mode) & IFMT, 371 DIP(curinode, di_mode)); 372 break; 373 } 374 return 0; 375 } 376