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