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@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