Home | History | Annotate | Line # | Download | only in nvidia
tegra_soctherm.c revision 1.3
      1 /* $NetBSD: tegra_soctherm.c,v 1.3 2015/12/22 22:10:36 jmcneill Exp $ */
      2 
      3 /*-
      4  * Copyright (c) 2015 Jared D. McNeill <jmcneill (at) invisible.ca>
      5  * All rights reserved.
      6  *
      7  * Redistribution and use in source and binary forms, with or without
      8  * modification, are permitted provided that the following conditions
      9  * are met:
     10  * 1. Redistributions of source code must retain the above copyright
     11  *    notice, this list of conditions and the following disclaimer.
     12  * 2. Redistributions in binary form must reproduce the above copyright
     13  *    notice, this list of conditions and the following disclaimer in the
     14  *    documentation and/or other materials provided with the distribution.
     15  *
     16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     17  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     18  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     19  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     20  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
     21  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
     22  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
     23  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
     24  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     26  * SUCH DAMAGE.
     27  */
     28 
     29 #include <sys/cdefs.h>
     30 __KERNEL_RCSID(0, "$NetBSD: tegra_soctherm.c,v 1.3 2015/12/22 22:10:36 jmcneill Exp $");
     31 
     32 #include <sys/param.h>
     33 #include <sys/bus.h>
     34 #include <sys/device.h>
     35 #include <sys/intr.h>
     36 #include <sys/systm.h>
     37 #include <sys/kernel.h>
     38 #include <sys/kmem.h>
     39 
     40 #include <dev/sysmon/sysmonvar.h>
     41 
     42 #include <arm/nvidia/tegra_reg.h>
     43 #include <arm/nvidia/tegra_socthermreg.h>
     44 #include <arm/nvidia/tegra_var.h>
     45 
     46 #include <dev/fdt/fdtvar.h>
     47 
     48 #define FUSE_TSENSOR_CALIB_CP_TS_BASE	__BITS(12,0)
     49 #define FUSE_TSENSOR_CALIB_FT_TS_BASE	__BITS(25,13)
     50 
     51 #define FUSE_TSENSOR8_CALIB_REG		0x180
     52 #define FUSE_TSENSOR8_CALIB_CP_TS_BASE	__BITS(9,0)
     53 #define FUSE_TSENSOR8_CALIB_FT_TS_BASE	__BITS(20,10)
     54 
     55 #define FUSE_SPARE_REALIGNMENT_REG	0x1fc
     56 #define FUSE_SPARE_REALIGNMENT_CP	__BITS(5,0)
     57 #define FUSE_SPARE_REALIGNMENT_FT	__BITS(25,21)
     58 
     59 static int	tegra_soctherm_match(device_t, cfdata_t, void *);
     60 static void	tegra_soctherm_attach(device_t, device_t, void *);
     61 
     62 struct tegra_soctherm_config {
     63 	uint32_t init_pdiv;
     64 	uint32_t init_hotspot_off;
     65 	uint32_t nominal_calib_ft;
     66 	uint32_t nominal_calib_cp;
     67 	uint32_t tall;
     68 	uint32_t tsample;
     69 	uint32_t tiddq_en;
     70 	uint32_t ten_count;
     71 	uint32_t pdiv;
     72 	uint32_t tsample_ate;
     73 	uint32_t pdiv_ate;
     74 };
     75 
     76 static const struct tegra_soctherm_config tegra124_soctherm_config = {
     77 	.init_pdiv = 0x8888,
     78 	.init_hotspot_off = 0x60600,
     79 	.nominal_calib_ft = 105,
     80 	.nominal_calib_cp = 25,
     81 	.tall = 16300,
     82 	.tsample = 120,
     83 	.tiddq_en = 1,
     84 	.ten_count = 1,
     85 	.pdiv = 8,
     86 	.tsample_ate = 480,
     87 	.pdiv_ate = 8
     88 };
     89 
     90 struct tegra_soctherm_sensor {
     91 	envsys_data_t		s_data;
     92 	u_int			s_base;
     93 	u_int			s_fuse;
     94 	int			s_fuse_corr_alpha;
     95 	int			s_fuse_corr_beta;
     96 	int16_t			s_therm_a;
     97 	int16_t			s_therm_b;
     98 };
     99 
    100 static const struct tegra_soctherm_sensor tegra_soctherm_sensors[] = {
    101 	{ .s_data = { .desc = "CPU0" }, .s_base = 0x0c0, .s_fuse = 0x098,
    102 	  .s_fuse_corr_alpha = 1135400, .s_fuse_corr_beta = -6266900 },
    103 	{ .s_data = { .desc = "CPU1" }, .s_base = 0x0e0, .s_fuse = 0x084,
    104 	  .s_fuse_corr_alpha = 1122220, .s_fuse_corr_beta = -5700700 },
    105 	{ .s_data = { .desc = "CPU2" }, .s_base = 0x100, .s_fuse = 0x088,
    106 	  .s_fuse_corr_alpha = 1127000, .s_fuse_corr_beta = -6768200 },
    107 	{ .s_data = { .desc = "CPU3" }, .s_base = 0x120, .s_fuse = 0x12c,
    108 	  .s_fuse_corr_alpha = 1110900, .s_fuse_corr_beta = -6232000 },
    109 	{ .s_data = { .desc = "MEM0" }, .s_base = 0x140, .s_fuse = 0x158,
    110 	  .s_fuse_corr_alpha = 1122300, .s_fuse_corr_beta = -5936400 },
    111 	{ .s_data = { .desc = "MEM1" }, .s_base = 0x160, .s_fuse = 0x15c,
    112 	  .s_fuse_corr_alpha = 1145700, .s_fuse_corr_beta = -7124600 },
    113 	{ .s_data = { .desc = "GPU" },  .s_base = 0x180, .s_fuse = 0x154,
    114 	  .s_fuse_corr_alpha = 1120100, .s_fuse_corr_beta = -6000500 },
    115 	{ .s_data = { .desc = "PLLX" }, .s_base = 0x1a0, .s_fuse = 0x160,
    116 	  .s_fuse_corr_alpha = 1106500, .s_fuse_corr_beta = -6729300 },
    117 };
    118 
    119 struct tegra_soctherm_softc {
    120 	device_t		sc_dev;
    121 	bus_space_tag_t		sc_bst;
    122 	bus_space_handle_t	sc_bsh;
    123 	struct clk		*sc_clk_tsensor;
    124 	struct clk		*sc_clk_soctherm;
    125 	struct fdtbus_reset	*sc_rst_soctherm;
    126 
    127 	struct sysmon_envsys	*sc_sme;
    128 	struct tegra_soctherm_sensor *sc_sensors;
    129 	const struct tegra_soctherm_config *sc_config;
    130 
    131 	uint32_t		sc_base_cp;
    132 	uint32_t		sc_base_ft;
    133 	int32_t			sc_actual_temp_cp;
    134 	int32_t			sc_actual_temp_ft;
    135 };
    136 
    137 static int	tegra_soctherm_init_clocks(struct tegra_soctherm_softc *);
    138 static void	tegra_soctherm_init_sensors(struct tegra_soctherm_softc *);
    139 static void	tegra_soctherm_init_sensor(struct tegra_soctherm_softc *,
    140 		    struct tegra_soctherm_sensor *);
    141 static void	tegra_soctherm_refresh(struct sysmon_envsys *, envsys_data_t *);
    142 static int	tegra_soctherm_decodeint(uint32_t, uint32_t);
    143 static int64_t	tegra_soctherm_divide(int64_t, int64_t);
    144 
    145 CFATTACH_DECL_NEW(tegra_soctherm, sizeof(struct tegra_soctherm_softc),
    146 	tegra_soctherm_match, tegra_soctherm_attach, NULL, NULL);
    147 
    148 #define SOCTHERM_READ(sc, reg)			\
    149     bus_space_read_4((sc)->sc_bst, (sc)->sc_bsh, (reg))
    150 #define SOCTHERM_WRITE(sc, reg, val)		\
    151     bus_space_write_4((sc)->sc_bst, (sc)->sc_bsh, (reg), (val))
    152 #define SOCTHERM_SET_CLEAR(sc, reg, set, clr)	\
    153     tegra_reg_set_clear((sc)->sc_bst, (sc)->sc_bsh, (reg), (set), (clr))
    154 
    155 #define SENSOR_READ(sc, s, reg)			\
    156     bus_space_read_4((sc)->sc_bst, (sc)->sc_bsh, (s)->s_base + (reg))
    157 #define SENSOR_WRITE(sc, s, reg, val)		\
    158     bus_space_write_4((sc)->sc_bst, (sc)->sc_bsh, (s)->s_base + (reg), (val))
    159 #define SENSOR_SET_CLEAR(sc, s, reg, set, clr)	\
    160     tegra_reg_set_clear((sc)->sc_bst, (sc)->sc_bsh, (s)->s_base + (reg), (set), (clr))
    161 
    162 static int
    163 tegra_soctherm_match(device_t parent, cfdata_t cf, void *aux)
    164 {
    165 	const char * const compatible[] = { "nvidia,tegra124-soctherm", NULL };
    166 	struct fdt_attach_args * const faa = aux;
    167 
    168 	return of_match_compatible(faa->faa_phandle, compatible);
    169 }
    170 
    171 static void
    172 tegra_soctherm_attach(device_t parent, device_t self, void *aux)
    173 {
    174 	struct tegra_soctherm_softc * const sc = device_private(self);
    175 	struct fdt_attach_args * const faa = aux;
    176 	bus_addr_t addr;
    177 	bus_size_t size;
    178 	int error;
    179 
    180 	if (fdtbus_get_reg(faa->faa_phandle, 0, &addr, &size) != 0) {
    181 		aprint_error(": couldn't get registers\n");
    182 		return;
    183 	}
    184 	sc->sc_clk_tsensor = fdtbus_clock_get(faa->faa_phandle, "tsensor");
    185 	if (sc->sc_clk_tsensor == NULL) {
    186 		aprint_error(": couldn't get clock tsensor\n");
    187 		return;
    188 	}
    189 	sc->sc_clk_soctherm = fdtbus_clock_get(faa->faa_phandle, "soctherm");
    190 	if (sc->sc_clk_soctherm == NULL) {
    191 		aprint_error(": couldn't get clock soctherm\n");
    192 		return;
    193 	}
    194 	sc->sc_rst_soctherm = fdtbus_reset_get(faa->faa_phandle, "soctherm");
    195 	if (sc->sc_rst_soctherm == NULL) {
    196 		aprint_error(": couldn't get reset soctherm\n");
    197 		return;
    198 	}
    199 
    200 	sc->sc_dev = self;
    201 	sc->sc_bst = faa->faa_bst;
    202 	error = bus_space_map(sc->sc_bst, addr, size, 0, &sc->sc_bsh);
    203 	if (error) {
    204 		aprint_error(": couldn't map %#llx: %d", (uint64_t)addr, error);
    205 		return;
    206 	}
    207 
    208 	aprint_naive("\n");
    209 	aprint_normal(": SOC_THERM\n");
    210 
    211 	if (tegra_chip_id() == CHIP_ID_TEGRA124) {
    212 		sc->sc_config = &tegra124_soctherm_config;
    213 	}
    214 
    215 	if (sc->sc_config == NULL) {
    216 		aprint_error_dev(self, "unsupported chip ID\n");
    217 		return;
    218 	}
    219 
    220 	if (tegra_soctherm_init_clocks(sc) != 0)
    221 		return;
    222 
    223 	tegra_soctherm_init_sensors(sc);
    224 }
    225 
    226 static int
    227 tegra_soctherm_init_clocks(struct tegra_soctherm_softc *sc)
    228 {
    229 	struct clk *pll_p_out0;
    230 	struct clk *clk_m;
    231 	int error;
    232 
    233 	pll_p_out0 = clk_get("pll_p_out0");
    234 	if (pll_p_out0 == NULL) {
    235 		aprint_error_dev(sc->sc_dev, "couldn't find pll_p_out0\n");
    236 		return ENOENT;
    237 	}
    238 	clk_m = clk_get("clk_m");
    239 	if (clk_m == NULL) {
    240 		aprint_error_dev(sc->sc_dev, "couldn't find clk_m\n");
    241 		return ENOENT;
    242 	}
    243 
    244 	fdtbus_reset_assert(sc->sc_rst_soctherm);
    245 
    246 	error = clk_set_parent(sc->sc_clk_soctherm, pll_p_out0);
    247 	if (error) {
    248 		aprint_error_dev(sc->sc_dev,
    249 		    "couldn't set soctherm parent: %d\n", error);
    250 		return error;
    251 	}
    252 	error = clk_set_rate(sc->sc_clk_soctherm, 51000000);
    253 	if (error) {
    254 		aprint_error_dev(sc->sc_dev,
    255 		    "couldn't set soctherm rate: %d\n", error);
    256 		return error;
    257 	}
    258 
    259 	error = clk_set_parent(sc->sc_clk_tsensor, clk_m);
    260 	if (error) {
    261 		aprint_error_dev(sc->sc_dev,
    262 		    "couldn't set tsensor parent: %d\n", error);
    263 		return error;
    264 	}
    265 	error = clk_set_rate(sc->sc_clk_tsensor, 400000);
    266 	if (error) {
    267 		aprint_error_dev(sc->sc_dev,
    268 		    "couldn't set tsensor rate: %d\n", error);
    269 		return error;
    270 	}
    271 
    272 	error = clk_enable(sc->sc_clk_tsensor);
    273 	if (error) {
    274 		aprint_error_dev(sc->sc_dev, "couldn't enable tsensor: %d\n",
    275 		    error);
    276 		return error;
    277 	}
    278 
    279 	error = clk_enable(sc->sc_clk_soctherm);
    280 	if (error) {
    281 		aprint_error_dev(sc->sc_dev, "couldn't enable soctherm: %d\n",
    282 		    error);
    283 		return error;
    284 	}
    285 
    286 	fdtbus_reset_deassert(sc->sc_rst_soctherm);
    287 
    288 	return 0;
    289 }
    290 
    291 static void
    292 tegra_soctherm_init_sensors(struct tegra_soctherm_softc *sc)
    293 {
    294 	const struct tegra_soctherm_config *config = sc->sc_config;
    295 	const u_int nsensors = __arraycount(tegra_soctherm_sensors);
    296 	const size_t len = sizeof(*sc->sc_sensors) * nsensors;
    297 	uint32_t val;
    298 	u_int n;
    299 
    300 	val = tegra_fuse_read(FUSE_TSENSOR8_CALIB_REG);
    301 	sc->sc_base_cp = __SHIFTOUT(val, FUSE_TSENSOR8_CALIB_CP_TS_BASE);
    302 	sc->sc_base_ft = __SHIFTOUT(val, FUSE_TSENSOR8_CALIB_FT_TS_BASE);
    303 	val = tegra_fuse_read(FUSE_SPARE_REALIGNMENT_REG);
    304 	const int calib_cp = tegra_soctherm_decodeint(val,
    305 	    FUSE_SPARE_REALIGNMENT_CP);
    306 	const int calib_ft = tegra_soctherm_decodeint(val,
    307 	    FUSE_SPARE_REALIGNMENT_FT);
    308 	sc->sc_actual_temp_cp = 2 * config->nominal_calib_cp + calib_cp;
    309 	sc->sc_actual_temp_ft = 2 * config->nominal_calib_ft + calib_ft;
    310 
    311 	sc->sc_sme = sysmon_envsys_create();
    312 	sc->sc_sme->sme_name = device_xname(sc->sc_dev);
    313 	sc->sc_sme->sme_cookie = sc;
    314 	sc->sc_sme->sme_refresh = tegra_soctherm_refresh;
    315 
    316 	sc->sc_sensors = kmem_zalloc(len, KM_SLEEP);
    317 	for (n = 0; n < nsensors; n++) {
    318 		sc->sc_sensors[n] = tegra_soctherm_sensors[n];
    319 		tegra_soctherm_init_sensor(sc, &sc->sc_sensors[n]);
    320 	}
    321 
    322 	SOCTHERM_WRITE(sc, SOC_THERM_TSENSOR_PDIV_REG, config->init_pdiv);
    323 	SOCTHERM_WRITE(sc, SOC_THERM_TSENSOR_HOTSPOT_OFF_REG,
    324 	    config->init_hotspot_off);
    325 
    326 	sysmon_envsys_register(sc->sc_sme);
    327 }
    328 
    329 static void
    330 tegra_soctherm_init_sensor(struct tegra_soctherm_softc *sc,
    331     struct tegra_soctherm_sensor *s)
    332 {
    333 	const struct tegra_soctherm_config *config = sc->sc_config;
    334 	int64_t temp_a, temp_b, tmp;
    335 	uint32_t val;
    336 
    337 	val = tegra_fuse_read(s->s_fuse);
    338 	const int calib_cp = tegra_soctherm_decodeint(val,
    339 	    FUSE_TSENSOR_CALIB_CP_TS_BASE);
    340 	const int calib_ft = tegra_soctherm_decodeint(val,
    341 	    FUSE_TSENSOR_CALIB_FT_TS_BASE);
    342 	const int actual_cp = sc->sc_base_cp * 64 + calib_cp;
    343 	const int actual_ft = sc->sc_base_ft * 32 + calib_ft;
    344 
    345 	const int64_t d_sensor = actual_ft - actual_cp;
    346 	const int64_t d_temp = sc->sc_actual_temp_ft - sc->sc_actual_temp_cp;
    347 	const int mult = config->pdiv * config->tsample_ate;
    348 	const int div = config->tsample * config->pdiv_ate;
    349 
    350 	temp_a = tegra_soctherm_divide(d_temp * 0x2000 * mult,
    351 	    d_sensor * div);
    352 	tmp = (int64_t)actual_ft * sc->sc_actual_temp_cp -
    353 	      (int64_t)actual_cp * sc->sc_actual_temp_ft;
    354 	temp_b = tegra_soctherm_divide(tmp, d_sensor);
    355 	temp_a = tegra_soctherm_divide(
    356 	    temp_a * s->s_fuse_corr_alpha, 1000000);
    357 	temp_b = (uint16_t)tegra_soctherm_divide(
    358 	    temp_b * s->s_fuse_corr_alpha + s->s_fuse_corr_beta, 1000000);
    359 
    360 	s->s_therm_a = (int16_t)temp_a;
    361 	s->s_therm_b = (int16_t)temp_b;
    362 
    363 	SENSOR_SET_CLEAR(sc, s, SOC_THERM_TSENSOR_CONFIG0_OFFSET,
    364 	    SOC_THERM_TSENSOR_CONFIG0_STATUS_CLR |
    365 	    SOC_THERM_TSENSOR_CONFIG0_STOP, 0);
    366 	SENSOR_WRITE(sc, s, SOC_THERM_TSENSOR_CONFIG0_OFFSET,
    367 	    __SHIFTIN(config->tall, SOC_THERM_TSENSOR_CONFIG0_TALL) |
    368 	    SOC_THERM_TSENSOR_CONFIG0_STOP);
    369 
    370 	SENSOR_WRITE(sc, s, SOC_THERM_TSENSOR_CONFIG1_OFFSET,
    371 	    __SHIFTIN(config->tsample - 1, SOC_THERM_TSENSOR_CONFIG1_TSAMPLE) |
    372 	    __SHIFTIN(config->tiddq_en, SOC_THERM_TSENSOR_CONFIG1_TIDDQ_EN) |
    373 	    __SHIFTIN(config->ten_count, SOC_THERM_TSENSOR_CONFIG1_TEN_COUNT) |
    374 	    SOC_THERM_TSENSOR_CONFIG1_TEMP_ENABLE);
    375 
    376 	SENSOR_WRITE(sc, s, SOC_THERM_TSENSOR_CONFIG2_OFFSET,
    377 	    __SHIFTIN((uint16_t)s->s_therm_a,
    378 		      SOC_THERM_TSENSOR_CONFIG2_THERM_A) |
    379 	    __SHIFTIN((uint16_t)s->s_therm_b,
    380 		      SOC_THERM_TSENSOR_CONFIG2_THERM_B));
    381 
    382 	SENSOR_SET_CLEAR(sc, s, SOC_THERM_TSENSOR_CONFIG0_OFFSET,
    383 	    0, SOC_THERM_TSENSOR_CONFIG0_STOP);
    384 
    385 	s->s_data.units = ENVSYS_STEMP;
    386 	s->s_data.state = ENVSYS_SINVALID;
    387 	sysmon_envsys_sensor_attach(sc->sc_sme, &s->s_data);
    388 }
    389 
    390 static void
    391 tegra_soctherm_refresh(struct sysmon_envsys *sme, envsys_data_t *edata)
    392 {
    393 	struct tegra_soctherm_softc * const sc = sme->sme_cookie;
    394 	struct tegra_soctherm_sensor *s = (struct tegra_soctherm_sensor *)edata;
    395 	uint32_t status;
    396 
    397 	status = SENSOR_READ(sc, s, SOC_THERM_TSENSOR_STATUS1_OFFSET);
    398 	if (status & SOC_THERM_TSENSOR_STATUS1_TEMP_VALID) {
    399 		const u_int temp = __SHIFTOUT(status,
    400 		    SOC_THERM_TSENSOR_STATUS1_TEMP);
    401 		int64_t val = ((temp >> 8) & 0xff) * 1000000;
    402 		if (temp & 0x80)
    403 			val += 500000;
    404 		if (temp & 0x02)
    405 			val = -val;
    406 		edata->value_cur = val + 273150000;
    407 		edata->state = ENVSYS_SVALID;
    408 	} else {
    409 		edata->state = ENVSYS_SINVALID;
    410 	}
    411 }
    412 
    413 static int
    414 tegra_soctherm_decodeint(uint32_t val, uint32_t bitmask)
    415 {
    416 	const uint32_t v = __SHIFTOUT(val, bitmask);
    417 	const int bits = popcount32(bitmask);
    418 	int ret = v << (32 - bits);
    419 	return ret >> (32 - bits);
    420 }
    421 
    422 static int64_t
    423 tegra_soctherm_divide(int64_t num, int64_t denom)
    424 {
    425 	int64_t ret = ((num << 16) * 2 + 1) / (2 * denom);
    426 	return ret >> 16;
    427 }
    428