Home | History | Annotate | Line # | Download | only in acpi
fdc_acpi.c revision 1.13
      1 /* $NetBSD: fdc_acpi.c,v 1.13 2003/09/25 21:55:49 christos Exp $ */
      2 
      3 /*
      4  * Copyright (c) 2002 Jared D. McNeill <jmcneill (at) invisible.ca>
      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. The name of the author may not be used to endorse or promote products
     13  *    derived from this software without specific prior written permission.
     14  *
     15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     16  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     17  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     18  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     19  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
     20  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
     21  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
     22  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
     23  * 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 /*
     29  * ACPI attachment for the PC Floppy Controller driver, based on
     30  * sys/arch/i386/pnpbios/fdc_pnpbios.c by Jason R. Thorpe
     31  */
     32 
     33 #include <sys/cdefs.h>
     34 __KERNEL_RCSID(0, "$NetBSD: fdc_acpi.c,v 1.13 2003/09/25 21:55:49 christos Exp $");
     35 
     36 #include "rnd.h"
     37 
     38 #include <sys/param.h>
     39 #include <sys/systm.h>
     40 #include <sys/callout.h>
     41 #include <sys/device.h>
     42 #include <sys/buf.h>
     43 #include <sys/queue.h>
     44 #include <sys/disk.h>
     45 #if NRND > 0
     46 #include <sys/rnd.h>
     47 #endif
     48 
     49 #include <machine/bus.h>
     50 #include <machine/intr.h>
     51 
     52 #include <dev/isa/isavar.h>
     53 #include <dev/isa/isadmavar.h>
     54 
     55 #include <dev/acpi/acpica.h>
     56 #include <dev/acpi/acpireg.h>
     57 #include <dev/acpi/acpivar.h>
     58 
     59 #include <dev/isa/fdcvar.h>
     60 #include <dev/isa/fdvar.h>
     61 #include <dev/isa/fdreg.h>
     62 
     63 #include <dev/acpi/fdc_acpireg.h>
     64 
     65 int	fdc_acpi_match(struct device *, struct cfdata *, void *);
     66 void	fdc_acpi_attach(struct device *, struct device *, void *);
     67 
     68 struct fdc_acpi_softc {
     69 	struct fdc_softc sc_fdc;
     70 	bus_space_handle_t sc_baseioh;
     71 	struct acpi_devnode *sc_node;	/* ACPI devnode */
     72 	struct acpi_resources res;
     73 };
     74 
     75 static int	fdc_acpi_enumerate(struct fdc_acpi_softc *);
     76 static void	fdc_acpi_getknownfds(struct fdc_acpi_softc *);
     77 
     78 static const struct fd_type *fdc_acpi_nvtotype(char *, int, int);
     79 
     80 CFATTACH_DECL(fdc_acpi, sizeof(struct fdc_acpi_softc), fdc_acpi_match,
     81     fdc_acpi_attach, NULL, NULL);
     82 
     83 /*
     84  * Supported device IDs
     85  */
     86 
     87 static const char * const fdc_acpi_ids[] = {
     88 	"PNP0700",	/* PC standard floppy disk controller */
     89 #if 0 /* XXX do we support this? */
     90 	"PNP0701",	/* Standard floppy controller for MS Device Bay Spec */
     91 #endif
     92 	NULL
     93 };
     94 
     95 /*
     96  * fdc_acpi_match: autoconf(9) match routine
     97  */
     98 int
     99 fdc_acpi_match(struct device *parent, struct cfdata *match, void *aux)
    100 {
    101 	struct acpi_attach_args *aa = aux;
    102 	const char *id;
    103 	int i;
    104 
    105 	if (aa->aa_node->ad_type != ACPI_TYPE_DEVICE)
    106 		return 0;
    107 
    108 	for (i = 0; (id = fdc_acpi_ids[i]) != NULL; ++i) {
    109 		if (strcmp(aa->aa_node->ad_devinfo.HardwareId, id) == 0)
    110 			return 1;
    111 	}
    112 
    113 	/* No matches found */
    114 	return 0;
    115 }
    116 
    117 /*
    118  * fdc_acpi_attach: autoconf(9) attach routine
    119  */
    120 void
    121 fdc_acpi_attach(struct device *parent, struct device *self, void *aux)
    122 {
    123 	struct fdc_acpi_softc *asc = (struct fdc_acpi_softc *)self;
    124 	struct fdc_softc *sc = &asc->sc_fdc;
    125 	struct acpi_attach_args *aa = aux;
    126 	struct acpi_io *io, *ctlio;
    127 	struct acpi_irq *irq;
    128 	struct acpi_drq *drq;
    129 	ACPI_STATUS rv;
    130 
    131 	printf("\n");
    132 
    133 	sc->sc_ic = aa->aa_ic;
    134 	asc->sc_node = aa->aa_node;
    135 
    136 	/* parse resources */
    137 	rv = acpi_resource_parse(&sc->sc_dev, aa->aa_node, &asc->res,
    138 	    &acpi_resource_parse_ops_default);
    139 	if (rv != AE_OK) {
    140 		printf("%s: unable to parse resources\n", sc->sc_dev.dv_xname);
    141 		return;
    142 	}
    143 
    144 	/* find our i/o registers */
    145 	io = acpi_res_io(&asc->res, 0);
    146 	if (io == NULL) {
    147 		printf("%s: unable to find i/o register resource\n",
    148 		    sc->sc_dev.dv_xname);
    149 		return;
    150 	}
    151 
    152 	/* find our IRQ */
    153 	irq = acpi_res_irq(&asc->res, 0);
    154 	if (irq == NULL) {
    155 		printf("%s: unable to find irq resource\n",
    156 		    sc->sc_dev.dv_xname);
    157 		return;
    158 	}
    159 
    160 	/* find our DRQ */
    161 	drq = acpi_res_drq(&asc->res, 0);
    162 	if (drq == NULL) {
    163 		printf("%s: unable to find drq resource\n",
    164 		    sc->sc_dev.dv_xname);
    165 		return;
    166 	}
    167 	sc->sc_drq = drq->ar_drq;
    168 
    169 	sc->sc_iot = aa->aa_iot;
    170 	if (bus_space_map(sc->sc_iot, io->ar_base, io->ar_length,
    171 		    0, &asc->sc_baseioh)) {
    172 		printf("%s: can't map i/o space\n", sc->sc_dev.dv_xname);
    173 		return;
    174 	}
    175 
    176 	switch (io->ar_length) {
    177 	case 4:
    178 		sc->sc_ioh = asc->sc_baseioh;
    179 		break;
    180 	case 6:
    181 		if (bus_space_subregion(sc->sc_iot, asc->sc_baseioh, 2, 4,
    182 		    &sc->sc_ioh)) {
    183 			printf("%s: unable to subregion i/o space\n",
    184 			    sc->sc_dev.dv_xname);
    185 			return;
    186 		}
    187 		break;
    188 	default:
    189 		printf("%s: unknown size: %d of io mapping\n",
    190 		    sc->sc_dev.dv_xname, io->ar_length);
    191 		return;
    192 	}
    193 
    194 	/*
    195 	 * omitting the controller I/O port. (One has to exist for there to
    196 	 * be a working fdc). Just try and force the mapping in.
    197 	 */
    198 	ctlio = acpi_res_io(&asc->res, 1);
    199 	if (ctlio == NULL) {
    200 		if (bus_space_map(sc->sc_iot, io->ar_base + io->ar_length + 1,
    201 		    1, 0, &sc->sc_fdctlioh)) {
    202 			printf("%s: unable to force map ctl i/o space\n",
    203 			    sc->sc_dev.dv_xname);
    204 			return;
    205 		}
    206 		printf("%s: ctl io %x did't probe. Forced attach\n",
    207 		    sc->sc_dev.dv_xname, io->ar_base + io->ar_length + 1);
    208 	} else {
    209 		if (bus_space_map(sc->sc_iot, ctlio->ar_base, ctlio->ar_length,
    210 		    0, &sc->sc_fdctlioh)) {
    211 			printf("%s: unable to map ctl i/o space\n",
    212 			    sc->sc_dev.dv_xname);
    213 			return;
    214 		}
    215 	}
    216 
    217 	sc->sc_ih = isa_intr_establish(aa->aa_ic, irq->ar_irq,
    218 	    (irq->ar_type == ACPI_EDGE_SENSITIVE) ? IST_EDGE : IST_LEVEL,
    219 	    IPL_BIO, fdcintr, sc);
    220 
    221 	/* Setup direct configuration of floppy drives */
    222 	sc->sc_present = fdc_acpi_enumerate(asc);
    223 	if (sc->sc_present >= 0) {
    224 		sc->sc_known = 1;
    225 		fdc_acpi_getknownfds(asc);
    226 	} else {
    227 		/*
    228 		 * XXX if there is no _FDE control method, attempt to
    229 		 * probe without pnp
    230 		 */
    231 #ifdef ACPI_FDC_DEBUG
    232 		printf("%s: unable to enumerate, attempting normal probe\n",
    233 		    sc->sc_dev.dv_xname);
    234 #endif
    235 	}
    236 
    237 	fdcattach(sc);
    238 }
    239 
    240 static int
    241 fdc_acpi_enumerate(struct fdc_acpi_softc *asc)
    242 {
    243 	struct fdc_softc *sc = &asc->sc_fdc;
    244 	ACPI_OBJECT *fde;
    245 	ACPI_BUFFER buf;
    246 	ACPI_STATUS rv;
    247 	UINT32 *p;
    248 	int i, drives = -1;
    249 
    250 	rv = acpi_eval_struct(asc->sc_node->ad_handle, "_FDE", &buf);
    251 	if (rv != AE_OK) {
    252 #ifdef ACPI_FDC_DEBUG
    253 		printf("%s: failed to evaluate _FDE: %x\n",
    254 		    sc->sc_dev.dv_xname, rv);
    255 #endif
    256 		return drives;
    257 	}
    258 	fde = (ACPI_OBJECT *)buf.Pointer;
    259 	if (fde->Type != ACPI_TYPE_BUFFER) {
    260 		printf("%s: expected BUFFER, got %d\n", sc->sc_dev.dv_xname,
    261 		    fde->Type);
    262 		goto out;
    263 	}
    264 	if (fde->Buffer.Length < 5 * sizeof(UINT32)) {
    265 		printf("%s: expected buffer len of %lu, got %d\n",
    266 		    sc->sc_dev.dv_xname,
    267 		    (unsigned long)(5 * sizeof(UINT32)), fde->Buffer.Length);
    268 		goto out;
    269 	}
    270 
    271 	p = (UINT32 *) fde->Buffer.Pointer;
    272 
    273 	/*
    274 	 * Indexes 0 through 3 are each UINT32 booleans. True if a drive
    275 	 * is present.
    276 	 */
    277 	drives = 0;
    278 	for (i = 0; i < 4; i++) {
    279 		if (p[i]) drives |= (1 << i);
    280 #ifdef ACPI_FDC_DEBUG
    281 		printf("%s: drive %d %sattached\n", sc->sc_dev.dv_xname, i,
    282 		    p[i] ? "" : "not ");
    283 #endif
    284 	}
    285 
    286 	/*
    287 	 * p[4] reports tape presence. Possible values:
    288 	 * 	0	- Unknown if device is present
    289 	 *	1	- Device is present
    290 	 *	2	- Device is never present
    291 	 *	>2	- Reserved
    292 	 *
    293 	 * we don't currently use this.
    294 	 */
    295 
    296 out:
    297 	AcpiOsFree(buf.Pointer);
    298 	return drives;
    299 }
    300 
    301 static void
    302 fdc_acpi_getknownfds(struct fdc_acpi_softc *asc)
    303 {
    304 	struct fdc_softc *sc = &asc->sc_fdc;
    305 	ACPI_OBJECT *fdi, *e;
    306 	ACPI_BUFFER buf;
    307 	ACPI_STATUS rv;
    308 	int i;
    309 
    310 	for (i = 0; i < 4; i++) {
    311 		if ((sc->sc_present & (1 << i)) == 0)
    312 			continue;
    313 		rv = acpi_eval_struct(asc->sc_node->ad_handle, "_FDI", &buf);
    314 		if (rv != AE_OK) {
    315 #ifdef ACPI_FDC_DEBUG
    316 			printf("%s: failed to evaluate _FDI: %x on drive %d\n",
    317 			    sc->sc_dev.dv_xname, rv, i);
    318 #endif
    319 			/* XXX if _FDI fails, assume 1.44MB floppy */
    320 			sc->sc_knownfds[i] = &fdc_acpi_fdtypes[0];
    321 			continue;
    322 		}
    323 		fdi = (ACPI_OBJECT *)buf.Pointer;
    324 		if (fdi->Type != ACPI_TYPE_PACKAGE) {
    325 			printf("%s: expected PACKAGE, got %d\n",
    326 			    sc->sc_dev.dv_xname, fdi->Type);
    327 			goto out;
    328 		}
    329 		e = fdi->Package.Elements;
    330 		sc->sc_knownfds[i] = fdc_acpi_nvtotype(sc->sc_dev.dv_xname,
    331 		    e[1].Integer.Value, e[0].Integer.Value);
    332 
    333 		/* if fdc_acpi_nvtotype returns NULL, don't attach drive */
    334 		if (!sc->sc_knownfds[i])
    335 			sc->sc_present &= ~(1 << i);
    336 
    337 out:
    338 		AcpiOsFree(buf.Pointer);
    339 	}
    340 }
    341 
    342 static const struct fd_type *
    343 fdc_acpi_nvtotype(char *fdc, int nvraminfo, int drive)
    344 {
    345 	int type;
    346 
    347 	type = (drive == 0 ? nvraminfo : nvraminfo << 4) & 0xf0;
    348 	switch (type) {
    349 	case ACPI_FDC_DISKETTE_NONE:
    350 		return NULL;
    351 	case ACPI_FDC_DISKETTE_12M:
    352 		return &fdc_acpi_fdtypes[1];
    353 	case ACPI_FDC_DISKETTE_TYPE5:
    354 	case ACPI_FDC_DISKETTE_TYPE6:
    355 	case ACPI_FDC_DISKETTE_144M:
    356 		return &fdc_acpi_fdtypes[0];
    357 	case ACPI_FDC_DISKETTE_360K:
    358 		return &fdc_acpi_fdtypes[3];
    359 	case ACPI_FDC_DISKETTE_720K:
    360 		return &fdc_acpi_fdtypes[4];
    361 	default:
    362 #ifdef ACPI_FDC_DEBUG
    363 		printf("%s: drive %d: unknown device type 0x%x\n",
    364 		    fdc, drive, type);
    365 #endif
    366 		return NULL;
    367 	}
    368 }
    369