Loading...
1// SPDX-License-Identifier: GPL-2.0
2/*
3 * Thermal sensor driver for Allwinner SOC
4 * Copyright (C) 2019 Yangtao Li
5 *
6 * Based on the work of Icenowy Zheng <icenowy@aosc.io>
7 * Based on the work of Ondrej Jirman <megous@megous.com>
8 * Based on the work of Josef Gajdusek <atx@atx.name>
9 */
10
11#include <linux/clk.h>
12#include <linux/device.h>
13#include <linux/interrupt.h>
14#include <linux/module.h>
15#include <linux/nvmem-consumer.h>
16#include <linux/of_device.h>
17#include <linux/platform_device.h>
18#include <linux/regmap.h>
19#include <linux/reset.h>
20#include <linux/slab.h>
21#include <linux/thermal.h>
22
23#include "thermal_hwmon.h"
24
25#define MAX_SENSOR_NUM 4
26
27#define FT_TEMP_MASK GENMASK(11, 0)
28#define TEMP_CALIB_MASK GENMASK(11, 0)
29#define CALIBRATE_DEFAULT 0x800
30
31#define SUN8I_THS_CTRL0 0x00
32#define SUN8I_THS_CTRL2 0x40
33#define SUN8I_THS_IC 0x44
34#define SUN8I_THS_IS 0x48
35#define SUN8I_THS_MFC 0x70
36#define SUN8I_THS_TEMP_CALIB 0x74
37#define SUN8I_THS_TEMP_DATA 0x80
38
39#define SUN50I_THS_CTRL0 0x00
40#define SUN50I_H6_THS_ENABLE 0x04
41#define SUN50I_H6_THS_PC 0x08
42#define SUN50I_H6_THS_DIC 0x10
43#define SUN50I_H6_THS_DIS 0x20
44#define SUN50I_H6_THS_MFC 0x30
45#define SUN50I_H6_THS_TEMP_CALIB 0xa0
46#define SUN50I_H6_THS_TEMP_DATA 0xc0
47
48#define SUN8I_THS_CTRL0_T_ACQ0(x) (GENMASK(15, 0) & (x))
49#define SUN8I_THS_CTRL2_T_ACQ1(x) ((GENMASK(15, 0) & (x)) << 16)
50#define SUN8I_THS_DATA_IRQ_STS(x) BIT(x + 8)
51
52#define SUN50I_THS_CTRL0_T_ACQ(x) ((GENMASK(15, 0) & (x)) << 16)
53#define SUN50I_THS_FILTER_EN BIT(2)
54#define SUN50I_THS_FILTER_TYPE(x) (GENMASK(1, 0) & (x))
55#define SUN50I_H6_THS_PC_TEMP_PERIOD(x) ((GENMASK(19, 0) & (x)) << 12)
56#define SUN50I_H6_THS_DATA_IRQ_STS(x) BIT(x)
57
58/* millidegree celsius */
59
60struct tsensor {
61 struct ths_device *tmdev;
62 struct thermal_zone_device *tzd;
63 int id;
64};
65
66struct ths_thermal_chip {
67 bool has_mod_clk;
68 bool has_bus_clk_reset;
69 int sensor_num;
70 int offset;
71 int scale;
72 int ft_deviation;
73 int temp_data_base;
74 int (*calibrate)(struct ths_device *tmdev,
75 u16 *caldata, int callen);
76 int (*init)(struct ths_device *tmdev);
77 int (*irq_ack)(struct ths_device *tmdev);
78 int (*calc_temp)(struct ths_device *tmdev,
79 int id, int reg);
80};
81
82struct ths_device {
83 const struct ths_thermal_chip *chip;
84 struct device *dev;
85 struct regmap *regmap;
86 struct reset_control *reset;
87 struct clk *bus_clk;
88 struct clk *mod_clk;
89 struct tsensor sensor[MAX_SENSOR_NUM];
90};
91
92/* Temp Unit: millidegree Celsius */
93static int sun8i_ths_calc_temp(struct ths_device *tmdev,
94 int id, int reg)
95{
96 return tmdev->chip->offset - (reg * tmdev->chip->scale / 10);
97}
98
99static int sun50i_h5_calc_temp(struct ths_device *tmdev,
100 int id, int reg)
101{
102 if (reg >= 0x500)
103 return -1191 * reg / 10 + 223000;
104 else if (!id)
105 return -1452 * reg / 10 + 259000;
106 else
107 return -1590 * reg / 10 + 276000;
108}
109
110static int sun8i_ths_get_temp(void *data, int *temp)
111{
112 struct tsensor *s = data;
113 struct ths_device *tmdev = s->tmdev;
114 int val = 0;
115
116 regmap_read(tmdev->regmap, tmdev->chip->temp_data_base +
117 0x4 * s->id, &val);
118
119 /* ths have no data yet */
120 if (!val)
121 return -EAGAIN;
122
123 *temp = tmdev->chip->calc_temp(tmdev, s->id, val);
124 /*
125 * According to the original sdk, there are some platforms(rarely)
126 * that add a fixed offset value after calculating the temperature
127 * value. We can't simply put it on the formula for calculating the
128 * temperature above, because the formula for calculating the
129 * temperature above is also used when the sensor is calibrated. If
130 * do this, the correct calibration formula is hard to know.
131 */
132 *temp += tmdev->chip->ft_deviation;
133
134 return 0;
135}
136
137static const struct thermal_zone_of_device_ops ths_ops = {
138 .get_temp = sun8i_ths_get_temp,
139};
140
141static const struct regmap_config config = {
142 .reg_bits = 32,
143 .val_bits = 32,
144 .reg_stride = 4,
145 .fast_io = true,
146 .max_register = 0xfc,
147};
148
149static int sun8i_h3_irq_ack(struct ths_device *tmdev)
150{
151 int i, state, ret = 0;
152
153 regmap_read(tmdev->regmap, SUN8I_THS_IS, &state);
154
155 for (i = 0; i < tmdev->chip->sensor_num; i++) {
156 if (state & SUN8I_THS_DATA_IRQ_STS(i)) {
157 regmap_write(tmdev->regmap, SUN8I_THS_IS,
158 SUN8I_THS_DATA_IRQ_STS(i));
159 ret |= BIT(i);
160 }
161 }
162
163 return ret;
164}
165
166static int sun50i_h6_irq_ack(struct ths_device *tmdev)
167{
168 int i, state, ret = 0;
169
170 regmap_read(tmdev->regmap, SUN50I_H6_THS_DIS, &state);
171
172 for (i = 0; i < tmdev->chip->sensor_num; i++) {
173 if (state & SUN50I_H6_THS_DATA_IRQ_STS(i)) {
174 regmap_write(tmdev->regmap, SUN50I_H6_THS_DIS,
175 SUN50I_H6_THS_DATA_IRQ_STS(i));
176 ret |= BIT(i);
177 }
178 }
179
180 return ret;
181}
182
183static irqreturn_t sun8i_irq_thread(int irq, void *data)
184{
185 struct ths_device *tmdev = data;
186 int i, state;
187
188 state = tmdev->chip->irq_ack(tmdev);
189
190 for (i = 0; i < tmdev->chip->sensor_num; i++) {
191 if (state & BIT(i))
192 thermal_zone_device_update(tmdev->sensor[i].tzd,
193 THERMAL_EVENT_UNSPECIFIED);
194 }
195
196 return IRQ_HANDLED;
197}
198
199static int sun8i_h3_ths_calibrate(struct ths_device *tmdev,
200 u16 *caldata, int callen)
201{
202 int i;
203
204 if (!caldata[0] || callen < 2 * tmdev->chip->sensor_num)
205 return -EINVAL;
206
207 for (i = 0; i < tmdev->chip->sensor_num; i++) {
208 int offset = (i % 2) << 4;
209
210 regmap_update_bits(tmdev->regmap,
211 SUN8I_THS_TEMP_CALIB + (4 * (i >> 1)),
212 0xfff << offset,
213 caldata[i] << offset);
214 }
215
216 return 0;
217}
218
219static int sun50i_h6_ths_calibrate(struct ths_device *tmdev,
220 u16 *caldata, int callen)
221{
222 struct device *dev = tmdev->dev;
223 int i, ft_temp;
224
225 if (!caldata[0] || callen < 2 + 2 * tmdev->chip->sensor_num)
226 return -EINVAL;
227
228 /*
229 * efuse layout:
230 *
231 * 0 11 16 32
232 * +-------+-------+-------+
233 * |temp| |sensor0|sensor1|
234 * +-------+-------+-------+
235 *
236 * The calibration data on the H6 is the ambient temperature and
237 * sensor values that are filled during the factory test stage.
238 *
239 * The unit of stored FT temperature is 0.1 degreee celusis.
240 *
241 * We need to calculate a delta between measured and caluclated
242 * register values and this will become a calibration offset.
243 */
244 ft_temp = (caldata[0] & FT_TEMP_MASK) * 100;
245
246 for (i = 0; i < tmdev->chip->sensor_num; i++) {
247 int sensor_reg = caldata[i + 1];
248 int cdata, offset;
249 int sensor_temp = tmdev->chip->calc_temp(tmdev, i, sensor_reg);
250
251 /*
252 * Calibration data is CALIBRATE_DEFAULT - (calculated
253 * temperature from sensor reading at factory temperature
254 * minus actual factory temperature) * 14.88 (scale from
255 * temperature to register values)
256 */
257 cdata = CALIBRATE_DEFAULT -
258 ((sensor_temp - ft_temp) * 10 / tmdev->chip->scale);
259 if (cdata & ~TEMP_CALIB_MASK) {
260 /*
261 * Calibration value more than 12-bit, but calibration
262 * register is 12-bit. In this case, ths hardware can
263 * still work without calibration, although the data
264 * won't be so accurate.
265 */
266 dev_warn(dev, "sensor%d is not calibrated.\n", i);
267 continue;
268 }
269
270 offset = (i % 2) * 16;
271 regmap_update_bits(tmdev->regmap,
272 SUN50I_H6_THS_TEMP_CALIB + (i / 2 * 4),
273 0xfff << offset,
274 cdata << offset);
275 }
276
277 return 0;
278}
279
280static int sun8i_ths_calibrate(struct ths_device *tmdev)
281{
282 struct nvmem_cell *calcell;
283 struct device *dev = tmdev->dev;
284 u16 *caldata;
285 size_t callen;
286 int ret = 0;
287
288 calcell = devm_nvmem_cell_get(dev, "calibration");
289 if (IS_ERR(calcell)) {
290 if (PTR_ERR(calcell) == -EPROBE_DEFER)
291 return -EPROBE_DEFER;
292 /*
293 * Even if the external calibration data stored in sid is
294 * not accessible, the THS hardware can still work, although
295 * the data won't be so accurate.
296 *
297 * The default value of calibration register is 0x800 for
298 * every sensor, and the calibration value is usually 0x7xx
299 * or 0x8xx, so they won't be away from the default value
300 * for a lot.
301 *
302 * So here we do not return error if the calibartion data is
303 * not available, except the probe needs deferring.
304 */
305 goto out;
306 }
307
308 caldata = nvmem_cell_read(calcell, &callen);
309 if (IS_ERR(caldata)) {
310 ret = PTR_ERR(caldata);
311 goto out;
312 }
313
314 tmdev->chip->calibrate(tmdev, caldata, callen);
315
316 kfree(caldata);
317out:
318 return ret;
319}
320
321static int sun8i_ths_resource_init(struct ths_device *tmdev)
322{
323 struct device *dev = tmdev->dev;
324 struct platform_device *pdev = to_platform_device(dev);
325 void __iomem *base;
326 int ret;
327
328 base = devm_platform_ioremap_resource(pdev, 0);
329 if (IS_ERR(base))
330 return PTR_ERR(base);
331
332 tmdev->regmap = devm_regmap_init_mmio(dev, base, &config);
333 if (IS_ERR(tmdev->regmap))
334 return PTR_ERR(tmdev->regmap);
335
336 if (tmdev->chip->has_bus_clk_reset) {
337 tmdev->reset = devm_reset_control_get(dev, NULL);
338 if (IS_ERR(tmdev->reset))
339 return PTR_ERR(tmdev->reset);
340
341 tmdev->bus_clk = devm_clk_get(&pdev->dev, "bus");
342 if (IS_ERR(tmdev->bus_clk))
343 return PTR_ERR(tmdev->bus_clk);
344 }
345
346 if (tmdev->chip->has_mod_clk) {
347 tmdev->mod_clk = devm_clk_get(&pdev->dev, "mod");
348 if (IS_ERR(tmdev->mod_clk))
349 return PTR_ERR(tmdev->mod_clk);
350 }
351
352 ret = reset_control_deassert(tmdev->reset);
353 if (ret)
354 return ret;
355
356 ret = clk_prepare_enable(tmdev->bus_clk);
357 if (ret)
358 goto assert_reset;
359
360 ret = clk_set_rate(tmdev->mod_clk, 24000000);
361 if (ret)
362 goto bus_disable;
363
364 ret = clk_prepare_enable(tmdev->mod_clk);
365 if (ret)
366 goto bus_disable;
367
368 ret = sun8i_ths_calibrate(tmdev);
369 if (ret)
370 goto mod_disable;
371
372 return 0;
373
374mod_disable:
375 clk_disable_unprepare(tmdev->mod_clk);
376bus_disable:
377 clk_disable_unprepare(tmdev->bus_clk);
378assert_reset:
379 reset_control_assert(tmdev->reset);
380
381 return ret;
382}
383
384static int sun8i_h3_thermal_init(struct ths_device *tmdev)
385{
386 int val;
387
388 /* average over 4 samples */
389 regmap_write(tmdev->regmap, SUN8I_THS_MFC,
390 SUN50I_THS_FILTER_EN |
391 SUN50I_THS_FILTER_TYPE(1));
392 /*
393 * clkin = 24MHz
394 * filter_samples = 4
395 * period = 0.25s
396 *
397 * x = period * clkin / 4096 / filter_samples - 1
398 * = 365
399 */
400 val = GENMASK(7 + tmdev->chip->sensor_num, 8);
401 regmap_write(tmdev->regmap, SUN8I_THS_IC,
402 SUN50I_H6_THS_PC_TEMP_PERIOD(365) | val);
403 /*
404 * T_acq = 20us
405 * clkin = 24MHz
406 *
407 * x = T_acq * clkin - 1
408 * = 479
409 */
410 regmap_write(tmdev->regmap, SUN8I_THS_CTRL0,
411 SUN8I_THS_CTRL0_T_ACQ0(479));
412 val = GENMASK(tmdev->chip->sensor_num - 1, 0);
413 regmap_write(tmdev->regmap, SUN8I_THS_CTRL2,
414 SUN8I_THS_CTRL2_T_ACQ1(479) | val);
415
416 return 0;
417}
418
419/*
420 * Without this undocummented value, the returned temperatures would
421 * be higher than real ones by about 20C.
422 */
423#define SUN50I_H6_CTRL0_UNK 0x0000002f
424
425static int sun50i_h6_thermal_init(struct ths_device *tmdev)
426{
427 int val;
428
429 /*
430 * T_acq = 20us
431 * clkin = 24MHz
432 *
433 * x = T_acq * clkin - 1
434 * = 479
435 */
436 regmap_write(tmdev->regmap, SUN50I_THS_CTRL0,
437 SUN50I_H6_CTRL0_UNK | SUN50I_THS_CTRL0_T_ACQ(479));
438 /* average over 4 samples */
439 regmap_write(tmdev->regmap, SUN50I_H6_THS_MFC,
440 SUN50I_THS_FILTER_EN |
441 SUN50I_THS_FILTER_TYPE(1));
442 /*
443 * clkin = 24MHz
444 * filter_samples = 4
445 * period = 0.25s
446 *
447 * x = period * clkin / 4096 / filter_samples - 1
448 * = 365
449 */
450 regmap_write(tmdev->regmap, SUN50I_H6_THS_PC,
451 SUN50I_H6_THS_PC_TEMP_PERIOD(365));
452 /* enable sensor */
453 val = GENMASK(tmdev->chip->sensor_num - 1, 0);
454 regmap_write(tmdev->regmap, SUN50I_H6_THS_ENABLE, val);
455 /* thermal data interrupt enable */
456 val = GENMASK(tmdev->chip->sensor_num - 1, 0);
457 regmap_write(tmdev->regmap, SUN50I_H6_THS_DIC, val);
458
459 return 0;
460}
461
462static int sun8i_ths_register(struct ths_device *tmdev)
463{
464 int i;
465
466 for (i = 0; i < tmdev->chip->sensor_num; i++) {
467 tmdev->sensor[i].tmdev = tmdev;
468 tmdev->sensor[i].id = i;
469 tmdev->sensor[i].tzd =
470 devm_thermal_zone_of_sensor_register(tmdev->dev,
471 i,
472 &tmdev->sensor[i],
473 &ths_ops);
474 if (IS_ERR(tmdev->sensor[i].tzd))
475 return PTR_ERR(tmdev->sensor[i].tzd);
476
477 if (devm_thermal_add_hwmon_sysfs(tmdev->sensor[i].tzd))
478 dev_warn(tmdev->dev,
479 "Failed to add hwmon sysfs attributes\n");
480 }
481
482 return 0;
483}
484
485static int sun8i_ths_probe(struct platform_device *pdev)
486{
487 struct ths_device *tmdev;
488 struct device *dev = &pdev->dev;
489 int ret, irq;
490
491 tmdev = devm_kzalloc(dev, sizeof(*tmdev), GFP_KERNEL);
492 if (!tmdev)
493 return -ENOMEM;
494
495 tmdev->dev = dev;
496 tmdev->chip = of_device_get_match_data(&pdev->dev);
497 if (!tmdev->chip)
498 return -EINVAL;
499
500 platform_set_drvdata(pdev, tmdev);
501
502 ret = sun8i_ths_resource_init(tmdev);
503 if (ret)
504 return ret;
505
506 irq = platform_get_irq(pdev, 0);
507 if (irq < 0)
508 return irq;
509
510 ret = tmdev->chip->init(tmdev);
511 if (ret)
512 return ret;
513
514 ret = sun8i_ths_register(tmdev);
515 if (ret)
516 return ret;
517
518 /*
519 * Avoid entering the interrupt handler, the thermal device is not
520 * registered yet, we deffer the registration of the interrupt to
521 * the end.
522 */
523 ret = devm_request_threaded_irq(dev, irq, NULL,
524 sun8i_irq_thread,
525 IRQF_ONESHOT, "ths", tmdev);
526 if (ret)
527 return ret;
528
529 return 0;
530}
531
532static int sun8i_ths_remove(struct platform_device *pdev)
533{
534 struct ths_device *tmdev = platform_get_drvdata(pdev);
535
536 clk_disable_unprepare(tmdev->mod_clk);
537 clk_disable_unprepare(tmdev->bus_clk);
538 reset_control_assert(tmdev->reset);
539
540 return 0;
541}
542
543static const struct ths_thermal_chip sun8i_a83t_ths = {
544 .sensor_num = 3,
545 .scale = 705,
546 .offset = 191668,
547 .temp_data_base = SUN8I_THS_TEMP_DATA,
548 .calibrate = sun8i_h3_ths_calibrate,
549 .init = sun8i_h3_thermal_init,
550 .irq_ack = sun8i_h3_irq_ack,
551 .calc_temp = sun8i_ths_calc_temp,
552};
553
554static const struct ths_thermal_chip sun8i_h3_ths = {
555 .sensor_num = 1,
556 .scale = 1211,
557 .offset = 217000,
558 .has_mod_clk = true,
559 .has_bus_clk_reset = true,
560 .temp_data_base = SUN8I_THS_TEMP_DATA,
561 .calibrate = sun8i_h3_ths_calibrate,
562 .init = sun8i_h3_thermal_init,
563 .irq_ack = sun8i_h3_irq_ack,
564 .calc_temp = sun8i_ths_calc_temp,
565};
566
567static const struct ths_thermal_chip sun8i_r40_ths = {
568 .sensor_num = 2,
569 .offset = 251086,
570 .scale = 1130,
571 .has_mod_clk = true,
572 .has_bus_clk_reset = true,
573 .temp_data_base = SUN8I_THS_TEMP_DATA,
574 .calibrate = sun8i_h3_ths_calibrate,
575 .init = sun8i_h3_thermal_init,
576 .irq_ack = sun8i_h3_irq_ack,
577 .calc_temp = sun8i_ths_calc_temp,
578};
579
580static const struct ths_thermal_chip sun50i_a64_ths = {
581 .sensor_num = 3,
582 .offset = 260890,
583 .scale = 1170,
584 .has_mod_clk = true,
585 .has_bus_clk_reset = true,
586 .temp_data_base = SUN8I_THS_TEMP_DATA,
587 .calibrate = sun8i_h3_ths_calibrate,
588 .init = sun8i_h3_thermal_init,
589 .irq_ack = sun8i_h3_irq_ack,
590 .calc_temp = sun8i_ths_calc_temp,
591};
592
593static const struct ths_thermal_chip sun50i_h5_ths = {
594 .sensor_num = 2,
595 .has_mod_clk = true,
596 .has_bus_clk_reset = true,
597 .temp_data_base = SUN8I_THS_TEMP_DATA,
598 .calibrate = sun8i_h3_ths_calibrate,
599 .init = sun8i_h3_thermal_init,
600 .irq_ack = sun8i_h3_irq_ack,
601 .calc_temp = sun50i_h5_calc_temp,
602};
603
604static const struct ths_thermal_chip sun50i_h6_ths = {
605 .sensor_num = 2,
606 .has_bus_clk_reset = true,
607 .ft_deviation = 7000,
608 .offset = 187744,
609 .scale = 672,
610 .temp_data_base = SUN50I_H6_THS_TEMP_DATA,
611 .calibrate = sun50i_h6_ths_calibrate,
612 .init = sun50i_h6_thermal_init,
613 .irq_ack = sun50i_h6_irq_ack,
614 .calc_temp = sun8i_ths_calc_temp,
615};
616
617static const struct of_device_id of_ths_match[] = {
618 { .compatible = "allwinner,sun8i-a83t-ths", .data = &sun8i_a83t_ths },
619 { .compatible = "allwinner,sun8i-h3-ths", .data = &sun8i_h3_ths },
620 { .compatible = "allwinner,sun8i-r40-ths", .data = &sun8i_r40_ths },
621 { .compatible = "allwinner,sun50i-a64-ths", .data = &sun50i_a64_ths },
622 { .compatible = "allwinner,sun50i-h5-ths", .data = &sun50i_h5_ths },
623 { .compatible = "allwinner,sun50i-h6-ths", .data = &sun50i_h6_ths },
624 { /* sentinel */ },
625};
626MODULE_DEVICE_TABLE(of, of_ths_match);
627
628static struct platform_driver ths_driver = {
629 .probe = sun8i_ths_probe,
630 .remove = sun8i_ths_remove,
631 .driver = {
632 .name = "sun8i-thermal",
633 .of_match_table = of_ths_match,
634 },
635};
636module_platform_driver(ths_driver);
637
638MODULE_DESCRIPTION("Thermal sensor driver for Allwinner SOC");
639MODULE_LICENSE("GPL v2");
1// SPDX-License-Identifier: GPL-2.0
2/*
3 * Thermal sensor driver for Allwinner SOC
4 * Copyright (C) 2019 Yangtao Li
5 *
6 * Based on the work of Icenowy Zheng <icenowy@aosc.io>
7 * Based on the work of Ondrej Jirman <megous@megous.com>
8 * Based on the work of Josef Gajdusek <atx@atx.name>
9 */
10
11#include <linux/bitmap.h>
12#include <linux/clk.h>
13#include <linux/device.h>
14#include <linux/interrupt.h>
15#include <linux/module.h>
16#include <linux/nvmem-consumer.h>
17#include <linux/of.h>
18#include <linux/platform_device.h>
19#include <linux/regmap.h>
20#include <linux/reset.h>
21#include <linux/slab.h>
22#include <linux/thermal.h>
23
24#include "thermal_hwmon.h"
25
26#define MAX_SENSOR_NUM 4
27
28#define FT_TEMP_MASK GENMASK(11, 0)
29#define TEMP_CALIB_MASK GENMASK(11, 0)
30#define CALIBRATE_DEFAULT 0x800
31
32#define SUN8I_THS_CTRL0 0x00
33#define SUN8I_THS_CTRL2 0x40
34#define SUN8I_THS_IC 0x44
35#define SUN8I_THS_IS 0x48
36#define SUN8I_THS_MFC 0x70
37#define SUN8I_THS_TEMP_CALIB 0x74
38#define SUN8I_THS_TEMP_DATA 0x80
39
40#define SUN50I_THS_CTRL0 0x00
41#define SUN50I_H6_THS_ENABLE 0x04
42#define SUN50I_H6_THS_PC 0x08
43#define SUN50I_H6_THS_DIC 0x10
44#define SUN50I_H6_THS_DIS 0x20
45#define SUN50I_H6_THS_MFC 0x30
46#define SUN50I_H6_THS_TEMP_CALIB 0xa0
47#define SUN50I_H6_THS_TEMP_DATA 0xc0
48
49#define SUN8I_THS_CTRL0_T_ACQ0(x) (GENMASK(15, 0) & (x))
50#define SUN8I_THS_CTRL2_T_ACQ1(x) ((GENMASK(15, 0) & (x)) << 16)
51#define SUN8I_THS_DATA_IRQ_STS(x) BIT(x + 8)
52
53#define SUN50I_THS_CTRL0_T_ACQ(x) ((GENMASK(15, 0) & (x)) << 16)
54#define SUN50I_THS_FILTER_EN BIT(2)
55#define SUN50I_THS_FILTER_TYPE(x) (GENMASK(1, 0) & (x))
56#define SUN50I_H6_THS_PC_TEMP_PERIOD(x) ((GENMASK(19, 0) & (x)) << 12)
57#define SUN50I_H6_THS_DATA_IRQ_STS(x) BIT(x)
58
59struct tsensor {
60 struct ths_device *tmdev;
61 struct thermal_zone_device *tzd;
62 int id;
63};
64
65struct ths_thermal_chip {
66 bool has_mod_clk;
67 bool has_bus_clk_reset;
68 int sensor_num;
69 int offset;
70 int scale;
71 int ft_deviation;
72 int temp_data_base;
73 int (*calibrate)(struct ths_device *tmdev,
74 u16 *caldata, int callen);
75 int (*init)(struct ths_device *tmdev);
76 unsigned long (*irq_ack)(struct ths_device *tmdev);
77 int (*calc_temp)(struct ths_device *tmdev,
78 int id, int reg);
79};
80
81struct ths_device {
82 const struct ths_thermal_chip *chip;
83 struct device *dev;
84 struct regmap *regmap;
85 struct reset_control *reset;
86 struct clk *bus_clk;
87 struct clk *mod_clk;
88 struct tsensor sensor[MAX_SENSOR_NUM];
89};
90
91/* Temp Unit: millidegree Celsius */
92static int sun8i_ths_calc_temp(struct ths_device *tmdev,
93 int id, int reg)
94{
95 return tmdev->chip->offset - (reg * tmdev->chip->scale / 10);
96}
97
98static int sun50i_h5_calc_temp(struct ths_device *tmdev,
99 int id, int reg)
100{
101 if (reg >= 0x500)
102 return -1191 * reg / 10 + 223000;
103 else if (!id)
104 return -1452 * reg / 10 + 259000;
105 else
106 return -1590 * reg / 10 + 276000;
107}
108
109static int sun8i_ths_get_temp(struct thermal_zone_device *tz, int *temp)
110{
111 struct tsensor *s = thermal_zone_device_priv(tz);
112 struct ths_device *tmdev = s->tmdev;
113 int val = 0;
114
115 regmap_read(tmdev->regmap, tmdev->chip->temp_data_base +
116 0x4 * s->id, &val);
117
118 /* ths have no data yet */
119 if (!val)
120 return -EAGAIN;
121
122 *temp = tmdev->chip->calc_temp(tmdev, s->id, val);
123 /*
124 * According to the original sdk, there are some platforms(rarely)
125 * that add a fixed offset value after calculating the temperature
126 * value. We can't simply put it on the formula for calculating the
127 * temperature above, because the formula for calculating the
128 * temperature above is also used when the sensor is calibrated. If
129 * do this, the correct calibration formula is hard to know.
130 */
131 *temp += tmdev->chip->ft_deviation;
132
133 return 0;
134}
135
136static const struct thermal_zone_device_ops ths_ops = {
137 .get_temp = sun8i_ths_get_temp,
138};
139
140static const struct regmap_config config = {
141 .reg_bits = 32,
142 .val_bits = 32,
143 .reg_stride = 4,
144 .fast_io = true,
145 .max_register = 0xfc,
146};
147
148static unsigned long sun8i_h3_irq_ack(struct ths_device *tmdev)
149{
150 unsigned long irq_bitmap = 0;
151 int i, state;
152
153 regmap_read(tmdev->regmap, SUN8I_THS_IS, &state);
154
155 for (i = 0; i < tmdev->chip->sensor_num; i++) {
156 if (state & SUN8I_THS_DATA_IRQ_STS(i)) {
157 regmap_write(tmdev->regmap, SUN8I_THS_IS,
158 SUN8I_THS_DATA_IRQ_STS(i));
159 bitmap_set(&irq_bitmap, i, 1);
160 }
161 }
162
163 return irq_bitmap;
164}
165
166static unsigned long sun50i_h6_irq_ack(struct ths_device *tmdev)
167{
168 unsigned long irq_bitmap = 0;
169 int i, state;
170
171 regmap_read(tmdev->regmap, SUN50I_H6_THS_DIS, &state);
172
173 for (i = 0; i < tmdev->chip->sensor_num; i++) {
174 if (state & SUN50I_H6_THS_DATA_IRQ_STS(i)) {
175 regmap_write(tmdev->regmap, SUN50I_H6_THS_DIS,
176 SUN50I_H6_THS_DATA_IRQ_STS(i));
177 bitmap_set(&irq_bitmap, i, 1);
178 }
179 }
180
181 return irq_bitmap;
182}
183
184static irqreturn_t sun8i_irq_thread(int irq, void *data)
185{
186 struct ths_device *tmdev = data;
187 unsigned long irq_bitmap = tmdev->chip->irq_ack(tmdev);
188 int i;
189
190 for_each_set_bit(i, &irq_bitmap, tmdev->chip->sensor_num) {
191 thermal_zone_device_update(tmdev->sensor[i].tzd,
192 THERMAL_EVENT_UNSPECIFIED);
193 }
194
195 return IRQ_HANDLED;
196}
197
198static int sun8i_h3_ths_calibrate(struct ths_device *tmdev,
199 u16 *caldata, int callen)
200{
201 int i;
202
203 if (!caldata[0] || callen < 2 * tmdev->chip->sensor_num)
204 return -EINVAL;
205
206 for (i = 0; i < tmdev->chip->sensor_num; i++) {
207 int offset = (i % 2) << 4;
208
209 regmap_update_bits(tmdev->regmap,
210 SUN8I_THS_TEMP_CALIB + (4 * (i >> 1)),
211 TEMP_CALIB_MASK << offset,
212 caldata[i] << offset);
213 }
214
215 return 0;
216}
217
218static int sun50i_h6_ths_calibrate(struct ths_device *tmdev,
219 u16 *caldata, int callen)
220{
221 struct device *dev = tmdev->dev;
222 int i, ft_temp;
223
224 if (!caldata[0] || callen < 2 + 2 * tmdev->chip->sensor_num)
225 return -EINVAL;
226
227 /*
228 * efuse layout:
229 *
230 * 0 11 16 32
231 * +-------+-------+-------+
232 * |temp| |sensor0|sensor1|
233 * +-------+-------+-------+
234 *
235 * The calibration data on the H6 is the ambient temperature and
236 * sensor values that are filled during the factory test stage.
237 *
238 * The unit of stored FT temperature is 0.1 degree celsius.
239 *
240 * We need to calculate a delta between measured and caluclated
241 * register values and this will become a calibration offset.
242 */
243 ft_temp = (caldata[0] & FT_TEMP_MASK) * 100;
244
245 for (i = 0; i < tmdev->chip->sensor_num; i++) {
246 int sensor_reg = caldata[i + 1] & TEMP_CALIB_MASK;
247 int cdata, offset;
248 int sensor_temp = tmdev->chip->calc_temp(tmdev, i, sensor_reg);
249
250 /*
251 * Calibration data is CALIBRATE_DEFAULT - (calculated
252 * temperature from sensor reading at factory temperature
253 * minus actual factory temperature) * 14.88 (scale from
254 * temperature to register values)
255 */
256 cdata = CALIBRATE_DEFAULT -
257 ((sensor_temp - ft_temp) * 10 / tmdev->chip->scale);
258 if (cdata & ~TEMP_CALIB_MASK) {
259 /*
260 * Calibration value more than 12-bit, but calibration
261 * register is 12-bit. In this case, ths hardware can
262 * still work without calibration, although the data
263 * won't be so accurate.
264 */
265 dev_warn(dev, "sensor%d is not calibrated.\n", i);
266 continue;
267 }
268
269 offset = (i % 2) * 16;
270 regmap_update_bits(tmdev->regmap,
271 SUN50I_H6_THS_TEMP_CALIB + (i / 2 * 4),
272 TEMP_CALIB_MASK << offset,
273 cdata << offset);
274 }
275
276 return 0;
277}
278
279static int sun8i_ths_calibrate(struct ths_device *tmdev)
280{
281 struct nvmem_cell *calcell;
282 struct device *dev = tmdev->dev;
283 u16 *caldata;
284 size_t callen;
285 int ret = 0;
286
287 calcell = nvmem_cell_get(dev, "calibration");
288 if (IS_ERR(calcell)) {
289 if (PTR_ERR(calcell) == -EPROBE_DEFER)
290 return -EPROBE_DEFER;
291 /*
292 * Even if the external calibration data stored in sid is
293 * not accessible, the THS hardware can still work, although
294 * the data won't be so accurate.
295 *
296 * The default value of calibration register is 0x800 for
297 * every sensor, and the calibration value is usually 0x7xx
298 * or 0x8xx, so they won't be away from the default value
299 * for a lot.
300 *
301 * So here we do not return error if the calibration data is
302 * not available, except the probe needs deferring.
303 */
304 goto out;
305 }
306
307 caldata = nvmem_cell_read(calcell, &callen);
308 if (IS_ERR(caldata)) {
309 ret = PTR_ERR(caldata);
310 goto out;
311 }
312
313 tmdev->chip->calibrate(tmdev, caldata, callen);
314
315 kfree(caldata);
316out:
317 if (!IS_ERR(calcell))
318 nvmem_cell_put(calcell);
319 return ret;
320}
321
322static void sun8i_ths_reset_control_assert(void *data)
323{
324 reset_control_assert(data);
325}
326
327static int sun8i_ths_resource_init(struct ths_device *tmdev)
328{
329 struct device *dev = tmdev->dev;
330 struct platform_device *pdev = to_platform_device(dev);
331 void __iomem *base;
332 int ret;
333
334 base = devm_platform_ioremap_resource(pdev, 0);
335 if (IS_ERR(base))
336 return PTR_ERR(base);
337
338 tmdev->regmap = devm_regmap_init_mmio(dev, base, &config);
339 if (IS_ERR(tmdev->regmap))
340 return PTR_ERR(tmdev->regmap);
341
342 if (tmdev->chip->has_bus_clk_reset) {
343 tmdev->reset = devm_reset_control_get(dev, NULL);
344 if (IS_ERR(tmdev->reset))
345 return PTR_ERR(tmdev->reset);
346
347 ret = reset_control_deassert(tmdev->reset);
348 if (ret)
349 return ret;
350
351 ret = devm_add_action_or_reset(dev, sun8i_ths_reset_control_assert,
352 tmdev->reset);
353 if (ret)
354 return ret;
355
356 tmdev->bus_clk = devm_clk_get_enabled(&pdev->dev, "bus");
357 if (IS_ERR(tmdev->bus_clk))
358 return PTR_ERR(tmdev->bus_clk);
359 }
360
361 if (tmdev->chip->has_mod_clk) {
362 tmdev->mod_clk = devm_clk_get_enabled(&pdev->dev, "mod");
363 if (IS_ERR(tmdev->mod_clk))
364 return PTR_ERR(tmdev->mod_clk);
365 }
366
367 ret = clk_set_rate(tmdev->mod_clk, 24000000);
368 if (ret)
369 return ret;
370
371 ret = sun8i_ths_calibrate(tmdev);
372 if (ret)
373 return ret;
374
375 return 0;
376}
377
378static int sun8i_h3_thermal_init(struct ths_device *tmdev)
379{
380 int val;
381
382 /* average over 4 samples */
383 regmap_write(tmdev->regmap, SUN8I_THS_MFC,
384 SUN50I_THS_FILTER_EN |
385 SUN50I_THS_FILTER_TYPE(1));
386 /*
387 * clkin = 24MHz
388 * filter_samples = 4
389 * period = 0.25s
390 *
391 * x = period * clkin / 4096 / filter_samples - 1
392 * = 365
393 */
394 val = GENMASK(7 + tmdev->chip->sensor_num, 8);
395 regmap_write(tmdev->regmap, SUN8I_THS_IC,
396 SUN50I_H6_THS_PC_TEMP_PERIOD(365) | val);
397 /*
398 * T_acq = 20us
399 * clkin = 24MHz
400 *
401 * x = T_acq * clkin - 1
402 * = 479
403 */
404 regmap_write(tmdev->regmap, SUN8I_THS_CTRL0,
405 SUN8I_THS_CTRL0_T_ACQ0(479));
406 val = GENMASK(tmdev->chip->sensor_num - 1, 0);
407 regmap_write(tmdev->regmap, SUN8I_THS_CTRL2,
408 SUN8I_THS_CTRL2_T_ACQ1(479) | val);
409
410 return 0;
411}
412
413/*
414 * Without this undocumented value, the returned temperatures would
415 * be higher than real ones by about 20C.
416 */
417#define SUN50I_H6_CTRL0_UNK 0x0000002f
418
419static int sun50i_h6_thermal_init(struct ths_device *tmdev)
420{
421 int val;
422
423 /*
424 * T_acq = 20us
425 * clkin = 24MHz
426 *
427 * x = T_acq * clkin - 1
428 * = 479
429 */
430 regmap_write(tmdev->regmap, SUN50I_THS_CTRL0,
431 SUN50I_H6_CTRL0_UNK | SUN50I_THS_CTRL0_T_ACQ(479));
432 /* average over 4 samples */
433 regmap_write(tmdev->regmap, SUN50I_H6_THS_MFC,
434 SUN50I_THS_FILTER_EN |
435 SUN50I_THS_FILTER_TYPE(1));
436 /*
437 * clkin = 24MHz
438 * filter_samples = 4
439 * period = 0.25s
440 *
441 * x = period * clkin / 4096 / filter_samples - 1
442 * = 365
443 */
444 regmap_write(tmdev->regmap, SUN50I_H6_THS_PC,
445 SUN50I_H6_THS_PC_TEMP_PERIOD(365));
446 /* enable sensor */
447 val = GENMASK(tmdev->chip->sensor_num - 1, 0);
448 regmap_write(tmdev->regmap, SUN50I_H6_THS_ENABLE, val);
449 /* thermal data interrupt enable */
450 val = GENMASK(tmdev->chip->sensor_num - 1, 0);
451 regmap_write(tmdev->regmap, SUN50I_H6_THS_DIC, val);
452
453 return 0;
454}
455
456static int sun8i_ths_register(struct ths_device *tmdev)
457{
458 int i;
459
460 for (i = 0; i < tmdev->chip->sensor_num; i++) {
461 tmdev->sensor[i].tmdev = tmdev;
462 tmdev->sensor[i].id = i;
463 tmdev->sensor[i].tzd =
464 devm_thermal_of_zone_register(tmdev->dev,
465 i,
466 &tmdev->sensor[i],
467 &ths_ops);
468 if (IS_ERR(tmdev->sensor[i].tzd))
469 return PTR_ERR(tmdev->sensor[i].tzd);
470
471 devm_thermal_add_hwmon_sysfs(tmdev->dev, tmdev->sensor[i].tzd);
472 }
473
474 return 0;
475}
476
477static int sun8i_ths_probe(struct platform_device *pdev)
478{
479 struct ths_device *tmdev;
480 struct device *dev = &pdev->dev;
481 int ret, irq;
482
483 tmdev = devm_kzalloc(dev, sizeof(*tmdev), GFP_KERNEL);
484 if (!tmdev)
485 return -ENOMEM;
486
487 tmdev->dev = dev;
488 tmdev->chip = of_device_get_match_data(&pdev->dev);
489 if (!tmdev->chip)
490 return -EINVAL;
491
492 ret = sun8i_ths_resource_init(tmdev);
493 if (ret)
494 return ret;
495
496 irq = platform_get_irq(pdev, 0);
497 if (irq < 0)
498 return irq;
499
500 ret = tmdev->chip->init(tmdev);
501 if (ret)
502 return ret;
503
504 ret = sun8i_ths_register(tmdev);
505 if (ret)
506 return ret;
507
508 /*
509 * Avoid entering the interrupt handler, the thermal device is not
510 * registered yet, we deffer the registration of the interrupt to
511 * the end.
512 */
513 ret = devm_request_threaded_irq(dev, irq, NULL,
514 sun8i_irq_thread,
515 IRQF_ONESHOT, "ths", tmdev);
516 if (ret)
517 return ret;
518
519 return 0;
520}
521
522static const struct ths_thermal_chip sun8i_a83t_ths = {
523 .sensor_num = 3,
524 .scale = 705,
525 .offset = 191668,
526 .temp_data_base = SUN8I_THS_TEMP_DATA,
527 .calibrate = sun8i_h3_ths_calibrate,
528 .init = sun8i_h3_thermal_init,
529 .irq_ack = sun8i_h3_irq_ack,
530 .calc_temp = sun8i_ths_calc_temp,
531};
532
533static const struct ths_thermal_chip sun8i_h3_ths = {
534 .sensor_num = 1,
535 .scale = 1211,
536 .offset = 217000,
537 .has_mod_clk = true,
538 .has_bus_clk_reset = true,
539 .temp_data_base = SUN8I_THS_TEMP_DATA,
540 .calibrate = sun8i_h3_ths_calibrate,
541 .init = sun8i_h3_thermal_init,
542 .irq_ack = sun8i_h3_irq_ack,
543 .calc_temp = sun8i_ths_calc_temp,
544};
545
546static const struct ths_thermal_chip sun8i_r40_ths = {
547 .sensor_num = 2,
548 .offset = 251086,
549 .scale = 1130,
550 .has_mod_clk = true,
551 .has_bus_clk_reset = true,
552 .temp_data_base = SUN8I_THS_TEMP_DATA,
553 .calibrate = sun8i_h3_ths_calibrate,
554 .init = sun8i_h3_thermal_init,
555 .irq_ack = sun8i_h3_irq_ack,
556 .calc_temp = sun8i_ths_calc_temp,
557};
558
559static const struct ths_thermal_chip sun50i_a64_ths = {
560 .sensor_num = 3,
561 .offset = 260890,
562 .scale = 1170,
563 .has_mod_clk = true,
564 .has_bus_clk_reset = true,
565 .temp_data_base = SUN8I_THS_TEMP_DATA,
566 .calibrate = sun8i_h3_ths_calibrate,
567 .init = sun8i_h3_thermal_init,
568 .irq_ack = sun8i_h3_irq_ack,
569 .calc_temp = sun8i_ths_calc_temp,
570};
571
572static const struct ths_thermal_chip sun50i_a100_ths = {
573 .sensor_num = 3,
574 .has_bus_clk_reset = true,
575 .ft_deviation = 8000,
576 .offset = 187744,
577 .scale = 672,
578 .temp_data_base = SUN50I_H6_THS_TEMP_DATA,
579 .calibrate = sun50i_h6_ths_calibrate,
580 .init = sun50i_h6_thermal_init,
581 .irq_ack = sun50i_h6_irq_ack,
582 .calc_temp = sun8i_ths_calc_temp,
583};
584
585static const struct ths_thermal_chip sun50i_h5_ths = {
586 .sensor_num = 2,
587 .has_mod_clk = true,
588 .has_bus_clk_reset = true,
589 .temp_data_base = SUN8I_THS_TEMP_DATA,
590 .calibrate = sun8i_h3_ths_calibrate,
591 .init = sun8i_h3_thermal_init,
592 .irq_ack = sun8i_h3_irq_ack,
593 .calc_temp = sun50i_h5_calc_temp,
594};
595
596static const struct ths_thermal_chip sun50i_h6_ths = {
597 .sensor_num = 2,
598 .has_bus_clk_reset = true,
599 .ft_deviation = 7000,
600 .offset = 187744,
601 .scale = 672,
602 .temp_data_base = SUN50I_H6_THS_TEMP_DATA,
603 .calibrate = sun50i_h6_ths_calibrate,
604 .init = sun50i_h6_thermal_init,
605 .irq_ack = sun50i_h6_irq_ack,
606 .calc_temp = sun8i_ths_calc_temp,
607};
608
609static const struct ths_thermal_chip sun20i_d1_ths = {
610 .sensor_num = 1,
611 .has_bus_clk_reset = true,
612 .offset = 188552,
613 .scale = 673,
614 .temp_data_base = SUN50I_H6_THS_TEMP_DATA,
615 .calibrate = sun50i_h6_ths_calibrate,
616 .init = sun50i_h6_thermal_init,
617 .irq_ack = sun50i_h6_irq_ack,
618 .calc_temp = sun8i_ths_calc_temp,
619};
620
621static const struct of_device_id of_ths_match[] = {
622 { .compatible = "allwinner,sun8i-a83t-ths", .data = &sun8i_a83t_ths },
623 { .compatible = "allwinner,sun8i-h3-ths", .data = &sun8i_h3_ths },
624 { .compatible = "allwinner,sun8i-r40-ths", .data = &sun8i_r40_ths },
625 { .compatible = "allwinner,sun50i-a64-ths", .data = &sun50i_a64_ths },
626 { .compatible = "allwinner,sun50i-a100-ths", .data = &sun50i_a100_ths },
627 { .compatible = "allwinner,sun50i-h5-ths", .data = &sun50i_h5_ths },
628 { .compatible = "allwinner,sun50i-h6-ths", .data = &sun50i_h6_ths },
629 { .compatible = "allwinner,sun20i-d1-ths", .data = &sun20i_d1_ths },
630 { /* sentinel */ },
631};
632MODULE_DEVICE_TABLE(of, of_ths_match);
633
634static struct platform_driver ths_driver = {
635 .probe = sun8i_ths_probe,
636 .driver = {
637 .name = "sun8i-thermal",
638 .of_match_table = of_ths_match,
639 },
640};
641module_platform_driver(ths_driver);
642
643MODULE_DESCRIPTION("Thermal sensor driver for Allwinner SOC");
644MODULE_LICENSE("GPL v2");