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