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