Home | History | Annotate | Line # | Download | only in sunxi
sunxi_thermal.c revision 1.3.2.2
      1  1.3.2.2  jdolecek /* $NetBSD: sunxi_thermal.c,v 1.3.2.2 2017/12/03 11:35:56 jdolecek Exp $ */
      2  1.3.2.2  jdolecek 
      3  1.3.2.2  jdolecek /*-
      4  1.3.2.2  jdolecek  * Copyright (c) 2016-2017 Jared McNeill <jmcneill (at) invisible.ca>
      5  1.3.2.2  jdolecek  * All rights reserved.
      6  1.3.2.2  jdolecek  *
      7  1.3.2.2  jdolecek  * Redistribution and use in source and binary forms, with or without
      8  1.3.2.2  jdolecek  * modification, are permitted provided that the following conditions
      9  1.3.2.2  jdolecek  * are met:
     10  1.3.2.2  jdolecek  * 1. Redistributions of source code must retain the above copyright
     11  1.3.2.2  jdolecek  *    notice, this list of conditions and the following disclaimer.
     12  1.3.2.2  jdolecek  * 2. Redistributions in binary form must reproduce the above copyright
     13  1.3.2.2  jdolecek  *    notice, this list of conditions and the following disclaimer in the
     14  1.3.2.2  jdolecek  *    documentation and/or other materials provided with the distribution.
     15  1.3.2.2  jdolecek  *
     16  1.3.2.2  jdolecek  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     17  1.3.2.2  jdolecek  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     18  1.3.2.2  jdolecek  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     19  1.3.2.2  jdolecek  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     20  1.3.2.2  jdolecek  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
     21  1.3.2.2  jdolecek  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
     22  1.3.2.2  jdolecek  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
     23  1.3.2.2  jdolecek  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
     24  1.3.2.2  jdolecek  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     25  1.3.2.2  jdolecek  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     26  1.3.2.2  jdolecek  * SUCH DAMAGE.
     27  1.3.2.2  jdolecek  */
     28  1.3.2.2  jdolecek 
     29  1.3.2.2  jdolecek /*
     30  1.3.2.2  jdolecek  * Allwinner thermal sensor controller
     31  1.3.2.2  jdolecek  */
     32  1.3.2.2  jdolecek 
     33  1.3.2.2  jdolecek #include <sys/cdefs.h>
     34  1.3.2.2  jdolecek __KERNEL_RCSID(0, "$NetBSD: sunxi_thermal.c,v 1.3.2.2 2017/12/03 11:35:56 jdolecek Exp $");
     35  1.3.2.2  jdolecek 
     36  1.3.2.2  jdolecek #include <sys/param.h>
     37  1.3.2.2  jdolecek #include <sys/systm.h>
     38  1.3.2.2  jdolecek #include <sys/device.h>
     39  1.3.2.2  jdolecek #include <sys/kernel.h>
     40  1.3.2.2  jdolecek #include <sys/reboot.h>
     41  1.3.2.2  jdolecek 
     42  1.3.2.2  jdolecek #include <dev/sysmon/sysmonvar.h>
     43  1.3.2.2  jdolecek #include <dev/sysmon/sysmon_taskq.h>
     44  1.3.2.2  jdolecek 
     45  1.3.2.2  jdolecek #include <dev/fdt/fdtvar.h>
     46  1.3.2.2  jdolecek 
     47  1.3.2.2  jdolecek #include <arm/sunxi/sunxi_sid.h>
     48  1.3.2.2  jdolecek 
     49  1.3.2.2  jdolecek #define	THS_CTRL0		0x00
     50  1.3.2.2  jdolecek #define	THS_CTRL1		0x04
     51  1.3.2.2  jdolecek #define	 ADC_CALI_EN		(1 << 17)
     52  1.3.2.2  jdolecek #define	THS_CTRL2		0x40
     53  1.3.2.2  jdolecek #define	 SENSOR_ACQ1_SHIFT	16
     54  1.3.2.2  jdolecek #define	 SENSOR2_EN		(1 << 2)
     55  1.3.2.2  jdolecek #define	 SENSOR1_EN		(1 << 1)
     56  1.3.2.2  jdolecek #define	 SENSOR0_EN		(1 << 0)
     57  1.3.2.2  jdolecek #define	THS_INTC		0x44
     58  1.3.2.2  jdolecek #define	THS_INTS		0x48
     59  1.3.2.2  jdolecek #define	 THS2_DATA_IRQ_STS	(1 << 10)
     60  1.3.2.2  jdolecek #define	 THS1_DATA_IRQ_STS	(1 << 9)
     61  1.3.2.2  jdolecek #define	 THS0_DATA_IRQ_STS	(1 << 8)
     62  1.3.2.2  jdolecek #define	 SHUT_INT2_STS		(1 << 6)
     63  1.3.2.2  jdolecek #define	 SHUT_INT1_STS		(1 << 5)
     64  1.3.2.2  jdolecek #define	 SHUT_INT0_STS		(1 << 4)
     65  1.3.2.2  jdolecek #define	 ALARM_INT2_STS		(1 << 2)
     66  1.3.2.2  jdolecek #define	 ALARM_INT1_STS		(1 << 1)
     67  1.3.2.2  jdolecek #define	 ALARM_INT0_STS		(1 << 0)
     68  1.3.2.2  jdolecek #define	THS_ALARM0_CTRL		0x50
     69  1.3.2.2  jdolecek #define	 ALARM_T_HOT_MASK	0xfff
     70  1.3.2.2  jdolecek #define	 ALARM_T_HOT_SHIFT	16
     71  1.3.2.2  jdolecek #define	 ALARM_T_HYST_MASK	0xfff
     72  1.3.2.2  jdolecek #define	 ALARM_T_HYST_SHIFT	0
     73  1.3.2.2  jdolecek #define	THS_SHUTDOWN0_CTRL	0x60
     74  1.3.2.2  jdolecek #define	 SHUT_T_HOT_MASK	0xfff
     75  1.3.2.2  jdolecek #define	 SHUT_T_HOT_SHIFT	16
     76  1.3.2.2  jdolecek #define	THS_FILTER		0x70
     77  1.3.2.2  jdolecek #define	THS_CALIB0		0x74
     78  1.3.2.2  jdolecek #define	THS_CALIB1		0x78
     79  1.3.2.2  jdolecek #define	THS_DATA0		0x80
     80  1.3.2.2  jdolecek #define	THS_DATA1		0x84
     81  1.3.2.2  jdolecek #define	THS_DATA2		0x88
     82  1.3.2.2  jdolecek #define	 DATA_MASK		0xfff
     83  1.3.2.2  jdolecek 
     84  1.3.2.2  jdolecek #define	A83T_ADC_ACQUIRE_TIME	0x17
     85  1.3.2.2  jdolecek #define	A83T_FILTER		0x4
     86  1.3.2.2  jdolecek #define	A83T_INTC		0x1000
     87  1.3.2.2  jdolecek #define	A83T_TEMP_BASE		2719000
     88  1.3.2.2  jdolecek #define	A83T_TEMP_MUL		1000
     89  1.3.2.2  jdolecek #define	A83T_TEMP_DIV		14186
     90  1.3.2.2  jdolecek #define	A83T_CLK_RATE		24000000
     91  1.3.2.2  jdolecek 
     92  1.3.2.2  jdolecek #define	A64_ADC_ACQUIRE_TIME	0x190
     93  1.3.2.2  jdolecek #define	A64_FILTER		0x6
     94  1.3.2.2  jdolecek #define	A64_INTC		0x18000
     95  1.3.2.2  jdolecek #define	A64_TEMP_BASE		2170000
     96  1.3.2.2  jdolecek #define	A64_TEMP_MUL		1000
     97  1.3.2.2  jdolecek #define	A64_TEMP_DIV		8560
     98  1.3.2.2  jdolecek #define	A64_CLK_RATE		4000000
     99  1.3.2.2  jdolecek 
    100  1.3.2.2  jdolecek #define	H3_ADC_ACQUIRE_TIME	0x3f
    101  1.3.2.2  jdolecek #define	H3_FILTER		0x6
    102  1.3.2.2  jdolecek #define	H3_INTC			0x191000
    103  1.3.2.2  jdolecek #define	H3_TEMP_BASE		217
    104  1.3.2.2  jdolecek #define	H3_TEMP_MUL		1000
    105  1.3.2.2  jdolecek #define	H3_TEMP_DIV		8253
    106  1.3.2.2  jdolecek #define	H3_TEMP_MINUS		1794000
    107  1.3.2.2  jdolecek #define	H3_CLK_RATE		4000000
    108  1.3.2.2  jdolecek #define	H3_INIT_ALARM		90	/* degC */
    109  1.3.2.2  jdolecek #define	H3_INIT_SHUT		105	/* degC */
    110  1.3.2.2  jdolecek 
    111  1.3.2.2  jdolecek #define	TEMP_C_TO_K		273150000
    112  1.3.2.2  jdolecek #define	SENSOR_ENABLE_ALL	(SENSOR0_EN|SENSOR1_EN|SENSOR2_EN)
    113  1.3.2.2  jdolecek #define	SHUT_INT_ALL		(SHUT_INT0_STS|SHUT_INT1_STS|SHUT_INT2_STS)
    114  1.3.2.2  jdolecek #define	ALARM_INT_ALL		(ALARM_INT0_STS)
    115  1.3.2.2  jdolecek 
    116  1.3.2.2  jdolecek #define	MAX_SENSORS	3
    117  1.3.2.2  jdolecek 
    118  1.3.2.2  jdolecek #if notyet
    119  1.3.2.2  jdolecek #define	THROTTLE_ENABLE_DEFAULT	1
    120  1.3.2.2  jdolecek 
    121  1.3.2.2  jdolecek /* Enable thermal throttling */
    122  1.3.2.2  jdolecek static int sunxi_thermal_throttle_enable = THROTTLE_ENABLE_DEFAULT;
    123  1.3.2.2  jdolecek #endif
    124  1.3.2.2  jdolecek 
    125  1.3.2.2  jdolecek struct sunxi_thermal_sensor {
    126  1.3.2.2  jdolecek 	const char		*name;
    127  1.3.2.2  jdolecek 	const char		*desc;
    128  1.3.2.2  jdolecek 	int			init_alarm;
    129  1.3.2.2  jdolecek 	int			init_shut;
    130  1.3.2.2  jdolecek };
    131  1.3.2.2  jdolecek 
    132  1.3.2.2  jdolecek struct sunxi_thermal_config {
    133  1.3.2.2  jdolecek 	struct sunxi_thermal_sensor	sensors[MAX_SENSORS];
    134  1.3.2.2  jdolecek 	int				nsensors;
    135  1.3.2.2  jdolecek 	uint64_t			clk_rate;
    136  1.3.2.2  jdolecek 	uint32_t			adc_acquire_time;
    137  1.3.2.2  jdolecek 	int				adc_cali_en;
    138  1.3.2.2  jdolecek 	uint32_t			filter;
    139  1.3.2.2  jdolecek 	uint32_t			intc;
    140  1.3.2.2  jdolecek 	int				(*to_temp)(uint32_t);
    141  1.3.2.2  jdolecek 	uint32_t			(*to_reg)(int);
    142  1.3.2.2  jdolecek 	int				temp_base;
    143  1.3.2.2  jdolecek 	int				temp_mul;
    144  1.3.2.2  jdolecek 	int				temp_div;
    145  1.3.2.2  jdolecek 	int				calib0, calib1;
    146  1.3.2.2  jdolecek 	uint32_t			calib0_mask, calib1_mask;
    147  1.3.2.2  jdolecek };
    148  1.3.2.2  jdolecek 
    149  1.3.2.2  jdolecek static int
    150  1.3.2.2  jdolecek a83t_to_temp(uint32_t val)
    151  1.3.2.2  jdolecek {
    152  1.3.2.2  jdolecek 	return ((A83T_TEMP_BASE - (val * A83T_TEMP_MUL)) / A83T_TEMP_DIV);
    153  1.3.2.2  jdolecek }
    154  1.3.2.2  jdolecek 
    155  1.3.2.2  jdolecek static const struct sunxi_thermal_config a83t_config = {
    156  1.3.2.2  jdolecek 	.nsensors = 3,
    157  1.3.2.2  jdolecek 	.sensors = {
    158  1.3.2.2  jdolecek 		[0] = {
    159  1.3.2.2  jdolecek 			.name = "cluster0",
    160  1.3.2.2  jdolecek 			.desc = "CPU cluster 0 temperature",
    161  1.3.2.2  jdolecek 		},
    162  1.3.2.2  jdolecek 		[1] = {
    163  1.3.2.2  jdolecek 			.name = "cluster1",
    164  1.3.2.2  jdolecek 			.desc = "CPU cluster 1 temperature",
    165  1.3.2.2  jdolecek 		},
    166  1.3.2.2  jdolecek 		[2] = {
    167  1.3.2.2  jdolecek 			.name = "gpu",
    168  1.3.2.2  jdolecek 			.desc = "GPU temperature",
    169  1.3.2.2  jdolecek 		},
    170  1.3.2.2  jdolecek 	},
    171  1.3.2.2  jdolecek 	.clk_rate = A83T_CLK_RATE,
    172  1.3.2.2  jdolecek 	.adc_acquire_time = A83T_ADC_ACQUIRE_TIME,
    173  1.3.2.2  jdolecek 	.adc_cali_en = 1,
    174  1.3.2.2  jdolecek 	.filter = A83T_FILTER,
    175  1.3.2.2  jdolecek 	.intc = A83T_INTC,
    176  1.3.2.2  jdolecek 	.to_temp = a83t_to_temp,
    177  1.3.2.2  jdolecek 	.calib0_mask = 0xffffffff,
    178  1.3.2.2  jdolecek 	.calib1_mask = 0xffffffff,
    179  1.3.2.2  jdolecek };
    180  1.3.2.2  jdolecek 
    181  1.3.2.2  jdolecek static int
    182  1.3.2.2  jdolecek a64_to_temp(uint32_t val)
    183  1.3.2.2  jdolecek {
    184  1.3.2.2  jdolecek 	return ((A64_TEMP_BASE - (val * A64_TEMP_MUL)) / A64_TEMP_DIV);
    185  1.3.2.2  jdolecek }
    186  1.3.2.2  jdolecek 
    187  1.3.2.2  jdolecek static const struct sunxi_thermal_config a64_config = {
    188  1.3.2.2  jdolecek 	.nsensors = 3,
    189  1.3.2.2  jdolecek 	.sensors = {
    190  1.3.2.2  jdolecek 		[0] = {
    191  1.3.2.2  jdolecek 			.name = "cpu",
    192  1.3.2.2  jdolecek 			.desc = "CPU temperature",
    193  1.3.2.2  jdolecek 		},
    194  1.3.2.2  jdolecek 		[1] = {
    195  1.3.2.2  jdolecek 			.name = "gpu1",
    196  1.3.2.2  jdolecek 			.desc = "GPU temperature 1",
    197  1.3.2.2  jdolecek 		},
    198  1.3.2.2  jdolecek 		[2] = {
    199  1.3.2.2  jdolecek 			.name = "gpu2",
    200  1.3.2.2  jdolecek 			.desc = "GPU temperature 2",
    201  1.3.2.2  jdolecek 		},
    202  1.3.2.2  jdolecek 	},
    203  1.3.2.2  jdolecek 	.clk_rate = A64_CLK_RATE,
    204  1.3.2.2  jdolecek 	.adc_acquire_time = A64_ADC_ACQUIRE_TIME,
    205  1.3.2.2  jdolecek 	.filter = A64_FILTER,
    206  1.3.2.2  jdolecek 	.intc = A64_INTC,
    207  1.3.2.2  jdolecek 	.to_temp = a64_to_temp,
    208  1.3.2.2  jdolecek };
    209  1.3.2.2  jdolecek 
    210  1.3.2.2  jdolecek static int
    211  1.3.2.2  jdolecek h3_to_temp(uint32_t val)
    212  1.3.2.2  jdolecek {
    213  1.3.2.2  jdolecek 	return (H3_TEMP_BASE - ((val * H3_TEMP_MUL) / H3_TEMP_DIV));
    214  1.3.2.2  jdolecek }
    215  1.3.2.2  jdolecek 
    216  1.3.2.2  jdolecek static uint32_t
    217  1.3.2.2  jdolecek h3_to_reg(int val)
    218  1.3.2.2  jdolecek {
    219  1.3.2.2  jdolecek 	return ((H3_TEMP_MINUS - (val * H3_TEMP_DIV)) / H3_TEMP_MUL);
    220  1.3.2.2  jdolecek }
    221  1.3.2.2  jdolecek 
    222  1.3.2.2  jdolecek static const struct sunxi_thermal_config h3_config = {
    223  1.3.2.2  jdolecek 	.nsensors = 1,
    224  1.3.2.2  jdolecek 	.sensors = {
    225  1.3.2.2  jdolecek 		[0] = {
    226  1.3.2.2  jdolecek 			.name = "cpu",
    227  1.3.2.2  jdolecek 			.desc = "CPU temperature",
    228  1.3.2.2  jdolecek 			.init_alarm = H3_INIT_ALARM,
    229  1.3.2.2  jdolecek 			.init_shut = H3_INIT_SHUT,
    230  1.3.2.2  jdolecek 		},
    231  1.3.2.2  jdolecek 	},
    232  1.3.2.2  jdolecek 	.clk_rate = H3_CLK_RATE,
    233  1.3.2.2  jdolecek 	.adc_acquire_time = H3_ADC_ACQUIRE_TIME,
    234  1.3.2.2  jdolecek 	.filter = H3_FILTER,
    235  1.3.2.2  jdolecek 	.intc = H3_INTC,
    236  1.3.2.2  jdolecek 	.to_temp = h3_to_temp,
    237  1.3.2.2  jdolecek 	.to_reg = h3_to_reg,
    238  1.3.2.2  jdolecek 	.calib0_mask = 0xfff,
    239  1.3.2.2  jdolecek };
    240  1.3.2.2  jdolecek 
    241  1.3.2.2  jdolecek static struct of_compat_data compat_data[] = {
    242  1.3.2.2  jdolecek 	{ "allwinner,sun8i-a83t-ts",	(uintptr_t)&a83t_config },
    243  1.3.2.2  jdolecek 	{ "allwinner,sun8i-h3-ts",	(uintptr_t)&h3_config },
    244  1.3.2.2  jdolecek 	{ "allwinner,sun50i-a64-ts",	(uintptr_t)&a64_config },
    245  1.3.2.2  jdolecek 	{ NULL,				(uintptr_t)NULL }
    246  1.3.2.2  jdolecek };
    247  1.3.2.2  jdolecek 
    248  1.3.2.2  jdolecek struct sunxi_thermal_softc {
    249  1.3.2.2  jdolecek 	device_t			dev;
    250  1.3.2.2  jdolecek 	int				phandle;
    251  1.3.2.2  jdolecek 	bus_space_tag_t			bst;
    252  1.3.2.2  jdolecek 	bus_space_handle_t		bsh;
    253  1.3.2.2  jdolecek 	struct sunxi_thermal_config	*conf;
    254  1.3.2.2  jdolecek 
    255  1.3.2.2  jdolecek 	kmutex_t			lock;
    256  1.3.2.2  jdolecek 	callout_t			tick;
    257  1.3.2.2  jdolecek 
    258  1.3.2.2  jdolecek 	struct sysmon_envsys		*sme;
    259  1.3.2.2  jdolecek 	envsys_data_t			data[MAX_SENSORS];
    260  1.3.2.2  jdolecek };
    261  1.3.2.2  jdolecek 
    262  1.3.2.2  jdolecek #define	RD4(sc, reg)		\
    263  1.3.2.2  jdolecek 	bus_space_read_4((sc)->bst, (sc)->bsh, (reg))
    264  1.3.2.2  jdolecek #define	WR4(sc, reg, val)	\
    265  1.3.2.2  jdolecek 	bus_space_write_4((sc)->bst, (sc)->bsh, (reg), (val))
    266  1.3.2.2  jdolecek 
    267  1.3.2.2  jdolecek static int
    268  1.3.2.2  jdolecek sunxi_thermal_init(struct sunxi_thermal_softc *sc)
    269  1.3.2.2  jdolecek {
    270  1.3.2.2  jdolecek 	uint32_t calib[2];
    271  1.3.2.2  jdolecek 	int error;
    272  1.3.2.2  jdolecek 
    273  1.3.2.2  jdolecek 	if (sc->conf->calib0_mask != 0 || sc->conf->calib1_mask != 0) {
    274  1.3.2.2  jdolecek 		/* Read calibration settings from SRAM */
    275  1.3.2.2  jdolecek 		error = sunxi_sid_read_tscalib(calib);
    276  1.3.2.2  jdolecek 		if (error != 0)
    277  1.3.2.2  jdolecek 			return error;
    278  1.3.2.2  jdolecek 
    279  1.3.2.2  jdolecek 		calib[0] &= sc->conf->calib0_mask;
    280  1.3.2.2  jdolecek 		calib[1] &= sc->conf->calib1_mask;
    281  1.3.2.2  jdolecek 
    282  1.3.2.2  jdolecek 		/* Write calibration settings to thermal controller */
    283  1.3.2.2  jdolecek 		if (calib[0] != 0)
    284  1.3.2.2  jdolecek 			WR4(sc, THS_CALIB0, calib[0]);
    285  1.3.2.2  jdolecek 		if (calib[1] != 0)
    286  1.3.2.2  jdolecek 			WR4(sc, THS_CALIB1, calib[1]);
    287  1.3.2.2  jdolecek 	}
    288  1.3.2.2  jdolecek 
    289  1.3.2.2  jdolecek 	/* Configure ADC acquire time (CLK_IN/(N+1)) and enable sensors */
    290  1.3.2.2  jdolecek 	WR4(sc, THS_CTRL1, ADC_CALI_EN);
    291  1.3.2.2  jdolecek 	WR4(sc, THS_CTRL0, sc->conf->adc_acquire_time);
    292  1.3.2.2  jdolecek 	WR4(sc, THS_CTRL2, sc->conf->adc_acquire_time << SENSOR_ACQ1_SHIFT);
    293  1.3.2.2  jdolecek 
    294  1.3.2.2  jdolecek 	/* Enable average filter */
    295  1.3.2.2  jdolecek 	WR4(sc, THS_FILTER, sc->conf->filter);
    296  1.3.2.2  jdolecek 
    297  1.3.2.2  jdolecek 	/* Enable interrupts */
    298  1.3.2.2  jdolecek 	WR4(sc, THS_INTS, RD4(sc, THS_INTS));
    299  1.3.2.2  jdolecek 	WR4(sc, THS_INTC, sc->conf->intc | SHUT_INT_ALL | ALARM_INT_ALL);
    300  1.3.2.2  jdolecek 
    301  1.3.2.2  jdolecek 	/* Enable sensors */
    302  1.3.2.2  jdolecek 	WR4(sc, THS_CTRL2, RD4(sc, THS_CTRL2) | SENSOR_ENABLE_ALL);
    303  1.3.2.2  jdolecek 
    304  1.3.2.2  jdolecek 	return 0;
    305  1.3.2.2  jdolecek }
    306  1.3.2.2  jdolecek 
    307  1.3.2.2  jdolecek static int
    308  1.3.2.2  jdolecek sunxi_thermal_gettemp(struct sunxi_thermal_softc *sc, int sensor)
    309  1.3.2.2  jdolecek {
    310  1.3.2.2  jdolecek 	uint32_t val;
    311  1.3.2.2  jdolecek 
    312  1.3.2.2  jdolecek 	val = RD4(sc, THS_DATA0 + (sensor * 4));
    313  1.3.2.2  jdolecek 
    314  1.3.2.2  jdolecek 	return sc->conf->to_temp(val);
    315  1.3.2.2  jdolecek }
    316  1.3.2.2  jdolecek 
    317  1.3.2.2  jdolecek static int
    318  1.3.2.2  jdolecek sunxi_thermal_getshut(struct sunxi_thermal_softc *sc, int sensor)
    319  1.3.2.2  jdolecek {
    320  1.3.2.2  jdolecek 	uint32_t val;
    321  1.3.2.2  jdolecek 
    322  1.3.2.2  jdolecek 	val = RD4(sc, THS_SHUTDOWN0_CTRL + (sensor * 4));
    323  1.3.2.2  jdolecek 	val = (val >> SHUT_T_HOT_SHIFT) & SHUT_T_HOT_MASK;
    324  1.3.2.2  jdolecek 
    325  1.3.2.2  jdolecek 	return sc->conf->to_temp(val);
    326  1.3.2.2  jdolecek }
    327  1.3.2.2  jdolecek 
    328  1.3.2.2  jdolecek static void
    329  1.3.2.2  jdolecek sunxi_thermal_setshut(struct sunxi_thermal_softc *sc, int sensor, int temp)
    330  1.3.2.2  jdolecek {
    331  1.3.2.2  jdolecek 	uint32_t val;
    332  1.3.2.2  jdolecek 
    333  1.3.2.2  jdolecek 	val = RD4(sc, THS_SHUTDOWN0_CTRL + (sensor * 4));
    334  1.3.2.2  jdolecek 	val &= ~(SHUT_T_HOT_MASK << SHUT_T_HOT_SHIFT);
    335  1.3.2.2  jdolecek 	val |= (sc->conf->to_reg(temp) << SHUT_T_HOT_SHIFT);
    336  1.3.2.2  jdolecek 	WR4(sc, THS_SHUTDOWN0_CTRL + (sensor * 4), val);
    337  1.3.2.2  jdolecek }
    338  1.3.2.2  jdolecek 
    339  1.3.2.2  jdolecek static int
    340  1.3.2.2  jdolecek sunxi_thermal_gethyst(struct sunxi_thermal_softc *sc, int sensor)
    341  1.3.2.2  jdolecek {
    342  1.3.2.2  jdolecek 	uint32_t val;
    343  1.3.2.2  jdolecek 
    344  1.3.2.2  jdolecek 	val = RD4(sc, THS_ALARM0_CTRL + (sensor * 4));
    345  1.3.2.2  jdolecek 	val = (val >> ALARM_T_HYST_SHIFT) & ALARM_T_HYST_MASK;
    346  1.3.2.2  jdolecek 
    347  1.3.2.2  jdolecek 	return sc->conf->to_temp(val);
    348  1.3.2.2  jdolecek }
    349  1.3.2.2  jdolecek 
    350  1.3.2.2  jdolecek static int
    351  1.3.2.2  jdolecek sunxi_thermal_getalarm(struct sunxi_thermal_softc *sc, int sensor)
    352  1.3.2.2  jdolecek {
    353  1.3.2.2  jdolecek 	uint32_t val;
    354  1.3.2.2  jdolecek 
    355  1.3.2.2  jdolecek 	val = RD4(sc, THS_ALARM0_CTRL + (sensor * 4));
    356  1.3.2.2  jdolecek 	val = (val >> ALARM_T_HOT_SHIFT) & ALARM_T_HOT_MASK;
    357  1.3.2.2  jdolecek 
    358  1.3.2.2  jdolecek 	return sc->conf->to_temp(val);
    359  1.3.2.2  jdolecek }
    360  1.3.2.2  jdolecek 
    361  1.3.2.2  jdolecek static void
    362  1.3.2.2  jdolecek sunxi_thermal_setalarm(struct sunxi_thermal_softc *sc, int sensor, int temp)
    363  1.3.2.2  jdolecek {
    364  1.3.2.2  jdolecek 	uint32_t val;
    365  1.3.2.2  jdolecek 
    366  1.3.2.2  jdolecek 	val = RD4(sc, THS_ALARM0_CTRL + (sensor * 4));
    367  1.3.2.2  jdolecek 	val &= ~(ALARM_T_HOT_MASK << ALARM_T_HOT_SHIFT);
    368  1.3.2.2  jdolecek 	val |= (sc->conf->to_reg(temp) << ALARM_T_HOT_SHIFT);
    369  1.3.2.2  jdolecek 	WR4(sc, THS_ALARM0_CTRL + (sensor * 4), val);
    370  1.3.2.2  jdolecek }
    371  1.3.2.2  jdolecek 
    372  1.3.2.2  jdolecek static void
    373  1.3.2.2  jdolecek sunxi_thermal_task_shut(void *arg)
    374  1.3.2.2  jdolecek {
    375  1.3.2.2  jdolecek 	struct sunxi_thermal_softc * const sc = arg;
    376  1.3.2.2  jdolecek 
    377  1.3.2.2  jdolecek 	device_printf(sc->dev,
    378  1.3.2.2  jdolecek 	    "WARNING - current temperature exceeds safe limits\n");
    379  1.3.2.2  jdolecek 
    380  1.3.2.2  jdolecek 	cpu_reboot(RB_POWERDOWN, NULL);
    381  1.3.2.2  jdolecek }
    382  1.3.2.2  jdolecek 
    383  1.3.2.2  jdolecek static void
    384  1.3.2.2  jdolecek sunxi_thermal_task_alarm(void *arg)
    385  1.3.2.2  jdolecek {
    386  1.3.2.2  jdolecek 	struct sunxi_thermal_softc * const sc = arg;
    387  1.3.2.2  jdolecek 
    388  1.3.2.2  jdolecek 	const int alarm_val = sunxi_thermal_getalarm(sc, 0);
    389  1.3.2.2  jdolecek 	const int temp_val = sunxi_thermal_gettemp(sc, 0);
    390  1.3.2.2  jdolecek 
    391  1.3.2.2  jdolecek 	if (temp_val < alarm_val)
    392  1.3.2.2  jdolecek 		pmf_event_inject(NULL, PMFE_THROTTLE_DISABLE);
    393  1.3.2.2  jdolecek 	else
    394  1.3.2.2  jdolecek 		callout_schedule(&sc->tick, hz);
    395  1.3.2.2  jdolecek }
    396  1.3.2.2  jdolecek 
    397  1.3.2.2  jdolecek static void
    398  1.3.2.2  jdolecek sunxi_thermal_tick(void *arg)
    399  1.3.2.2  jdolecek {
    400  1.3.2.2  jdolecek 	struct sunxi_thermal_softc * const sc = arg;
    401  1.3.2.2  jdolecek 
    402  1.3.2.2  jdolecek 	sysmon_task_queue_sched(0, sunxi_thermal_task_alarm, sc);
    403  1.3.2.2  jdolecek }
    404  1.3.2.2  jdolecek 
    405  1.3.2.2  jdolecek static int
    406  1.3.2.2  jdolecek sunxi_thermal_intr(void *arg)
    407  1.3.2.2  jdolecek {
    408  1.3.2.2  jdolecek 	struct sunxi_thermal_softc * const sc = arg;
    409  1.3.2.2  jdolecek 	uint32_t ints;
    410  1.3.2.2  jdolecek 
    411  1.3.2.2  jdolecek 	mutex_enter(&sc->lock);
    412  1.3.2.2  jdolecek 
    413  1.3.2.2  jdolecek 	ints = RD4(sc, THS_INTS);
    414  1.3.2.2  jdolecek 	WR4(sc, THS_INTS, ints);
    415  1.3.2.2  jdolecek 
    416  1.3.2.2  jdolecek 	if ((ints & SHUT_INT_ALL) != 0)
    417  1.3.2.2  jdolecek 		sysmon_task_queue_sched(0, sunxi_thermal_task_shut, sc);
    418  1.3.2.2  jdolecek 
    419  1.3.2.2  jdolecek 	if ((ints & ALARM_INT_ALL) != 0) {
    420  1.3.2.2  jdolecek 		pmf_event_inject(NULL, PMFE_THROTTLE_ENABLE);
    421  1.3.2.2  jdolecek 		sysmon_task_queue_sched(0, sunxi_thermal_task_alarm, sc);
    422  1.3.2.2  jdolecek 	}
    423  1.3.2.2  jdolecek 
    424  1.3.2.2  jdolecek 	mutex_exit(&sc->lock);
    425  1.3.2.2  jdolecek 
    426  1.3.2.2  jdolecek 	return 1;
    427  1.3.2.2  jdolecek }
    428  1.3.2.2  jdolecek 
    429  1.3.2.2  jdolecek static void
    430  1.3.2.2  jdolecek sunxi_thermal_refresh(struct sysmon_envsys *sme, envsys_data_t *edata)
    431  1.3.2.2  jdolecek {
    432  1.3.2.2  jdolecek 	struct sunxi_thermal_softc * const sc = sme->sme_cookie;
    433  1.3.2.2  jdolecek 
    434  1.3.2.2  jdolecek 	const int64_t temp = sunxi_thermal_gettemp(sc, edata->private);
    435  1.3.2.2  jdolecek 
    436  1.3.2.2  jdolecek 	edata->value_cur = temp * 1000000 + TEMP_C_TO_K;
    437  1.3.2.2  jdolecek 	edata->state = ENVSYS_SVALID;
    438  1.3.2.2  jdolecek }
    439  1.3.2.2  jdolecek 
    440  1.3.2.2  jdolecek static int
    441  1.3.2.2  jdolecek sunxi_thermal_init_clocks(struct sunxi_thermal_softc *sc)
    442  1.3.2.2  jdolecek {
    443  1.3.2.2  jdolecek 	struct fdtbus_reset *rst;
    444  1.3.2.2  jdolecek 	struct clk *clk;
    445  1.3.2.2  jdolecek 	int error;
    446  1.3.2.2  jdolecek 
    447  1.3.2.2  jdolecek 	clk = fdtbus_clock_get(sc->phandle, "ahb");
    448  1.3.2.2  jdolecek 	if (clk == NULL)
    449  1.3.2.2  jdolecek 		return ENXIO;
    450  1.3.2.2  jdolecek 	error = clk_enable(clk);
    451  1.3.2.2  jdolecek 	if (error != 0)
    452  1.3.2.2  jdolecek 		return error;
    453  1.3.2.2  jdolecek 
    454  1.3.2.2  jdolecek 	clk = fdtbus_clock_get(sc->phandle, "ths");
    455  1.3.2.2  jdolecek 	if (clk == NULL)
    456  1.3.2.2  jdolecek 		return ENXIO;
    457  1.3.2.2  jdolecek 	error = clk_set_rate(clk, sc->conf->clk_rate);
    458  1.3.2.2  jdolecek 	if (error != 0)
    459  1.3.2.2  jdolecek 		return error;
    460  1.3.2.2  jdolecek 	error = clk_enable(clk);
    461  1.3.2.2  jdolecek 	if (error != 0)
    462  1.3.2.2  jdolecek 		return error;
    463  1.3.2.2  jdolecek 
    464  1.3.2.2  jdolecek 	rst = fdtbus_reset_get_index(sc->phandle, 0);
    465  1.3.2.2  jdolecek 	if (rst == NULL)
    466  1.3.2.2  jdolecek 		return ENXIO;
    467  1.3.2.2  jdolecek 	error = fdtbus_reset_deassert(rst);
    468  1.3.2.2  jdolecek 	if (error != 0)
    469  1.3.2.2  jdolecek 		return error;
    470  1.3.2.2  jdolecek 
    471  1.3.2.2  jdolecek 	return 0;
    472  1.3.2.2  jdolecek }
    473  1.3.2.2  jdolecek 
    474  1.3.2.2  jdolecek static int
    475  1.3.2.2  jdolecek sunxi_thermal_match(device_t parent, cfdata_t cf, void *aux)
    476  1.3.2.2  jdolecek {
    477  1.3.2.2  jdolecek 	struct fdt_attach_args * const faa = aux;
    478  1.3.2.2  jdolecek 
    479  1.3.2.2  jdolecek 	return of_match_compat_data(faa->faa_phandle, compat_data);
    480  1.3.2.2  jdolecek }
    481  1.3.2.2  jdolecek 
    482  1.3.2.2  jdolecek static void
    483  1.3.2.2  jdolecek sunxi_thermal_attach(device_t parent, device_t self, void *aux)
    484  1.3.2.2  jdolecek {
    485  1.3.2.2  jdolecek 	struct sunxi_thermal_softc * const sc = device_private(self);
    486  1.3.2.2  jdolecek 	struct fdt_attach_args * const faa = aux;
    487  1.3.2.2  jdolecek 	const int phandle = faa->faa_phandle;
    488  1.3.2.2  jdolecek 	char intrstr[128];
    489  1.3.2.2  jdolecek 	bus_addr_t addr;
    490  1.3.2.2  jdolecek 	bus_size_t size;
    491  1.3.2.2  jdolecek 	void *ih;
    492  1.3.2.2  jdolecek 	int i;
    493  1.3.2.2  jdolecek 
    494  1.3.2.2  jdolecek 	if (fdtbus_get_reg(phandle, 0, &addr, &size) != 0) {
    495  1.3.2.2  jdolecek 		aprint_error(": couldn't get registers\n");
    496  1.3.2.2  jdolecek 		return;
    497  1.3.2.2  jdolecek 	}
    498  1.3.2.2  jdolecek 
    499  1.3.2.2  jdolecek 	sc->dev = self;
    500  1.3.2.2  jdolecek 	sc->phandle = phandle;
    501  1.3.2.2  jdolecek 	sc->bst = faa->faa_bst;
    502  1.3.2.2  jdolecek 	sc->conf = (void *)of_search_compatible(phandle, compat_data)->data;
    503  1.3.2.2  jdolecek 	if (bus_space_map(sc->bst, addr, size, 0, &sc->bsh) != 0) {
    504  1.3.2.2  jdolecek 		aprint_error(": couldn't map registers\n");
    505  1.3.2.2  jdolecek 		return;
    506  1.3.2.2  jdolecek 	}
    507  1.3.2.2  jdolecek 	mutex_init(&sc->lock, MUTEX_DEFAULT, IPL_VM);
    508  1.3.2.2  jdolecek 	callout_init(&sc->tick, CALLOUT_MPSAFE);
    509  1.3.2.2  jdolecek 	callout_setfunc(&sc->tick, sunxi_thermal_tick, sc);
    510  1.3.2.2  jdolecek 
    511  1.3.2.2  jdolecek 	if (sunxi_thermal_init_clocks(sc) != 0) {
    512  1.3.2.2  jdolecek 		aprint_error(": couldn't enable clocks\n");
    513  1.3.2.2  jdolecek 		return;
    514  1.3.2.2  jdolecek 	}
    515  1.3.2.2  jdolecek 
    516  1.3.2.2  jdolecek 	if (!fdtbus_intr_str(phandle, 0, intrstr, sizeof(intrstr))) {
    517  1.3.2.2  jdolecek 		aprint_error(": couldn't decode interrupt\n");
    518  1.3.2.2  jdolecek 		return;
    519  1.3.2.2  jdolecek 	}
    520  1.3.2.2  jdolecek 
    521  1.3.2.2  jdolecek 	aprint_naive("\n");
    522  1.3.2.2  jdolecek 	aprint_normal(": Thermal sensor controller\n");
    523  1.3.2.2  jdolecek 
    524  1.3.2.2  jdolecek 	ih = fdtbus_intr_establish(phandle, 0, IPL_VM, FDT_INTR_MPSAFE,
    525  1.3.2.2  jdolecek 	    sunxi_thermal_intr, sc);
    526  1.3.2.2  jdolecek 	if (ih == NULL) {
    527  1.3.2.2  jdolecek 		aprint_error_dev(self, "couldn't establish interrupt on %s\n",
    528  1.3.2.2  jdolecek 		    intrstr);
    529  1.3.2.2  jdolecek 		return;
    530  1.3.2.2  jdolecek 	}
    531  1.3.2.2  jdolecek 	aprint_normal_dev(self, "interrupting on %s\n", intrstr);
    532  1.3.2.2  jdolecek 
    533  1.3.2.2  jdolecek 	for (i = 0; i < sc->conf->nsensors; i++) {
    534  1.3.2.2  jdolecek 		if (sc->conf->sensors[i].init_alarm > 0)
    535  1.3.2.2  jdolecek 			sunxi_thermal_setalarm(sc, i,
    536  1.3.2.2  jdolecek 			    sc->conf->sensors[i].init_alarm);
    537  1.3.2.2  jdolecek 		if (sc->conf->sensors[i].init_shut > 0)
    538  1.3.2.2  jdolecek 			sunxi_thermal_setshut(sc, i,
    539  1.3.2.2  jdolecek 			    sc->conf->sensors[i].init_shut);
    540  1.3.2.2  jdolecek 	}
    541  1.3.2.2  jdolecek 
    542  1.3.2.2  jdolecek 	if (sunxi_thermal_init(sc) != 0) {
    543  1.3.2.2  jdolecek 		aprint_error_dev(self, "failed to initialize sensors\n");
    544  1.3.2.2  jdolecek 		return;
    545  1.3.2.2  jdolecek 	}
    546  1.3.2.2  jdolecek 
    547  1.3.2.2  jdolecek 	sc->sme = sysmon_envsys_create();
    548  1.3.2.2  jdolecek 	sc->sme->sme_name = device_xname(self);
    549  1.3.2.2  jdolecek 	sc->sme->sme_cookie = sc;
    550  1.3.2.2  jdolecek 	sc->sme->sme_refresh = sunxi_thermal_refresh;
    551  1.3.2.2  jdolecek 	for (i = 0; i < sc->conf->nsensors; i++) {
    552  1.3.2.2  jdolecek 		sc->data[i].private = i;
    553  1.3.2.2  jdolecek 		sc->data[i].units = ENVSYS_STEMP;
    554  1.3.2.2  jdolecek 		sc->data[i].state = ENVSYS_SINVALID;
    555  1.3.2.2  jdolecek 		strlcpy(sc->data[1].desc, sc->conf->sensors[i].desc,
    556  1.3.2.2  jdolecek 		    sizeof(sc->data[1].desc));
    557  1.3.2.2  jdolecek 		sysmon_envsys_sensor_attach(sc->sme, &sc->data[i]);
    558  1.3.2.2  jdolecek 	}
    559  1.3.2.2  jdolecek 	sysmon_envsys_register(sc->sme);
    560  1.3.2.2  jdolecek 
    561  1.3.2.2  jdolecek 	for (i = 0; i < sc->conf->nsensors; i++) {
    562  1.3.2.2  jdolecek 		device_printf(self,
    563  1.3.2.2  jdolecek 		    "%s: alarm %dC hyst %dC shut %dC\n",
    564  1.3.2.2  jdolecek 		    sc->conf->sensors[i].name,
    565  1.3.2.2  jdolecek 		    sunxi_thermal_getalarm(sc, i),
    566  1.3.2.2  jdolecek 		    sunxi_thermal_gethyst(sc, i),
    567  1.3.2.2  jdolecek 		    sunxi_thermal_getshut(sc, i));
    568  1.3.2.2  jdolecek 	}
    569  1.3.2.2  jdolecek }
    570  1.3.2.2  jdolecek 
    571  1.3.2.2  jdolecek CFATTACH_DECL_NEW(sunxi_thermal, sizeof(struct sunxi_thermal_softc),
    572  1.3.2.2  jdolecek     sunxi_thermal_match, sunxi_thermal_attach, NULL, NULL);
    573