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 <stdint.h> 43 #include <stdio.h> 44 #include <stdlib.h> 45 #include <string.h> 46 #include <unistd.h> 47 #include <vis.h> 48 49 #include "fstyp.h" 50 51 #define LABEL_LEN 256 52 53 typedef int (*fstyp_function)(FILE *, char *, size_t); 54 55 static struct { 56 const char *name; 57 fstyp_function function; 58 bool unmountable; 59 } fstypes[] = { 60 { "cd9660", &fstyp_cd9660, false }, 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 == 0) { 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