Home | History | Annotate | Line # | Download | only in pnpbios
pnpbios.c revision 1.64
      1  1.64      cube /* $NetBSD: pnpbios.c,v 1.64 2008/07/11 11:58:37 cube Exp $ */
      2  1.15   thorpej 
      3   1.1  drochner /*
      4  1.15   thorpej  * Copyright (c) 2000 Jason R. Thorpe.  All rights reserved.
      5  1.11    chopps  * Copyright (c) 2000 Christian E. Hopps.  All rights reserved.
      6   1.1  drochner  * Copyright (c) 1999
      7   1.1  drochner  * 	Matthias Drochner.  All rights reserved.
      8   1.1  drochner  *
      9   1.1  drochner  * Redistribution and use in source and binary forms, with or without
     10   1.1  drochner  * modification, are permitted provided that the following conditions
     11   1.1  drochner  * are met:
     12   1.1  drochner  * 1. Redistributions of source code must retain the above copyright
     13   1.1  drochner  *    notice, this list of conditions, and the following disclaimer.
     14   1.1  drochner  * 2. Redistributions in binary form must reproduce the above copyright
     15   1.1  drochner  *    notice, this list of conditions and the following disclaimer in the
     16   1.1  drochner  *    documentation and/or other materials provided with the distribution.
     17   1.1  drochner  *
     18   1.1  drochner  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
     19   1.1  drochner  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     20   1.1  drochner  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     21   1.1  drochner  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
     22   1.1  drochner  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     23   1.1  drochner  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     24   1.1  drochner  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     25   1.1  drochner  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     26   1.1  drochner  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     27   1.1  drochner  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     28   1.1  drochner  * SUCH DAMAGE.
     29  1.10     soren  */
     30  1.10     soren 
     31  1.10     soren /*
     32  1.10     soren  * PnP BIOS documentation is available at the following locations.
     33  1.10     soren  *
     34  1.10     soren  * http://www.microsoft.com/hwdev/download/respec/pnpbios.zip
     35  1.10     soren  * http://www.microsoft.com/hwdev/download/respec/biosclar.zip
     36  1.33     soren  * http://www.microsoft.com/hwdev/download/resources/specs/devids.txt
     37  1.11    chopps  *
     38  1.11    chopps  * PNPBIOSEVENTS is unfinished.  After coding what I did I discovered
     39  1.11    chopps  * I had no platforms to test on so someone else will need to finish
     40  1.11    chopps  * it.  I didn't want to toss the code though
     41   1.1  drochner  */
     42  1.26     lukem 
     43  1.26     lukem #include <sys/cdefs.h>
     44  1.64      cube __KERNEL_RCSID(0, "$NetBSD: pnpbios.c,v 1.64 2008/07/11 11:58:37 cube Exp $");
     45   1.1  drochner 
     46   1.1  drochner #include <sys/param.h>
     47   1.1  drochner #include <sys/systm.h>
     48   1.1  drochner #include <sys/device.h>
     49   1.1  drochner #include <sys/malloc.h>
     50  1.11    chopps #include <sys/kernel.h>
     51  1.11    chopps #include <sys/kthread.h>
     52  1.11    chopps 
     53  1.19       mrg #include <uvm/uvm_extern.h>
     54  1.11    chopps 
     55   1.1  drochner #include <machine/isa_machdep.h>
     56   1.1  drochner #include <machine/segments.h>
     57  1.11    chopps 
     58  1.11    chopps #include <dev/isa/isareg.h>
     59  1.11    chopps #include <dev/isapnp/isapnpreg.h>
     60   1.1  drochner 
     61   1.1  drochner #include <arch/i386/pnpbios/pnpbiosvar.h>
     62  1.11    chopps #include <arch/i386/pnpbios/pnpbiosreg.h>
     63   1.1  drochner 
     64  1.56       uwe #include "opt_pnpbios.h"
     65   1.2   thorpej #include "locators.h"
     66   1.1  drochner 
     67  1.15   thorpej #ifdef PNPBIOSVERBOSE
     68  1.15   thorpej int	pnpbiosverbose = 1;
     69  1.15   thorpej #else
     70  1.15   thorpej int	pnpbiosverbose = 0;
     71  1.15   thorpej #endif
     72  1.15   thorpej 
     73  1.11    chopps #ifdef PNPBIOSDEBUG
     74  1.18     jhawk #ifdef PNPBIOSDEBUG_VALUE
     75  1.18     jhawk int	pnpbiosdebug = PNPBIOSDEBUG_VALUE;
     76  1.18     jhawk #else
     77  1.18     jhawk int	pnpbiosdebug = 1;
     78  1.18     jhawk #endif
     79  1.57       uwe #define	DPRINTF(x) if (pnpbiosdebug) aprint_normal x
     80  1.11    chopps #else
     81  1.11    chopps #define	DPRINTF(x)
     82  1.11    chopps #endif
     83  1.11    chopps 
     84  1.14   thorpej #ifdef PNPBIOSEVENTSDEBUG
     85  1.57       uwe #define	EDPRINTF(x) aprint_normal x
     86  1.14   thorpej #else
     87  1.14   thorpej #define	EDPRINTF(x)
     88  1.14   thorpej #endif
     89  1.14   thorpej 
     90   1.1  drochner struct pnpbios_softc {
     91  1.63     joerg 	device_t	sc_dev;
     92  1.11    chopps 	isa_chipset_tag_t	sc_ic;
     93  1.59        ad 	lwp_t		*sc_evthread;
     94  1.11    chopps 	int		sc_version;
     95  1.11    chopps 	int		sc_control;
     96  1.38  drochner #ifdef PNPBIOSEVENTS
     97  1.53     perry 	uint8_t	*	sc_evaddr;
     98  1.11    chopps 	int		sc_threadrun;
     99  1.15   thorpej 	int		sc_docked;
    100  1.38  drochner #endif
    101   1.1  drochner };
    102   1.1  drochner 
    103  1.11    chopps #define	PNPGET4(p)	((p)[0] + ((p)[1] << 8) + \
    104  1.11    chopps 			((p)[2] << 16) + ((p)[3] << 24))
    105  1.11    chopps 
    106  1.11    chopps /* bios calls */
    107  1.16     jhawk #if 0
    108  1.16     jhawk /* XXX these are not called */
    109  1.53     perry static int	pnpbios_getapmtable(uint8_t *, size_t *);
    110  1.48  drochner static int	pnpbios_setnode(int, int,
    111  1.53     perry 			    const uint8_t *, size_t);
    112  1.16     jhawk #endif
    113  1.16     jhawk 
    114  1.48  drochner static int	pnpbios_getnode(int, int *,
    115  1.53     perry 			    uint8_t *, size_t);
    116  1.48  drochner static int	pnpbios_getnumnodes(int *, size_t *);
    117  1.11    chopps 
    118  1.16     jhawk #ifdef PNPBIOSEVENTS
    119  1.48  drochner static int	pnpbios_getdockinfo(struct pnpdockinfo *);
    120  1.38  drochner 
    121  1.53     perry static int	pnpbios_getevent(uint16_t *);
    122  1.48  drochner static void	pnpbios_event_thread(void *);
    123  1.48  drochner static int	pnpbios_sendmessage(int);
    124  1.16     jhawk #endif
    125  1.11    chopps 
    126  1.11    chopps /* configuration stuff */
    127  1.58  christos static void *	pnpbios_mapit(u_long, u_long, int);
    128  1.58  christos static void *	pnpbios_find(void);
    129  1.48  drochner static int	pnpbios_match(struct device *,
    130  1.48  drochner 			    struct cfdata *, void *);
    131  1.48  drochner static void	pnpbios_attach(struct device *,
    132  1.48  drochner 			    struct device *, void *);
    133  1.48  drochner static void	pnpbios_printres(struct pnpresources *);
    134  1.48  drochner static int	pnpbios_print(void *aux, const char *);
    135  1.53     perry static void	pnpbios_id_to_string(uint32_t, char *);
    136  1.48  drochner static int	pnpbios_attachnode(struct pnpbios_softc *,
    137  1.53     perry 			    int, const uint8_t *,
    138  1.48  drochner 			    size_t, int);
    139  1.45     perry 
    140  1.53     perry static int	pnp_scan(const uint8_t **, size_t,
    141  1.48  drochner 			struct pnpresources *, int);
    142  1.45     perry extern int	pnpbioscall(int);
    143  1.11    chopps 
    144  1.48  drochner static void	pnpbios_enumerate(struct pnpbios_softc *);
    145  1.38  drochner #ifdef PNPBIOSEVENTS
    146  1.48  drochner static int	pnpbios_update_dock_status(struct pnpbios_softc *);
    147  1.38  drochner #endif
    148  1.15   thorpej 
    149  1.11    chopps /* scanning functions */
    150  1.45     perry static int pnp_compatid(struct pnpresources *, const void *, size_t);
    151  1.45     perry static int pnp_newirq(struct pnpresources *, const void *, size_t);
    152  1.45     perry static int pnp_newdma(struct pnpresources *, const void *, size_t);
    153  1.45     perry static int pnp_newioport(struct pnpresources *, const void *, size_t);
    154  1.45     perry static int pnp_newfixedioport(struct pnpresources *, const void *, size_t);
    155  1.11    chopps #ifdef PNPBIOSDEBUG
    156  1.45     perry static int pnp_debugdump(struct pnpresources *, const void *, size_t);
    157  1.11    chopps #endif
    158   1.1  drochner 
    159  1.11    chopps /*
    160  1.11    chopps  * small ressource types (beginning with 1)
    161  1.11    chopps  */
    162  1.63     joerg static const struct{
    163  1.45     perry 	int (*handler)(struct pnpresources *, const void *, size_t);
    164  1.11    chopps 	int minlen, maxlen;
    165  1.11    chopps } smallrescs[] = {
    166  1.11    chopps 	{0, 2, 2}, /* PnP version number */
    167  1.11    chopps 	{0, 5, 6}, /* logical device id */
    168  1.11    chopps 	{pnp_compatid, 4, 4}, /* compatible device id */
    169  1.11    chopps 	{pnp_newirq, 2, 3}, /* irq  descriptor */
    170  1.37       wiz 	{pnp_newdma, 2, 2}, /* DMA  descriptor */
    171  1.11    chopps 	{0, 0, 1}, /* start dep */
    172  1.11    chopps 	{0, 0, 0}, /* end dep */
    173  1.11    chopps 	{pnp_newioport, 7, 7}, /* io descriptor */
    174  1.11    chopps 	{pnp_newfixedioport, 3, 3}, /* fixed io descriptor */
    175  1.11    chopps 	{0, -1, -1}, /* reserved */
    176  1.11    chopps 	{0, -1, -1},
    177  1.11    chopps 	{0, -1, -1},
    178  1.11    chopps 	{0, -1, -1},
    179  1.11    chopps 	{0, 1, 7}, /* vendor defined */
    180  1.11    chopps 	{0, 1, 1} /* end */
    181  1.11    chopps };
    182   1.2   thorpej 
    183   1.1  drochner 
    184  1.63     joerg CFATTACH_DECL_NEW(pnpbios, sizeof(struct pnpbios_softc),
    185  1.30   thorpej     pnpbios_match, pnpbios_attach, NULL, NULL);
    186   1.1  drochner 
    187   1.1  drochner /*
    188   1.1  drochner  * Private stack and return value buffer. Spec (1.0a, ch. 4.3) says that
    189   1.1  drochner  * 1024 bytes must be available to the BIOS function.
    190   1.1  drochner  */
    191   1.1  drochner #define PNPBIOS_BUFSIZE 4096
    192   1.1  drochner 
    193   1.1  drochner int pnpbios_enabled = 1;
    194   1.1  drochner size_t pnpbios_entry;
    195  1.58  christos char *pnpbios_scratchbuf;
    196   1.1  drochner 
    197   1.2   thorpej /*
    198   1.2   thorpej  * There can be only one of these, and the i386 ISA code needs to
    199   1.2   thorpej  * reference this.
    200   1.2   thorpej  */
    201   1.2   thorpej struct pnpbios_softc *pnpbios_softc;
    202   1.2   thorpej 
    203   1.1  drochner #define PNPBIOS_SIGNATURE ('$' | ('P' << 8) | ('n' << 16) | ('P' << 24))
    204   1.1  drochner 
    205  1.58  christos static void *
    206  1.45     perry pnpbios_find(void)
    207   1.1  drochner {
    208  1.58  christos 	char *p, *c;
    209  1.53     perry 	uint8_t cksum;
    210   1.1  drochner 	size_t structlen;
    211   1.1  drochner 
    212  1.58  christos 	for (p = (char *)ISA_HOLE_VADDR(0xf0000);
    213  1.58  christos 	     p <= (char *)ISA_HOLE_VADDR(0xffff0);
    214   1.1  drochner 	     p += 16) {
    215   1.1  drochner 		if (*(int *)p != PNPBIOS_SIGNATURE)
    216   1.1  drochner 			continue;
    217  1.53     perry 		structlen = *(uint8_t *)(p + 5);
    218   1.1  drochner 		if ((structlen < 0x21) ||
    219  1.58  christos 		    ((p + structlen - 1) > (char *)ISA_HOLE_VADDR(0xfffff)))
    220   1.1  drochner 			continue;
    221   1.1  drochner 
    222   1.1  drochner 		cksum = 0;
    223   1.1  drochner 		for (c = p; c < p + structlen; c++)
    224  1.53     perry 			cksum += *(uint8_t *)c;
    225   1.1  drochner 		if (cksum != 0)
    226   1.1  drochner 			continue;
    227   1.1  drochner 
    228   1.1  drochner 		if (*(char *)(p + 4) != 0x10) {
    229   1.1  drochner 			printf("unknown version %x\n", *(char *)(p + 4));
    230   1.1  drochner 			continue;
    231   1.1  drochner 		}
    232   1.1  drochner 
    233   1.1  drochner 		return (p);
    234   1.1  drochner 	}
    235   1.1  drochner 
    236   1.1  drochner 	return (0);
    237   1.1  drochner }
    238   1.1  drochner 
    239   1.1  drochner int
    240  1.45     perry pnpbios_probe(void)
    241   1.1  drochner {
    242   1.1  drochner 
    243   1.1  drochner 	return (pnpbios_find() != 0);
    244   1.1  drochner }
    245   1.1  drochner 
    246  1.16     jhawk static int
    247  1.63     joerg pnpbios_match(device_t parent, cfdata_t match, void *aux)
    248   1.1  drochner {
    249   1.1  drochner 
    250   1.1  drochner 	/* There can be only one! */
    251   1.2   thorpej 	if (pnpbios_softc != NULL)
    252   1.1  drochner 		return (0);
    253   1.1  drochner 
    254   1.1  drochner 	return (pnpbios_enabled);
    255   1.1  drochner }
    256   1.1  drochner 
    257  1.58  christos static void *
    258  1.45     perry pnpbios_mapit(u_long addr, u_long len, int prot)
    259   1.1  drochner {
    260   1.1  drochner 	u_long startpa, pa, endpa;
    261   1.1  drochner 	vaddr_t startva, va;
    262   1.1  drochner 
    263  1.35      fvdl 	pa = startpa = x86_trunc_page(addr);
    264  1.35      fvdl 	endpa = x86_round_page(addr + len);
    265   1.1  drochner 
    266  1.46      yamt 	va = startva = uvm_km_alloc(kernel_map, endpa - startpa, 0,
    267  1.46      yamt 	    UVM_KMF_VAONLY);
    268   1.1  drochner 	if (!startva)
    269   1.1  drochner 		return (0);
    270  1.36   thorpej 	for (; pa < endpa; pa += PAGE_SIZE, va += PAGE_SIZE)
    271   1.1  drochner 		pmap_kenter_pa(va, pa, prot);
    272  1.24     chris 	pmap_update(pmap_kernel());
    273   1.1  drochner 
    274  1.58  christos 	return ((void *)(startva + (addr - startpa)));
    275   1.1  drochner }
    276   1.1  drochner 
    277  1.16     jhawk static void
    278  1.63     joerg pnpbios_attach(device_t parent, device_t self, void *aux)
    279   1.1  drochner {
    280  1.63     joerg 	struct pnpbios_softc *sc = device_private(self);
    281   1.1  drochner 	struct pnpbios_attach_args *paa = aux;
    282  1.58  christos 	char *p;
    283  1.11    chopps 	unsigned int codepbase, datapbase, evaddrp;
    284  1.58  christos 	void *codeva, *datava;
    285   1.1  drochner 	extern char pnpbiostramp[], epnpbiostramp[];
    286  1.25   thorpej 	int res, num, size;
    287  1.11    chopps #ifdef PNPBIOSEVENTS
    288  1.11    chopps 	int evtype;
    289  1.11    chopps #endif
    290   1.1  drochner 
    291  1.57       uwe 	aprint_naive("\n");
    292  1.57       uwe 
    293   1.2   thorpej 	pnpbios_softc = sc;
    294  1.63     joerg 	sc->sc_dev = self;
    295   1.1  drochner 	sc->sc_ic = paa->paa_ic;
    296   1.1  drochner 
    297   1.1  drochner 	p = pnpbios_find();
    298   1.1  drochner 	if (!p)
    299   1.1  drochner 		panic("pnpbios_attach: disappeared");
    300   1.1  drochner 
    301  1.53     perry 	sc->sc_version = *(uint8_t *)(p + 0x04);
    302  1.53     perry 	sc->sc_control = *(uint8_t *)(p + 0x06);
    303  1.53     perry 	evaddrp = *(uint32_t *)(p + 0x09);
    304  1.53     perry 	codepbase = *(uint32_t *)(p + 0x13);
    305  1.53     perry 	datapbase = *(uint32_t *)(p + 0x1d);
    306  1.53     perry 	pnpbios_entry = *(uint16_t *)(p + 0x11);
    307  1.11    chopps 
    308  1.15   thorpej 	if (pnpbiosverbose) {
    309  1.57       uwe 		aprint_normal(": code %x, data %x, entry %x, control %x,"
    310  1.57       uwe 			      " eventp %x\n%s",
    311  1.15   thorpej 		    codepbase, datapbase, pnpbios_entry, sc->sc_control,
    312  1.62    cegger 		    (unsigned int)evaddrp, device_xname(self));
    313  1.15   thorpej 	}
    314  1.15   thorpej 
    315  1.11    chopps #ifdef PNPBIOSEVENTS
    316  1.11    chopps 	/* if we have an event mechnism queue a thread to deal with them */
    317  1.11    chopps 	evtype = (sc->sc_control & PNP_IC_CONTORL_EVENT_MASK);
    318  1.11    chopps 	if (evtype == PNP_IC_CONTROL_EVENT_POLL) {
    319  1.36   thorpej 		sc->sc_evaddr = pnpbios_mapit(evaddrp, PAGE_SIZE,
    320  1.11    chopps 			VM_PROT_READ | VM_PROT_WRITE);
    321  1.11    chopps 		if (!sc->sc_evaddr)
    322  1.63     joerg 			aprint_error_dev(self, "couldn't map event flag 0x%08x\n",
    323  1.62    cegger 			    evaddrp);
    324  1.11    chopps 	}
    325  1.11    chopps #endif
    326   1.1  drochner 
    327  1.11    chopps 	codeva = pnpbios_mapit(codepbase, 0x10000,
    328   1.1  drochner 		VM_PROT_READ | VM_PROT_WRITE | VM_PROT_EXECUTE);
    329  1.11    chopps 	datava = pnpbios_mapit(datapbase, 0x10000,
    330   1.1  drochner 		VM_PROT_READ | VM_PROT_WRITE);
    331   1.1  drochner 	if (codeva == 0 || datava == 0) {
    332  1.57       uwe 		aprint_error(": no vm for mapping\n");
    333   1.1  drochner 		return;
    334   1.1  drochner 	}
    335   1.1  drochner 	pnpbios_scratchbuf = malloc(PNPBIOS_BUFSIZE, M_DEVBUF, M_NOWAIT);
    336   1.1  drochner 
    337   1.1  drochner 	setsegment(&gdt[GPNPBIOSCODE_SEL].sd, codeva, 0xffff,
    338   1.1  drochner 		   SDT_MEMERA, SEL_KPL, 0, 0);
    339   1.1  drochner 	setsegment(&gdt[GPNPBIOSDATA_SEL].sd, datava, 0xffff,
    340   1.1  drochner 		   SDT_MEMRWA, SEL_KPL, 0, 0);
    341   1.1  drochner 	setsegment(&gdt[GPNPBIOSSCRATCH_SEL].sd,
    342   1.1  drochner 		   pnpbios_scratchbuf, PNPBIOS_BUFSIZE - 1,
    343   1.1  drochner 		   SDT_MEMRWA, SEL_KPL, 0, 0);
    344   1.1  drochner 	setsegment(&gdt[GPNPBIOSTRAMP_SEL].sd,
    345   1.1  drochner 		   pnpbiostramp, epnpbiostramp - pnpbiostramp - 1,
    346   1.1  drochner 		   SDT_MEMERA, SEL_KPL, 1, 0);
    347   1.1  drochner 
    348   1.1  drochner 	res = pnpbios_getnumnodes(&num, &size);
    349   1.1  drochner 	if (res) {
    350  1.57       uwe 		aprint_error(": pnpbios_getnumnodes: error %d\n", res);
    351   1.1  drochner 		return;
    352   1.1  drochner 	}
    353   1.1  drochner 
    354  1.57       uwe 	aprint_normal(": nodes %d, max len %d\n", num, size);
    355   1.1  drochner 
    356  1.14   thorpej #ifdef PNPBIOSEVENTS
    357  1.63     joerg 	EDPRINTF(("%s: event flag vaddr 0x%08x\n", device_xname(self),
    358  1.14   thorpej 	    (int)sc->sc_evaddr));
    359  1.14   thorpej 
    360  1.15   thorpej 	/* Set initial dock status. */
    361  1.15   thorpej 	sc->sc_docked = -1;
    362  1.15   thorpej 	(void) pnpbios_update_dock_status(sc);
    363  1.38  drochner #endif
    364  1.14   thorpej 
    365  1.25   thorpej 	/* Enumerate the device nodes. */
    366  1.25   thorpej 	pnpbios_enumerate(sc);
    367  1.25   thorpej 
    368  1.25   thorpej #ifdef PNPBIOSEVENTS
    369  1.25   thorpej 	/* if we have an event mechnism queue a thread to deal with them */
    370  1.25   thorpej 	/* XXX need to update with irq if we do that */
    371  1.25   thorpej 	if (evtype != PNP_IC_CONTROL_EVENT_NONE) {
    372  1.25   thorpej 		if (evtype != PNP_IC_CONTROL_EVENT_POLL || sc->sc_evaddr) {
    373  1.25   thorpej 			sc->sc_threadrun = 1;
    374  1.25   thorpej 			config_pending_incr();
    375  1.59        ad 			if (kthread_create(PRI_NONE, 0, NULL,
    376  1.59        ad 			    pnpbios_event_thread, sc, &sc->sc_evthread,
    377  1.63     joerg 			    "%s", device_xname(self)))
    378  1.59        ad 			    	panic("pnpbios: create event thread");
    379  1.25   thorpej 		}
    380  1.25   thorpej 	}
    381  1.25   thorpej #endif
    382  1.25   thorpej }
    383  1.25   thorpej 
    384  1.25   thorpej static void
    385  1.45     perry pnpbios_enumerate(struct pnpbios_softc *sc)
    386  1.25   thorpej {
    387  1.41   mycroft 	int res, num, i, size, idx, dynidx;
    388  1.25   thorpej 	struct pnpdevnode *dn;
    389  1.53     perry 	uint8_t *buf;
    390  1.25   thorpej 
    391  1.25   thorpej 	res = pnpbios_getnumnodes(&num, &size);
    392  1.25   thorpej 	if (res) {
    393  1.63     joerg 		aprint_error_dev(sc->sc_dev, "pnpbios_getnumnodes: error %d\n",
    394  1.62    cegger 		    res);
    395  1.25   thorpej 		return;
    396  1.25   thorpej 	}
    397  1.25   thorpej 
    398  1.25   thorpej 	buf = malloc(size, M_DEVBUF, M_NOWAIT);
    399  1.25   thorpej 	if (buf == NULL) {
    400  1.63     joerg 		aprint_error_dev(sc->sc_dev, "unable to allocate node buffer\n");
    401  1.25   thorpej 		return;
    402  1.25   thorpej 	}
    403  1.25   thorpej 
    404  1.16     jhawk 	/*
    405  1.16     jhawk 	 * Loop through the list of indices getting data and match/attaching
    406  1.16     jhawk 	 * each as appropriate.
    407  1.16     jhawk 	 *
    408  1.16     jhawk 	 * Unfortunately, some BIOSes seem to have fatal bugs getting the
    409  1.16     jhawk 	 * dynamic (i.e. currently active) configuration, for instance some
    410  1.16     jhawk 	 * Sony VAIO laptops, including the PCG-Z505HE.  They don't have such a
    411  1.16     jhawk 	 * problem with that static (i.e. next boot time) configuration,
    412  1.16     jhawk 	 * however.  The workaround is to get the static configuration for all
    413  1.16     jhawk 	 * indices, and only get dynamic configuration for devices where the
    414  1.16     jhawk 	 * match is positive.
    415  1.16     jhawk 	 *
    416  1.16     jhawk 	 * This seems to work conveniently as the indices that cause
    417  1.16     jhawk 	 * crashes (and it seems to vary from machine to machine) do not
    418  1.16     jhawk 	 * seem to be for devices that NetBSD's pnpbios supports.
    419  1.16     jhawk 	 */
    420  1.16     jhawk 
    421   1.1  drochner 	idx = 0;
    422   1.6  drochner 	for (i = 0; i < num && idx != 0xff; i++) {
    423  1.41   mycroft 		DPRINTF(("%s: getting info for index %d\n",
    424  1.63     joerg 		    device_xname(sc->sc_dev), idx));
    425  1.16     jhawk 
    426  1.41   mycroft 		dynidx = idx;
    427  1.16     jhawk 
    428  1.16     jhawk 		res = pnpbios_getnode(PNP_CF_DEVCONF_STATIC, &idx, buf, size);
    429   1.1  drochner 		if (res) {
    430  1.63     joerg 			aprint_error_dev(sc->sc_dev, "index %d error %d "
    431  1.62    cegger 			    "getting static configuration\n", idx, res);
    432   1.1  drochner 			continue;
    433   1.1  drochner 		}
    434  1.11    chopps 		dn = (struct pnpdevnode *)buf;
    435  1.41   mycroft 		if (!pnpbios_attachnode(sc, dn->dn_handle, buf, dn->dn_size, 1)) {
    436  1.41   mycroft 			DPRINTF(("%s handle %d: no match from static config\n",
    437  1.63     joerg 			    device_xname(sc->sc_dev), dn->dn_handle));
    438  1.16     jhawk 			continue;
    439  1.16     jhawk 		}
    440  1.41   mycroft 
    441  1.41   mycroft 		res = pnpbios_getnode(PNP_CF_DEVCONF_DYNAMIC, &dynidx, buf, size);
    442  1.16     jhawk 		if (res) {
    443  1.63     joerg 			aprint_error_dev(sc->sc_dev, "index %d error %d "
    444  1.62    cegger 			    "getting dynamic configuration\n", dynidx, res);
    445  1.16     jhawk 			continue;
    446  1.16     jhawk 		}
    447  1.16     jhawk 		dn = (struct pnpdevnode *)buf;
    448  1.41   mycroft 		if (!pnpbios_attachnode(sc, dn->dn_handle, buf, dn->dn_size, 0)) {
    449  1.41   mycroft 			DPRINTF(("%s handle %d: no match from dynamic config\n",
    450  1.63     joerg 			    device_xname(sc->sc_dev), dn->dn_handle));
    451  1.41   mycroft 			continue;
    452  1.41   mycroft 		}
    453   1.1  drochner 	}
    454   1.6  drochner 	if (i != num)
    455  1.63     joerg 		aprint_error_dev(sc->sc_dev, "got only %d nodes\n", i);
    456   1.1  drochner 	if (idx != 0xff)
    457  1.63     joerg 		aprint_error_dev(sc->sc_dev, "last index %d\n", idx);
    458   1.1  drochner 
    459   1.1  drochner 	free(buf, M_DEVBUF);
    460   1.1  drochner }
    461   1.1  drochner 
    462  1.38  drochner #ifdef PNPBIOSEVENTS
    463  1.16     jhawk static int
    464  1.45     perry pnpbios_update_dock_status(struct pnpbios_softc *sc)
    465  1.15   thorpej {
    466  1.15   thorpej 	struct pnpdockinfo di;
    467  1.15   thorpej 	const char *when, *style;
    468  1.15   thorpej 	int res, odocked = sc->sc_docked;
    469  1.15   thorpej 
    470  1.15   thorpej 	res = pnpbios_getdockinfo(&di);
    471  1.15   thorpej 	if (res == PNP_RC_SYSTEM_NOT_DOCKED) {
    472  1.15   thorpej 		sc->sc_docked = 0;
    473  1.15   thorpej 		if (odocked != sc->sc_docked)
    474  1.63     joerg 			printf("%s: not docked\n", device_xname(sc->sc_dev));
    475  1.15   thorpej 	} else if (res) {
    476  1.15   thorpej 		EDPRINTF(("%s: dockinfo failed 0x%02x\n",
    477  1.63     joerg 		    device_xname(sc->sc_dev), res));
    478  1.15   thorpej 	} else {
    479  1.15   thorpej 		sc->sc_docked = 1;
    480  1.15   thorpej 		if (odocked != sc->sc_docked) {
    481  1.15   thorpej 			char idstr[8];
    482  1.15   thorpej 			pnpbios_id_to_string(di.di_id, idstr);
    483  1.63     joerg 			printf("%s: dock id %s", device_xname(sc->sc_dev), idstr);
    484  1.15   thorpej 			if (pnpbiosverbose) {
    485  1.15   thorpej 				if (di.di_serial != -1)
    486  1.15   thorpej 					printf(", serial number %d",
    487  1.15   thorpej 					    di.di_serial);
    488  1.15   thorpej 			}
    489  1.15   thorpej 			switch (di.di_cap & PNP_DI_DOCK_STYLE_MASK) {
    490  1.15   thorpej 			case PNP_DI_DOCK_STYLE_SUPRISE:
    491  1.15   thorpej 				style = "surprise";
    492  1.15   thorpej 				break;
    493  1.15   thorpej 			case PNP_DI_DOCK_STYLE_VCR:
    494  1.15   thorpej 				style = "controlled";
    495  1.15   thorpej 				break;
    496  1.40  jdolecek 			default:
    497  1.40  jdolecek 				style = "<style unknown>";
    498  1.40  jdolecek 				break;
    499  1.15   thorpej 			}
    500  1.15   thorpej 			switch (di.di_cap & PNP_DI_DOCK_WHEN_MASK) {
    501  1.15   thorpej 			case PNP_DI_DOCK_WHEN_NO_POWER:
    502  1.15   thorpej 				when = "cold";
    503  1.15   thorpej 				break;
    504  1.15   thorpej 			case PNP_DI_DOCK_WHEN_SUSPENDED:
    505  1.15   thorpej 				when = "warm";
    506  1.15   thorpej 				break;
    507  1.15   thorpej 			case PNP_DI_DOCK_WHEN_RUNNING:
    508  1.15   thorpej 				when = "hot";
    509  1.15   thorpej 				break;
    510  1.15   thorpej 			case PNP_DI_DOCK_WHEN_RESERVED:
    511  1.15   thorpej 				when = "<reserved>";
    512  1.15   thorpej 				break;
    513  1.40  jdolecek 			default:
    514  1.40  jdolecek 				when = "<dock type unknown>";
    515  1.40  jdolecek 					break;
    516  1.15   thorpej 			}
    517  1.15   thorpej 			printf(", %s %s docking\n", style, when);
    518  1.15   thorpej 		}
    519  1.15   thorpej 	}
    520  1.15   thorpej 
    521  1.15   thorpej 	return (odocked);
    522  1.15   thorpej }
    523  1.38  drochner #endif
    524  1.15   thorpej 
    525  1.16     jhawk static int
    526  1.45     perry pnpbios_getnumnodes(int *nump, size_t *sizep)
    527   1.1  drochner {
    528   1.1  drochner 	int res;
    529   1.1  drochner 	short *help = (short *)(pnpbios_scratchbuf + PNPBIOS_BUFSIZE);
    530   1.1  drochner 
    531   1.1  drochner 	*--help = GSEL(GPNPBIOSDATA_SEL, SEL_KPL);
    532   1.1  drochner 	*--help = GSEL(GPNPBIOSSCRATCH_SEL, SEL_KPL);
    533   1.1  drochner 	*--help = 2; /* buffer offset for node size */
    534   1.1  drochner 	*--help = GSEL(GPNPBIOSSCRATCH_SEL, SEL_KPL);
    535   1.1  drochner 	*--help = 0; /* buffer offset for numnodes */
    536  1.11    chopps 	*--help = PNP_FC_GET_NUM_NODES;
    537   1.1  drochner 
    538  1.58  christos 	res = pnpbioscall(((char *)help) - pnpbios_scratchbuf);
    539   1.1  drochner 	if (res)
    540   1.1  drochner 		return (res);
    541   1.1  drochner 
    542   1.1  drochner 	*nump = *(short *)(pnpbios_scratchbuf + 0);
    543   1.1  drochner 	*sizep = *(short *)(pnpbios_scratchbuf + 2);
    544   1.1  drochner 	return (0);
    545   1.1  drochner }
    546   1.1  drochner 
    547  1.16     jhawk static int
    548  1.53     perry pnpbios_getnode(int flags, int *idxp, uint8_t *buf, size_t len)
    549   1.1  drochner {
    550   1.1  drochner 	int res;
    551   1.1  drochner 	short *help = (short *)(pnpbios_scratchbuf + PNPBIOS_BUFSIZE);
    552   1.1  drochner 
    553   1.1  drochner 	*--help = GSEL(GPNPBIOSDATA_SEL, SEL_KPL);
    554   1.1  drochner 	*--help = flags;
    555   1.1  drochner 	*--help = GSEL(GPNPBIOSSCRATCH_SEL, SEL_KPL);
    556   1.1  drochner 	*--help = 2; /* buffer offset for node data */
    557   1.1  drochner 	*--help = GSEL(GPNPBIOSSCRATCH_SEL, SEL_KPL);
    558   1.1  drochner 	*--help = 0; /* buffer offset for index in/out */
    559  1.11    chopps 	*--help = PNP_FC_GET_DEVICE_NODE;
    560   1.1  drochner 
    561   1.1  drochner 	*(short *)(pnpbios_scratchbuf + 0) = *idxp;
    562   1.1  drochner 
    563  1.58  christos 	res = pnpbioscall(((char *)help) - pnpbios_scratchbuf);
    564   1.1  drochner 	if (res)
    565   1.1  drochner 		return (res);
    566   1.1  drochner 
    567   1.1  drochner 	*idxp = *(short *)(pnpbios_scratchbuf + 0);
    568  1.23     perry 	memcpy(buf, pnpbios_scratchbuf + 2, len);
    569   1.1  drochner 	return (0);
    570   1.1  drochner }
    571   1.1  drochner 
    572  1.16     jhawk 
    573  1.16     jhawk #if 0
    574  1.16     jhawk /* XXX - pnpbios_setnode() is never called. */
    575  1.16     jhawk 
    576  1.16     jhawk static int
    577  1.53     perry pnpbios_setnode(int flags, int idx, const uint8_t *buf, size_t len)
    578  1.11    chopps {
    579  1.11    chopps 	short *help = (short *)(pnpbios_scratchbuf + PNPBIOS_BUFSIZE);
    580  1.11    chopps 
    581  1.11    chopps 	*--help = GSEL(GPNPBIOSDATA_SEL, SEL_KPL);
    582  1.11    chopps 	*--help = flags;
    583  1.11    chopps 	*--help = GSEL(GPNPBIOSSCRATCH_SEL, SEL_KPL);
    584  1.11    chopps 	*--help = 0; /* buffer offset for node data */
    585  1.11    chopps 	*--help = idx;
    586  1.11    chopps 	*--help = PNP_FC_SET_DEVICE_NODE;
    587  1.11    chopps 
    588  1.11    chopps 	memcpy(pnpbios_scratchbuf, buf, len);
    589  1.11    chopps 
    590  1.58  christos 	return (pnpbioscall(((void *)help) - pnpbios_scratchbuf));
    591  1.11    chopps }
    592  1.16     jhawk #endif /* 0 */
    593  1.11    chopps 
    594  1.16     jhawk #ifdef PNPBIOSEVENTS
    595  1.16     jhawk static int
    596  1.53     perry pnpbios_getevent(uint16_t *event)
    597  1.11    chopps {
    598  1.11    chopps 	int res;
    599  1.11    chopps 	short *help = (short *)(pnpbios_scratchbuf + PNPBIOS_BUFSIZE);
    600  1.11    chopps 
    601  1.11    chopps 	*--help = GSEL(GPNPBIOSDATA_SEL, SEL_KPL);
    602  1.11    chopps 	*--help = GSEL(GPNPBIOSSCRATCH_SEL, SEL_KPL);
    603  1.11    chopps 	*--help = 0; /* buffer offset for message data */
    604  1.11    chopps 	*--help = PNP_FC_GET_EVENT;
    605  1.11    chopps 
    606  1.58  christos 	res = pnpbioscall(((void *)help) - pnpbios_scratchbuf);
    607  1.11    chopps 	*event = pnpbios_scratchbuf[0] + (pnpbios_scratchbuf[1] << 8);
    608  1.11    chopps 	return (res);
    609  1.11    chopps }
    610  1.11    chopps 
    611  1.16     jhawk static int
    612  1.45     perry pnpbios_sendmessage(int msg)
    613  1.11    chopps {
    614  1.11    chopps 	short *help = (short *)(pnpbios_scratchbuf + PNPBIOS_BUFSIZE);
    615  1.11    chopps 
    616  1.11    chopps 	*--help = GSEL(GPNPBIOSDATA_SEL, SEL_KPL);
    617  1.11    chopps 	*--help = msg;
    618  1.11    chopps 	*--help = PNP_FC_SEND_MESSAGE;
    619  1.11    chopps 
    620  1.58  christos 	return (pnpbioscall(((void *)help) - pnpbios_scratchbuf));
    621  1.11    chopps }
    622  1.11    chopps 
    623  1.16     jhawk static int
    624  1.45     perry pnpbios_getdockinfo(struct pnpdockinfo *di)
    625  1.11    chopps {
    626  1.11    chopps 	int res;
    627  1.11    chopps 	short *help = (short *)(pnpbios_scratchbuf + PNPBIOS_BUFSIZE);
    628  1.11    chopps 
    629  1.11    chopps 	*--help = GSEL(GPNPBIOSDATA_SEL, SEL_KPL);
    630  1.11    chopps 	*--help = GSEL(GPNPBIOSSCRATCH_SEL, SEL_KPL);
    631  1.11    chopps 	*--help = 0; /* buffer offset for dock info */
    632  1.11    chopps 	*--help = PNP_FC_GET_DOCK_INFO;
    633  1.11    chopps 
    634  1.58  christos 	res = pnpbioscall(((void *)help) - pnpbios_scratchbuf);
    635  1.11    chopps 	memcpy(di, pnpbios_scratchbuf, sizeof(*di));
    636  1.11    chopps 	return (res);
    637  1.11    chopps }
    638  1.38  drochner #endif /* PNPBIOSEVENTS */
    639  1.11    chopps 
    640  1.16     jhawk #if 0
    641  1.16     jhawk /* XXX - pnpbios_getapmtable() is not called. */
    642  1.16     jhawk 
    643  1.11    chopps /* XXX we don't support more than PNPBIOS_BUFSIZE - (stacklen + 2) */
    644  1.16     jhawk static int
    645  1.53     perry pnpbios_getapmtable(uint8_t *tab, size_t *len)
    646  1.11    chopps {
    647  1.11    chopps 	short *help = (short *)(pnpbios_scratchbuf + PNPBIOS_BUFSIZE);
    648  1.11    chopps 	size_t origlen, stacklen;
    649  1.11    chopps 	int res;
    650  1.11    chopps 
    651  1.11    chopps 	*--help = GSEL(GPNPBIOSDATA_SEL, SEL_KPL);
    652  1.11    chopps 	*--help = GSEL(GPNPBIOSSCRATCH_SEL, SEL_KPL);
    653  1.11    chopps 	*--help = 2; /* buffer offset for table */
    654  1.11    chopps 	*--help = GSEL(GPNPBIOSSCRATCH_SEL, SEL_KPL);
    655  1.11    chopps 	*--help = 0; /* buffer offset for length */
    656  1.11    chopps 	*--help = PNP_FC_GET_APM_TABLE;
    657  1.11    chopps 
    658  1.11    chopps 	origlen = *len;
    659  1.58  christos 	stacklen = (void *)help - pnpbios_scratchbuf;
    660  1.11    chopps 	if (origlen > PNPBIOS_BUFSIZE - stacklen - 2)
    661  1.11    chopps 		origlen = PNPBIOS_BUFSIZE - stacklen - 2;
    662  1.53     perry 	*(uint16_t *)(pnpbios_scratchbuf) = origlen;
    663  1.11    chopps 
    664  1.58  christos 	res = pnpbioscall(((void *)help) - pnpbios_scratchbuf);
    665  1.53     perry 	*len = *(uint16_t *)pnpbios_scratchbuf;
    666  1.11    chopps 	if (res)
    667  1.11    chopps 		return (res);
    668  1.11    chopps 	if (origlen && *len > origlen) {
    669  1.11    chopps 		printf("pnpbios: returned apm table exceed requested size\n");
    670  1.11    chopps 		return (PNP_RC_BUFFER_TOO_SMALL);
    671  1.11    chopps 	}
    672  1.11    chopps 	memcpy(tab, pnpbios_scratchbuf + 2, *len);
    673  1.11    chopps 	return (0);
    674  1.11    chopps }
    675  1.16     jhawk #endif
    676  1.11    chopps 
    677  1.16     jhawk static void
    678  1.53     perry pnpbios_id_to_string(uint32_t pnpid, char *s)
    679   1.1  drochner {
    680  1.53     perry 	uint8_t *id;
    681   1.1  drochner 
    682  1.53     perry 	id = (uint8_t *)&pnpid;
    683   1.1  drochner 	*s++ = 'A' + (id[0] >> 2) - 1;
    684   1.1  drochner 	*s++ = 'A' + ((id[0] & 3) << 3) + (id[1] >> 5) - 1;
    685   1.1  drochner 	*s++ = 'A' + (id[1] & 0x1f) - 1;
    686  1.47  christos 	*s++ = HEXDIGITS[id[2] >> 4];
    687  1.47  christos 	*s++ = HEXDIGITS[id[2] & 0x0f];
    688  1.47  christos 	*s++ = HEXDIGITS[id[3] >> 4];
    689  1.47  christos 	*s++ = HEXDIGITS[id[3] & 0x0f];
    690   1.1  drochner 	*s = '\0';
    691   1.1  drochner }
    692   1.1  drochner 
    693  1.16     jhawk static void
    694  1.45     perry pnpbios_printres(struct pnpresources *r)
    695   1.1  drochner {
    696   1.1  drochner 	struct pnp_mem *mem;
    697   1.1  drochner 	struct pnp_io *io;
    698   1.1  drochner 	struct pnp_irq *irq;
    699   1.1  drochner 	struct pnp_dma *dma;
    700   1.1  drochner 	int p = 0;
    701   1.1  drochner 
    702   1.1  drochner 	mem = SIMPLEQ_FIRST(&r->mem);
    703   1.1  drochner 	if (mem) {
    704  1.57       uwe 		aprint_normal("mem");
    705   1.1  drochner 		do {
    706  1.57       uwe 			aprint_normal(" %x", mem->minbase);
    707   1.1  drochner 			if (mem->len > 1)
    708  1.57       uwe 				aprint_normal("-%x",
    709  1.57       uwe 					      mem->minbase + mem->len - 1);
    710   1.1  drochner 		} while ((mem = SIMPLEQ_NEXT(mem, next)));
    711   1.1  drochner 		p++;
    712   1.1  drochner 	}
    713   1.1  drochner 	io = SIMPLEQ_FIRST(&r->io);
    714   1.1  drochner 	if (io) {
    715   1.1  drochner 		if (p++)
    716  1.57       uwe 			aprint_normal(", ");
    717  1.57       uwe 		aprint_normal("io");
    718   1.1  drochner 		do {
    719  1.57       uwe 			aprint_normal(" %x", io->minbase);
    720   1.1  drochner 			if (io->len > 1)
    721  1.57       uwe 				aprint_normal("-%x",
    722  1.57       uwe 					      io->minbase + io->len - 1);
    723   1.1  drochner 		} while ((io = SIMPLEQ_NEXT(io, next)));
    724   1.1  drochner 	}
    725   1.1  drochner 	irq = SIMPLEQ_FIRST(&r->irq);
    726   1.1  drochner 	if (irq) {
    727   1.1  drochner 		if (p++)
    728  1.57       uwe 			aprint_normal(", ");
    729  1.57       uwe 		aprint_normal("irq");
    730   1.1  drochner 		do {
    731  1.57       uwe 			aprint_normal(" %d", ffs(irq->mask) - 1);
    732   1.1  drochner 		} while ((irq = SIMPLEQ_NEXT(irq, next)));
    733   1.1  drochner 	}
    734   1.1  drochner 	dma = SIMPLEQ_FIRST(&r->dma);
    735   1.1  drochner 	if (dma) {
    736   1.1  drochner 		if (p)
    737  1.57       uwe 			aprint_normal(", ");
    738  1.57       uwe 		aprint_normal("DMA");
    739   1.1  drochner 		do {
    740  1.57       uwe 			aprint_normal(" %d", ffs(dma->mask) - 1);
    741   1.1  drochner 		} while ((dma = SIMPLEQ_NEXT(dma, next)));
    742   1.1  drochner 	}
    743   1.1  drochner }
    744   1.1  drochner 
    745  1.16     jhawk static int
    746  1.45     perry pnpbios_print(void *aux, const char *pnp)
    747   1.1  drochner {
    748   1.1  drochner 	struct pnpbiosdev_attach_args *aa = aux;
    749   1.1  drochner 
    750   1.1  drochner 	if (pnp)
    751   1.1  drochner 		return (QUIET);
    752   1.1  drochner 
    753  1.32   thorpej 	aprint_normal(" index %d (%s", aa->idx, aa->primid);
    754   1.1  drochner 	if (aa->resc->longname)
    755  1.32   thorpej 		aprint_normal(", %s", aa->resc->longname);
    756   1.1  drochner 	if (aa->idstr != aa->primid)
    757  1.32   thorpej 		aprint_normal(", attached as %s", aa->idstr);
    758  1.32   thorpej 	aprint_normal(")");
    759   1.2   thorpej 
    760   1.2   thorpej 	return (0);
    761   1.2   thorpej }
    762   1.2   thorpej 
    763   1.2   thorpej void
    764  1.45     perry pnpbios_print_devres(struct device *dev, struct pnpbiosdev_attach_args *aa)
    765   1.2   thorpej {
    766   1.2   thorpej 
    767  1.62    cegger 	aprint_normal_dev(dev, "");
    768   1.1  drochner 	pnpbios_printres(aa->resc);
    769  1.57       uwe 	aprint_normal("\n");
    770   1.2   thorpej }
    771   1.1  drochner 
    772  1.16     jhawk static int
    773  1.43  drochner pnpbios_attachchild(struct pnpbios_softc *sc,
    774  1.43  drochner 		    struct pnpbiosdev_attach_args *aa, int matchonly)
    775  1.43  drochner {
    776  1.50  drochner 	int locs[PNPBIOSCF_NLOCS];
    777  1.43  drochner 
    778  1.50  drochner 	locs[PNPBIOSCF_INDEX] = aa->idx;
    779  1.43  drochner 
    780  1.43  drochner 	if (matchonly)
    781  1.64      cube 		return (config_search_loc(config_stdsubmatch, sc->sc_dev,
    782  1.50  drochner 					 "pnpbios", locs, aa) != NULL);
    783  1.43  drochner 	else
    784  1.64      cube 		return (config_found_sm_loc(sc->sc_dev, "pnpbios",
    785  1.51  drochner 			locs, aa, pnpbios_print, config_stdsubmatch)
    786  1.43  drochner 				!= NULL);
    787  1.43  drochner }
    788  1.43  drochner 
    789  1.43  drochner static int
    790  1.53     perry pnpbios_attachnode(struct pnpbios_softc *sc, int idx, const uint8_t *buf,
    791  1.45     perry     size_t len, int matchonly)
    792   1.1  drochner {
    793  1.48  drochner 	const struct pnpdevnode *dn;
    794  1.53     perry 	const uint8_t *p;
    795   1.1  drochner 	char idstr[8];
    796   1.1  drochner 	struct pnpresources r, s;
    797   1.1  drochner 	struct pnpbiosdev_attach_args aa;
    798   1.1  drochner 	struct pnp_compatid *compatid;
    799  1.11    chopps 	int res, i;
    800   1.1  drochner 
    801  1.48  drochner 	dn = (const struct pnpdevnode *)buf;
    802  1.11    chopps 	pnpbios_id_to_string(dn->dn_product, idstr);
    803  1.48  drochner 	p = (const u_char *)(dn + 1);
    804  1.11    chopps 
    805  1.16     jhawk 	DPRINTF(("%s (%s): type 0x%02x subtype "
    806  1.16     jhawk 	    "0x%02x dpi 0x%02x attr 0x%04x:\n",
    807  1.17     jhawk 	    idstr, matchonly ? "static" : "dynamic", dn->dn_type,
    808  1.16     jhawk 	    dn->dn_subtype, dn->dn_dpi, dn->dn_attr));
    809  1.11    chopps 	DPRINTF(("%s: allocated config scan:\n", idstr));
    810   1.1  drochner 	res = pnp_scan(&p, len - 12, &r, 0);
    811   1.1  drochner 	if (res < 0) {
    812  1.57       uwe 		aprint_error("error in config data\n");
    813   1.1  drochner 		goto dump;
    814   1.1  drochner 	}
    815   1.1  drochner 
    816   1.1  drochner 	/*
    817   1.1  drochner 	 * the following is consistency check only for now
    818   1.1  drochner 	 */
    819  1.11    chopps 	DPRINTF(("\tpossible config scan:\n"));
    820   1.1  drochner 	res = pnp_scan(&p, len - (p - buf), &s, 0);
    821   1.1  drochner 	if (res < 0) {
    822  1.57       uwe 		aprint_error("error in possible configuration\n");
    823   1.1  drochner 		goto dump;
    824   1.1  drochner 	}
    825   1.1  drochner 
    826  1.11    chopps 	DPRINTF(("\tcompat id scan:\n"));
    827   1.1  drochner 	res = pnp_scan(&p, len - (p - buf), &s, 0);
    828   1.1  drochner 	if (res < 0) {
    829  1.57       uwe 		aprint_error("error in compatible ID\n");
    830   1.1  drochner 		goto dump;
    831   1.1  drochner 	}
    832   1.1  drochner 
    833   1.1  drochner 	if (p != buf + len) {
    834  1.63     joerg 		aprint_error_dev(sc->sc_dev, "length mismatch in node %d:"
    835  1.57       uwe 			     " used %d of %d Bytes\n",
    836  1.62    cegger 		       idx, p - buf, len);
    837   1.8  drochner 		if (p > buf + len) {
    838   1.8  drochner 			/* XXX shouldn't happen - pnp_scan should catch it */
    839   1.8  drochner 			goto dump;
    840   1.8  drochner 		}
    841   1.8  drochner 		/* Crappy BIOS: Buffer is not fully used. Be generous. */
    842   1.8  drochner 	}
    843   1.8  drochner 
    844   1.8  drochner 	if (r.nummem + r.numio + r.numirq + r.numdma == 0) {
    845  1.15   thorpej 		if (pnpbiosverbose) {
    846  1.57       uwe 			aprint_normal("%s", idstr);
    847  1.15   thorpej 			if (r.longname)
    848  1.57       uwe 				aprint_normal(", %s", r.longname);
    849  1.15   thorpej 			compatid = s.compatids;
    850  1.15   thorpej 			while (compatid) {
    851  1.57       uwe 				aprint_normal(", %s", compatid->idstr);
    852  1.15   thorpej 				compatid = compatid->next;
    853  1.15   thorpej 			}
    854  1.57       uwe 			aprint_normal(" at %s index %d disabled\n",
    855  1.63     joerg 			    device_xname(sc->sc_dev), idx);
    856   1.8  drochner 		}
    857  1.16     jhawk 		return 0;
    858   1.1  drochner 	}
    859   1.1  drochner 
    860   1.1  drochner 	aa.pbt = 0; /* XXX placeholder */
    861   1.2   thorpej 	aa.idx = idx;
    862   1.1  drochner 	aa.resc = &r;
    863   1.1  drochner 	aa.ic = sc->sc_ic;
    864   1.1  drochner 	aa.primid = idstr;
    865   1.1  drochner 
    866   1.1  drochner 	/* first try the specific device ID */
    867   1.1  drochner 	aa.idstr = idstr;
    868  1.43  drochner 	if (pnpbios_attachchild(sc, &aa, matchonly))
    869  1.43  drochner 		return -1;
    870   1.1  drochner 
    871   1.1  drochner 	/* if no driver was found, try compatible IDs */
    872   1.1  drochner 	compatid = s.compatids;
    873   1.1  drochner 	while (compatid) {
    874   1.1  drochner 		aa.idstr = compatid->idstr;
    875  1.43  drochner 		if (pnpbios_attachchild(sc, &aa, matchonly))
    876  1.43  drochner 			return -1;
    877   1.1  drochner 		compatid = compatid->next;
    878   1.1  drochner 	}
    879   1.1  drochner 
    880  1.15   thorpej 	if (pnpbiosverbose) {
    881  1.57       uwe 		aprint_normal("%s", idstr);
    882  1.15   thorpej 		if (r.longname)
    883  1.57       uwe 			aprint_normal(", %s", r.longname);
    884  1.15   thorpej 		compatid = s.compatids;
    885  1.15   thorpej 		while (compatid) {
    886  1.57       uwe 			aprint_normal(", %s", compatid->idstr);
    887  1.15   thorpej 			compatid = compatid->next;
    888  1.15   thorpej 		}
    889  1.57       uwe 		aprint_normal(" (");
    890  1.15   thorpej 		pnpbios_printres(&r);
    891  1.57       uwe 		aprint_normal(") at %s index %d ignored\n",
    892  1.63     joerg 			      device_xname(sc->sc_dev), idx);
    893   1.1  drochner 	}
    894   1.1  drochner 
    895  1.16     jhawk 	return 0;
    896   1.1  drochner 
    897  1.16     jhawk 	/* XXX should free resource lists */
    898   1.1  drochner 
    899   1.1  drochner dump:
    900  1.11    chopps 	i = 0;
    901  1.11    chopps #ifdef PNPBIOSDEBUG
    902  1.11    chopps 	/* print some useful info */
    903  1.11    chopps 	if (len >= sizeof(*dn)) {
    904  1.57       uwe 		aprint_normal("%s idx %d size %d type 0x%x:0x%x:0x%x attr 0x%x\n",
    905  1.11    chopps 		    idstr, dn->dn_handle, dn->dn_size, dn->dn_type,
    906  1.11    chopps 		    dn->dn_subtype, dn->dn_dpi, dn->dn_attr);
    907  1.11    chopps 		i += sizeof(*dn);
    908  1.11    chopps 	}
    909  1.11    chopps #endif
    910  1.11    chopps 	for (; i < len; i++)
    911  1.57       uwe 		aprint_normal(" %02x", buf[i]);
    912  1.57       uwe 	aprint_normal("\n");
    913  1.16     jhawk 	return 0;
    914   1.1  drochner }
    915   1.1  drochner 
    916  1.16     jhawk static int
    917  1.53     perry pnp_scan(const uint8_t **bufp, size_t maxlen,
    918  1.45     perry     struct pnpresources *r, int in_depends)
    919   1.1  drochner {
    920  1.11    chopps 	const void *start;
    921  1.53     perry 	const uint8_t *p;
    922  1.11    chopps 	struct pnp_mem *mem;
    923   1.1  drochner 	int tag, type, len;
    924   1.1  drochner 	char *idstr;
    925   1.1  drochner 	int i;
    926  1.11    chopps 
    927  1.11    chopps 	p = *bufp;
    928   1.1  drochner 
    929  1.23     perry 	memset(r, 0, sizeof(*r));
    930   1.1  drochner 	SIMPLEQ_INIT(&r->mem);
    931   1.1  drochner 	SIMPLEQ_INIT(&r->io);
    932   1.1  drochner 	SIMPLEQ_INIT(&r->irq);
    933   1.1  drochner 	SIMPLEQ_INIT(&r->dma);
    934   1.1  drochner 
    935   1.1  drochner 	for (;;) {
    936   1.1  drochner 		if (p >= *bufp + maxlen) {
    937  1.57       uwe 			aprint_normal("pnp_scanresources: end of buffer\n");
    938   1.1  drochner 			return (-1);
    939   1.1  drochner 		}
    940  1.11    chopps 		start = p;
    941  1.11    chopps 		tag = *p;
    942  1.11    chopps 		if (tag & ISAPNP_LARGE_TAG) {
    943  1.53     perry 			len = *(const uint16_t *)(p + 1);
    944  1.11    chopps 			p += sizeof(struct pnplargeres) + len;
    945  1.11    chopps 
    946  1.11    chopps 			switch (tag) {
    947  1.11    chopps 			case ISAPNP_TAG_MEM_RANGE_DESC: {
    948  1.11    chopps 				const struct pnpmem16rangeres *res = start;
    949  1.11    chopps 				if (len != sizeof(*res) - 3) {
    950  1.57       uwe 					aprint_normal("pnp_scan: bad mem desc\n");
    951   1.1  drochner 					return (-1);
    952   1.1  drochner 				}
    953   1.1  drochner 
    954   1.1  drochner 				mem = malloc(sizeof(struct pnp_mem),
    955   1.1  drochner 					     M_DEVBUF, M_WAITOK);
    956  1.11    chopps 				mem->flags = res->r_flags;
    957  1.11    chopps 				mem->minbase = res->r_minbase << 8;
    958  1.11    chopps 				mem->maxbase = res->r_maxbase << 8;
    959  1.11    chopps 				mem->align = res->r_align;
    960   1.1  drochner 				if (mem->align == 0)
    961   1.1  drochner 					mem->align = 0x10000;
    962  1.11    chopps 				mem->len = res->r_len << 8;
    963  1.11    chopps 				DPRINTF(("\ttag memrange "));
    964   1.8  drochner 				goto gotmem;
    965  1.11    chopps 			}
    966  1.11    chopps 			case ISAPNP_TAG_ANSI_IDENT_STRING: {
    967  1.11    chopps 				const struct pnpansiidentres *res = start;
    968   1.1  drochner 				if (in_depends)
    969  1.57       uwe 					aprint_normal("ID in dep?\n");
    970   1.1  drochner 				idstr = malloc(len + 1, M_DEVBUF, M_NOWAIT);
    971   1.1  drochner 				for (i = 0; i < len; i++)
    972  1.11    chopps 					idstr[i] = res->r_id[i];
    973   1.1  drochner 				idstr[len] = '\0';
    974  1.11    chopps 
    975  1.11    chopps 				DPRINTF(("\ttag ansiident %s\n", idstr));
    976  1.11    chopps 
    977   1.9  drochner 				if (idstr[0] == '\0') {
    978   1.9  drochner 					/* disabled device */
    979   1.9  drochner 					free(idstr, M_DEVBUF);
    980   1.9  drochner 					break;
    981   1.9  drochner 				}
    982   1.1  drochner 				r->longname = idstr;
    983   1.7  drochner 				break;
    984  1.11    chopps 			}
    985  1.11    chopps 			case ISAPNP_TAG_MEM32_RANGE_DESC: {
    986  1.11    chopps 				const struct pnpmem32rangeres *res = start;
    987  1.11    chopps 				if (len != sizeof(*res) - 3) {
    988  1.57       uwe 					aprint_normal("pnp_scan: bad mem32 desc\n");
    989   1.7  drochner 					return (-1);
    990   1.7  drochner 				}
    991   1.7  drochner 
    992   1.7  drochner 				mem = malloc(sizeof(struct pnp_mem),
    993   1.7  drochner 					     M_DEVBUF, M_WAITOK);
    994  1.11    chopps 				mem->flags = res->r_flags;
    995  1.11    chopps 				mem->minbase = res->r_minbase;
    996  1.11    chopps 				mem->maxbase = res->r_maxbase;
    997  1.11    chopps 				mem->align = res->r_align;
    998  1.11    chopps 				mem->len = res->r_len;
    999  1.11    chopps 				DPRINTF(("\ttag mem32range "));
   1000   1.8  drochner 				goto gotmem;
   1001  1.11    chopps 			}
   1002  1.11    chopps 			case ISAPNP_TAG_FIXED_MEM32_RANGE_DESC: {
   1003  1.11    chopps 				const struct pnpfixedmem32rangeres *res = start;
   1004  1.11    chopps 				if (len != sizeof(*res) - 3) {
   1005  1.57       uwe 					aprint_normal("pnp_scan: bad mem32 desc\n");
   1006   1.1  drochner 					return (-1);
   1007   1.1  drochner 				}
   1008   1.1  drochner 
   1009   1.1  drochner 				mem = malloc(sizeof(struct pnp_mem),
   1010   1.1  drochner 					     M_DEVBUF, M_WAITOK);
   1011  1.11    chopps 				mem->flags = res->r_flags;
   1012  1.11    chopps 				mem->minbase = res->r_base;
   1013   1.1  drochner 				mem->maxbase = mem->minbase;
   1014   1.1  drochner 				mem->align = 0;
   1015  1.11    chopps 				mem->len = res->r_len;
   1016  1.11    chopps 				DPRINTF(("\ttag fixedmem32range "));
   1017  1.57       uwe 			gotmem:
   1018   1.8  drochner 				if (mem->len == 0) { /* disabled */
   1019  1.11    chopps 					DPRINTF(("zeroed\n"));
   1020   1.8  drochner 					free(mem, M_DEVBUF);
   1021   1.8  drochner 					break;
   1022   1.8  drochner 				}
   1023   1.8  drochner 				SIMPLEQ_INSERT_TAIL(&r->mem, mem, next);
   1024   1.8  drochner 				r->nummem++;
   1025  1.11    chopps 
   1026  1.11    chopps 				DPRINTF(("flags %02x min %08x max %08x "
   1027  1.11    chopps 				    "align %08x len %08x\n", mem->flags,
   1028  1.11    chopps 				    mem->minbase, mem->maxbase, mem->align,
   1029  1.11    chopps 				    mem->len));
   1030  1.11    chopps 
   1031   1.1  drochner 				break;
   1032  1.11    chopps 			}
   1033  1.11    chopps 			case ISAPNP_TAG_UNICODE_IDENT_STRING:
   1034  1.11    chopps 			case ISAPNP_TAG_VENDOR_DEFINED:
   1035   1.1  drochner 			default:
   1036  1.11    chopps #ifdef PNPBIOSDEBUG
   1037  1.11    chopps 				pnp_debugdump(r, start, len);
   1038  1.11    chopps #endif
   1039  1.11    chopps 				break;
   1040   1.1  drochner 			}
   1041   1.1  drochner 		} else {
   1042   1.1  drochner 			type = (tag >> 3) & 0x0f;
   1043   1.1  drochner 			len = tag & 0x07;
   1044  1.11    chopps 			p += 1 + len;
   1045   1.1  drochner 
   1046   1.1  drochner 			if (type == 0 ||
   1047   1.1  drochner 			    len < smallrescs[type - 1].minlen ||
   1048   1.1  drochner 			    len > smallrescs[type - 1].maxlen) {
   1049  1.57       uwe 				aprint_normal("pnp_scan: bad small resource\n");
   1050   1.1  drochner 				return (-1);
   1051   1.1  drochner 			}
   1052  1.11    chopps 			if (type == ISAPNP_TAG_END) {
   1053  1.11    chopps #ifdef PNPBIOSDEBUG
   1054  1.11    chopps 				const struct pnpendres *res = start;
   1055  1.11    chopps #endif
   1056   1.1  drochner 				if (in_depends) {
   1057  1.11    chopps 					/*
   1058  1.11    chopps 					 * this seems to occur and is
   1059  1.11    chopps 					 * an optimization to not require
   1060  1.11    chopps 					 * the end dep in a depend
   1061  1.11    chopps 					 * that ends the section
   1062  1.11    chopps 					 */
   1063  1.11    chopps 					p -= 1 + len;
   1064   1.1  drochner 				}
   1065  1.11    chopps 				DPRINTF(("\ttag end cksum %02x\n",
   1066  1.11    chopps 				    res->r_cksum));
   1067   1.1  drochner 				break;
   1068   1.1  drochner 			}
   1069  1.11    chopps 			if (type == ISAPNP_TAG_DEP_START) {
   1070  1.11    chopps #ifdef PNPBIOSDEBUG
   1071  1.11    chopps 				const struct pnpdepstartres *res = start;
   1072  1.11    chopps #endif
   1073   1.1  drochner 				struct pnpresources *new, *last;
   1074  1.11    chopps 				int rv;
   1075  1.11    chopps 
   1076  1.11    chopps 				DPRINTF(("\ttag startdep flags %02x\n",
   1077  1.11    chopps 				    len ? res->r_pri : ISAPNP_DEP_ACCEPTABLE));
   1078   1.1  drochner 
   1079   1.1  drochner 				if (r->dependant_link) {
   1080  1.57       uwe 					aprint_normal("second dep?\n");
   1081   1.1  drochner 					return (-1);
   1082   1.1  drochner 				}
   1083  1.11    chopps 				/* XXX not sure about this */
   1084   1.1  drochner 				if (in_depends) {
   1085   1.1  drochner 					*bufp = p;
   1086   1.1  drochner 					return (1);
   1087   1.1  drochner 				}
   1088   1.1  drochner 				last = r;
   1089   1.1  drochner 				do {
   1090   1.1  drochner 					new = malloc(sizeof(*new),
   1091   1.1  drochner 						     M_DEVBUF, M_NOWAIT);
   1092   1.1  drochner 
   1093  1.11    chopps 					rv = pnp_scan(&p, maxlen - (p - *bufp),
   1094   1.1  drochner 						       new, 1);
   1095  1.11    chopps 					if (rv < 0) {
   1096  1.57       uwe 						aprint_normal("error in"
   1097  1.57       uwe 						    " dependant function\n");
   1098   1.1  drochner 						free(new, M_DEVBUF);
   1099   1.1  drochner 						return (-1);
   1100   1.1  drochner 					}
   1101   1.1  drochner 					last->dependant_link = new;
   1102   1.1  drochner 					last = new;
   1103  1.11    chopps 				} while (rv > 0);
   1104   1.1  drochner 				continue;
   1105   1.1  drochner 			}
   1106  1.11    chopps 			if (type == ISAPNP_TAG_DEP_END) {
   1107  1.11    chopps 				DPRINTF(("\ttag enddep\n"));
   1108   1.1  drochner 				if (!in_depends) {
   1109  1.57       uwe 					aprint_normal("tag %d end dep?\n", tag);
   1110   1.1  drochner 					return (-1);
   1111   1.1  drochner 				}
   1112   1.1  drochner 				break;
   1113   1.1  drochner 			}
   1114  1.11    chopps 			if (!smallrescs[type - 1].handler) {
   1115  1.11    chopps #ifdef PNPBIOSDEBUG
   1116  1.11    chopps 				pnp_debugdump(r, start, len);
   1117  1.11    chopps #endif
   1118  1.11    chopps 			} else if (
   1119  1.11    chopps 			    (*smallrescs[type - 1].handler)(r, start, len))
   1120  1.11    chopps 				return (-1);
   1121   1.1  drochner 		}
   1122   1.1  drochner 	}
   1123   1.1  drochner 	*bufp = p;
   1124   1.1  drochner 	return (0);
   1125   1.1  drochner }
   1126   1.1  drochner 
   1127  1.16     jhawk static int
   1128  1.45     perry pnp_newirq(struct pnpresources *r, const void *vres, size_t len)
   1129   1.1  drochner {
   1130  1.11    chopps 	const struct pnpirqres *res;
   1131   1.1  drochner 	struct pnp_irq *irq;
   1132   1.1  drochner 
   1133  1.11    chopps 	res = vres;
   1134  1.11    chopps 	if (res->r_mask == 0) { /* disabled */
   1135  1.11    chopps 		DPRINTF(("\ttag irq zeroed\n"));
   1136   1.8  drochner 		return (0);
   1137   1.8  drochner 	}
   1138   1.1  drochner 	irq = malloc(sizeof(struct pnp_irq), M_DEVBUF, M_NOWAIT);
   1139  1.11    chopps 	irq->mask = res->r_mask;
   1140   1.1  drochner 	if (len > 2)
   1141  1.11    chopps 		irq->flags = res->r_info;
   1142   1.1  drochner 	else
   1143   1.1  drochner 		irq->flags = 0x01;
   1144   1.1  drochner 	SIMPLEQ_INSERT_TAIL(&r->irq, irq, next);
   1145   1.1  drochner 	r->numirq++;
   1146  1.11    chopps 
   1147  1.11    chopps 	DPRINTF(("\ttag irq flags %02x mask %04x\n", irq->flags,irq->mask));
   1148  1.11    chopps 
   1149   1.1  drochner 	return (0);
   1150   1.1  drochner }
   1151   1.1  drochner 
   1152  1.16     jhawk static int
   1153  1.55  christos pnp_newdma(struct pnpresources *r, const void *vres, size_t len)
   1154   1.1  drochner {
   1155  1.11    chopps 	const struct pnpdmares *res;
   1156   1.1  drochner 	struct pnp_dma *dma;
   1157   1.1  drochner 
   1158  1.11    chopps 	res = vres;
   1159  1.11    chopps 	if (res->r_mask == 0) { /* disabled */
   1160  1.37       wiz 		DPRINTF(("\ttag DMA zeroed\n"));
   1161   1.8  drochner 		return (0);
   1162   1.8  drochner 	}
   1163   1.1  drochner 	dma = malloc(sizeof(struct pnp_dma), M_DEVBUF, M_NOWAIT);
   1164  1.11    chopps 	dma->mask = res->r_mask;
   1165  1.11    chopps 	dma->flags = res->r_flags;
   1166   1.1  drochner 	SIMPLEQ_INSERT_TAIL(&r->dma, dma, next);
   1167   1.1  drochner 	r->numdma++;
   1168  1.11    chopps 
   1169  1.37       wiz 	DPRINTF(("\ttag DMA flags %02x mask %02x\n", dma->flags,dma->mask));
   1170  1.11    chopps 
   1171   1.1  drochner 	return (0);
   1172   1.1  drochner }
   1173   1.1  drochner 
   1174  1.16     jhawk static int
   1175  1.55  christos pnp_newioport(struct pnpresources *r, const void *vres, size_t len)
   1176   1.1  drochner {
   1177  1.11    chopps 	const struct pnpportres *res;
   1178   1.1  drochner 	struct pnp_io *io;
   1179   1.1  drochner 
   1180  1.11    chopps 	res = vres;
   1181  1.11    chopps 	if (res->r_len == 0) { /* disabled */
   1182  1.11    chopps 		DPRINTF(("\ttag io zeroed\n"));
   1183   1.8  drochner 		return (0);
   1184   1.8  drochner 	}
   1185   1.1  drochner 	io = malloc(sizeof(struct pnp_io), M_DEVBUF, M_NOWAIT);
   1186  1.11    chopps 	io->flags = res->r_flags;
   1187  1.11    chopps 	io->minbase = res->r_minbase;
   1188  1.11    chopps 	io->maxbase = res->r_maxbase;
   1189  1.11    chopps 	io->align = res->r_align;
   1190  1.11    chopps 	io->len = res->r_len;
   1191   1.8  drochner 	SIMPLEQ_INSERT_TAIL(&r->io, io, next);
   1192   1.8  drochner 	r->numio++;
   1193  1.11    chopps 
   1194  1.11    chopps 	DPRINTF(("\ttag io flags %02x min %04x max %04x align "
   1195  1.11    chopps 	    "0x%02x len 0x%02x\n", io->flags, io->minbase, io->maxbase,
   1196  1.11    chopps 	    io->align, io->len));
   1197  1.11    chopps 
   1198   1.8  drochner 	return (0);
   1199   1.8  drochner }
   1200   1.8  drochner 
   1201  1.16     jhawk static int
   1202  1.54  christos pnp_newfixedioport(struct pnpresources *r, const void *vres,
   1203  1.55  christos     size_t len)
   1204   1.8  drochner {
   1205  1.11    chopps 	const struct pnpfixedportres *res;
   1206   1.8  drochner 	struct pnp_io *io;
   1207   1.8  drochner 
   1208  1.11    chopps 	res = vres;
   1209  1.11    chopps 	if (res->r_len == 0) { /* disabled */
   1210  1.11    chopps 		DPRINTF(("\ttag fixedio zeroed\n"));
   1211   1.8  drochner 		return (0);
   1212   1.8  drochner 	}
   1213   1.8  drochner 	io = malloc(sizeof(struct pnp_io), M_DEVBUF, M_NOWAIT);
   1214   1.8  drochner 	io->flags = 1; /* 10 bit decoding */
   1215  1.11    chopps 	io->minbase = io->maxbase = res->r_base;
   1216   1.8  drochner 	io->align = 1;
   1217  1.11    chopps 	io->len = res->r_len;
   1218   1.1  drochner 	SIMPLEQ_INSERT_TAIL(&r->io, io, next);
   1219   1.1  drochner 	r->numio++;
   1220  1.11    chopps 
   1221  1.11    chopps 	DPRINTF(("\ttag fixedio flags %02x base %04x align %02x len %02x\n",
   1222  1.11    chopps 	    io->flags, io->minbase, io->align, io->len));
   1223  1.11    chopps 
   1224   1.1  drochner 	return (0);
   1225   1.1  drochner }
   1226   1.1  drochner 
   1227  1.16     jhawk static int
   1228  1.55  christos pnp_compatid(struct pnpresources *r, const void *vres, size_t len)
   1229   1.1  drochner {
   1230  1.11    chopps 	const struct pnpcompatres *res;
   1231   1.1  drochner 	struct pnp_compatid *id;
   1232   1.1  drochner 
   1233  1.11    chopps 	res = vres;
   1234   1.1  drochner 	id = malloc(sizeof(*id), M_DEVBUF, M_NOWAIT);
   1235  1.11    chopps 	pnpbios_id_to_string(res->r_id, id->idstr);
   1236   1.1  drochner 	id->next = r->compatids;
   1237   1.1  drochner 	r->compatids = id;
   1238  1.11    chopps 
   1239  1.11    chopps 	DPRINTF(("\ttag compatid %s\n", id->idstr));
   1240  1.11    chopps 
   1241  1.11    chopps 	return (0);
   1242  1.11    chopps }
   1243  1.11    chopps 
   1244  1.11    chopps #ifdef PNPBIOSDEBUG
   1245  1.16     jhawk static int
   1246  1.55  christos pnp_debugdump(struct pnpresources *r, const void *vres, size_t len)
   1247  1.11    chopps {
   1248  1.53     perry 	const uint8_t *res = vres;
   1249  1.11    chopps 	int type, i;
   1250  1.11    chopps 
   1251  1.11    chopps 	if (res[0] & ISAPNP_LARGE_TAG) {
   1252  1.11    chopps 		type = res[0] & 0x7f;
   1253  1.57       uwe 		aprint_normal("\tTAG %02x len %04x %s",
   1254  1.57       uwe 			      type, len, len ? "data" : "");
   1255  1.11    chopps 		i = 3;
   1256  1.11    chopps 	} else {
   1257  1.11    chopps 		type = (res[0] >> 3) & 0x0f;
   1258  1.57       uwe 		aprint_normal("\tTAG %02x len %02x %s",
   1259  1.57       uwe 			      type, len, len ? "data" : "");
   1260  1.11    chopps 		i = 1;
   1261  1.11    chopps 	}
   1262  1.11    chopps 	for (; i < len; i++)
   1263  1.57       uwe 		aprint_normal(" %02x", res[i]);
   1264  1.57       uwe 	aprint_normal("\n");
   1265  1.11    chopps 
   1266   1.1  drochner 	return (0);
   1267   1.1  drochner }
   1268  1.11    chopps #endif
   1269   1.1  drochner 
   1270   1.1  drochner int
   1271  1.55  christos pnpbios_io_map(pnpbios_tag_t pbt, struct pnpresources *resc,
   1272  1.45     perry     int idx, bus_space_tag_t *tagp, bus_space_handle_t *hdlp)
   1273   1.1  drochner {
   1274   1.1  drochner 	struct pnp_io *io;
   1275   1.1  drochner 
   1276   1.1  drochner 	if (idx >= resc->numio)
   1277   1.1  drochner 		return (EINVAL);
   1278   1.1  drochner 
   1279   1.1  drochner 	io = SIMPLEQ_FIRST(&resc->io);
   1280   1.1  drochner 	while (idx--)
   1281   1.1  drochner 		io = SIMPLEQ_NEXT(io, next);
   1282   1.1  drochner 
   1283  1.35      fvdl 	*tagp = X86_BUS_SPACE_IO;
   1284  1.60        ad 	return (bus_space_map(X86_BUS_SPACE_IO, io->minbase, io->len,
   1285   1.1  drochner 			       0, hdlp));
   1286  1.12      groo }
   1287  1.12      groo 
   1288  1.12      groo void
   1289  1.55  christos pnpbios_io_unmap(pnpbios_tag_t pbt, struct pnpresources *resc,
   1290  1.45     perry     int idx, bus_space_tag_t tag, bus_space_handle_t hdl)
   1291  1.12      groo {
   1292  1.12      groo 	struct pnp_io *io;
   1293  1.12      groo 
   1294  1.12      groo 	if (idx >= resc->numio)
   1295  1.12      groo 		return;
   1296  1.12      groo 
   1297  1.12      groo 	io = SIMPLEQ_FIRST(&resc->io);
   1298  1.12      groo 	while (idx--)
   1299  1.12      groo 		io = SIMPLEQ_NEXT(io, next);
   1300  1.12      groo 
   1301  1.60        ad 	bus_space_unmap(tag, hdl, io->len);
   1302   1.1  drochner }
   1303   1.1  drochner 
   1304   1.1  drochner int
   1305  1.55  christos pnpbios_getiobase(pnpbios_tag_t pbt, struct pnpresources *resc,
   1306  1.45     perry     int idx, bus_space_tag_t *tagp, int *basep)
   1307   1.1  drochner {
   1308   1.1  drochner 	struct pnp_io *io;
   1309   1.1  drochner 
   1310   1.1  drochner 	if (idx >= resc->numio)
   1311   1.1  drochner 		return (EINVAL);
   1312   1.1  drochner 
   1313   1.1  drochner 	io = SIMPLEQ_FIRST(&resc->io);
   1314   1.1  drochner 	while (idx--)
   1315   1.1  drochner 		io = SIMPLEQ_NEXT(io, next);
   1316   1.1  drochner 
   1317   1.1  drochner 	if (tagp)
   1318  1.35      fvdl 		*tagp = X86_BUS_SPACE_IO;
   1319   1.1  drochner 	if (basep)
   1320   1.1  drochner 		*basep = io->minbase;
   1321   1.1  drochner 	return (0);
   1322  1.21       jmc }
   1323  1.21       jmc 
   1324  1.21       jmc int
   1325  1.55  christos pnpbios_getiosize(pnpbios_tag_t pbt, struct pnpresources *resc,
   1326  1.45     perry     int idx, int *sizep)
   1327  1.21       jmc {
   1328  1.21       jmc         struct pnp_io *io;
   1329  1.21       jmc 
   1330  1.21       jmc         if (idx >= resc->numio)
   1331  1.21       jmc             return (EINVAL);
   1332  1.21       jmc 
   1333  1.21       jmc         io = SIMPLEQ_FIRST(&resc->io);
   1334  1.21       jmc         while (idx--)
   1335  1.21       jmc                 io = SIMPLEQ_NEXT(io, next);
   1336  1.21       jmc         if (sizep)
   1337  1.21       jmc                 *sizep = io->len;
   1338  1.21       jmc         return (0);
   1339   1.1  drochner }
   1340   1.1  drochner 
   1341   1.1  drochner void *
   1342  1.55  christos pnpbios_intr_establish(pnpbios_tag_t pbt, struct pnpresources *resc,
   1343  1.45     perry     int idx, int level, int (*fcn)(void *), void *arg)
   1344   1.1  drochner {
   1345   1.1  drochner 	struct pnp_irq *irq;
   1346   1.1  drochner 	int irqnum, type;
   1347   1.1  drochner 
   1348   1.1  drochner 	if (idx >= resc->numirq)
   1349   1.1  drochner 		return (0);
   1350   1.1  drochner 
   1351   1.1  drochner 	irq = SIMPLEQ_FIRST(&resc->irq);
   1352   1.1  drochner 	while (idx--)
   1353   1.1  drochner 		irq = SIMPLEQ_NEXT(irq, next);
   1354   1.1  drochner 
   1355   1.1  drochner 	irqnum = ffs(irq->mask) - 1;
   1356   1.1  drochner 	type = (irq->flags & 0x0c) ? IST_LEVEL : IST_EDGE;
   1357   1.1  drochner 
   1358   1.1  drochner 	return (isa_intr_establish(0, irqnum, type, level, fcn, arg));
   1359   1.1  drochner }
   1360   1.1  drochner 
   1361   1.1  drochner int
   1362  1.55  christos pnpbios_getirqnum(pnpbios_tag_t pbt, struct pnpresources *resc,
   1363  1.45     perry     int idx, int *irqp, int *istp)
   1364   1.1  drochner {
   1365   1.1  drochner 	struct pnp_irq *irq;
   1366   1.1  drochner 
   1367   1.1  drochner 	if (idx >= resc->numirq)
   1368   1.1  drochner 		return (EINVAL);
   1369   1.1  drochner 
   1370   1.1  drochner 	irq = SIMPLEQ_FIRST(&resc->irq);
   1371   1.1  drochner 	while (idx--)
   1372   1.1  drochner 		irq = SIMPLEQ_NEXT(irq, next);
   1373   1.1  drochner 
   1374  1.13   thorpej 	if (irqp != NULL)
   1375  1.13   thorpej 		*irqp = ffs(irq->mask) - 1;
   1376  1.13   thorpej 	if (istp != NULL)
   1377  1.13   thorpej 		*istp = (irq->flags & 0x0c) ? IST_LEVEL : IST_EDGE;
   1378   1.1  drochner 	return (0);
   1379   1.1  drochner }
   1380   1.1  drochner 
   1381   1.1  drochner int
   1382  1.55  christos pnpbios_getdmachan(pnpbios_tag_t pbt, struct pnpresources *resc,
   1383  1.45     perry     int idx, int *chanp)
   1384   1.1  drochner {
   1385   1.1  drochner 	struct pnp_dma *dma;
   1386   1.1  drochner 
   1387   1.1  drochner 	if (idx >= resc->numdma)
   1388   1.1  drochner 		return (EINVAL);
   1389   1.1  drochner 
   1390   1.1  drochner 	dma = SIMPLEQ_FIRST(&resc->dma);
   1391   1.1  drochner 	while (idx--)
   1392   1.1  drochner 		dma = SIMPLEQ_NEXT(dma, next);
   1393   1.1  drochner 
   1394   1.1  drochner 	*chanp = ffs(dma->mask) - 1;
   1395   1.1  drochner 	return (0);
   1396   1.1  drochner }
   1397  1.11    chopps 
   1398  1.11    chopps #ifdef PNPBIOSEVENTS
   1399  1.16     jhawk static void
   1400  1.45     perry pnpbios_event_thread(void *arg)
   1401  1.11    chopps {
   1402  1.11    chopps 	struct pnpbios_softc *sc;
   1403  1.53     perry 	uint16_t event;
   1404  1.11    chopps 	u_int evflag;
   1405  1.11    chopps 	int rv, poll;
   1406  1.11    chopps 
   1407  1.11    chopps 	sc = arg;
   1408  1.11    chopps 	if ((sc->sc_control & PNP_IC_CONTORL_EVENT_MASK)
   1409  1.11    chopps 	    != PNP_IC_CONTROL_EVENT_POLL)
   1410  1.11    chopps 		poll = 0;
   1411  1.11    chopps 	else {
   1412  1.11    chopps 		poll = hz;
   1413  1.11    chopps 		rv = pnpbios_sendmessage(PNP_CM_PNP_OS_ACTIVE);
   1414  1.14   thorpej 		EDPRINTF(("pnpbios: os active returns 0x%02x\n", rv));
   1415  1.11    chopps 	}
   1416  1.11    chopps 
   1417  1.11    chopps 	config_pending_decr();
   1418  1.11    chopps 
   1419  1.11    chopps 	goto start;
   1420  1.11    chopps 	while (sc->sc_threadrun) {
   1421  1.11    chopps 		/* maybe we have an event */
   1422  1.11    chopps 		if (!poll)
   1423  1.11    chopps 			(void)tsleep(pnpbios_event_thread, PWAIT,
   1424  1.11    chopps 			    "pnpbiosevent", 0);
   1425  1.11    chopps 		else if (((evflag = *sc->sc_evaddr) & 0x01) == 0) {
   1426  1.11    chopps 			if (evflag)
   1427  1.14   thorpej 				EDPRINTF(("pnpbios: evflags 0x%02x\n", evflag));
   1428  1.11    chopps 			(void)tsleep(pnpbios_event_thread, PWAIT,
   1429  1.11    chopps 			    "pnpbiosevent", poll);
   1430  1.11    chopps 			continue;
   1431  1.11    chopps 		} else {
   1432  1.14   thorpej 			EDPRINTF(("pnpbios: evflags 0x%02x\n", evflag));
   1433  1.11    chopps 		}
   1434  1.11    chopps start:
   1435  1.11    chopps 		if ((rv = pnpbios_getevent(&event))) {
   1436  1.14   thorpej 			EDPRINTF(("pnpbios: getevent rc: 0x%02x\n", rv));
   1437  1.11    chopps #ifdef DIAGNOSTIC
   1438  1.11    chopps 			if (rv != PNP_RC_EVENTS_NOT_PENDING)
   1439  1.14   thorpej 				printf("%s: getevent failed: %d\n",
   1440  1.63     joerg 				    device_xname(sc->sc_dev), rv);
   1441  1.11    chopps #endif
   1442  1.11    chopps 			continue;
   1443  1.11    chopps 		}
   1444  1.11    chopps 		switch (event) {
   1445  1.11    chopps 		case PNP_EID_ABOUT_TO_CHANGE_CONFIG:
   1446  1.14   thorpej 			EDPRINTF(("pnpbios: about to change event\n"));
   1447  1.15   thorpej 			/*
   1448  1.15   thorpej 			 * The system is about to be docked or undocked.
   1449  1.15   thorpej 			 * Acknowledge the event, so that the procedure
   1450  1.15   thorpej 			 * can continue.
   1451  1.15   thorpej 			 * XXX When should we ever send an ABORT?
   1452  1.15   thorpej 			 */
   1453  1.15   thorpej 			pnpbios_sendmessage(PNP_RM_OK);
   1454  1.11    chopps 			break;
   1455  1.11    chopps 		case PNP_EID_DOCK_CHANGED:
   1456  1.15   thorpej 		    {
   1457  1.15   thorpej 			int odocked;
   1458  1.15   thorpej 
   1459  1.14   thorpej 			EDPRINTF(("pnpbios: dock changed event\n"));
   1460  1.15   thorpej 
   1461  1.15   thorpej 			odocked = pnpbios_update_dock_status(sc);
   1462  1.15   thorpej 			if (odocked == sc->sc_docked)
   1463  1.15   thorpej 				break;
   1464  1.15   thorpej 			switch (sc->sc_docked) {
   1465  1.15   thorpej 			case 0:
   1466  1.15   thorpej 				/* We have been undocked. */
   1467  1.15   thorpej 				/* XXX detach devices XXX */
   1468  1.15   thorpej 				break;
   1469  1.15   thorpej 
   1470  1.15   thorpej 			case 1:
   1471  1.15   thorpej 				/* We have been docked. */
   1472  1.15   thorpej 				/* XXX attach devices XXX */
   1473  1.15   thorpej 				break;
   1474  1.15   thorpej 
   1475  1.15   thorpej 			default:
   1476  1.15   thorpej 				/* getdockinfo failed! */
   1477  1.15   thorpej 				printf("%s: dock changed event, but unable "
   1478  1.15   thorpej 				    "to get dock info; event ignored\n",
   1479  1.63     joerg 				    device_xname(sc->sc_dev));
   1480  1.15   thorpej 			}
   1481  1.11    chopps 			break;
   1482  1.15   thorpej 		    }
   1483  1.11    chopps 		case PNP_EID_SYSTEM_DEVICE_CHANGED:
   1484  1.14   thorpej 			EDPRINTF(("pnpbios: system device changed event\n"));
   1485  1.11    chopps 			break;
   1486  1.11    chopps 		case PNP_EID_CONFIG_CHANGE_FAILED:
   1487  1.14   thorpej 			EDPRINTF(("pnpbios: config changed event\n"));
   1488  1.11    chopps 			break;
   1489  1.11    chopps 		case PNP_EID_UNKNOWN_SYSTEM_EVENT:
   1490  1.11    chopps #ifdef DIAGNOSTIC
   1491  1.14   thorpej 			printf("%s: \"unknown system event\"\n",
   1492  1.63     joerg 			    device_xname(sc->sc_dev));
   1493  1.11    chopps #endif
   1494  1.11    chopps 			break;
   1495  1.11    chopps 		default:
   1496  1.11    chopps #ifdef DIAGNOSTIC
   1497  1.11    chopps 			if (event & PNP_EID_OEM_DEFINED_BIT)
   1498  1.14   thorpej 				printf("%s: vendor defined event 0x%04x\n",
   1499  1.63     joerg 				    device_xname(sc->sc_dev), event);
   1500  1.11    chopps 			else
   1501  1.34       wiz 				printf("%s: unknown event 0x%04x\n",
   1502  1.63     joerg 				    device_xname(sc->sc_dev), event);
   1503  1.11    chopps #endif
   1504  1.11    chopps 			break;
   1505  1.11    chopps 		}
   1506  1.11    chopps 	}
   1507  1.11    chopps 
   1508  1.11    chopps 	pnpbios_sendmessage(PNP_CM_PNP_OS_INACTIVE);
   1509  1.11    chopps 	kthread_exit(0);
   1510  1.11    chopps }
   1511  1.11    chopps #endif	/* PNPBIOSEVENTS */
   1512