1 /*- 2 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD 3 * 4 * Copyright (C) 1994, 2001 by Joerg Wunsch, Dresden 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 * 16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR(S) ``AS IS'' AND ANY 17 * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 19 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR(S) BE LIABLE 20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT 22 * OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR 23 * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF 24 * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE 26 * USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH 27 * DAMAGE. 28 */ 29 30 #include <sys/cdefs.h> 31 __FBSDID("$FreeBSD$"); 32 33 #include <sys/fdcio.h> 34 #include <sys/file.h> 35 36 #include <err.h> 37 #include <stdio.h> 38 #include <stdlib.h> 39 #include <string.h> 40 #include <sysexits.h> 41 #include <unistd.h> 42 43 #include "fdutil.h" 44 45 46 static int format, verbose, show = 1, showfmt; 47 static char *fmtstring; 48 49 static void showdev(enum fd_drivetype, const char *); 50 static void usage(void); 51 52 static void 53 usage(void) 54 { 55 errx(EX_USAGE, 56 "usage: fdcontrol [-F] [-d dbg] [-f fmt] [-s fmtstr] [-v] device"); 57 } 58 59 void 60 showdev(enum fd_drivetype type, const char *fname) 61 { 62 const char *name, *descr; 63 64 getname(type, &name, &descr); 65 if (verbose) 66 printf("%s: %s drive (%s)\n", fname, name, descr); 67 else 68 printf("%s\n", name); 69 } 70 71 int 72 main(int argc, char **argv) 73 { 74 enum fd_drivetype type; 75 struct fd_type ft, newft, *fdtp; 76 const char *name, *descr; 77 int fd, i, autofmt; 78 79 autofmt = 0; 80 while((i = getopt(argc, argv, "aFf:s:v")) != -1) 81 switch(i) { 82 83 case 'a': 84 autofmt = 1; 85 /*FALLTHROUGH*/ 86 case 'F': 87 showfmt = 1; 88 show = 0; 89 break; 90 91 case 'f': 92 if (!strcmp(optarg, "auto")) { 93 format = -1; 94 } else if (getnum(optarg, &format)) { 95 fprintf(stderr, 96 "Bad argument %s to -f option; must be numeric\n", 97 optarg); 98 usage(); 99 } 100 show = 0; 101 break; 102 103 case 's': 104 fmtstring = optarg; 105 show = 0; 106 break; 107 108 case 'v': 109 verbose++; 110 break; 111 112 default: 113 usage(); 114 } 115 116 argc -= optind; 117 argv += optind; 118 119 if(argc != 1) 120 usage(); 121 122 if((fd = open(argv[0], O_RDONLY | O_NONBLOCK)) < 0) 123 err(EX_UNAVAILABLE, "open(%s)", argv[0]); 124 125 if (ioctl(fd, FD_GDTYPE, &type) == -1) 126 err(EX_OSERR, "ioctl(FD_GDTYPE)"); 127 if (ioctl(fd, FD_GTYPE, &ft) == -1) 128 err(EX_OSERR, "ioctl(FD_GTYPE)"); 129 130 if (show) { 131 showdev(type, argv[0]); 132 return (0); 133 } 134 135 if (autofmt) { 136 memset(&newft, 0, sizeof newft); 137 ft = newft; 138 } 139 140 if (format) { 141 getname(type, &name, &descr); 142 fdtp = get_fmt(format, type); 143 if (fdtp == 0) 144 errx(EX_USAGE, 145 "unknown format %d KB for drive type %s", 146 format, name); 147 ft = *fdtp; 148 } 149 150 if (fmtstring) { 151 parse_fmt(fmtstring, type, ft, &newft); 152 ft = newft; 153 } 154 155 if (showfmt) { 156 if (verbose) { 157 const char *s; 158 159 printf("%s: %d KB media type\n", argv[0], 160 (128 << ft.secsize) * ft.size / 1024); 161 printf("\tFormat:\t\t"); 162 print_fmt(ft); 163 if (ft.datalen != 0xff && 164 ft.datalen != (128 << ft.secsize)) 165 printf("\tData length:\t%d\n", ft.datalen); 166 printf("\tSector size:\t%d\n", 128 << ft.secsize); 167 printf("\tSectors/track:\t%d\n", ft.sectrac); 168 printf("\tHeads/cylinder:\t%d\n", ft.heads); 169 printf("\tCylinders/disk:\t%d\n", ft.tracks); 170 switch (ft.trans) { 171 case 0: printf("\tTransfer rate:\t500 kbps\n"); break; 172 case 1: printf("\tTransfer rate:\t300 kbps\n"); break; 173 case 2: printf("\tTransfer rate:\t250 kbps\n"); break; 174 case 3: printf("\tTransfer rate:\t1 Mbps\n"); break; 175 } 176 printf("\tSector gap:\t%d\n", ft.gap); 177 printf("\tFormat gap:\t%d\n", ft.f_gap); 178 printf("\tInterleave:\t%d\n", ft.f_inter); 179 printf("\tSide offset:\t%d\n", ft.offset_side2); 180 printf("\tFlags\t\t<"); 181 s = ""; 182 if (ft.flags & FL_MFM) { 183 printf("%sMFM", s); 184 s = ","; 185 } 186 if (ft.flags & FL_2STEP) { 187 printf("%s2STEP", s); 188 s = ","; 189 } 190 if (ft.flags & FL_PERPND) { 191 printf("%sPERPENDICULAR", s); 192 s = ","; 193 } 194 if (ft.flags & FL_AUTO) { 195 printf("%sAUTO", s); 196 s = ","; 197 } 198 printf(">\n"); 199 } else { 200 print_fmt(ft); 201 } 202 return (0); 203 } 204 205 if (format || fmtstring) { 206 if (ioctl(fd, FD_STYPE, &ft) == -1) 207 err(EX_OSERR, "ioctl(FD_STYPE)"); 208 return (0); 209 } 210 211 return 0; 212 } 213