xref: /freebsd/usr.sbin/fstyp/fstyp.c (revision cbd30a72ca196976c1c700400ecd424baa1b9c16)
1 /*-
2  * Copyright (c) 2014 The FreeBSD Foundation
3  * All rights reserved.
4  *
5  * This software was developed by Edward Tomasz Napierala under sponsorship
6  * from the FreeBSD Foundation.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27  * SUCH DAMAGE.
28  *
29  */
30 
31 #include <sys/cdefs.h>
32 __FBSDID("$FreeBSD$");
33 
34 #include <sys/capsicum.h>
35 #include <sys/disk.h>
36 #include <sys/ioctl.h>
37 #include <sys/stat.h>
38 #include <err.h>
39 #include <errno.h>
40 #include <stdbool.h>
41 #include <stddef.h>
42 #include <stdio.h>
43 #include <stdlib.h>
44 #include <string.h>
45 #include <unistd.h>
46 #include <vis.h>
47 
48 #include "fstyp.h"
49 
50 #define	LABEL_LEN	256
51 
52 typedef int (*fstyp_function)(FILE *, char *, size_t);
53 
54 static struct {
55 	const char	*name;
56 	fstyp_function	function;
57 	bool		unmountable;
58 } fstypes[] = {
59 	{ "cd9660", &fstyp_cd9660, false },
60 	{ "exfat", &fstyp_exfat, true },
61 	{ "ext2fs", &fstyp_ext2fs, false },
62 	{ "geli", &fstyp_geli, true },
63 	{ "msdosfs", &fstyp_msdosfs, false },
64 	{ "ntfs", &fstyp_ntfs, false },
65 	{ "ufs", &fstyp_ufs, false },
66 #ifdef HAVE_ZFS
67 	{ "zfs", &fstyp_zfs, true },
68 #endif
69 	{ NULL, NULL, NULL }
70 };
71 
72 void *
73 read_buf(FILE *fp, off_t off, size_t len)
74 {
75 	int error;
76 	size_t nread;
77 	void *buf;
78 
79 	error = fseek(fp, off, SEEK_SET);
80 	if (error != 0) {
81 		warn("cannot seek to %jd", (uintmax_t)off);
82 		return (NULL);
83 	}
84 
85 	buf = malloc(len);
86 	if (buf == NULL) {
87 		warn("cannot malloc %zd bytes of memory", len);
88 		return (NULL);
89 	}
90 
91 	nread = fread(buf, len, 1, fp);
92 	if (nread != 1) {
93 		free(buf);
94 		if (feof(fp) == 0)
95 			warn("fread");
96 		return (NULL);
97 	}
98 
99 	return (buf);
100 }
101 
102 char *
103 checked_strdup(const char *s)
104 {
105 	char *c;
106 
107 	c = strdup(s);
108 	if (c == NULL)
109 		err(1, "strdup");
110 	return (c);
111 }
112 
113 void
114 rtrim(char *label, size_t size)
115 {
116 	ptrdiff_t i;
117 
118 	for (i = size - 1; i >= 0; i--) {
119 		if (label[i] == '\0')
120 			continue;
121 		else if (label[i] == ' ')
122 			label[i] = '\0';
123 		else
124 			break;
125 	}
126 }
127 
128 static void
129 usage(void)
130 {
131 
132 	fprintf(stderr, "usage: fstyp [-l] [-s] [-u] special\n");
133 	exit(1);
134 }
135 
136 static void
137 type_check(const char *path, FILE *fp)
138 {
139 	int error, fd;
140 	off_t mediasize;
141 	struct stat sb;
142 
143 	fd = fileno(fp);
144 
145 	error = fstat(fd, &sb);
146 	if (error != 0)
147 		err(1, "%s: fstat", path);
148 
149 	if (S_ISREG(sb.st_mode))
150 		return;
151 
152 	error = ioctl(fd, DIOCGMEDIASIZE, &mediasize);
153 	if (error != 0)
154 		errx(1, "%s: not a disk", path);
155 }
156 
157 int
158 main(int argc, char **argv)
159 {
160 	int ch, error, i, nbytes;
161 	bool ignore_type = false, show_label = false, show_unmountable = false;
162 	char label[LABEL_LEN + 1], strvised[LABEL_LEN * 4 + 1];
163 	char *path;
164 	FILE *fp;
165 	fstyp_function fstyp_f;
166 
167 	while ((ch = getopt(argc, argv, "lsu")) != -1) {
168 		switch (ch) {
169 		case 'l':
170 			show_label = true;
171 			break;
172 		case 's':
173 			ignore_type = true;
174 			break;
175 		case 'u':
176 			show_unmountable = true;
177 			break;
178 		default:
179 			usage();
180 		}
181 	}
182 
183 	argc -= optind;
184 	argv += optind;
185 	if (argc != 1)
186 		usage();
187 
188 	path = argv[0];
189 
190 	fp = fopen(path, "r");
191 	if (fp == NULL)
192 		err(1, "%s", path);
193 
194 	error = cap_enter();
195 	if (error != 0 && errno != ENOSYS)
196 		err(1, "cap_enter");
197 
198 	if (ignore_type == false)
199 		type_check(path, fp);
200 
201 	memset(label, '\0', sizeof(label));
202 
203 	for (i = 0;; i++) {
204 		if (show_unmountable == false && fstypes[i].unmountable == true)
205 			continue;
206 		fstyp_f = fstypes[i].function;
207 		if (fstyp_f == NULL)
208 			break;
209 
210 		error = fstyp_f(fp, label, sizeof(label));
211 		if (error == 0)
212 			break;
213 	}
214 
215 	if (fstypes[i].name == NULL) {
216 		warnx("%s: filesystem not recognized", path);
217 		return (1);
218 	}
219 
220 	if (show_label && label[0] != '\0') {
221 		/*
222 		 * XXX: I'd prefer VIS_HTTPSTYLE, but it unconditionally
223 		 *      encodes spaces.
224 		 */
225 		nbytes = strsnvis(strvised, sizeof(strvised), label,
226 		    VIS_GLOB | VIS_NL, "\"'$");
227 		if (nbytes == -1)
228 			err(1, "strsnvis");
229 
230 		printf("%s %s\n", fstypes[i].name, strvised);
231 	} else {
232 		printf("%s\n", fstypes[i].name);
233 	}
234 
235 	return (0);
236 }
237