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