1 /*- 2 * SPDX-License-Identifier: BSD-2-Clause 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 #include <sys/fdcio.h> 32 #include <sys/file.h> 33 34 #include <err.h> 35 #include <stdio.h> 36 #include <stdlib.h> 37 #include <string.h> 38 #include <sysexits.h> 39 #include <unistd.h> 40 41 #include "fdutil.h" 42 43 44 static int format, verbose, show = 1, showfmt; 45 static char *fmtstring; 46 47 static void showdev(enum fd_drivetype, const char *); 48 static void usage(void) __dead2; 49 50 static void 51 usage(void) 52 { 53 errx(EX_USAGE, 54 "usage: fdcontrol [-F] [-d dbg] [-f fmt] [-s fmtstr] [-v] device"); 55 } 56 57 void 58 showdev(enum fd_drivetype type, const char *fname) 59 { 60 const char *name, *descr; 61 62 getname(type, &name, &descr); 63 if (verbose) 64 printf("%s: %s drive (%s)\n", fname, name, descr); 65 else 66 printf("%s\n", name); 67 } 68 69 int 70 main(int argc, char **argv) 71 { 72 enum fd_drivetype type; 73 struct fd_type ft, newft, *fdtp; 74 const char *name, *descr; 75 int fd, i, autofmt; 76 77 autofmt = 0; 78 while((i = getopt(argc, argv, "aFf:s:v")) != -1) 79 switch(i) { 80 81 case 'a': 82 autofmt = 1; 83 /*FALLTHROUGH*/ 84 case 'F': 85 showfmt = 1; 86 show = 0; 87 break; 88 89 case 'f': 90 if (!strcmp(optarg, "auto")) { 91 format = -1; 92 } else if (getnum(optarg, &format)) { 93 fprintf(stderr, 94 "Bad argument %s to -f option; must be numeric\n", 95 optarg); 96 usage(); 97 } 98 show = 0; 99 break; 100 101 case 's': 102 fmtstring = optarg; 103 show = 0; 104 break; 105 106 case 'v': 107 verbose++; 108 break; 109 110 default: 111 usage(); 112 } 113 114 argc -= optind; 115 argv += optind; 116 117 if(argc != 1) 118 usage(); 119 120 if((fd = open(argv[0], O_RDONLY | O_NONBLOCK)) < 0) 121 err(EX_UNAVAILABLE, "open(%s)", argv[0]); 122 123 if (ioctl(fd, FD_GDTYPE, &type) == -1) 124 err(EX_OSERR, "ioctl(FD_GDTYPE)"); 125 if (ioctl(fd, FD_GTYPE, &ft) == -1) 126 err(EX_OSERR, "ioctl(FD_GTYPE)"); 127 128 if (show) { 129 showdev(type, argv[0]); 130 return (0); 131 } 132 133 if (autofmt) { 134 memset(&newft, 0, sizeof newft); 135 ft = newft; 136 } 137 138 if (format) { 139 getname(type, &name, &descr); 140 fdtp = get_fmt(format, type); 141 if (fdtp == 0) 142 errx(EX_USAGE, 143 "unknown format %d KB for drive type %s", 144 format, name); 145 ft = *fdtp; 146 } 147 148 if (fmtstring) { 149 parse_fmt(fmtstring, type, ft, &newft); 150 ft = newft; 151 } 152 153 if (showfmt) { 154 if (verbose) { 155 const char *s; 156 157 printf("%s: %d KB media type\n", argv[0], 158 (128 << ft.secsize) * ft.size / 1024); 159 printf("\tFormat:\t\t"); 160 print_fmt(ft); 161 if (ft.datalen != 0xff && 162 ft.datalen != (128 << ft.secsize)) 163 printf("\tData length:\t%d\n", ft.datalen); 164 printf("\tSector size:\t%d\n", 128 << ft.secsize); 165 printf("\tSectors/track:\t%d\n", ft.sectrac); 166 printf("\tHeads/cylinder:\t%d\n", ft.heads); 167 printf("\tCylinders/disk:\t%d\n", ft.tracks); 168 switch (ft.trans) { 169 case 0: printf("\tTransfer rate:\t500 kbps\n"); break; 170 case 1: printf("\tTransfer rate:\t300 kbps\n"); break; 171 case 2: printf("\tTransfer rate:\t250 kbps\n"); break; 172 case 3: printf("\tTransfer rate:\t1 Mbps\n"); break; 173 } 174 printf("\tSector gap:\t%d\n", ft.gap); 175 printf("\tFormat gap:\t%d\n", ft.f_gap); 176 printf("\tInterleave:\t%d\n", ft.f_inter); 177 printf("\tSide offset:\t%d\n", ft.offset_side2); 178 printf("\tFlags\t\t<"); 179 s = ""; 180 if (ft.flags & FL_MFM) { 181 printf("%sMFM", s); 182 s = ","; 183 } 184 if (ft.flags & FL_2STEP) { 185 printf("%s2STEP", s); 186 s = ","; 187 } 188 if (ft.flags & FL_PERPND) { 189 printf("%sPERPENDICULAR", s); 190 s = ","; 191 } 192 if (ft.flags & FL_AUTO) { 193 printf("%sAUTO", s); 194 s = ","; 195 } 196 printf(">\n"); 197 } else { 198 print_fmt(ft); 199 } 200 return (0); 201 } 202 203 if (format || fmtstring) { 204 if (ioctl(fd, FD_STYPE, &ft) == -1) 205 err(EX_OSERR, "ioctl(FD_STYPE)"); 206 return (0); 207 } 208 209 return 0; 210 } 211