1 /* 2 * Copyright (C) 1994, 2001 by Joerg Wunsch, Dresden 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR(S) ``AS IS'' AND ANY 15 * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 17 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR(S) BE LIABLE 18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 19 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT 20 * OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR 21 * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF 22 * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 23 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE 24 * USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH 25 * DAMAGE. 26 */ 27 28 #include <sys/cdefs.h> 29 __FBSDID("$FreeBSD$"); 30 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 debug = -1, format, verbose, show = 1, showfmt; 45 static char *fmtstring; 46 47 static void showdev(enum fd_drivetype, const char *); 48 static void usage(void); 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, mode; 76 77 while((i = getopt(argc, argv, "d:Ff:s:v")) != -1) 78 switch(i) { 79 case 'd': 80 if (strcmp(optarg, "0") == 0) 81 debug = 0; 82 else if (strcmp(optarg, "1") == 0) 83 debug = 1; 84 else 85 usage(); 86 show = 0; 87 break; 88 89 case 'F': 90 showfmt = 1; 91 show = 0; 92 break; 93 94 case 'f': 95 if (!strcmp(optarg, "auto")) { 96 format = -1; 97 } else if (getnum(optarg, &format)) { 98 fprintf(stderr, 99 "Bad argument %s to -f option; must be numeric\n", 100 optarg); 101 usage(); 102 } 103 show = 0; 104 break; 105 106 case 's': 107 fmtstring = optarg; 108 show = 0; 109 break; 110 111 case 'v': 112 verbose++; 113 break; 114 115 default: 116 usage(); 117 } 118 119 argc -= optind; 120 argv += optind; 121 122 if(argc != 1) 123 usage(); 124 125 if (show || showfmt) 126 mode = O_RDONLY | O_NONBLOCK; 127 else 128 mode = O_RDWR; 129 mode = O_RDONLY | O_NONBLOCK; 130 131 if((fd = open(argv[0], mode)) < 0) 132 err(EX_UNAVAILABLE, "open(%s)", argv[0]); 133 134 if (ioctl(fd, FD_GDTYPE, &type) == -1) 135 err(EX_OSERR, "ioctl(FD_GDTYPE)"); 136 if (ioctl(fd, FD_GTYPE, &ft) == -1) 137 err(EX_OSERR, "ioctl(FD_GTYPE)"); 138 139 if (show) { 140 showdev(type, argv[0]); 141 return (0); 142 } 143 144 if (format) { 145 getname(type, &name, &descr); 146 fdtp = get_fmt(format, type); 147 if (fdtp == 0) 148 errx(EX_USAGE, 149 "unknown format %d KB for drive type %s", 150 format, name); 151 ft = *fdtp; 152 } 153 154 if (fmtstring) { 155 parse_fmt(fmtstring, type, ft, &newft); 156 ft = newft; 157 } 158 159 if (showfmt) { 160 if (verbose) { 161 char *s; 162 163 printf("%s: %d KB media type\n", argv[0], 164 (128 << ft.secsize) * ft.size / 1024); 165 printf("\tFormat:\t\t"); 166 print_fmt(ft); 167 if (ft.datalen != 0xff && 168 ft.datalen != (128 << ft.secsize)) 169 printf("\tData length:\t%d\n", ft.datalen); 170 printf("\tSector size:\t%d\n", 128 << ft.secsize); 171 printf("\tSectors/track:\t%d\n", ft.sectrac); 172 printf("\tHeads/cylinder:\t%d\n", ft.heads); 173 printf("\tCylinders/disk:\t%d\n", ft.tracks); 174 switch (ft.trans) { 175 case 0: printf("\tTransfer rate:\t500 kbps\n"); break; 176 case 1: printf("\tTransfer rate:\t300 kbps\n"); break; 177 case 2: printf("\tTransfer rate:\t250 kbps\n"); break; 178 case 3: printf("\tTransfer rate:\t1 Mbps\n"); break; 179 } 180 printf("\tSector gap:\t%d\n", ft.gap); 181 printf("\tFormat gap:\t%d\n", ft.f_gap); 182 printf("\tInterleave:\t%d\n", ft.f_inter); 183 printf("\tSide offset:\t%d\n", ft.offset_side2); 184 printf("\tFlags\t\t<"); 185 s = ""; 186 if (ft.flags & FL_MFM) { 187 printf("%sMFM", s); 188 s = ","; 189 } 190 if (ft.flags & FL_2STEP) { 191 printf("%s2STEP", s); 192 s = ","; 193 } 194 if (ft.flags & FL_PERPND) { 195 printf("%sPERPENDICULAR", 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 if (debug != -1) { 212 if (ioctl(fd, FD_DEBUG, &debug) == -1) 213 err(EX_OSERR, "ioctl(FD_DEBUG)"); 214 return (0); 215 } 216 217 return 0; 218 } 219