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
usage(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
showdev(enum fd_drivetype type,const char * fname)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
main(int argc,char ** argv)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