Home | History | Annotate | Line # | Download | only in pci
piixpm.c revision 1.60
      1 /* $NetBSD: piixpm.c,v 1.60 2019/12/24 06:27:17 thorpej Exp $ */
      2 /*	$OpenBSD: piixpm.c,v 1.39 2013/10/01 20:06:02 sf Exp $	*/
      3 
      4 /*
      5  * Copyright (c) 2005, 2006 Alexander Yurchenko <grange (at) openbsd.org>
      6  *
      7  * Permission to use, copy, modify, and distribute this software for any
      8  * purpose with or without fee is hereby granted, provided that the above
      9  * copyright notice and this permission notice appear in all copies.
     10  *
     11  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
     12  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
     13  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
     14  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
     15  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
     16  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
     17  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
     18  */
     19 
     20 /*
     21  * Intel PIIX and compatible Power Management controller driver.
     22  */
     23 
     24 #include <sys/cdefs.h>
     25 __KERNEL_RCSID(0, "$NetBSD: piixpm.c,v 1.60 2019/12/24 06:27:17 thorpej Exp $");
     26 
     27 #include <sys/param.h>
     28 #include <sys/systm.h>
     29 #include <sys/device.h>
     30 #include <sys/kernel.h>
     31 #include <sys/mutex.h>
     32 #include <sys/condvar.h>
     33 #include <sys/proc.h>
     34 
     35 #include <sys/bus.h>
     36 
     37 #include <dev/pci/pcidevs.h>
     38 #include <dev/pci/pcireg.h>
     39 #include <dev/pci/pcivar.h>
     40 
     41 #include <dev/pci/piixpmreg.h>
     42 
     43 #include <dev/i2c/i2cvar.h>
     44 
     45 #include <dev/ic/acpipmtimer.h>
     46 
     47 #ifdef PIIXPM_DEBUG
     48 #define DPRINTF(x) printf x
     49 #else
     50 #define DPRINTF(x)
     51 #endif
     52 
     53 #define PIIXPM_IS_CSB5(sc)						      \
     54 	(PCI_VENDOR((sc)->sc_id) == PCI_VENDOR_SERVERWORKS &&		      \
     55 	PCI_PRODUCT((sc)->sc_id) == PCI_PRODUCT_SERVERWORKS_CSB5)
     56 #define PIIXPM_DELAY	200
     57 #define PIIXPM_TIMEOUT	1
     58 
     59 #define PIIXPM_IS_SB800GRP(sc)						      \
     60 	((PCI_VENDOR((sc)->sc_id) == PCI_VENDOR_ATI) &&			      \
     61 	    ((PCI_PRODUCT((sc)->sc_id) == PCI_PRODUCT_ATI_SB600_SMB) &&	      \
     62 		((sc)->sc_rev >= 0x40)))
     63 
     64 #define PIIXPM_IS_HUDSON(sc)						      \
     65 	((PCI_VENDOR((sc)->sc_id) == PCI_VENDOR_AMD) &&			      \
     66 	    (PCI_PRODUCT((sc)->sc_id) == PCI_PRODUCT_AMD_HUDSON_SMB))
     67 
     68 #define PIIXPM_IS_KERNCZ(sc)						      \
     69 	((PCI_VENDOR((sc)->sc_id) == PCI_VENDOR_AMD) &&			      \
     70 	    (PCI_PRODUCT((sc)->sc_id) == PCI_PRODUCT_AMD_KERNCZ_SMB))
     71 
     72 #define PIIXPM_IS_FCHGRP(sc)	(PIIXPM_IS_HUDSON(sc) || PIIXPM_IS_KERNCZ(sc))
     73 
     74 struct piixpm_smbus {
     75 	int			sda;
     76 	struct			piixpm_softc *softc;
     77 };
     78 
     79 struct piixpm_softc {
     80 	device_t		sc_dev;
     81 
     82 	bus_space_tag_t		sc_iot;
     83 #define	sc_pm_iot sc_iot
     84 #define sc_smb_iot sc_iot
     85 	bus_space_handle_t	sc_pm_ioh;
     86 	bus_space_handle_t	sc_sb800_ioh;
     87 	bus_space_handle_t	sc_smb_ioh;
     88 	void *			sc_smb_ih;
     89 	int			sc_poll;
     90 	bool			sc_sb800_selen; /* Use SMBUS0SEL */
     91 
     92 	pci_chipset_tag_t	sc_pc;
     93 	pcitag_t		sc_pcitag;
     94 	pcireg_t		sc_id;
     95 	pcireg_t		sc_rev;
     96 
     97 	int			sc_numbusses;
     98 	device_t		sc_i2c_device[4];
     99 	struct piixpm_smbus	sc_busses[4];
    100 	struct i2c_controller	sc_i2c_tags[4];
    101 
    102 	kmutex_t		sc_exec_lock;
    103 	kcondvar_t		sc_exec_wait;
    104 
    105 	struct {
    106 		i2c_op_t	op;
    107 		void *		buf;
    108 		size_t		len;
    109 		int		flags;
    110 		int             error;
    111 		bool            done;
    112 	}			sc_i2c_xfer;
    113 
    114 	pcireg_t		sc_devact[2];
    115 };
    116 
    117 static int	piixpm_match(device_t, cfdata_t, void *);
    118 static void	piixpm_attach(device_t, device_t, void *);
    119 static int	piixpm_rescan(device_t, const char *, const int *);
    120 static void	piixpm_chdet(device_t, device_t);
    121 
    122 static bool	piixpm_suspend(device_t, const pmf_qual_t *);
    123 static bool	piixpm_resume(device_t, const pmf_qual_t *);
    124 
    125 static int	piixpm_sb800_init(struct piixpm_softc *);
    126 static void	piixpm_csb5_reset(void *);
    127 static int	piixpm_i2c_acquire_bus(void *, int);
    128 static void	piixpm_i2c_release_bus(void *, int);
    129 static int	piixpm_i2c_exec(void *, i2c_op_t, i2c_addr_t, const void *,
    130     size_t, void *, size_t, int);
    131 
    132 static int	piixpm_intr(void *);
    133 
    134 CFATTACH_DECL3_NEW(piixpm, sizeof(struct piixpm_softc),
    135     piixpm_match, piixpm_attach, NULL, NULL, piixpm_rescan, piixpm_chdet, 0);
    136 
    137 static int
    138 piixpm_match(device_t parent, cfdata_t match, void *aux)
    139 {
    140 	struct pci_attach_args *pa;
    141 
    142 	pa = (struct pci_attach_args *)aux;
    143 	switch (PCI_VENDOR(pa->pa_id)) {
    144 	case PCI_VENDOR_INTEL:
    145 		switch (PCI_PRODUCT(pa->pa_id)) {
    146 		case PCI_PRODUCT_INTEL_82371AB_PMC:
    147 		case PCI_PRODUCT_INTEL_82440MX_PMC:
    148 			return 1;
    149 		}
    150 		break;
    151 	case PCI_VENDOR_ATI:
    152 		switch (PCI_PRODUCT(pa->pa_id)) {
    153 		case PCI_PRODUCT_ATI_SB200_SMB:
    154 		case PCI_PRODUCT_ATI_SB300_SMB:
    155 		case PCI_PRODUCT_ATI_SB400_SMB:
    156 		case PCI_PRODUCT_ATI_SB600_SMB:	/* matches SB600/SB700/SB800 */
    157 			return 1;
    158 		}
    159 		break;
    160 	case PCI_VENDOR_SERVERWORKS:
    161 		switch (PCI_PRODUCT(pa->pa_id)) {
    162 		case PCI_PRODUCT_SERVERWORKS_OSB4:
    163 		case PCI_PRODUCT_SERVERWORKS_CSB5:
    164 		case PCI_PRODUCT_SERVERWORKS_CSB6:
    165 		case PCI_PRODUCT_SERVERWORKS_HT1000SB:
    166 		case PCI_PRODUCT_SERVERWORKS_HT1100SB:
    167 			return 1;
    168 		}
    169 		break;
    170 	case PCI_VENDOR_AMD:
    171 		switch (PCI_PRODUCT(pa->pa_id)) {
    172 		case PCI_PRODUCT_AMD_HUDSON_SMB:
    173 		case PCI_PRODUCT_AMD_KERNCZ_SMB:
    174 			return 1;
    175 		}
    176 		break;
    177 	}
    178 
    179 	return 0;
    180 }
    181 
    182 static void
    183 piixpm_attach(device_t parent, device_t self, void *aux)
    184 {
    185 	struct piixpm_softc *sc = device_private(self);
    186 	struct pci_attach_args *pa = aux;
    187 	pcireg_t base, conf;
    188 	pcireg_t pmmisc;
    189 	pci_intr_handle_t ih;
    190 	bool usesmi = false;
    191 	const char *intrstr = NULL;
    192 	int i, flags;
    193 	char intrbuf[PCI_INTRSTR_LEN];
    194 
    195 	sc->sc_dev = self;
    196 	sc->sc_iot = pa->pa_iot;
    197 	sc->sc_id = pa->pa_id;
    198 	sc->sc_rev = PCI_REVISION(pa->pa_class);
    199 	sc->sc_pc = pa->pa_pc;
    200 	sc->sc_pcitag = pa->pa_tag;
    201 	sc->sc_numbusses = 1;
    202 
    203 	pci_aprint_devinfo(pa, NULL);
    204 
    205 	mutex_init(&sc->sc_exec_lock, MUTEX_DEFAULT, IPL_BIO);
    206 	cv_init(&sc->sc_exec_wait, device_xname(self));
    207 
    208 	if (!pmf_device_register(self, piixpm_suspend, piixpm_resume))
    209 		aprint_error_dev(self, "couldn't establish power handler\n");
    210 
    211 	if ((PCI_VENDOR(pa->pa_id) != PCI_VENDOR_INTEL) ||
    212 	    (PCI_PRODUCT(pa->pa_id) != PCI_PRODUCT_INTEL_82371AB_PMC))
    213 		goto nopowermanagement;
    214 
    215 	/* check whether I/O access to PM regs is enabled */
    216 	pmmisc = pci_conf_read(pa->pa_pc, pa->pa_tag, PIIX_PMREGMISC);
    217 	if (!(pmmisc & 1))
    218 		goto nopowermanagement;
    219 
    220 	/* Map I/O space */
    221 	base = pci_conf_read(pa->pa_pc, pa->pa_tag, PIIX_PM_BASE);
    222 	if (base == 0 || bus_space_map(sc->sc_pm_iot, PCI_MAPREG_IO_ADDR(base),
    223 	    PIIX_PM_SIZE, 0, &sc->sc_pm_ioh)) {
    224 		aprint_error_dev(self,
    225 		    "can't map power management I/O space\n");
    226 		goto nopowermanagement;
    227 	}
    228 
    229 	/*
    230 	 * Revision 0 and 1 are PIIX4, 2 is PIIX4E, 3 is PIIX4M.
    231 	 * PIIX4 and PIIX4E have a bug in the timer latch, see Errata #20
    232 	 * in the "Specification update" (document #297738).
    233 	 */
    234 	acpipmtimer_attach(self, sc->sc_pm_iot, sc->sc_pm_ioh, PIIX_PM_PMTMR,
    235 	    (PCI_REVISION(pa->pa_class) < 3) ? ACPIPMT_BADLATCH : 0);
    236 
    237 nopowermanagement:
    238 
    239 	/* SB800 rev 0x40+, AMD HUDSON and newer need special initialization */
    240 	if (PIIXPM_IS_FCHGRP(sc) || PIIXPM_IS_SB800GRP(sc)) {
    241 		if (piixpm_sb800_init(sc) == 0) {
    242 			/* Read configuration */
    243 			conf = bus_space_read_1(sc->sc_iot,
    244 			    sc->sc_smb_ioh, SB800_SMB_HOSTC);
    245 			usesmi = ((conf & SB800_SMB_HOSTC_IRQ) == 0);
    246 			goto setintr;
    247 		}
    248 		aprint_normal_dev(self, "SMBus initialization failed\n");
    249 		return;
    250 	}
    251 
    252 	/* Read configuration */
    253 	conf = pci_conf_read(pa->pa_pc, pa->pa_tag, PIIX_SMB_HOSTC);
    254 	DPRINTF(("%s: conf 0x%08x\n", device_xname(self), conf));
    255 
    256 	if ((conf & PIIX_SMB_HOSTC_HSTEN) == 0) {
    257 		aprint_normal_dev(self, "SMBus disabled\n");
    258 		return;
    259 	}
    260 	usesmi = (conf & PIIX_SMB_HOSTC_INTMASK) == PIIX_SMB_HOSTC_SMI;
    261 
    262 	/* Map I/O space */
    263 	base = pci_conf_read(pa->pa_pc, pa->pa_tag, PIIX_SMB_BASE) & 0xffff;
    264 	if (base == 0 ||
    265 	    bus_space_map(sc->sc_smb_iot, PCI_MAPREG_IO_ADDR(base),
    266 	    PIIX_SMB_SIZE, 0, &sc->sc_smb_ioh)) {
    267 		aprint_error_dev(self, "can't map smbus I/O space\n");
    268 		return;
    269 	}
    270 
    271 setintr:
    272 	sc->sc_poll = 1;
    273 	aprint_normal_dev(self, "");
    274 	if (usesmi) {
    275 		/* No PCI IRQ */
    276 		aprint_normal("interrupting at SMI, ");
    277 	} else {
    278 		if ((conf & PIIX_SMB_HOSTC_INTMASK) == PIIX_SMB_HOSTC_IRQ) {
    279 			/* Install interrupt handler */
    280 			if (pci_intr_map(pa, &ih) == 0) {
    281 				intrstr = pci_intr_string(pa->pa_pc, ih,
    282 				    intrbuf, sizeof(intrbuf));
    283 				pci_intr_setattr(pa->pa_pc, &ih,
    284 				    PCI_INTR_MPSAFE, true);
    285 				sc->sc_smb_ih = pci_intr_establish_xname(
    286 					pa->pa_pc, ih, IPL_BIO, piixpm_intr,
    287 					sc, device_xname(sc->sc_dev));
    288 				if (sc->sc_smb_ih != NULL) {
    289 					aprint_normal("interrupting at %s",
    290 					    intrstr);
    291 					sc->sc_poll = 0;
    292 				}
    293 			}
    294 		}
    295 		if (sc->sc_poll)
    296 			aprint_normal("polling");
    297 	}
    298 
    299 	aprint_normal("\n");
    300 
    301 	for (i = 0; i < sc->sc_numbusses; i++)
    302 		sc->sc_i2c_device[i] = NULL;
    303 
    304 	flags = 0;
    305 	piixpm_rescan(self, "i2cbus", &flags);
    306 }
    307 
    308 static int
    309 piixpm_iicbus_print(void *aux, const char *pnp)
    310 {
    311 	struct i2cbus_attach_args *iba = aux;
    312 	struct i2c_controller *tag = iba->iba_tag;
    313 	struct piixpm_smbus *bus = tag->ic_cookie;
    314 	struct piixpm_softc *sc = bus->softc;
    315 
    316 	iicbus_print(aux, pnp);
    317 	if (sc->sc_numbusses != 0)
    318 		aprint_normal(" port %d", bus->sda);
    319 
    320 	return UNCONF;
    321 }
    322 static int
    323 piixpm_rescan(device_t self, const char *ifattr, const int *flags)
    324 {
    325 	struct piixpm_softc *sc = device_private(self);
    326 	struct i2cbus_attach_args iba;
    327 	int i;
    328 
    329 	if (!ifattr_match(ifattr, "i2cbus"))
    330 		return 0;
    331 
    332 	/* Attach I2C bus */
    333 
    334 	for (i = 0; i < sc->sc_numbusses; i++) {
    335 		if (sc->sc_i2c_device[i])
    336 			continue;
    337 		sc->sc_busses[i].sda = i;
    338 		sc->sc_busses[i].softc = sc;
    339 		iic_tag_init(&sc->sc_i2c_tags[i]);
    340 		sc->sc_i2c_tags[i].ic_cookie = &sc->sc_busses[i];
    341 		sc->sc_i2c_tags[i].ic_acquire_bus = piixpm_i2c_acquire_bus;
    342 		sc->sc_i2c_tags[i].ic_release_bus = piixpm_i2c_release_bus;
    343 		sc->sc_i2c_tags[i].ic_exec = piixpm_i2c_exec;
    344 		memset(&iba, 0, sizeof(iba));
    345 		iba.iba_tag = &sc->sc_i2c_tags[i];
    346 		sc->sc_i2c_device[i] = config_found_ia(self, ifattr, &iba,
    347 		    piixpm_iicbus_print);
    348 	}
    349 
    350 	return 0;
    351 }
    352 
    353 static void
    354 piixpm_chdet(device_t self, device_t child)
    355 {
    356 	struct piixpm_softc *sc = device_private(self);
    357 	int i;
    358 
    359 	for (i = 0; i < sc->sc_numbusses; i++) {
    360 		if (sc->sc_i2c_device[i] == child) {
    361 			sc->sc_i2c_device[i] = NULL;
    362 			break;
    363 		}
    364 	}
    365 }
    366 
    367 
    368 static bool
    369 piixpm_suspend(device_t dv, const pmf_qual_t *qual)
    370 {
    371 	struct piixpm_softc *sc = device_private(dv);
    372 
    373 	sc->sc_devact[0] = pci_conf_read(sc->sc_pc, sc->sc_pcitag,
    374 	    PIIX_DEVACTA);
    375 	sc->sc_devact[1] = pci_conf_read(sc->sc_pc, sc->sc_pcitag,
    376 	    PIIX_DEVACTB);
    377 
    378 	return true;
    379 }
    380 
    381 static bool
    382 piixpm_resume(device_t dv, const pmf_qual_t *qual)
    383 {
    384 	struct piixpm_softc *sc = device_private(dv);
    385 
    386 	pci_conf_write(sc->sc_pc, sc->sc_pcitag, PIIX_DEVACTA,
    387 	    sc->sc_devact[0]);
    388 	pci_conf_write(sc->sc_pc, sc->sc_pcitag, PIIX_DEVACTB,
    389 	    sc->sc_devact[1]);
    390 
    391 	return true;
    392 }
    393 
    394 /*
    395  * Extract SMBus base address from SB800 Power Management (PM) registers.
    396  * The PM registers can be accessed either through indirect I/O (CD6/CD7) or
    397  * direct mapping if AcpiMMioDecodeEn is enabled. Since this function is only
    398  * called once it uses indirect I/O for simplicity.
    399  */
    400 static int
    401 piixpm_sb800_init(struct piixpm_softc *sc)
    402 {
    403 	bus_space_tag_t iot = sc->sc_iot;
    404 	bus_space_handle_t ioh;	/* indirect I/O handle */
    405 	uint16_t val, base_addr;
    406 	bool enabled;
    407 
    408 	if (PIIXPM_IS_KERNCZ(sc) ||
    409 	    (PIIXPM_IS_HUDSON(sc) && (sc->sc_rev >= 0x1f)))
    410 		sc->sc_numbusses = 2;
    411 	else
    412 		sc->sc_numbusses = 4;
    413 
    414 	/* Fetch SMB base address */
    415 	if (bus_space_map(iot,
    416 	    SB800_INDIRECTIO_BASE, SB800_INDIRECTIO_SIZE, 0, &ioh)) {
    417 		device_printf(sc->sc_dev, "couldn't map indirect I/O space\n");
    418 		return EBUSY;
    419 	}
    420 	if (PIIXPM_IS_FCHGRP(sc)) {
    421 		bus_space_write_1(iot, ioh, SB800_INDIRECTIO_INDEX,
    422 		    AMDFCH41_PM_DECODE_EN0);
    423 		val = bus_space_read_1(iot, ioh, SB800_INDIRECTIO_DATA);
    424 		enabled = val & AMDFCH41_SMBUS_EN;
    425 		if (!enabled)
    426 			return ENOENT;
    427 
    428 		bus_space_write_1(iot, ioh, SB800_INDIRECTIO_INDEX,
    429 		    AMDFCH41_PM_DECODE_EN1);
    430 		val = bus_space_read_1(iot, ioh, SB800_INDIRECTIO_DATA) << 8;
    431 		base_addr = val;
    432 	} else {
    433 		uint8_t data;
    434 
    435 		bus_space_write_1(iot, ioh, SB800_INDIRECTIO_INDEX,
    436 		    SB800_PM_SMBUS0EN_LO);
    437 		val = bus_space_read_1(iot, ioh, SB800_INDIRECTIO_DATA);
    438 		enabled = val & SB800_PM_SMBUS0EN_ENABLE;
    439 		if (!enabled)
    440 			return ENOENT;
    441 
    442 		bus_space_write_1(iot, ioh, SB800_INDIRECTIO_INDEX,
    443 		    SB800_PM_SMBUS0EN_HI);
    444 		val |= bus_space_read_1(iot, ioh, SB800_INDIRECTIO_DATA) << 8;
    445 		base_addr = val & SB800_PM_SMBUS0EN_BADDR;
    446 
    447 		bus_space_write_1(iot, ioh, SB800_INDIRECTIO_INDEX,
    448 		    SB800_PM_SMBUS0SELEN);
    449 		data = bus_space_read_1(iot, ioh, SB800_INDIRECTIO_DATA);
    450 		if ((data & SB800_PM_USE_SMBUS0SEL) != 0)
    451 			sc->sc_sb800_selen = true;
    452 	}
    453 
    454 	sc->sc_sb800_ioh = ioh;
    455 	aprint_debug_dev(sc->sc_dev, "SMBus @ 0x%04x\n", base_addr);
    456 
    457 	if (bus_space_map(iot, PCI_MAPREG_IO_ADDR(base_addr),
    458 	    SB800_SMB_SIZE, 0, &sc->sc_smb_ioh)) {
    459 		aprint_error_dev(sc->sc_dev, "can't map smbus I/O space\n");
    460 		return EBUSY;
    461 	}
    462 
    463 	return 0;
    464 }
    465 
    466 static void
    467 piixpm_csb5_reset(void *arg)
    468 {
    469 	struct piixpm_softc *sc = arg;
    470 	pcireg_t base, hostc, pmbase;
    471 
    472 	base = pci_conf_read(sc->sc_pc, sc->sc_pcitag, PIIX_SMB_BASE);
    473 	hostc = pci_conf_read(sc->sc_pc, sc->sc_pcitag, PIIX_SMB_HOSTC);
    474 
    475 	pmbase = pci_conf_read(sc->sc_pc, sc->sc_pcitag, PIIX_PM_BASE);
    476 	pmbase |= PIIX_PM_BASE_CSB5_RESET;
    477 	pci_conf_write(sc->sc_pc, sc->sc_pcitag, PIIX_PM_BASE, pmbase);
    478 	pmbase &= ~PIIX_PM_BASE_CSB5_RESET;
    479 	pci_conf_write(sc->sc_pc, sc->sc_pcitag, PIIX_PM_BASE, pmbase);
    480 
    481 	pci_conf_write(sc->sc_pc, sc->sc_pcitag, PIIX_SMB_BASE, base);
    482 	pci_conf_write(sc->sc_pc, sc->sc_pcitag, PIIX_SMB_HOSTC, hostc);
    483 
    484 	(void) tsleep(&sc, PRIBIO, "csb5reset", hz/2);
    485 }
    486 
    487 static int
    488 piixpm_i2c_acquire_bus(void *cookie, int flags)
    489 {
    490 	struct piixpm_smbus *smbus = cookie;
    491 	struct piixpm_softc *sc = smbus->softc;
    492 
    493 	if (PIIXPM_IS_KERNCZ(sc)) {
    494 		bus_space_write_1(sc->sc_iot, sc->sc_sb800_ioh,
    495 		    SB800_INDIRECTIO_INDEX, AMDFCH41_PM_PORT_INDEX);
    496 		bus_space_write_1(sc->sc_iot, sc->sc_sb800_ioh,
    497 		    SB800_INDIRECTIO_DATA, smbus->sda << 3);
    498 	} else if (PIIXPM_IS_SB800GRP(sc) || PIIXPM_IS_HUDSON(sc)) {
    499 		if (sc->sc_sb800_selen) {
    500 			bus_space_write_1(sc->sc_iot, sc->sc_sb800_ioh,
    501 			    SB800_INDIRECTIO_INDEX, SB800_PM_SMBUS0SEL);
    502 			bus_space_write_1(sc->sc_iot, sc->sc_sb800_ioh,
    503 			    SB800_INDIRECTIO_DATA,
    504 			    __SHIFTIN(smbus->sda, SB800_PM_SMBUS0_MASK_E));
    505 		} else {
    506 			uint8_t data;
    507 
    508 			bus_space_write_1(sc->sc_iot, sc->sc_sb800_ioh,
    509 			    SB800_INDIRECTIO_INDEX, SB800_PM_SMBUS0EN_LO);
    510 			data = bus_space_read_1(sc->sc_iot, sc->sc_sb800_ioh,
    511 			    SB800_INDIRECTIO_DATA) & ~SB800_PM_SMBUS0_MASK_C;
    512 			data |= __SHIFTIN(smbus->sda, SB800_PM_SMBUS0_MASK_C);
    513 			bus_space_write_1(sc->sc_iot, sc->sc_sb800_ioh,
    514 			    SB800_INDIRECTIO_DATA, data);
    515 		}
    516 	}
    517 
    518 	return 0;
    519 }
    520 
    521 static void
    522 piixpm_i2c_release_bus(void *cookie, int flags)
    523 {
    524 	struct piixpm_smbus *smbus = cookie;
    525 	struct piixpm_softc *sc = smbus->softc;
    526 
    527 	if (PIIXPM_IS_KERNCZ(sc)) {
    528 		bus_space_write_1(sc->sc_iot, sc->sc_sb800_ioh,
    529 		    SB800_INDIRECTIO_INDEX, AMDFCH41_PM_PORT_INDEX);
    530 		/* Set to port 0 */
    531 		bus_space_write_1(sc->sc_iot, sc->sc_sb800_ioh,
    532 		    SB800_INDIRECTIO_DATA, 0);
    533 	} else if (PIIXPM_IS_SB800GRP(sc) || PIIXPM_IS_HUDSON(sc)) {
    534 		if (sc->sc_sb800_selen) {
    535 			bus_space_write_1(sc->sc_iot, sc->sc_sb800_ioh,
    536 			    SB800_INDIRECTIO_INDEX, SB800_PM_SMBUS0SEL);
    537 
    538 			/* Set to port 0 */
    539 			bus_space_write_1(sc->sc_iot, sc->sc_sb800_ioh,
    540 			    SB800_INDIRECTIO_DATA, 0);
    541 		} else {
    542 			uint8_t data;
    543 
    544 			bus_space_write_1(sc->sc_iot, sc->sc_sb800_ioh,
    545 			    SB800_INDIRECTIO_INDEX, SB800_PM_SMBUS0EN_LO);
    546 
    547 			/* Set to port 0 */
    548 			data = bus_space_read_1(sc->sc_iot, sc->sc_sb800_ioh,
    549 			    SB800_INDIRECTIO_DATA) & ~SB800_PM_SMBUS0_MASK_C;
    550 			bus_space_write_1(sc->sc_iot, sc->sc_sb800_ioh,
    551 			    SB800_INDIRECTIO_DATA, data);
    552 		}
    553 	}
    554 }
    555 
    556 static int
    557 piixpm_i2c_exec(void *cookie, i2c_op_t op, i2c_addr_t addr,
    558     const void *cmdbuf, size_t cmdlen, void *buf, size_t len, int flags)
    559 {
    560 	struct piixpm_smbus *smbus = cookie;
    561 	struct piixpm_softc *sc = smbus->softc;
    562 	const uint8_t *b;
    563 	uint8_t ctl = 0, st;
    564 	int retries;
    565 
    566 	DPRINTF(("%s: exec: op %d, addr 0x%02x, cmdlen %zu, len %zu, "
    567 		"flags 0x%x\n",
    568 		device_xname(sc->sc_dev), op, addr, cmdlen, len, flags));
    569 
    570 	mutex_enter(&sc->sc_exec_lock);
    571 
    572 	/* Clear status bits */
    573 	bus_space_write_1(sc->sc_smb_iot, sc->sc_smb_ioh, PIIX_SMB_HS,
    574 	    PIIX_SMB_HS_INTR | PIIX_SMB_HS_DEVERR |
    575 	    PIIX_SMB_HS_BUSERR | PIIX_SMB_HS_FAILED);
    576 	bus_space_barrier(sc->sc_smb_iot, sc->sc_smb_ioh, PIIX_SMB_HS, 1,
    577 	    BUS_SPACE_BARRIER_READ | BUS_SPACE_BARRIER_WRITE);
    578 
    579 	/* Wait for bus to be idle */
    580 	for (retries = 100; retries > 0; retries--) {
    581 		st = bus_space_read_1(sc->sc_smb_iot, sc->sc_smb_ioh,
    582 		    PIIX_SMB_HS);
    583 		if (!(st & PIIX_SMB_HS_BUSY))
    584 			break;
    585 		DELAY(PIIXPM_DELAY);
    586 	}
    587 	DPRINTF(("%s: exec: st %#x\n", device_xname(sc->sc_dev), st & 0xff));
    588 	if (st & PIIX_SMB_HS_BUSY) {
    589 		mutex_exit(&sc->sc_exec_lock);
    590 		return (EBUSY);
    591 	}
    592 
    593 	if (sc->sc_poll)
    594 		flags |= I2C_F_POLL;
    595 
    596 	if (!I2C_OP_STOP_P(op) || cmdlen > 1 || len > 2 ||
    597 	    (cmdlen == 0 && len > 1)) {
    598 		mutex_exit(&sc->sc_exec_lock);
    599 		return (EINVAL);
    600 	}
    601 
    602 	/* Setup transfer */
    603 	sc->sc_i2c_xfer.op = op;
    604 	sc->sc_i2c_xfer.buf = buf;
    605 	sc->sc_i2c_xfer.len = len;
    606 	sc->sc_i2c_xfer.flags = flags;
    607 	sc->sc_i2c_xfer.error = 0;
    608 	sc->sc_i2c_xfer.done = false;
    609 
    610 	/* Set slave address and transfer direction */
    611 	bus_space_write_1(sc->sc_smb_iot, sc->sc_smb_ioh, PIIX_SMB_TXSLVA,
    612 	    PIIX_SMB_TXSLVA_ADDR(addr) |
    613 	    (I2C_OP_READ_P(op) ? PIIX_SMB_TXSLVA_READ : 0));
    614 
    615 	b = cmdbuf;
    616 	if (cmdlen > 0)
    617 		/* Set command byte */
    618 		bus_space_write_1(sc->sc_smb_iot, sc->sc_smb_ioh,
    619 		    PIIX_SMB_HCMD, b[0]);
    620 
    621 	if (I2C_OP_WRITE_P(op)) {
    622 		/* Write data */
    623 		b = buf;
    624 		if (cmdlen == 0 && len == 1)
    625 			bus_space_write_1(sc->sc_smb_iot, sc->sc_smb_ioh,
    626 			    PIIX_SMB_HCMD, b[0]);
    627 		else if (len > 0)
    628 			bus_space_write_1(sc->sc_smb_iot, sc->sc_smb_ioh,
    629 			    PIIX_SMB_HD0, b[0]);
    630 		if (len > 1)
    631 			bus_space_write_1(sc->sc_smb_iot, sc->sc_smb_ioh,
    632 			    PIIX_SMB_HD1, b[1]);
    633 	}
    634 
    635 	/* Set SMBus command */
    636 	if (cmdlen == 0) {
    637 		if (len == 0)
    638 			ctl = PIIX_SMB_HC_CMD_QUICK;
    639 		else
    640 			ctl = PIIX_SMB_HC_CMD_BYTE;
    641 	} else if (len == 1)
    642 		ctl = PIIX_SMB_HC_CMD_BDATA;
    643 	else if (len == 2)
    644 		ctl = PIIX_SMB_HC_CMD_WDATA;
    645 	else
    646 		panic("%s: unexpected len %zu", __func__, len);
    647 
    648 	if ((flags & I2C_F_POLL) == 0)
    649 		ctl |= PIIX_SMB_HC_INTREN;
    650 
    651 	/* Start transaction */
    652 	ctl |= PIIX_SMB_HC_START;
    653 	bus_space_write_1(sc->sc_smb_iot, sc->sc_smb_ioh, PIIX_SMB_HC, ctl);
    654 
    655 	if (flags & I2C_F_POLL) {
    656 		/* Poll for completion */
    657 		if (PIIXPM_IS_CSB5(sc))
    658 			DELAY(2*PIIXPM_DELAY);
    659 		else
    660 			DELAY(PIIXPM_DELAY);
    661 		for (retries = 1000; retries > 0; retries--) {
    662 			st = bus_space_read_1(sc->sc_smb_iot, sc->sc_smb_ioh,
    663 			    PIIX_SMB_HS);
    664 			if ((st & PIIX_SMB_HS_BUSY) == 0)
    665 				break;
    666 			DELAY(PIIXPM_DELAY);
    667 		}
    668 		if (st & PIIX_SMB_HS_BUSY)
    669 			goto timeout;
    670 		piixpm_intr(sc);
    671 	} else {
    672 		/* Wait for interrupt */
    673 		while (! sc->sc_i2c_xfer.done) {
    674 			if (cv_timedwait(&sc->sc_exec_wait, &sc->sc_exec_lock,
    675 					 PIIXPM_TIMEOUT * hz))
    676 				goto timeout;
    677 		}
    678 	}
    679 
    680 	int error = sc->sc_i2c_xfer.error;
    681 	mutex_exit(&sc->sc_exec_lock);
    682 
    683 	return (error);
    684 
    685 timeout:
    686 	/*
    687 	 * Transfer timeout. Kill the transaction and clear status bits.
    688 	 */
    689 	aprint_error_dev(sc->sc_dev, "timeout, status 0x%x\n", st);
    690 	bus_space_write_1(sc->sc_smb_iot, sc->sc_smb_ioh, PIIX_SMB_HC,
    691 	    PIIX_SMB_HC_KILL);
    692 	DELAY(PIIXPM_DELAY);
    693 	st = bus_space_read_1(sc->sc_smb_iot, sc->sc_smb_ioh, PIIX_SMB_HS);
    694 	if ((st & PIIX_SMB_HS_FAILED) == 0)
    695 		aprint_error_dev(sc->sc_dev,
    696 		    "transaction abort failed, status 0x%x\n", st);
    697 	bus_space_write_1(sc->sc_smb_iot, sc->sc_smb_ioh, PIIX_SMB_HS, st);
    698 	/*
    699 	 * CSB5 needs hard reset to unlock the smbus after timeout.
    700 	 */
    701 	if (PIIXPM_IS_CSB5(sc))
    702 		piixpm_csb5_reset(sc);
    703 	mutex_exit(&sc->sc_exec_lock);
    704 	return (ETIMEDOUT);
    705 }
    706 
    707 static int
    708 piixpm_intr(void *arg)
    709 {
    710 	struct piixpm_softc *sc = arg;
    711 	uint8_t st;
    712 	uint8_t *b;
    713 	size_t len;
    714 
    715 	/* Read status */
    716 	st = bus_space_read_1(sc->sc_smb_iot, sc->sc_smb_ioh, PIIX_SMB_HS);
    717 	if ((st & PIIX_SMB_HS_BUSY) != 0 || (st & (PIIX_SMB_HS_INTR |
    718 	    PIIX_SMB_HS_DEVERR | PIIX_SMB_HS_BUSERR |
    719 	    PIIX_SMB_HS_FAILED)) == 0)
    720 		/* Interrupt was not for us */
    721 		return (0);
    722 
    723 	DPRINTF(("%s: intr st %#x\n", device_xname(sc->sc_dev), st & 0xff));
    724 
    725 	if ((sc->sc_i2c_xfer.flags & I2C_F_POLL) == 0)
    726 		mutex_enter(&sc->sc_exec_lock);
    727 
    728 	/* Clear status bits */
    729 	bus_space_write_1(sc->sc_smb_iot, sc->sc_smb_ioh, PIIX_SMB_HS, st);
    730 
    731 	/* Check for errors */
    732 	if (st & (PIIX_SMB_HS_DEVERR | PIIX_SMB_HS_BUSERR |
    733 	    PIIX_SMB_HS_FAILED)) {
    734 		sc->sc_i2c_xfer.error = EIO;
    735 		goto done;
    736 	}
    737 
    738 	if (st & PIIX_SMB_HS_INTR) {
    739 		if (I2C_OP_WRITE_P(sc->sc_i2c_xfer.op))
    740 			goto done;
    741 
    742 		/* Read data */
    743 		b = sc->sc_i2c_xfer.buf;
    744 		len = sc->sc_i2c_xfer.len;
    745 		if (len > 0)
    746 			b[0] = bus_space_read_1(sc->sc_smb_iot, sc->sc_smb_ioh,
    747 			    PIIX_SMB_HD0);
    748 		if (len > 1)
    749 			b[1] = bus_space_read_1(sc->sc_smb_iot, sc->sc_smb_ioh,
    750 			    PIIX_SMB_HD1);
    751 	}
    752 
    753 done:
    754 	sc->sc_i2c_xfer.done = true;
    755 	if ((sc->sc_i2c_xfer.flags & I2C_F_POLL) == 0) {
    756 		cv_signal(&sc->sc_exec_wait);
    757 		mutex_exit(&sc->sc_exec_lock);
    758 	}
    759 	return (1);
    760 }
    761