1 /* 2 * R-Mobile TPU PWM driver 3 * 4 * Copyright (C) 2012 Renesas Solutions Corp. 5 * 6 * This program is free software; you can redistribute it and/or modify 7 * it under the terms of the GNU General Public License as published by 8 * the Free Software Foundation; either version 2 of the License 9 * 10 * This program is distributed in the hope that it will be useful, 11 * but WITHOUT ANY WARRANTY; without even the implied warranty of 12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 13 * GNU General Public License for more details. 14 */ 15 16 #include <linux/clk.h> 17 #include <linux/err.h> 18 #include <linux/io.h> 19 #include <linux/init.h> 20 #include <linux/ioport.h> 21 #include <linux/module.h> 22 #include <linux/mutex.h> 23 #include <linux/of.h> 24 #include <linux/platform_data/pwm-renesas-tpu.h> 25 #include <linux/platform_device.h> 26 #include <linux/pm_runtime.h> 27 #include <linux/pwm.h> 28 #include <linux/slab.h> 29 #include <linux/spinlock.h> 30 31 #define TPU_TSTR 0x00 /* Timer start register (shared) */ 32 33 #define TPU_TCRn 0x00 /* Timer control register */ 34 #define TPU_TCR_CCLR_NONE (0 << 5) 35 #define TPU_TCR_CCLR_TGRA (1 << 5) 36 #define TPU_TCR_CCLR_TGRB (2 << 5) 37 #define TPU_TCR_CCLR_TGRC (5 << 5) 38 #define TPU_TCR_CCLR_TGRD (6 << 5) 39 #define TPU_TCR_CKEG_RISING (0 << 3) 40 #define TPU_TCR_CKEG_FALLING (1 << 3) 41 #define TPU_TCR_CKEG_BOTH (2 << 3) 42 #define TPU_TMDRn 0x04 /* Timer mode register */ 43 #define TPU_TMDR_BFWT (1 << 6) 44 #define TPU_TMDR_BFB (1 << 5) 45 #define TPU_TMDR_BFA (1 << 4) 46 #define TPU_TMDR_MD_NORMAL (0 << 0) 47 #define TPU_TMDR_MD_PWM (2 << 0) 48 #define TPU_TIORn 0x08 /* Timer I/O control register */ 49 #define TPU_TIOR_IOA_0 (0 << 0) 50 #define TPU_TIOR_IOA_0_CLR (1 << 0) 51 #define TPU_TIOR_IOA_0_SET (2 << 0) 52 #define TPU_TIOR_IOA_0_TOGGLE (3 << 0) 53 #define TPU_TIOR_IOA_1 (4 << 0) 54 #define TPU_TIOR_IOA_1_CLR (5 << 0) 55 #define TPU_TIOR_IOA_1_SET (6 << 0) 56 #define TPU_TIOR_IOA_1_TOGGLE (7 << 0) 57 #define TPU_TIERn 0x0c /* Timer interrupt enable register */ 58 #define TPU_TSRn 0x10 /* Timer status register */ 59 #define TPU_TCNTn 0x14 /* Timer counter */ 60 #define TPU_TGRAn 0x18 /* Timer general register A */ 61 #define TPU_TGRBn 0x1c /* Timer general register B */ 62 #define TPU_TGRCn 0x20 /* Timer general register C */ 63 #define TPU_TGRDn 0x24 /* Timer general register D */ 64 65 #define TPU_CHANNEL_OFFSET 0x10 66 #define TPU_CHANNEL_SIZE 0x40 67 68 enum tpu_pin_state { 69 TPU_PIN_INACTIVE, /* Pin is driven inactive */ 70 TPU_PIN_PWM, /* Pin is driven by PWM */ 71 TPU_PIN_ACTIVE, /* Pin is driven active */ 72 }; 73 74 struct tpu_device; 75 76 struct tpu_pwm_device { 77 bool timer_on; /* Whether the timer is running */ 78 79 struct tpu_device *tpu; 80 unsigned int channel; /* Channel number in the TPU */ 81 82 enum pwm_polarity polarity; 83 unsigned int prescaler; 84 u16 period; 85 u16 duty; 86 }; 87 88 struct tpu_device { 89 struct platform_device *pdev; 90 enum pwm_polarity polarities[TPU_CHANNEL_MAX]; 91 struct pwm_chip chip; 92 spinlock_t lock; 93 94 void __iomem *base; 95 struct clk *clk; 96 }; 97 98 #define to_tpu_device(c) container_of(c, struct tpu_device, chip) 99 100 static void tpu_pwm_write(struct tpu_pwm_device *pwm, int reg_nr, u16 value) 101 { 102 void __iomem *base = pwm->tpu->base + TPU_CHANNEL_OFFSET 103 + pwm->channel * TPU_CHANNEL_SIZE; 104 105 iowrite16(value, base + reg_nr); 106 } 107 108 static void tpu_pwm_set_pin(struct tpu_pwm_device *pwm, 109 enum tpu_pin_state state) 110 { 111 static const char * const states[] = { "inactive", "PWM", "active" }; 112 113 dev_dbg(&pwm->tpu->pdev->dev, "%u: configuring pin as %s\n", 114 pwm->channel, states[state]); 115 116 switch (state) { 117 case TPU_PIN_INACTIVE: 118 tpu_pwm_write(pwm, TPU_TIORn, 119 pwm->polarity == PWM_POLARITY_INVERSED ? 120 TPU_TIOR_IOA_1 : TPU_TIOR_IOA_0); 121 break; 122 case TPU_PIN_PWM: 123 tpu_pwm_write(pwm, TPU_TIORn, 124 pwm->polarity == PWM_POLARITY_INVERSED ? 125 TPU_TIOR_IOA_0_SET : TPU_TIOR_IOA_1_CLR); 126 break; 127 case TPU_PIN_ACTIVE: 128 tpu_pwm_write(pwm, TPU_TIORn, 129 pwm->polarity == PWM_POLARITY_INVERSED ? 130 TPU_TIOR_IOA_0 : TPU_TIOR_IOA_1); 131 break; 132 } 133 } 134 135 static void tpu_pwm_start_stop(struct tpu_pwm_device *pwm, int start) 136 { 137 unsigned long flags; 138 u16 value; 139 140 spin_lock_irqsave(&pwm->tpu->lock, flags); 141 value = ioread16(pwm->tpu->base + TPU_TSTR); 142 143 if (start) 144 value |= 1 << pwm->channel; 145 else 146 value &= ~(1 << pwm->channel); 147 148 iowrite16(value, pwm->tpu->base + TPU_TSTR); 149 spin_unlock_irqrestore(&pwm->tpu->lock, flags); 150 } 151 152 static int tpu_pwm_timer_start(struct tpu_pwm_device *pwm) 153 { 154 int ret; 155 156 if (!pwm->timer_on) { 157 /* Wake up device and enable clock. */ 158 pm_runtime_get_sync(&pwm->tpu->pdev->dev); 159 ret = clk_prepare_enable(pwm->tpu->clk); 160 if (ret) { 161 dev_err(&pwm->tpu->pdev->dev, "cannot enable clock\n"); 162 return ret; 163 } 164 pwm->timer_on = true; 165 } 166 167 /* 168 * Make sure the channel is stopped, as we need to reconfigure it 169 * completely. First drive the pin to the inactive state to avoid 170 * glitches. 171 */ 172 tpu_pwm_set_pin(pwm, TPU_PIN_INACTIVE); 173 tpu_pwm_start_stop(pwm, false); 174 175 /* 176 * - Clear TCNT on TGRB match 177 * - Count on rising edge 178 * - Set prescaler 179 * - Output 0 until TGRA, output 1 until TGRB (active low polarity) 180 * - Output 1 until TGRA, output 0 until TGRB (active high polarity 181 * - PWM mode 182 */ 183 tpu_pwm_write(pwm, TPU_TCRn, TPU_TCR_CCLR_TGRB | TPU_TCR_CKEG_RISING | 184 pwm->prescaler); 185 tpu_pwm_write(pwm, TPU_TMDRn, TPU_TMDR_MD_PWM); 186 tpu_pwm_set_pin(pwm, TPU_PIN_PWM); 187 tpu_pwm_write(pwm, TPU_TGRAn, pwm->duty); 188 tpu_pwm_write(pwm, TPU_TGRBn, pwm->period); 189 190 dev_dbg(&pwm->tpu->pdev->dev, "%u: TGRA 0x%04x TGRB 0x%04x\n", 191 pwm->channel, pwm->duty, pwm->period); 192 193 /* Start the channel. */ 194 tpu_pwm_start_stop(pwm, true); 195 196 return 0; 197 } 198 199 static void tpu_pwm_timer_stop(struct tpu_pwm_device *pwm) 200 { 201 if (!pwm->timer_on) 202 return; 203 204 /* Disable channel. */ 205 tpu_pwm_start_stop(pwm, false); 206 207 /* Stop clock and mark device as idle. */ 208 clk_disable_unprepare(pwm->tpu->clk); 209 pm_runtime_put(&pwm->tpu->pdev->dev); 210 211 pwm->timer_on = false; 212 } 213 214 /* ----------------------------------------------------------------------------- 215 * PWM API 216 */ 217 218 static int tpu_pwm_request(struct pwm_chip *chip, struct pwm_device *_pwm) 219 { 220 struct tpu_device *tpu = to_tpu_device(chip); 221 struct tpu_pwm_device *pwm; 222 223 if (_pwm->hwpwm >= TPU_CHANNEL_MAX) 224 return -EINVAL; 225 226 pwm = kzalloc(sizeof(*pwm), GFP_KERNEL); 227 if (pwm == NULL) 228 return -ENOMEM; 229 230 pwm->tpu = tpu; 231 pwm->channel = _pwm->hwpwm; 232 pwm->polarity = tpu->polarities[pwm->channel]; 233 pwm->prescaler = 0; 234 pwm->period = 0; 235 pwm->duty = 0; 236 237 pwm->timer_on = false; 238 239 pwm_set_chip_data(_pwm, pwm); 240 241 return 0; 242 } 243 244 static void tpu_pwm_free(struct pwm_chip *chip, struct pwm_device *_pwm) 245 { 246 struct tpu_pwm_device *pwm = pwm_get_chip_data(_pwm); 247 248 tpu_pwm_timer_stop(pwm); 249 kfree(pwm); 250 } 251 252 static int tpu_pwm_config(struct pwm_chip *chip, struct pwm_device *_pwm, 253 int duty_ns, int period_ns) 254 { 255 static const unsigned int prescalers[] = { 1, 4, 16, 64 }; 256 struct tpu_pwm_device *pwm = pwm_get_chip_data(_pwm); 257 struct tpu_device *tpu = to_tpu_device(chip); 258 unsigned int prescaler; 259 bool duty_only = false; 260 u32 clk_rate; 261 u32 period; 262 u32 duty; 263 int ret; 264 265 /* 266 * Pick a prescaler to avoid overflowing the counter. 267 * TODO: Pick the highest acceptable prescaler. 268 */ 269 clk_rate = clk_get_rate(tpu->clk); 270 271 for (prescaler = 0; prescaler < ARRAY_SIZE(prescalers); ++prescaler) { 272 period = clk_rate / prescalers[prescaler] 273 / (NSEC_PER_SEC / period_ns); 274 if (period <= 0xffff) 275 break; 276 } 277 278 if (prescaler == ARRAY_SIZE(prescalers) || period == 0) { 279 dev_err(&tpu->pdev->dev, "clock rate mismatch\n"); 280 return -ENOTSUPP; 281 } 282 283 if (duty_ns) { 284 duty = clk_rate / prescalers[prescaler] 285 / (NSEC_PER_SEC / duty_ns); 286 if (duty > period) 287 return -EINVAL; 288 } else { 289 duty = 0; 290 } 291 292 dev_dbg(&tpu->pdev->dev, 293 "rate %u, prescaler %u, period %u, duty %u\n", 294 clk_rate, prescalers[prescaler], period, duty); 295 296 if (pwm->prescaler == prescaler && pwm->period == period) 297 duty_only = true; 298 299 pwm->prescaler = prescaler; 300 pwm->period = period; 301 pwm->duty = duty; 302 303 /* If the channel is disabled we're done. */ 304 if (!test_bit(PWMF_ENABLED, &_pwm->flags)) 305 return 0; 306 307 if (duty_only && pwm->timer_on) { 308 /* 309 * If only the duty cycle changed and the timer is already 310 * running, there's no need to reconfigure it completely, Just 311 * modify the duty cycle. 312 */ 313 tpu_pwm_write(pwm, TPU_TGRAn, pwm->duty); 314 dev_dbg(&tpu->pdev->dev, "%u: TGRA 0x%04x\n", pwm->channel, 315 pwm->duty); 316 } else { 317 /* Otherwise perform a full reconfiguration. */ 318 ret = tpu_pwm_timer_start(pwm); 319 if (ret < 0) 320 return ret; 321 } 322 323 if (duty == 0 || duty == period) { 324 /* 325 * To avoid running the timer when not strictly required, handle 326 * 0% and 100% duty cycles as fixed levels and stop the timer. 327 */ 328 tpu_pwm_set_pin(pwm, duty ? TPU_PIN_ACTIVE : TPU_PIN_INACTIVE); 329 tpu_pwm_timer_stop(pwm); 330 } 331 332 return 0; 333 } 334 335 static int tpu_pwm_set_polarity(struct pwm_chip *chip, struct pwm_device *_pwm, 336 enum pwm_polarity polarity) 337 { 338 struct tpu_pwm_device *pwm = pwm_get_chip_data(_pwm); 339 340 pwm->polarity = polarity; 341 342 return 0; 343 } 344 345 static int tpu_pwm_enable(struct pwm_chip *chip, struct pwm_device *_pwm) 346 { 347 struct tpu_pwm_device *pwm = pwm_get_chip_data(_pwm); 348 int ret; 349 350 ret = tpu_pwm_timer_start(pwm); 351 if (ret < 0) 352 return ret; 353 354 /* 355 * To avoid running the timer when not strictly required, handle 0% and 356 * 100% duty cycles as fixed levels and stop the timer. 357 */ 358 if (pwm->duty == 0 || pwm->duty == pwm->period) { 359 tpu_pwm_set_pin(pwm, pwm->duty ? 360 TPU_PIN_ACTIVE : TPU_PIN_INACTIVE); 361 tpu_pwm_timer_stop(pwm); 362 } 363 364 return 0; 365 } 366 367 static void tpu_pwm_disable(struct pwm_chip *chip, struct pwm_device *_pwm) 368 { 369 struct tpu_pwm_device *pwm = pwm_get_chip_data(_pwm); 370 371 /* The timer must be running to modify the pin output configuration. */ 372 tpu_pwm_timer_start(pwm); 373 tpu_pwm_set_pin(pwm, TPU_PIN_INACTIVE); 374 tpu_pwm_timer_stop(pwm); 375 } 376 377 static const struct pwm_ops tpu_pwm_ops = { 378 .request = tpu_pwm_request, 379 .free = tpu_pwm_free, 380 .config = tpu_pwm_config, 381 .set_polarity = tpu_pwm_set_polarity, 382 .enable = tpu_pwm_enable, 383 .disable = tpu_pwm_disable, 384 .owner = THIS_MODULE, 385 }; 386 387 /* ----------------------------------------------------------------------------- 388 * Probe and remove 389 */ 390 391 static void tpu_parse_pdata(struct tpu_device *tpu) 392 { 393 struct tpu_pwm_platform_data *pdata = tpu->pdev->dev.platform_data; 394 unsigned int i; 395 396 for (i = 0; i < ARRAY_SIZE(tpu->polarities); ++i) 397 tpu->polarities[i] = pdata ? pdata->channels[i].polarity 398 : PWM_POLARITY_NORMAL; 399 } 400 401 static int tpu_probe(struct platform_device *pdev) 402 { 403 struct tpu_device *tpu; 404 struct resource *res; 405 int ret; 406 407 tpu = devm_kzalloc(&pdev->dev, sizeof(*tpu), GFP_KERNEL); 408 if (tpu == NULL) { 409 dev_err(&pdev->dev, "failed to allocate driver data\n"); 410 return -ENOMEM; 411 } 412 413 spin_lock_init(&tpu->lock); 414 tpu->pdev = pdev; 415 416 /* Initialize device configuration from platform data. */ 417 tpu_parse_pdata(tpu); 418 419 /* Map memory, get clock and pin control. */ 420 res = platform_get_resource(pdev, IORESOURCE_MEM, 0); 421 tpu->base = devm_ioremap_resource(&pdev->dev, res); 422 if (IS_ERR(tpu->base)) 423 return PTR_ERR(tpu->base); 424 425 tpu->clk = devm_clk_get(&pdev->dev, NULL); 426 if (IS_ERR(tpu->clk)) { 427 dev_err(&pdev->dev, "cannot get clock\n"); 428 return PTR_ERR(tpu->clk); 429 } 430 431 /* Initialize and register the device. */ 432 platform_set_drvdata(pdev, tpu); 433 434 tpu->chip.dev = &pdev->dev; 435 tpu->chip.ops = &tpu_pwm_ops; 436 tpu->chip.of_xlate = of_pwm_xlate_with_flags; 437 tpu->chip.of_pwm_n_cells = 3; 438 tpu->chip.base = -1; 439 tpu->chip.npwm = TPU_CHANNEL_MAX; 440 441 ret = pwmchip_add(&tpu->chip); 442 if (ret < 0) { 443 dev_err(&pdev->dev, "failed to register PWM chip\n"); 444 return ret; 445 } 446 447 dev_info(&pdev->dev, "TPU PWM %d registered\n", tpu->pdev->id); 448 449 pm_runtime_enable(&pdev->dev); 450 451 return 0; 452 } 453 454 static int tpu_remove(struct platform_device *pdev) 455 { 456 struct tpu_device *tpu = platform_get_drvdata(pdev); 457 int ret; 458 459 ret = pwmchip_remove(&tpu->chip); 460 if (ret) 461 return ret; 462 463 pm_runtime_disable(&pdev->dev); 464 465 return 0; 466 } 467 468 #ifdef CONFIG_OF 469 static const struct of_device_id tpu_of_table[] = { 470 { .compatible = "renesas,tpu-r8a73a4", }, 471 { .compatible = "renesas,tpu-r8a7740", }, 472 { .compatible = "renesas,tpu-r8a7790", }, 473 { .compatible = "renesas,tpu-sh7372", }, 474 { .compatible = "renesas,tpu", }, 475 { }, 476 }; 477 478 MODULE_DEVICE_TABLE(of, tpu_of_table); 479 #endif 480 481 static struct platform_driver tpu_driver = { 482 .probe = tpu_probe, 483 .remove = tpu_remove, 484 .driver = { 485 .name = "renesas-tpu-pwm", 486 .owner = THIS_MODULE, 487 .of_match_table = of_match_ptr(tpu_of_table), 488 } 489 }; 490 491 module_platform_driver(tpu_driver); 492 493 MODULE_AUTHOR("Laurent Pinchart <laurent.pinchart@ideasonboard.com>"); 494 MODULE_DESCRIPTION("Renesas TPU PWM Driver"); 495 MODULE_LICENSE("GPL v2"); 496 MODULE_ALIAS("platform:renesas-tpu-pwm"); 497