ichlpcib.c revision 1.7 1 /* $NetBSD: ichlpcib.c,v 1.7 2008/01/15 00:24:47 drochner Exp $ */
2
3 /*-
4 * Copyright (c) 2004 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Minoura Makoto and Matthew R. Green.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed by the NetBSD
21 * Foundation, Inc. and its contributors.
22 * 4. Neither the name of The NetBSD Foundation nor the names of its
23 * contributors may be used to endorse or promote products derived
24 * from this software without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 * POSSIBILITY OF SUCH DAMAGE.
37 */
38
39 /*
40 * Intel I/O Controller Hub (ICHn) LPC Interface Bridge driver
41 *
42 * LPC Interface Bridge is basically a pcib (PCI-ISA Bridge), but has
43 * some power management and monitoring functions.
44 * Currently we support the watchdog timer, SpeedStep (on some systems)
45 * and the power management timer.
46 */
47
48 #include <sys/cdefs.h>
49 __KERNEL_RCSID(0, "$NetBSD: ichlpcib.c,v 1.7 2008/01/15 00:24:47 drochner Exp $");
50
51 #include <sys/types.h>
52 #include <sys/param.h>
53 #include <sys/systm.h>
54 #include <sys/device.h>
55 #include <sys/sysctl.h>
56 #include <sys/timetc.h>
57 #include <machine/bus.h>
58
59 #include <dev/pci/pcivar.h>
60 #include <dev/pci/pcireg.h>
61 #include <dev/pci/pcidevs.h>
62
63 #include <dev/sysmon/sysmonvar.h>
64
65 #include <dev/ic/acpipmtimer.h>
66 #include <dev/ic/i82801lpcreg.h>
67 #include <dev/ic/hpetreg.h>
68 #include <dev/ic/hpetvar.h>
69
70 #include "hpet.h"
71
72 struct lpcib_softc {
73 /* Device object. */
74 struct device sc_dev;
75
76 pci_chipset_tag_t sc_pc;
77 pcitag_t sc_pcitag;
78
79 struct pci_attach_args sc_pa;
80 int sc_has_rcba;
81 int sc_has_ich5_hpet;
82
83 /* RCBA */
84 bus_space_tag_t sc_rcbat;
85 bus_space_handle_t sc_rcbah;
86 pcireg_t sc_rcba_reg;
87
88 /* Watchdog variables. */
89 struct sysmon_wdog sc_smw;
90 bus_space_tag_t sc_iot;
91 bus_space_handle_t sc_ioh;
92
93 #if NHPET > 0
94 /* HPET variables. */
95 uint32_t sc_hpet_reg;
96 #endif
97
98 /* Power management */
99 pcireg_t sc_pirq[2];
100 pcireg_t sc_pmcon;
101 pcireg_t sc_fwhsel2;
102 };
103
104 static int lpcibmatch(struct device *, struct cfdata *, void *);
105 static void lpcibattach(struct device *, struct device *, void *);
106 static bool lpcib_suspend(device_t);
107 static bool lpcib_resume(device_t);
108
109 static void pmtimer_configure(struct lpcib_softc *);
110
111 static void tcotimer_configure(struct lpcib_softc *);
112 static int tcotimer_setmode(struct sysmon_wdog *);
113 static int tcotimer_tickle(struct sysmon_wdog *);
114 static void tcotimer_stop(struct lpcib_softc *);
115 static void tcotimer_start(struct lpcib_softc *);
116 static void tcotimer_status_reset(struct lpcib_softc *);
117 static int tcotimer_disable_noreboot(struct lpcib_softc *);
118
119 static void speedstep_configure(struct lpcib_softc *);
120 static int speedstep_sysctl_helper(SYSCTLFN_ARGS);
121
122 #if NHPET > 0
123 static void lpcib_hpet_configure(struct lpcib_softc *);
124 #endif
125
126 struct lpcib_softc *speedstep_cookie; /* XXX */
127
128 /* Defined in arch/.../pci/pcib.c. */
129 extern void pcibattach(struct device *, struct device *, void *);
130
131 CFATTACH_DECL(ichlpcib, sizeof(struct lpcib_softc),
132 lpcibmatch, lpcibattach, NULL, NULL);
133
134 static struct lpcib_device {
135 pcireg_t vendor, product;
136 int has_rcba;
137 int has_ich5_hpet;
138 } lpcib_devices[] = {
139 { PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_82801AA_LPC, 0, 0 },
140 { PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_82801BA_LPC, 0, 0 },
141 { PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_82801BAM_LPC, 0, 0 },
142 { PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_82801CA_LPC, 0, 0 },
143 { PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_82801CAM_LPC, 0, 0 },
144 { PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_82801DB_LPC, 0, 0 },
145 { PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_82801DB_ISA, 0, 0 },
146 { PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_82801EB_LPC, 0, 1 },
147 { PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_82801FB_LPC, 1, 0 },
148 { PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_82801FBM_LPC, 1, 0 },
149 { PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_82801G_LPC, 1, 0 },
150 { PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_82801GBM_LPC, 1, 0 },
151 { PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_82801GHM_LPC, 1, 0 },
152 { PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_82801H_LPC, 1, 0 },
153 { PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_82801HEM_LPC, 1, 0 },
154 { PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_82801HH_LPC, 1, 0 },
155 { PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_82801HO_LPC, 1, 0 },
156 { PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_82801HBM_LPC, 1, 0 },
157 { PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_82801IH_LPC, 1, 0 },
158 { PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_82801IO_LPC, 1, 0 },
159 { PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_82801IR_LPC, 1, 0 },
160 { PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_82801IB_LPC, 1, 0 },
161 { 0, 0, 0, 0 },
162 };
163
164 /*
165 * Autoconf callbacks.
166 */
167 static int
168 lpcibmatch(struct device *parent, struct cfdata *match, void *aux)
169 {
170 struct pci_attach_args *pa = aux;
171 struct lpcib_device *lpcib_dev;
172
173 /* We are ISA bridge, of course */
174 if (PCI_CLASS(pa->pa_class) != PCI_CLASS_BRIDGE ||
175 PCI_SUBCLASS(pa->pa_class) != PCI_SUBCLASS_BRIDGE_ISA)
176 return 0;
177
178 for (lpcib_dev = lpcib_devices; lpcib_dev->vendor; ++lpcib_dev) {
179 if (PCI_VENDOR(pa->pa_id) == lpcib_dev->vendor &&
180 PCI_PRODUCT(pa->pa_id) == lpcib_dev->product)
181 return 10;
182 }
183
184 return 0;
185 }
186
187 static void
188 lpcibattach(struct device *parent, struct device *self, void *aux)
189 {
190 struct pci_attach_args *pa = aux;
191 struct lpcib_softc *sc = device_private(self);
192 struct lpcib_device *lpcib_dev;
193
194 sc->sc_pc = pa->pa_pc;
195 sc->sc_pcitag = pa->pa_tag;
196 sc->sc_pa = *pa;
197
198 for (lpcib_dev = lpcib_devices; lpcib_dev->vendor; ++lpcib_dev) {
199 if (PCI_VENDOR(pa->pa_id) != lpcib_dev->vendor ||
200 PCI_PRODUCT(pa->pa_id) != lpcib_dev->product)
201 continue;
202 sc->sc_has_rcba = lpcib_dev->has_rcba;
203 sc->sc_has_ich5_hpet = lpcib_dev->has_ich5_hpet;
204 break;
205 }
206
207 pcibattach(parent, self, aux);
208
209 /*
210 * Part of our I/O registers are used as ACPI PM regs.
211 * Since our ACPI subsystem accesses the I/O space directly so far,
212 * we do not have to bother bus_space I/O map confliction.
213 */
214 if (pci_mapreg_map(pa, LPCIB_PCI_PMBASE, PCI_MAPREG_TYPE_IO, 0,
215 &sc->sc_iot, &sc->sc_ioh, NULL, NULL)) {
216 aprint_error("%s: can't map power management i/o space",
217 sc->sc_dev.dv_xname);
218 return;
219 }
220
221 /* For ICH6 and later, always enable RCBA */
222 if (sc->sc_has_rcba) {
223 pcireg_t rcba;
224
225 sc->sc_rcbat = sc->sc_pa.pa_memt;
226
227 rcba = pci_conf_read(sc->sc_pc, sc->sc_pcitag, LPCIB_RCBA);
228 if ((rcba & LPCIB_RCBA_EN) == 0) {
229 aprint_error("%s: RCBA is not enabled",
230 sc->sc_dev.dv_xname);
231 return;
232 }
233 rcba &= ~LPCIB_RCBA_EN;
234
235 if (bus_space_map(sc->sc_rcbat, rcba, LPCIB_RCBA_SIZE, 0,
236 &sc->sc_rcbah)) {
237 aprint_error("%s: RCBA could not be mapped",
238 sc->sc_dev.dv_xname);
239 return;
240 }
241 }
242
243 /* Set up the power management timer. */
244 pmtimer_configure(sc);
245
246 /* Set up the TCO (watchdog). */
247 tcotimer_configure(sc);
248
249 /* Set up SpeedStep. */
250 speedstep_configure(sc);
251
252 #if NHPET > 0
253 /* Set up HPET. */
254 lpcib_hpet_configure(sc);
255 #endif
256
257 /* Install power handler */
258 if (!pmf_device_register(self, lpcib_suspend, lpcib_resume))
259 aprint_error_dev(self, "couldn't establish power handler\n");
260 }
261
262 static bool
263 lpcib_suspend(device_t dv)
264 {
265 struct lpcib_softc *sc = device_private(dv);
266 pci_chipset_tag_t pc = sc->sc_pc;
267 pcitag_t tag = sc->sc_pcitag;
268
269 /* capture PIRQ routing control registers */
270 sc->sc_pirq[0] = pci_conf_read(pc, tag, LPCIB_PCI_PIRQA_ROUT);
271 sc->sc_pirq[1] = pci_conf_read(pc, tag, LPCIB_PCI_PIRQE_ROUT);
272
273 sc->sc_pmcon = pci_conf_read(pc, tag, LPCIB_PCI_GEN_PMCON_1);
274 sc->sc_fwhsel2 = pci_conf_read(pc, tag, LPCIB_PCI_GEN_STA);
275
276 if (sc->sc_has_rcba) {
277 sc->sc_rcba_reg = pci_conf_read(pc, tag, LPCIB_RCBA);
278 #if NHPET > 0
279 sc->sc_hpet_reg = bus_space_read_4(sc->sc_rcbat, sc->sc_rcbah,
280 LPCIB_RCBA_HPTC);
281 #endif
282 } else if (sc->sc_has_ich5_hpet) {
283 #if NHPET > 0
284 sc->sc_hpet_reg = pci_conf_read(pc, tag, LPCIB_PCI_GEN_CNTL);
285 #endif
286 }
287
288 return true;
289 }
290
291 static bool
292 lpcib_resume(device_t dv)
293 {
294 struct lpcib_softc *sc = device_private(dv);
295 pci_chipset_tag_t pc = sc->sc_pc;
296 pcitag_t tag = sc->sc_pcitag;
297
298 /* restore PIRQ routing control registers */
299 pci_conf_write(pc, tag, LPCIB_PCI_PIRQA_ROUT, sc->sc_pirq[0]);
300 pci_conf_write(pc, tag, LPCIB_PCI_PIRQE_ROUT, sc->sc_pirq[1]);
301
302 pci_conf_write(pc, tag, LPCIB_PCI_GEN_PMCON_1, sc->sc_pmcon);
303 pci_conf_write(pc, tag, LPCIB_PCI_GEN_STA, sc->sc_fwhsel2);
304
305 if (sc->sc_has_rcba) {
306 pci_conf_write(pc, tag, LPCIB_RCBA, sc->sc_rcba_reg);
307 #if NHPET > 0
308 bus_space_write_4(sc->sc_rcbat, sc->sc_rcbah, LPCIB_RCBA_HPTC,
309 sc->sc_hpet_reg);
310 #endif
311 } else if (sc->sc_has_ich5_hpet) {
312 #if NHPET > 0
313 pci_conf_write(pc, tag, LPCIB_PCI_GEN_CNTL, sc->sc_hpet_reg);
314 #endif
315 }
316
317 return true;
318 }
319
320 /*
321 * Initialize the power management timer.
322 */
323 static void
324 pmtimer_configure(struct lpcib_softc *sc)
325 {
326 pcireg_t control;
327
328 /*
329 * Check if power management I/O space is enabled and enable the ACPI_EN
330 * bit if it's disabled.
331 */
332 control = pci_conf_read(sc->sc_pc, sc->sc_pcitag, LPCIB_PCI_ACPI_CNTL);
333 if ((control & LPCIB_PCI_ACPI_CNTL_EN) == 0) {
334 control |= LPCIB_PCI_ACPI_CNTL_EN;
335 pci_conf_write(sc->sc_pc, sc->sc_pcitag, LPCIB_PCI_ACPI_CNTL,
336 control);
337 }
338
339 /* Attach our PM timer with the generic acpipmtimer function */
340 acpipmtimer_attach(&sc->sc_dev, sc->sc_iot, sc->sc_ioh,
341 LPCIB_PM1_TMR, 0);
342 }
343
344 /*
345 * Initialize the watchdog timer.
346 */
347 static void
348 tcotimer_configure(struct lpcib_softc *sc)
349 {
350 uint32_t ioreg;
351 unsigned int period;
352
353 /*
354 * Clear the No Reboot (NR) bit. If this fails, enabling the TCO_EN bit
355 * in the SMI_EN register is the last chance.
356 */
357 if (tcotimer_disable_noreboot(sc)) {
358 ioreg = bus_space_read_4(sc->sc_iot, sc->sc_ioh, LPCIB_SMI_EN);
359 ioreg |= LPCIB_SMI_EN_TCO_EN;
360 bus_space_write_4(sc->sc_iot, sc->sc_ioh, LPCIB_SMI_EN, ioreg);
361 }
362
363 /* Reset the watchdog status registers. */
364 tcotimer_status_reset(sc);
365
366 /* Explicitly stop the TCO timer. */
367 tcotimer_stop(sc);
368
369 /*
370 * Register the driver with the sysmon watchdog framework.
371 */
372 sc->sc_smw.smw_name = sc->sc_dev.dv_xname;
373 sc->sc_smw.smw_cookie = sc;
374 sc->sc_smw.smw_setmode = tcotimer_setmode;
375 sc->sc_smw.smw_tickle = tcotimer_tickle;
376 if (sc->sc_has_rcba)
377 period = LPCIB_TCOTIMER2_MAX_TICK;
378 else
379 period = LPCIB_TCOTIMER_MAX_TICK;
380 sc->sc_smw.smw_period = lpcib_tcotimer_tick_to_second(period);
381
382 if (sysmon_wdog_register(&sc->sc_smw)) {
383 aprint_error("%s: unable to register TCO timer"
384 "as a sysmon watchdog device.\n",
385 sc->sc_dev.dv_xname);
386 return;
387 }
388
389 aprint_verbose("%s: TCO (watchdog) timer configured.\n",
390 sc->sc_dev.dv_xname);
391 }
392
393 /*
394 * Sysmon watchdog callbacks.
395 */
396 static int
397 tcotimer_setmode(struct sysmon_wdog *smw)
398 {
399 struct lpcib_softc *sc = smw->smw_cookie;
400 unsigned int period;
401 uint16_t ich6period = 0;
402
403 if ((smw->smw_mode & WDOG_MODE_MASK) == WDOG_MODE_DISARMED) {
404 /* Stop the TCO timer. */
405 tcotimer_stop(sc);
406 } else {
407 /*
408 * ICH6 or newer are limited to 2s min and 613s max.
409 * ICH5 or older are limited to 4s min and 39s max.
410 */
411 if (sc->sc_has_rcba) {
412 if (smw->smw_period < LPCIB_TCOTIMER2_MIN_TICK ||
413 smw->smw_period > LPCIB_TCOTIMER2_MAX_TICK)
414 return EINVAL;
415 } else {
416 if (smw->smw_period < LPCIB_TCOTIMER_MIN_TICK ||
417 smw->smw_period > LPCIB_TCOTIMER_MAX_TICK)
418 return EINVAL;
419 }
420 period = lpcib_tcotimer_second_to_tick(smw->smw_period);
421
422 /* Stop the TCO timer, */
423 tcotimer_stop(sc);
424
425 /* set the timeout, */
426 if (sc->sc_has_rcba) {
427 /* ICH6 or newer */
428 ich6period = bus_space_read_2(sc->sc_iot, sc->sc_ioh,
429 LPCIB_TCO_TMR2);
430 ich6period &= 0xfc00;
431 bus_space_write_2(sc->sc_iot, sc->sc_ioh,
432 LPCIB_TCO_TMR2, ich6period | period);
433 } else {
434 /* ICH5 or older */
435 period |= bus_space_read_1(sc->sc_iot, sc->sc_ioh,
436 LPCIB_TCO_TMR);
437 period &= 0xc0;
438 bus_space_write_1(sc->sc_iot, sc->sc_ioh,
439 LPCIB_TCO_TMR, period);
440 }
441
442 /* and start/reload the timer. */
443 tcotimer_start(sc);
444 tcotimer_tickle(smw);
445 }
446
447 return 0;
448 }
449
450 static int
451 tcotimer_tickle(struct sysmon_wdog *smw)
452 {
453 struct lpcib_softc *sc = smw->smw_cookie;
454
455 /* any value is allowed */
456 if (sc->sc_has_rcba)
457 bus_space_write_2(sc->sc_iot, sc->sc_ioh, LPCIB_TCO_RLD, 1);
458 else
459 bus_space_write_1(sc->sc_iot, sc->sc_ioh, LPCIB_TCO_RLD, 1);
460
461 return 0;
462 }
463
464 static void
465 tcotimer_stop(struct lpcib_softc *sc)
466 {
467 uint16_t ioreg;
468
469 ioreg = bus_space_read_2(sc->sc_iot, sc->sc_ioh, LPCIB_TCO1_CNT);
470 ioreg |= LPCIB_TCO1_CNT_TCO_TMR_HLT;
471 bus_space_write_2(sc->sc_iot, sc->sc_ioh, LPCIB_TCO1_CNT, ioreg);
472 }
473
474 static void
475 tcotimer_start(struct lpcib_softc *sc)
476 {
477 uint16_t ioreg;
478
479 ioreg = bus_space_read_2(sc->sc_iot, sc->sc_ioh, LPCIB_TCO1_CNT);
480 ioreg &= ~LPCIB_TCO1_CNT_TCO_TMR_HLT;
481 bus_space_write_2(sc->sc_iot, sc->sc_ioh, LPCIB_TCO1_CNT, ioreg);
482 }
483
484 static void
485 tcotimer_status_reset(struct lpcib_softc *sc)
486 {
487 bus_space_write_2(sc->sc_iot, sc->sc_ioh, LPCIB_TCO1_STS,
488 LPCIB_TCO1_STS_TIMEOUT);
489 bus_space_write_2(sc->sc_iot, sc->sc_ioh, LPCIB_TCO2_STS,
490 LPCIB_TCO2_STS_BOOT_STS);
491 bus_space_write_2(sc->sc_iot, sc->sc_ioh, LPCIB_TCO2_STS,
492 LPCIB_TCO2_STS_SECONDS_TO_STS);
493 }
494
495 /*
496 * Clear the No Reboot (NR) bit, this enables reboots when the timer
497 * reaches the timeout for the second time.
498 */
499 static int
500 tcotimer_disable_noreboot(struct lpcib_softc *sc)
501 {
502
503 if (sc->sc_has_rcba) {
504 uint32_t status;
505
506 status = bus_space_read_4(sc->sc_rcbat, sc->sc_rcbah, LPCIB_GCS_OFFSET);
507 status &= ~LPCIB_GCS_NO_REBOOT;
508 bus_space_write_4(sc->sc_rcbat, sc->sc_rcbah, LPCIB_GCS_OFFSET, status);
509 status = bus_space_read_4(sc->sc_rcbat, sc->sc_rcbah, LPCIB_GCS_OFFSET);
510 if (status & LPCIB_GCS_NO_REBOOT)
511 goto error;
512 } else {
513 pcireg_t pcireg;
514
515 pcireg = pci_conf_read(sc->sc_pc, sc->sc_pcitag,
516 LPCIB_PCI_GEN_STA);
517 if (pcireg & LPCIB_PCI_GEN_STA_NO_REBOOT) {
518 /* TCO timeout reset is disabled; try to enable it */
519 pcireg &= ~LPCIB_PCI_GEN_STA_NO_REBOOT;
520 pci_conf_write(sc->sc_pc, sc->sc_pcitag,
521 LPCIB_PCI_GEN_STA, pcireg);
522 if (pcireg & LPCIB_PCI_GEN_STA_NO_REBOOT)
523 goto error;
524 }
525 }
526
527 return 0;
528 error:
529 aprint_error("%s: TCO timer reboot disabled by hardware; "
530 "hope SMBIOS properly handles it.\n", sc->sc_dev.dv_xname);
531 return EINVAL;
532 }
533
534
535 /*
536 * Intel ICH SpeedStep support.
537 */
538 #define SS_READ(sc, reg) \
539 bus_space_read_1((sc)->sc_iot, (sc)->sc_ioh, (reg))
540 #define SS_WRITE(sc, reg, val) \
541 bus_space_write_1((sc)->sc_iot, (sc)->sc_ioh, (reg), (val))
542
543 /*
544 * Linux driver says that SpeedStep on older chipsets cause
545 * lockups on Dell Inspiron 8000 and 8100.
546 */
547 static int
548 speedstep_bad_hb_check(struct pci_attach_args *pa)
549 {
550
551 if (PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_INTEL_82815_FULL_HUB &&
552 PCI_REVISION(pa->pa_class) < 5)
553 return 1;
554
555 return 0;
556 }
557
558 static void
559 speedstep_configure(struct lpcib_softc *sc)
560 {
561 const struct sysctlnode *node, *ssnode;
562 int rv;
563
564 /* Supported on ICH2-M, ICH3-M and ICH4-M. */
565 if (PCI_PRODUCT(sc->sc_pa.pa_id) == PCI_PRODUCT_INTEL_82801DB_ISA ||
566 PCI_PRODUCT(sc->sc_pa.pa_id) == PCI_PRODUCT_INTEL_82801CAM_LPC ||
567 (PCI_PRODUCT(sc->sc_pa.pa_id) == PCI_PRODUCT_INTEL_82801BAM_LPC &&
568 pci_find_device(&sc->sc_pa, speedstep_bad_hb_check) == 0)) {
569 uint8_t pmcon;
570
571 /* Enable SpeedStep if it isn't already enabled. */
572 pmcon = pci_conf_read(sc->sc_pc, sc->sc_pcitag,
573 LPCIB_PCI_GEN_PMCON_1);
574 if ((pmcon & LPCIB_PCI_GEN_PMCON_1_SS_EN) == 0)
575 pci_conf_write(sc->sc_pc, sc->sc_pcitag,
576 LPCIB_PCI_GEN_PMCON_1,
577 pmcon | LPCIB_PCI_GEN_PMCON_1_SS_EN);
578
579 /* Put in machdep.speedstep_state (0 for low, 1 for high). */
580 if ((rv = sysctl_createv(NULL, 0, NULL, &node,
581 CTLFLAG_PERMANENT, CTLTYPE_NODE, "machdep", NULL,
582 NULL, 0, NULL, 0, CTL_MACHDEP, CTL_EOL)) != 0)
583 goto err;
584
585 /* CTLFLAG_ANYWRITE? kernel option like EST? */
586 if ((rv = sysctl_createv(NULL, 0, &node, &ssnode,
587 CTLFLAG_READWRITE, CTLTYPE_INT, "speedstep_state", NULL,
588 speedstep_sysctl_helper, 0, NULL, 0, CTL_CREATE,
589 CTL_EOL)) != 0)
590 goto err;
591
592 /* XXX save the sc for IO tag/handle */
593 speedstep_cookie = sc;
594 aprint_verbose("%s: SpeedStep enabled\n", sc->sc_dev.dv_xname);
595 }
596
597 return;
598
599 err:
600 aprint_normal("%s: sysctl_createv failed (rv = %d)\n", __func__, rv);
601 }
602
603 /*
604 * get/set the SpeedStep state: 0 == low power, 1 == high power.
605 */
606 static int
607 speedstep_sysctl_helper(SYSCTLFN_ARGS)
608 {
609 struct sysctlnode node;
610 struct lpcib_softc *sc = speedstep_cookie;
611 uint8_t state, state2;
612 int ostate, nstate, s, error = 0;
613
614 /*
615 * We do the dance with spl's to avoid being at high ipl during
616 * sysctl_lookup() which can both copyin and copyout.
617 */
618 s = splserial();
619 state = SS_READ(sc, LPCIB_PM_SS_CNTL);
620 splx(s);
621 if ((state & LPCIB_PM_SS_STATE_LOW) == 0)
622 ostate = 1;
623 else
624 ostate = 0;
625 nstate = ostate;
626
627 node = *rnode;
628 node.sysctl_data = &nstate;
629
630 error = sysctl_lookup(SYSCTLFN_CALL(&node));
631 if (error || newp == NULL)
632 goto out;
633
634 /* Only two states are available */
635 if (nstate != 0 && nstate != 1) {
636 error = EINVAL;
637 goto out;
638 }
639
640 s = splserial();
641 state2 = SS_READ(sc, LPCIB_PM_SS_CNTL);
642 if ((state2 & LPCIB_PM_SS_STATE_LOW) == 0)
643 ostate = 1;
644 else
645 ostate = 0;
646
647 if (ostate != nstate) {
648 uint8_t cntl;
649
650 if (nstate == 0)
651 state2 |= LPCIB_PM_SS_STATE_LOW;
652 else
653 state2 &= ~LPCIB_PM_SS_STATE_LOW;
654
655 /*
656 * Must disable bus master arbitration during the change.
657 */
658 cntl = SS_READ(sc, LPCIB_PM_CTRL);
659 SS_WRITE(sc, LPCIB_PM_CTRL, cntl | LPCIB_PM_SS_CNTL_ARB_DIS);
660 SS_WRITE(sc, LPCIB_PM_SS_CNTL, state2);
661 SS_WRITE(sc, LPCIB_PM_CTRL, cntl);
662 }
663 splx(s);
664 out:
665 return error;
666 }
667
668 #if NHPET > 0
669 struct lpcib_hpet_attach_arg {
670 bus_space_tag_t hpet_mem_t;
671 uint32_t hpet_reg;
672 };
673
674 static int
675 lpcib_hpet_match(device_t parent, struct cfdata *match, void *aux)
676 {
677 struct lpcib_hpet_attach_arg *arg = aux;
678 bus_space_tag_t tag;
679 bus_space_handle_t handle;
680
681 tag = arg->hpet_mem_t;
682
683 if (bus_space_map(tag, arg->hpet_reg, HPET_WINDOW_SIZE, 0, &handle)) {
684 aprint_verbose("%s: HPET window not mapped, skipping\n",
685 parent->dv_xname);
686 return 0;
687 }
688 bus_space_unmap(tag, handle, HPET_WINDOW_SIZE);
689
690 return 1;
691 }
692
693 static void
694 lpcib_hpet_attach(device_t parent, device_t self, void *aux)
695 {
696 struct hpet_softc *sc = device_private(self);
697 struct lpcib_hpet_attach_arg *arg = aux;
698
699 aprint_naive("\n");
700 aprint_normal("\n");
701
702 sc->sc_memt = arg->hpet_mem_t;
703
704 if (bus_space_map(sc->sc_memt, arg->hpet_reg, HPET_WINDOW_SIZE, 0,
705 &sc->sc_memh)) {
706 aprint_error("%s: HPET memory window could not be mapped",
707 sc->sc_dev.dv_xname);
708 return;
709 }
710
711 hpet_attach_subr(sc);
712 }
713
714 CFATTACH_DECL(ichlpcib_hpet, sizeof(struct hpet_softc), lpcib_hpet_match,
715 lpcib_hpet_attach, NULL, NULL);
716
717 static void
718 lpcib_hpet_configure(struct lpcib_softc *sc)
719 {
720 struct lpcib_hpet_attach_arg arg;
721 uint32_t hpet_reg, val;
722
723 if (sc->sc_has_ich5_hpet) {
724 val = pci_conf_read(sc->sc_pc, sc->sc_pcitag, LPCIB_PCI_GEN_CNTL);
725 switch (val & LPCIB_ICH5_HPTC_WIN_MASK) {
726 case LPCIB_ICH5_HPTC_0000:
727 hpet_reg = LPCIB_ICH5_HPTC_0000_BASE;
728 break;
729 case LPCIB_ICH5_HPTC_1000:
730 hpet_reg = LPCIB_ICH5_HPTC_1000_BASE;
731 break;
732 case LPCIB_ICH5_HPTC_2000:
733 hpet_reg = LPCIB_ICH5_HPTC_2000_BASE;
734 break;
735 case LPCIB_ICH5_HPTC_3000:
736 hpet_reg = LPCIB_ICH5_HPTC_3000_BASE;
737 break;
738 default:
739 return;
740 }
741 val |= sc->sc_hpet_reg | LPCIB_ICH5_HPTC_EN;
742 pci_conf_write(sc->sc_pc, sc->sc_pcitag, LPCIB_PCI_GEN_CNTL, val);
743 } else if (sc->sc_has_rcba) {
744 val = bus_space_read_4(sc->sc_rcbat, sc->sc_rcbah,
745 LPCIB_RCBA_HPTC);
746 switch (val & LPCIB_RCBA_HPTC_WIN_MASK) {
747 case LPCIB_RCBA_HPTC_0000:
748 hpet_reg = LPCIB_RCBA_HPTC_0000_BASE;
749 break;
750 case LPCIB_RCBA_HPTC_1000:
751 hpet_reg = LPCIB_RCBA_HPTC_1000_BASE;
752 break;
753 case LPCIB_RCBA_HPTC_2000:
754 hpet_reg = LPCIB_RCBA_HPTC_2000_BASE;
755 break;
756 case LPCIB_RCBA_HPTC_3000:
757 hpet_reg = LPCIB_RCBA_HPTC_3000_BASE;
758 break;
759 default:
760 return;
761 }
762 val |= LPCIB_RCBA_HPTC_EN;
763 bus_space_write_4(sc->sc_rcbat, sc->sc_rcbah, LPCIB_RCBA_HPTC,
764 val);
765 } else {
766 /* No HPET here */
767 return;
768 }
769
770 arg.hpet_mem_t = sc->sc_pa.pa_memt;
771 arg.hpet_reg = hpet_reg;
772
773 config_found_ia((struct device *)sc, "hpetichbus", &arg, NULL);
774 }
775 #endif
776