piixpm.c revision 1.2.10.2 1 1.2.10.2 kardel /* $NetBSD: piixpm.c,v 1.2.10.2 2006/06/01 22:36:49 kardel Exp $ */
2 1.2.10.2 kardel /* $OpenBSD: piixpm.c,v 1.20 2006/02/27 08:25:02 grange Exp $ */
3 1.2.10.2 kardel
4 1.2.10.2 kardel /*
5 1.2.10.2 kardel * Copyright (c) 2005, 2006 Alexander Yurchenko <grange (at) openbsd.org>
6 1.2.10.2 kardel *
7 1.2.10.2 kardel * Permission to use, copy, modify, and distribute this software for any
8 1.2.10.2 kardel * purpose with or without fee is hereby granted, provided that the above
9 1.2.10.2 kardel * copyright notice and this permission notice appear in all copies.
10 1.2.10.2 kardel *
11 1.2.10.2 kardel * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
12 1.2.10.2 kardel * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
13 1.2.10.2 kardel * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
14 1.2.10.2 kardel * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
15 1.2.10.2 kardel * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
16 1.2.10.2 kardel * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
17 1.2.10.2 kardel * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
18 1.2.10.2 kardel */
19 1.2.10.2 kardel
20 1.2.10.2 kardel /*
21 1.2.10.2 kardel * Intel PIIX and compatible Power Management controller driver.
22 1.2.10.2 kardel */
23 1.2.10.2 kardel
24 1.2.10.2 kardel #include <sys/cdefs.h>
25 1.2.10.2 kardel __KERNEL_RCSID(0, "$NetBSD: piixpm.c,v 1.2.10.2 2006/06/01 22:36:49 kardel Exp $");
26 1.2.10.2 kardel
27 1.2.10.2 kardel #include <sys/param.h>
28 1.2.10.2 kardel #include <sys/systm.h>
29 1.2.10.2 kardel #include <sys/device.h>
30 1.2.10.2 kardel #include <sys/kernel.h>
31 1.2.10.2 kardel #include <sys/lock.h>
32 1.2.10.2 kardel #include <sys/proc.h>
33 1.2.10.2 kardel
34 1.2.10.2 kardel #include <machine/bus.h>
35 1.2.10.2 kardel
36 1.2.10.2 kardel #include <dev/pci/pcidevs.h>
37 1.2.10.2 kardel #include <dev/pci/pcireg.h>
38 1.2.10.2 kardel #include <dev/pci/pcivar.h>
39 1.2.10.2 kardel
40 1.2.10.2 kardel #include <dev/pci/piixpmreg.h>
41 1.2.10.2 kardel
42 1.2.10.2 kardel #include <dev/i2c/i2cvar.h>
43 1.2.10.2 kardel
44 1.2.10.2 kardel #ifdef PIIXPM_DEBUG
45 1.2.10.2 kardel #define DPRINTF(x) printf x
46 1.2.10.2 kardel #else
47 1.2.10.2 kardel #define DPRINTF(x)
48 1.2.10.2 kardel #endif
49 1.2.10.2 kardel
50 1.2.10.2 kardel #define PIIXPM_DELAY 200
51 1.2.10.2 kardel #define PIIXPM_TIMEOUT 1
52 1.2.10.2 kardel
53 1.2.10.2 kardel struct piixpm_softc {
54 1.2.10.2 kardel struct device sc_dev;
55 1.2.10.2 kardel
56 1.2.10.2 kardel bus_space_tag_t sc_iot;
57 1.2.10.2 kardel bus_space_handle_t sc_ioh;
58 1.2.10.2 kardel void * sc_ih;
59 1.2.10.2 kardel int sc_poll;
60 1.2.10.2 kardel
61 1.2.10.2 kardel struct i2c_controller sc_i2c_tag;
62 1.2.10.2 kardel struct lock sc_i2c_lock;
63 1.2.10.2 kardel struct {
64 1.2.10.2 kardel i2c_op_t op;
65 1.2.10.2 kardel void * buf;
66 1.2.10.2 kardel size_t len;
67 1.2.10.2 kardel int flags;
68 1.2.10.2 kardel volatile int error;
69 1.2.10.2 kardel } sc_i2c_xfer;
70 1.2.10.2 kardel };
71 1.2.10.2 kardel
72 1.2.10.2 kardel int piixpm_match(struct device *, struct cfdata *, void *);
73 1.2.10.2 kardel void piixpm_attach(struct device *, struct device *, void *);
74 1.2.10.2 kardel
75 1.2.10.2 kardel int piixpm_i2c_acquire_bus(void *, int);
76 1.2.10.2 kardel void piixpm_i2c_release_bus(void *, int);
77 1.2.10.2 kardel int piixpm_i2c_exec(void *, i2c_op_t, i2c_addr_t, const void *, size_t,
78 1.2.10.2 kardel void *, size_t, int);
79 1.2.10.2 kardel
80 1.2.10.2 kardel int piixpm_intr(void *);
81 1.2.10.2 kardel
82 1.2.10.2 kardel CFATTACH_DECL(piixpm, sizeof(struct piixpm_softc),
83 1.2.10.2 kardel piixpm_match, piixpm_attach, NULL, NULL);
84 1.2.10.2 kardel
85 1.2.10.2 kardel int
86 1.2.10.2 kardel piixpm_match(struct device *parent, struct cfdata *match, void *aux)
87 1.2.10.2 kardel {
88 1.2.10.2 kardel struct pci_attach_args *pa;
89 1.2.10.2 kardel
90 1.2.10.2 kardel pa = (struct pci_attach_args *)aux;
91 1.2.10.2 kardel switch (PCI_VENDOR(pa->pa_id)) {
92 1.2.10.2 kardel case PCI_VENDOR_INTEL:
93 1.2.10.2 kardel switch (PCI_PRODUCT(pa->pa_id)) {
94 1.2.10.2 kardel case PCI_PRODUCT_INTEL_82371AB_PMC:
95 1.2.10.2 kardel case PCI_PRODUCT_INTEL_82440MX_PMC:
96 1.2.10.2 kardel return 1;
97 1.2.10.2 kardel }
98 1.2.10.2 kardel break;
99 1.2.10.2 kardel case PCI_VENDOR_ATI:
100 1.2.10.2 kardel switch (PCI_PRODUCT(pa->pa_id)) {
101 1.2.10.2 kardel case PCI_PRODUCT_ATI_SB200_SMB:
102 1.2.10.2 kardel return 1;
103 1.2.10.2 kardel }
104 1.2.10.2 kardel break;
105 1.2.10.2 kardel }
106 1.2.10.2 kardel
107 1.2.10.2 kardel return 0;
108 1.2.10.2 kardel }
109 1.2.10.2 kardel
110 1.2.10.2 kardel void
111 1.2.10.2 kardel piixpm_attach(struct device *parent, struct device *self, void *aux)
112 1.2.10.2 kardel {
113 1.2.10.2 kardel struct piixpm_softc *sc = (struct piixpm_softc *)self;
114 1.2.10.2 kardel struct pci_attach_args *pa = aux;
115 1.2.10.2 kardel struct i2cbus_attach_args iba;
116 1.2.10.2 kardel pcireg_t base, conf;
117 1.2.10.2 kardel pci_intr_handle_t ih;
118 1.2.10.2 kardel const char *intrstr = NULL;
119 1.2.10.2 kardel
120 1.2.10.2 kardel /* Read configuration */
121 1.2.10.2 kardel conf = pci_conf_read(pa->pa_pc, pa->pa_tag, PIIX_SMB_HOSTC);
122 1.2.10.2 kardel DPRINTF((": conf 0x%x", conf));
123 1.2.10.2 kardel
124 1.2.10.2 kardel if ((conf & PIIX_SMB_HOSTC_HSTEN) == 0) {
125 1.2.10.2 kardel printf(": SMBus disabled\n");
126 1.2.10.2 kardel return;
127 1.2.10.2 kardel }
128 1.2.10.2 kardel
129 1.2.10.2 kardel /* Map I/O space */
130 1.2.10.2 kardel sc->sc_iot = pa->pa_iot;
131 1.2.10.2 kardel base = pci_conf_read(pa->pa_pc, pa->pa_tag, PIIX_SMB_BASE) & 0xffff;
132 1.2.10.2 kardel if (bus_space_map(sc->sc_iot, PCI_MAPREG_IO_ADDR(base),
133 1.2.10.2 kardel PIIX_SMB_SIZE, 0, &sc->sc_ioh)) {
134 1.2.10.2 kardel printf(": can't map I/O space\n");
135 1.2.10.2 kardel return;
136 1.2.10.2 kardel }
137 1.2.10.2 kardel
138 1.2.10.2 kardel sc->sc_poll = 1;
139 1.2.10.2 kardel if ((conf & PIIX_SMB_HOSTC_INTMASK) == PIIX_SMB_HOSTC_SMI) {
140 1.2.10.2 kardel /* No PCI IRQ */
141 1.2.10.2 kardel printf(": SMI");
142 1.2.10.2 kardel } else if ((conf & PIIX_SMB_HOSTC_INTMASK) == PIIX_SMB_HOSTC_IRQ) {
143 1.2.10.2 kardel /* Install interrupt handler */
144 1.2.10.2 kardel if (pci_intr_map(pa, &ih) == 0) {
145 1.2.10.2 kardel intrstr = pci_intr_string(pa->pa_pc, ih);
146 1.2.10.2 kardel sc->sc_ih = pci_intr_establish(pa->pa_pc, ih, IPL_BIO,
147 1.2.10.2 kardel piixpm_intr, sc);
148 1.2.10.2 kardel if (sc->sc_ih != NULL) {
149 1.2.10.2 kardel printf(": %s", intrstr);
150 1.2.10.2 kardel sc->sc_poll = 0;
151 1.2.10.2 kardel }
152 1.2.10.2 kardel }
153 1.2.10.2 kardel if (sc->sc_poll)
154 1.2.10.2 kardel printf(": polling");
155 1.2.10.2 kardel }
156 1.2.10.2 kardel
157 1.2.10.2 kardel printf("\n");
158 1.2.10.2 kardel
159 1.2.10.2 kardel /* Attach I2C bus */
160 1.2.10.2 kardel lockinit(&sc->sc_i2c_lock, PRIBIO | PCATCH, "iiclk", 0, 0);
161 1.2.10.2 kardel sc->sc_i2c_tag.ic_cookie = sc;
162 1.2.10.2 kardel sc->sc_i2c_tag.ic_acquire_bus = piixpm_i2c_acquire_bus;
163 1.2.10.2 kardel sc->sc_i2c_tag.ic_release_bus = piixpm_i2c_release_bus;
164 1.2.10.2 kardel sc->sc_i2c_tag.ic_exec = piixpm_i2c_exec;
165 1.2.10.2 kardel
166 1.2.10.2 kardel bzero(&iba, sizeof(iba));
167 1.2.10.2 kardel iba.iba_name = "iic";
168 1.2.10.2 kardel iba.iba_tag = &sc->sc_i2c_tag;
169 1.2.10.2 kardel config_found(self, &iba, iicbus_print);
170 1.2.10.2 kardel
171 1.2.10.2 kardel return;
172 1.2.10.2 kardel }
173 1.2.10.2 kardel
174 1.2.10.2 kardel int
175 1.2.10.2 kardel piixpm_i2c_acquire_bus(void *cookie, int flags)
176 1.2.10.2 kardel {
177 1.2.10.2 kardel struct piixpm_softc *sc = cookie;
178 1.2.10.2 kardel
179 1.2.10.2 kardel if (cold || sc->sc_poll || (flags & I2C_F_POLL))
180 1.2.10.2 kardel return (0);
181 1.2.10.2 kardel
182 1.2.10.2 kardel return (lockmgr(&sc->sc_i2c_lock, LK_EXCLUSIVE, NULL));
183 1.2.10.2 kardel }
184 1.2.10.2 kardel
185 1.2.10.2 kardel void
186 1.2.10.2 kardel piixpm_i2c_release_bus(void *cookie, int flags)
187 1.2.10.2 kardel {
188 1.2.10.2 kardel struct piixpm_softc *sc = cookie;
189 1.2.10.2 kardel
190 1.2.10.2 kardel if (cold || sc->sc_poll || (flags & I2C_F_POLL))
191 1.2.10.2 kardel return;
192 1.2.10.2 kardel
193 1.2.10.2 kardel lockmgr(&sc->sc_i2c_lock, LK_RELEASE, NULL);
194 1.2.10.2 kardel }
195 1.2.10.2 kardel
196 1.2.10.2 kardel int
197 1.2.10.2 kardel piixpm_i2c_exec(void *cookie, i2c_op_t op, i2c_addr_t addr,
198 1.2.10.2 kardel const void *cmdbuf, size_t cmdlen, void *buf, size_t len, int flags)
199 1.2.10.2 kardel {
200 1.2.10.2 kardel struct piixpm_softc *sc = cookie;
201 1.2.10.2 kardel const u_int8_t *b;
202 1.2.10.2 kardel u_int8_t ctl = 0, st;
203 1.2.10.2 kardel int retries;
204 1.2.10.2 kardel
205 1.2.10.2 kardel DPRINTF(("%s: exec: op %d, addr 0x%x, cmdlen %d, len %d, flags 0x%x\n",
206 1.2.10.2 kardel sc->sc_dev.dv_xname, op, addr, cmdlen, len, flags));
207 1.2.10.2 kardel
208 1.2.10.2 kardel /* Wait for bus to be idle */
209 1.2.10.2 kardel for (retries = 100; retries > 0; retries--) {
210 1.2.10.2 kardel st = bus_space_read_1(sc->sc_iot, sc->sc_ioh, PIIX_SMB_HS);
211 1.2.10.2 kardel if (!(st & PIIX_SMB_HS_BUSY))
212 1.2.10.2 kardel break;
213 1.2.10.2 kardel DELAY(PIIXPM_DELAY);
214 1.2.10.2 kardel }
215 1.2.10.2 kardel DPRINTF(("%s: exec: st 0x%b\n", sc->sc_dev.dv_xname, st,
216 1.2.10.2 kardel PIIX_SMB_HS_BITS));
217 1.2.10.2 kardel if (st & PIIX_SMB_HS_BUSY)
218 1.2.10.2 kardel return (1);
219 1.2.10.2 kardel
220 1.2.10.2 kardel if (cold || sc->sc_poll)
221 1.2.10.2 kardel flags |= I2C_F_POLL;
222 1.2.10.2 kardel
223 1.2.10.2 kardel if (!I2C_OP_STOP_P(op) || cmdlen > 1 || len > 2)
224 1.2.10.2 kardel return (1);
225 1.2.10.2 kardel
226 1.2.10.2 kardel /* Setup transfer */
227 1.2.10.2 kardel sc->sc_i2c_xfer.op = op;
228 1.2.10.2 kardel sc->sc_i2c_xfer.buf = buf;
229 1.2.10.2 kardel sc->sc_i2c_xfer.len = len;
230 1.2.10.2 kardel sc->sc_i2c_xfer.flags = flags;
231 1.2.10.2 kardel sc->sc_i2c_xfer.error = 0;
232 1.2.10.2 kardel
233 1.2.10.2 kardel /* Set slave address and transfer direction */
234 1.2.10.2 kardel bus_space_write_1(sc->sc_iot, sc->sc_ioh, PIIX_SMB_TXSLVA,
235 1.2.10.2 kardel PIIX_SMB_TXSLVA_ADDR(addr) |
236 1.2.10.2 kardel (I2C_OP_READ_P(op) ? PIIX_SMB_TXSLVA_READ : 0));
237 1.2.10.2 kardel
238 1.2.10.2 kardel b = cmdbuf;
239 1.2.10.2 kardel if (cmdlen > 0)
240 1.2.10.2 kardel /* Set command byte */
241 1.2.10.2 kardel bus_space_write_1(sc->sc_iot, sc->sc_ioh, PIIX_SMB_HCMD, b[0]);
242 1.2.10.2 kardel
243 1.2.10.2 kardel if (I2C_OP_WRITE_P(op)) {
244 1.2.10.2 kardel /* Write data */
245 1.2.10.2 kardel b = buf;
246 1.2.10.2 kardel if (len > 0)
247 1.2.10.2 kardel bus_space_write_1(sc->sc_iot, sc->sc_ioh,
248 1.2.10.2 kardel PIIX_SMB_HD0, b[0]);
249 1.2.10.2 kardel if (len > 1)
250 1.2.10.2 kardel bus_space_write_1(sc->sc_iot, sc->sc_ioh,
251 1.2.10.2 kardel PIIX_SMB_HD1, b[1]);
252 1.2.10.2 kardel }
253 1.2.10.2 kardel
254 1.2.10.2 kardel /* Set SMBus command */
255 1.2.10.2 kardel if (len == 0)
256 1.2.10.2 kardel ctl = PIIX_SMB_HC_CMD_BYTE;
257 1.2.10.2 kardel else if (len == 1)
258 1.2.10.2 kardel ctl = PIIX_SMB_HC_CMD_BDATA;
259 1.2.10.2 kardel else if (len == 2)
260 1.2.10.2 kardel ctl = PIIX_SMB_HC_CMD_WDATA;
261 1.2.10.2 kardel
262 1.2.10.2 kardel if ((flags & I2C_F_POLL) == 0)
263 1.2.10.2 kardel ctl |= PIIX_SMB_HC_INTREN;
264 1.2.10.2 kardel
265 1.2.10.2 kardel /* Start transaction */
266 1.2.10.2 kardel ctl |= PIIX_SMB_HC_START;
267 1.2.10.2 kardel bus_space_write_1(sc->sc_iot, sc->sc_ioh, PIIX_SMB_HC, ctl);
268 1.2.10.2 kardel
269 1.2.10.2 kardel if (flags & I2C_F_POLL) {
270 1.2.10.2 kardel /* Poll for completion */
271 1.2.10.2 kardel DELAY(PIIXPM_DELAY);
272 1.2.10.2 kardel for (retries = 1000; retries > 0; retries--) {
273 1.2.10.2 kardel st = bus_space_read_1(sc->sc_iot, sc->sc_ioh,
274 1.2.10.2 kardel PIIX_SMB_HS);
275 1.2.10.2 kardel if ((st & PIIX_SMB_HS_BUSY) == 0)
276 1.2.10.2 kardel break;
277 1.2.10.2 kardel DELAY(PIIXPM_DELAY);
278 1.2.10.2 kardel }
279 1.2.10.2 kardel if (st & PIIX_SMB_HS_BUSY)
280 1.2.10.2 kardel goto timeout;
281 1.2.10.2 kardel piixpm_intr(sc);
282 1.2.10.2 kardel } else {
283 1.2.10.2 kardel /* Wait for interrupt */
284 1.2.10.2 kardel if (tsleep(sc, PRIBIO, "iicexec", PIIXPM_TIMEOUT * hz))
285 1.2.10.2 kardel goto timeout;
286 1.2.10.2 kardel }
287 1.2.10.2 kardel
288 1.2.10.2 kardel if (sc->sc_i2c_xfer.error)
289 1.2.10.2 kardel return (1);
290 1.2.10.2 kardel
291 1.2.10.2 kardel return (0);
292 1.2.10.2 kardel
293 1.2.10.2 kardel timeout:
294 1.2.10.2 kardel /*
295 1.2.10.2 kardel * Transfer timeout. Kill the transaction and clear status bits.
296 1.2.10.2 kardel */
297 1.2.10.2 kardel printf("%s: timeout, status 0x%x\n", sc->sc_dev.dv_xname, st);
298 1.2.10.2 kardel bus_space_write_1(sc->sc_iot, sc->sc_ioh, PIIX_SMB_HC,
299 1.2.10.2 kardel PIIX_SMB_HC_KILL);
300 1.2.10.2 kardel DELAY(PIIXPM_DELAY);
301 1.2.10.2 kardel st = bus_space_read_1(sc->sc_iot, sc->sc_ioh, PIIX_SMB_HS);
302 1.2.10.2 kardel if ((st & PIIX_SMB_HS_FAILED) == 0)
303 1.2.10.2 kardel printf("%s: transaction abort failed, status 0x%x\n",
304 1.2.10.2 kardel sc->sc_dev.dv_xname, st);
305 1.2.10.2 kardel bus_space_write_1(sc->sc_iot, sc->sc_ioh, PIIX_SMB_HS, st);
306 1.2.10.2 kardel return (1);
307 1.2.10.2 kardel }
308 1.2.10.2 kardel
309 1.2.10.2 kardel int
310 1.2.10.2 kardel piixpm_intr(void *arg)
311 1.2.10.2 kardel {
312 1.2.10.2 kardel struct piixpm_softc *sc = arg;
313 1.2.10.2 kardel u_int8_t st;
314 1.2.10.2 kardel u_int8_t *b;
315 1.2.10.2 kardel size_t len;
316 1.2.10.2 kardel
317 1.2.10.2 kardel /* Read status */
318 1.2.10.2 kardel st = bus_space_read_1(sc->sc_iot, sc->sc_ioh, PIIX_SMB_HS);
319 1.2.10.2 kardel if ((st & PIIX_SMB_HS_BUSY) != 0 || (st & (PIIX_SMB_HS_INTR |
320 1.2.10.2 kardel PIIX_SMB_HS_DEVERR | PIIX_SMB_HS_BUSERR |
321 1.2.10.2 kardel PIIX_SMB_HS_FAILED)) == 0)
322 1.2.10.2 kardel /* Interrupt was not for us */
323 1.2.10.2 kardel return (0);
324 1.2.10.2 kardel
325 1.2.10.2 kardel DPRINTF(("%s: intr st 0x%b\n", sc->sc_dev.dv_xname, st,
326 1.2.10.2 kardel PIIX_SMB_HS_BITS));
327 1.2.10.2 kardel
328 1.2.10.2 kardel /* Clear status bits */
329 1.2.10.2 kardel bus_space_write_1(sc->sc_iot, sc->sc_ioh, PIIX_SMB_HS, st);
330 1.2.10.2 kardel
331 1.2.10.2 kardel /* Check for errors */
332 1.2.10.2 kardel if (st & (PIIX_SMB_HS_DEVERR | PIIX_SMB_HS_BUSERR |
333 1.2.10.2 kardel PIIX_SMB_HS_FAILED)) {
334 1.2.10.2 kardel sc->sc_i2c_xfer.error = 1;
335 1.2.10.2 kardel goto done;
336 1.2.10.2 kardel }
337 1.2.10.2 kardel
338 1.2.10.2 kardel if (st & PIIX_SMB_HS_INTR) {
339 1.2.10.2 kardel if (I2C_OP_WRITE_P(sc->sc_i2c_xfer.op))
340 1.2.10.2 kardel goto done;
341 1.2.10.2 kardel
342 1.2.10.2 kardel /* Read data */
343 1.2.10.2 kardel b = sc->sc_i2c_xfer.buf;
344 1.2.10.2 kardel len = sc->sc_i2c_xfer.len;
345 1.2.10.2 kardel if (len > 0)
346 1.2.10.2 kardel b[0] = bus_space_read_1(sc->sc_iot, sc->sc_ioh,
347 1.2.10.2 kardel PIIX_SMB_HD0);
348 1.2.10.2 kardel if (len > 1)
349 1.2.10.2 kardel b[1] = bus_space_read_1(sc->sc_iot, sc->sc_ioh,
350 1.2.10.2 kardel PIIX_SMB_HD1);
351 1.2.10.2 kardel }
352 1.2.10.2 kardel
353 1.2.10.2 kardel done:
354 1.2.10.2 kardel if ((sc->sc_i2c_xfer.flags & I2C_F_POLL) == 0)
355 1.2.10.2 kardel wakeup(sc);
356 1.2.10.2 kardel return (1);
357 1.2.10.2 kardel }
358