piixpm.c revision 1.44 1 1.44 christos /* $NetBSD: piixpm.c,v 1.44 2014/03/29 19:28:25 christos Exp $ */
2 1.1 jmcneill /* $OpenBSD: piixpm.c,v 1.20 2006/02/27 08:25:02 grange 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.44 christos __KERNEL_RCSID(0, "$NetBSD: piixpm.c,v 1.44 2014/03/29 19:28:25 christos 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.42 soren struct piixpm_smbus sc_busses[4];
80 1.42 soren struct i2c_controller sc_i2c_tags[4];
81 1.42 soren
82 1.40 pgoyette kmutex_t sc_i2c_mutex;
83 1.1 jmcneill struct {
84 1.42 soren i2c_op_t op;
85 1.42 soren void * buf;
86 1.42 soren size_t len;
87 1.42 soren int flags;
88 1.42 soren volatile int error;
89 1.1 jmcneill } sc_i2c_xfer;
90 1.3 jmcneill
91 1.3 jmcneill pcireg_t sc_devact[2];
92 1.1 jmcneill };
93 1.1 jmcneill
94 1.25 joerg static int piixpm_match(device_t, cfdata_t, void *);
95 1.25 joerg static void piixpm_attach(device_t, device_t, void *);
96 1.1 jmcneill
97 1.32 dyoung static bool piixpm_suspend(device_t, const pmf_qual_t *);
98 1.32 dyoung static bool piixpm_resume(device_t, const pmf_qual_t *);
99 1.3 jmcneill
100 1.42 soren static int piixpm_sb800_init(struct piixpm_softc *);
101 1.35 hannken static void piixpm_csb5_reset(void *);
102 1.25 joerg static int piixpm_i2c_acquire_bus(void *, int);
103 1.25 joerg static void piixpm_i2c_release_bus(void *, int);
104 1.25 joerg static int piixpm_i2c_exec(void *, i2c_op_t, i2c_addr_t, const void *,
105 1.25 joerg size_t, void *, size_t, int);
106 1.1 jmcneill
107 1.25 joerg static int piixpm_intr(void *);
108 1.1 jmcneill
109 1.25 joerg CFATTACH_DECL_NEW(piixpm, sizeof(struct piixpm_softc),
110 1.1 jmcneill piixpm_match, piixpm_attach, NULL, NULL);
111 1.1 jmcneill
112 1.25 joerg static int
113 1.25 joerg piixpm_match(device_t parent, cfdata_t match, void *aux)
114 1.1 jmcneill {
115 1.1 jmcneill struct pci_attach_args *pa;
116 1.1 jmcneill
117 1.1 jmcneill pa = (struct pci_attach_args *)aux;
118 1.1 jmcneill switch (PCI_VENDOR(pa->pa_id)) {
119 1.1 jmcneill case PCI_VENDOR_INTEL:
120 1.1 jmcneill switch (PCI_PRODUCT(pa->pa_id)) {
121 1.1 jmcneill case PCI_PRODUCT_INTEL_82371AB_PMC:
122 1.1 jmcneill case PCI_PRODUCT_INTEL_82440MX_PMC:
123 1.1 jmcneill return 1;
124 1.1 jmcneill }
125 1.1 jmcneill break;
126 1.1 jmcneill case PCI_VENDOR_ATI:
127 1.1 jmcneill switch (PCI_PRODUCT(pa->pa_id)) {
128 1.1 jmcneill case PCI_PRODUCT_ATI_SB200_SMB:
129 1.10 toshii case PCI_PRODUCT_ATI_SB300_SMB:
130 1.10 toshii case PCI_PRODUCT_ATI_SB400_SMB:
131 1.23 jmcneill case PCI_PRODUCT_ATI_SB600_SMB: /* matches SB600/SB700/SB800 */
132 1.1 jmcneill return 1;
133 1.1 jmcneill }
134 1.1 jmcneill break;
135 1.14 martin case PCI_VENDOR_SERVERWORKS:
136 1.14 martin switch (PCI_PRODUCT(pa->pa_id)) {
137 1.14 martin case PCI_PRODUCT_SERVERWORKS_OSB4:
138 1.14 martin case PCI_PRODUCT_SERVERWORKS_CSB5:
139 1.14 martin case PCI_PRODUCT_SERVERWORKS_CSB6:
140 1.14 martin case PCI_PRODUCT_SERVERWORKS_HT1000SB:
141 1.14 martin return 1;
142 1.14 martin }
143 1.1 jmcneill }
144 1.1 jmcneill
145 1.1 jmcneill return 0;
146 1.1 jmcneill }
147 1.1 jmcneill
148 1.25 joerg static void
149 1.25 joerg piixpm_attach(device_t parent, device_t self, void *aux)
150 1.1 jmcneill {
151 1.25 joerg struct piixpm_softc *sc = device_private(self);
152 1.1 jmcneill struct pci_attach_args *pa = aux;
153 1.1 jmcneill struct i2cbus_attach_args iba;
154 1.1 jmcneill pcireg_t base, conf;
155 1.5 drochner pcireg_t pmmisc;
156 1.1 jmcneill pci_intr_handle_t ih;
157 1.1 jmcneill const char *intrstr = NULL;
158 1.42 soren int i, numbusses = 1;
159 1.44 christos char intrbuf[PCI_INTRSTR_LEN];
160 1.1 jmcneill
161 1.25 joerg sc->sc_dev = self;
162 1.42 soren sc->sc_iot = pa->pa_iot;
163 1.35 hannken sc->sc_id = pa->pa_id;
164 1.3 jmcneill sc->sc_pc = pa->pa_pc;
165 1.3 jmcneill sc->sc_pcitag = pa->pa_tag;
166 1.3 jmcneill
167 1.39 drochner pci_aprint_devinfo(pa, NULL);
168 1.3 jmcneill
169 1.18 jmcneill if (!pmf_device_register(self, piixpm_suspend, piixpm_resume))
170 1.18 jmcneill aprint_error_dev(self, "couldn't establish power handler\n");
171 1.3 jmcneill
172 1.1 jmcneill /* Read configuration */
173 1.1 jmcneill conf = pci_conf_read(pa->pa_pc, pa->pa_tag, PIIX_SMB_HOSTC);
174 1.25 joerg DPRINTF(("%s: conf 0x%x\n", device_xname(self), conf));
175 1.1 jmcneill
176 1.5 drochner if ((PCI_VENDOR(pa->pa_id) != PCI_VENDOR_INTEL) ||
177 1.5 drochner (PCI_PRODUCT(pa->pa_id) != PCI_PRODUCT_INTEL_82371AB_PMC))
178 1.5 drochner goto nopowermanagement;
179 1.5 drochner
180 1.5 drochner /* check whether I/O access to PM regs is enabled */
181 1.5 drochner pmmisc = pci_conf_read(pa->pa_pc, pa->pa_tag, PIIX_PMREGMISC);
182 1.5 drochner if (!(pmmisc & 1))
183 1.5 drochner goto nopowermanagement;
184 1.5 drochner
185 1.4 jmcneill /* Map I/O space */
186 1.5 drochner base = pci_conf_read(pa->pa_pc, pa->pa_tag, PIIX_PM_BASE);
187 1.4 jmcneill if (bus_space_map(sc->sc_pm_iot, PCI_MAPREG_IO_ADDR(base),
188 1.4 jmcneill PIIX_PM_SIZE, 0, &sc->sc_pm_ioh)) {
189 1.25 joerg aprint_error_dev(self, "can't map power management I/O space\n");
190 1.4 jmcneill goto nopowermanagement;
191 1.4 jmcneill }
192 1.4 jmcneill
193 1.5 drochner /*
194 1.5 drochner * Revision 0 and 1 are PIIX4, 2 is PIIX4E, 3 is PIIX4M.
195 1.5 drochner * PIIX4 and PIIX4E have a bug in the timer latch, see Errata #20
196 1.5 drochner * in the "Specification update" (document #297738).
197 1.5 drochner */
198 1.25 joerg acpipmtimer_attach(self, sc->sc_pm_iot, sc->sc_pm_ioh,
199 1.5 drochner PIIX_PM_PMTMR,
200 1.5 drochner (PCI_REVISION(pa->pa_class) < 3) ? ACPIPMT_BADLATCH : 0 );
201 1.4 jmcneill
202 1.5 drochner nopowermanagement:
203 1.36 jmcneill
204 1.36 jmcneill /* SB800 rev 0x40+ needs special initialization */
205 1.36 jmcneill if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_ATI &&
206 1.36 jmcneill PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_ATI_SB600_SMB &&
207 1.36 jmcneill PCI_REVISION(pa->pa_class) >= 0x40) {
208 1.42 soren if (piixpm_sb800_init(sc) == 0) {
209 1.42 soren numbusses = 4;
210 1.36 jmcneill goto attach_i2c;
211 1.42 soren }
212 1.36 jmcneill aprint_normal_dev(self, "SMBus disabled\n");
213 1.36 jmcneill return;
214 1.36 jmcneill }
215 1.36 jmcneill
216 1.1 jmcneill if ((conf & PIIX_SMB_HOSTC_HSTEN) == 0) {
217 1.25 joerg aprint_normal_dev(self, "SMBus disabled\n");
218 1.1 jmcneill return;
219 1.1 jmcneill }
220 1.1 jmcneill
221 1.1 jmcneill /* Map I/O space */
222 1.1 jmcneill base = pci_conf_read(pa->pa_pc, pa->pa_tag, PIIX_SMB_BASE) & 0xffff;
223 1.4 jmcneill if (bus_space_map(sc->sc_smb_iot, PCI_MAPREG_IO_ADDR(base),
224 1.4 jmcneill PIIX_SMB_SIZE, 0, &sc->sc_smb_ioh)) {
225 1.25 joerg aprint_error_dev(self, "can't map smbus I/O space\n");
226 1.1 jmcneill return;
227 1.1 jmcneill }
228 1.1 jmcneill
229 1.1 jmcneill sc->sc_poll = 1;
230 1.28 pgoyette aprint_normal_dev(self, "");
231 1.1 jmcneill if ((conf & PIIX_SMB_HOSTC_INTMASK) == PIIX_SMB_HOSTC_SMI) {
232 1.1 jmcneill /* No PCI IRQ */
233 1.28 pgoyette aprint_normal("interrupting at SMI, ");
234 1.1 jmcneill } else if ((conf & PIIX_SMB_HOSTC_INTMASK) == PIIX_SMB_HOSTC_IRQ) {
235 1.1 jmcneill /* Install interrupt handler */
236 1.1 jmcneill if (pci_intr_map(pa, &ih) == 0) {
237 1.44 christos intrstr = pci_intr_string(pa->pa_pc, ih, intrbuf, sizeof(intrbuf));
238 1.4 jmcneill sc->sc_smb_ih = pci_intr_establish(pa->pa_pc, ih, IPL_BIO,
239 1.1 jmcneill piixpm_intr, sc);
240 1.4 jmcneill if (sc->sc_smb_ih != NULL) {
241 1.28 pgoyette aprint_normal("interrupting at %s", intrstr);
242 1.1 jmcneill sc->sc_poll = 0;
243 1.1 jmcneill }
244 1.1 jmcneill }
245 1.1 jmcneill }
246 1.26 martin if (sc->sc_poll)
247 1.28 pgoyette aprint_normal("polling");
248 1.1 jmcneill
249 1.3 jmcneill aprint_normal("\n");
250 1.1 jmcneill
251 1.37 jmcneill attach_i2c:
252 1.1 jmcneill /* Attach I2C bus */
253 1.40 pgoyette mutex_init(&sc->sc_i2c_mutex, MUTEX_DEFAULT, IPL_NONE);
254 1.1 jmcneill
255 1.42 soren for (i = 0; i < numbusses; i++) {
256 1.42 soren sc->sc_busses[i].sda = i;
257 1.42 soren sc->sc_busses[i].softc = sc;
258 1.42 soren sc->sc_i2c_tags[i].ic_cookie = &sc->sc_busses[i];
259 1.42 soren sc->sc_i2c_tags[i].ic_acquire_bus = piixpm_i2c_acquire_bus;
260 1.42 soren sc->sc_i2c_tags[i].ic_release_bus = piixpm_i2c_release_bus;
261 1.42 soren sc->sc_i2c_tags[i].ic_exec = piixpm_i2c_exec;
262 1.42 soren
263 1.42 soren memset(&iba, 0, sizeof(iba));
264 1.42 soren iba.iba_type = I2C_TYPE_SMBUS;
265 1.42 soren iba.iba_tag = &sc->sc_i2c_tags[i];
266 1.42 soren config_found_ia(self, "i2cbus", &iba, iicbus_print);
267 1.42 soren }
268 1.1 jmcneill }
269 1.1 jmcneill
270 1.18 jmcneill static bool
271 1.32 dyoung piixpm_suspend(device_t dv, const pmf_qual_t *qual)
272 1.18 jmcneill {
273 1.18 jmcneill struct piixpm_softc *sc = device_private(dv);
274 1.18 jmcneill
275 1.18 jmcneill sc->sc_devact[0] = pci_conf_read(sc->sc_pc, sc->sc_pcitag,
276 1.18 jmcneill PIIX_DEVACTA);
277 1.18 jmcneill sc->sc_devact[1] = pci_conf_read(sc->sc_pc, sc->sc_pcitag,
278 1.18 jmcneill PIIX_DEVACTB);
279 1.18 jmcneill
280 1.18 jmcneill return true;
281 1.18 jmcneill }
282 1.18 jmcneill
283 1.18 jmcneill static bool
284 1.32 dyoung piixpm_resume(device_t dv, const pmf_qual_t *qual)
285 1.3 jmcneill {
286 1.18 jmcneill struct piixpm_softc *sc = device_private(dv);
287 1.3 jmcneill
288 1.18 jmcneill pci_conf_write(sc->sc_pc, sc->sc_pcitag, PIIX_DEVACTA,
289 1.18 jmcneill sc->sc_devact[0]);
290 1.18 jmcneill pci_conf_write(sc->sc_pc, sc->sc_pcitag, PIIX_DEVACTB,
291 1.18 jmcneill sc->sc_devact[1]);
292 1.3 jmcneill
293 1.18 jmcneill return true;
294 1.3 jmcneill }
295 1.3 jmcneill
296 1.36 jmcneill /*
297 1.36 jmcneill * Extract SMBus base address from SB800 Power Management (PM) registers.
298 1.36 jmcneill * The PM registers can be accessed either through indirect I/O (CD6/CD7) or
299 1.36 jmcneill * direct mapping if AcpiMMioDecodeEn is enabled. Since this function is only
300 1.36 jmcneill * called once it uses indirect I/O for simplicity.
301 1.36 jmcneill */
302 1.36 jmcneill static int
303 1.42 soren piixpm_sb800_init(struct piixpm_softc *sc)
304 1.36 jmcneill {
305 1.42 soren bus_space_tag_t iot = sc->sc_iot;
306 1.36 jmcneill bus_space_handle_t ioh; /* indirect I/O handle */
307 1.36 jmcneill uint16_t val, base_addr;
308 1.36 jmcneill
309 1.36 jmcneill /* Fetch SMB base address */
310 1.36 jmcneill if (bus_space_map(iot,
311 1.36 jmcneill PIIXPM_INDIRECTIO_BASE, PIIXPM_INDIRECTIO_SIZE, 0, &ioh)) {
312 1.36 jmcneill device_printf(sc->sc_dev, "couldn't map indirect I/O space\n");
313 1.36 jmcneill return EBUSY;
314 1.36 jmcneill }
315 1.36 jmcneill bus_space_write_1(iot, ioh, PIIXPM_INDIRECTIO_INDEX,
316 1.36 jmcneill SB800_PM_SMBUS0EN_LO);
317 1.36 jmcneill val = bus_space_read_1(iot, ioh, PIIXPM_INDIRECTIO_DATA);
318 1.36 jmcneill bus_space_write_1(iot, ioh, PIIXPM_INDIRECTIO_INDEX,
319 1.36 jmcneill SB800_PM_SMBUS0EN_HI);
320 1.36 jmcneill val |= bus_space_read_1(iot, ioh, PIIXPM_INDIRECTIO_DATA) << 8;
321 1.42 soren sc->sc_sb800_ioh = ioh;
322 1.36 jmcneill
323 1.36 jmcneill if ((val & SB800_PM_SMBUS0EN_ENABLE) == 0)
324 1.36 jmcneill return ENOENT;
325 1.36 jmcneill
326 1.36 jmcneill base_addr = val & SB800_PM_SMBUS0EN_BADDR;
327 1.36 jmcneill
328 1.36 jmcneill aprint_debug_dev(sc->sc_dev, "SMBus @ 0x%04x\n", base_addr);
329 1.36 jmcneill
330 1.42 soren bus_space_write_1(iot, ioh, PIIXPM_INDIRECTIO_INDEX, SB800_PM_SMBUS0SELEN);
331 1.42 soren bus_space_write_1(iot, ioh, PIIXPM_INDIRECTIO_DATA, 1); /* SMBUS0SEL */
332 1.42 soren
333 1.42 soren if (bus_space_map(iot, PCI_MAPREG_IO_ADDR(base_addr),
334 1.36 jmcneill PIIX_SMB_SIZE, 0, &sc->sc_smb_ioh)) {
335 1.36 jmcneill aprint_error_dev(sc->sc_dev, "can't map smbus I/O space\n");
336 1.36 jmcneill return EBUSY;
337 1.36 jmcneill }
338 1.40 pgoyette aprint_normal_dev(sc->sc_dev, "polling (SB800)\n");
339 1.36 jmcneill sc->sc_poll = 1;
340 1.36 jmcneill
341 1.36 jmcneill return 0;
342 1.36 jmcneill }
343 1.36 jmcneill
344 1.35 hannken static void
345 1.35 hannken piixpm_csb5_reset(void *arg)
346 1.35 hannken {
347 1.35 hannken struct piixpm_softc *sc = arg;
348 1.35 hannken pcireg_t base, hostc, pmbase;
349 1.35 hannken
350 1.35 hannken base = pci_conf_read(sc->sc_pc, sc->sc_pcitag, PIIX_SMB_BASE);
351 1.35 hannken hostc = pci_conf_read(sc->sc_pc, sc->sc_pcitag, PIIX_SMB_HOSTC);
352 1.35 hannken
353 1.35 hannken pmbase = pci_conf_read(sc->sc_pc, sc->sc_pcitag, PIIX_PM_BASE);
354 1.35 hannken pmbase |= PIIX_PM_BASE_CSB5_RESET;
355 1.35 hannken pci_conf_write(sc->sc_pc, sc->sc_pcitag, PIIX_PM_BASE, pmbase);
356 1.35 hannken pmbase &= ~PIIX_PM_BASE_CSB5_RESET;
357 1.35 hannken pci_conf_write(sc->sc_pc, sc->sc_pcitag, PIIX_PM_BASE, pmbase);
358 1.35 hannken
359 1.35 hannken pci_conf_write(sc->sc_pc, sc->sc_pcitag, PIIX_SMB_BASE, base);
360 1.35 hannken pci_conf_write(sc->sc_pc, sc->sc_pcitag, PIIX_SMB_HOSTC, hostc);
361 1.35 hannken
362 1.35 hannken (void) tsleep(&sc, PRIBIO, "csb5reset", hz/2);
363 1.35 hannken }
364 1.35 hannken
365 1.25 joerg static int
366 1.1 jmcneill piixpm_i2c_acquire_bus(void *cookie, int flags)
367 1.1 jmcneill {
368 1.42 soren struct piixpm_smbus *smbus = cookie;
369 1.42 soren struct piixpm_softc *sc = smbus->softc;
370 1.1 jmcneill
371 1.40 pgoyette if (!cold)
372 1.40 pgoyette mutex_enter(&sc->sc_i2c_mutex);
373 1.1 jmcneill
374 1.42 soren if (smbus->sda > 0) /* SB800 */
375 1.42 soren {
376 1.42 soren bus_space_write_1(sc->sc_iot, sc->sc_sb800_ioh,
377 1.42 soren PIIXPM_INDIRECTIO_INDEX, SB800_PM_SMBUS0SEL);
378 1.42 soren bus_space_write_1(sc->sc_iot, sc->sc_sb800_ioh,
379 1.42 soren PIIXPM_INDIRECTIO_DATA, smbus->sda << 1);
380 1.42 soren }
381 1.42 soren
382 1.16 xtraeme return 0;
383 1.1 jmcneill }
384 1.1 jmcneill
385 1.25 joerg static void
386 1.1 jmcneill piixpm_i2c_release_bus(void *cookie, int flags)
387 1.1 jmcneill {
388 1.42 soren struct piixpm_smbus *smbus = cookie;
389 1.42 soren struct piixpm_softc *sc = smbus->softc;
390 1.42 soren
391 1.42 soren if (smbus->sda > 0) /* SB800 */
392 1.42 soren {
393 1.42 soren /*
394 1.42 soren * HP Microserver hangs after reboot if not set to SDA0.
395 1.42 soren * Also add shutdown hook?
396 1.42 soren */
397 1.42 soren bus_space_write_1(sc->sc_iot, sc->sc_sb800_ioh,
398 1.42 soren PIIXPM_INDIRECTIO_INDEX, SB800_PM_SMBUS0SEL);
399 1.42 soren bus_space_write_1(sc->sc_iot, sc->sc_sb800_ioh,
400 1.42 soren PIIXPM_INDIRECTIO_DATA, 0);
401 1.42 soren }
402 1.1 jmcneill
403 1.40 pgoyette if (!cold)
404 1.40 pgoyette mutex_exit(&sc->sc_i2c_mutex);
405 1.1 jmcneill }
406 1.1 jmcneill
407 1.25 joerg static int
408 1.1 jmcneill piixpm_i2c_exec(void *cookie, i2c_op_t op, i2c_addr_t addr,
409 1.1 jmcneill const void *cmdbuf, size_t cmdlen, void *buf, size_t len, int flags)
410 1.1 jmcneill {
411 1.42 soren struct piixpm_smbus *smbus = cookie;
412 1.42 soren struct piixpm_softc *sc = smbus->softc;
413 1.1 jmcneill const u_int8_t *b;
414 1.1 jmcneill u_int8_t ctl = 0, st;
415 1.1 jmcneill int retries;
416 1.1 jmcneill
417 1.33 jakllsch DPRINTF(("%s: exec: op %d, addr 0x%x, cmdlen %zu, len %zu, flags 0x%x\n",
418 1.25 joerg device_xname(sc->sc_dev), op, addr, cmdlen, len, flags));
419 1.1 jmcneill
420 1.41 soren /* Clear status bits */
421 1.41 soren bus_space_write_1(sc->sc_smb_iot, sc->sc_smb_ioh, PIIX_SMB_HS,
422 1.41 soren PIIX_SMB_HS_INTR | PIIX_SMB_HS_DEVERR |
423 1.41 soren PIIX_SMB_HS_BUSERR | PIIX_SMB_HS_FAILED);
424 1.42 soren bus_space_barrier(sc->sc_smb_iot, sc->sc_smb_ioh, PIIX_SMB_HS, 1,
425 1.41 soren BUS_SPACE_BARRIER_READ | BUS_SPACE_BARRIER_WRITE);
426 1.41 soren
427 1.1 jmcneill /* Wait for bus to be idle */
428 1.1 jmcneill for (retries = 100; retries > 0; retries--) {
429 1.4 jmcneill st = bus_space_read_1(sc->sc_smb_iot, sc->sc_smb_ioh,
430 1.4 jmcneill PIIX_SMB_HS);
431 1.1 jmcneill if (!(st & PIIX_SMB_HS_BUSY))
432 1.1 jmcneill break;
433 1.1 jmcneill DELAY(PIIXPM_DELAY);
434 1.1 jmcneill }
435 1.25 joerg DPRINTF(("%s: exec: st 0x%d\n", device_xname(sc->sc_dev), st & 0xff));
436 1.1 jmcneill if (st & PIIX_SMB_HS_BUSY)
437 1.1 jmcneill return (1);
438 1.1 jmcneill
439 1.1 jmcneill if (cold || sc->sc_poll)
440 1.1 jmcneill flags |= I2C_F_POLL;
441 1.1 jmcneill
442 1.34 hannken if (!I2C_OP_STOP_P(op) || cmdlen > 1 || len > 2 ||
443 1.34 hannken (cmdlen == 0 && len > 1))
444 1.1 jmcneill return (1);
445 1.1 jmcneill
446 1.1 jmcneill /* Setup transfer */
447 1.1 jmcneill sc->sc_i2c_xfer.op = op;
448 1.1 jmcneill sc->sc_i2c_xfer.buf = buf;
449 1.1 jmcneill sc->sc_i2c_xfer.len = len;
450 1.1 jmcneill sc->sc_i2c_xfer.flags = flags;
451 1.1 jmcneill sc->sc_i2c_xfer.error = 0;
452 1.1 jmcneill
453 1.1 jmcneill /* Set slave address and transfer direction */
454 1.4 jmcneill bus_space_write_1(sc->sc_smb_iot, sc->sc_smb_ioh, PIIX_SMB_TXSLVA,
455 1.1 jmcneill PIIX_SMB_TXSLVA_ADDR(addr) |
456 1.1 jmcneill (I2C_OP_READ_P(op) ? PIIX_SMB_TXSLVA_READ : 0));
457 1.1 jmcneill
458 1.1 jmcneill b = cmdbuf;
459 1.1 jmcneill if (cmdlen > 0)
460 1.1 jmcneill /* Set command byte */
461 1.4 jmcneill bus_space_write_1(sc->sc_smb_iot, sc->sc_smb_ioh,
462 1.4 jmcneill PIIX_SMB_HCMD, b[0]);
463 1.1 jmcneill
464 1.1 jmcneill if (I2C_OP_WRITE_P(op)) {
465 1.1 jmcneill /* Write data */
466 1.1 jmcneill b = buf;
467 1.34 hannken if (cmdlen == 0 && len == 1)
468 1.34 hannken bus_space_write_1(sc->sc_smb_iot, sc->sc_smb_ioh,
469 1.34 hannken PIIX_SMB_HCMD, b[0]);
470 1.34 hannken else if (len > 0)
471 1.4 jmcneill bus_space_write_1(sc->sc_smb_iot, sc->sc_smb_ioh,
472 1.1 jmcneill PIIX_SMB_HD0, b[0]);
473 1.1 jmcneill if (len > 1)
474 1.4 jmcneill bus_space_write_1(sc->sc_smb_iot, sc->sc_smb_ioh,
475 1.1 jmcneill PIIX_SMB_HD1, b[1]);
476 1.1 jmcneill }
477 1.1 jmcneill
478 1.1 jmcneill /* Set SMBus command */
479 1.34 hannken if (cmdlen == 0) {
480 1.34 hannken if (len == 0)
481 1.27 pgoyette ctl = PIIX_SMB_HC_CMD_QUICK;
482 1.27 pgoyette else
483 1.27 pgoyette ctl = PIIX_SMB_HC_CMD_BYTE;
484 1.27 pgoyette } else if (len == 1)
485 1.1 jmcneill ctl = PIIX_SMB_HC_CMD_BDATA;
486 1.1 jmcneill else if (len == 2)
487 1.1 jmcneill ctl = PIIX_SMB_HC_CMD_WDATA;
488 1.1 jmcneill
489 1.1 jmcneill if ((flags & I2C_F_POLL) == 0)
490 1.1 jmcneill ctl |= PIIX_SMB_HC_INTREN;
491 1.1 jmcneill
492 1.1 jmcneill /* Start transaction */
493 1.1 jmcneill ctl |= PIIX_SMB_HC_START;
494 1.4 jmcneill bus_space_write_1(sc->sc_smb_iot, sc->sc_smb_ioh, PIIX_SMB_HC, ctl);
495 1.1 jmcneill
496 1.1 jmcneill if (flags & I2C_F_POLL) {
497 1.1 jmcneill /* Poll for completion */
498 1.35 hannken if (PIIXPM_IS_CSB5(sc->sc_id))
499 1.35 hannken DELAY(2*PIIXPM_DELAY);
500 1.35 hannken else
501 1.35 hannken DELAY(PIIXPM_DELAY);
502 1.1 jmcneill for (retries = 1000; retries > 0; retries--) {
503 1.4 jmcneill st = bus_space_read_1(sc->sc_smb_iot, sc->sc_smb_ioh,
504 1.1 jmcneill PIIX_SMB_HS);
505 1.1 jmcneill if ((st & PIIX_SMB_HS_BUSY) == 0)
506 1.1 jmcneill break;
507 1.1 jmcneill DELAY(PIIXPM_DELAY);
508 1.1 jmcneill }
509 1.1 jmcneill if (st & PIIX_SMB_HS_BUSY)
510 1.1 jmcneill goto timeout;
511 1.42 soren piixpm_intr(smbus);
512 1.1 jmcneill } else {
513 1.1 jmcneill /* Wait for interrupt */
514 1.1 jmcneill if (tsleep(sc, PRIBIO, "iicexec", PIIXPM_TIMEOUT * hz))
515 1.1 jmcneill goto timeout;
516 1.1 jmcneill }
517 1.1 jmcneill
518 1.1 jmcneill if (sc->sc_i2c_xfer.error)
519 1.1 jmcneill return (1);
520 1.1 jmcneill
521 1.1 jmcneill return (0);
522 1.1 jmcneill
523 1.1 jmcneill timeout:
524 1.1 jmcneill /*
525 1.1 jmcneill * Transfer timeout. Kill the transaction and clear status bits.
526 1.1 jmcneill */
527 1.25 joerg aprint_error_dev(sc->sc_dev, "timeout, status 0x%x\n", st);
528 1.4 jmcneill bus_space_write_1(sc->sc_smb_iot, sc->sc_smb_ioh, PIIX_SMB_HC,
529 1.1 jmcneill PIIX_SMB_HC_KILL);
530 1.1 jmcneill DELAY(PIIXPM_DELAY);
531 1.4 jmcneill st = bus_space_read_1(sc->sc_smb_iot, sc->sc_smb_ioh, PIIX_SMB_HS);
532 1.1 jmcneill if ((st & PIIX_SMB_HS_FAILED) == 0)
533 1.25 joerg aprint_error_dev(sc->sc_dev, "transaction abort failed, status 0x%x\n", st);
534 1.4 jmcneill bus_space_write_1(sc->sc_smb_iot, sc->sc_smb_ioh, PIIX_SMB_HS, st);
535 1.35 hannken /*
536 1.35 hannken * CSB5 needs hard reset to unlock the smbus after timeout.
537 1.35 hannken */
538 1.35 hannken if (PIIXPM_IS_CSB5(sc->sc_id))
539 1.35 hannken piixpm_csb5_reset(sc);
540 1.1 jmcneill return (1);
541 1.1 jmcneill }
542 1.1 jmcneill
543 1.25 joerg static int
544 1.1 jmcneill piixpm_intr(void *arg)
545 1.1 jmcneill {
546 1.42 soren struct piixpm_smbus *smbus = arg;
547 1.42 soren struct piixpm_softc *sc = smbus->softc;
548 1.1 jmcneill u_int8_t st;
549 1.1 jmcneill u_int8_t *b;
550 1.1 jmcneill size_t len;
551 1.1 jmcneill
552 1.1 jmcneill /* Read status */
553 1.4 jmcneill st = bus_space_read_1(sc->sc_smb_iot, sc->sc_smb_ioh, PIIX_SMB_HS);
554 1.1 jmcneill if ((st & PIIX_SMB_HS_BUSY) != 0 || (st & (PIIX_SMB_HS_INTR |
555 1.1 jmcneill PIIX_SMB_HS_DEVERR | PIIX_SMB_HS_BUSERR |
556 1.1 jmcneill PIIX_SMB_HS_FAILED)) == 0)
557 1.1 jmcneill /* Interrupt was not for us */
558 1.1 jmcneill return (0);
559 1.1 jmcneill
560 1.25 joerg DPRINTF(("%s: intr st 0x%d\n", device_xname(sc->sc_dev), st & 0xff));
561 1.1 jmcneill
562 1.1 jmcneill /* Clear status bits */
563 1.4 jmcneill bus_space_write_1(sc->sc_smb_iot, sc->sc_smb_ioh, PIIX_SMB_HS, st);
564 1.1 jmcneill
565 1.1 jmcneill /* Check for errors */
566 1.1 jmcneill if (st & (PIIX_SMB_HS_DEVERR | PIIX_SMB_HS_BUSERR |
567 1.1 jmcneill PIIX_SMB_HS_FAILED)) {
568 1.1 jmcneill sc->sc_i2c_xfer.error = 1;
569 1.1 jmcneill goto done;
570 1.1 jmcneill }
571 1.1 jmcneill
572 1.1 jmcneill if (st & PIIX_SMB_HS_INTR) {
573 1.1 jmcneill if (I2C_OP_WRITE_P(sc->sc_i2c_xfer.op))
574 1.1 jmcneill goto done;
575 1.1 jmcneill
576 1.1 jmcneill /* Read data */
577 1.1 jmcneill b = sc->sc_i2c_xfer.buf;
578 1.1 jmcneill len = sc->sc_i2c_xfer.len;
579 1.1 jmcneill if (len > 0)
580 1.4 jmcneill b[0] = bus_space_read_1(sc->sc_smb_iot, sc->sc_smb_ioh,
581 1.1 jmcneill PIIX_SMB_HD0);
582 1.1 jmcneill if (len > 1)
583 1.4 jmcneill b[1] = bus_space_read_1(sc->sc_smb_iot, sc->sc_smb_ioh,
584 1.1 jmcneill PIIX_SMB_HD1);
585 1.1 jmcneill }
586 1.1 jmcneill
587 1.1 jmcneill done:
588 1.1 jmcneill if ((sc->sc_i2c_xfer.flags & I2C_F_POLL) == 0)
589 1.1 jmcneill wakeup(sc);
590 1.1 jmcneill return (1);
591 1.1 jmcneill }
592