[qemu.git] / hw / misc / tmp105.c

/*
 * Texas Instruments TMP105 temperature sensor.
 *
 * Copyright (C) 2008 Nokia Corporation
 * Written by Andrzej Zaborowski <[email protected]>
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License as
 * published by the Free Software Foundation; either version 2 or
 * (at your option) version 3 of the License.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License along
 * with this program; if not, see <http://www.gnu.org/licenses/>.
 */

#include "hw/hw.h"
#include "hw/i2c/i2c.h"
#include "tmp105.h"
#include "qapi/visitor.h"

static void tmp105_interrupt_update(TMP105State *s)
{
    qemu_set_irq(s->pin, s->alarm ^ ((~s->config >> 2) & 1));	/* POL */
}

static void tmp105_alarm_update(TMP105State *s)
{
    if ((s->config >> 0) & 1) {					/* SD */
        if ((s->config >> 7) & 1)				/* OS */
            s->config &= ~(1 << 7);				/* OS */
        else
            return;
    }

    if ((s->config >> 1) & 1) {					/* TM */
        if (s->temperature >= s->limit[1])
            s->alarm = 1;
        else if (s->temperature < s->limit[0])
            s->alarm = 1;
    } else {
        if (s->temperature >= s->limit[1])
            s->alarm = 1;
        else if (s->temperature < s->limit[0])
            s->alarm = 0;
    }

    tmp105_interrupt_update(s);
}

static void tmp105_get_temperature(Object *obj, Visitor *v, void *opaque,
                                   const char *name, Error **errp)
{
    TMP105State *s = TMP105(obj);
    int64_t value = s->temperature * 1000 / 256;

    visit_type_int(v, &value, name, errp);
}

/* Units are 0.001 centigrades relative to 0 C.  s->temperature is 8.8
 * fixed point, so units are 1/256 centigrades.  A simple ratio will do.
 */
static void tmp105_set_temperature(Object *obj, Visitor *v, void *opaque,
                                   const char *name, Error **errp)
{
    TMP105State *s = TMP105(obj);
    Error *local_err = NULL;
    int64_t temp;

    visit_type_int(v, &temp, name, &local_err);
    if (local_err) {
        error_propagate(errp, local_err);
        return;
    }
    if (temp >= 128000 || temp < -128000) {
        error_setg(errp, "value %" PRId64 ".%03" PRIu64 " °C is out of range",
                   temp / 1000, temp % 1000);
        return;
    }

    s->temperature = (int16_t) (temp * 256 / 1000);

    tmp105_alarm_update(s);
}

static const int tmp105_faultq[4] = { 1, 2, 4, 6 };

static void tmp105_read(TMP105State *s)
{
    s->len = 0;

    if ((s->config >> 1) & 1) {					/* TM */
        s->alarm = 0;
        tmp105_interrupt_update(s);
    }

    switch (s->pointer & 3) {
    case TMP105_REG_TEMPERATURE:
        s->buf[s->len ++] = (((uint16_t) s->temperature) >> 8);
        s->buf[s->len ++] = (((uint16_t) s->temperature) >> 0) &
                (0xf0 << ((~s->config >> 5) & 3));		/* R */
        break;

    case TMP105_REG_CONFIG:
        s->buf[s->len ++] = s->config;
        break;

    case TMP105_REG_T_LOW:
        s->buf[s->len ++] = ((uint16_t) s->limit[0]) >> 8;
        s->buf[s->len ++] = ((uint16_t) s->limit[0]) >> 0;
        break;

    case TMP105_REG_T_HIGH:
        s->buf[s->len ++] = ((uint16_t) s->limit[1]) >> 8;
        s->buf[s->len ++] = ((uint16_t) s->limit[1]) >> 0;
        break;
    }
}

static void tmp105_write(TMP105State *s)
{
    switch (s->pointer & 3) {
    case TMP105_REG_TEMPERATURE:
        break;

    case TMP105_REG_CONFIG:
        if (s->buf[0] & ~s->config & (1 << 0))			/* SD */
            printf("%s: TMP105 shutdown\n", __FUNCTION__);
        s->config = s->buf[0];
        s->faults = tmp105_faultq[(s->config >> 3) & 3];	/* F */
        tmp105_alarm_update(s);
        break;

    case TMP105_REG_T_LOW:
    case TMP105_REG_T_HIGH:
        if (s->len >= 3)
            s->limit[s->pointer & 1] = (int16_t)
                    ((((uint16_t) s->buf[0]) << 8) | s->buf[1]);
        tmp105_alarm_update(s);
        break;
    }
}

static int tmp105_rx(I2CSlave *i2c)
{
    TMP105State *s = TMP105(i2c);

    if (s->len < 2) {
        return s->buf[s->len ++];
    } else {
        return 0xff;
    }
}

static int tmp105_tx(I2CSlave *i2c, uint8_t data)
{
    TMP105State *s = TMP105(i2c);

    if (s->len == 0) {
        s->pointer = data;
        s->len++;
    } else {
        if (s->len <= 2) {
            s->buf[s->len - 1] = data;
        }
        s->len++;
        tmp105_write(s);
    }

    return 0;
}

static void tmp105_event(I2CSlave *i2c, enum i2c_event event)
{
    TMP105State *s = TMP105(i2c);

    if (event == I2C_START_RECV) {
        tmp105_read(s);
    }

    s->len = 0;
}

static int tmp105_post_load(void *opaque, int version_id)
{
    TMP105State *s = opaque;

    s->faults = tmp105_faultq[(s->config >> 3) & 3];		/* F */

    tmp105_interrupt_update(s);
    return 0;
}

static const VMStateDescription vmstate_tmp105 = {
    .name = "TMP105",
    .version_id = 0,
    .minimum_version_id = 0,
    .post_load = tmp105_post_load,
    .fields = (VMStateField[]) {
        VMSTATE_UINT8(len, TMP105State),
        VMSTATE_UINT8_ARRAY(buf, TMP105State, 2),
        VMSTATE_UINT8(pointer, TMP105State),
        VMSTATE_UINT8(config, TMP105State),
        VMSTATE_INT16(temperature, TMP105State),
        VMSTATE_INT16_ARRAY(limit, TMP105State, 2),
        VMSTATE_UINT8(alarm, TMP105State),
        VMSTATE_I2C_SLAVE(i2c, TMP105State),
        VMSTATE_END_OF_LIST()
    }
};

static void tmp105_reset(I2CSlave *i2c)
{
    TMP105State *s = TMP105(i2c);

    s->temperature = 0;
    s->pointer = 0;
    s->config = 0;
    s->faults = tmp105_faultq[(s->config >> 3) & 3];
    s->alarm = 0;

    tmp105_interrupt_update(s);
}

static int tmp105_init(I2CSlave *i2c)
{
    TMP105State *s = TMP105(i2c);

    qdev_init_gpio_out(&i2c->qdev, &s->pin, 1);

    tmp105_reset(&s->i2c);

    return 0;
}

static void tmp105_initfn(Object *obj)
{
    object_property_add(obj, "temperature", "int",
                        tmp105_get_temperature,
                        tmp105_set_temperature, NULL, NULL, NULL);
}

static void tmp105_class_init(ObjectClass *klass, void *data)
{
    DeviceClass *dc = DEVICE_CLASS(klass);
    I2CSlaveClass *k = I2C_SLAVE_CLASS(klass);

    k->init = tmp105_init;
    k->event = tmp105_event;
    k->recv = tmp105_rx;
    k->send = tmp105_tx;
    dc->vmsd = &vmstate_tmp105;
}

static const TypeInfo tmp105_info = {
    .name          = TYPE_TMP105,
    .parent        = TYPE_I2C_SLAVE,
    .instance_size = sizeof(TMP105State),
    .instance_init = tmp105_initfn,
    .class_init    = tmp105_class_init,
};

static void tmp105_register_types(void)
{
    type_register_static(&tmp105_info);
}

type_init(tmp105_register_types)
Commit	Line	Data
7e7c5e4c AZ	1	/*
	2	* Texas Instruments TMP105 temperature sensor.
	3	*
	4	* Copyright (C) 2008 Nokia Corporation
	5	* Written by Andrzej Zaborowski <[email protected]>
	6	*
	7	* This program is free software; you can redistribute it and/or
	8	* modify it under the terms of the GNU General Public License as
	9	* published by the Free Software Foundation; either version 2 or
	10	* (at your option) version 3 of the License.
	11	*
	12	* This program is distributed in the hope that it will be useful,
	13	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	14	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	15	* GNU General Public License for more details.
	16	*
fad6cb1a	17	* You should have received a copy of the GNU General Public License along
8167ee88	18	* with this program; if not, see <http://www.gnu.org/licenses/>.
7e7c5e4c AZ	19	*/
7e7c5e4c AZ	20
83c9f4ca	21	#include "hw/hw.h"
0d09e41a	22	#include "hw/i2c/i2c.h"
47b43a1f	23	#include "tmp105.h"
eb60d1c5	24	#include "qapi/visitor.h"
7e7c5e4c	25
bc24a225	26	static void tmp105_interrupt_update(TMP105State *s)
7e7c5e4c AZ	27	{
	28	qemu_set_irq(s->pin, s->alarm ^ ((~s->config >> 2) & 1)); /* POL */
	29	}
	30
bc24a225	31	static void tmp105_alarm_update(TMP105State *s)
7e7c5e4c AZ	32	{
	33	if ((s->config >> 0) & 1) { /* SD */
	34	if ((s->config >> 7) & 1) /* OS */
	35	s->config &= ~(1 << 7); /* OS */
	36	else
	37	return;
	38	}
	39
	40	if ((s->config >> 1) & 1) { /* TM */
	41	if (s->temperature >= s->limit[1])
	42	s->alarm = 1;
	43	else if (s->temperature < s->limit[0])
	44	s->alarm = 1;
	45	} else {
	46	if (s->temperature >= s->limit[1])
	47	s->alarm = 1;
	48	else if (s->temperature < s->limit[0])
	49	s->alarm = 0;
	50	}
	51
	52	tmp105_interrupt_update(s);
	53	}
	54
eb60d1c5 AF	55	static void tmp105_get_temperature(Object obj, Visitor v, void *opaque,
	56	const char name, Error *errp)
	57	{
	58	TMP105State *s = TMP105(obj);
efdf6a56	59	int64_t value = s->temperature * 1000 / 256;
eb60d1c5 AF	60
	61	visit_type_int(v, &value, name, errp);
	62	}
	63
efdf6a56 PB	64	/* Units are 0.001 centigrades relative to 0 C. s->temperature is 8.8
	65	* fixed point, so units are 1/256 centigrades. A simple ratio will do.
	66	*/
eb60d1c5 AF	67	static void tmp105_set_temperature(Object obj, Visitor v, void *opaque,
eb60d1c5 AF	68	const char name, Error *errp)
7e7c5e4c	69	{
eb60d1c5	70	TMP105State *s = TMP105(obj);
65cd9064	71	Error *local_err = NULL;
eb60d1c5	72	int64_t temp;
7e7c5e4c	73
65cd9064 MA	74	visit_type_int(v, &temp, name, &local_err);
	75	if (local_err) {
	76	error_propagate(errp, local_err);
eb60d1c5 AF	77	return;
eb60d1c5 AF	78	}
7e7c5e4c	79	if (temp >= 128000 \|\| temp < -128000) {
eb60d1c5 AF	80	error_setg(errp, "value %" PRId64 ".%03" PRIu64 " °C is out of range",
	81	temp / 1000, temp % 1000);
	82	return;
7e7c5e4c AZ	83	}
7e7c5e4c AZ	84
efdf6a56	85	s->temperature = (int16_t) (temp * 256 / 1000);
7e7c5e4c AZ	86
	87	tmp105_alarm_update(s);
	88	}
	89
	90	static const int tmp105_faultq[4] = { 1, 2, 4, 6 };
	91
bc24a225	92	static void tmp105_read(TMP105State *s)
7e7c5e4c AZ	93	{
	94	s->len = 0;
	95
	96	if ((s->config >> 1) & 1) { /* TM */
	97	s->alarm = 0;
	98	tmp105_interrupt_update(s);
	99	}
	100
	101	switch (s->pointer & 3) {
2915efbf	102	case TMP105_REG_TEMPERATURE:
7e7c5e4c AZ	103	s->buf[s->len ++] = (((uint16_t) s->temperature) >> 8);
	104	s->buf[s->len ++] = (((uint16_t) s->temperature) >> 0) &
	105	(0xf0 << ((~s->config >> 5) & 3)); /* R */
	106	break;
	107
2915efbf	108	case TMP105_REG_CONFIG:
7e7c5e4c AZ	109	s->buf[s->len ++] = s->config;
	110	break;
	111
2915efbf	112	case TMP105_REG_T_LOW:
7e7c5e4c AZ	113	s->buf[s->len ++] = ((uint16_t) s->limit[0]) >> 8;
	114	s->buf[s->len ++] = ((uint16_t) s->limit[0]) >> 0;
	115	break;
	116
2915efbf	117	case TMP105_REG_T_HIGH:
7e7c5e4c AZ	118	s->buf[s->len ++] = ((uint16_t) s->limit[1]) >> 8;
	119	s->buf[s->len ++] = ((uint16_t) s->limit[1]) >> 0;
	120	break;
	121	}
	122	}
	123
bc24a225	124	static void tmp105_write(TMP105State *s)
7e7c5e4c AZ	125	{
7e7c5e4c AZ	126	switch (s->pointer & 3) {
2915efbf	127	case TMP105_REG_TEMPERATURE:
7e7c5e4c AZ	128	break;
7e7c5e4c AZ	129
2915efbf	130	case TMP105_REG_CONFIG:
7e7c5e4c AZ	131	if (s->buf[0] & ~s->config & (1 << 0)) /* SD */
	132	printf("%s: TMP105 shutdown\n", __FUNCTION__);
	133	s->config = s->buf[0];
	134	s->faults = tmp105_faultq[(s->config >> 3) & 3]; /* F */
	135	tmp105_alarm_update(s);
	136	break;
	137
2915efbf AH	138	case TMP105_REG_T_LOW:
2915efbf AH	139	case TMP105_REG_T_HIGH:
7e7c5e4c AZ	140	if (s->len >= 3)
	141	s->limit[s->pointer & 1] = (int16_t)
	142	((((uint16_t) s->buf[0]) << 8) \| s->buf[1]);
	143	tmp105_alarm_update(s);
	144	break;
	145	}
	146	}
	147
9e07bdf8	148	static int tmp105_rx(I2CSlave *i2c)
7e7c5e4c	149	{
2aad80ee	150	TMP105State *s = TMP105(i2c);
7e7c5e4c	151
2aad80ee	152	if (s->len < 2) {
7e7c5e4c	153	return s->buf[s->len ++];
2aad80ee	154	} else {
7e7c5e4c	155	return 0xff;
2aad80ee	156	}
7e7c5e4c AZ	157	}
7e7c5e4c AZ	158
9e07bdf8	159	static int tmp105_tx(I2CSlave *i2c, uint8_t data)
7e7c5e4c	160	{
2aad80ee	161	TMP105State *s = TMP105(i2c);
7e7c5e4c	162
cb5ef3fa	163	if (s->len == 0) {
7e7c5e4c	164	s->pointer = data;
cb5ef3fa AF	165	s->len++;
	166	} else {
	167	if (s->len <= 2) {
7e7c5e4c	168	s->buf[s->len - 1] = data;
cb5ef3fa AF	169	}
cb5ef3fa AF	170	s->len++;
7e7c5e4c AZ	171	tmp105_write(s);
	172	}
	173
	174	return 0;
	175	}
	176
9e07bdf8	177	static void tmp105_event(I2CSlave *i2c, enum i2c_event event)
7e7c5e4c	178	{
2aad80ee	179	TMP105State *s = TMP105(i2c);
7e7c5e4c	180
2aad80ee	181	if (event == I2C_START_RECV) {
7e7c5e4c	182	tmp105_read(s);
2aad80ee	183	}
7e7c5e4c AZ	184
	185	s->len = 0;
	186	}
	187
371a4468	188	static int tmp105_post_load(void *opaque, int version_id)
7e7c5e4c	189	{
371a4468	190	TMP105State *s = opaque;
7e7c5e4c	191
e5d3b98d AZ	192	s->faults = tmp105_faultq[(s->config >> 3) & 3]; /* F */
e5d3b98d AZ	193
7e7c5e4c	194	tmp105_interrupt_update(s);
7e7c5e4c AZ	195	return 0;
	196	}
	197
371a4468 JQ	198	static const VMStateDescription vmstate_tmp105 = {
	199	.name = "TMP105",
	200	.version_id = 0,
	201	.minimum_version_id = 0,
371a4468	202	.post_load = tmp105_post_load,
8f1e884b	203	.fields = (VMStateField[]) {
371a4468 JQ	204	VMSTATE_UINT8(len, TMP105State),
	205	VMSTATE_UINT8_ARRAY(buf, TMP105State, 2),
	206	VMSTATE_UINT8(pointer, TMP105State),
	207	VMSTATE_UINT8(config, TMP105State),
	208	VMSTATE_INT16(temperature, TMP105State),
	209	VMSTATE_INT16_ARRAY(limit, TMP105State, 2),
	210	VMSTATE_UINT8(alarm, TMP105State),
	211	VMSTATE_I2C_SLAVE(i2c, TMP105State),
	212	VMSTATE_END_OF_LIST()
	213	}
	214	};
	215
9e07bdf8	216	static void tmp105_reset(I2CSlave *i2c)
7e7c5e4c	217	{
2aad80ee	218	TMP105State *s = TMP105(i2c);
7e7c5e4c AZ	219
	220	s->temperature = 0;
	221	s->pointer = 0;
	222	s->config = 0;
	223	s->faults = tmp105_faultq[(s->config >> 3) & 3];
	224	s->alarm = 0;
	225
	226	tmp105_interrupt_update(s);
	227	}
	228
9e07bdf8	229	static int tmp105_init(I2CSlave *i2c)
7e7c5e4c	230	{
2aad80ee	231	TMP105State *s = TMP105(i2c);
7e7c5e4c	232
697454eb	233	qdev_init_gpio_out(&i2c->qdev, &s->pin, 1);
7e7c5e4c AZ	234
	235	tmp105_reset(&s->i2c);
	236
81a322d4	237	return 0;
697454eb PB	238	}
697454eb PB	239
eb60d1c5 AF	240	static void tmp105_initfn(Object *obj)
	241	{
	242	object_property_add(obj, "temperature", "int",
	243	tmp105_get_temperature,
	244	tmp105_set_temperature, NULL, NULL, NULL);
	245	}
	246
b5ea9327 AL	247	static void tmp105_class_init(ObjectClass klass, void data)
b5ea9327 AL	248	{
39bffca2	249	DeviceClass *dc = DEVICE_CLASS(klass);
b5ea9327 AL	250	I2CSlaveClass *k = I2C_SLAVE_CLASS(klass);
	251
	252	k->init = tmp105_init;
	253	k->event = tmp105_event;
	254	k->recv = tmp105_rx;
	255	k->send = tmp105_tx;
39bffca2	256	dc->vmsd = &vmstate_tmp105;
b5ea9327 AL	257	}
b5ea9327 AL	258
8c43a6f0	259	static const TypeInfo tmp105_info = {
2aad80ee	260	.name = TYPE_TMP105,
39bffca2 AL	261	.parent = TYPE_I2C_SLAVE,
39bffca2 AL	262	.instance_size = sizeof(TMP105State),
eb60d1c5	263	.instance_init = tmp105_initfn,
39bffca2	264	.class_init = tmp105_class_init,
697454eb	265	};
7e7c5e4c	266
83f7d43a	267	static void tmp105_register_types(void)
697454eb	268	{
39bffca2	269	type_register_static(&tmp105_info);
7e7c5e4c	270	}
697454eb	271
83f7d43a	272	type_init(tmp105_register_types)