File: [local] / sys / dev / acpi / acpitz.c (download)
Revision 1.1.1.1 (vendor branch), Tue Mar 4 16:14:48 2008 UTC (16 years, 3 months ago) by nbrk
Branch: OPENBSD_4_2_BASE, MAIN
CVS Tags: jornada-partial-support-wip, HEAD Changes since 1.1: +0 -0 lines
Import of OpenBSD 4.2 release kernel tree with initial code to support
Jornada 720/728, StrongARM 1110-based handheld PC.
At this point kernel roots on NFS and boots into vfs_mountroot() and traps.
What is supported:
- glass console, Jornada framebuffer (jfb) works in 16bpp direct color mode
(needs some palette tweaks for non black/white/blue colors, i think)
- saic, SA11x0 interrupt controller (needs cleanup)
- sacom, SA11x0 UART (supported only as boot console for now)
- SA11x0 GPIO controller fully supported (but can't handle multiple interrupt
handlers on one gpio pin)
- sassp, SSP port on SA11x0 that attaches spibus
- Jornada microcontroller (jmcu) to control kbd, battery, etc throught
the SPI bus (wskbd attaches on jmcu, but not tested)
- tod functions seem work
- initial code for SA-1111 (chip companion) : this is TODO
Next important steps, i think:
- gpio and intc on sa1111
- pcmcia support for sa11x0 (and sa1111 help logic)
- REAL root on nfs when we have PCMCIA support (we may use any of supported pccard NICs)
- root on wd0! (using already supported PCMCIA-ATA)
|
/* $OpenBSD: acpitz.c,v 1.17 2007/03/26 12:30:48 marco Exp $ */
/*
* Copyright (c) 2006 Can Erkin Acar <canacar@openbsd.org>
* Copyright (c) 2005 Marco Peereboom <marco@openbsd.org>
*
* Permission to use, copy, modify, and distribute this software for any
* purpose with or without fee is hereby granted, provided that the above
* copyright notice and this permission notice appear in all copies.
*
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
*/
#include <sys/param.h>
#include <sys/proc.h>
#include <sys/signalvar.h>
#include <sys/systm.h>
#include <sys/device.h>
#include <sys/malloc.h>
#include <machine/bus.h>
#include <dev/acpi/acpireg.h>
#include <dev/acpi/acpivar.h>
#include <dev/acpi/acpidev.h>
#include <dev/acpi/amltypes.h>
#include <dev/acpi/dsdt.h>
#include <sys/sensors.h>
#define ACPITZ_MAX_AC 10
struct acpitz_softc {
struct device sc_dev;
struct acpi_softc *sc_acpi;
struct aml_node *sc_devnode;
int sc_tmp;
int sc_crt;
int sc_hot;
int sc_ac[ACPITZ_MAX_AC];
int sc_ac_stat[ACPITZ_MAX_AC];
int sc_pse;
int sc_psv;
int sc_tc1;
int sc_tc2;
int sc_lasttmp;
struct ksensor sc_sens;
struct ksensordev sc_sensdev;
};
int acpitz_match(struct device *, void *, void *);
void acpitz_attach(struct device *, struct device *, void *);
struct cfattach acpitz_ca = {
sizeof(struct acpitz_softc), acpitz_match, acpitz_attach
};
struct cfdriver acpitz_cd = {
NULL, "acpitz", DV_DULL
};
void acpitz_monitor(struct acpitz_softc *);
void acpitz_refresh(void *);
int acpitz_notify(struct aml_node *, int, void *);
int acpitz_getreading(struct acpitz_softc *, char *);
int acpitz_setfan(struct acpitz_softc *, int, char *);
int acpitz_setcpu(struct acpitz_softc *, int);
int
acpitz_match(struct device *parent, void *match, void *aux)
{
struct acpi_attach_args *aa = aux;
struct cfdata *cf = match;
/* sanity */
if (aa->aaa_name == NULL ||
strcmp(aa->aaa_name, cf->cf_driver->cd_name) != 0 ||
aa->aaa_table != NULL)
return (0);
if (aa->aaa_node->value->type != AML_OBJTYPE_THERMZONE)
return (0);
return (1);
}
void
acpitz_attach(struct device *parent, struct device *self, void *aux)
{
struct acpitz_softc *sc = (struct acpitz_softc *)self;
struct acpi_attach_args *aa = aux;
int i;
char name[8];
sc->sc_acpi = (struct acpi_softc *)parent;
sc->sc_devnode = aa->aaa_node->child;
sc->sc_lasttmp = -1;
if ((sc->sc_tmp = acpitz_getreading(sc, "_TMP")) == -1) {
printf(", failed to read _TMP\n");
return;
}
if ((sc->sc_crt = acpitz_getreading(sc, "_CRT")) == -1) {
printf(", no critical temperature defined!\n");
sc->sc_crt = 0;
} else
printf(", critical temperature: %d degC\n",
(sc->sc_crt - 2732) / 10);
for (i = 0; i < ACPITZ_MAX_AC; i++) {
snprintf(name, sizeof name, "_AC%d", i);
sc->sc_ac[i] = acpitz_getreading(sc, name);
sc->sc_ac_stat[0] = -1;
}
sc->sc_hot = acpitz_getreading(sc, "_HOT");
sc->sc_tc1 = acpitz_getreading(sc, "_TC1");
sc->sc_tc2 = acpitz_getreading(sc, "_TC2");
sc->sc_psv = acpitz_getreading(sc, "_PSV");
strlcpy(sc->sc_sensdev.xname, DEVNAME(sc),
sizeof(sc->sc_sensdev.xname));
strlcpy(sc->sc_sens.desc, "zone temperature",
sizeof(sc->sc_sens.desc));
sc->sc_sens.type = SENSOR_TEMP;
sensor_attach(&sc->sc_sensdev, &sc->sc_sens);
sensordev_install(&sc->sc_sensdev);
sc->sc_sens.value = 0;
aml_register_notify(sc->sc_devnode->parent, NULL,
acpitz_notify, sc, ACPIDEV_POLL);
}
int
acpitz_setcpu(struct acpitz_softc *sc, int trend)
{
struct aml_value res0, *ref;
int x;
if (aml_evalname(sc->sc_acpi, sc->sc_devnode, "_PSL", 0, NULL, &res0)) {
printf("%s: _PSL failed\n", DEVNAME(sc));
goto out;
}
if (res0.type != AML_OBJTYPE_PACKAGE) {
printf("%s: not a package\n", DEVNAME(sc));
goto out;
}
for (x = 0; x < res0.length; x++) {
if (res0.v_package[x]->type != AML_OBJTYPE_OBJREF) {
printf("%s: _PSL[%d] not a object ref\n", DEVNAME(sc), x);
continue;
}
ref = res0.v_package[x]->v_objref.ref;
if (ref->type != AML_OBJTYPE_PROCESSOR)
printf("%s: _PSL[%d] not a CPU\n", DEVNAME(sc), x);
}
out:
aml_freevalue(&res0);
return (0);
}
int
acpitz_setfan(struct acpitz_softc *sc, int i, char *method)
{
struct aml_value res0, res1, res2, *ref;
char name[8];
int rv = 1, x, y;
dnprintf(20, "%s: acpitz_setfan(%d, %s)\n", DEVNAME(sc), i, method);
snprintf(name, sizeof name, "_AL%d", i);
if (aml_evalname(sc->sc_acpi, sc->sc_devnode, name, 0, NULL, &res0)) {
dnprintf(20, "%s: %s failed\n", DEVNAME(sc), name);
goto out;
}
if (res0.type != AML_OBJTYPE_PACKAGE) {
printf("%s: %s not a package\n", DEVNAME(sc), name);
goto out;
}
for (x = 0; x < res0.length; x++) {
if (res0.v_package[x]->type != AML_OBJTYPE_OBJREF) {
printf("%s: %s[%d] not a object ref\n", DEVNAME(sc),
name, x);
continue;
}
ref = res0.v_package[x]->v_objref.ref;
if (aml_evalname(sc->sc_acpi, ref->node, "_PR0",0 , NULL,
&res1)) {
printf("%s: %s[%d] _PR0 failed\n", DEVNAME(sc),
name, x);
aml_freevalue(&res1);
continue;
}
if (res1.type != AML_OBJTYPE_PACKAGE) {
printf("%s: %s[%d] _PR0 not a package\n", DEVNAME(sc),
name, x);
aml_freevalue(&res1);
continue;
}
for (y = 0; y < res1.length; y++) {
if (res1.v_package[y]->type != AML_OBJTYPE_OBJREF) {
printf("%s: %s[%d.%d] _PR0 not a package\n",
DEVNAME(sc), name, x, y);
continue;
}
ref = res1.v_package[y]->v_objref.ref;
if (aml_evalname(sc->sc_acpi, ref->node, method, 0,
NULL, NULL))
printf("%s: %s[%d.%d] %s fails\n",
DEVNAME(sc), name, x, y, method);
/* save off status of fan */
if (aml_evalname(sc->sc_acpi, ref->node, "_STA", 0,
NULL, &res2))
printf("%s: %s[%d.%d] _STA fails\n",
DEVNAME(sc), name, x, y);
else {
sc->sc_ac_stat[i] = aml_val2int(&res2);
aml_freevalue(&res2);
}
}
aml_freevalue(&res1);
}
rv = 0;
out:
aml_freevalue(&res0);
return (rv);
}
void
acpitz_refresh(void *arg)
{
struct acpitz_softc *sc = arg;
int i, trend;
extern int acpi_s5;
dnprintf(30, "%s: %s: refresh\n", DEVNAME(sc),
sc->sc_devnode->parent->name);
if (-1 == (sc->sc_tmp = acpitz_getreading(sc, "_TMP"))) {
dnprintf(30, "%s: %s: failed to read temp!\n", DEVNAME(sc),
sc->sc_devnode->parent->name);
sc->sc_tmp = 0; /* XXX */
}
if (sc->sc_crt != -1 && sc->sc_crt <= sc->sc_tmp) {
/* Do critical shutdown */
printf("%s: Critical temperature, shutting down!\n",
DEVNAME(sc));
acpi_s5 = 1;
psignal(initproc, SIGUSR1);
}
if (sc->sc_hot != -1 && sc->sc_hot <= sc->sc_tmp)
printf("%s: _HOT temperature\n", DEVNAME(sc));
if (sc->sc_lasttmp != -1 && sc->sc_tc1 != -1 && sc->sc_tc2 != -1 &&
sc->sc_psv != -1) {
if (sc->sc_psv <= sc->sc_tmp) {
sc->sc_pse = 1;
trend = sc->sc_tc1 * (sc->sc_tmp - sc->sc_lasttmp) +
sc->sc_tc2 * (sc->sc_tmp - sc->sc_psv);
/* printf("_TZ trend = %d\n", trend); */
} else if (sc->sc_pse)
sc->sc_pse = 0;
}
sc->sc_lasttmp = sc->sc_tmp;
for (i = 0; i < ACPITZ_MAX_AC; i++) {
if (sc->sc_ac[i] != -1 && sc->sc_ac[i] <= sc->sc_tmp) {
/* turn on fan i */
if (sc->sc_ac_stat[i] <= 0)
acpitz_setfan(sc, i, "_ON_");
} else if (sc->sc_ac[i] != -1) {
/* turn off fan i */
if (sc->sc_ac_stat[i] > 0)
acpitz_setfan(sc, i, "_OFF");
}
}
sc->sc_sens.value = sc->sc_tmp * 100000;
}
int
acpitz_getreading(struct acpitz_softc *sc, char *name)
{
struct aml_value res;
int rv = -1;
if (aml_evalname(sc->sc_acpi, sc->sc_devnode, name, 0, NULL, &res)) {
dnprintf(10, "%s: no %s\n", DEVNAME(sc), name);
goto out;
}
rv = aml_val2int(&res);
out:
aml_freevalue(&res);
return (rv);
}
int
acpitz_notify(struct aml_node *node, int notify_type, void *arg)
{
struct acpitz_softc *sc = arg;
u_int64_t crt;
dnprintf(10, "%s notify: %.2x %s\n", DEVNAME(sc), notify_type,
sc->sc_devnode->parent->name);
switch (notify_type) {
case 0x81: /* Operating Points changed */
sc->sc_psv = acpitz_getreading(sc, "_PSV");
crt = sc->sc_crt;
sc->sc_crt = acpitz_getreading(sc, "_CRT");
if (crt != sc->sc_crt)
printf("%s: critical temperature: %u degC",
DEVNAME(sc), (sc->sc_crt - 2732) / 10);
break;
default:
break;
}
acpitz_refresh(sc);
return (0);
}