1/*
2 * Copyright (c) 2007 Ben Dooks
3 * Copyright (c) 2008 Simtec Electronics
4 *     Ben Dooks <ben@simtec.co.uk>, <ben-linux@fluff.org>
5 * Copyright (c) 2013 Tomasz Figa <tomasz.figa@gmail.com>
6 *
7 * PWM driver for Samsung SoCs
8 *
9 * This program is free software; you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation; either version 2 of the License.
12 */
13
14#include <linux/bitops.h>
15#include <linux/clk.h>
16#include <linux/export.h>
17#include <linux/err.h>
18#include <linux/io.h>
19#include <linux/kernel.h>
20#include <linux/module.h>
21#include <linux/of.h>
22#include <linux/platform_device.h>
23#include <linux/pwm.h>
24#include <linux/slab.h>
25#include <linux/spinlock.h>
26#include <linux/time.h>
27
28/* For struct samsung_timer_variant and samsung_pwm_lock. */
29#include <clocksource/samsung_pwm.h>
30
31#define REG_TCFG0			0x00
32#define REG_TCFG1			0x04
33#define REG_TCON			0x08
34
35#define REG_TCNTB(chan)			(0x0c + ((chan) * 0xc))
36#define REG_TCMPB(chan)			(0x10 + ((chan) * 0xc))
37
38#define TCFG0_PRESCALER_MASK		0xff
39#define TCFG0_PRESCALER1_SHIFT		8
40
41#define TCFG1_MUX_MASK			0xf
42#define TCFG1_SHIFT(chan)		(4 * (chan))
43
44/*
45 * Each channel occupies 4 bits in TCON register, but there is a gap of 4
46 * bits (one channel) after channel 0, so channels have different numbering
47 * when accessing TCON register. See to_tcon_channel() function.
48 *
49 * In addition, the location of autoreload bit for channel 4 (TCON channel 5)
50 * in its set of bits is 2 as opposed to 3 for other channels.
51 */
52#define TCON_START(chan)		BIT(4 * (chan) + 0)
53#define TCON_MANUALUPDATE(chan)		BIT(4 * (chan) + 1)
54#define TCON_INVERT(chan)		BIT(4 * (chan) + 2)
55#define _TCON_AUTORELOAD(chan)		BIT(4 * (chan) + 3)
56#define _TCON_AUTORELOAD4(chan)		BIT(4 * (chan) + 2)
57#define TCON_AUTORELOAD(chan)		\
58	((chan < 5) ? _TCON_AUTORELOAD(chan) : _TCON_AUTORELOAD4(chan))
59
60/**
61 * struct samsung_pwm_channel - private data of PWM channel
62 * @period_ns:	current period in nanoseconds programmed to the hardware
63 * @duty_ns:	current duty time in nanoseconds programmed to the hardware
64 * @tin_ns:	time of one timer tick in nanoseconds with current timer rate
65 */
66struct samsung_pwm_channel {
67	u32 period_ns;
68	u32 duty_ns;
69	u32 tin_ns;
70};
71
72/**
73 * struct samsung_pwm_chip - private data of PWM chip
74 * @chip:		generic PWM chip
75 * @variant:		local copy of hardware variant data
76 * @inverter_mask:	inverter status for all channels - one bit per channel
77 * @base:		base address of mapped PWM registers
78 * @base_clk:		base clock used to drive the timers
79 * @tclk0:		external clock 0 (can be ERR_PTR if not present)
80 * @tclk1:		external clock 1 (can be ERR_PTR if not present)
81 */
82struct samsung_pwm_chip {
83	struct pwm_chip chip;
84	struct samsung_pwm_variant variant;
85	u8 inverter_mask;
86
87	void __iomem *base;
88	struct clk *base_clk;
89	struct clk *tclk0;
90	struct clk *tclk1;
91};
92
93#ifndef CONFIG_CLKSRC_SAMSUNG_PWM
94/*
95 * PWM block is shared between pwm-samsung and samsung_pwm_timer drivers
96 * and some registers need access synchronization. If both drivers are
97 * compiled in, the spinlock is defined in the clocksource driver,
98 * otherwise following definition is used.
99 *
100 * Currently we do not need any more complex synchronization method
101 * because all the supported SoCs contain only one instance of the PWM
102 * IP. Should this change, both drivers will need to be modified to
103 * properly synchronize accesses to particular instances.
104 */
105static DEFINE_SPINLOCK(samsung_pwm_lock);
106#endif
107
108static inline
109struct samsung_pwm_chip *to_samsung_pwm_chip(struct pwm_chip *chip)
110{
111	return container_of(chip, struct samsung_pwm_chip, chip);
112}
113
114static inline unsigned int to_tcon_channel(unsigned int channel)
115{
116	/* TCON register has a gap of 4 bits (1 channel) after channel 0 */
117	return (channel == 0) ? 0 : (channel + 1);
118}
119
120static void pwm_samsung_set_divisor(struct samsung_pwm_chip *pwm,
121				    unsigned int channel, u8 divisor)
122{
123	u8 shift = TCFG1_SHIFT(channel);
124	unsigned long flags;
125	u32 reg;
126	u8 bits;
127
128	bits = (fls(divisor) - 1) - pwm->variant.div_base;
129
130	spin_lock_irqsave(&samsung_pwm_lock, flags);
131
132	reg = readl(pwm->base + REG_TCFG1);
133	reg &= ~(TCFG1_MUX_MASK << shift);
134	reg |= bits << shift;
135	writel(reg, pwm->base + REG_TCFG1);
136
137	spin_unlock_irqrestore(&samsung_pwm_lock, flags);
138}
139
140static int pwm_samsung_is_tdiv(struct samsung_pwm_chip *chip, unsigned int chan)
141{
142	struct samsung_pwm_variant *variant = &chip->variant;
143	u32 reg;
144
145	reg = readl(chip->base + REG_TCFG1);
146	reg >>= TCFG1_SHIFT(chan);
147	reg &= TCFG1_MUX_MASK;
148
149	return (BIT(reg) & variant->tclk_mask) == 0;
150}
151
152static unsigned long pwm_samsung_get_tin_rate(struct samsung_pwm_chip *chip,
153					      unsigned int chan)
154{
155	unsigned long rate;
156	u32 reg;
157
158	rate = clk_get_rate(chip->base_clk);
159
160	reg = readl(chip->base + REG_TCFG0);
161	if (chan >= 2)
162		reg >>= TCFG0_PRESCALER1_SHIFT;
163	reg &= TCFG0_PRESCALER_MASK;
164
165	return rate / (reg + 1);
166}
167
168static unsigned long pwm_samsung_calc_tin(struct samsung_pwm_chip *chip,
169					  unsigned int chan, unsigned long freq)
170{
171	struct samsung_pwm_variant *variant = &chip->variant;
172	unsigned long rate;
173	struct clk *clk;
174	u8 div;
175
176	if (!pwm_samsung_is_tdiv(chip, chan)) {
177		clk = (chan < 2) ? chip->tclk0 : chip->tclk1;
178		if (!IS_ERR(clk)) {
179			rate = clk_get_rate(clk);
180			if (rate)
181				return rate;
182		}
183
184		dev_warn(chip->chip.dev,
185			"tclk of PWM %d is inoperational, using tdiv\n", chan);
186	}
187
188	rate = pwm_samsung_get_tin_rate(chip, chan);
189	dev_dbg(chip->chip.dev, "tin parent at %lu\n", rate);
190
191	/*
192	 * Compare minimum PWM frequency that can be achieved with possible
193	 * divider settings and choose the lowest divisor that can generate
194	 * frequencies lower than requested.
195	 */
196	for (div = variant->div_base; div < 4; ++div)
197		if ((rate >> (variant->bits + div)) < freq)
198			break;
199
200	pwm_samsung_set_divisor(chip, chan, BIT(div));
201
202	return rate >> div;
203}
204
205static int pwm_samsung_request(struct pwm_chip *chip, struct pwm_device *pwm)
206{
207	struct samsung_pwm_chip *our_chip = to_samsung_pwm_chip(chip);
208	struct samsung_pwm_channel *our_chan;
209
210	if (!(our_chip->variant.output_mask & BIT(pwm->hwpwm))) {
211		dev_warn(chip->dev,
212			"tried to request PWM channel %d without output\n",
213			pwm->hwpwm);
214		return -EINVAL;
215	}
216
217	our_chan = devm_kzalloc(chip->dev, sizeof(*our_chan), GFP_KERNEL);
218	if (!our_chan)
219		return -ENOMEM;
220
221	pwm_set_chip_data(pwm, our_chan);
222
223	return 0;
224}
225
226static void pwm_samsung_free(struct pwm_chip *chip, struct pwm_device *pwm)
227{
228	devm_kfree(chip->dev, pwm_get_chip_data(pwm));
229	pwm_set_chip_data(pwm, NULL);
230}
231
232static int pwm_samsung_enable(struct pwm_chip *chip, struct pwm_device *pwm)
233{
234	struct samsung_pwm_chip *our_chip = to_samsung_pwm_chip(chip);
235	unsigned int tcon_chan = to_tcon_channel(pwm->hwpwm);
236	unsigned long flags;
237	u32 tcon;
238
239	spin_lock_irqsave(&samsung_pwm_lock, flags);
240
241	tcon = readl(our_chip->base + REG_TCON);
242
243	tcon &= ~TCON_START(tcon_chan);
244	tcon |= TCON_MANUALUPDATE(tcon_chan);
245	writel(tcon, our_chip->base + REG_TCON);
246
247	tcon &= ~TCON_MANUALUPDATE(tcon_chan);
248	tcon |= TCON_START(tcon_chan) | TCON_AUTORELOAD(tcon_chan);
249	writel(tcon, our_chip->base + REG_TCON);
250
251	spin_unlock_irqrestore(&samsung_pwm_lock, flags);
252
253	return 0;
254}
255
256static void pwm_samsung_disable(struct pwm_chip *chip, struct pwm_device *pwm)
257{
258	struct samsung_pwm_chip *our_chip = to_samsung_pwm_chip(chip);
259	unsigned int tcon_chan = to_tcon_channel(pwm->hwpwm);
260	unsigned long flags;
261	u32 tcon;
262
263	spin_lock_irqsave(&samsung_pwm_lock, flags);
264
265	tcon = readl(our_chip->base + REG_TCON);
266	tcon &= ~TCON_AUTORELOAD(tcon_chan);
267	writel(tcon, our_chip->base + REG_TCON);
268
269	spin_unlock_irqrestore(&samsung_pwm_lock, flags);
270}
271
272static void pwm_samsung_manual_update(struct samsung_pwm_chip *chip,
273				      struct pwm_device *pwm)
274{
275	unsigned int tcon_chan = to_tcon_channel(pwm->hwpwm);
276	u32 tcon;
277	unsigned long flags;
278
279	spin_lock_irqsave(&samsung_pwm_lock, flags);
280
281	tcon = readl(chip->base + REG_TCON);
282	tcon |= TCON_MANUALUPDATE(tcon_chan);
283	writel(tcon, chip->base + REG_TCON);
284
285	tcon &= ~TCON_MANUALUPDATE(tcon_chan);
286	writel(tcon, chip->base + REG_TCON);
287
288	spin_unlock_irqrestore(&samsung_pwm_lock, flags);
289}
290
291static int pwm_samsung_config(struct pwm_chip *chip, struct pwm_device *pwm,
292			      int duty_ns, int period_ns)
293{
294	struct samsung_pwm_chip *our_chip = to_samsung_pwm_chip(chip);
295	struct samsung_pwm_channel *chan = pwm_get_chip_data(pwm);
296	u32 tin_ns = chan->tin_ns, tcnt, tcmp, oldtcmp;
297
298	/*
299	 * We currently avoid using 64bit arithmetic by using the
300	 * fact that anything faster than 1Hz is easily representable
301	 * by 32bits.
302	 */
303	if (period_ns > NSEC_PER_SEC)
304		return -ERANGE;
305
306	if (period_ns == chan->period_ns && duty_ns == chan->duty_ns)
307		return 0;
308
309	tcnt = readl(our_chip->base + REG_TCNTB(pwm->hwpwm));
310	oldtcmp = readl(our_chip->base + REG_TCMPB(pwm->hwpwm));
311
312	/* We need tick count for calculation, not last tick. */
313	++tcnt;
314
315	/* Check to see if we are changing the clock rate of the PWM. */
316	if (chan->period_ns != period_ns) {
317		unsigned long tin_rate;
318		u32 period;
319
320		period = NSEC_PER_SEC / period_ns;
321
322		dev_dbg(our_chip->chip.dev, "duty_ns=%d, period_ns=%d (%u)\n",
323						duty_ns, period_ns, period);
324
325		tin_rate = pwm_samsung_calc_tin(our_chip, pwm->hwpwm, period);
326
327		dev_dbg(our_chip->chip.dev, "tin_rate=%lu\n", tin_rate);
328
329		tin_ns = NSEC_PER_SEC / tin_rate;
330		tcnt = period_ns / tin_ns;
331	}
332
333	/* Period is too short. */
334	if (tcnt <= 1)
335		return -ERANGE;
336
337	/* Note that counters count down. */
338	tcmp = duty_ns / tin_ns;
339
340	/* 0% duty is not available */
341	if (!tcmp)
342		++tcmp;
343
344	tcmp = tcnt - tcmp;
345
346	/* Decrement to get tick numbers, instead of tick counts. */
347	--tcnt;
348	/* -1UL will give 100% duty. */
349	--tcmp;
350
351	dev_dbg(our_chip->chip.dev,
352				"tin_ns=%u, tcmp=%u/%u\n", tin_ns, tcmp, tcnt);
353
354	/* Update PWM registers. */
355	writel(tcnt, our_chip->base + REG_TCNTB(pwm->hwpwm));
356	writel(tcmp, our_chip->base + REG_TCMPB(pwm->hwpwm));
357
358	/*
359	 * In case the PWM is currently at 100% duty cycle, force a manual
360	 * update to prevent the signal staying high if the PWM is disabled
361	 * shortly afer this update (before it autoreloaded the new values).
362	 */
363	if (oldtcmp == (u32) -1) {
364		dev_dbg(our_chip->chip.dev, "Forcing manual update");
365		pwm_samsung_manual_update(our_chip, pwm);
366	}
367
368	chan->period_ns = period_ns;
369	chan->tin_ns = tin_ns;
370	chan->duty_ns = duty_ns;
371
372	return 0;
373}
374
375static void pwm_samsung_set_invert(struct samsung_pwm_chip *chip,
376				   unsigned int channel, bool invert)
377{
378	unsigned int tcon_chan = to_tcon_channel(channel);
379	unsigned long flags;
380	u32 tcon;
381
382	spin_lock_irqsave(&samsung_pwm_lock, flags);
383
384	tcon = readl(chip->base + REG_TCON);
385
386	if (invert) {
387		chip->inverter_mask |= BIT(channel);
388		tcon |= TCON_INVERT(tcon_chan);
389	} else {
390		chip->inverter_mask &= ~BIT(channel);
391		tcon &= ~TCON_INVERT(tcon_chan);
392	}
393
394	writel(tcon, chip->base + REG_TCON);
395
396	spin_unlock_irqrestore(&samsung_pwm_lock, flags);
397}
398
399static int pwm_samsung_set_polarity(struct pwm_chip *chip,
400				    struct pwm_device *pwm,
401				    enum pwm_polarity polarity)
402{
403	struct samsung_pwm_chip *our_chip = to_samsung_pwm_chip(chip);
404	bool invert = (polarity == PWM_POLARITY_NORMAL);
405
406	/* Inverted means normal in the hardware. */
407	pwm_samsung_set_invert(our_chip, pwm->hwpwm, invert);
408
409	return 0;
410}
411
412static const struct pwm_ops pwm_samsung_ops = {
413	.request	= pwm_samsung_request,
414	.free		= pwm_samsung_free,
415	.enable		= pwm_samsung_enable,
416	.disable	= pwm_samsung_disable,
417	.config		= pwm_samsung_config,
418	.set_polarity	= pwm_samsung_set_polarity,
419	.owner		= THIS_MODULE,
420};
421
422#ifdef CONFIG_OF
423static const struct samsung_pwm_variant s3c24xx_variant = {
424	.bits		= 16,
425	.div_base	= 1,
426	.has_tint_cstat	= false,
427	.tclk_mask	= BIT(4),
428};
429
430static const struct samsung_pwm_variant s3c64xx_variant = {
431	.bits		= 32,
432	.div_base	= 0,
433	.has_tint_cstat	= true,
434	.tclk_mask	= BIT(7) | BIT(6) | BIT(5),
435};
436
437static const struct samsung_pwm_variant s5p64x0_variant = {
438	.bits		= 32,
439	.div_base	= 0,
440	.has_tint_cstat	= true,
441	.tclk_mask	= 0,
442};
443
444static const struct samsung_pwm_variant s5pc100_variant = {
445	.bits		= 32,
446	.div_base	= 0,
447	.has_tint_cstat	= true,
448	.tclk_mask	= BIT(5),
449};
450
451static const struct of_device_id samsung_pwm_matches[] = {
452	{ .compatible = "samsung,s3c2410-pwm", .data = &s3c24xx_variant },
453	{ .compatible = "samsung,s3c6400-pwm", .data = &s3c64xx_variant },
454	{ .compatible = "samsung,s5p6440-pwm", .data = &s5p64x0_variant },
455	{ .compatible = "samsung,s5pc100-pwm", .data = &s5pc100_variant },
456	{ .compatible = "samsung,exynos4210-pwm", .data = &s5p64x0_variant },
457	{},
458};
459
460static int pwm_samsung_parse_dt(struct samsung_pwm_chip *chip)
461{
462	struct device_node *np = chip->chip.dev->of_node;
463	const struct of_device_id *match;
464	struct property *prop;
465	const __be32 *cur;
466	u32 val;
467
468	match = of_match_node(samsung_pwm_matches, np);
469	if (!match)
470		return -ENODEV;
471
472	memcpy(&chip->variant, match->data, sizeof(chip->variant));
473
474	of_property_for_each_u32(np, "samsung,pwm-outputs", prop, cur, val) {
475		if (val >= SAMSUNG_PWM_NUM) {
476			dev_err(chip->chip.dev,
477				"%s: invalid channel index in samsung,pwm-outputs property\n",
478								__func__);
479			continue;
480		}
481		chip->variant.output_mask |= BIT(val);
482	}
483
484	return 0;
485}
486#else
487static int pwm_samsung_parse_dt(struct samsung_pwm_chip *chip)
488{
489	return -ENODEV;
490}
491#endif
492
493static int pwm_samsung_probe(struct platform_device *pdev)
494{
495	struct device *dev = &pdev->dev;
496	struct samsung_pwm_chip *chip;
497	struct resource *res;
498	unsigned int chan;
499	int ret;
500
501	chip = devm_kzalloc(&pdev->dev, sizeof(*chip), GFP_KERNEL);
502	if (chip == NULL)
503		return -ENOMEM;
504
505	chip->chip.dev = &pdev->dev;
506	chip->chip.ops = &pwm_samsung_ops;
507	chip->chip.base = -1;
508	chip->chip.npwm = SAMSUNG_PWM_NUM;
509	chip->inverter_mask = BIT(SAMSUNG_PWM_NUM) - 1;
510
511	if (IS_ENABLED(CONFIG_OF) && pdev->dev.of_node) {
512		ret = pwm_samsung_parse_dt(chip);
513		if (ret)
514			return ret;
515
516		chip->chip.of_xlate = of_pwm_xlate_with_flags;
517		chip->chip.of_pwm_n_cells = 3;
518	} else {
519		if (!pdev->dev.platform_data) {
520			dev_err(&pdev->dev, "no platform data specified\n");
521			return -EINVAL;
522		}
523
524		memcpy(&chip->variant, pdev->dev.platform_data,
525							sizeof(chip->variant));
526	}
527
528	res = platform_get_resource(pdev, IORESOURCE_MEM, 0);
529	chip->base = devm_ioremap_resource(&pdev->dev, res);
530	if (IS_ERR(chip->base))
531		return PTR_ERR(chip->base);
532
533	chip->base_clk = devm_clk_get(&pdev->dev, "timers");
534	if (IS_ERR(chip->base_clk)) {
535		dev_err(dev, "failed to get timer base clk\n");
536		return PTR_ERR(chip->base_clk);
537	}
538
539	ret = clk_prepare_enable(chip->base_clk);
540	if (ret < 0) {
541		dev_err(dev, "failed to enable base clock\n");
542		return ret;
543	}
544
545	for (chan = 0; chan < SAMSUNG_PWM_NUM; ++chan)
546		if (chip->variant.output_mask & BIT(chan))
547			pwm_samsung_set_invert(chip, chan, true);
548
549	/* Following clocks are optional. */
550	chip->tclk0 = devm_clk_get(&pdev->dev, "pwm-tclk0");
551	chip->tclk1 = devm_clk_get(&pdev->dev, "pwm-tclk1");
552
553	platform_set_drvdata(pdev, chip);
554
555	ret = pwmchip_add(&chip->chip);
556	if (ret < 0) {
557		dev_err(dev, "failed to register PWM chip\n");
558		clk_disable_unprepare(chip->base_clk);
559		return ret;
560	}
561
562	dev_dbg(dev, "base_clk at %lu, tclk0 at %lu, tclk1 at %lu\n",
563		clk_get_rate(chip->base_clk),
564		!IS_ERR(chip->tclk0) ? clk_get_rate(chip->tclk0) : 0,
565		!IS_ERR(chip->tclk1) ? clk_get_rate(chip->tclk1) : 0);
566
567	return 0;
568}
569
570static int pwm_samsung_remove(struct platform_device *pdev)
571{
572	struct samsung_pwm_chip *chip = platform_get_drvdata(pdev);
573	int ret;
574
575	ret = pwmchip_remove(&chip->chip);
576	if (ret < 0)
577		return ret;
578
579	clk_disable_unprepare(chip->base_clk);
580
581	return 0;
582}
583
584#ifdef CONFIG_PM_SLEEP
585static int pwm_samsung_suspend(struct device *dev)
586{
587	struct samsung_pwm_chip *chip = dev_get_drvdata(dev);
588	unsigned int i;
589
590	/*
591	 * No one preserves these values during suspend so reset them.
592	 * Otherwise driver leaves PWM unconfigured if same values are
593	 * passed to pwm_config() next time.
594	 */
595	for (i = 0; i < SAMSUNG_PWM_NUM; ++i) {
596		struct pwm_device *pwm = &chip->chip.pwms[i];
597		struct samsung_pwm_channel *chan = pwm_get_chip_data(pwm);
598
599		if (!chan)
600			continue;
601
602		chan->period_ns = 0;
603		chan->duty_ns = 0;
604	}
605
606	return 0;
607}
608
609static int pwm_samsung_resume(struct device *dev)
610{
611	struct samsung_pwm_chip *chip = dev_get_drvdata(dev);
612	unsigned int chan;
613
614	/*
615	 * Inverter setting must be preserved across suspend/resume
616	 * as nobody really seems to configure it more than once.
617	 */
618	for (chan = 0; chan < SAMSUNG_PWM_NUM; ++chan) {
619		if (chip->variant.output_mask & BIT(chan))
620			pwm_samsung_set_invert(chip, chan,
621					chip->inverter_mask & BIT(chan));
622	}
623
624	return 0;
625}
626#endif
627
628static SIMPLE_DEV_PM_OPS(pwm_samsung_pm_ops, pwm_samsung_suspend,
629			 pwm_samsung_resume);
630
631static struct platform_driver pwm_samsung_driver = {
632	.driver		= {
633		.name	= "samsung-pwm",
634		.pm	= &pwm_samsung_pm_ops,
635		.of_match_table = of_match_ptr(samsung_pwm_matches),
636	},
637	.probe		= pwm_samsung_probe,
638	.remove		= pwm_samsung_remove,
639};
640module_platform_driver(pwm_samsung_driver);
641
642MODULE_LICENSE("GPL");
643MODULE_AUTHOR("Tomasz Figa <tomasz.figa@gmail.com>");
644MODULE_ALIAS("platform:samsung-pwm");
645