File: [local] / sys / dev / i2c / lm87.c (download)
Revision 1.1.1.1 (vendor branch), Tue Mar 4 16:09:58 2008 UTC (16 years, 5 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: lm87.c,v 1.19 2007/06/24 05:34:35 dlg Exp $ */
/*
* Copyright (c) 2005 Mark Kettenis
*
* 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/systm.h>
#include <sys/device.h>
#include <sys/sensors.h>
#include <dev/i2c/i2cvar.h>
/* LM87 registers */
#define LM87_2_5V 0x20
#define LM87_VCCP1 0x21
#define LM87_VCC 0x22
#define LM87_5V 0x23
#define LM87_12V 0x24
#define LM87_VCCP2 0x25
#define LM87_EXT_TEMP 0x26
#define LM87_INT_TEMP 0x27
#define LM87_FAN1 0x28
#define LM87_FAN2 0x29
#define LM87_REVISION 0x3f
#define LM87_CONFIG1 0x40
#define LM87_CONFIG1_START 0x01
#define LM87_CONFIG1_INTCLR 0x08
#define LM87_CHANNEL 0x16
#define LM87_CHANNEL_AIN1 0x01
#define LM87_CHANNEL_AIN2 0x02
#define LM87_FANDIV 0x47
/* Sensors */
#define LMENV_2_5V 0
#define LMENV_VCCP1 1
#define LMENV_VCC 2
#define LMENV_5V 3
#define LMENV_12V 4
#define LMENV_VCCP2 5
#define LMENV_EXT_TEMP 6
#define LMENV_INT_TEMP 7
#define LMENV_FAN1 8
#define LMENV_FAN2 9
#define LMENV_NUM_SENSORS 10
struct lmenv_softc {
struct device sc_dev;
i2c_tag_t sc_tag;
i2c_addr_t sc_addr;
struct ksensor sc_sensor[LMENV_NUM_SENSORS];
struct ksensordev sc_sensordev;
int sc_fan1_div, sc_fan2_div;
int sc_family;
};
int lmenv_match(struct device *, void *, void *);
void lmenv_attach(struct device *, struct device *, void *);
void lmenv_refresh(void *);
struct cfattach lmenv_ca = {
sizeof(struct lmenv_softc), lmenv_match, lmenv_attach
};
struct cfdriver lmenv_cd = {
NULL, "lmenv", DV_DULL
};
int
lmenv_match(struct device *parent, void *match, void *aux)
{
struct i2c_attach_args *ia = aux;
if (strcmp(ia->ia_name, "lm87") == 0 ||
strcmp(ia->ia_name, "lm87cimt") == 0 ||
strcmp(ia->ia_name, "adm9240") == 0 ||
strcmp(ia->ia_name, "lm81") == 0 ||
strcmp(ia->ia_name, "ds1780") == 0)
return (1);
return (0);
}
void
lmenv_attach(struct device *parent, struct device *self, void *aux)
{
struct lmenv_softc *sc = (struct lmenv_softc *)self;
struct i2c_attach_args *ia = aux;
u_int8_t cmd, data, data2, channel;
int i;
sc->sc_tag = ia->ia_tag;
sc->sc_addr = ia->ia_addr;
sc->sc_family = 87;
if (strcmp(ia->ia_name, "lm81") == 0 ||
strcmp(ia->ia_name, "adm9240") == 0 ||
strcmp(ia->ia_name, "ds1780") == 0)
sc->sc_family = 81;
iic_acquire_bus(sc->sc_tag, 0);
cmd = LM87_REVISION;
if (iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP,
sc->sc_addr, &cmd, sizeof cmd, &data, sizeof data, 0)) {
iic_release_bus(sc->sc_tag, 0);
printf(": cannot read ID register\n");
return;
}
printf(": %s rev %x", ia->ia_name, data);
cmd = LM87_FANDIV;
if (iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP,
sc->sc_addr, &cmd, sizeof cmd, &data, sizeof data, 0)) {
iic_release_bus(sc->sc_tag, 0);
printf(", cannot read Fan Divisor register\n");
return;
}
sc->sc_fan1_div = 1 << ((data >> 4) & 0x03);
sc->sc_fan2_div = 1 << ((data >> 6) & 0x03);
if (sc->sc_family == 87) {
cmd = LM87_CHANNEL;
if (iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP,
sc->sc_addr, &cmd, sizeof cmd, &channel,
sizeof channel, 0)) {
iic_release_bus(sc->sc_tag, 0);
printf(", cannot read Channel register\n");
return;
}
}
cmd = LM87_CONFIG1;
if (iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP,
sc->sc_addr, &cmd, sizeof cmd, &data, sizeof data, 0)) {
iic_release_bus(sc->sc_tag, 0);
printf(", cannot read Configuration Register 1\n");
return;
}
/*
* if chip is not running, try to start it.
* if it is stalled doing an interrupt, unstall it
*/
data2 = (data | LM87_CONFIG1_START);
data2 = data2 & ~LM87_CONFIG1_INTCLR;
if (data != data2) {
if (iic_exec(sc->sc_tag, I2C_OP_WRITE_WITH_STOP,
sc->sc_addr, &cmd, sizeof cmd, &data2, sizeof data2, 0)) {
iic_release_bus(sc->sc_tag, 0);
printf(", cannot write Configuration Register 1\n");
return;
}
printf(", starting scan");
}
iic_release_bus(sc->sc_tag, 0);
/* Initialize sensor data. */
strlcpy(sc->sc_sensordev.xname, sc->sc_dev.dv_xname,
sizeof(sc->sc_sensordev.xname));
sc->sc_sensor[LMENV_2_5V].type = SENSOR_VOLTS_DC;
strlcpy(sc->sc_sensor[LMENV_2_5V].desc, "+2.5Vin",
sizeof(sc->sc_sensor[LMENV_2_5V].desc));
sc->sc_sensor[LMENV_VCCP1].type = SENSOR_VOLTS_DC;
strlcpy(sc->sc_sensor[LMENV_VCCP1].desc, "Vccp",
sizeof(sc->sc_sensor[LMENV_VCCP1].desc));
sc->sc_sensor[LMENV_VCC].type = SENSOR_VOLTS_DC;
strlcpy(sc->sc_sensor[LMENV_VCC].desc, "+Vcc",
sizeof(sc->sc_sensor[LMENV_VCC].desc));
sc->sc_sensor[LMENV_5V].type = SENSOR_VOLTS_DC;
strlcpy(sc->sc_sensor[LMENV_5V].desc, "+5Vin/Vcc",
sizeof(sc->sc_sensor[LMENV_5V].desc));
sc->sc_sensor[LMENV_12V].type = SENSOR_VOLTS_DC;
strlcpy(sc->sc_sensor[LMENV_12V].desc, "+12Vin",
sizeof(sc->sc_sensor[LMENV_12V].desc));
sc->sc_sensor[LMENV_VCCP2].type = SENSOR_VOLTS_DC;
strlcpy(sc->sc_sensor[LMENV_VCCP2].desc, "Vccp",
sizeof(sc->sc_sensor[LMENV_VCCP2].desc));
sc->sc_sensor[LMENV_EXT_TEMP].type = SENSOR_TEMP;
strlcpy(sc->sc_sensor[LMENV_EXT_TEMP].desc, "External",
sizeof(sc->sc_sensor[LMENV_EXT_TEMP].desc));
if (sc->sc_family == 81)
sc->sc_sensor[LMENV_EXT_TEMP].flags |= SENSOR_FINVALID;
sc->sc_sensor[LMENV_INT_TEMP].type = SENSOR_TEMP;
strlcpy(sc->sc_sensor[LMENV_INT_TEMP].desc, "Internal",
sizeof(sc->sc_sensor[LMENV_INT_TEMP].desc));
if (channel & LM87_CHANNEL_AIN1) {
sc->sc_sensor[LMENV_FAN1].type = SENSOR_VOLTS_DC;
strlcpy(sc->sc_sensor[LMENV_FAN1].desc, "AIN1",
sizeof(sc->sc_sensor[LMENV_FAN1].desc));
} else {
sc->sc_sensor[LMENV_FAN1].type = SENSOR_FANRPM;
}
if (channel & LM87_CHANNEL_AIN2) {
sc->sc_sensor[LMENV_FAN2].type = SENSOR_VOLTS_DC;
strlcpy(sc->sc_sensor[LMENV_FAN2].desc, "AIN2",
sizeof(sc->sc_sensor[LMENV_FAN2].desc));
} else {
sc->sc_sensor[LMENV_FAN2].type = SENSOR_FANRPM;
}
if (sensor_task_register(sc, lmenv_refresh, 5) == NULL) {
printf(", unable to register update task\n");
return;
}
for (i = 0; i < LMENV_NUM_SENSORS; i++)
sensor_attach(&sc->sc_sensordev, &sc->sc_sensor[i]);
sensordev_install(&sc->sc_sensordev);
printf("\n");
}
void
lmenv_refresh(void *arg)
{
struct lmenv_softc *sc = arg;
u_int8_t cmd, data;
u_int tmp;
int sensor;
iic_acquire_bus(sc->sc_tag, 0);
for (sensor = 0; sensor < LMENV_NUM_SENSORS; sensor++) {
cmd = LM87_2_5V + sensor;
if (iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP,
sc->sc_addr, &cmd, sizeof cmd, &data, sizeof data, 0)) {
sc->sc_sensor[sensor].flags |= SENSOR_FINVALID;
continue;
}
sc->sc_sensor[sensor].flags &= ~SENSOR_FINVALID;
switch (sensor) {
case LMENV_2_5V:
sc->sc_sensor[sensor].value = 2500000 * data / 192;
break;
case LMENV_5V:
sc->sc_sensor[sensor].value = 5000000 * data / 192;
break;
case LMENV_12V:
sc->sc_sensor[sensor].value = 12000000 * data / 192;
break;
case LMENV_VCCP1:
case LMENV_VCCP2:
sc->sc_sensor[sensor].value = 2700000 * data / 192;
break;
case LMENV_VCC:
sc->sc_sensor[sensor].value = 3300000 * data / 192;
break;
case LMENV_EXT_TEMP:
if (sc->sc_family == 81) {
sc->sc_sensor[sensor].flags |= SENSOR_FINVALID;
break; /* missing on LM81 */
}
/* FALLTHROUGH */
case LMENV_INT_TEMP:
if (data == 0x80)
sc->sc_sensor[sensor].flags |= SENSOR_FINVALID;
else
sc->sc_sensor[sensor].value =
(int8_t)data * 1000000 + 273150000;
break;
case LMENV_FAN1:
if (sc->sc_sensor[sensor].type == SENSOR_VOLTS_DC) {
sc->sc_sensor[sensor].value =
1870000 * data / 192;
break;
}
tmp = data * sc->sc_fan1_div;
if (tmp == 0)
sc->sc_sensor[sensor].flags |= SENSOR_FINVALID;
else
sc->sc_sensor[sensor].value = 1350000 / tmp;
break;
case LMENV_FAN2:
if (sc->sc_sensor[sensor].type == SENSOR_VOLTS_DC) {
sc->sc_sensor[sensor].value =
1870000 * data / 192;
break;
}
tmp = data * sc->sc_fan2_div;
if (tmp == 0)
sc->sc_sensor[sensor].flags |= SENSOR_FINVALID;
else
sc->sc_sensor[sensor].value = 1350000 / tmp;
break;
default:
sc->sc_sensor[sensor].flags |= SENSOR_FINVALID;
break;
}
}
iic_release_bus(sc->sc_tag, 0);
}