Commit | Line | Data |
---|---|---|
1e426ffd KM |
1 | /* |
2 | * R-Car THS/TSC thermal sensor driver | |
3 | * | |
4 | * Copyright (C) 2012 Renesas Solutions Corp. | |
5 | * Kuninori Morimoto <kuninori.morimoto.gx@renesas.com> | |
6 | * | |
7 | * This program is free software; you can redistribute it and/or modify | |
8 | * it under the terms of the GNU General Public License as published by | |
9 | * the Free Software Foundation; version 2 of the License. | |
10 | * | |
11 | * This program is distributed in the hope that it will be useful, but | |
12 | * WITHOUT ANY WARRANTY; without even the implied warranty of | |
13 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
14 | * General Public License for more details. | |
15 | * | |
16 | * You should have received a copy of the GNU General Public License along | |
17 | * with this program; if not, write to the Free Software Foundation, Inc., | |
18 | * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA. | |
19 | */ | |
20 | #include <linux/delay.h> | |
21 | #include <linux/err.h> | |
e0a5172e KM |
22 | #include <linux/irq.h> |
23 | #include <linux/interrupt.h> | |
1e426ffd KM |
24 | #include <linux/io.h> |
25 | #include <linux/module.h> | |
26 | #include <linux/platform_device.h> | |
51d45d25 | 27 | #include <linux/pm_runtime.h> |
d2a73e22 | 28 | #include <linux/reboot.h> |
1e426ffd KM |
29 | #include <linux/slab.h> |
30 | #include <linux/spinlock.h> | |
31 | #include <linux/thermal.h> | |
32 | ||
d2a73e22 | 33 | #define IDLE_INTERVAL 5000 |
34 | ||
e0a5172e KM |
35 | #define COMMON_STR 0x00 |
36 | #define COMMON_ENR 0x04 | |
37 | #define COMMON_INTMSK 0x0c | |
38 | ||
39 | #define REG_POSNEG 0x20 | |
40 | #define REG_FILONOFF 0x28 | |
e9137a58 KM |
41 | #define REG_THSCR 0x2c |
42 | #define REG_THSSR 0x30 | |
e0a5172e | 43 | #define REG_INTCTRL 0x34 |
1e426ffd KM |
44 | |
45 | /* THSCR */ | |
f8f53e18 | 46 | #define CPCTL (1 << 12) |
1e426ffd KM |
47 | |
48 | /* THSSR */ | |
49 | #define CTEMP 0x3f | |
50 | ||
3676d1dd KM |
51 | struct rcar_thermal_common { |
52 | void __iomem *base; | |
53 | struct device *dev; | |
54 | struct list_head head; | |
e0a5172e | 55 | spinlock_t lock; |
3676d1dd | 56 | }; |
1e426ffd KM |
57 | |
58 | struct rcar_thermal_priv { | |
59 | void __iomem *base; | |
3676d1dd KM |
60 | struct rcar_thermal_common *common; |
61 | struct thermal_zone_device *zone; | |
e0a5172e | 62 | struct delayed_work work; |
b2bbc6a2 | 63 | struct mutex lock; |
3676d1dd | 64 | struct list_head list; |
e0a5172e KM |
65 | int id; |
66 | int ctemp; | |
1e426ffd KM |
67 | }; |
68 | ||
3676d1dd KM |
69 | #define rcar_thermal_for_each_priv(pos, common) \ |
70 | list_for_each_entry(pos, &common->head, list) | |
71 | ||
c499703e | 72 | #define MCELSIUS(temp) ((temp) * 1000) |
9dde8f86 | 73 | #define rcar_zone_to_priv(zone) ((zone)->devdata) |
3676d1dd KM |
74 | #define rcar_priv_to_dev(priv) ((priv)->common->dev) |
75 | #define rcar_has_irq_support(priv) ((priv)->common->base) | |
e0a5172e KM |
76 | #define rcar_id_to_shift(priv) ((priv)->id * 8) |
77 | ||
78 | #ifdef DEBUG | |
79 | # define rcar_force_update_temp(priv) 1 | |
80 | #else | |
81 | # define rcar_force_update_temp(priv) 0 | |
82 | #endif | |
c499703e | 83 | |
1e426ffd KM |
84 | /* |
85 | * basic functions | |
86 | */ | |
e9137a58 KM |
87 | #define rcar_thermal_common_read(c, r) \ |
88 | _rcar_thermal_common_read(c, COMMON_ ##r) | |
89 | static u32 _rcar_thermal_common_read(struct rcar_thermal_common *common, | |
90 | u32 reg) | |
91 | { | |
92 | return ioread32(common->base + reg); | |
93 | } | |
94 | ||
95 | #define rcar_thermal_common_write(c, r, d) \ | |
96 | _rcar_thermal_common_write(c, COMMON_ ##r, d) | |
97 | static void _rcar_thermal_common_write(struct rcar_thermal_common *common, | |
98 | u32 reg, u32 data) | |
99 | { | |
100 | iowrite32(data, common->base + reg); | |
101 | } | |
102 | ||
103 | #define rcar_thermal_common_bset(c, r, m, d) \ | |
104 | _rcar_thermal_common_bset(c, COMMON_ ##r, m, d) | |
105 | static void _rcar_thermal_common_bset(struct rcar_thermal_common *common, | |
106 | u32 reg, u32 mask, u32 data) | |
107 | { | |
108 | u32 val; | |
109 | ||
110 | val = ioread32(common->base + reg); | |
111 | val &= ~mask; | |
112 | val |= (data & mask); | |
113 | iowrite32(val, common->base + reg); | |
114 | } | |
e9137a58 KM |
115 | |
116 | #define rcar_thermal_read(p, r) _rcar_thermal_read(p, REG_ ##r) | |
117 | static u32 _rcar_thermal_read(struct rcar_thermal_priv *priv, u32 reg) | |
1e426ffd | 118 | { |
b2bbc6a2 | 119 | return ioread32(priv->base + reg); |
1e426ffd KM |
120 | } |
121 | ||
e9137a58 KM |
122 | #define rcar_thermal_write(p, r, d) _rcar_thermal_write(p, REG_ ##r, d) |
123 | static void _rcar_thermal_write(struct rcar_thermal_priv *priv, | |
124 | u32 reg, u32 data) | |
1e426ffd | 125 | { |
1e426ffd | 126 | iowrite32(data, priv->base + reg); |
1e426ffd | 127 | } |
1e426ffd | 128 | |
e9137a58 KM |
129 | #define rcar_thermal_bset(p, r, m, d) _rcar_thermal_bset(p, REG_ ##r, m, d) |
130 | static void _rcar_thermal_bset(struct rcar_thermal_priv *priv, u32 reg, | |
131 | u32 mask, u32 data) | |
1e426ffd | 132 | { |
1e426ffd KM |
133 | u32 val; |
134 | ||
1e426ffd KM |
135 | val = ioread32(priv->base + reg); |
136 | val &= ~mask; | |
137 | val |= (data & mask); | |
138 | iowrite32(val, priv->base + reg); | |
1e426ffd KM |
139 | } |
140 | ||
141 | /* | |
142 | * zone device functions | |
143 | */ | |
e0a5172e | 144 | static int rcar_thermal_update_temp(struct rcar_thermal_priv *priv) |
1e426ffd | 145 | { |
f8f53e18 KM |
146 | struct device *dev = rcar_priv_to_dev(priv); |
147 | int i; | |
148 | int ctemp, old, new; | |
f0e68fc3 | 149 | int ret = -EINVAL; |
f8f53e18 | 150 | |
b2bbc6a2 KM |
151 | mutex_lock(&priv->lock); |
152 | ||
f8f53e18 KM |
153 | /* |
154 | * TSC decides a value of CPTAP automatically, | |
155 | * and this is the conditions which validate interrupt. | |
156 | */ | |
157 | rcar_thermal_bset(priv, THSCR, CPCTL, CPCTL); | |
158 | ||
159 | ctemp = 0; | |
160 | old = ~0; | |
161 | for (i = 0; i < 128; i++) { | |
1e426ffd KM |
162 | /* |
163 | * we need to wait 300us after changing comparator offset | |
164 | * to get stable temperature. | |
165 | * see "Usage Notes" on datasheet | |
166 | */ | |
1e426ffd KM |
167 | udelay(300); |
168 | ||
f8f53e18 KM |
169 | new = rcar_thermal_read(priv, THSSR) & CTEMP; |
170 | if (new == old) { | |
171 | ctemp = new; | |
1e426ffd KM |
172 | break; |
173 | } | |
f8f53e18 | 174 | old = new; |
1e426ffd KM |
175 | } |
176 | ||
f8f53e18 KM |
177 | if (!ctemp) { |
178 | dev_err(dev, "thermal sensor was broken\n"); | |
f0e68fc3 | 179 | goto err_out_unlock; |
f8f53e18 KM |
180 | } |
181 | ||
e0a5172e KM |
182 | /* |
183 | * enable IRQ | |
184 | */ | |
185 | if (rcar_has_irq_support(priv)) { | |
186 | rcar_thermal_write(priv, FILONOFF, 0); | |
187 | ||
188 | /* enable Rising/Falling edge interrupt */ | |
189 | rcar_thermal_write(priv, POSNEG, 0x1); | |
190 | rcar_thermal_write(priv, INTCTRL, (((ctemp - 0) << 8) | | |
191 | ((ctemp - 1) << 0))); | |
192 | } | |
193 | ||
194 | dev_dbg(dev, "thermal%d %d -> %d\n", priv->id, priv->ctemp, ctemp); | |
195 | ||
196 | priv->ctemp = ctemp; | |
f0e68fc3 WY |
197 | ret = 0; |
198 | err_out_unlock: | |
b2bbc6a2 | 199 | mutex_unlock(&priv->lock); |
f0e68fc3 | 200 | return ret; |
1e426ffd KM |
201 | } |
202 | ||
e0a5172e KM |
203 | static int rcar_thermal_get_temp(struct thermal_zone_device *zone, |
204 | unsigned long *temp) | |
205 | { | |
206 | struct rcar_thermal_priv *priv = rcar_zone_to_priv(zone); | |
207 | ||
208 | if (!rcar_has_irq_support(priv) || rcar_force_update_temp(priv)) | |
209 | rcar_thermal_update_temp(priv); | |
210 | ||
211 | mutex_lock(&priv->lock); | |
212 | *temp = MCELSIUS((priv->ctemp * 5) - 65); | |
213 | mutex_unlock(&priv->lock); | |
214 | ||
215 | return 0; | |
216 | } | |
217 | ||
d2a73e22 | 218 | static int rcar_thermal_get_trip_type(struct thermal_zone_device *zone, |
219 | int trip, enum thermal_trip_type *type) | |
220 | { | |
221 | struct rcar_thermal_priv *priv = rcar_zone_to_priv(zone); | |
3676d1dd | 222 | struct device *dev = rcar_priv_to_dev(priv); |
d2a73e22 | 223 | |
224 | /* see rcar_thermal_get_temp() */ | |
225 | switch (trip) { | |
226 | case 0: /* +90 <= temp */ | |
227 | *type = THERMAL_TRIP_CRITICAL; | |
228 | break; | |
229 | default: | |
3676d1dd | 230 | dev_err(dev, "rcar driver trip error\n"); |
d2a73e22 | 231 | return -EINVAL; |
232 | } | |
233 | ||
234 | return 0; | |
235 | } | |
236 | ||
237 | static int rcar_thermal_get_trip_temp(struct thermal_zone_device *zone, | |
238 | int trip, unsigned long *temp) | |
239 | { | |
240 | struct rcar_thermal_priv *priv = rcar_zone_to_priv(zone); | |
3676d1dd | 241 | struct device *dev = rcar_priv_to_dev(priv); |
d2a73e22 | 242 | |
243 | /* see rcar_thermal_get_temp() */ | |
244 | switch (trip) { | |
245 | case 0: /* +90 <= temp */ | |
246 | *temp = MCELSIUS(90); | |
247 | break; | |
248 | default: | |
3676d1dd | 249 | dev_err(dev, "rcar driver trip error\n"); |
d2a73e22 | 250 | return -EINVAL; |
251 | } | |
252 | ||
253 | return 0; | |
254 | } | |
255 | ||
256 | static int rcar_thermal_notify(struct thermal_zone_device *zone, | |
257 | int trip, enum thermal_trip_type type) | |
258 | { | |
259 | struct rcar_thermal_priv *priv = rcar_zone_to_priv(zone); | |
3676d1dd | 260 | struct device *dev = rcar_priv_to_dev(priv); |
d2a73e22 | 261 | |
262 | switch (type) { | |
263 | case THERMAL_TRIP_CRITICAL: | |
264 | /* FIXME */ | |
3676d1dd | 265 | dev_warn(dev, "Thermal reached to critical temperature\n"); |
d2a73e22 | 266 | break; |
267 | default: | |
268 | break; | |
269 | } | |
270 | ||
271 | return 0; | |
272 | } | |
273 | ||
1e426ffd | 274 | static struct thermal_zone_device_ops rcar_thermal_zone_ops = { |
d2a73e22 | 275 | .get_temp = rcar_thermal_get_temp, |
276 | .get_trip_type = rcar_thermal_get_trip_type, | |
277 | .get_trip_temp = rcar_thermal_get_trip_temp, | |
278 | .notify = rcar_thermal_notify, | |
1e426ffd KM |
279 | }; |
280 | ||
e0a5172e KM |
281 | /* |
282 | * interrupt | |
283 | */ | |
284 | #define rcar_thermal_irq_enable(p) _rcar_thermal_irq_ctrl(p, 1) | |
285 | #define rcar_thermal_irq_disable(p) _rcar_thermal_irq_ctrl(p, 0) | |
286 | static void _rcar_thermal_irq_ctrl(struct rcar_thermal_priv *priv, int enable) | |
287 | { | |
288 | struct rcar_thermal_common *common = priv->common; | |
289 | unsigned long flags; | |
290 | u32 mask = 0x3 << rcar_id_to_shift(priv); /* enable Rising/Falling */ | |
291 | ||
292 | spin_lock_irqsave(&common->lock, flags); | |
293 | ||
294 | rcar_thermal_common_bset(common, INTMSK, mask, enable ? 0 : mask); | |
295 | ||
296 | spin_unlock_irqrestore(&common->lock, flags); | |
297 | } | |
298 | ||
299 | static void rcar_thermal_work(struct work_struct *work) | |
300 | { | |
301 | struct rcar_thermal_priv *priv; | |
9477165e | 302 | unsigned long cctemp, nctemp; |
e0a5172e KM |
303 | |
304 | priv = container_of(work, struct rcar_thermal_priv, work.work); | |
305 | ||
9477165e | 306 | rcar_thermal_get_temp(priv->zone, &cctemp); |
e0a5172e KM |
307 | rcar_thermal_update_temp(priv); |
308 | rcar_thermal_irq_enable(priv); | |
9477165e PT |
309 | |
310 | rcar_thermal_get_temp(priv->zone, &nctemp); | |
311 | if (nctemp != cctemp) | |
312 | thermal_zone_device_update(priv->zone); | |
e0a5172e KM |
313 | } |
314 | ||
315 | static u32 rcar_thermal_had_changed(struct rcar_thermal_priv *priv, u32 status) | |
316 | { | |
317 | struct device *dev = rcar_priv_to_dev(priv); | |
318 | ||
319 | status = (status >> rcar_id_to_shift(priv)) & 0x3; | |
320 | ||
206c0cba | 321 | if (status) { |
e0a5172e KM |
322 | dev_dbg(dev, "thermal%d %s%s\n", |
323 | priv->id, | |
324 | (status & 0x2) ? "Rising " : "", | |
325 | (status & 0x1) ? "Falling" : ""); | |
326 | } | |
327 | ||
328 | return status; | |
329 | } | |
330 | ||
331 | static irqreturn_t rcar_thermal_irq(int irq, void *data) | |
332 | { | |
333 | struct rcar_thermal_common *common = data; | |
334 | struct rcar_thermal_priv *priv; | |
335 | unsigned long flags; | |
336 | u32 status, mask; | |
337 | ||
338 | spin_lock_irqsave(&common->lock, flags); | |
339 | ||
340 | mask = rcar_thermal_common_read(common, INTMSK); | |
341 | status = rcar_thermal_common_read(common, STR); | |
342 | rcar_thermal_common_write(common, STR, 0x000F0F0F & mask); | |
343 | ||
344 | spin_unlock_irqrestore(&common->lock, flags); | |
345 | ||
346 | status = status & ~mask; | |
347 | ||
348 | /* | |
349 | * check the status | |
350 | */ | |
351 | rcar_thermal_for_each_priv(priv, common) { | |
352 | if (rcar_thermal_had_changed(priv, status)) { | |
353 | rcar_thermal_irq_disable(priv); | |
354 | schedule_delayed_work(&priv->work, | |
355 | msecs_to_jiffies(300)); | |
356 | } | |
357 | } | |
358 | ||
359 | return IRQ_HANDLED; | |
360 | } | |
361 | ||
1e426ffd KM |
362 | /* |
363 | * platform functions | |
364 | */ | |
365 | static int rcar_thermal_probe(struct platform_device *pdev) | |
366 | { | |
3676d1dd | 367 | struct rcar_thermal_common *common; |
1e426ffd | 368 | struct rcar_thermal_priv *priv; |
3676d1dd KM |
369 | struct device *dev = &pdev->dev; |
370 | struct resource *res, *irq; | |
371 | int mres = 0; | |
372 | int i; | |
fb84d990 | 373 | int ret = -ENODEV; |
e0a5172e | 374 | int idle = IDLE_INTERVAL; |
1e426ffd | 375 | |
3676d1dd | 376 | common = devm_kzalloc(dev, sizeof(*common), GFP_KERNEL); |
b0a60d88 | 377 | if (!common) |
1e426ffd | 378 | return -ENOMEM; |
1e426ffd | 379 | |
3676d1dd | 380 | INIT_LIST_HEAD(&common->head); |
e0a5172e | 381 | spin_lock_init(&common->lock); |
3676d1dd KM |
382 | common->dev = dev; |
383 | ||
51d45d25 KM |
384 | pm_runtime_enable(dev); |
385 | pm_runtime_get_sync(dev); | |
386 | ||
3676d1dd KM |
387 | irq = platform_get_resource(pdev, IORESOURCE_IRQ, 0); |
388 | if (irq) { | |
e0a5172e KM |
389 | int ret; |
390 | ||
3676d1dd KM |
391 | /* |
392 | * platform has IRQ support. | |
393 | * Then, drier use common register | |
394 | */ | |
3676d1dd | 395 | |
e0a5172e KM |
396 | ret = devm_request_irq(dev, irq->start, rcar_thermal_irq, 0, |
397 | dev_name(dev), common); | |
398 | if (ret) { | |
399 | dev_err(dev, "irq request failed\n "); | |
400 | return ret; | |
401 | } | |
402 | ||
3676d1dd KM |
403 | /* |
404 | * rcar_has_irq_support() will be enabled | |
405 | */ | |
c28f692c | 406 | res = platform_get_resource(pdev, IORESOURCE_MEM, mres++); |
5095526f SK |
407 | common->base = devm_ioremap_resource(dev, res); |
408 | if (IS_ERR(common->base)) | |
409 | return PTR_ERR(common->base); | |
e0a5172e KM |
410 | |
411 | /* enable temperature comparation */ | |
412 | rcar_thermal_common_write(common, ENR, 0x00030303); | |
413 | ||
6fe495e0 | 414 | idle = 0; /* polling delay is not needed */ |
1e426ffd KM |
415 | } |
416 | ||
3676d1dd KM |
417 | for (i = 0;; i++) { |
418 | res = platform_get_resource(pdev, IORESOURCE_MEM, mres++); | |
419 | if (!res) | |
420 | break; | |
421 | ||
422 | priv = devm_kzalloc(dev, sizeof(*priv), GFP_KERNEL); | |
423 | if (!priv) { | |
1dc20828 KM |
424 | ret = -ENOMEM; |
425 | goto error_unregister; | |
3676d1dd KM |
426 | } |
427 | ||
5095526f | 428 | priv->base = devm_ioremap_resource(dev, res); |
1dc20828 KM |
429 | if (IS_ERR(priv->base)) { |
430 | ret = PTR_ERR(priv->base); | |
431 | goto error_unregister; | |
432 | } | |
3676d1dd KM |
433 | |
434 | priv->common = common; | |
e0a5172e | 435 | priv->id = i; |
3676d1dd KM |
436 | mutex_init(&priv->lock); |
437 | INIT_LIST_HEAD(&priv->list); | |
e0a5172e KM |
438 | INIT_DELAYED_WORK(&priv->work, rcar_thermal_work); |
439 | rcar_thermal_update_temp(priv); | |
3676d1dd KM |
440 | |
441 | priv->zone = thermal_zone_device_register("rcar_thermal", | |
442 | 1, 0, priv, | |
443 | &rcar_thermal_zone_ops, NULL, 0, | |
e0a5172e | 444 | idle); |
3676d1dd KM |
445 | if (IS_ERR(priv->zone)) { |
446 | dev_err(dev, "can't register thermal zone\n"); | |
fb84d990 | 447 | ret = PTR_ERR(priv->zone); |
3676d1dd KM |
448 | goto error_unregister; |
449 | } | |
450 | ||
e0a5172e KM |
451 | if (rcar_has_irq_support(priv)) |
452 | rcar_thermal_irq_enable(priv); | |
1dc20828 KM |
453 | |
454 | list_move_tail(&priv->list, &common->head); | |
1e426ffd KM |
455 | } |
456 | ||
3676d1dd | 457 | platform_set_drvdata(pdev, common); |
1e426ffd | 458 | |
3db46c93 | 459 | dev_info(dev, "%d sensor probed\n", i); |
1e426ffd KM |
460 | |
461 | return 0; | |
3676d1dd KM |
462 | |
463 | error_unregister: | |
1dc20828 | 464 | rcar_thermal_for_each_priv(priv, common) { |
3676d1dd | 465 | thermal_zone_device_unregister(priv->zone); |
1dc20828 KM |
466 | if (rcar_has_irq_support(priv)) |
467 | rcar_thermal_irq_disable(priv); | |
468 | } | |
3676d1dd | 469 | |
09be511c | 470 | pm_runtime_put(dev); |
51d45d25 KM |
471 | pm_runtime_disable(dev); |
472 | ||
fb84d990 | 473 | return ret; |
1e426ffd KM |
474 | } |
475 | ||
476 | static int rcar_thermal_remove(struct platform_device *pdev) | |
477 | { | |
3676d1dd | 478 | struct rcar_thermal_common *common = platform_get_drvdata(pdev); |
51d45d25 | 479 | struct device *dev = &pdev->dev; |
3676d1dd KM |
480 | struct rcar_thermal_priv *priv; |
481 | ||
1dc20828 | 482 | rcar_thermal_for_each_priv(priv, common) { |
3676d1dd | 483 | thermal_zone_device_unregister(priv->zone); |
1dc20828 KM |
484 | if (rcar_has_irq_support(priv)) |
485 | rcar_thermal_irq_disable(priv); | |
486 | } | |
1e426ffd | 487 | |
09be511c | 488 | pm_runtime_put(dev); |
51d45d25 KM |
489 | pm_runtime_disable(dev); |
490 | ||
1e426ffd KM |
491 | return 0; |
492 | } | |
493 | ||
f5b6d45f | 494 | static const struct of_device_id rcar_thermal_dt_ids[] = { |
76cc1887 KM |
495 | { .compatible = "renesas,rcar-thermal", }, |
496 | {}, | |
497 | }; | |
498 | MODULE_DEVICE_TABLE(of, rcar_thermal_dt_ids); | |
499 | ||
1e426ffd KM |
500 | static struct platform_driver rcar_thermal_driver = { |
501 | .driver = { | |
502 | .name = "rcar_thermal", | |
76cc1887 | 503 | .of_match_table = rcar_thermal_dt_ids, |
1e426ffd KM |
504 | }, |
505 | .probe = rcar_thermal_probe, | |
506 | .remove = rcar_thermal_remove, | |
507 | }; | |
508 | module_platform_driver(rcar_thermal_driver); | |
509 | ||
510 | MODULE_LICENSE("GPL"); | |
511 | MODULE_DESCRIPTION("R-Car THS/TSC thermal sensor driver"); | |
512 | MODULE_AUTHOR("Kuninori Morimoto <kuninori.morimoto.gx@renesas.com>"); |