xref: /freebsd/usr.sbin/fdcontrol/fdcontrol.c (revision 39beb93c)
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 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, 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 		case 'F':
84 			showfmt = 1;
85 			show = 0;
86 			break;
87 
88 		case 'f':
89 			if (!strcmp(optarg, "auto")) {
90 				format = -1;
91 			} else if (getnum(optarg, &format)) {
92 				fprintf(stderr,
93 			"Bad argument %s to -f option; must be numeric\n",
94 					optarg);
95 				usage();
96 			}
97 			show = 0;
98 			break;
99 
100 		case 's':
101 			fmtstring = optarg;
102 			show = 0;
103 			break;
104 
105 		case 'v':
106 			verbose++;
107 			break;
108 
109 		default:
110 			usage();
111 		}
112 
113 	argc -= optind;
114 	argv += optind;
115 
116 	if(argc != 1)
117 		usage();
118 
119 	if (show || showfmt)
120 		mode = O_RDONLY | O_NONBLOCK;
121 	else
122 		mode = O_RDWR;
123 
124 	if((fd = open(argv[0], mode)) < 0)
125 		err(EX_UNAVAILABLE, "open(%s)", argv[0]);
126 
127 	if (ioctl(fd, FD_GDTYPE, &type) == -1)
128 		err(EX_OSERR, "ioctl(FD_GDTYPE)");
129 	if (ioctl(fd, FD_GTYPE, &ft) == -1)
130 		err(EX_OSERR, "ioctl(FD_GTYPE)");
131 
132 	if (show) {
133 		showdev(type, argv[0]);
134 		return (0);
135 	}
136 
137 	if (autofmt) {
138 		memset(&newft, 0, sizeof newft);
139 		ft = newft;
140 	}
141 
142 	if (format) {
143 		getname(type, &name, &descr);
144 		fdtp = get_fmt(format, type);
145 		if (fdtp == 0)
146 			errx(EX_USAGE,
147 			    "unknown format %d KB for drive type %s",
148 			    format, name);
149 		ft = *fdtp;
150 	}
151 
152 	if (fmtstring) {
153 		parse_fmt(fmtstring, type, ft, &newft);
154 		ft = newft;
155 	}
156 
157 	if (showfmt) {
158 		if (verbose) {
159 			const char *s;
160 
161 			printf("%s: %d KB media type\n", argv[0],
162 			    (128 << ft.secsize) * ft.size / 1024);
163 			printf("\tFormat:\t\t");
164 			print_fmt(ft);
165 			if (ft.datalen != 0xff &&
166 			    ft.datalen != (128 << ft.secsize))
167 				printf("\tData length:\t%d\n", ft.datalen);
168 			printf("\tSector size:\t%d\n", 128 << ft.secsize);
169 			printf("\tSectors/track:\t%d\n", ft.sectrac);
170 			printf("\tHeads/cylinder:\t%d\n", ft.heads);
171 			printf("\tCylinders/disk:\t%d\n", ft.tracks);
172 			switch (ft.trans) {
173 			case 0: printf("\tTransfer rate:\t500 kbps\n"); break;
174 			case 1: printf("\tTransfer rate:\t300 kbps\n"); break;
175 			case 2: printf("\tTransfer rate:\t250 kbps\n"); break;
176 			case 3: printf("\tTransfer rate:\t1 Mbps\n"); break;
177 			}
178 			printf("\tSector gap:\t%d\n", ft.gap);
179 			printf("\tFormat gap:\t%d\n", ft.f_gap);
180 			printf("\tInterleave:\t%d\n", ft.f_inter);
181 			printf("\tSide offset:\t%d\n", ft.offset_side2);
182 			printf("\tFlags\t\t<");
183 			s = "";
184 			if (ft.flags & FL_MFM) {
185 				printf("%sMFM", s);
186 				s = ",";
187 			}
188 			if (ft.flags & FL_2STEP) {
189 				printf("%s2STEP", s);
190 				s = ",";
191 			}
192 			if (ft.flags & FL_PERPND) {
193 				printf("%sPERPENDICULAR", s);
194 				s = ",";
195 			}
196 			if (ft.flags & FL_AUTO) {
197 				printf("%sAUTO", s);
198 				s = ",";
199 			}
200 			printf(">\n");
201 		} else {
202 			print_fmt(ft);
203 		}
204 		return (0);
205 	}
206 
207 	if (format || fmtstring) {
208 		if (ioctl(fd, FD_STYPE, &ft) == -1)
209 			err(EX_OSERR, "ioctl(FD_STYPE)");
210 		return (0);
211 	}
212 
213 	return 0;
214 }
215