Linux Audio

Check our new training course

Loading...
Note: File does not exist in v3.5.6.
  1// SPDX-License-Identifier: GPL-2.0-only
  2/*
  3 * Copyright (C) Overkiz SAS 2012
  4 *
  5 * Author: Boris BREZILLON <b.brezillon@overkiz.com>
  6 */
  7
  8#include <linux/module.h>
  9#include <linux/init.h>
 10#include <linux/clocksource.h>
 11#include <linux/clockchips.h>
 12#include <linux/interrupt.h>
 13#include <linux/irq.h>
 14
 15#include <linux/clk.h>
 16#include <linux/err.h>
 17#include <linux/ioport.h>
 18#include <linux/io.h>
 19#include <linux/mfd/syscon.h>
 20#include <linux/platform_device.h>
 21#include <linux/pwm.h>
 22#include <linux/of.h>
 23#include <linux/regmap.h>
 24#include <linux/slab.h>
 25#include <soc/at91/atmel_tcb.h>
 26
 27#define NPWM	2
 28
 29#define ATMEL_TC_ACMR_MASK	(ATMEL_TC_ACPA | ATMEL_TC_ACPC |	\
 30				 ATMEL_TC_AEEVT | ATMEL_TC_ASWTRG)
 31
 32#define ATMEL_TC_BCMR_MASK	(ATMEL_TC_BCPB | ATMEL_TC_BCPC |	\
 33				 ATMEL_TC_BEEVT | ATMEL_TC_BSWTRG)
 34
 35struct atmel_tcb_pwm_device {
 36	unsigned div;			/* PWM clock divider */
 37	unsigned duty;			/* PWM duty expressed in clk cycles */
 38	unsigned period;		/* PWM period expressed in clk cycles */
 39};
 40
 41struct atmel_tcb_channel {
 42	u32 enabled;
 43	u32 cmr;
 44	u32 ra;
 45	u32 rb;
 46	u32 rc;
 47};
 48
 49struct atmel_tcb_pwm_chip {
 50	struct pwm_chip chip;
 51	spinlock_t lock;
 52	u8 channel;
 53	u8 width;
 54	struct regmap *regmap;
 55	struct clk *clk;
 56	struct clk *gclk;
 57	struct clk *slow_clk;
 58	struct atmel_tcb_pwm_device pwms[NPWM];
 59	struct atmel_tcb_channel bkup;
 60};
 61
 62static const u8 atmel_tcb_divisors[] = { 2, 8, 32, 128, 0, };
 63
 64static inline struct atmel_tcb_pwm_chip *to_tcb_chip(struct pwm_chip *chip)
 65{
 66	return container_of(chip, struct atmel_tcb_pwm_chip, chip);
 67}
 68
 69static int atmel_tcb_pwm_request(struct pwm_chip *chip,
 70				 struct pwm_device *pwm)
 71{
 72	struct atmel_tcb_pwm_chip *tcbpwmc = to_tcb_chip(chip);
 73	struct atmel_tcb_pwm_device *tcbpwm = &tcbpwmc->pwms[pwm->hwpwm];
 74	unsigned cmr;
 75	int ret;
 76
 77	ret = clk_prepare_enable(tcbpwmc->clk);
 78	if (ret)
 79		return ret;
 80
 81	tcbpwm->duty = 0;
 82	tcbpwm->period = 0;
 83	tcbpwm->div = 0;
 84
 85	spin_lock(&tcbpwmc->lock);
 86	regmap_read(tcbpwmc->regmap, ATMEL_TC_REG(tcbpwmc->channel, CMR), &cmr);
 87	/*
 88	 * Get init config from Timer Counter registers if
 89	 * Timer Counter is already configured as a PWM generator.
 90	 */
 91	if (cmr & ATMEL_TC_WAVE) {
 92		if (pwm->hwpwm == 0)
 93			regmap_read(tcbpwmc->regmap,
 94				    ATMEL_TC_REG(tcbpwmc->channel, RA),
 95				    &tcbpwm->duty);
 96		else
 97			regmap_read(tcbpwmc->regmap,
 98				    ATMEL_TC_REG(tcbpwmc->channel, RB),
 99				    &tcbpwm->duty);
100
101		tcbpwm->div = cmr & ATMEL_TC_TCCLKS;
102		regmap_read(tcbpwmc->regmap, ATMEL_TC_REG(tcbpwmc->channel, RC),
103			    &tcbpwm->period);
104		cmr &= (ATMEL_TC_TCCLKS | ATMEL_TC_ACMR_MASK |
105			ATMEL_TC_BCMR_MASK);
106	} else
107		cmr = 0;
108
109	cmr |= ATMEL_TC_WAVE | ATMEL_TC_WAVESEL_UP_AUTO | ATMEL_TC_EEVT_XC0;
110	regmap_write(tcbpwmc->regmap, ATMEL_TC_REG(tcbpwmc->channel, CMR), cmr);
111	spin_unlock(&tcbpwmc->lock);
112
113	return 0;
114}
115
116static void atmel_tcb_pwm_free(struct pwm_chip *chip, struct pwm_device *pwm)
117{
118	struct atmel_tcb_pwm_chip *tcbpwmc = to_tcb_chip(chip);
119
120	clk_disable_unprepare(tcbpwmc->clk);
121}
122
123static void atmel_tcb_pwm_disable(struct pwm_chip *chip, struct pwm_device *pwm,
124				  enum pwm_polarity polarity)
125{
126	struct atmel_tcb_pwm_chip *tcbpwmc = to_tcb_chip(chip);
127	struct atmel_tcb_pwm_device *tcbpwm = &tcbpwmc->pwms[pwm->hwpwm];
128	unsigned cmr;
129
130	/*
131	 * If duty is 0 the timer will be stopped and we have to
132	 * configure the output correctly on software trigger:
133	 *  - set output to high if PWM_POLARITY_INVERSED
134	 *  - set output to low if PWM_POLARITY_NORMAL
135	 *
136	 * This is why we're reverting polarity in this case.
137	 */
138	if (tcbpwm->duty == 0)
139		polarity = !polarity;
140
141	spin_lock(&tcbpwmc->lock);
142	regmap_read(tcbpwmc->regmap, ATMEL_TC_REG(tcbpwmc->channel, CMR), &cmr);
143
144	/* flush old setting and set the new one */
145	if (pwm->hwpwm == 0) {
146		cmr &= ~ATMEL_TC_ACMR_MASK;
147		if (polarity == PWM_POLARITY_INVERSED)
148			cmr |= ATMEL_TC_ASWTRG_CLEAR;
149		else
150			cmr |= ATMEL_TC_ASWTRG_SET;
151	} else {
152		cmr &= ~ATMEL_TC_BCMR_MASK;
153		if (polarity == PWM_POLARITY_INVERSED)
154			cmr |= ATMEL_TC_BSWTRG_CLEAR;
155		else
156			cmr |= ATMEL_TC_BSWTRG_SET;
157	}
158
159	regmap_write(tcbpwmc->regmap, ATMEL_TC_REG(tcbpwmc->channel, CMR), cmr);
160
161	/*
162	 * Use software trigger to apply the new setting.
163	 * If both PWM devices in this group are disabled we stop the clock.
164	 */
165	if (!(cmr & (ATMEL_TC_ACPC | ATMEL_TC_BCPC))) {
166		regmap_write(tcbpwmc->regmap,
167			     ATMEL_TC_REG(tcbpwmc->channel, CCR),
168			     ATMEL_TC_SWTRG | ATMEL_TC_CLKDIS);
169		tcbpwmc->bkup.enabled = 1;
170	} else {
171		regmap_write(tcbpwmc->regmap,
172			     ATMEL_TC_REG(tcbpwmc->channel, CCR),
173			     ATMEL_TC_SWTRG);
174		tcbpwmc->bkup.enabled = 0;
175	}
176
177	spin_unlock(&tcbpwmc->lock);
178}
179
180static int atmel_tcb_pwm_enable(struct pwm_chip *chip, struct pwm_device *pwm,
181				enum pwm_polarity polarity)
182{
183	struct atmel_tcb_pwm_chip *tcbpwmc = to_tcb_chip(chip);
184	struct atmel_tcb_pwm_device *tcbpwm = &tcbpwmc->pwms[pwm->hwpwm];
185	u32 cmr;
186
187	/*
188	 * If duty is 0 the timer will be stopped and we have to
189	 * configure the output correctly on software trigger:
190	 *  - set output to high if PWM_POLARITY_INVERSED
191	 *  - set output to low if PWM_POLARITY_NORMAL
192	 *
193	 * This is why we're reverting polarity in this case.
194	 */
195	if (tcbpwm->duty == 0)
196		polarity = !polarity;
197
198	spin_lock(&tcbpwmc->lock);
199	regmap_read(tcbpwmc->regmap, ATMEL_TC_REG(tcbpwmc->channel, CMR), &cmr);
200
201	/* flush old setting and set the new one */
202	cmr &= ~ATMEL_TC_TCCLKS;
203
204	if (pwm->hwpwm == 0) {
205		cmr &= ~ATMEL_TC_ACMR_MASK;
206
207		/* Set CMR flags according to given polarity */
208		if (polarity == PWM_POLARITY_INVERSED)
209			cmr |= ATMEL_TC_ASWTRG_CLEAR;
210		else
211			cmr |= ATMEL_TC_ASWTRG_SET;
212	} else {
213		cmr &= ~ATMEL_TC_BCMR_MASK;
214		if (polarity == PWM_POLARITY_INVERSED)
215			cmr |= ATMEL_TC_BSWTRG_CLEAR;
216		else
217			cmr |= ATMEL_TC_BSWTRG_SET;
218	}
219
220	/*
221	 * If duty is 0 or equal to period there's no need to register
222	 * a specific action on RA/RB and RC compare.
223	 * The output will be configured on software trigger and keep
224	 * this config till next config call.
225	 */
226	if (tcbpwm->duty != tcbpwm->period && tcbpwm->duty > 0) {
227		if (pwm->hwpwm == 0) {
228			if (polarity == PWM_POLARITY_INVERSED)
229				cmr |= ATMEL_TC_ACPA_SET | ATMEL_TC_ACPC_CLEAR;
230			else
231				cmr |= ATMEL_TC_ACPA_CLEAR | ATMEL_TC_ACPC_SET;
232		} else {
233			if (polarity == PWM_POLARITY_INVERSED)
234				cmr |= ATMEL_TC_BCPB_SET | ATMEL_TC_BCPC_CLEAR;
235			else
236				cmr |= ATMEL_TC_BCPB_CLEAR | ATMEL_TC_BCPC_SET;
237		}
238	}
239
240	cmr |= (tcbpwm->div & ATMEL_TC_TCCLKS);
241
242	regmap_write(tcbpwmc->regmap, ATMEL_TC_REG(tcbpwmc->channel, CMR), cmr);
243
244	if (pwm->hwpwm == 0)
245		regmap_write(tcbpwmc->regmap,
246			     ATMEL_TC_REG(tcbpwmc->channel, RA),
247			     tcbpwm->duty);
248	else
249		regmap_write(tcbpwmc->regmap,
250			     ATMEL_TC_REG(tcbpwmc->channel, RB),
251			     tcbpwm->duty);
252
253	regmap_write(tcbpwmc->regmap, ATMEL_TC_REG(tcbpwmc->channel, RC),
254		     tcbpwm->period);
255
256	/* Use software trigger to apply the new setting */
257	regmap_write(tcbpwmc->regmap, ATMEL_TC_REG(tcbpwmc->channel, CCR),
258		     ATMEL_TC_SWTRG | ATMEL_TC_CLKEN);
259	tcbpwmc->bkup.enabled = 1;
260	spin_unlock(&tcbpwmc->lock);
261	return 0;
262}
263
264static int atmel_tcb_pwm_config(struct pwm_chip *chip, struct pwm_device *pwm,
265				int duty_ns, int period_ns)
266{
267	struct atmel_tcb_pwm_chip *tcbpwmc = to_tcb_chip(chip);
268	struct atmel_tcb_pwm_device *tcbpwm = &tcbpwmc->pwms[pwm->hwpwm];
269	struct atmel_tcb_pwm_device *atcbpwm = NULL;
270	int i = 0;
271	int slowclk = 0;
272	unsigned period;
273	unsigned duty;
274	unsigned rate = clk_get_rate(tcbpwmc->clk);
275	unsigned long long min;
276	unsigned long long max;
277
278	/*
279	 * Find best clk divisor:
280	 * the smallest divisor which can fulfill the period_ns requirements.
281	 * If there is a gclk, the first divisor is actually the gclk selector
282	 */
283	if (tcbpwmc->gclk)
284		i = 1;
285	for (; i < ARRAY_SIZE(atmel_tcb_divisors); ++i) {
286		if (atmel_tcb_divisors[i] == 0) {
287			slowclk = i;
288			continue;
289		}
290		min = div_u64((u64)NSEC_PER_SEC * atmel_tcb_divisors[i], rate);
291		max = min << tcbpwmc->width;
292		if (max >= period_ns)
293			break;
294	}
295
296	/*
297	 * If none of the divisor are small enough to represent period_ns
298	 * take slow clock (32KHz).
299	 */
300	if (i == ARRAY_SIZE(atmel_tcb_divisors)) {
301		i = slowclk;
302		rate = clk_get_rate(tcbpwmc->slow_clk);
303		min = div_u64(NSEC_PER_SEC, rate);
304		max = min << tcbpwmc->width;
305
306		/* If period is too big return ERANGE error */
307		if (max < period_ns)
308			return -ERANGE;
309	}
310
311	duty = div_u64(duty_ns, min);
312	period = div_u64(period_ns, min);
313
314	if (pwm->hwpwm == 0)
315		atcbpwm = &tcbpwmc->pwms[1];
316	else
317		atcbpwm = &tcbpwmc->pwms[0];
318
319	/*
320	 * PWM devices provided by the TCB driver are grouped by 2.
321	 * PWM devices in a given group must be configured with the
322	 * same period_ns.
323	 *
324	 * We're checking the period value of the second PWM device
325	 * in this group before applying the new config.
326	 */
327	if ((atcbpwm && atcbpwm->duty > 0 &&
328			atcbpwm->duty != atcbpwm->period) &&
329		(atcbpwm->div != i || atcbpwm->period != period)) {
330		dev_err(chip->dev,
331			"failed to configure period_ns: PWM group already configured with a different value\n");
332		return -EINVAL;
333	}
334
335	tcbpwm->period = period;
336	tcbpwm->div = i;
337	tcbpwm->duty = duty;
338
339	return 0;
340}
341
342static int atmel_tcb_pwm_apply(struct pwm_chip *chip, struct pwm_device *pwm,
343			       const struct pwm_state *state)
344{
345	int duty_cycle, period;
346	int ret;
347
348	if (!state->enabled) {
349		atmel_tcb_pwm_disable(chip, pwm, state->polarity);
350		return 0;
351	}
352
353	period = state->period < INT_MAX ? state->period : INT_MAX;
354	duty_cycle = state->duty_cycle < INT_MAX ? state->duty_cycle : INT_MAX;
355
356	ret = atmel_tcb_pwm_config(chip, pwm, duty_cycle, period);
357	if (ret)
358		return ret;
359
360	return atmel_tcb_pwm_enable(chip, pwm, state->polarity);
361}
362
363static const struct pwm_ops atmel_tcb_pwm_ops = {
364	.request = atmel_tcb_pwm_request,
365	.free = atmel_tcb_pwm_free,
366	.apply = atmel_tcb_pwm_apply,
367};
368
369static struct atmel_tcb_config tcb_rm9200_config = {
370	.counter_width = 16,
371};
372
373static struct atmel_tcb_config tcb_sam9x5_config = {
374	.counter_width = 32,
375};
376
377static struct atmel_tcb_config tcb_sama5d2_config = {
378	.counter_width = 32,
379	.has_gclk = 1,
380};
381
382static const struct of_device_id atmel_tcb_of_match[] = {
383	{ .compatible = "atmel,at91rm9200-tcb", .data = &tcb_rm9200_config, },
384	{ .compatible = "atmel,at91sam9x5-tcb", .data = &tcb_sam9x5_config, },
385	{ .compatible = "atmel,sama5d2-tcb", .data = &tcb_sama5d2_config, },
386	{ /* sentinel */ }
387};
388
389static int atmel_tcb_pwm_probe(struct platform_device *pdev)
390{
391	const struct of_device_id *match;
392	struct atmel_tcb_pwm_chip *tcbpwm;
393	const struct atmel_tcb_config *config;
394	struct device_node *np = pdev->dev.of_node;
395	char clk_name[] = "t0_clk";
396	int err;
397	int channel;
398
399	tcbpwm = devm_kzalloc(&pdev->dev, sizeof(*tcbpwm), GFP_KERNEL);
400	if (tcbpwm == NULL)
401		return -ENOMEM;
402
403	err = of_property_read_u32(np, "reg", &channel);
404	if (err < 0) {
405		dev_err(&pdev->dev,
406			"failed to get Timer Counter Block channel from device tree (error: %d)\n",
407			err);
408		return err;
409	}
410
411	tcbpwm->regmap = syscon_node_to_regmap(np->parent);
412	if (IS_ERR(tcbpwm->regmap))
413		return PTR_ERR(tcbpwm->regmap);
414
415	tcbpwm->slow_clk = of_clk_get_by_name(np->parent, "slow_clk");
416	if (IS_ERR(tcbpwm->slow_clk))
417		return PTR_ERR(tcbpwm->slow_clk);
418
419	clk_name[1] += channel;
420	tcbpwm->clk = of_clk_get_by_name(np->parent, clk_name);
421	if (IS_ERR(tcbpwm->clk))
422		tcbpwm->clk = of_clk_get_by_name(np->parent, "t0_clk");
423	if (IS_ERR(tcbpwm->clk)) {
424		err = PTR_ERR(tcbpwm->clk);
425		goto err_slow_clk;
426	}
427
428	match = of_match_node(atmel_tcb_of_match, np->parent);
429	config = match->data;
430
431	if (config->has_gclk) {
432		tcbpwm->gclk = of_clk_get_by_name(np->parent, "gclk");
433		if (IS_ERR(tcbpwm->gclk)) {
434			err = PTR_ERR(tcbpwm->gclk);
435			goto err_clk;
436		}
437	}
438
439	tcbpwm->chip.dev = &pdev->dev;
440	tcbpwm->chip.ops = &atmel_tcb_pwm_ops;
441	tcbpwm->chip.npwm = NPWM;
442	tcbpwm->channel = channel;
443	tcbpwm->width = config->counter_width;
444
445	err = clk_prepare_enable(tcbpwm->slow_clk);
446	if (err)
447		goto err_gclk;
448
449	spin_lock_init(&tcbpwm->lock);
450
451	err = pwmchip_add(&tcbpwm->chip);
452	if (err < 0)
453		goto err_disable_clk;
454
455	platform_set_drvdata(pdev, tcbpwm);
456
457	return 0;
458
459err_disable_clk:
460	clk_disable_unprepare(tcbpwm->slow_clk);
461
462err_gclk:
463	clk_put(tcbpwm->gclk);
464
465err_clk:
466	clk_put(tcbpwm->clk);
467
468err_slow_clk:
469	clk_put(tcbpwm->slow_clk);
470
471	return err;
472}
473
474static void atmel_tcb_pwm_remove(struct platform_device *pdev)
475{
476	struct atmel_tcb_pwm_chip *tcbpwm = platform_get_drvdata(pdev);
477
478	pwmchip_remove(&tcbpwm->chip);
479
480	clk_disable_unprepare(tcbpwm->slow_clk);
481	clk_put(tcbpwm->gclk);
482	clk_put(tcbpwm->clk);
483	clk_put(tcbpwm->slow_clk);
484}
485
486static const struct of_device_id atmel_tcb_pwm_dt_ids[] = {
487	{ .compatible = "atmel,tcb-pwm", },
488	{ /* sentinel */ }
489};
490MODULE_DEVICE_TABLE(of, atmel_tcb_pwm_dt_ids);
491
492static int atmel_tcb_pwm_suspend(struct device *dev)
493{
494	struct atmel_tcb_pwm_chip *tcbpwm = dev_get_drvdata(dev);
495	struct atmel_tcb_channel *chan = &tcbpwm->bkup;
496	unsigned int channel = tcbpwm->channel;
497
498	regmap_read(tcbpwm->regmap, ATMEL_TC_REG(channel, CMR), &chan->cmr);
499	regmap_read(tcbpwm->regmap, ATMEL_TC_REG(channel, RA), &chan->ra);
500	regmap_read(tcbpwm->regmap, ATMEL_TC_REG(channel, RB), &chan->rb);
501	regmap_read(tcbpwm->regmap, ATMEL_TC_REG(channel, RC), &chan->rc);
502
503	return 0;
504}
505
506static int atmel_tcb_pwm_resume(struct device *dev)
507{
508	struct atmel_tcb_pwm_chip *tcbpwm = dev_get_drvdata(dev);
509	struct atmel_tcb_channel *chan = &tcbpwm->bkup;
510	unsigned int channel = tcbpwm->channel;
511
512	regmap_write(tcbpwm->regmap, ATMEL_TC_REG(channel, CMR), chan->cmr);
513	regmap_write(tcbpwm->regmap, ATMEL_TC_REG(channel, RA), chan->ra);
514	regmap_write(tcbpwm->regmap, ATMEL_TC_REG(channel, RB), chan->rb);
515	regmap_write(tcbpwm->regmap, ATMEL_TC_REG(channel, RC), chan->rc);
516
517	if (chan->enabled)
518		regmap_write(tcbpwm->regmap,
519			     ATMEL_TC_CLKEN | ATMEL_TC_SWTRG,
520			     ATMEL_TC_REG(channel, CCR));
521
522	return 0;
523}
524
525static DEFINE_SIMPLE_DEV_PM_OPS(atmel_tcb_pwm_pm_ops, atmel_tcb_pwm_suspend,
526				atmel_tcb_pwm_resume);
527
528static struct platform_driver atmel_tcb_pwm_driver = {
529	.driver = {
530		.name = "atmel-tcb-pwm",
531		.of_match_table = atmel_tcb_pwm_dt_ids,
532		.pm = pm_ptr(&atmel_tcb_pwm_pm_ops),
533	},
534	.probe = atmel_tcb_pwm_probe,
535	.remove_new = atmel_tcb_pwm_remove,
536};
537module_platform_driver(atmel_tcb_pwm_driver);
538
539MODULE_AUTHOR("Boris BREZILLON <b.brezillon@overkiz.com>");
540MODULE_DESCRIPTION("Atmel Timer Counter Pulse Width Modulation Driver");
541MODULE_LICENSE("GPL v2");