drivers/hwmon/pwm-fan.c

   1 // SPDX-License-Identifier: GPL-2.0-or-later
   2 /*
   3  * pwm-fan.c - Hwmon driver for fans connected to PWM lines.
   4  *
   5  * Copyright (c) 2014 Samsung Electronics Co., Ltd.
   6  *
   7  * Author: Kamil Debski <k.debski@samsung.com>
   8  */
   9
  10 #include <linux/hwmon.h>
  11 #include <linux/interrupt.h>
  12 #include <linux/module.h>
  13 #include <linux/mutex.h>
  14 #include <linux/of.h>
  15 #include <linux/platform_device.h>
  16 #include <linux/pwm.h>
  17 #include <linux/regulator/consumer.h>
  18 #include <linux/sysfs.h>
  19 #include <linux/thermal.h>
  20 #include <linux/timer.h>
  21
  22 #define MAX_PWM 255
  23
  24 struct pwm_fan_tach {
  25         int irq;
  26         atomic_t pulses;
  27         unsigned int rpm;
  28         u8 pulses_per_revolution;
  29 };
  30
  31 struct pwm_fan_ctx {
  32         struct mutex lock;
  33         struct pwm_device *pwm;
  34         struct pwm_state pwm_state;
  35         struct regulator *reg_en;
  36
  37         int tach_count;
  38         struct pwm_fan_tach *tachs;
  39         ktime_t sample_start;
  40         struct timer_list rpm_timer;
  41
  42         unsigned int pwm_value;
  43         unsigned int pwm_fan_state;
  44         unsigned int pwm_fan_max_state;
  45         unsigned int *pwm_fan_cooling_levels;
  46         struct thermal_cooling_device *cdev;
  47
  48         struct hwmon_chip_info info;
  49         struct hwmon_channel_info fan_channel;
  50 };
  51
  52 static const u32 pwm_fan_channel_config_pwm[] = {
  53         HWMON_PWM_INPUT,
  54         0
  55 };
  56
  57 static const struct hwmon_channel_info pwm_fan_channel_pwm = {
  58         .type = hwmon_pwm,
  59         .config = pwm_fan_channel_config_pwm,
  60 };
  61
  62 /* This handler assumes self resetting edge triggered interrupt. */
  63 static irqreturn_t pulse_handler(int irq, void *dev_id)
  64 {
  65         struct pwm_fan_tach *tach = dev_id;
  66
  67         atomic_inc(&tach->pulses);
  68
  69         return IRQ_HANDLED;
  70 }
  71
  72 static void sample_timer(struct timer_list *t)
  73 {
  74         struct pwm_fan_ctx *ctx = from_timer(ctx, t, rpm_timer);
  75         unsigned int delta = ktime_ms_delta(ktime_get(), ctx->sample_start);
  76         int i;
  77
  78         if (delta) {
  79                 for (i = 0; i < ctx->tach_count; i++) {
  80                         struct pwm_fan_tach *tach = &ctx->tachs[i];
  81                         int pulses;
  82
  83                         pulses = atomic_read(&tach->pulses);
  84                         atomic_sub(pulses, &tach->pulses);
  85                         tach->rpm = (unsigned int)(pulses * 1000 * 60) /
  86                                 (tach->pulses_per_revolution * delta);
  87                 }
  88
  89                 ctx->sample_start = ktime_get();
  90         }
  91
  92         mod_timer(&ctx->rpm_timer, jiffies + HZ);
  93 }
  94
  95 static int  __set_pwm(struct pwm_fan_ctx *ctx, unsigned long pwm)
  96 {
  97         unsigned long period;
  98         int ret = 0;
  99         struct pwm_state *state = &ctx->pwm_state;
 100
 101         mutex_lock(&ctx->lock);
 102         if (ctx->pwm_value == pwm)
 103                 goto exit_set_pwm_err;
 104
 105         period = state->period;
 106         state->duty_cycle = DIV_ROUND_UP(pwm * (period - 1), MAX_PWM);
 107         state->enabled = pwm ? true : false;
 108
 109         ret = pwm_apply_state(ctx->pwm, state);
 110         if (!ret)
 111                 ctx->pwm_value = pwm;
 112 exit_set_pwm_err:
 113         mutex_unlock(&ctx->lock);
 114         return ret;
 115 }
 116
 117 static void pwm_fan_update_state(struct pwm_fan_ctx *ctx, unsigned long pwm)
 118 {
 119         int i;
 120
 121         for (i = 0; i < ctx->pwm_fan_max_state; ++i)
 122                 if (pwm < ctx->pwm_fan_cooling_levels[i + 1])
 123                         break;
 124
 125         ctx->pwm_fan_state = i;
 126 }
 127
 128 static int pwm_fan_write(struct device *dev, enum hwmon_sensor_types type,
 129                          u32 attr, int channel, long val)
 130 {
 131         struct pwm_fan_ctx *ctx = dev_get_drvdata(dev);
 132         int ret;
 133
 134         if (val < 0 || val > MAX_PWM)
 135                 return -EINVAL;
 136
 137         ret = __set_pwm(ctx, val);
 138         if (ret)
 139                 return ret;
 140
 141         pwm_fan_update_state(ctx, val);
 142         return 0;
 143 }
 144
 145 static int pwm_fan_read(struct device *dev, enum hwmon_sensor_types type,
 146                         u32 attr, int channel, long *val)
 147 {
 148         struct pwm_fan_ctx *ctx = dev_get_drvdata(dev);
 149
 150         switch (type) {
 151         case hwmon_pwm:
 152                 *val = ctx->pwm_value;
 153                 return 0;
 154
 155         case hwmon_fan:
 156                 *val = ctx->tachs[channel].rpm;
 157                 return 0;
 158
 159         default:
 160                 return -ENOTSUPP;
 161         }
 162 }
 163
 164 static umode_t pwm_fan_is_visible(const void *data,
 165                                   enum hwmon_sensor_types type,
 166                                   u32 attr, int channel)
 167 {
 168         switch (type) {
 169         case hwmon_pwm:
 170                 return 0644;
 171
 172         case hwmon_fan:
 173                 return 0444;
 174
 175         default:
 176                 return 0;
 177         }
 178 }
 179
 180 static const struct hwmon_ops pwm_fan_hwmon_ops = {
 181         .is_visible = pwm_fan_is_visible,
 182         .read = pwm_fan_read,
 183         .write = pwm_fan_write,
 184 };
 185
 186 /* thermal cooling device callbacks */
 187 static int pwm_fan_get_max_state(struct thermal_cooling_device *cdev,
 188                                  unsigned long *state)
 189 {
 190         struct pwm_fan_ctx *ctx = cdev->devdata;
 191
 192         if (!ctx)
 193                 return -EINVAL;
 194
 195         *state = ctx->pwm_fan_max_state;
 196
 197         return 0;
 198 }
 199
 200 static int pwm_fan_get_cur_state(struct thermal_cooling_device *cdev,
 201                                  unsigned long *state)
 202 {
 203         struct pwm_fan_ctx *ctx = cdev->devdata;
 204
 205         if (!ctx)
 206                 return -EINVAL;
 207
 208         *state = ctx->pwm_fan_state;
 209
 210         return 0;
 211 }
 212
 213 static int
 214 pwm_fan_set_cur_state(struct thermal_cooling_device *cdev, unsigned long state)
 215 {
 216         struct pwm_fan_ctx *ctx = cdev->devdata;
 217         int ret;
 218
 219         if (!ctx || (state > ctx->pwm_fan_max_state))
 220                 return -EINVAL;
 221
 222         if (state == ctx->pwm_fan_state)
 223                 return 0;
 224
 225         ret = __set_pwm(ctx, ctx->pwm_fan_cooling_levels[state]);
 226         if (ret) {
 227                 dev_err(&cdev->device, "Cannot set pwm!\n");
 228                 return ret;
 229         }
 230
 231         ctx->pwm_fan_state = state;
 232
 233         return ret;
 234 }
 235
 236 static const struct thermal_cooling_device_ops pwm_fan_cooling_ops = {
 237         .get_max_state = pwm_fan_get_max_state,
 238         .get_cur_state = pwm_fan_get_cur_state,
 239         .set_cur_state = pwm_fan_set_cur_state,
 240 };
 241
 242 static int pwm_fan_of_get_cooling_data(struct device *dev,
 243                                        struct pwm_fan_ctx *ctx)
 244 {
 245         struct device_node *np = dev->of_node;
 246         int num, i, ret;
 247
 248         if (!of_find_property(np, "cooling-levels", NULL))
 249                 return 0;
 250
 251         ret = of_property_count_u32_elems(np, "cooling-levels");
 252         if (ret <= 0) {
 253                 dev_err(dev, "Wrong data!\n");
 254                 return ret ? : -EINVAL;
 255         }
 256
 257         num = ret;
 258         ctx->pwm_fan_cooling_levels = devm_kcalloc(dev, num, sizeof(u32),
 259                                                    GFP_KERNEL);
 260         if (!ctx->pwm_fan_cooling_levels)
 261                 return -ENOMEM;
 262
 263         ret = of_property_read_u32_array(np, "cooling-levels",
 264                                          ctx->pwm_fan_cooling_levels, num);
 265         if (ret) {
 266                 dev_err(dev, "Property 'cooling-levels' cannot be read!\n");
 267                 return ret;
 268         }
 269
 270         for (i = 0; i < num; i++) {
 271                 if (ctx->pwm_fan_cooling_levels[i] > MAX_PWM) {
 272                         dev_err(dev, "PWM fan state[%d]:%d > %d\n", i,
 273                                 ctx->pwm_fan_cooling_levels[i], MAX_PWM);
 274                         return -EINVAL;
 275                 }
 276         }
 277
 278         ctx->pwm_fan_max_state = num - 1;
 279
 280         return 0;
 281 }
 282
 283 static void pwm_fan_regulator_disable(void *data)
 284 {
 285         regulator_disable(data);
 286 }
 287
 288 static void pwm_fan_pwm_disable(void *__ctx)
 289 {
 290         struct pwm_fan_ctx *ctx = __ctx;
 291
 292         ctx->pwm_state.enabled = false;
 293         pwm_apply_state(ctx->pwm, &ctx->pwm_state);
 294         del_timer_sync(&ctx->rpm_timer);
 295 }
 296
 297 static int pwm_fan_probe(struct platform_device *pdev)
 298 {
 299         struct thermal_cooling_device *cdev;
 300         struct device *dev = &pdev->dev;
 301         struct pwm_fan_ctx *ctx;
 302         struct device *hwmon;
 303         int ret;
 304         const struct hwmon_channel_info **channels;
 305         u32 *fan_channel_config;
 306         int channel_count = 1;  /* We always have a PWM channel. */
 307         int i;
 308
 309         ctx = devm_kzalloc(dev, sizeof(*ctx), GFP_KERNEL);
 310         if (!ctx)
 311                 return -ENOMEM;
 312
 313         mutex_init(&ctx->lock);
 314
 315         ctx->pwm = devm_of_pwm_get(dev, dev->of_node, NULL);
 316         if (IS_ERR(ctx->pwm))
 317                 return dev_err_probe(dev, PTR_ERR(ctx->pwm), "Could not get PWM\n");
 318
 319         platform_set_drvdata(pdev, ctx);
 320
 321         ctx->reg_en = devm_regulator_get_optional(dev, "fan");
 322         if (IS_ERR(ctx->reg_en)) {
 323                 if (PTR_ERR(ctx->reg_en) != -ENODEV)
 324                         return PTR_ERR(ctx->reg_en);
 325
 326                 ctx->reg_en = NULL;
 327         } else {
 328                 ret = regulator_enable(ctx->reg_en);
 329                 if (ret) {
 330                         dev_err(dev, "Failed to enable fan supply: %d\n", ret);
 331                         return ret;
 332                 }
 333                 ret = devm_add_action_or_reset(dev, pwm_fan_regulator_disable,
 334                                                ctx->reg_en);
 335                 if (ret)
 336                         return ret;
 337         }
 338
 339         ctx->pwm_value = MAX_PWM;
 340
 341         pwm_init_state(ctx->pwm, &ctx->pwm_state);
 342
 343         /*
 344          * __set_pwm assumes that MAX_PWM * (period - 1) fits into an unsigned
 345          * long. Check this here to prevent the fan running at a too low
 346          * frequency.
 347          */
 348         if (ctx->pwm_state.period > ULONG_MAX / MAX_PWM + 1) {
 349                 dev_err(dev, "Configured period too big\n");
 350                 return -EINVAL;
 351         }
 352
 353         /* Set duty cycle to maximum allowed and enable PWM output */
 354         ret = __set_pwm(ctx, MAX_PWM);
 355         if (ret) {
 356                 dev_err(dev, "Failed to configure PWM: %d\n", ret);
 357                 return ret;
 358         }
 359         timer_setup(&ctx->rpm_timer, sample_timer, 0);
 360         ret = devm_add_action_or_reset(dev, pwm_fan_pwm_disable, ctx);
 361         if (ret)
 362                 return ret;
 363
 364         ctx->tach_count = platform_irq_count(pdev);
 365         if (ctx->tach_count < 0)
 366                 return dev_err_probe(dev, ctx->tach_count,
 367                                      "Could not get number of fan tachometer inputs\n");
 368         dev_dbg(dev, "%d fan tachometer inputs\n", ctx->tach_count);
 369
 370         if (ctx->tach_count) {
 371                 channel_count++;        /* We also have a FAN channel. */
 372
 373                 ctx->tachs = devm_kcalloc(dev, ctx->tach_count,
 374                                           sizeof(struct pwm_fan_tach),
 375                                           GFP_KERNEL);
 376                 if (!ctx->tachs)
 377                         return -ENOMEM;
 378
 379                 ctx->fan_channel.type = hwmon_fan;
 380                 fan_channel_config = devm_kcalloc(dev, ctx->tach_count + 1,
 381                                                   sizeof(u32), GFP_KERNEL);
 382                 if (!fan_channel_config)
 383                         return -ENOMEM;
 384                 ctx->fan_channel.config = fan_channel_config;
 385         }
 386
 387         channels = devm_kcalloc(dev, channel_count + 1,
 388                                 sizeof(struct hwmon_channel_info *), GFP_KERNEL);
 389         if (!channels)
 390                 return -ENOMEM;
 391
 392         channels[0] = &pwm_fan_channel_pwm;
 393
 394         for (i = 0; i < ctx->tach_count; i++) {
 395                 struct pwm_fan_tach *tach = &ctx->tachs[i];
 396                 u32 ppr = 2;
 397
 398                 tach->irq = platform_get_irq(pdev, i);
 399                 if (tach->irq == -EPROBE_DEFER)
 400                         return tach->irq;
 401                 if (tach->irq > 0) {
 402                         ret = devm_request_irq(dev, tach->irq, pulse_handler, 0,
 403                                                pdev->name, tach);
 404                         if (ret) {
 405                                 dev_err(dev,
 406                                         "Failed to request interrupt: %d\n",
 407                                         ret);
 408                                 return ret;
 409                         }
 410                 }
 411
 412                 of_property_read_u32_index(dev->of_node,
 413                                            "pulses-per-revolution",
 414                                            i,
 415                                            &ppr);
 416                 tach->pulses_per_revolution = ppr;
 417                 if (!tach->pulses_per_revolution) {
 418                         dev_err(dev, "pulses-per-revolution can't be zero.\n");
 419                         return -EINVAL;
 420                 }
 421
 422                 fan_channel_config[i] = HWMON_F_INPUT;
 423
 424                 dev_dbg(dev, "tach%d: irq=%d, pulses_per_revolution=%d\n",
 425                         i, tach->irq, tach->pulses_per_revolution);
 426         }
 427
 428         if (ctx->tach_count > 0) {
 429                 ctx->sample_start = ktime_get();
 430                 mod_timer(&ctx->rpm_timer, jiffies + HZ);
 431
 432                 channels[1] = &ctx->fan_channel;
 433         }
 434
 435         ctx->info.ops = &pwm_fan_hwmon_ops;
 436         ctx->info.info = channels;
 437
 438         hwmon = devm_hwmon_device_register_with_info(dev, "pwmfan",
 439                                                      ctx, &ctx->info, NULL);
 440         if (IS_ERR(hwmon)) {
 441                 dev_err(dev, "Failed to register hwmon device\n");
 442                 return PTR_ERR(hwmon);
 443         }
 444
 445         ret = pwm_fan_of_get_cooling_data(dev, ctx);
 446         if (ret)
 447                 return ret;
 448
 449         ctx->pwm_fan_state = ctx->pwm_fan_max_state;
 450         if (IS_ENABLED(CONFIG_THERMAL)) {
 451                 cdev = devm_thermal_of_cooling_device_register(dev,
 452                         dev->of_node, "pwm-fan", ctx, &pwm_fan_cooling_ops);
 453                 if (IS_ERR(cdev)) {
 454                         ret = PTR_ERR(cdev);
 455                         dev_err(dev,
 456                                 "Failed to register pwm-fan as cooling device: %d\n",
 457                                 ret);
 458                         return ret;
 459                 }
 460                 ctx->cdev = cdev;
 461         }
 462
 463         return 0;
 464 }
 465
 466 static int pwm_fan_disable(struct device *dev)
 467 {
 468         struct pwm_fan_ctx *ctx = dev_get_drvdata(dev);
 469         int ret;
 470
 471         if (ctx->pwm_value) {
 472                 /* keep ctx->pwm_state unmodified for pwm_fan_resume() */
 473                 struct pwm_state state = ctx->pwm_state;
 474
 475                 state.duty_cycle = 0;
 476                 state.enabled = false;
 477                 ret = pwm_apply_state(ctx->pwm, &state);
 478                 if (ret < 0)
 479                         return ret;
 480         }
 481
 482         if (ctx->reg_en) {
 483                 ret = regulator_disable(ctx->reg_en);
 484                 if (ret) {
 485                         dev_err(dev, "Failed to disable fan supply: %d\n", ret);
 486                         return ret;
 487                 }
 488         }
 489
 490         return 0;
 491 }
 492
 493 static void pwm_fan_shutdown(struct platform_device *pdev)
 494 {
 495         pwm_fan_disable(&pdev->dev);
 496 }
 497
 498 #ifdef CONFIG_PM_SLEEP
 499 static int pwm_fan_suspend(struct device *dev)
 500 {
 501         return pwm_fan_disable(dev);
 502 }
 503
 504 static int pwm_fan_resume(struct device *dev)
 505 {
 506         struct pwm_fan_ctx *ctx = dev_get_drvdata(dev);
 507         int ret;
 508
 509         if (ctx->reg_en) {
 510                 ret = regulator_enable(ctx->reg_en);
 511                 if (ret) {
 512                         dev_err(dev, "Failed to enable fan supply: %d\n", ret);
 513                         return ret;
 514                 }
 515         }
 516
 517         if (ctx->pwm_value == 0)
 518                 return 0;
 519
 520         return pwm_apply_state(ctx->pwm, &ctx->pwm_state);
 521 }
 522 #endif
 523
 524 static SIMPLE_DEV_PM_OPS(pwm_fan_pm, pwm_fan_suspend, pwm_fan_resume);
 525
 526 static const struct of_device_id of_pwm_fan_match[] = {
 527         { .compatible = "pwm-fan", },
 528         {},
 529 };
 530 MODULE_DEVICE_TABLE(of, of_pwm_fan_match);
 531
 532 static struct platform_driver pwm_fan_driver = {
 533         .probe          = pwm_fan_probe,
 534         .shutdown       = pwm_fan_shutdown,
 535         .driver = {
 536                 .name           = "pwm-fan",
 537                 .pm             = &pwm_fan_pm,
 538                 .of_match_table = of_pwm_fan_match,
 539         },
 540 };
 541
 542 module_platform_driver(pwm_fan_driver);
 543
 544 MODULE_AUTHOR("Kamil Debski <k.debski@samsung.com>");
 545 MODULE_ALIAS("platform:pwm-fan");
 546 MODULE_DESCRIPTION("PWM FAN driver");
 547 MODULE_LICENSE("GPL");