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