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