wdc_pcmcia.c revision 1.23 1 /* $NetBSD: wdc_pcmcia.c,v 1.23 1999/11/21 10:13:08 takemura Exp $ */
2
3 /*-
4 * Copyright (c) 1998 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Charles M. Hannum, by Onno van der Linden and by Manuel Bouyer.
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 * 3. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed by the NetBSD
21 * Foundation, Inc. and its contributors.
22 * 4. Neither the name of The NetBSD Foundation nor the names of its
23 * contributors may be used to endorse or promote products derived
24 * from this software without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 * POSSIBILITY OF SUCH DAMAGE.
37 */
38
39 #include <sys/param.h>
40 #include <sys/systm.h>
41 #include <sys/kernel.h>
42 #include <sys/conf.h>
43 #include <sys/file.h>
44 #include <sys/stat.h>
45 #include <sys/ioctl.h>
46 #include <sys/buf.h>
47 #include <sys/uio.h>
48 #include <sys/malloc.h>
49 #include <sys/device.h>
50 #include <sys/disklabel.h>
51 #include <sys/disk.h>
52 #include <sys/syslog.h>
53 #include <sys/proc.h>
54
55 #include <vm/vm.h>
56
57 #include <machine/cpu.h>
58 #include <machine/intr.h>
59 #include <machine/bus.h>
60
61 #include <dev/pcmcia/pcmciareg.h>
62 #include <dev/pcmcia/pcmciavar.h>
63 #include <dev/pcmcia/pcmciadevs.h>
64
65 #include <dev/ata/atavar.h>
66 #include <dev/ic/wdcvar.h>
67
68 #define WDC_PCMCIA_REG_NPORTS 8
69 #define WDC_PCMCIA_AUXREG_OFFSET (WDC_PCMCIA_REG_NPORTS + 6)
70 #define WDC_PCMCIA_AUXREG_NPORTS 2
71
72 struct wdc_pcmcia_softc {
73 struct wdc_softc sc_wdcdev;
74 struct channel_softc *wdc_chanptr;
75 struct channel_softc wdc_channel;
76 struct pcmcia_io_handle sc_pioh;
77 struct pcmcia_io_handle sc_auxpioh;
78 int sc_iowindow;
79 int sc_auxiowindow;
80 void *sc_ih;
81 struct pcmcia_function *sc_pf;
82 int sc_flags;
83 #define WDC_PCMCIA_ATTACH 0x0001
84 };
85
86 static int wdc_pcmcia_match __P((struct device *, struct cfdata *, void *));
87 static void wdc_pcmcia_attach __P((struct device *, struct device *, void *));
88 static int wdc_pcmcia_detach __P((struct device *, int));
89
90 struct cfattach wdc_pcmcia_ca = {
91 sizeof(struct wdc_pcmcia_softc), wdc_pcmcia_match, wdc_pcmcia_attach,
92 wdc_pcmcia_detach, wdcactivate
93 };
94
95 struct wdc_pcmcia_product {
96 u_int32_t wpp_vendor; /* vendor ID */
97 u_int32_t wpp_product; /* product ID */
98 int wpp_quirk_flag; /* Quirk flags */
99 #define WDC_PCMCIA_FORCE_16BIT_IO 0x01 /* Don't use PCMCIA_WIDTH_AUTO */
100 #define WDC_PCMCIA_NO_EXTRA_RESETS 0x02 /* Only reset ctrl once */
101 const char *wpp_cis_info[4]; /* XXX necessary? */
102 const char *wpp_name; /* product name */
103 } wdc_pcmcia_products[] = {
104
105 { /* PCMCIA_VENDOR_DIGITAL XXX */ 0x0100,
106 PCMCIA_PRODUCT_DIGITAL_MOBILE_MEDIA_CDROM,
107 0, { NULL, "Digital Mobile Media CD-ROM", NULL, NULL },
108 PCMCIA_STR_DIGITAL_MOBILE_MEDIA_CDROM },
109
110 { PCMCIA_VENDOR_IBM,
111 PCMCIA_PRODUCT_IBM_PORTABLE_CDROM_DRIVE,
112 0, { NULL, "PCMCIA Portable CD-ROM Drive", NULL, NULL },
113 PCMCIA_STR_IBM_PORTABLE_CDROM_DRIVE },
114
115 { PCMCIA_VENDOR_HAGIWARASYSCOM,
116 -1, /* XXX */
117 WDC_PCMCIA_FORCE_16BIT_IO,
118 { NULL, NULL, NULL, NULL },
119 "Hagiwara SYS-COM CompactFlash Card" },
120
121 /* The TEAC IDE/Card II is used on the Sony Vaio */
122 { PCMCIA_VENDOR_TEAC,
123 PCMCIA_PRODUCT_TEAC_IDECARDII,
124 WDC_PCMCIA_NO_EXTRA_RESETS,
125 PCMCIA_CIS_TEAC_IDECARDII,
126 PCMCIA_STR_TEAC_IDECARDII },
127
128 /* Mobile Dock 2, which doesn't have vendor ID nor product ID */
129 { -1, -1, 0,
130 { "SHUTTLE TECHNOLOGY LTD.", "PCCARD-IDE/ATAPI Adapter", NULL, NULL},
131 "SHUTTLE TECHNOLOGY IDE/ATAPI Adapter"
132 },
133
134 { 0, 0, 0, { NULL, NULL, NULL, NULL}, NULL }
135 };
136
137 struct wdc_pcmcia_disk_device_interface_args {
138 int ddi_type; /* interface type */
139 int ddi_reqfn; /* function we are requesting iftype */
140 int ddi_curfn; /* function we are currently parsing in CIS */
141 };
142
143 int wdc_pcmcia_disk_device_interface_callback __P((struct pcmcia_tuple *,
144 void *));
145 int wdc_pcmcia_disk_device_interface __P((struct pcmcia_function *));
146 struct wdc_pcmcia_product *
147 wdc_pcmcia_lookup __P((struct pcmcia_attach_args *));
148
149 int wdc_pcmcia_enable __P((void *, int));
150
151 int
152 wdc_pcmcia_disk_device_interface_callback(tuple, arg)
153 struct pcmcia_tuple *tuple;
154 void *arg;
155 {
156 struct wdc_pcmcia_disk_device_interface_args *ddi = arg;
157
158 switch (tuple->code) {
159 case PCMCIA_CISTPL_FUNCID:
160 ddi->ddi_curfn++;
161 break;
162
163 case PCMCIA_CISTPL_FUNCE:
164 if (ddi->ddi_reqfn != ddi->ddi_curfn)
165 break;
166
167 /* subcode (disk device interface), data (interface type) */
168 if (tuple->length < 2)
169 break;
170
171 /* check type */
172 if (pcmcia_tuple_read_1(tuple, 0) !=
173 PCMCIA_TPLFE_TYPE_DISK_DEVICE_INTERFACE)
174 break;
175
176 ddi->ddi_type = pcmcia_tuple_read_1(tuple, 1);
177 return (1);
178 }
179 return (0);
180 }
181
182 int
183 wdc_pcmcia_disk_device_interface(pf)
184 struct pcmcia_function *pf;
185 {
186 struct wdc_pcmcia_disk_device_interface_args ddi;
187
188 ddi.ddi_reqfn = pf->number;
189 ddi.ddi_curfn = -1;
190 if (pcmcia_scan_cis((struct device *)pf->sc,
191 wdc_pcmcia_disk_device_interface_callback, &ddi) > 0)
192 return (ddi.ddi_type);
193 else
194 return (-1);
195 }
196
197 struct wdc_pcmcia_product *
198 wdc_pcmcia_lookup(pa)
199 struct pcmcia_attach_args *pa;
200 {
201 struct wdc_pcmcia_product *wpp;
202 int i, cis_match;
203
204 for (wpp = wdc_pcmcia_products; wpp->wpp_name != NULL; wpp++)
205 if ((wpp->wpp_vendor == -1 ||
206 pa->manufacturer == wpp->wpp_vendor) &&
207 (wpp->wpp_product == -1 ||
208 pa->product == wpp->wpp_product)) {
209 cis_match = 1;
210 for (i = 0; i < 4; i++) {
211 if (!(wpp->wpp_cis_info[i] == NULL ||
212 (pa->card->cis1_info[i] != NULL &&
213 strcmp(pa->card->cis1_info[i],
214 wpp->wpp_cis_info[i]) == 0)))
215 cis_match = 0;
216 }
217 if (cis_match)
218 return (wpp);
219 }
220
221 return (NULL);
222 }
223
224 static int
225 wdc_pcmcia_match(parent, match, aux)
226 struct device *parent;
227 struct cfdata *match;
228 void *aux;
229 {
230 struct pcmcia_attach_args *pa = aux;
231 struct pcmcia_softc *sc;
232 int iftype;
233
234 if (wdc_pcmcia_lookup(pa) != NULL)
235 return (1);
236
237 if (pa->pf->function == PCMCIA_FUNCTION_DISK) {
238 sc = pa->pf->sc;
239
240 pcmcia_chip_socket_enable(sc->pct, sc->pch);
241 iftype = wdc_pcmcia_disk_device_interface(pa->pf);
242 pcmcia_chip_socket_disable(sc->pct, sc->pch);
243
244 if (iftype == PCMCIA_TPLFE_DDI_PCCARD_ATA)
245 return (1);
246 }
247
248 return (0);
249 }
250
251 static void
252 wdc_pcmcia_attach(parent, self, aux)
253 struct device *parent;
254 struct device *self;
255 void *aux;
256 {
257 struct wdc_pcmcia_softc *sc = (void *)self;
258 struct pcmcia_attach_args *pa = aux;
259 struct pcmcia_config_entry *cfe;
260 struct wdc_pcmcia_product *wpp;
261 int quirks;
262
263 sc->sc_pf = pa->pf;
264
265 for (cfe = SIMPLEQ_FIRST(&pa->pf->cfe_head); cfe != NULL;
266 cfe = SIMPLEQ_NEXT(cfe, cfe_list)) {
267 if (cfe->num_iospace != 1 && cfe->num_iospace != 2)
268 continue;
269
270 if (pcmcia_io_alloc(pa->pf, cfe->iospace[0].start,
271 cfe->iospace[0].length,
272 cfe->iospace[0].start == 0 ? cfe->iospace[0].length : 0,
273 &sc->sc_pioh))
274 continue;
275
276 if (cfe->num_iospace == 2) {
277 if (!pcmcia_io_alloc(pa->pf, cfe->iospace[1].start,
278 cfe->iospace[1].length, 0, &sc->sc_auxpioh))
279 break;
280 } else /* num_iospace == 1 */ {
281 sc->sc_auxpioh.iot = sc->sc_pioh.iot;
282 if (!bus_space_subregion(sc->sc_pioh.iot,
283 sc->sc_pioh.ioh, WDC_PCMCIA_AUXREG_OFFSET,
284 WDC_PCMCIA_AUXREG_NPORTS, &sc->sc_auxpioh.ioh))
285 break;
286 }
287 pcmcia_io_free(pa->pf, &sc->sc_pioh);
288 }
289
290 if (cfe == NULL) {
291 printf(": can't handle card info\n");
292 return;
293 }
294
295 /* Enable the card. */
296 pcmcia_function_init(pa->pf, cfe);
297 if (pcmcia_function_enable(pa->pf)) {
298 printf(": function enable failed\n");
299 return;
300 }
301
302 /*
303 * XXX DEC Mobile Media CDROM is not yet tested whether it works
304 * XXX with PCMCIA_WIDTH_IO16. HAGIWARA SYS-COM HPC-CF32 doesn't
305 * XXX work with PCMCIA_WIDTH_AUTO.
306 * XXX CANON FC-8M (SANDISK SDCFB 8M) works for both _AUTO and IO16.
307 * XXX So, here is temporary work around.
308 */
309 wpp = wdc_pcmcia_lookup(pa);
310 if (wpp != NULL)
311 quirks = wpp->wpp_quirk_flag;
312 else
313 quirks = 0;
314
315 if (pcmcia_io_map(pa->pf, quirks & WDC_PCMCIA_FORCE_16BIT_IO ?
316 PCMCIA_WIDTH_IO16 : PCMCIA_WIDTH_AUTO, 0,
317 sc->sc_pioh.size, &sc->sc_pioh, &sc->sc_iowindow)) {
318 printf(": can't map first I/O space\n");
319 return;
320 }
321
322 /*
323 * Currently, # of iospace is 1 except DIGITAL Mobile Media CD-ROM.
324 * So whether the work around like above is necessary or not
325 * is unknown. XXX.
326 */
327 if (cfe->num_iospace > 1 &&
328 pcmcia_io_map(pa->pf, PCMCIA_WIDTH_AUTO, 0,
329 sc->sc_auxpioh.size, &sc->sc_auxpioh, &sc->sc_auxiowindow)) {
330 printf(": can't map second I/O space\n");
331 return;
332 } else
333 sc->sc_auxiowindow = -1;
334
335 printf("\n");
336
337 sc->wdc_channel.cmd_iot = sc->sc_pioh.iot;
338 sc->wdc_channel.cmd_ioh = sc->sc_pioh.ioh;
339 sc->wdc_channel.ctl_iot = sc->sc_auxpioh.iot;
340 sc->wdc_channel.ctl_ioh = sc->sc_auxpioh.ioh;
341 sc->wdc_channel.data32iot = sc->wdc_channel.cmd_iot;
342 sc->wdc_channel.data32ioh = sc->wdc_channel.cmd_ioh;
343 sc->sc_wdcdev.cap |= WDC_CAPABILITY_DATA16 | WDC_CAPABILITY_DATA32;
344 sc->sc_wdcdev.PIO_cap = 0;
345 sc->wdc_chanptr = &sc->wdc_channel;
346 sc->sc_wdcdev.channels = &sc->wdc_chanptr;
347 sc->sc_wdcdev.nchannels = 1;
348 sc->wdc_channel.channel = 0;
349 sc->wdc_channel.wdc = &sc->sc_wdcdev;
350 sc->wdc_channel.ch_queue = malloc(sizeof(struct channel_queue),
351 M_DEVBUF, M_NOWAIT);
352 if (sc->wdc_channel.ch_queue == NULL) {
353 printf("%s: can't allocate memory for command queue\n",
354 sc->sc_wdcdev.sc_dev.dv_xname);
355 return;
356 }
357 if (quirks & WDC_PCMCIA_NO_EXTRA_RESETS)
358 sc->sc_wdcdev.cap |= WDC_CAPABILITY_NO_EXTRA_RESETS;
359
360 /* We can enable and disable the controller. */
361 sc->sc_wdcdev.sc_atapi_adapter.scsipi_enable = wdc_pcmcia_enable;
362
363 sc->sc_flags |= WDC_PCMCIA_ATTACH;
364 wdcattach(&sc->wdc_channel);
365 sc->sc_flags &= ~WDC_PCMCIA_ATTACH;
366 }
367
368 int
369 wdc_pcmcia_detach(self, flags)
370 struct device *self;
371 int flags;
372 {
373 struct wdc_pcmcia_softc *sc = (struct wdc_pcmcia_softc *)self;
374 int error;
375
376 if ((error = wdcdetach(self, flags)) != 0)
377 return (error);
378
379 free(sc->wdc_channel.ch_queue, M_DEVBUF);
380
381 /* Unmap our i/o window and i/o space. */
382 pcmcia_io_unmap(sc->sc_pf, sc->sc_iowindow);
383 pcmcia_io_free(sc->sc_pf, &sc->sc_pioh);
384 if (sc->sc_auxiowindow != -1) {
385 pcmcia_io_unmap(sc->sc_pf, sc->sc_auxiowindow);
386 pcmcia_io_free(sc->sc_pf, &sc->sc_auxpioh);
387 }
388
389 return (0);
390 }
391
392 int
393 wdc_pcmcia_enable(arg, onoff)
394 void *arg;
395 int onoff;
396 {
397 struct wdc_pcmcia_softc *sc = arg;
398
399 if (onoff) {
400 /* Establish the interrupt handler. */
401 sc->sc_ih = pcmcia_intr_establish(sc->sc_pf, IPL_BIO, wdcintr,
402 &sc->wdc_channel);
403 if (sc->sc_ih == NULL) {
404 printf("%s: couldn't establish interrupt handler\n",
405 sc->sc_wdcdev.sc_dev.dv_xname);
406 return (EIO);
407 }
408
409 if ((sc->sc_flags & WDC_PCMCIA_ATTACH) == 0) {
410 if (pcmcia_function_enable(sc->sc_pf)) {
411 printf("%s: couldn't enable PCMCIA function\n",
412 sc->sc_wdcdev.sc_dev.dv_xname);
413 pcmcia_intr_disestablish(sc->sc_pf, sc->sc_ih);
414 return (EIO);
415 }
416 wdcreset(&sc->wdc_channel, VERBOSE);
417 }
418 } else {
419 pcmcia_function_disable(sc->sc_pf);
420 pcmcia_intr_disestablish(sc->sc_pf, sc->sc_ih);
421 }
422
423 return (0);
424 }
425