xref: /netbsd-src/sys/arch/i386/pnpbios/fdc_pnpbios.c (revision af56d1fe9956bd7c616e18c1b7f025f464618471)
1 /*	$NetBSD: fdc_pnpbios.c,v 1.17 2012/02/02 19:42:59 tls Exp $	*/
2 
3 /*-
4  * Copyright (c) 2000 The NetBSD Foundation, Inc.
5  * All rights reserved.
6  *
7  * This code is derived from software contributed to The NetBSD Foundation
8  * by Jason R. Thorpe.
9  *
10  * Redistribution and use in source and binary forms, with or without
11  * modification, are permitted provided that the following conditions
12  * are met:
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in the
17  *    documentation and/or other materials provided with the distribution.
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29  * POSSIBILITY OF SUCH DAMAGE.
30  */
31 
32 /*
33  * PNPBIOS attachment for the PC Floppy Controller driver.
34  */
35 
36 #include <sys/cdefs.h>
37 __KERNEL_RCSID(0, "$NetBSD: fdc_pnpbios.c,v 1.17 2012/02/02 19:42:59 tls Exp $");
38 
39 
40 
41 #include <sys/param.h>
42 #include <sys/systm.h>
43 #include <sys/callout.h>
44 #include <sys/device.h>
45 #include <sys/buf.h>
46 #include <sys/queue.h>
47 #include <sys/rnd.h>
48 
49 #include <sys/bus.h>
50 #include <machine/intr.h>
51 
52 #include <dev/isa/isavar.h>
53 #include <dev/isa/isadmavar.h>
54 
55 #include <dev/isa/fdcvar.h>
56 
57 #include <i386/pnpbios/pnpbiosvar.h>
58 
59 int	fdc_pnpbios_match(device_t, cfdata_t, void *);
60 void	fdc_pnpbios_attach(device_t, device_t, void *);
61 
62 struct fdc_pnpbios_softc {
63         struct fdc_softc sc_fdc;        /* base fdc device */
64 
65         bus_space_handle_t sc_baseioh;  /* base I/O handle */
66 };
67 
68 
69 CFATTACH_DECL_NEW(fdc_pnpbios, sizeof(struct fdc_pnpbios_softc),
70     fdc_pnpbios_match, fdc_pnpbios_attach, NULL, NULL);
71 
72 int
73 fdc_pnpbios_match(device_t parent, cfdata_t match, void *aux)
74 {
75 	struct pnpbiosdev_attach_args *aa = aux;
76 
77 	if (strcmp(aa->idstr, "PNP0700") == 0)
78 		return (1);
79 
80 	return (0);
81 }
82 
83 void
84 fdc_pnpbios_attach(device_t parent, device_t self, void *aux)
85 {
86         struct fdc_pnpbios_softc *pdc = device_private(self);
87 	struct fdc_softc *fdc = &pdc->sc_fdc;
88 	struct pnpbiosdev_attach_args *aa = aux;
89         int size, base;
90 
91 	aprint_normal("\n");
92 
93 	fdc->sc_dev = self;
94 	fdc->sc_ic = aa->ic;
95 
96 	if (pnpbios_io_map(aa->pbt, aa->resc, 0, &fdc->sc_iot,
97             &pdc->sc_baseioh)) {
98 		aprint_error_dev(self, "unable to map I/O space\n");
99 		return;
100 	}
101 
102 	/*
103          * Start accounting for "odd" pnpbios's. Some probe as 4 ports,
104          * some as 6 and some don't give the ctl port back.
105          */
106 
107         if (pnpbios_getiosize(aa->pbt, aa->resc, 0, &size)) {
108                 aprint_error_dev(self, "can't get iobase size\n");
109                 return;
110         }
111 
112         switch (size) {
113 
114         /* Easy case. This matches right up with what the fdc code expects. */
115         case 4:
116                 fdc->sc_ioh = pdc->sc_baseioh;
117                 break;
118 
119         /* Map a subregion so this all lines up with the fdc code. */
120         case 6:
121                 if (bus_space_subregion(fdc->sc_iot, pdc->sc_baseioh, 2, 4,
122                     &fdc->sc_ioh)) {
123                         aprint_error_dev(self,
124 			    "unable to subregion I/O space\n");
125                         return;
126                 }
127                 break;
128         default:
129                 aprint_error_dev(self, "unknown size: %d of io mapping\n", size);
130                 return;
131         }
132 
133         /*
134          * XXX: This is bad. If the pnpbios claims only 1 I/O range then it's
135          * omitting the controller I/O port. (One has to exist for there to
136          * be a working fdc). Just try and force the mapping in.
137          */
138 
139         if (aa->resc->numio == 1) {
140 
141                 if (pnpbios_getiobase(aa->pbt, aa->resc, 0, 0, &base)) {
142                         aprint_error_dev(self, "can't get iobase\n");
143                         return;
144                 }
145                 if (bus_space_map(fdc->sc_iot, base + size + 1, 1, 0,
146                     &fdc->sc_fdctlioh)) {
147                         aprint_error_dev(self,
148 			    "unable to force map CTL I/O space\n");
149                         return;
150                 }
151         } else if (pnpbios_io_map(aa->pbt, aa->resc, 1, &fdc->sc_iot,
152             &fdc->sc_fdctlioh)) {
153                 aprint_error_dev(self, "unable to map CTL I/O space\n");
154 		return;
155 	}
156 
157 	if (pnpbios_getdmachan(aa->pbt, aa->resc, 0, &fdc->sc_drq)) {
158 		aprint_error_dev(self, "unable to get DMA channel\n");
159 		return;
160 	}
161 
162 	pnpbios_print_devres(self, aa);
163         if (aa->resc->numio == 1)
164                 aprint_error_dev(self,
165 		    "ctl io %x didn't probe. Forced attach\n",
166 		    base + size + 1);
167 
168 	fdc->sc_ih = pnpbios_intr_establish(aa->pbt, aa->resc, 0, IPL_BIO,
169 	    fdcintr, fdc);
170 
171 	fdcattach(fdc);
172 }
173