Home | History | Annotate | Line # | Download | only in acpi
fdc_acpi.c revision 1.32
      1 /* $NetBSD: fdc_acpi.c,v 1.32 2008/02/18 06:19:50 dyoung 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.32 2008/02/18 06:19:50 dyoung 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/bufq.h>
     44 #include <sys/queue.h>
     45 #include <sys/disk.h>
     46 #if NRND > 0
     47 #include <sys/rnd.h>
     48 #endif
     49 
     50 #include <sys/bus.h>
     51 #include <sys/intr.h>
     52 
     53 #include <dev/isa/isavar.h>
     54 #include <dev/isa/isadmavar.h>
     55 
     56 #include <dev/acpi/acpica.h>
     57 #include <dev/acpi/acpireg.h>
     58 #include <dev/acpi/acpivar.h>
     59 
     60 #include <dev/isa/fdcvar.h>
     61 #include <dev/isa/fdvar.h>
     62 #include <dev/isa/fdreg.h>
     63 
     64 #include <dev/acpi/fdc_acpireg.h>
     65 
     66 static int	fdc_acpi_match(device_t, struct cfdata *, void *);
     67 static void	fdc_acpi_attach(device_t, device_t, void *);
     68 
     69 struct fdc_acpi_softc {
     70 	struct fdc_softc sc_fdc;
     71 	bus_space_handle_t sc_baseioh;
     72 	struct acpi_devnode *sc_node;	/* ACPI devnode */
     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(const 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 	"PNP07??",	/* PC standard floppy disk controller */
     89 	NULL
     90 };
     91 
     92 /*
     93  * fdc_acpi_match: autoconf(9) match routine
     94  */
     95 static int
     96 fdc_acpi_match(device_t parent, struct cfdata *match, void *aux)
     97 {
     98 	struct acpi_attach_args *aa = aux;
     99 
    100 	if (aa->aa_node->ad_type != ACPI_TYPE_DEVICE)
    101 		return 0;
    102 
    103 	return acpi_match_hid(aa->aa_node->ad_devinfo, fdc_acpi_ids);
    104 }
    105 
    106 /*
    107  * fdc_acpi_attach: autoconf(9) attach routine
    108  */
    109 static void
    110 fdc_acpi_attach(device_t parent, device_t self, void *aux)
    111 {
    112 	struct fdc_acpi_softc *asc = device_private(self);
    113 	struct fdc_softc *sc = &asc->sc_fdc;
    114 	struct acpi_attach_args *aa = aux;
    115 	struct acpi_io *io, *ctlio;
    116 	struct acpi_irq *irq;
    117 	struct acpi_drq *drq;
    118 	struct acpi_resources res;
    119 	ACPI_STATUS rv;
    120 
    121 	aprint_naive("\n");
    122 	aprint_normal("\n");
    123 
    124 	sc->sc_ic = aa->aa_ic;
    125 	asc->sc_node = aa->aa_node;
    126 
    127 	/* parse resources */
    128 	rv = acpi_resource_parse(&sc->sc_dev, aa->aa_node->ad_handle, "_CRS",
    129 	    &res, &acpi_resource_parse_ops_default);
    130 	if (ACPI_FAILURE(rv))
    131 		return;
    132 
    133 	/* find our i/o registers */
    134 	io = acpi_res_io(&res, 0);
    135 	if (io == NULL) {
    136 		aprint_error_dev(&sc->sc_dev,
    137 		    "unable to find i/o register resource\n");
    138 		goto out;
    139 	}
    140 
    141 	/* find our IRQ */
    142 	irq = acpi_res_irq(&res, 0);
    143 	if (irq == NULL) {
    144 		aprint_error_dev(&sc->sc_dev, "unable to find irq resource\n");
    145 		goto out;
    146 	}
    147 
    148 	/* find our DRQ */
    149 	drq = acpi_res_drq(&res, 0);
    150 	if (drq == NULL) {
    151 		aprint_error_dev(&sc->sc_dev, "unable to find drq resource\n");
    152 		goto out;
    153 	}
    154 	sc->sc_drq = drq->ar_drq;
    155 
    156 	sc->sc_iot = aa->aa_iot;
    157 	if (bus_space_map(sc->sc_iot, io->ar_base, io->ar_length,
    158 		    0, &asc->sc_baseioh)) {
    159 		aprint_error_dev(&sc->sc_dev, "can't map i/o space\n");
    160 		goto out;
    161 	}
    162 
    163 	switch (io->ar_length) {
    164 	case 4:
    165 		sc->sc_ioh = asc->sc_baseioh;
    166 		break;
    167 	case 6:
    168 		if (bus_space_subregion(sc->sc_iot, asc->sc_baseioh, 2, 4,
    169 		    &sc->sc_ioh)) {
    170 			aprint_error_dev(&sc->sc_dev,
    171 			    "unable to subregion i/o space\n");
    172 			goto out;
    173 		}
    174 		break;
    175 	default:
    176 		aprint_error_dev(&sc->sc_dev,
    177 		    "unknown size: %d of io mapping\n", io->ar_length);
    178 		goto out;
    179 	}
    180 
    181 	/*
    182 	 * omitting the controller I/O port. (One has to exist for there to
    183 	 * be a working fdc). Just try and force the mapping in.
    184 	 */
    185 	ctlio = acpi_res_io(&res, 1);
    186 	if (ctlio == NULL) {
    187 		if (bus_space_map(sc->sc_iot, io->ar_base + io->ar_length + 1,
    188 		    1, 0, &sc->sc_fdctlioh)) {
    189 			aprint_error_dev(&sc->sc_dev,
    190 			    "unable to force map ctl i/o space\n");
    191 			goto out;
    192 		}
    193 		aprint_verbose_dev(&sc->sc_dev,
    194 		    "ctl io %x did't probe. Forced attach\n",
    195 		    io->ar_base + io->ar_length + 1);
    196 	} else {
    197 		if (bus_space_map(sc->sc_iot, ctlio->ar_base, ctlio->ar_length,
    198 		    0, &sc->sc_fdctlioh)) {
    199 			aprint_error_dev(&sc->sc_dev,
    200 			    "unable to map ctl i/o space\n");
    201 			goto out;
    202 		}
    203 	}
    204 
    205 	sc->sc_ih = isa_intr_establish(aa->aa_ic, irq->ar_irq,
    206 	    (irq->ar_type == ACPI_EDGE_SENSITIVE) ? IST_EDGE : IST_LEVEL,
    207 	    IPL_BIO, fdcintr, sc);
    208 
    209 	/* Setup direct configuration of floppy drives */
    210 	sc->sc_present = fdc_acpi_enumerate(asc);
    211 	if (sc->sc_present >= 0) {
    212 		sc->sc_known = 1;
    213 		fdc_acpi_getknownfds(asc);
    214 	} else {
    215 		/*
    216 		 * XXX if there is no _FDE control method, attempt to
    217 		 * probe without pnp
    218 		 */
    219 #ifdef ACPI_FDC_DEBUG
    220 		aprint_debug_dev(&sc->sc_dev,
    221 		    "unable to enumerate, attempting normal probe\n");
    222 #endif
    223 	}
    224 
    225 	fdcattach(sc);
    226 
    227  out:
    228 	acpi_resource_cleanup(&res);
    229 }
    230 
    231 static int
    232 fdc_acpi_enumerate(struct fdc_acpi_softc *asc)
    233 {
    234 	struct fdc_softc *sc = &asc->sc_fdc;
    235 	ACPI_OBJECT *fde;
    236 	ACPI_BUFFER abuf;
    237 	ACPI_STATUS rv;
    238 	UINT32 *p;
    239 	int i, drives = -1;
    240 
    241 	rv = acpi_eval_struct(asc->sc_node->ad_handle, "_FDE", &abuf);
    242 	if (ACPI_FAILURE(rv)) {
    243 #ifdef ACPI_FDC_DEBUG
    244 		aprint_normal_dev(&sc->sc_dev, "failed to evaluate _FDE: %s\n",
    245 		    AcpiFormatException(rv));
    246 #endif
    247 		return drives;
    248 	}
    249 	fde = (ACPI_OBJECT *)abuf.Pointer;
    250 	if (fde->Type != ACPI_TYPE_BUFFER) {
    251 		aprint_error_dev(&sc->sc_dev, "expected BUFFER, got %d\n",
    252 		    fde->Type);
    253 		goto out;
    254 	}
    255 	if (fde->Buffer.Length < 5 * sizeof(UINT32)) {
    256 		aprint_error_dev(&sc->sc_dev,
    257 		    "expected buffer len of %lu, got %d\n",
    258 		    (unsigned long)(5 * sizeof(UINT32)), fde->Buffer.Length);
    259 		goto out;
    260 	}
    261 
    262 	p = (UINT32 *) fde->Buffer.Pointer;
    263 
    264 	/*
    265 	 * Indexes 0 through 3 are each UINT32 booleans. True if a drive
    266 	 * is present.
    267 	 */
    268 	drives = 0;
    269 	for (i = 0; i < 4; i++) {
    270 		if (p[i]) drives |= (1 << i);
    271 #ifdef ACPI_FDC_DEBUG
    272 		aprint_normal_dev(&sc->sc_dev, "drive %d %sattached\n", i,
    273 		    p[i] ? "" : "not ");
    274 #endif
    275 	}
    276 
    277 	/*
    278 	 * p[4] reports tape presence. Possible values:
    279 	 * 	0	- Unknown if device is present
    280 	 *	1	- Device is present
    281 	 *	2	- Device is never present
    282 	 *	>2	- Reserved
    283 	 *
    284 	 * we don't currently use this.
    285 	 */
    286 
    287 out:
    288 	AcpiOsFree(abuf.Pointer);
    289 	return drives;
    290 }
    291 
    292 static void
    293 fdc_acpi_getknownfds(struct fdc_acpi_softc *asc)
    294 {
    295 	struct fdc_softc *sc = &asc->sc_fdc;
    296 	ACPI_OBJECT *fdi, *e;
    297 	ACPI_BUFFER abuf;
    298 	ACPI_STATUS rv;
    299 	int i;
    300 
    301 	for (i = 0; i < 4; i++) {
    302 		if ((sc->sc_present & (1 << i)) == 0)
    303 			continue;
    304 		rv = acpi_eval_struct(asc->sc_node->ad_handle, "_FDI", &abuf);
    305 		if (ACPI_FAILURE(rv)) {
    306 #ifdef ACPI_FDC_DEBUG
    307 			aprint_normal_dev(&sc->sc_dev,
    308 			    "failed to evaluate _FDI: %s on drive %d\n",
    309 			    AcpiFormatException(rv), i);
    310 #endif
    311 			/* XXX if _FDI fails, assume 1.44MB floppy */
    312 			sc->sc_knownfds[i] = &fdc_acpi_fdtypes[0];
    313 			continue;
    314 		}
    315 		fdi = (ACPI_OBJECT *)abuf.Pointer;
    316 		if (fdi->Type != ACPI_TYPE_PACKAGE) {
    317 			aprint_error_dev(&sc->sc_dev,
    318 			    "expected PACKAGE, got %d\n", fdi->Type);
    319 			goto out;
    320 		}
    321 		e = fdi->Package.Elements;
    322 		sc->sc_knownfds[i] = fdc_acpi_nvtotype(
    323 		    device_xname(&sc->sc_dev),
    324 		    e[1].Integer.Value, e[0].Integer.Value);
    325 
    326 		/* if fdc_acpi_nvtotype returns NULL, don't attach drive */
    327 		if (!sc->sc_knownfds[i])
    328 			sc->sc_present &= ~(1 << i);
    329 
    330 out:
    331 		AcpiOsFree(abuf.Pointer);
    332 	}
    333 }
    334 
    335 static const struct fd_type *
    336 fdc_acpi_nvtotype(const char *fdc, int nvraminfo, int drive)
    337 {
    338 	int type;
    339 
    340 	type = (drive == 0 ? nvraminfo : nvraminfo << 4) & 0xf0;
    341 	switch (type) {
    342 	case ACPI_FDC_DISKETTE_NONE:
    343 		return NULL;
    344 	case ACPI_FDC_DISKETTE_12M:
    345 		return &fdc_acpi_fdtypes[1];
    346 	case ACPI_FDC_DISKETTE_TYPE5:
    347 	case ACPI_FDC_DISKETTE_TYPE6:
    348 	case ACPI_FDC_DISKETTE_144M:
    349 		return &fdc_acpi_fdtypes[0];
    350 	case ACPI_FDC_DISKETTE_360K:
    351 		return &fdc_acpi_fdtypes[3];
    352 	case ACPI_FDC_DISKETTE_720K:
    353 		return &fdc_acpi_fdtypes[4];
    354 	default:
    355 #ifdef ACPI_FDC_DEBUG
    356 		aprint_normal("%s: drive %d: unknown device type 0x%x\n",
    357 		    fdc, drive, type);
    358 #endif
    359 		return NULL;
    360 	}
    361 }
    362