xref: /freebsd/usr.sbin/fdcontrol/fdcontrol.c (revision d91f8db5f1822c43cd256f19aae1d059e4b25a26)
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 __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