xref: /freebsd/sys/dev/fdc/fdc_isa.c (revision 7ef62cebc2f965b0f640263e179276928885e33d)
1 /*-
2  * SPDX-License-Identifier: BSD-2-Clause
3  *
4  * Copyright (c) 2004-2005 M. Warner Losh <imp@FreeBSD.org>
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  *
15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25  * SUCH DAMAGE.
26  */
27 
28 #include <sys/cdefs.h>
29 __FBSDID("$FreeBSD$");
30 
31 #include <sys/param.h>
32 #include <sys/bio.h>
33 #include <sys/bus.h>
34 #include <sys/kernel.h>
35 #include <sys/lock.h>
36 #include <sys/module.h>
37 #include <sys/mutex.h>
38 #include <sys/rman.h>
39 #include <sys/systm.h>
40 
41 #include <machine/bus.h>
42 
43 #include <dev/fdc/fdcvar.h>
44 
45 #include <isa/isavar.h>
46 #include <isa/isareg.h>
47 
48 static int fdc_isa_probe(device_t);
49 
50 static struct isa_pnp_id fdc_ids[] = {
51 	{0x0007d041, "PC standard floppy controller"}, /* PNP0700 */
52 	{0x0107d041, "Standard floppy controller supporting MS Device Bay Spec"}, /* PNP0701 */
53 	{0}
54 };
55 
56 /*
57  * On standard ISA, we don't just use an 8 port range
58  * (e.g. 0x3f0-0x3f7) since that covers an IDE control register at
59  * 0x3f6.  So, on older hardware, we use 0x3f0-0x3f5 and 0x3f7.
60  * However, some BIOSs omit the control port, while others start at
61  * 0x3f2.  Of the latter, sometimes we have two resources, other times
62  * we have one.  We have to deal with the following cases:
63  *
64  * 1:	0x3f0-0x3f5			# very rare
65  * 2:	0x3f0				# hints -> 0x3f0-0x3f5,0x3f7
66  * 3:	0x3f0-0x3f5,0x3f7		# Most common
67  * 4:	0x3f2-0x3f5,0x3f7		# Second most common
68  * 5:	0x3f2-0x3f5			# implies 0x3f7 too.
69  * 6:	0x3f2-0x3f3,0x3f4-0x3f5,0x3f7	# becoming common
70  * 7:	0x3f2-0x3f3,0x3f4-0x3f5		# rare
71  * 8:	0x3f0-0x3f1,0x3f2-0x3f3,0x3f4-0x3f5,0x3f7
72  * 9:	0x3f0-0x3f3,0x3f4-0x3f5,0x3f7
73  *
74  * The following code is generic for any value of 0x3fx.  It is also
75  * generic for all the above cases, as well as cases where things are
76  * even weirder.
77  */
78 int
79 fdc_isa_alloc_resources(device_t dev, struct fdc_data *fdc)
80 {
81 	struct resource *res;
82 	int i, j, rid, newrid, nport;
83 	u_long port;
84 
85 	fdc->fdc_dev = dev;
86 	rid = 0;
87 	for (i = 0; i < FDC_MAXREG; i++)
88 		fdc->resio[i] = NULL;
89 
90 	nport = isa_get_logicalid(dev) ? 1 : 6;
91 	for (rid = 0; ; rid++) {
92 		newrid = rid;
93 		res = bus_alloc_resource_anywhere(dev, SYS_RES_IOPORT, &newrid,
94 		    rid == 0 ? nport : 1, RF_ACTIVE);
95 		if (res == NULL)
96 			break;
97 		/*
98 		 * Mask off the upper bits of the register, and sanity
99 		 * check resource ranges.
100 		 */
101 		i = rman_get_start(res) & 0x7;
102 		if (i + rman_get_size(res) - 1 > FDC_MAXREG) {
103 			bus_release_resource(dev, SYS_RES_IOPORT, newrid, res);
104 			return (ENXIO);
105 		}
106 		for (j = 0; j < rman_get_size(res); j++) {
107 			fdc->resio[i + j] = res;
108 			fdc->ridio[i + j] = newrid;
109 			fdc->ioff[i + j] = j;
110 			fdc->ioh[i + j] = rman_get_bushandle(res);
111 		}
112 	}
113 	if (fdc->resio[2] == NULL) {
114 		device_printf(dev, "No FDOUT register!\n");
115 		return (ENXIO);
116 	}
117 	fdc->iot = rman_get_bustag(fdc->resio[2]);
118 	if (fdc->resio[7] == NULL) {
119 		port = (rman_get_start(fdc->resio[2]) & ~0x7) + 7;
120 		newrid = rid;
121 		res = bus_alloc_resource(dev, SYS_RES_IOPORT, &newrid, port,
122 		    port, 1, RF_ACTIVE);
123 		if (res == NULL) {
124 			device_printf(dev, "Faking up FDCTL\n");
125 			fdc->resio[7] = fdc->resio[2];
126 			fdc->ridio[7] = fdc->ridio[2];
127 			fdc->ioff[7] = fdc->ioff[2] + 5;
128 			fdc->ioh[7] = fdc->ioh[2];
129 		} else {
130 			fdc->resio[7] = res;
131 			fdc->ridio[7] = newrid;
132 			fdc->ioff[7] = rman_get_start(res) & 7;
133 			fdc->ioh[7] = rman_get_bushandle(res);
134 		}
135 	}
136 
137 	fdc->res_irq = bus_alloc_resource_any(dev, SYS_RES_IRQ, &fdc->rid_irq,
138 	    RF_ACTIVE | RF_SHAREABLE);
139 	if (fdc->res_irq == NULL) {
140 		device_printf(dev, "cannot reserve interrupt line\n");
141 		return (ENXIO);
142 	}
143 
144 	if ((fdc->flags & FDC_NODMA) == 0) {
145 		fdc->res_drq = bus_alloc_resource_any(dev, SYS_RES_DRQ,
146 		    &fdc->rid_drq, RF_ACTIVE | RF_SHAREABLE);
147 		if (fdc->res_drq == NULL) {
148 			device_printf(dev, "cannot reserve DMA request line\n");
149 			/* This is broken and doesn't work for ISA case */
150 			fdc->flags |= FDC_NODMA;
151 		} else
152 			fdc->dmachan = rman_get_start(fdc->res_drq);
153 	}
154 
155 	return (0);
156 }
157 
158 static int
159 fdc_isa_probe(device_t dev)
160 {
161 	int	error;
162 	struct	fdc_data *fdc;
163 
164 	fdc = device_get_softc(dev);
165 	fdc->fdc_dev = dev;
166 
167 	/* Check pnp ids */
168 	error = ISA_PNP_PROBE(device_get_parent(dev), dev, fdc_ids);
169 	if (error == ENXIO)
170 		return (ENXIO);
171 
172 	/* Attempt to allocate our resources for the duration of the probe */
173 	error = fdc_isa_alloc_resources(dev, fdc);
174 	if (error == 0)
175 		error = fdc_initial_reset(dev, fdc);
176 
177 	fdc_release_resources(fdc);
178 	return (error);
179 }
180 
181 static int
182 fdc_isa_attach(device_t dev)
183 {
184 	struct	fdc_data *fdc;
185 	int error;
186 
187 	fdc = device_get_softc(dev);
188 	fdc->fdc_dev = dev;
189 	error = fdc_isa_alloc_resources(dev, fdc);
190 	if (error == 0)
191 		error = fdc_attach(dev);
192 	if (error == 0)
193 		error = fdc_hints_probe(dev);
194 	if (error == 0)
195 		fdc_start_worker(dev);
196 	else
197 		fdc_release_resources(fdc);
198 	return (error);
199 }
200 
201 static device_method_t fdc_methods[] = {
202 	/* Device interface */
203 	DEVMETHOD(device_probe,		fdc_isa_probe),
204 	DEVMETHOD(device_attach,	fdc_isa_attach),
205 	DEVMETHOD(device_detach,	fdc_detach),
206 	DEVMETHOD(device_shutdown,	bus_generic_shutdown),
207 	DEVMETHOD(device_suspend,	bus_generic_suspend),
208 	DEVMETHOD(device_resume,	bus_generic_resume),
209 
210 	/* Bus interface */
211 	DEVMETHOD(bus_print_child,	fdc_print_child),
212 	DEVMETHOD(bus_read_ivar,	fdc_read_ivar),
213 	DEVMETHOD(bus_write_ivar,       fdc_write_ivar),
214 	/* Our children never use any other bus interface methods. */
215 
216 	{ 0, 0 }
217 };
218 
219 static driver_t fdc_driver = {
220 	"fdc",
221 	fdc_methods,
222 	sizeof(struct fdc_data)
223 };
224 
225 DRIVER_MODULE(fdc, isa, fdc_driver, 0, 0);
226 ISA_PNP_INFO(fdc_ids);
227