xref: /openbmc/linux/drivers/hwmon/pwm-fan.c (revision 2c64e9cb)
1 /*
2  * pwm-fan.c - Hwmon driver for fans connected to PWM lines.
3  *
4  * Copyright (c) 2014 Samsung Electronics Co., Ltd.
5  *
6  * Author: Kamil Debski <k.debski@samsung.com>
7  *
8  * This program is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License as published by
10  * the Free Software Foundation; either version 2 of the License, or
11  * (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  */
18 
19 #include <linux/hwmon.h>
20 #include <linux/hwmon-sysfs.h>
21 #include <linux/interrupt.h>
22 #include <linux/module.h>
23 #include <linux/mutex.h>
24 #include <linux/of.h>
25 #include <linux/platform_device.h>
26 #include <linux/pwm.h>
27 #include <linux/regulator/consumer.h>
28 #include <linux/sysfs.h>
29 #include <linux/thermal.h>
30 #include <linux/timer.h>
31 
32 #define MAX_PWM 255
33 
34 struct pwm_fan_ctx {
35 	struct mutex lock;
36 	struct pwm_device *pwm;
37 	struct regulator *reg_en;
38 
39 	int irq;
40 	atomic_t pulses;
41 	unsigned int rpm;
42 	u8 pulses_per_revolution;
43 	ktime_t sample_start;
44 	struct timer_list rpm_timer;
45 
46 	unsigned int pwm_value;
47 	unsigned int pwm_fan_state;
48 	unsigned int pwm_fan_max_state;
49 	unsigned int *pwm_fan_cooling_levels;
50 	struct thermal_cooling_device *cdev;
51 };
52 
53 /* This handler assumes self resetting edge triggered interrupt. */
54 static irqreturn_t pulse_handler(int irq, void *dev_id)
55 {
56 	struct pwm_fan_ctx *ctx = dev_id;
57 
58 	atomic_inc(&ctx->pulses);
59 
60 	return IRQ_HANDLED;
61 }
62 
63 static void sample_timer(struct timer_list *t)
64 {
65 	struct pwm_fan_ctx *ctx = from_timer(ctx, t, rpm_timer);
66 	int pulses;
67 	u64 tmp;
68 
69 	pulses = atomic_read(&ctx->pulses);
70 	atomic_sub(pulses, &ctx->pulses);
71 	tmp = (u64)pulses * ktime_ms_delta(ktime_get(), ctx->sample_start) * 60;
72 	do_div(tmp, ctx->pulses_per_revolution * 1000);
73 	ctx->rpm = tmp;
74 
75 	ctx->sample_start = ktime_get();
76 	mod_timer(&ctx->rpm_timer, jiffies + HZ);
77 }
78 
79 static int  __set_pwm(struct pwm_fan_ctx *ctx, unsigned long pwm)
80 {
81 	unsigned long period;
82 	int ret = 0;
83 	struct pwm_state state = { };
84 
85 	mutex_lock(&ctx->lock);
86 	if (ctx->pwm_value == pwm)
87 		goto exit_set_pwm_err;
88 
89 	pwm_init_state(ctx->pwm, &state);
90 	period = ctx->pwm->args.period;
91 	state.duty_cycle = DIV_ROUND_UP(pwm * (period - 1), MAX_PWM);
92 	state.enabled = pwm ? true : false;
93 
94 	ret = pwm_apply_state(ctx->pwm, &state);
95 	if (!ret)
96 		ctx->pwm_value = pwm;
97 exit_set_pwm_err:
98 	mutex_unlock(&ctx->lock);
99 	return ret;
100 }
101 
102 static void pwm_fan_update_state(struct pwm_fan_ctx *ctx, unsigned long pwm)
103 {
104 	int i;
105 
106 	for (i = 0; i < ctx->pwm_fan_max_state; ++i)
107 		if (pwm < ctx->pwm_fan_cooling_levels[i + 1])
108 			break;
109 
110 	ctx->pwm_fan_state = i;
111 }
112 
113 static ssize_t pwm_store(struct device *dev, struct device_attribute *attr,
114 			 const char *buf, size_t count)
115 {
116 	struct pwm_fan_ctx *ctx = dev_get_drvdata(dev);
117 	unsigned long pwm;
118 	int ret;
119 
120 	if (kstrtoul(buf, 10, &pwm) || pwm > MAX_PWM)
121 		return -EINVAL;
122 
123 	ret = __set_pwm(ctx, pwm);
124 	if (ret)
125 		return ret;
126 
127 	pwm_fan_update_state(ctx, pwm);
128 	return count;
129 }
130 
131 static ssize_t pwm_show(struct device *dev, struct device_attribute *attr,
132 			char *buf)
133 {
134 	struct pwm_fan_ctx *ctx = dev_get_drvdata(dev);
135 
136 	return sprintf(buf, "%u\n", ctx->pwm_value);
137 }
138 
139 static ssize_t rpm_show(struct device *dev,
140 			struct device_attribute *attr, char *buf)
141 {
142 	struct pwm_fan_ctx *ctx = dev_get_drvdata(dev);
143 
144 	return sprintf(buf, "%u\n", ctx->rpm);
145 }
146 
147 static SENSOR_DEVICE_ATTR_RW(pwm1, pwm, 0);
148 static SENSOR_DEVICE_ATTR_RO(fan1_input, rpm, 0);
149 
150 static struct attribute *pwm_fan_attrs[] = {
151 	&sensor_dev_attr_pwm1.dev_attr.attr,
152 	&sensor_dev_attr_fan1_input.dev_attr.attr,
153 	NULL,
154 };
155 
156 static umode_t pwm_fan_attrs_visible(struct kobject *kobj, struct attribute *a,
157 				     int n)
158 {
159 	struct device *dev = container_of(kobj, struct device, kobj);
160 	struct pwm_fan_ctx *ctx = dev_get_drvdata(dev);
161 
162 	/* Hide fan_input in case no interrupt is available  */
163 	if (n == 1 && ctx->irq <= 0)
164 		return 0;
165 
166 	return a->mode;
167 }
168 
169 static const struct attribute_group pwm_fan_group = {
170 	.attrs = pwm_fan_attrs,
171 	.is_visible = pwm_fan_attrs_visible,
172 };
173 
174 static const struct attribute_group *pwm_fan_groups[] = {
175 	&pwm_fan_group,
176 	NULL,
177 };
178 
179 /* thermal cooling device callbacks */
180 static int pwm_fan_get_max_state(struct thermal_cooling_device *cdev,
181 				 unsigned long *state)
182 {
183 	struct pwm_fan_ctx *ctx = cdev->devdata;
184 
185 	if (!ctx)
186 		return -EINVAL;
187 
188 	*state = ctx->pwm_fan_max_state;
189 
190 	return 0;
191 }
192 
193 static int pwm_fan_get_cur_state(struct thermal_cooling_device *cdev,
194 				 unsigned long *state)
195 {
196 	struct pwm_fan_ctx *ctx = cdev->devdata;
197 
198 	if (!ctx)
199 		return -EINVAL;
200 
201 	*state = ctx->pwm_fan_state;
202 
203 	return 0;
204 }
205 
206 static int
207 pwm_fan_set_cur_state(struct thermal_cooling_device *cdev, unsigned long state)
208 {
209 	struct pwm_fan_ctx *ctx = cdev->devdata;
210 	int ret;
211 
212 	if (!ctx || (state > ctx->pwm_fan_max_state))
213 		return -EINVAL;
214 
215 	if (state == ctx->pwm_fan_state)
216 		return 0;
217 
218 	ret = __set_pwm(ctx, ctx->pwm_fan_cooling_levels[state]);
219 	if (ret) {
220 		dev_err(&cdev->device, "Cannot set pwm!\n");
221 		return ret;
222 	}
223 
224 	ctx->pwm_fan_state = state;
225 
226 	return ret;
227 }
228 
229 static const struct thermal_cooling_device_ops pwm_fan_cooling_ops = {
230 	.get_max_state = pwm_fan_get_max_state,
231 	.get_cur_state = pwm_fan_get_cur_state,
232 	.set_cur_state = pwm_fan_set_cur_state,
233 };
234 
235 static int pwm_fan_of_get_cooling_data(struct device *dev,
236 				       struct pwm_fan_ctx *ctx)
237 {
238 	struct device_node *np = dev->of_node;
239 	int num, i, ret;
240 
241 	if (!of_find_property(np, "cooling-levels", NULL))
242 		return 0;
243 
244 	ret = of_property_count_u32_elems(np, "cooling-levels");
245 	if (ret <= 0) {
246 		dev_err(dev, "Wrong data!\n");
247 		return ret ? : -EINVAL;
248 	}
249 
250 	num = ret;
251 	ctx->pwm_fan_cooling_levels = devm_kcalloc(dev, num, sizeof(u32),
252 						   GFP_KERNEL);
253 	if (!ctx->pwm_fan_cooling_levels)
254 		return -ENOMEM;
255 
256 	ret = of_property_read_u32_array(np, "cooling-levels",
257 					 ctx->pwm_fan_cooling_levels, num);
258 	if (ret) {
259 		dev_err(dev, "Property 'cooling-levels' cannot be read!\n");
260 		return ret;
261 	}
262 
263 	for (i = 0; i < num; i++) {
264 		if (ctx->pwm_fan_cooling_levels[i] > MAX_PWM) {
265 			dev_err(dev, "PWM fan state[%d]:%d > %d\n", i,
266 				ctx->pwm_fan_cooling_levels[i], MAX_PWM);
267 			return -EINVAL;
268 		}
269 	}
270 
271 	ctx->pwm_fan_max_state = num - 1;
272 
273 	return 0;
274 }
275 
276 static int pwm_fan_probe(struct platform_device *pdev)
277 {
278 	struct thermal_cooling_device *cdev;
279 	struct pwm_fan_ctx *ctx;
280 	struct device *hwmon;
281 	int ret;
282 	struct pwm_state state = { };
283 	u32 ppr = 2;
284 
285 	ctx = devm_kzalloc(&pdev->dev, sizeof(*ctx), GFP_KERNEL);
286 	if (!ctx)
287 		return -ENOMEM;
288 
289 	mutex_init(&ctx->lock);
290 
291 	ctx->pwm = devm_of_pwm_get(&pdev->dev, pdev->dev.of_node, NULL);
292 	if (IS_ERR(ctx->pwm)) {
293 		ret = PTR_ERR(ctx->pwm);
294 
295 		if (ret != -EPROBE_DEFER)
296 			dev_err(&pdev->dev, "Could not get PWM: %d\n", ret);
297 
298 		return ret;
299 	}
300 
301 	platform_set_drvdata(pdev, ctx);
302 
303 	ctx->irq = platform_get_irq(pdev, 0);
304 	if (ctx->irq == -EPROBE_DEFER)
305 		return ctx->irq;
306 
307 	ctx->reg_en = devm_regulator_get_optional(&pdev->dev, "fan");
308 	if (IS_ERR(ctx->reg_en)) {
309 		if (PTR_ERR(ctx->reg_en) != -ENODEV)
310 			return PTR_ERR(ctx->reg_en);
311 
312 		ctx->reg_en = NULL;
313 	} else {
314 		ret = regulator_enable(ctx->reg_en);
315 		if (ret) {
316 			dev_err(&pdev->dev,
317 				"Failed to enable fan supply: %d\n", ret);
318 			return ret;
319 		}
320 	}
321 
322 	ctx->pwm_value = MAX_PWM;
323 
324 	/* Set duty cycle to maximum allowed and enable PWM output */
325 	pwm_init_state(ctx->pwm, &state);
326 	state.duty_cycle = ctx->pwm->args.period - 1;
327 	state.enabled = true;
328 
329 	ret = pwm_apply_state(ctx->pwm, &state);
330 	if (ret) {
331 		dev_err(&pdev->dev, "Failed to configure PWM: %d\n", ret);
332 		goto err_reg_disable;
333 	}
334 
335 	timer_setup(&ctx->rpm_timer, sample_timer, 0);
336 
337 	of_property_read_u32(pdev->dev.of_node, "pulses-per-revolution", &ppr);
338 	ctx->pulses_per_revolution = ppr;
339 	if (!ctx->pulses_per_revolution) {
340 		dev_err(&pdev->dev, "pulses-per-revolution can't be zero.\n");
341 		ret = -EINVAL;
342 		goto err_pwm_disable;
343 	}
344 
345 	if (ctx->irq > 0) {
346 		ret = devm_request_irq(&pdev->dev, ctx->irq, pulse_handler, 0,
347 				       pdev->name, ctx);
348 		if (ret) {
349 			dev_err(&pdev->dev,
350 				"Failed to request interrupt: %d\n", ret);
351 			goto err_pwm_disable;
352 		}
353 		ctx->sample_start = ktime_get();
354 		mod_timer(&ctx->rpm_timer, jiffies + HZ);
355 	}
356 
357 	hwmon = devm_hwmon_device_register_with_groups(&pdev->dev, "pwmfan",
358 						       ctx, pwm_fan_groups);
359 	if (IS_ERR(hwmon)) {
360 		ret = PTR_ERR(hwmon);
361 		dev_err(&pdev->dev,
362 			"Failed to register hwmon device: %d\n", ret);
363 		goto err_del_timer;
364 	}
365 
366 	ret = pwm_fan_of_get_cooling_data(&pdev->dev, ctx);
367 	if (ret)
368 		goto err_del_timer;
369 
370 	ctx->pwm_fan_state = ctx->pwm_fan_max_state;
371 	if (IS_ENABLED(CONFIG_THERMAL)) {
372 		cdev = thermal_of_cooling_device_register(pdev->dev.of_node,
373 							  "pwm-fan", ctx,
374 							  &pwm_fan_cooling_ops);
375 		if (IS_ERR(cdev)) {
376 			ret = PTR_ERR(cdev);
377 			dev_err(&pdev->dev,
378 				"Failed to register pwm-fan as cooling device: %d\n",
379 				ret);
380 			goto err_del_timer;
381 		}
382 		ctx->cdev = cdev;
383 		thermal_cdev_update(cdev);
384 	}
385 
386 	return 0;
387 
388 err_del_timer:
389 	del_timer_sync(&ctx->rpm_timer);
390 
391 err_pwm_disable:
392 	state.enabled = false;
393 	pwm_apply_state(ctx->pwm, &state);
394 
395 err_reg_disable:
396 	if (ctx->reg_en)
397 		regulator_disable(ctx->reg_en);
398 
399 	return ret;
400 }
401 
402 static int pwm_fan_remove(struct platform_device *pdev)
403 {
404 	struct pwm_fan_ctx *ctx = platform_get_drvdata(pdev);
405 
406 	thermal_cooling_device_unregister(ctx->cdev);
407 	del_timer_sync(&ctx->rpm_timer);
408 
409 	if (ctx->pwm_value)
410 		pwm_disable(ctx->pwm);
411 
412 	if (ctx->reg_en)
413 		regulator_disable(ctx->reg_en);
414 
415 	return 0;
416 }
417 
418 #ifdef CONFIG_PM_SLEEP
419 static int pwm_fan_suspend(struct device *dev)
420 {
421 	struct pwm_fan_ctx *ctx = dev_get_drvdata(dev);
422 	struct pwm_args args;
423 	int ret;
424 
425 	pwm_get_args(ctx->pwm, &args);
426 
427 	if (ctx->pwm_value) {
428 		ret = pwm_config(ctx->pwm, 0, args.period);
429 		if (ret < 0)
430 			return ret;
431 
432 		pwm_disable(ctx->pwm);
433 	}
434 
435 	if (ctx->reg_en) {
436 		ret = regulator_disable(ctx->reg_en);
437 		if (ret) {
438 			dev_err(dev, "Failed to disable fan supply: %d\n", ret);
439 			return ret;
440 		}
441 	}
442 
443 	return 0;
444 }
445 
446 static int pwm_fan_resume(struct device *dev)
447 {
448 	struct pwm_fan_ctx *ctx = dev_get_drvdata(dev);
449 	struct pwm_args pargs;
450 	unsigned long duty;
451 	int ret;
452 
453 	if (ctx->reg_en) {
454 		ret = regulator_enable(ctx->reg_en);
455 		if (ret) {
456 			dev_err(dev, "Failed to enable fan supply: %d\n", ret);
457 			return ret;
458 		}
459 	}
460 
461 	if (ctx->pwm_value == 0)
462 		return 0;
463 
464 	pwm_get_args(ctx->pwm, &pargs);
465 	duty = DIV_ROUND_UP(ctx->pwm_value * (pargs.period - 1), MAX_PWM);
466 	ret = pwm_config(ctx->pwm, duty, pargs.period);
467 	if (ret)
468 		return ret;
469 	return pwm_enable(ctx->pwm);
470 }
471 #endif
472 
473 static SIMPLE_DEV_PM_OPS(pwm_fan_pm, pwm_fan_suspend, pwm_fan_resume);
474 
475 static const struct of_device_id of_pwm_fan_match[] = {
476 	{ .compatible = "pwm-fan", },
477 	{},
478 };
479 MODULE_DEVICE_TABLE(of, of_pwm_fan_match);
480 
481 static struct platform_driver pwm_fan_driver = {
482 	.probe		= pwm_fan_probe,
483 	.remove		= pwm_fan_remove,
484 	.driver	= {
485 		.name		= "pwm-fan",
486 		.pm		= &pwm_fan_pm,
487 		.of_match_table	= of_pwm_fan_match,
488 	},
489 };
490 
491 module_platform_driver(pwm_fan_driver);
492 
493 MODULE_AUTHOR("Kamil Debski <k.debski@samsung.com>");
494 MODULE_ALIAS("platform:pwm-fan");
495 MODULE_DESCRIPTION("PWM FAN driver");
496 MODULE_LICENSE("GPL");
497