1 /* $NetBSD: fsdb.c,v 1.2 1995/10/08 23:18:10 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 <histedit.h> 41 #include <pwd.h> 42 #include <string.h> 43 #include <time.h> 44 #include <timeconv.h> 45 46 #include <ufs/ufs/dinode.h> 47 #include <ufs/ufs/dir.h> 48 #include <ufs/ffs/fs.h> 49 50 #include "fsdb.h" 51 #include "fsck.h" 52 53 static void usage(void) __dead2; 54 int cmdloop(void); 55 static int compare_blk32(uint32_t *wantedblk, uint32_t curblk); 56 static int compare_blk64(uint64_t *wantedblk, uint64_t curblk); 57 static int founddatablk(uint64_t blk); 58 static int find_blks32(uint32_t *buf, int size, uint32_t *blknum); 59 static int find_blks64(uint64_t *buf, int size, uint64_t *blknum); 60 static int find_indirblks32(uint32_t blk, int ind_level, uint32_t *blknum); 61 static int find_indirblks64(uint64_t blk, int ind_level, uint64_t *blknum); 62 63 static void 64 usage(void) 65 { 66 fprintf(stderr, "usage: fsdb [-d] [-f] [-r] fsname\n"); 67 exit(1); 68 } 69 70 int returntosingle; 71 char nflag; 72 73 /* 74 * We suck in lots of fsck code, and just pick & choose the stuff we want. 75 * 76 * fsreadfd is set up to read from the file system, fswritefd to write to 77 * the file system. 78 */ 79 int 80 main(int argc, char *argv[]) 81 { 82 int ch, rval; 83 char *fsys = NULL; 84 85 while (-1 != (ch = getopt(argc, argv, "fdr"))) { 86 switch (ch) { 87 case 'f': 88 /* The -f option is left for historical 89 * reasons and has no meaning. 90 */ 91 break; 92 case 'd': 93 debug++; 94 break; 95 case 'r': 96 nflag++; /* "no" in fsck, readonly for us */ 97 break; 98 default: 99 usage(); 100 } 101 } 102 argc -= optind; 103 argv += optind; 104 if (argc != 1) 105 usage(); 106 else 107 fsys = argv[0]; 108 109 sblock_init(); 110 if (!setup(fsys)) 111 errx(1, "cannot set up file system `%s'", fsys); 112 printf("%s file system `%s'\nLast Mounted on %s\n", 113 nflag? "Examining": "Editing", fsys, sblock.fs_fsmnt); 114 rval = cmdloop(); 115 if (!nflag) { 116 sblock.fs_clean = 0; /* mark it dirty */ 117 sbdirty(); 118 ckfini(0); 119 printf("*** FILE SYSTEM MARKED DIRTY\n"); 120 printf("*** BE SURE TO RUN FSCK TO CLEAN UP ANY DAMAGE\n"); 121 printf("*** IF IT WAS MOUNTED, RE-MOUNT WITH -u -o reload\n"); 122 } 123 exit(rval); 124 } 125 126 #define CMDFUNC(func) int func(int argc, char *argv[]) 127 #define CMDFUNCSTART(func) int func(int argc, char *argv[]) 128 129 CMDFUNC(helpfn); 130 CMDFUNC(focus); /* focus on inode */ 131 CMDFUNC(active); /* print active inode */ 132 CMDFUNC(blocks); /* print blocks for active inode */ 133 CMDFUNC(focusname); /* focus by name */ 134 CMDFUNC(zapi); /* clear inode */ 135 CMDFUNC(uplink); /* incr link */ 136 CMDFUNC(downlink); /* decr link */ 137 CMDFUNC(linkcount); /* set link count */ 138 CMDFUNC(quit); /* quit */ 139 CMDFUNC(findblk); /* find block */ 140 CMDFUNC(ls); /* list directory */ 141 CMDFUNC(rm); /* remove name */ 142 CMDFUNC(ln); /* add name */ 143 CMDFUNC(newtype); /* change type */ 144 CMDFUNC(chmode); /* change mode */ 145 CMDFUNC(chlen); /* change length */ 146 CMDFUNC(chaflags); /* change flags */ 147 CMDFUNC(chgen); /* change generation */ 148 CMDFUNC(chowner); /* change owner */ 149 CMDFUNC(chgroup); /* Change group */ 150 CMDFUNC(back); /* pop back to last ino */ 151 CMDFUNC(chbtime); /* Change btime */ 152 CMDFUNC(chmtime); /* Change mtime */ 153 CMDFUNC(chctime); /* Change ctime */ 154 CMDFUNC(chatime); /* Change atime */ 155 CMDFUNC(chinum); /* Change inode # of dirent */ 156 CMDFUNC(chname); /* Change dirname of dirent */ 157 158 struct cmdtable cmds[] = { 159 { "help", "Print out help", 1, 1, FL_RO, helpfn }, 160 { "?", "Print out help", 1, 1, FL_RO, helpfn }, 161 { "inode", "Set active inode to INUM", 2, 2, FL_RO, focus }, 162 { "clri", "Clear inode INUM", 2, 2, FL_WR, zapi }, 163 { "lookup", "Set active inode by looking up NAME", 2, 2, FL_RO | FL_ST, focusname }, 164 { "cd", "Set active inode by looking up NAME", 2, 2, FL_RO | FL_ST, focusname }, 165 { "back", "Go to previous active inode", 1, 1, FL_RO, back }, 166 { "active", "Print active inode", 1, 1, FL_RO, active }, 167 { "print", "Print active inode", 1, 1, FL_RO, active }, 168 { "blocks", "Print block numbers of active inode", 1, 1, FL_RO, blocks }, 169 { "uplink", "Increment link count", 1, 1, FL_WR, uplink }, 170 { "downlink", "Decrement link count", 1, 1, FL_WR, downlink }, 171 { "linkcount", "Set link count to COUNT", 2, 2, FL_WR, linkcount }, 172 { "findblk", "Find inode owning disk block(s)", 2, 33, FL_RO, findblk}, 173 { "ls", "List current inode as directory", 1, 1, FL_RO, ls }, 174 { "rm", "Remove NAME from current inode directory", 2, 2, FL_WR | FL_ST, rm }, 175 { "del", "Remove NAME from current inode directory", 2, 2, FL_WR | FL_ST, rm }, 176 { "ln", "Hardlink INO into current inode directory as NAME", 3, 3, FL_WR | FL_ST, ln }, 177 { "chinum", "Change dir entry number INDEX to INUM", 3, 3, FL_WR, chinum }, 178 { "chname", "Change dir entry number INDEX to NAME", 3, 3, FL_WR | FL_ST, chname }, 179 { "chtype", "Change type of current inode to TYPE", 2, 2, FL_WR, newtype }, 180 { "chmod", "Change mode of current inode to MODE", 2, 2, FL_WR, chmode }, 181 { "chlen", "Change length of current inode to LENGTH", 2, 2, FL_WR, chlen }, 182 { "chown", "Change owner of current inode to OWNER", 2, 2, FL_WR, chowner }, 183 { "chgrp", "Change group of current inode to GROUP", 2, 2, FL_WR, chgroup }, 184 { "chflags", "Change flags of current inode to FLAGS", 2, 2, FL_WR, chaflags }, 185 { "chgen", "Change generation number of current inode to GEN", 2, 2, FL_WR, chgen }, 186 { "btime", "Change btime of current inode to BTIME", 2, 2, FL_WR, chbtime }, 187 { "mtime", "Change mtime of current inode to MTIME", 2, 2, FL_WR, chmtime }, 188 { "ctime", "Change ctime of current inode to CTIME", 2, 2, FL_WR, chctime }, 189 { "atime", "Change atime of current inode to ATIME", 2, 2, FL_WR, chatime }, 190 { "quit", "Exit", 1, 1, FL_RO, quit }, 191 { "q", "Exit", 1, 1, FL_RO, quit }, 192 { "exit", "Exit", 1, 1, FL_RO, quit }, 193 { NULL, 0, 0, 0, 0, NULL }, 194 }; 195 196 int 197 helpfn(int argc, char *argv[]) 198 { 199 struct cmdtable *cmdtp; 200 201 printf("Commands are:\n%-10s %5s %5s %s\n", 202 "command", "min args", "max args", "what"); 203 204 for (cmdtp = cmds; cmdtp->cmd; cmdtp++) 205 printf("%-10s %5u %5u %s\n", 206 cmdtp->cmd, cmdtp->minargc-1, cmdtp->maxargc-1, cmdtp->helptxt); 207 return 0; 208 } 209 210 char * 211 prompt(EditLine *el) 212 { 213 static char pstring[64]; 214 snprintf(pstring, sizeof(pstring), "fsdb (inum: %d)> ", curinum); 215 return pstring; 216 } 217 218 219 int 220 cmdloop(void) 221 { 222 char *line; 223 const char *elline; 224 int cmd_argc, rval = 0, known; 225 #define scratch known 226 char **cmd_argv; 227 struct cmdtable *cmdp; 228 History *hist; 229 EditLine *elptr; 230 HistEvent he; 231 232 curinode = ginode(ROOTINO); 233 curinum = ROOTINO; 234 printactive(0); 235 236 hist = history_init(); 237 history(hist, &he, H_SETSIZE, 100); /* 100 elt history buffer */ 238 239 elptr = el_init("fsdb", stdin, stdout, stderr); 240 el_set(elptr, EL_EDITOR, "emacs"); 241 el_set(elptr, EL_PROMPT, prompt); 242 el_set(elptr, EL_HIST, history, hist); 243 el_source(elptr, NULL); 244 245 while ((elline = el_gets(elptr, &scratch)) != NULL && scratch != 0) { 246 if (debug) 247 printf("command `%s'\n", elline); 248 249 history(hist, &he, H_ENTER, elline); 250 251 line = strdup(elline); 252 cmd_argv = crack(line, &cmd_argc); 253 /* 254 * el_parse returns -1 to signal that it's not been handled 255 * internally. 256 */ 257 if (el_parse(elptr, cmd_argc, (const char **)cmd_argv) != -1) 258 continue; 259 if (cmd_argc) { 260 known = 0; 261 for (cmdp = cmds; cmdp->cmd; cmdp++) { 262 if (!strcmp(cmdp->cmd, cmd_argv[0])) { 263 if ((cmdp->flags & FL_WR) == FL_WR && nflag) 264 warnx("`%s' requires write access", cmd_argv[0]), 265 rval = 1; 266 else if (cmd_argc >= cmdp->minargc && 267 cmd_argc <= cmdp->maxargc) 268 rval = (*cmdp->handler)(cmd_argc, cmd_argv); 269 else if (cmd_argc >= cmdp->minargc && 270 (cmdp->flags & FL_ST) == FL_ST) { 271 strcpy(line, elline); 272 cmd_argv = recrack(line, &cmd_argc, cmdp->maxargc); 273 rval = (*cmdp->handler)(cmd_argc, cmd_argv); 274 } else 275 rval = argcount(cmdp, cmd_argc, cmd_argv); 276 known = 1; 277 break; 278 } 279 } 280 if (!known) 281 warnx("unknown command `%s'", cmd_argv[0]), rval = 1; 282 } else 283 rval = 0; 284 free(line); 285 if (rval < 0) 286 /* user typed "quit" */ 287 return 0; 288 if (rval) 289 warnx("rval was %d", rval); 290 } 291 el_end(elptr); 292 history_end(hist); 293 return rval; 294 } 295 296 union dinode *curinode; 297 ino_t curinum, ocurrent; 298 299 #define GETINUM(ac,inum) inum = strtoul(argv[ac], &cp, 0); \ 300 if (inum < ROOTINO || inum > maxino || cp == argv[ac] || *cp != '\0' ) { \ 301 printf("inode %d out of range; range is [%d,%d]\n", \ 302 inum, ROOTINO, maxino); \ 303 return 1; \ 304 } 305 306 /* 307 * Focus on given inode number 308 */ 309 CMDFUNCSTART(focus) 310 { 311 ino_t inum; 312 char *cp; 313 314 GETINUM(1,inum); 315 curinode = ginode(inum); 316 ocurrent = curinum; 317 curinum = inum; 318 printactive(0); 319 return 0; 320 } 321 322 CMDFUNCSTART(back) 323 { 324 curinum = ocurrent; 325 curinode = ginode(curinum); 326 printactive(0); 327 return 0; 328 } 329 330 CMDFUNCSTART(zapi) 331 { 332 ino_t inum; 333 union dinode *dp; 334 char *cp; 335 336 GETINUM(1,inum); 337 dp = ginode(inum); 338 clearinode(dp); 339 inodirty(); 340 if (curinode) /* re-set after potential change */ 341 curinode = ginode(curinum); 342 return 0; 343 } 344 345 CMDFUNCSTART(active) 346 { 347 printactive(0); 348 return 0; 349 } 350 351 CMDFUNCSTART(blocks) 352 { 353 printactive(1); 354 return 0; 355 } 356 357 CMDFUNCSTART(quit) 358 { 359 return -1; 360 } 361 362 CMDFUNCSTART(uplink) 363 { 364 if (!checkactive()) 365 return 1; 366 DIP_SET(curinode, di_nlink, DIP(curinode, di_nlink) + 1); 367 printf("inode %d link count now %d\n", curinum, DIP(curinode, di_nlink)); 368 inodirty(); 369 return 0; 370 } 371 372 CMDFUNCSTART(downlink) 373 { 374 if (!checkactive()) 375 return 1; 376 DIP_SET(curinode, di_nlink, DIP(curinode, di_nlink) - 1); 377 printf("inode %d link count now %d\n", curinum, DIP(curinode, di_nlink)); 378 inodirty(); 379 return 0; 380 } 381 382 const char *typename[] = { 383 "unknown", 384 "fifo", 385 "char special", 386 "unregistered #3", 387 "directory", 388 "unregistered #5", 389 "blk special", 390 "unregistered #7", 391 "regular", 392 "unregistered #9", 393 "symlink", 394 "unregistered #11", 395 "socket", 396 "unregistered #13", 397 "whiteout", 398 }; 399 400 int diroff; 401 int slot; 402 403 int 404 scannames(struct inodesc *idesc) 405 { 406 struct direct *dirp = idesc->id_dirp; 407 408 printf("slot %d off %d ino %d reclen %d: %s, `%.*s'\n", 409 slot++, diroff, dirp->d_ino, dirp->d_reclen, 410 typename[dirp->d_type], dirp->d_namlen, dirp->d_name); 411 diroff += dirp->d_reclen; 412 return (KEEPON); 413 } 414 415 CMDFUNCSTART(ls) 416 { 417 struct inodesc idesc; 418 checkactivedir(); /* let it go on anyway */ 419 420 slot = 0; 421 diroff = 0; 422 idesc.id_number = curinum; 423 idesc.id_func = scannames; 424 idesc.id_type = DATA; 425 idesc.id_fix = IGNORE; 426 ckinode(curinode, &idesc); 427 curinode = ginode(curinum); 428 429 return 0; 430 } 431 432 static int findblk_numtofind; 433 static int wantedblksize; 434 435 CMDFUNCSTART(findblk) 436 { 437 ino_t inum, inosused; 438 uint32_t *wantedblk32; 439 uint64_t *wantedblk64; 440 struct cg *cgp = &cgrp; 441 int c, i, is_ufs2; 442 443 wantedblksize = (argc - 1); 444 is_ufs2 = sblock.fs_magic == FS_UFS2_MAGIC; 445 ocurrent = curinum; 446 447 if (is_ufs2) { 448 wantedblk64 = calloc(wantedblksize, sizeof(uint64_t)); 449 if (wantedblk64 == NULL) 450 err(1, "malloc"); 451 for (i = 1; i < argc; i++) 452 wantedblk64[i - 1] = dbtofsb(&sblock, strtoull(argv[i], NULL, 0)); 453 } else { 454 wantedblk32 = calloc(wantedblksize, sizeof(uint32_t)); 455 if (wantedblk32 == NULL) 456 err(1, "malloc"); 457 for (i = 1; i < argc; i++) 458 wantedblk32[i - 1] = dbtofsb(&sblock, strtoull(argv[i], NULL, 0)); 459 } 460 findblk_numtofind = wantedblksize; 461 /* 462 * sblock.fs_ncg holds a number of cylinder groups. 463 * Iterate over all cylinder groups. 464 */ 465 for (c = 0; c < sblock.fs_ncg; c++) { 466 /* 467 * sblock.fs_ipg holds a number of inodes per cylinder group. 468 * Calculate a highest inode number for a given cylinder group. 469 */ 470 inum = c * sblock.fs_ipg; 471 /* Read cylinder group. */ 472 getblk(&cgblk, cgtod(&sblock, c), sblock.fs_cgsize); 473 memcpy(cgp, cgblk.b_un.b_cg, sblock.fs_cgsize); 474 /* 475 * Get a highest used inode number for a given cylinder group. 476 * For UFS1 all inodes initialized at the newfs stage. 477 */ 478 if (is_ufs2) 479 inosused = cgp->cg_initediblk; 480 else 481 inosused = sblock.fs_ipg; 482 483 for (; inosused > 0; inum++, inosused--) { 484 /* Skip magic inodes: 0, WINO, ROOTINO. */ 485 if (inum < ROOTINO) 486 continue; 487 /* 488 * Check if the block we are looking for is just an inode block. 489 * 490 * ino_to_fsba() - get block containing inode from its number. 491 * INOPB() - get a number of inodes in one disk block. 492 */ 493 if (is_ufs2 ? 494 compare_blk64(wantedblk64, ino_to_fsba(&sblock, inum)) : 495 compare_blk32(wantedblk32, ino_to_fsba(&sblock, inum))) { 496 printf("block %llu: inode block (%d-%d)\n", 497 (unsigned long long)fsbtodb(&sblock, 498 ino_to_fsba(&sblock, inum)), 499 (inum / INOPB(&sblock)) * INOPB(&sblock), 500 (inum / INOPB(&sblock) + 1) * INOPB(&sblock)); 501 findblk_numtofind--; 502 if (findblk_numtofind == 0) 503 goto end; 504 } 505 /* Get on-disk inode aka dinode. */ 506 curinum = inum; 507 curinode = ginode(inum); 508 /* Find IFLNK dinode with allocated data blocks. */ 509 switch (DIP(curinode, di_mode) & IFMT) { 510 case IFDIR: 511 case IFREG: 512 if (DIP(curinode, di_blocks) == 0) 513 continue; 514 break; 515 case IFLNK: 516 { 517 uint64_t size = DIP(curinode, di_size); 518 if (size > 0 && size < sblock.fs_maxsymlinklen && 519 DIP(curinode, di_blocks) == 0) 520 continue; 521 else 522 break; 523 } 524 default: 525 continue; 526 } 527 /* Look through direct data blocks. */ 528 if (is_ufs2 ? 529 find_blks64(curinode->dp2.di_db, NDADDR, wantedblk64) : 530 find_blks32(curinode->dp1.di_db, NDADDR, wantedblk32)) 531 goto end; 532 for (i = 0; i < NIADDR; i++) { 533 /* 534 * Does the block we are looking for belongs to the 535 * indirect blocks? 536 */ 537 if (is_ufs2 ? 538 compare_blk64(wantedblk64, curinode->dp2.di_ib[i]) : 539 compare_blk32(wantedblk32, curinode->dp1.di_ib[i])) 540 if (founddatablk(is_ufs2 ? curinode->dp2.di_ib[i] : 541 curinode->dp1.di_ib[i])) 542 goto end; 543 /* 544 * Search through indirect, double and triple indirect 545 * data blocks. 546 */ 547 if (is_ufs2 ? (curinode->dp2.di_ib[i] != 0) : 548 (curinode->dp1.di_ib[i] != 0)) 549 if (is_ufs2 ? 550 find_indirblks64(curinode->dp2.di_ib[i], i, 551 wantedblk64) : 552 find_indirblks32(curinode->dp1.di_ib[i], i, 553 wantedblk32)) 554 goto end; 555 } 556 } 557 } 558 end: 559 curinum = ocurrent; 560 curinode = ginode(curinum); 561 return 0; 562 } 563 564 static int 565 compare_blk32(uint32_t *wantedblk, uint32_t curblk) 566 { 567 int i; 568 569 for (i = 0; i < wantedblksize; i++) { 570 if (wantedblk[i] != 0 && wantedblk[i] == curblk) { 571 wantedblk[i] = 0; 572 return 1; 573 } 574 } 575 return 0; 576 } 577 578 static int 579 compare_blk64(uint64_t *wantedblk, uint64_t curblk) 580 { 581 int i; 582 583 for (i = 0; i < wantedblksize; i++) { 584 if (wantedblk[i] != 0 && wantedblk[i] == curblk) { 585 wantedblk[i] = 0; 586 return 1; 587 } 588 } 589 return 0; 590 } 591 592 static int 593 founddatablk(uint64_t blk) 594 { 595 596 printf("%llu: data block of inode %d\n", 597 (unsigned long long)fsbtodb(&sblock, blk), curinum); 598 findblk_numtofind--; 599 if (findblk_numtofind == 0) 600 return 1; 601 return 0; 602 } 603 604 static int 605 find_blks32(uint32_t *buf, int size, uint32_t *wantedblk) 606 { 607 int blk; 608 for (blk = 0; blk < size; blk++) { 609 if (buf[blk] == 0) 610 continue; 611 if (compare_blk32(wantedblk, buf[blk])) { 612 if (founddatablk(buf[blk])) 613 return 1; 614 } 615 } 616 return 0; 617 } 618 619 static int 620 find_indirblks32(uint32_t blk, int ind_level, uint32_t *wantedblk) 621 { 622 #define MAXNINDIR (MAXBSIZE / sizeof(uint32_t)) 623 uint32_t idblk[MAXNINDIR]; 624 int i; 625 626 blread(fsreadfd, (char *)idblk, fsbtodb(&sblock, blk), (int)sblock.fs_bsize); 627 if (ind_level <= 0) { 628 if (find_blks32(idblk, sblock.fs_bsize / sizeof(uint32_t), wantedblk)) 629 return 1; 630 } else { 631 ind_level--; 632 for (i = 0; i < sblock.fs_bsize / sizeof(uint32_t); i++) { 633 if (compare_blk32(wantedblk, idblk[i])) { 634 if (founddatablk(idblk[i])) 635 return 1; 636 } 637 if (idblk[i] != 0) 638 if (find_indirblks32(idblk[i], ind_level, wantedblk)) 639 return 1; 640 } 641 } 642 #undef MAXNINDIR 643 return 0; 644 } 645 646 static int 647 find_blks64(uint64_t *buf, int size, uint64_t *wantedblk) 648 { 649 int blk; 650 for (blk = 0; blk < size; blk++) { 651 if (buf[blk] == 0) 652 continue; 653 if (compare_blk64(wantedblk, buf[blk])) { 654 if (founddatablk(buf[blk])) 655 return 1; 656 } 657 } 658 return 0; 659 } 660 661 static int 662 find_indirblks64(uint64_t blk, int ind_level, uint64_t *wantedblk) 663 { 664 #define MAXNINDIR (MAXBSIZE / sizeof(uint64_t)) 665 uint64_t idblk[MAXNINDIR]; 666 int i; 667 668 blread(fsreadfd, (char *)idblk, fsbtodb(&sblock, blk), (int)sblock.fs_bsize); 669 if (ind_level <= 0) { 670 if (find_blks64(idblk, sblock.fs_bsize / sizeof(uint64_t), wantedblk)) 671 return 1; 672 } else { 673 ind_level--; 674 for (i = 0; i < sblock.fs_bsize / sizeof(uint64_t); i++) { 675 if (compare_blk64(wantedblk, idblk[i])) { 676 if (founddatablk(idblk[i])) 677 return 1; 678 } 679 if (idblk[i] != 0) 680 if (find_indirblks64(idblk[i], ind_level, wantedblk)) 681 return 1; 682 } 683 } 684 #undef MAXNINDIR 685 return 0; 686 } 687 688 int findino(struct inodesc *idesc); /* from fsck */ 689 static int dolookup(char *name); 690 691 static int 692 dolookup(char *name) 693 { 694 struct inodesc idesc; 695 696 if (!checkactivedir()) 697 return 0; 698 idesc.id_number = curinum; 699 idesc.id_func = findino; 700 idesc.id_name = name; 701 idesc.id_type = DATA; 702 idesc.id_fix = IGNORE; 703 if (ckinode(curinode, &idesc) & FOUND) { 704 curinum = idesc.id_parent; 705 curinode = ginode(curinum); 706 printactive(0); 707 return 1; 708 } else { 709 warnx("name `%s' not found in current inode directory", name); 710 return 0; 711 } 712 } 713 714 CMDFUNCSTART(focusname) 715 { 716 char *p, *val; 717 718 if (!checkactive()) 719 return 1; 720 721 ocurrent = curinum; 722 723 if (argv[1][0] == '/') { 724 curinum = ROOTINO; 725 curinode = ginode(ROOTINO); 726 } else { 727 if (!checkactivedir()) 728 return 1; 729 } 730 for (p = argv[1]; p != NULL;) { 731 while ((val = strsep(&p, "/")) != NULL && *val == '\0'); 732 if (val) { 733 printf("component `%s': ", val); 734 fflush(stdout); 735 if (!dolookup(val)) { 736 curinode = ginode(curinum); 737 return(1); 738 } 739 } 740 } 741 return 0; 742 } 743 744 CMDFUNCSTART(ln) 745 { 746 ino_t inum; 747 int rval; 748 char *cp; 749 750 GETINUM(1,inum); 751 752 if (!checkactivedir()) 753 return 1; 754 rval = makeentry(curinum, inum, argv[2]); 755 if (rval) 756 printf("Ino %d entered as `%s'\n", inum, argv[2]); 757 else 758 printf("could not enter name? weird.\n"); 759 curinode = ginode(curinum); 760 return rval; 761 } 762 763 CMDFUNCSTART(rm) 764 { 765 int rval; 766 767 if (!checkactivedir()) 768 return 1; 769 rval = changeino(curinum, argv[1], 0); 770 if (rval & ALTERED) { 771 printf("Name `%s' removed\n", argv[1]); 772 return 0; 773 } else { 774 printf("could not remove name ('%s')? weird.\n", argv[1]); 775 return 1; 776 } 777 } 778 779 long slotcount, desired; 780 781 int 782 chinumfunc(struct inodesc *idesc) 783 { 784 struct direct *dirp = idesc->id_dirp; 785 786 if (slotcount++ == desired) { 787 dirp->d_ino = idesc->id_parent; 788 return STOP|ALTERED|FOUND; 789 } 790 return KEEPON; 791 } 792 793 CMDFUNCSTART(chinum) 794 { 795 char *cp; 796 ino_t inum; 797 struct inodesc idesc; 798 799 slotcount = 0; 800 if (!checkactivedir()) 801 return 1; 802 GETINUM(2,inum); 803 804 desired = strtol(argv[1], &cp, 0); 805 if (cp == argv[1] || *cp != '\0' || desired < 0) { 806 printf("invalid slot number `%s'\n", argv[1]); 807 return 1; 808 } 809 810 idesc.id_number = curinum; 811 idesc.id_func = chinumfunc; 812 idesc.id_fix = IGNORE; 813 idesc.id_type = DATA; 814 idesc.id_parent = inum; /* XXX convenient hiding place */ 815 816 if (ckinode(curinode, &idesc) & FOUND) 817 return 0; 818 else { 819 warnx("no %sth slot in current directory", argv[1]); 820 return 1; 821 } 822 } 823 824 int 825 chnamefunc(struct inodesc *idesc) 826 { 827 struct direct *dirp = idesc->id_dirp; 828 struct direct testdir; 829 830 if (slotcount++ == desired) { 831 /* will name fit? */ 832 testdir.d_namlen = strlen(idesc->id_name); 833 if (DIRSIZ(NEWDIRFMT, &testdir) <= dirp->d_reclen) { 834 dirp->d_namlen = testdir.d_namlen; 835 strcpy(dirp->d_name, idesc->id_name); 836 return STOP|ALTERED|FOUND; 837 } else 838 return STOP|FOUND; /* won't fit, so give up */ 839 } 840 return KEEPON; 841 } 842 843 CMDFUNCSTART(chname) 844 { 845 int rval; 846 char *cp; 847 struct inodesc idesc; 848 849 slotcount = 0; 850 if (!checkactivedir()) 851 return 1; 852 853 desired = strtoul(argv[1], &cp, 0); 854 if (cp == argv[1] || *cp != '\0') { 855 printf("invalid slot number `%s'\n", argv[1]); 856 return 1; 857 } 858 859 idesc.id_number = curinum; 860 idesc.id_func = chnamefunc; 861 idesc.id_fix = IGNORE; 862 idesc.id_type = DATA; 863 idesc.id_name = argv[2]; 864 865 rval = ckinode(curinode, &idesc); 866 if ((rval & (FOUND|ALTERED)) == (FOUND|ALTERED)) 867 return 0; 868 else if (rval & FOUND) { 869 warnx("new name `%s' does not fit in slot %s\n", argv[2], argv[1]); 870 return 1; 871 } else { 872 warnx("no %sth slot in current directory", argv[1]); 873 return 1; 874 } 875 } 876 877 struct typemap { 878 const char *typename; 879 int typebits; 880 } typenamemap[] = { 881 {"file", IFREG}, 882 {"dir", IFDIR}, 883 {"socket", IFSOCK}, 884 {"fifo", IFIFO}, 885 }; 886 887 CMDFUNCSTART(newtype) 888 { 889 int type; 890 struct typemap *tp; 891 892 if (!checkactive()) 893 return 1; 894 type = DIP(curinode, di_mode) & IFMT; 895 for (tp = typenamemap; 896 tp < &typenamemap[sizeof(typenamemap)/sizeof(*typenamemap)]; 897 tp++) { 898 if (!strcmp(argv[1], tp->typename)) { 899 printf("setting type to %s\n", tp->typename); 900 type = tp->typebits; 901 break; 902 } 903 } 904 if (tp == &typenamemap[sizeof(typenamemap)/sizeof(*typenamemap)]) { 905 warnx("type `%s' not known", argv[1]); 906 warnx("try one of `file', `dir', `socket', `fifo'"); 907 return 1; 908 } 909 DIP_SET(curinode, di_mode, DIP(curinode, di_mode) & ~IFMT); 910 DIP_SET(curinode, di_mode, DIP(curinode, di_mode) | type); 911 inodirty(); 912 printactive(0); 913 return 0; 914 } 915 916 CMDFUNCSTART(chlen) 917 { 918 int rval = 1; 919 long len; 920 char *cp; 921 922 if (!checkactive()) 923 return 1; 924 925 len = strtol(argv[1], &cp, 0); 926 if (cp == argv[1] || *cp != '\0' || len < 0) { 927 warnx("bad length `%s'", argv[1]); 928 return 1; 929 } 930 931 DIP_SET(curinode, di_size, len); 932 inodirty(); 933 printactive(0); 934 return rval; 935 } 936 937 CMDFUNCSTART(chmode) 938 { 939 int rval = 1; 940 long modebits; 941 char *cp; 942 943 if (!checkactive()) 944 return 1; 945 946 modebits = strtol(argv[1], &cp, 8); 947 if (cp == argv[1] || *cp != '\0' || (modebits & ~07777)) { 948 warnx("bad modebits `%s'", argv[1]); 949 return 1; 950 } 951 952 DIP_SET(curinode, di_mode, DIP(curinode, di_mode) & ~07777); 953 DIP_SET(curinode, di_mode, DIP(curinode, di_mode) | modebits); 954 inodirty(); 955 printactive(0); 956 return rval; 957 } 958 959 CMDFUNCSTART(chaflags) 960 { 961 int rval = 1; 962 u_long flags; 963 char *cp; 964 965 if (!checkactive()) 966 return 1; 967 968 flags = strtoul(argv[1], &cp, 0); 969 if (cp == argv[1] || *cp != '\0' ) { 970 warnx("bad flags `%s'", argv[1]); 971 return 1; 972 } 973 974 if (flags > UINT_MAX) { 975 warnx("flags set beyond 32-bit range of field (%lx)\n", flags); 976 return(1); 977 } 978 DIP_SET(curinode, di_flags, flags); 979 inodirty(); 980 printactive(0); 981 return rval; 982 } 983 984 CMDFUNCSTART(chgen) 985 { 986 int rval = 1; 987 long gen; 988 char *cp; 989 990 if (!checkactive()) 991 return 1; 992 993 gen = strtol(argv[1], &cp, 0); 994 if (cp == argv[1] || *cp != '\0' ) { 995 warnx("bad gen `%s'", argv[1]); 996 return 1; 997 } 998 999 if (gen > INT_MAX || gen < INT_MIN) { 1000 warnx("gen set beyond 32-bit range of field (%lx)\n", gen); 1001 return(1); 1002 } 1003 DIP_SET(curinode, di_gen, gen); 1004 inodirty(); 1005 printactive(0); 1006 return rval; 1007 } 1008 1009 CMDFUNCSTART(linkcount) 1010 { 1011 int rval = 1; 1012 int lcnt; 1013 char *cp; 1014 1015 if (!checkactive()) 1016 return 1; 1017 1018 lcnt = strtol(argv[1], &cp, 0); 1019 if (cp == argv[1] || *cp != '\0' ) { 1020 warnx("bad link count `%s'", argv[1]); 1021 return 1; 1022 } 1023 if (lcnt > USHRT_MAX || lcnt < 0) { 1024 warnx("max link count is %d\n", USHRT_MAX); 1025 return 1; 1026 } 1027 1028 DIP_SET(curinode, di_nlink, lcnt); 1029 inodirty(); 1030 printactive(0); 1031 return rval; 1032 } 1033 1034 CMDFUNCSTART(chowner) 1035 { 1036 int rval = 1; 1037 unsigned long uid; 1038 char *cp; 1039 struct passwd *pwd; 1040 1041 if (!checkactive()) 1042 return 1; 1043 1044 uid = strtoul(argv[1], &cp, 0); 1045 if (cp == argv[1] || *cp != '\0' ) { 1046 /* try looking up name */ 1047 if ((pwd = getpwnam(argv[1]))) { 1048 uid = pwd->pw_uid; 1049 } else { 1050 warnx("bad uid `%s'", argv[1]); 1051 return 1; 1052 } 1053 } 1054 1055 DIP_SET(curinode, di_uid, uid); 1056 inodirty(); 1057 printactive(0); 1058 return rval; 1059 } 1060 1061 CMDFUNCSTART(chgroup) 1062 { 1063 int rval = 1; 1064 unsigned long gid; 1065 char *cp; 1066 struct group *grp; 1067 1068 if (!checkactive()) 1069 return 1; 1070 1071 gid = strtoul(argv[1], &cp, 0); 1072 if (cp == argv[1] || *cp != '\0' ) { 1073 if ((grp = getgrnam(argv[1]))) { 1074 gid = grp->gr_gid; 1075 } else { 1076 warnx("bad gid `%s'", argv[1]); 1077 return 1; 1078 } 1079 } 1080 1081 DIP_SET(curinode, di_gid, gid); 1082 inodirty(); 1083 printactive(0); 1084 return rval; 1085 } 1086 1087 int 1088 dotime(char *name, time_t *secp, int32_t *nsecp) 1089 { 1090 char *p, *val; 1091 struct tm t; 1092 int32_t nsec; 1093 p = strchr(name, '.'); 1094 if (p) { 1095 *p = '\0'; 1096 nsec = strtoul(++p, &val, 0); 1097 if (val == p || *val != '\0' || nsec >= 1000000000 || nsec < 0) { 1098 warnx("invalid nanoseconds"); 1099 goto badformat; 1100 } 1101 } else 1102 nsec = 0; 1103 if (strlen(name) != 14) { 1104 badformat: 1105 warnx("date format: YYYYMMDDHHMMSS[.nsec]"); 1106 return 1; 1107 } 1108 *nsecp = nsec; 1109 1110 for (p = name; *p; p++) 1111 if (*p < '0' || *p > '9') 1112 goto badformat; 1113 1114 p = name; 1115 #define VAL() ((*p++) - '0') 1116 t.tm_year = VAL(); 1117 t.tm_year = VAL() + t.tm_year * 10; 1118 t.tm_year = VAL() + t.tm_year * 10; 1119 t.tm_year = VAL() + t.tm_year * 10 - 1900; 1120 t.tm_mon = VAL(); 1121 t.tm_mon = VAL() + t.tm_mon * 10 - 1; 1122 t.tm_mday = VAL(); 1123 t.tm_mday = VAL() + t.tm_mday * 10; 1124 t.tm_hour = VAL(); 1125 t.tm_hour = VAL() + t.tm_hour * 10; 1126 t.tm_min = VAL(); 1127 t.tm_min = VAL() + t.tm_min * 10; 1128 t.tm_sec = VAL(); 1129 t.tm_sec = VAL() + t.tm_sec * 10; 1130 t.tm_isdst = -1; 1131 1132 *secp = mktime(&t); 1133 if (*secp == -1) { 1134 warnx("date/time out of range"); 1135 return 1; 1136 } 1137 return 0; 1138 } 1139 1140 CMDFUNCSTART(chbtime) 1141 { 1142 time_t secs; 1143 int32_t nsecs; 1144 1145 if (dotime(argv[1], &secs, &nsecs)) 1146 return 1; 1147 if (sblock.fs_magic == FS_UFS1_MAGIC) 1148 return 1; 1149 curinode->dp2.di_birthtime = _time_to_time64(secs); 1150 curinode->dp2.di_birthnsec = nsecs; 1151 inodirty(); 1152 printactive(0); 1153 return 0; 1154 } 1155 1156 CMDFUNCSTART(chmtime) 1157 { 1158 time_t secs; 1159 int32_t nsecs; 1160 1161 if (dotime(argv[1], &secs, &nsecs)) 1162 return 1; 1163 if (sblock.fs_magic == FS_UFS1_MAGIC) 1164 curinode->dp1.di_mtime = _time_to_time32(secs); 1165 else 1166 curinode->dp2.di_mtime = _time_to_time64(secs); 1167 DIP_SET(curinode, di_mtimensec, nsecs); 1168 inodirty(); 1169 printactive(0); 1170 return 0; 1171 } 1172 1173 CMDFUNCSTART(chatime) 1174 { 1175 time_t secs; 1176 int32_t nsecs; 1177 1178 if (dotime(argv[1], &secs, &nsecs)) 1179 return 1; 1180 if (sblock.fs_magic == FS_UFS1_MAGIC) 1181 curinode->dp1.di_atime = _time_to_time32(secs); 1182 else 1183 curinode->dp2.di_atime = _time_to_time64(secs); 1184 DIP_SET(curinode, di_atimensec, nsecs); 1185 inodirty(); 1186 printactive(0); 1187 return 0; 1188 } 1189 1190 CMDFUNCSTART(chctime) 1191 { 1192 time_t secs; 1193 int32_t nsecs; 1194 1195 if (dotime(argv[1], &secs, &nsecs)) 1196 return 1; 1197 if (sblock.fs_magic == FS_UFS1_MAGIC) 1198 curinode->dp1.di_ctime = _time_to_time32(secs); 1199 else 1200 curinode->dp2.di_ctime = _time_to_time64(secs); 1201 DIP_SET(curinode, di_ctimensec, nsecs); 1202 inodirty(); 1203 printactive(0); 1204 return 0; 1205 } 1206