File: [local] / sys / dev / i2c / w83l784r.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: w83l784r.c,v 1.12 2007/06/24 05:34:35 dlg Exp $ */
/*
* Copyright (c) 2006 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>
/* W83L784R registers */
#define W83L784R_VCORE 0x20
#define W83L784R_VBAT 0x21
#define W83L784R_3_3V 0x22
#define W83L784R_VCC 0x23
#define W83L784R_TEMP1 0x27
#define W83L784R_FAN1 0x28
#define W83L784R_FAN2 0x29
#define W83L784R_CONFIG 0x40
#define W83L784R_FANDIV 0x49
#define W83L784R_T23ADDR 0x4b
#define W83L784R_CHIPID 0x4e
#define W83L784R_TEMP23 0x00
/* W83L785R registers */
#define W83L785R_2_5V 0x21
#define W83L785R_1_5V 0x22
#define W83L785R_VCC 0x23
#define W83L785R_TEMP2 0x26
#define W83L785R_FANDIV 0x47
/* Chip IDs */
#define WBENV_CHIPID_W83L784R 0x50
#define WBENV_CHIPID_W83L785R 0x60
#define WBENV_CHIPID_W83L785TS_L 0x70
#define WBENV_MAX_SENSORS 9
/*
* The W83L784R/W83L785R can measure voltages up to 4.096/2.048 V.
* To measure higher voltages the input is attenuated with (external)
* resistors. So we have to convert the sensor values back to real
* voltages by applying the appropriate resistor factor.
*/
#define RFACT_NONE 10000
#define RFACT(x, y) (RFACT_NONE * ((x) + (y)) / (y))
struct wbenv_softc;
struct wbenv_sensor {
char *desc;
enum sensor_type type;
u_int8_t reg;
void (*refresh)(struct wbenv_softc *, int);
int rfact;
};
struct wbenv_softc {
struct device sc_dev;
i2c_tag_t sc_tag;
i2c_addr_t sc_addr[3];
u_int8_t sc_chip_id;
struct ksensor sc_sensors[WBENV_MAX_SENSORS];
struct ksensordev sc_sensordev;
struct wbenv_sensor *sc_wbenv_sensors;
int sc_numsensors;
};
int wbenv_match(struct device *, void *, void *);
void wbenv_attach(struct device *, struct device *, void *);
void wbenv_setup_sensors(struct wbenv_softc *, struct wbenv_sensor *);
void wbenv_refresh(void *);
void w83l784r_refresh_volt(struct wbenv_softc *, int);
void w83l785r_refresh_volt(struct wbenv_softc *, int);
void wbenv_refresh_temp(struct wbenv_softc *, int);
void w83l784r_refresh_temp(struct wbenv_softc *, int);
void w83l784r_refresh_fanrpm(struct wbenv_softc *, int);
void w83l785r_refresh_fanrpm(struct wbenv_softc *, int);
u_int8_t wbenv_readreg(struct wbenv_softc *, u_int8_t);
void wbenv_writereg(struct wbenv_softc *, u_int8_t, u_int8_t);
struct cfattach wbenv_ca = {
sizeof(struct wbenv_softc), wbenv_match, wbenv_attach
};
struct cfdriver wbenv_cd = {
NULL, "wbenv", DV_DULL
};
struct wbenv_sensor w83l784r_sensors[] =
{
{ "VCore", SENSOR_VOLTS_DC, W83L784R_VCORE, w83l784r_refresh_volt, RFACT_NONE },
{ "VBAT", SENSOR_VOLTS_DC, W83L784R_VBAT, w83l784r_refresh_volt, RFACT(232, 99) },
{ "+3.3V", SENSOR_VOLTS_DC, W83L784R_3_3V, w83l784r_refresh_volt, RFACT_NONE },
{ "+5V", SENSOR_VOLTS_DC, W83L784R_VCC, w83l784r_refresh_volt, RFACT(50, 34) },
{ "", SENSOR_TEMP, W83L784R_TEMP1, wbenv_refresh_temp },
{ "", SENSOR_TEMP, 1, w83l784r_refresh_temp },
{ "", SENSOR_TEMP, 2, w83l784r_refresh_temp },
{ "", SENSOR_FANRPM, W83L784R_FAN1, w83l784r_refresh_fanrpm },
{ "", SENSOR_FANRPM, W83L784R_FAN2, w83l784r_refresh_fanrpm },
{ NULL }
};
struct wbenv_sensor w83l785r_sensors[] =
{
{ "VCore", SENSOR_VOLTS_DC, W83L784R_VCORE, w83l785r_refresh_volt, RFACT_NONE },
{ "+2.5V", SENSOR_VOLTS_DC, W83L785R_2_5V, w83l785r_refresh_volt, RFACT(100, 100) },
{ "+1.5V", SENSOR_VOLTS_DC, W83L785R_1_5V, w83l785r_refresh_volt, RFACT_NONE },
{ "+3.3V", SENSOR_VOLTS_DC, W83L785R_VCC, w83l785r_refresh_volt, RFACT(20, 40) },
{ "", SENSOR_TEMP, W83L784R_TEMP1, wbenv_refresh_temp },
{ "", SENSOR_TEMP, W83L785R_TEMP2, wbenv_refresh_temp },
{ "", SENSOR_FANRPM, W83L784R_FAN1, w83l785r_refresh_fanrpm },
{ "", SENSOR_FANRPM, W83L784R_FAN2, w83l785r_refresh_fanrpm },
{ NULL }
};
struct wbenv_sensor w83l785ts_l_sensors[] =
{
{ "", SENSOR_TEMP, W83L784R_TEMP1, wbenv_refresh_temp },
{ NULL }
};
int
wbenv_match(struct device *parent, void *match, void *aux)
{
struct i2c_attach_args *ia = aux;
if (strcmp(ia->ia_name, "w83l784r") == 0 ||
strcmp(ia->ia_name, "w83l785r") == 0 ||
strcmp(ia->ia_name, "w83l785ts-l") == 0)
return (1);
return (0);
}
void
wbenv_attach(struct device *parent, struct device *self, void *aux)
{
struct wbenv_softc *sc = (struct wbenv_softc *)self;
struct i2c_attach_args *ia = aux;
u_int8_t cmd, data, config;
int i;
sc->sc_tag = ia->ia_tag;
sc->sc_addr[0] = ia->ia_addr;
iic_acquire_bus(sc->sc_tag, 0);
cmd = W83L784R_CHIPID;
if (iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP,
sc->sc_addr[0], &cmd, sizeof cmd, &data, sizeof data, 0)) {
iic_release_bus(sc->sc_tag, 0);
printf(": cannot read chip ID register\n");
return;
}
iic_release_bus(sc->sc_tag, 0);
sc->sc_chip_id = data;
switch (sc->sc_chip_id) {
case WBENV_CHIPID_W83L784R:
printf(": W83L784R\n");
wbenv_setup_sensors(sc, w83l784r_sensors);
break;
case WBENV_CHIPID_W83L785R:
printf(": W83L785R\n");
wbenv_setup_sensors(sc, w83l785r_sensors);
goto start;
case WBENV_CHIPID_W83L785TS_L:
printf(": W83L785TS-L\n");
wbenv_setup_sensors(sc, w83l785ts_l_sensors);
goto start;
default:
printf(": unknown Winbond chip (ID 0x%x)\n", sc->sc_chip_id);
return;
}
iic_acquire_bus(sc->sc_tag, 0);
cmd = W83L784R_T23ADDR;
if (iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP,
sc->sc_addr[0], &cmd, sizeof cmd, &data, sizeof data, 0)) {
iic_release_bus(sc->sc_tag, 0);
printf(": cannot read address register\n");
return;
}
iic_release_bus(sc->sc_tag, 0);
sc->sc_addr[1] = 0x48 + (data & 0x7);
sc->sc_addr[2] = 0x48 + ((data >> 4) & 0x7);
/* Make the bus scan ignore the satellites. */
iic_ignore_addr(sc->sc_addr[1]);
iic_ignore_addr(sc->sc_addr[2]);
start:
if (sensor_task_register(sc, wbenv_refresh, 5) == NULL) {
printf("%s: unable to register update task\n",
sc->sc_dev.dv_xname);
return;
}
/* Start the monitoring loop */
config = wbenv_readreg(sc, W83L784R_CONFIG);
wbenv_writereg(sc, W83L784R_CONFIG, config | 0x01);
/* Add sensors */
for (i = 0; i < sc->sc_numsensors; ++i)
sensor_attach(&sc->sc_sensordev, &sc->sc_sensors[i]);
sensordev_install(&sc->sc_sensordev);
}
void
wbenv_setup_sensors(struct wbenv_softc *sc, struct wbenv_sensor *sensors)
{
int i;
strlcpy(sc->sc_sensordev.xname, sc->sc_dev.dv_xname,
sizeof(sc->sc_sensordev.xname));
for (i = 0; sensors[i].desc; i++) {
sc->sc_sensors[i].type = sensors[i].type;
strlcpy(sc->sc_sensors[i].desc, sensors[i].desc,
sizeof(sc->sc_sensors[i].desc));
sc->sc_numsensors++;
}
sc->sc_wbenv_sensors = sensors;
}
void
wbenv_refresh(void *arg)
{
struct wbenv_softc *sc = arg;
int i;
iic_acquire_bus(sc->sc_tag, 0);
for (i = 0; i < sc->sc_numsensors; i++)
sc->sc_wbenv_sensors[i].refresh(sc, i);
iic_release_bus(sc->sc_tag, 0);
}
void
w83l784r_refresh_volt(struct wbenv_softc *sc, int n)
{
struct ksensor *sensor = &sc->sc_sensors[n];
int data, reg = sc->sc_wbenv_sensors[n].reg;
data = wbenv_readreg(sc, reg);
sensor->value = (data << 4); /* 16 mV LSB */
sensor->value *= sc->sc_wbenv_sensors[n].rfact;
sensor->value /= 10;
}
void
w83l785r_refresh_volt(struct wbenv_softc *sc, int n)
{
struct ksensor *sensor = &sc->sc_sensors[n];
int data, reg = sc->sc_wbenv_sensors[n].reg;
data = wbenv_readreg(sc, reg);
sensor->value = (data << 3); /* 8 mV LSB */
sensor->value *= sc->sc_wbenv_sensors[n].rfact;
sensor->value /= 10;
}
void
wbenv_refresh_temp(struct wbenv_softc *sc, int n)
{
struct ksensor *sensor = &sc->sc_sensors[n];
int sdata;
sdata = wbenv_readreg(sc, sc->sc_wbenv_sensors[n].reg);
if (sdata & 0x80)
sdata -= 0x100;
sensor->value = sdata * 1000000 + 273150000;
}
void
w83l784r_refresh_temp(struct wbenv_softc *sc, int n)
{
struct ksensor *sensor = &sc->sc_sensors[n];
int16_t sdata;
u_int8_t cmd = 0;
iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP,
sc->sc_addr[sc->sc_wbenv_sensors[n].reg],
&cmd, sizeof cmd, &sdata, sizeof sdata, 0);
sensor->value = (sdata >> 7) * 500000 + 273150000;
}
void
w83l784r_refresh_fanrpm(struct wbenv_softc *sc, int n)
{
struct ksensor *sensor = &sc->sc_sensors[n];
int data, divisor;
data = wbenv_readreg(sc, W83L784R_FANDIV);
if (sc->sc_wbenv_sensors[n].reg == W83L784R_FAN1)
divisor = data & 0x07;
else
divisor = (data >> 4) & 0x07;
data = wbenv_readreg(sc, sc->sc_wbenv_sensors[n].reg);
if (data == 0xff || data == 0x00) {
sensor->flags |= SENSOR_FINVALID;
sensor->value = 0;
} else {
sensor->flags &= ~SENSOR_FINVALID;
sensor->value = 1350000 / (data << divisor);
}
}
void
w83l785r_refresh_fanrpm(struct wbenv_softc *sc, int n)
{
struct ksensor *sensor = &sc->sc_sensors[n];
int data, divisor;
data = wbenv_readreg(sc, W83L785R_FANDIV);
if (sc->sc_wbenv_sensors[n].reg == W83L784R_FAN1)
divisor = data & 0x07;
else
divisor = (data >> 4) & 0x07;
data = wbenv_readreg(sc, sc->sc_wbenv_sensors[n].reg);
if (data == 0xff || data == 0x00) {
sensor->flags |= SENSOR_FINVALID;
sensor->value = 0;
} else {
sensor->flags &= ~SENSOR_FINVALID;
sensor->value = 1350000 / (data << divisor);
}
}
u_int8_t
wbenv_readreg(struct wbenv_softc *sc, u_int8_t reg)
{
u_int8_t data;
iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP,
sc->sc_addr[0], ®, sizeof reg, &data, sizeof data, 0);
return data;
}
void
wbenv_writereg(struct wbenv_softc *sc, u_int8_t reg, u_int8_t data)
{
iic_exec(sc->sc_tag, I2C_OP_WRITE_WITH_STOP,
sc->sc_addr[0], ®, sizeof reg, &data, sizeof data, 0);
}