NetBSD-5.0.2/sys/dev/i2c/pic16lc.c
/* $NetBSD: pic16lc.c,v 1.15 2008/06/08 03:56:09 tsutsui Exp $ */
/*-
* Copyright (c) 2007, 2008 Jared D. McNeill <jmcneill@invisible.ca>
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
* ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
* TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
* PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
* BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
* POSSIBILITY OF SUCH DAMAGE.
*/
/*
* Microsoft XBOX System Management Controller
*
* Documentation lives here:
* http://www.xbox-linux.org/wiki/PIC
*/
#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: pic16lc.c,v 1.15 2008/06/08 03:56:09 tsutsui Exp $");
#include <sys/param.h>
#include <sys/systm.h>
#include <sys/device.h>
#include <sys/malloc.h>
#include <machine/xbox.h>
#include <dev/sysmon/sysmonvar.h>
#include <dev/i2c/i2cvar.h>
#include <dev/i2c/pic16lcreg.h>
static int pic16lc_match(device_t, cfdata_t, void *);
static void pic16lc_attach(device_t, device_t, void *);
static int pic16lc_intr(void *);
void pic16lc_reboot(void);
void pic16lc_poweroff(void);
void pic16lc_setled(uint8_t);
struct pic16lc_softc {
device_t sc_dev;
i2c_tag_t sc_tag;
i2c_addr_t sc_addr;
void * sc_ih;
envsys_data_t sc_sensor[1];
struct sysmon_envsys *sc_sme;
};
static struct pic16lc_softc *pic16lc = NULL;
#define XBOX_SENSOR_CPU 0
#define XBOX_SENSOR_BOARD 1
#define XBOX_NSENSORS 2
static void pic16lc_update(struct pic16lc_softc *, envsys_data_t *);
static void pic16lc_refresh(struct sysmon_envsys *, envsys_data_t *);
static void pic16lc_write_1(struct pic16lc_softc *, uint8_t, uint8_t);
static void pic16lc_read_1(struct pic16lc_softc *, uint8_t, uint8_t *);
CFATTACH_DECL_NEW(pic16lc, sizeof(struct pic16lc_softc),
pic16lc_match, pic16lc_attach, NULL, NULL);
static int
pic16lc_match(device_t parent, cfdata_t cf, void *opaque)
{
struct i2c_attach_args *ia = opaque;
if (pic16lc != NULL) /* we can only have one... */
return 0;
if (ia->ia_addr != 0x10) /* must live at 0x10 on xbox */
return 0;
return 1;
}
static void
pic16lc_attach(device_t parent, device_t self, void *opaque)
{
struct pic16lc_softc *sc = device_private(self);
struct i2c_attach_args *ia = opaque;
u_char ver[4];
int i;
sc->sc_dev = self;
sc->sc_tag = ia->ia_tag;
sc->sc_addr = ia->ia_addr;
pic16lc = sc;
sc->sc_sme = sysmon_envsys_create();
/* initialize CPU sensor */
sc->sc_sensor[XBOX_SENSOR_CPU].units = ENVSYS_STEMP;
(void)strlcpy(sc->sc_sensor[XBOX_SENSOR_CPU].desc, "Xbox CPU Temp",
sizeof(sc->sc_sensor[XBOX_SENSOR_CPU]));
/* initialize board sensor */
sc->sc_sensor[XBOX_SENSOR_BOARD].units = ENVSYS_STEMP;
(void)strlcpy(sc->sc_sensor[XBOX_SENSOR_BOARD].desc, "Xbox Board Temp",
sizeof(sc->sc_sensor[XBOX_SENSOR_BOARD]));
for (i = 0; i < XBOX_NSENSORS; i++) {
if (sysmon_envsys_sensor_attach(sc->sc_sme,
&sc->sc_sensor[i])) {
sysmon_envsys_destroy(sc->sc_sme);
return;
}
}
/* hook into sysmon */
sc->sc_sme->sme_name = device_xname(sc->sc_dev);
sc->sc_sme->sme_cookie = sc;
sc->sc_sme->sme_refresh = pic16lc_refresh;
if (sysmon_envsys_register(sc->sc_sme)) {
aprint_error_dev(self, "unable to register with sysmon\n");
sysmon_envsys_destroy(sc->sc_sme);
return;
}
if (iic_acquire_bus(sc->sc_tag, 0) != 0) {
aprint_error(": unable to acquire i2c bus\n");
return;
}
aprint_normal(": Xbox System Management Controller");
/* find the PIC version */
pic16lc_write_1(sc, PIC16LC_REG_VER, 0x00);
pic16lc_read_1(sc, PIC16LC_REG_VER, &ver[0]);
pic16lc_read_1(sc, PIC16LC_REG_VER, &ver[1]);
pic16lc_read_1(sc, PIC16LC_REG_VER, &ver[2]);
ver[3] = '\0';
aprint_normal(" (rev. %s)\n", ver);
pic16lc_setled(0xff); /* orange */
iic_release_bus(sc->sc_tag, 0);
/* disable reset on eject */
pic16lc_write_1(sc, PIC16LC_REG_RESETONEJECT, 0x01);
sc->sc_ih = iic_smbus_intr_establish_proc(sc->sc_tag, pic16lc_intr, sc);
if (sc->sc_ih == NULL)
aprint_error_dev(self, "couldn't establish interrupt\n");
return;
}
static void
pic16lc_write_1(struct pic16lc_softc *sc, uint8_t cmd, uint8_t val)
{
iic_exec(sc->sc_tag, I2C_OP_WRITE_WITH_STOP,
sc->sc_addr, &cmd, 1, &val, 1, 0);
}
static void
pic16lc_read_1(struct pic16lc_softc *sc, uint8_t cmd, uint8_t *valp)
{
iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP,
sc->sc_addr, &cmd, 1, valp, 1, 0);
}
static void
pic16lc_update(struct pic16lc_softc *sc, envsys_data_t *edata)
{
uint8_t cputemp, boardtemp;
if (iic_acquire_bus(sc->sc_tag, 0) != 0) {
aprint_error(": unable to acquire i2c bus\n");
return;
}
if (edata->sensor == XBOX_SENSOR_CPU) {
pic16lc_read_1(sc, PIC16LC_REG_CPUTEMP, &cputemp);
edata->state = ENVSYS_SVALID;
edata->value_cur = (int)cputemp * 1000000 + 273150000;
} else {
pic16lc_read_1(sc, PIC16LC_REG_BOARDTEMP, &boardtemp);
edata->state = ENVSYS_SVALID;
edata->value_cur = (int)boardtemp * 1000000 + 273150000;
}
iic_release_bus(sc->sc_tag, 0);
return;
}
static void
pic16lc_refresh(struct sysmon_envsys *sme, envsys_data_t *edata)
{
struct pic16lc_softc *sc = sme->sme_cookie;
pic16lc_update(sc, edata);
}
static int
pic16lc_intr(void *opaque)
{
struct pic16lc_softc *sc = opaque;
uint8_t val;
int rv = 0;
pic16lc_read_1(sc, PIC16LC_REG_INTSTATUS, &val);
if (val == 0)
return rv;
if (val & PIC16LC_REG_INTSTATUS_POWER)
aprint_normal_dev(sc->sc_dev, "power button pressed\n");
if (val & PIC16LC_REG_INTSTATUS_TRAYCLOSED)
aprint_normal_dev(sc->sc_dev, "tray closed\n");
if (val & PIC16LC_REG_INTSTATUS_TRAYOPENING) {
aprint_normal_dev(sc->sc_dev, "tray opening\n");
pic16lc_write_1(sc, PIC16LC_REG_INTACK, 0x02);
}
if (val & PIC16LC_REG_INTSTATUS_AVPACK_UNPLUG)
aprint_normal_dev(sc->sc_dev, "A/V pack removed\n");
if (val & PIC16LC_REG_INTSTATUS_AVPACK_PLUG)
aprint_normal_dev(sc->sc_dev, "A/V pack inserted\n");
if (val & PIC16LC_REG_INTSTATUS_EJECT_BUTTON) {
pic16lc_write_1(sc, PIC16LC_REG_INTACK, 0x04);
pic16lc_write_1(sc, PIC16LC_REG_TRAYEJECT, 0x00);
++rv;
}
if (val & PIC16LC_REG_INTSTATUS_TRAYCLOSING)
aprint_normal_dev(sc->sc_dev, "tray closing\n");
return rv;
}
void
pic16lc_reboot(void)
{
if (pic16lc == NULL) {
printf("pic16lc_reboot: driver not attached!\n");
return;
}
pic16lc_write_1(pic16lc, PIC16LC_REG_POWER, PIC16LC_REG_POWER_RESET);
}
void
pic16lc_poweroff(void)
{
if (pic16lc == NULL) {
printf("pic16lc_poweroff: driver not attached!\n");
return;
}
pic16lc_write_1(pic16lc, PIC16LC_REG_POWER, PIC16LC_REG_POWER_SHUTDOWN);
}
void
pic16lc_setled(uint8_t val)
{
if (pic16lc == NULL) {
printf("pic16lc_setled: driver not attached!\n");
return;
}
pic16lc_write_1(pic16lc, PIC16LC_REG_LEDSEQ, val);
pic16lc_write_1(pic16lc, PIC16LC_REG_LEDMODE, 0x01);
}