Home | History | Annotate | Line # | Download | only in dev
stvii.c revision 1.5
      1 /*	$NetBSD: stvii.c,v 1.5 2016/02/29 18:24:31 christos Exp $	*/
      2 
      3 /*-
      4  * Copyright (C) 2011 Michael Lorenz.
      5  *
      6  * Redistribution and use in source and binary forms, with or without
      7  * modification, are permitted provided that the following conditions
      8  * are met:
      9  * 1. Redistributions of source code must retain the above copyright
     10  *    notice, this list of conditions and the following disclaimer.
     11  * 2. Redistributions in binary form must reproduce the above copyright
     12  *    notice, this list of conditions and the following disclaimer in the
     13  *    documentation and/or other materials provided with the distribution.
     14  *
     15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     16  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     17  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     18  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     19  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     20  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     21  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     22  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     23  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
     24  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     25  */
     26 
     27 /*
     28  * a driver for the ST7 microcontroller found in Gdium Liberty 1000 notebooks
     29  */
     30 
     31 
     32 #include <sys/cdefs.h>
     33 __KERNEL_RCSID(0, "$NetBSD: stvii.c,v 1.5 2016/02/29 18:24:31 christos Exp $");
     34 
     35 #include <sys/param.h>
     36 #include <sys/systm.h>
     37 #include <sys/kernel.h>
     38 #include <sys/device.h>
     39 #include <sys/malloc.h>
     40 #include <sys/sysctl.h>
     41 #include <sys/kthread.h>
     42 #include <sys/proc.h>
     43 
     44 #include <dev/sysmon/sysmonvar.h>
     45 #include <dev/sysmon/sysmon_taskq.h>
     46 
     47 #include <dev/i2c/i2cvar.h>
     48 
     49 #include "opt_stvii.h"
     50 
     51 #ifdef STVII_DEBUG
     52 #define DPRINTF aprint_error
     53 #else
     54 #define DPRINTF while (0) printf
     55 #endif
     56 
     57 /* register definitions from OpenBSD */
     58 #define	ST7_VERSION	0x00	/* only on later mobos */
     59 
     60 #define	ST7_STATUS	0x01
     61 #define	STS_LID_CLOSED		0x01
     62 #define	STS_POWER_BTN_DOWN	0x02
     63 #define	STS_BATTERY_PRESENT	0x04	/* not available on old mobo */
     64 #define	STS_POWER_AVAILABLE	0x08
     65 #define	STS_WAVELAN_BTN_DOWN	0x10	/* ``enable'' on old mobo */
     66 #define	STS_AC_AVAILABLE	0x20
     67 #define	ST7_CONTROL	0x02
     68 #define	STC_DDR_CLOCK		0x01
     69 #define	STC_CHARGE_LED_LIT	0x02
     70 #define	STC_BEEP		0x04
     71 #define	STC_DDR_POWER		0x08
     72 #define	STC_TRICKLE		0x10	/* trickle charge rate */
     73 #define	STC_RADIO_ENABLE	0x20	/* enable wavelan rf, later mobos */
     74 #define	STC_MAIN_POWER		0x40
     75 #define	STC_CHARGE_ENABLE	0x80
     76 #define	ST7_BATTERY_L	0x03
     77 #define	ST7_BATTERY_H	0x04
     78 #define	ST7_SIGNATURE	0x05
     79 #define	STSIG_EC_CONTROL	0x00
     80 #define	STSIG_OS_CONTROL	0xae
     81 /* rough battery operating state limits */
     82 #define STSEC_BAT_MIN_VOLT	7000000	/* 7V */
     83 #define STSEC_BAT_MAX_VOLT	8000000	/* 8V */
     84 
     85 #define BAT_AC_PRESENT		0
     86 #define BAT_BATTERY_PRESENT	1
     87 #define BAT_CHARGING		2
     88 #define BAT_CHARGE		3
     89 #define BAT_MAX_CHARGE		4
     90 #define BAT_NSENSORS		5
     91 
     92 struct stvii_softc {
     93 	device_t sc_dev;
     94 	i2c_tag_t sc_i2c;
     95 	int sc_address, sc_version;
     96 	int sc_sleep;
     97 	int sc_flags, sc_charge, sc_bat_level;
     98 	uint8_t sc_control;
     99 	struct sysmon_envsys *sc_sme;
    100 	envsys_data_t sc_sensor[BAT_NSENSORS];
    101 	struct sysmon_pswitch sc_sm_acpower;
    102 	struct sysmon_pswitch sc_sm_lid;
    103 	struct sysmon_pswitch sc_sm_powerbutton;
    104 };
    105 
    106 static void stvii_attach(device_t, device_t, void *);
    107 static int stvii_match(device_t, cfdata_t, void *);
    108 static void stvii_writereg(struct stvii_softc *, int, uint8_t);
    109 static int stvii_readreg(struct stvii_softc *, int);
    110 static void stvii_worker(void *);
    111 static void stvii_setup_envsys(struct stvii_softc *);
    112 static void stvii_refresh(struct sysmon_envsys *, envsys_data_t *);
    113 static int  stvii_battery_level(struct stvii_softc *);
    114 
    115 CFATTACH_DECL_NEW(stvii, sizeof(struct stvii_softc),
    116     stvii_match, stvii_attach, NULL, NULL);
    117 
    118 void stvii_poweroff(void);
    119 static device_t stvii_dev = NULL;
    120 
    121 #define BAT_FULL	8000000
    122 #define BAT_LOW		7100000
    123 
    124 static int
    125 stvii_match(device_t parent, cfdata_t cf, void *aux)
    126 {
    127 	struct i2c_attach_args *args = aux;
    128 	int ret = -1;
    129 	uint8_t out = ST7_VERSION, in = 0;
    130 
    131 	/* see if we can talk to something at address 0x40 */
    132 	if (args->ia_addr == 0x40) {
    133 		iic_acquire_bus(args->ia_tag, 0);
    134 		ret = iic_exec(args->ia_tag, I2C_OP_READ_WITH_STOP, args->ia_addr,
    135 		    &out, 1, &in, 1, 0);
    136 		DPRINTF("%02x\n", in);
    137 		iic_release_bus(args->ia_tag, 0);
    138 	}
    139 	return (ret >= 0);
    140 }
    141 
    142 static void
    143 stvii_attach(device_t parent, device_t self, void *aux)
    144 {
    145 	struct stvii_softc *sc = device_private(self);
    146 	struct i2c_attach_args *args = aux;
    147 	uint8_t ver, reg;
    148 
    149 	sc->sc_dev = self;
    150 	stvii_dev = self;
    151 	sc->sc_address = args->ia_addr;
    152 	aprint_normal(": ST7 Microcontroller\n");
    153 	sc->sc_i2c = args->ia_tag;
    154 	ver = stvii_readreg(sc, ST7_VERSION);
    155 	sc->sc_version = ver;
    156 	aprint_normal_dev(sc->sc_dev, "firmware version %d.%d\n", (ver >> 4) & 0xf, ver & 0xf);
    157 #ifdef STVII_DEBUG
    158 	{
    159 		int i;
    160 
    161 		for (i = 0; i < 6; i++) {
    162 			printf("%02x ", stvii_readreg(sc, i));
    163 		}
    164 		printf("\n");
    165 	}
    166 #endif
    167 	stvii_writereg(sc, ST7_SIGNATURE, STSIG_OS_CONTROL);
    168 	reg = stvii_readreg(sc, ST7_CONTROL);
    169 	reg |= STC_RADIO_ENABLE;
    170 	stvii_writereg(sc, ST7_CONTROL, reg);
    171 	sc->sc_control = reg;
    172 	reg = stvii_readreg(sc, ST7_CONTROL);
    173 
    174 	sc->sc_bat_level = stvii_battery_level(sc);
    175 
    176 	if (kthread_create(PRI_NONE, KTHREAD_MPSAFE, NULL, stvii_worker, sc,
    177 	    NULL, "stvii") != 0) {
    178 	    	aprint_error_dev(sc->sc_dev, "Failed to start kernel thread\n");
    179 	}
    180 
    181 	memset(&sc->sc_sm_acpower, 0, sizeof(struct sysmon_pswitch));
    182 	sc->sc_sm_acpower.smpsw_name = "AC Power";
    183 	sc->sc_sm_acpower.smpsw_type = PSWITCH_TYPE_ACADAPTER;
    184 	if (sysmon_pswitch_register(&sc->sc_sm_acpower) != 0)
    185 		printf("%s: unable to register AC power status with sysmon\n",
    186 		    device_xname(sc->sc_dev));
    187 	memset(&sc->sc_sm_lid, 0, sizeof(struct sysmon_pswitch));
    188 	sc->sc_sm_lid.smpsw_name = "Lid Switch";
    189 	sc->sc_sm_lid.smpsw_type = PSWITCH_TYPE_LID;
    190 	if (sysmon_pswitch_register(&sc->sc_sm_lid) != 0)
    191 		printf("%s: unable to register lid switch with sysmon\n",
    192 		    device_xname(sc->sc_dev));
    193 	memset(&sc->sc_sm_powerbutton, 0, sizeof(struct sysmon_pswitch));
    194 	sc->sc_sm_powerbutton.smpsw_name = "Power Button";
    195 	sc->sc_sm_powerbutton.smpsw_type = PSWITCH_TYPE_POWER;
    196 	if (sysmon_pswitch_register(&sc->sc_sm_powerbutton) != 0)
    197 		printf("%s: unable to register power button with sysmon\n",
    198 		    device_xname(sc->sc_dev));
    199 	stvii_setup_envsys(sc);
    200 }
    201 
    202 static void
    203 stvii_writereg(struct stvii_softc *sc, int reg, uint8_t val)
    204 {
    205 	uint8_t out[2] = {reg, val};
    206 
    207 	if ((reg < 0) || (reg > 5))
    208 		return;
    209 
    210 	iic_acquire_bus(sc->sc_i2c, 0);
    211 	iic_exec(sc->sc_i2c, I2C_OP_WRITE_WITH_STOP, sc->sc_address, out, 2, NULL, 0, 0);
    212 	iic_release_bus(sc->sc_i2c, 0);
    213 }
    214 
    215 static int
    216 stvii_readreg(struct stvii_softc *sc, int reg)
    217 {
    218 	uint8_t inreg[1], outreg[1];
    219 	int ret = 1, bail = 0;
    220 
    221 	if ((reg < 0) || (reg > 5))
    222 		return 0xff;
    223 	inreg[0] = 0x77;
    224 	outreg[0] = reg;
    225 	iic_acquire_bus(sc->sc_i2c, 0);
    226 	while ((ret != 0) && (bail < 10)) {
    227 		ret = iic_exec(sc->sc_i2c, I2C_OP_READ_WITH_STOP,
    228 		    sc->sc_address, outreg, 1, inreg, 1, 0);
    229 		bail++;
    230 		delay(10);
    231 	}
    232 	iic_release_bus(sc->sc_i2c, 0);
    233 	if (ret != 0)
    234 		return -1;
    235 	return inreg[0];
    236 }
    237 
    238 static int
    239 stvii_battery_level(struct stvii_softc *sc)
    240 {
    241 	int bl, bh, ret;
    242 
    243 	bl = stvii_readreg(sc, ST7_BATTERY_L);
    244 	bh = stvii_readreg(sc, ST7_BATTERY_H);
    245 	ret = (bl & 3) | (bh << 2);
    246 	ret = ((ret * 10000) / 1024) * 1000;
    247 	return ret;
    248 }
    249 
    250 static void
    251 stvii_worker(void *cookie)
    252 {
    253 	struct stvii_softc *sc = cookie;
    254 	int status = 0, st, cnt = 4;
    255 	int bl;
    256 	int charging = 0;
    257 	int ok = TRUE;
    258 	uint8_t nctrl;
    259 
    260 	/* if we were charging when we took over, keep charging */
    261 	if (sc->sc_control & STC_CHARGE_ENABLE)
    262 		charging = 1;
    263 
    264 	while (ok) {
    265 		st = stvii_readreg(sc, ST7_STATUS);
    266 		/*
    267 		 * I get i2c timeouts when the power button is pressed.
    268 		 * According to the linux driver this happens on firmware
    269 		 * version 0x13 and newer, mine is 0x16.
    270 		 * So, when we see read errors on the right version we assume
    271 		 * it's the power button as long as the lid is open
    272 		 * ( the button is inside the lid )
    273 		 */
    274 		if ((st == -1) && (sc->sc_version >= 0x13)) {
    275 			if ((status & (STS_LID_CLOSED | STS_POWER_BTN_DOWN) )
    276 			    == 0) {
    277 			    	st = status | STS_POWER_BTN_DOWN;
    278 			}
    279 		}
    280 		if ((st != -1) && (st != status)) {
    281 			if ((status ^ st) & STS_LID_CLOSED) {
    282 				sysmon_pswitch_event(&sc->sc_sm_lid,
    283 				    ((st & STS_LID_CLOSED) ?
    284 				     PSWITCH_EVENT_PRESSED :
    285 				     PSWITCH_EVENT_RELEASED));
    286 			}
    287 			if ((status ^ st) & STS_AC_AVAILABLE) {
    288 				sysmon_pswitch_event(&sc->sc_sm_acpower,
    289 				    ((st & STS_AC_AVAILABLE) ?
    290 				     PSWITCH_EVENT_PRESSED :
    291 				     PSWITCH_EVENT_RELEASED));
    292 			}
    293 			if ((status ^ st) & STS_POWER_BTN_DOWN) {
    294 				sysmon_pswitch_event(&sc->sc_sm_powerbutton,
    295 				    ((st & STS_POWER_BTN_DOWN) ?
    296 				     PSWITCH_EVENT_PRESSED :
    297 				     PSWITCH_EVENT_RELEASED));
    298 			}
    299 			status = st;
    300 		}
    301 		sc->sc_flags = status;
    302 		if (cnt >= 4) {
    303 			nctrl = sc->sc_control & ~(STC_TRICKLE | STC_CHARGE_ENABLE);
    304 			bl = stvii_battery_level(sc);
    305 			sc->sc_bat_level = bl;
    306 			if (charging && (bl > BAT_FULL)) {
    307 				/* stop charging, we're full */
    308 				charging = 0;
    309 			} else if (!charging && (bl < BAT_LOW)) {
    310 				charging = 1;
    311 			}
    312 			if (st & STS_AC_AVAILABLE) {
    313 				if (charging) {
    314 					nctrl |= STC_CHARGE_ENABLE;
    315 				} else
    316 					nctrl |= STC_TRICKLE;
    317 			}
    318 			if (nctrl != sc->sc_control) {
    319 				sc->sc_control = nctrl;
    320 				stvii_writereg(sc, ST7_CONTROL, sc->sc_control);
    321 			}
    322 			cnt = 0;
    323 		} else
    324 			cnt++;
    325 		tsleep(&sc->sc_sleep, 0, "stvii", hz / 2);
    326 	}
    327 }
    328 
    329 #define INITDATA(index, unit, string)					\
    330 	sc->sc_sensor[index].units = unit;     				\
    331 	sc->sc_sensor[index].state = ENVSYS_SINVALID;			\
    332 	snprintf(sc->sc_sensor[index].desc,				\
    333 	    sizeof(sc->sc_sensor[index].desc), "%s", string);
    334 
    335 static void
    336 stvii_setup_envsys(struct stvii_softc *sc)
    337 {
    338 	int i;
    339 
    340 	sc->sc_sme = sysmon_envsys_create();
    341 
    342 	INITDATA(BAT_AC_PRESENT, ENVSYS_INDICATOR, "AC present");
    343 	INITDATA(BAT_BATTERY_PRESENT, ENVSYS_INDICATOR, "Battery present");
    344 	INITDATA(BAT_CHARGING, ENVSYS_BATTERY_CHARGE, "Battery charging");
    345 	INITDATA(BAT_CHARGE, ENVSYS_SVOLTS_DC, "Battery voltage");
    346 	INITDATA(BAT_MAX_CHARGE, ENVSYS_SVOLTS_DC, "Battery design cap");
    347 #undef INITDATA
    348 
    349 	for (i = 0; i < BAT_NSENSORS; i++) {
    350 		if (sysmon_envsys_sensor_attach(sc->sc_sme,
    351 						&sc->sc_sensor[i])) {
    352 			sysmon_envsys_destroy(sc->sc_sme);
    353 			return;
    354 		}
    355 	}
    356 
    357 	sc->sc_sme->sme_name = device_xname(sc->sc_dev);
    358 	sc->sc_sme->sme_cookie = sc;
    359 	sc->sc_sme->sme_refresh = stvii_refresh;
    360 
    361 	if (sysmon_envsys_register(sc->sc_sme)) {
    362 		aprint_error_dev(sc->sc_dev,
    363 		    "unable to register with sysmon\n");
    364 		sysmon_envsys_destroy(sc->sc_sme);
    365 	}
    366 }
    367 
    368 static void
    369 stvii_refresh(struct sysmon_envsys *sme, envsys_data_t *edata)
    370 {
    371 	struct stvii_softc *sc = sme->sme_cookie;
    372 	int which = edata->sensor;
    373 
    374 	edata->state = ENVSYS_SINVALID;
    375 	switch (which) {
    376 	case BAT_AC_PRESENT:
    377 		edata->value_cur = (sc->sc_flags & STS_AC_AVAILABLE);
    378 		edata->state = ENVSYS_SVALID;
    379 		break;
    380 	case BAT_BATTERY_PRESENT:
    381 		edata->value_cur = (sc->sc_flags & STS_BATTERY_PRESENT);
    382 		edata->state = ENVSYS_SVALID;
    383 		break;
    384 	case BAT_CHARGE:
    385 		if (sc->sc_flags & STS_BATTERY_PRESENT) {
    386 			edata->value_cur = sc->sc_bat_level;
    387 			edata->state = ENVSYS_SVALID;
    388 		}
    389 		break;
    390 	case BAT_MAX_CHARGE:
    391 		if (sc->sc_flags & STS_BATTERY_PRESENT) {
    392 			edata->value_cur = 8000000;
    393 			/*edata->state = ENVSYS_SVALID;*/
    394 		}
    395 		break;
    396 	case BAT_CHARGING:
    397 		edata->value_cur = sc->sc_control & STC_CHARGE_ENABLE;
    398 		edata->state = ENVSYS_SVALID;
    399 		break;
    400 	}
    401 }
    402 
    403 void
    404 stvii_poweroff(void)
    405 {
    406 	struct stvii_softc *sc = device_private(stvii_dev);
    407 	int ctl;
    408 
    409 	if (sc == NULL)
    410 		return;
    411 	ctl = stvii_readreg(sc, ST7_CONTROL);
    412 	if (ctl == -1)
    413 		return;
    414 	stvii_writereg(sc, ST7_CONTROL, ctl & ~(STC_MAIN_POWER | STC_DDR_POWER));
    415 }
    416