xref: /freebsd/sbin/fsdb/fsdbutil.c (revision 848ee2a3a8b47c9905fc51fefcf60eb371edbb98)
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 void prtblknos(struct fs *fs, 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-1);
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 (%#jx)", (uintmax_t)DIP(dp, di_rdev));
130 	break;
131     case IFCHR:
132 	printf("character special (%#jx)", DIP(dp, di_rdev));
133 	break;
134     case IFLNK:
135 	fputs("symlink",stdout);
136 	if (DIP(dp, di_size) > 0 &&
137 	    DIP(dp, di_size) < sblock.fs_maxsymlinklen &&
138 	    DIP(dp, di_blocks) == 0) {
139 	    if (sblock.fs_magic == FS_UFS1_MAGIC)
140 		p = (caddr_t)dp->dp1.di_db;
141 	    else
142 		p = (caddr_t)dp->dp2.di_db;
143 	    printf(" to `%.*s'\n", (int) DIP(dp, di_size), p);
144 	} else {
145 	    putchar('\n');
146 	}
147 	break;
148     case IFSOCK:
149 	puts("socket");
150 	break;
151     case IFIFO:
152 	puts("fifo");
153 	break;
154     }
155     printf("I=%ju MODE=%o SIZE=%ju", (uintmax_t)inum, DIP(dp, di_mode),
156 	(uintmax_t)DIP(dp, di_size));
157     if (sblock.fs_magic != FS_UFS1_MAGIC) {
158 	t = _time64_to_time(dp->dp2.di_birthtime);
159 	p = ctime(&t);
160 	printf("\n\tBTIME=%15.15s %4.4s [%d nsec]", &p[4], &p[20],
161 	   dp->dp2.di_birthnsec);
162     }
163     if (sblock.fs_magic == FS_UFS1_MAGIC)
164 	t = _time32_to_time(dp->dp1.di_mtime);
165     else
166 	t = _time64_to_time(dp->dp2.di_mtime);
167     p = ctime(&t);
168     printf("\n\tMTIME=%15.15s %4.4s [%d nsec]", &p[4], &p[20],
169 	   DIP(dp, di_mtimensec));
170     if (sblock.fs_magic == FS_UFS1_MAGIC)
171 	t = _time32_to_time(dp->dp1.di_ctime);
172     else
173 	t = _time64_to_time(dp->dp2.di_ctime);
174     p = ctime(&t);
175     printf("\n\tCTIME=%15.15s %4.4s [%d nsec]", &p[4], &p[20],
176 	   DIP(dp, di_ctimensec));
177     if (sblock.fs_magic == FS_UFS1_MAGIC)
178 	t = _time32_to_time(dp->dp1.di_atime);
179     else
180 	t = _time64_to_time(dp->dp2.di_atime);
181     p = ctime(&t);
182     printf("\n\tATIME=%15.15s %4.4s [%d nsec]\n", &p[4], &p[20],
183 	   DIP(dp, di_atimensec));
184 
185     if ((pw = getpwuid(DIP(dp, di_uid))))
186 	printf("OWNER=%s ", pw->pw_name);
187     else
188 	printf("OWNUID=%u ", DIP(dp, di_uid));
189     if ((grp = getgrgid(DIP(dp, di_gid))))
190 	printf("GRP=%s ", grp->gr_name);
191     else
192 	printf("GID=%u ", DIP(dp, di_gid));
193 
194     blocks = DIP(dp, di_blocks);
195     gen = DIP(dp, di_gen);
196     printf("LINKCNT=%d FLAGS=%#x BLKCNT=%jx GEN=%jx\n", DIP(dp, di_nlink),
197 	DIP(dp, di_flags), (intmax_t)blocks, (intmax_t)gen);
198 }
199 
200 
201 int
202 checkactive(void)
203 {
204     if (!curinode) {
205 	warnx("no current inode\n");
206 	return 0;
207     }
208     return 1;
209 }
210 
211 int
212 checkactivedir(void)
213 {
214     if (!curinode) {
215 	warnx("no current inode\n");
216 	return 0;
217     }
218     if ((DIP(curinode, di_mode) & IFMT) != IFDIR) {
219 	warnx("inode %ju not a directory", (uintmax_t)curinum);
220 	return 0;
221     }
222     return 1;
223 }
224 
225 int
226 printactive(int doblocks)
227 {
228     if (!checkactive())
229 	return 1;
230     switch (DIP(curinode, di_mode) & IFMT) {
231     case IFDIR:
232     case IFREG:
233     case IFBLK:
234     case IFCHR:
235     case IFLNK:
236     case IFSOCK:
237     case IFIFO:
238 	if (doblocks)
239 	    prtblknos(&sblock, curinode);
240 	else
241 	    printstat("current inode", curinum, curinode);
242 	break;
243     case 0:
244 	printf("current inode %ju: unallocated inode\n", (uintmax_t)curinum);
245 	break;
246     default:
247 	printf("current inode %ju: screwy itype 0%o (mode 0%o)?\n",
248 	    (uintmax_t)curinum, DIP(curinode, di_mode) & IFMT,
249 	    DIP(curinode, di_mode));
250 	break;
251     }
252     return 0;
253 }
254