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 int 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); 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 (%d,%d)", 130 major(DIP(dp, di_rdev)), minor(DIP(dp, di_rdev))); 131 break; 132 case IFCHR: 133 printf("character special (%d,%d)", 134 major(DIP(dp, di_rdev)), minor(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=%lu MODE=%o SIZE=%ju", (u_long)inum, DIP(dp, di_mode), 158 (uintmax_t)DIP(dp, di_size)); 159 if (sblock.fs_magic == FS_UFS1_MAGIC) 160 t = _time32_to_time(dp->dp1.di_mtime); 161 else 162 t = _time64_to_time(dp->dp2.di_mtime); 163 p = ctime(&t); 164 printf("\n\tMTIME=%15.15s %4.4s [%d nsec]", &p[4], &p[20], 165 DIP(dp, di_mtimensec)); 166 if (sblock.fs_magic == FS_UFS1_MAGIC) 167 t = _time32_to_time(dp->dp1.di_ctime); 168 else 169 t = _time64_to_time(dp->dp2.di_ctime); 170 p = ctime(&t); 171 printf("\n\tCTIME=%15.15s %4.4s [%d nsec]", &p[4], &p[20], 172 DIP(dp, di_ctimensec)); 173 if (sblock.fs_magic == FS_UFS1_MAGIC) 174 t = _time32_to_time(dp->dp1.di_atime); 175 else 176 t = _time64_to_time(dp->dp2.di_atime); 177 p = ctime(&t); 178 printf("\n\tATIME=%15.15s %4.4s [%d nsec]\n", &p[4], &p[20], 179 DIP(dp, di_atimensec)); 180 181 if ((pw = getpwuid(DIP(dp, di_uid)))) 182 printf("OWNER=%s ", pw->pw_name); 183 else 184 printf("OWNUID=%u ", DIP(dp, di_uid)); 185 if ((grp = getgrgid(DIP(dp, di_gid)))) 186 printf("GRP=%s ", grp->gr_name); 187 else 188 printf("GID=%u ", DIP(dp, di_gid)); 189 190 blocks = DIP(dp, di_blocks); 191 gen = DIP(dp, di_gen); 192 printf("LINKCNT=%hd FLAGS=%#x BLKCNT=%jx GEN=%jx\n", DIP(dp, di_nlink), 193 DIP(dp, di_flags), (intmax_t)blocks, (intmax_t)gen); 194 } 195 196 197 /* 198 * Determine the number of characters in a 199 * single line. 200 */ 201 202 static int 203 charsperline(void) 204 { 205 int columns; 206 char *cp; 207 struct winsize ws; 208 209 columns = 0; 210 if (ioctl(0, TIOCGWINSZ, &ws) != -1) 211 columns = ws.ws_col; 212 if (columns == 0 && (cp = getenv("COLUMNS"))) 213 columns = atoi(cp); 214 if (columns == 0) 215 columns = 80; /* last resort */ 216 return (columns); 217 } 218 219 220 /* 221 * Recursively print a list of indirect blocks. 222 */ 223 static int 224 printindir(ufs2_daddr_t blk, int level, char *bufp) 225 { 226 struct bufarea buf, *bp; 227 char tempbuf[32]; /* enough to print an ufs2_daddr_t */ 228 int i, j, cpl, charssofar; 229 ufs2_daddr_t blkno; 230 231 if (level == 0) { 232 /* for the final indirect level, don't use the cache */ 233 bp = &buf; 234 bp->b_un.b_buf = bufp; 235 bp->b_prev = bp->b_next = bp; 236 initbarea(bp); 237 238 getblk(bp, blk, sblock.fs_bsize); 239 } else 240 bp = getdatablk(blk, sblock.fs_bsize); 241 242 cpl = charsperline(); 243 for (i = charssofar = 0; i < NINDIR(&sblock); i++) { 244 if (sblock.fs_magic == FS_UFS1_MAGIC) 245 blkno = bp->b_un.b_indir1[i]; 246 else 247 blkno = bp->b_un.b_indir2[i]; 248 if (blkno == 0) { 249 if (level == 0) 250 putchar('\n'); 251 return 0; 252 } 253 j = sprintf(tempbuf, "%jd", (intmax_t)blkno); 254 if (level == 0) { 255 charssofar += j; 256 if (charssofar >= cpl - 2) { 257 putchar('\n'); 258 charssofar = j; 259 } 260 } 261 fputs(tempbuf, stdout); 262 if (level == 0) { 263 printf(", "); 264 charssofar += 2; 265 } else { 266 printf(" =>\n"); 267 if (printindir(blkno, level - 1, bufp) == 0) 268 return 0; 269 } 270 } 271 if (level == 0) 272 putchar('\n'); 273 return 1; 274 } 275 276 277 /* 278 * Print the block pointers for one inode. 279 */ 280 static void 281 printblocks(ino_t inum, union dinode *dp) 282 { 283 char *bufp; 284 int i, nfrags; 285 long ndb, offset; 286 ufs2_daddr_t blkno; 287 288 printf("Blocks for inode %d:\n", inum); 289 printf("Direct blocks:\n"); 290 ndb = howmany(DIP(dp, di_size), sblock.fs_bsize); 291 for (i = 0; i < NDADDR; i++) { 292 if (DIP(dp, di_db[i]) == 0) { 293 putchar('\n'); 294 return; 295 } 296 if (i > 0) 297 printf(", "); 298 blkno = DIP(dp, di_db[i]); 299 printf("%jd", (intmax_t)blkno); 300 if (--ndb == 0 && (offset = blkoff(&sblock, DIP(dp, di_size))) != 0) { 301 nfrags = numfrags(&sblock, fragroundup(&sblock, offset)); 302 printf(" (%d frag%s)", nfrags, nfrags > 1? "s": ""); 303 } 304 } 305 putchar('\n'); 306 if (DIP(dp, di_ib[0]) == 0) 307 return; 308 309 bufp = malloc((unsigned int)sblock.fs_bsize); 310 if (bufp == 0) 311 errx(EEXIT, "cannot allocate indirect block buffer"); 312 printf("Indirect blocks:\n"); 313 for (i = 0; i < NIADDR; i++) 314 if (printindir(DIP(dp, di_ib[i]), i, bufp) == 0) 315 break; 316 free(bufp); 317 } 318 319 320 int 321 checkactive(void) 322 { 323 if (!curinode) { 324 warnx("no current inode\n"); 325 return 0; 326 } 327 return 1; 328 } 329 330 int 331 checkactivedir(void) 332 { 333 if (!curinode) { 334 warnx("no current inode\n"); 335 return 0; 336 } 337 if ((DIP(curinode, di_mode) & IFMT) != IFDIR) { 338 warnx("inode %d not a directory", curinum); 339 return 0; 340 } 341 return 1; 342 } 343 344 int 345 printactive(int doblocks) 346 { 347 if (!checkactive()) 348 return 1; 349 switch (DIP(curinode, di_mode) & IFMT) { 350 case IFDIR: 351 case IFREG: 352 case IFBLK: 353 case IFCHR: 354 case IFLNK: 355 case IFSOCK: 356 case IFIFO: 357 if (doblocks) 358 printblocks(curinum, curinode); 359 else 360 printstat("current inode", curinum, curinode); 361 break; 362 case 0: 363 printf("current inode %d: unallocated inode\n", curinum); 364 break; 365 default: 366 printf("current inode %d: screwy itype 0%o (mode 0%o)?\n", 367 curinum, DIP(curinode, di_mode) & IFMT, DIP(curinode, di_mode)); 368 break; 369 } 370 return 0; 371 } 372