| // SPDX-License-Identifier: GPL-2.0-only | 
 | /* | 
 |  * Driver for Atmel Pulse Width Modulation Controller | 
 |  * | 
 |  * Copyright (C) 2013 Atmel Corporation | 
 |  *		 Bo Shen <voice.shen@atmel.com> | 
 |  * | 
 |  * Links to reference manuals for the supported PWM chips can be found in | 
 |  * Documentation/arm/microchip.rst. | 
 |  * | 
 |  * Limitations: | 
 |  * - Periods start with the inactive level. | 
 |  * - Hardware has to be stopped in general to update settings. | 
 |  * | 
 |  * Software bugs/possible improvements: | 
 |  * - When atmel_pwm_apply() is called with state->enabled=false a change in | 
 |  *   state->polarity isn't honored. | 
 |  * - Instead of sleeping to wait for a completed period, the interrupt | 
 |  *   functionality could be used. | 
 |  */ | 
 |  | 
 | #include <linux/clk.h> | 
 | #include <linux/delay.h> | 
 | #include <linux/err.h> | 
 | #include <linux/io.h> | 
 | #include <linux/module.h> | 
 | #include <linux/mutex.h> | 
 | #include <linux/of.h> | 
 | #include <linux/of_device.h> | 
 | #include <linux/platform_device.h> | 
 | #include <linux/pwm.h> | 
 | #include <linux/slab.h> | 
 |  | 
 | /* The following is global registers for PWM controller */ | 
 | #define PWM_ENA			0x04 | 
 | #define PWM_DIS			0x08 | 
 | #define PWM_SR			0x0C | 
 | #define PWM_ISR			0x1C | 
 | /* Bit field in SR */ | 
 | #define PWM_SR_ALL_CH_ON	0x0F | 
 |  | 
 | /* The following register is PWM channel related registers */ | 
 | #define PWM_CH_REG_OFFSET	0x200 | 
 | #define PWM_CH_REG_SIZE		0x20 | 
 |  | 
 | #define PWM_CMR			0x0 | 
 | /* Bit field in CMR */ | 
 | #define PWM_CMR_CPOL		(1 << 9) | 
 | #define PWM_CMR_UPD_CDTY	(1 << 10) | 
 | #define PWM_CMR_CPRE_MSK	0xF | 
 |  | 
 | /* The following registers for PWM v1 */ | 
 | #define PWMV1_CDTY		0x04 | 
 | #define PWMV1_CPRD		0x08 | 
 | #define PWMV1_CUPD		0x10 | 
 |  | 
 | /* The following registers for PWM v2 */ | 
 | #define PWMV2_CDTY		0x04 | 
 | #define PWMV2_CDTYUPD		0x08 | 
 | #define PWMV2_CPRD		0x0C | 
 | #define PWMV2_CPRDUPD		0x10 | 
 |  | 
 | #define PWM_MAX_PRES		10 | 
 |  | 
 | struct atmel_pwm_registers { | 
 | 	u8 period; | 
 | 	u8 period_upd; | 
 | 	u8 duty; | 
 | 	u8 duty_upd; | 
 | }; | 
 |  | 
 | struct atmel_pwm_config { | 
 | 	u32 period_bits; | 
 | }; | 
 |  | 
 | struct atmel_pwm_data { | 
 | 	struct atmel_pwm_registers regs; | 
 | 	struct atmel_pwm_config cfg; | 
 | }; | 
 |  | 
 | struct atmel_pwm_chip { | 
 | 	struct pwm_chip chip; | 
 | 	struct clk *clk; | 
 | 	void __iomem *base; | 
 | 	const struct atmel_pwm_data *data; | 
 |  | 
 | 	unsigned int updated_pwms; | 
 | 	/* ISR is cleared when read, ensure only one thread does that */ | 
 | 	struct mutex isr_lock; | 
 | }; | 
 |  | 
 | static inline struct atmel_pwm_chip *to_atmel_pwm_chip(struct pwm_chip *chip) | 
 | { | 
 | 	return container_of(chip, struct atmel_pwm_chip, chip); | 
 | } | 
 |  | 
 | static inline u32 atmel_pwm_readl(struct atmel_pwm_chip *chip, | 
 | 				  unsigned long offset) | 
 | { | 
 | 	return readl_relaxed(chip->base + offset); | 
 | } | 
 |  | 
 | static inline void atmel_pwm_writel(struct atmel_pwm_chip *chip, | 
 | 				    unsigned long offset, unsigned long val) | 
 | { | 
 | 	writel_relaxed(val, chip->base + offset); | 
 | } | 
 |  | 
 | static inline u32 atmel_pwm_ch_readl(struct atmel_pwm_chip *chip, | 
 | 				     unsigned int ch, unsigned long offset) | 
 | { | 
 | 	unsigned long base = PWM_CH_REG_OFFSET + ch * PWM_CH_REG_SIZE; | 
 |  | 
 | 	return atmel_pwm_readl(chip, base + offset); | 
 | } | 
 |  | 
 | static inline void atmel_pwm_ch_writel(struct atmel_pwm_chip *chip, | 
 | 				       unsigned int ch, unsigned long offset, | 
 | 				       unsigned long val) | 
 | { | 
 | 	unsigned long base = PWM_CH_REG_OFFSET + ch * PWM_CH_REG_SIZE; | 
 |  | 
 | 	atmel_pwm_writel(chip, base + offset, val); | 
 | } | 
 |  | 
 | static int atmel_pwm_calculate_cprd_and_pres(struct pwm_chip *chip, | 
 | 					     const struct pwm_state *state, | 
 | 					     unsigned long *cprd, u32 *pres) | 
 | { | 
 | 	struct atmel_pwm_chip *atmel_pwm = to_atmel_pwm_chip(chip); | 
 | 	unsigned long long cycles = state->period; | 
 | 	int shift; | 
 |  | 
 | 	/* Calculate the period cycles and prescale value */ | 
 | 	cycles *= clk_get_rate(atmel_pwm->clk); | 
 | 	do_div(cycles, NSEC_PER_SEC); | 
 |  | 
 | 	/* | 
 | 	 * The register for the period length is cfg.period_bits bits wide. | 
 | 	 * So for each bit the number of clock cycles is wider divide the input | 
 | 	 * clock frequency by two using pres and shift cprd accordingly. | 
 | 	 */ | 
 | 	shift = fls(cycles) - atmel_pwm->data->cfg.period_bits; | 
 |  | 
 | 	if (shift > PWM_MAX_PRES) { | 
 | 		dev_err(chip->dev, "pres exceeds the maximum value\n"); | 
 | 		return -EINVAL; | 
 | 	} else if (shift > 0) { | 
 | 		*pres = shift; | 
 | 		cycles >>= *pres; | 
 | 	} else { | 
 | 		*pres = 0; | 
 | 	} | 
 |  | 
 | 	*cprd = cycles; | 
 |  | 
 | 	return 0; | 
 | } | 
 |  | 
 | static void atmel_pwm_calculate_cdty(const struct pwm_state *state, | 
 | 				     unsigned long cprd, unsigned long *cdty) | 
 | { | 
 | 	unsigned long long cycles = state->duty_cycle; | 
 |  | 
 | 	cycles *= cprd; | 
 | 	do_div(cycles, state->period); | 
 | 	*cdty = cprd - cycles; | 
 | } | 
 |  | 
 | static void atmel_pwm_update_cdty(struct pwm_chip *chip, struct pwm_device *pwm, | 
 | 				  unsigned long cdty) | 
 | { | 
 | 	struct atmel_pwm_chip *atmel_pwm = to_atmel_pwm_chip(chip); | 
 | 	u32 val; | 
 |  | 
 | 	if (atmel_pwm->data->regs.duty_upd == | 
 | 	    atmel_pwm->data->regs.period_upd) { | 
 | 		val = atmel_pwm_ch_readl(atmel_pwm, pwm->hwpwm, PWM_CMR); | 
 | 		val &= ~PWM_CMR_UPD_CDTY; | 
 | 		atmel_pwm_ch_writel(atmel_pwm, pwm->hwpwm, PWM_CMR, val); | 
 | 	} | 
 |  | 
 | 	atmel_pwm_ch_writel(atmel_pwm, pwm->hwpwm, | 
 | 			    atmel_pwm->data->regs.duty_upd, cdty); | 
 | } | 
 |  | 
 | static void atmel_pwm_set_cprd_cdty(struct pwm_chip *chip, | 
 | 				    struct pwm_device *pwm, | 
 | 				    unsigned long cprd, unsigned long cdty) | 
 | { | 
 | 	struct atmel_pwm_chip *atmel_pwm = to_atmel_pwm_chip(chip); | 
 |  | 
 | 	atmel_pwm_ch_writel(atmel_pwm, pwm->hwpwm, | 
 | 			    atmel_pwm->data->regs.duty, cdty); | 
 | 	atmel_pwm_ch_writel(atmel_pwm, pwm->hwpwm, | 
 | 			    atmel_pwm->data->regs.period, cprd); | 
 | } | 
 |  | 
 | static void atmel_pwm_disable(struct pwm_chip *chip, struct pwm_device *pwm, | 
 | 			      bool disable_clk) | 
 | { | 
 | 	struct atmel_pwm_chip *atmel_pwm = to_atmel_pwm_chip(chip); | 
 | 	unsigned long timeout = jiffies + 2 * HZ; | 
 |  | 
 | 	/* | 
 | 	 * Wait for at least a complete period to have passed before disabling a | 
 | 	 * channel to be sure that CDTY has been updated | 
 | 	 */ | 
 | 	mutex_lock(&atmel_pwm->isr_lock); | 
 | 	atmel_pwm->updated_pwms |= atmel_pwm_readl(atmel_pwm, PWM_ISR); | 
 |  | 
 | 	while (!(atmel_pwm->updated_pwms & (1 << pwm->hwpwm)) && | 
 | 	       time_before(jiffies, timeout)) { | 
 | 		usleep_range(10, 100); | 
 | 		atmel_pwm->updated_pwms |= atmel_pwm_readl(atmel_pwm, PWM_ISR); | 
 | 	} | 
 |  | 
 | 	mutex_unlock(&atmel_pwm->isr_lock); | 
 | 	atmel_pwm_writel(atmel_pwm, PWM_DIS, 1 << pwm->hwpwm); | 
 |  | 
 | 	/* | 
 | 	 * Wait for the PWM channel disable operation to be effective before | 
 | 	 * stopping the clock. | 
 | 	 */ | 
 | 	timeout = jiffies + 2 * HZ; | 
 |  | 
 | 	while ((atmel_pwm_readl(atmel_pwm, PWM_SR) & (1 << pwm->hwpwm)) && | 
 | 	       time_before(jiffies, timeout)) | 
 | 		usleep_range(10, 100); | 
 |  | 
 | 	if (disable_clk) | 
 | 		clk_disable(atmel_pwm->clk); | 
 | } | 
 |  | 
 | static int atmel_pwm_apply(struct pwm_chip *chip, struct pwm_device *pwm, | 
 | 			   const struct pwm_state *state) | 
 | { | 
 | 	struct atmel_pwm_chip *atmel_pwm = to_atmel_pwm_chip(chip); | 
 | 	struct pwm_state cstate; | 
 | 	unsigned long cprd, cdty; | 
 | 	u32 pres, val; | 
 | 	int ret; | 
 |  | 
 | 	pwm_get_state(pwm, &cstate); | 
 |  | 
 | 	if (state->enabled) { | 
 | 		if (cstate.enabled && | 
 | 		    cstate.polarity == state->polarity && | 
 | 		    cstate.period == state->period) { | 
 | 			cprd = atmel_pwm_ch_readl(atmel_pwm, pwm->hwpwm, | 
 | 						  atmel_pwm->data->regs.period); | 
 | 			atmel_pwm_calculate_cdty(state, cprd, &cdty); | 
 | 			atmel_pwm_update_cdty(chip, pwm, cdty); | 
 | 			return 0; | 
 | 		} | 
 |  | 
 | 		ret = atmel_pwm_calculate_cprd_and_pres(chip, state, &cprd, | 
 | 							&pres); | 
 | 		if (ret) { | 
 | 			dev_err(chip->dev, | 
 | 				"failed to calculate cprd and prescaler\n"); | 
 | 			return ret; | 
 | 		} | 
 |  | 
 | 		atmel_pwm_calculate_cdty(state, cprd, &cdty); | 
 |  | 
 | 		if (cstate.enabled) { | 
 | 			atmel_pwm_disable(chip, pwm, false); | 
 | 		} else { | 
 | 			ret = clk_enable(atmel_pwm->clk); | 
 | 			if (ret) { | 
 | 				dev_err(chip->dev, "failed to enable clock\n"); | 
 | 				return ret; | 
 | 			} | 
 | 		} | 
 |  | 
 | 		/* It is necessary to preserve CPOL, inside CMR */ | 
 | 		val = atmel_pwm_ch_readl(atmel_pwm, pwm->hwpwm, PWM_CMR); | 
 | 		val = (val & ~PWM_CMR_CPRE_MSK) | (pres & PWM_CMR_CPRE_MSK); | 
 | 		if (state->polarity == PWM_POLARITY_NORMAL) | 
 | 			val &= ~PWM_CMR_CPOL; | 
 | 		else | 
 | 			val |= PWM_CMR_CPOL; | 
 | 		atmel_pwm_ch_writel(atmel_pwm, pwm->hwpwm, PWM_CMR, val); | 
 | 		atmel_pwm_set_cprd_cdty(chip, pwm, cprd, cdty); | 
 | 		mutex_lock(&atmel_pwm->isr_lock); | 
 | 		atmel_pwm->updated_pwms |= atmel_pwm_readl(atmel_pwm, PWM_ISR); | 
 | 		atmel_pwm->updated_pwms &= ~(1 << pwm->hwpwm); | 
 | 		mutex_unlock(&atmel_pwm->isr_lock); | 
 | 		atmel_pwm_writel(atmel_pwm, PWM_ENA, 1 << pwm->hwpwm); | 
 | 	} else if (cstate.enabled) { | 
 | 		atmel_pwm_disable(chip, pwm, true); | 
 | 	} | 
 |  | 
 | 	return 0; | 
 | } | 
 |  | 
 | static void atmel_pwm_get_state(struct pwm_chip *chip, struct pwm_device *pwm, | 
 | 				struct pwm_state *state) | 
 | { | 
 | 	struct atmel_pwm_chip *atmel_pwm = to_atmel_pwm_chip(chip); | 
 | 	u32 sr, cmr; | 
 |  | 
 | 	sr = atmel_pwm_readl(atmel_pwm, PWM_SR); | 
 | 	cmr = atmel_pwm_ch_readl(atmel_pwm, pwm->hwpwm, PWM_CMR); | 
 |  | 
 | 	if (sr & (1 << pwm->hwpwm)) { | 
 | 		unsigned long rate = clk_get_rate(atmel_pwm->clk); | 
 | 		u32 cdty, cprd, pres; | 
 | 		u64 tmp; | 
 |  | 
 | 		pres = cmr & PWM_CMR_CPRE_MSK; | 
 |  | 
 | 		cprd = atmel_pwm_ch_readl(atmel_pwm, pwm->hwpwm, | 
 | 					  atmel_pwm->data->regs.period); | 
 | 		tmp = (u64)cprd * NSEC_PER_SEC; | 
 | 		tmp <<= pres; | 
 | 		state->period = DIV64_U64_ROUND_UP(tmp, rate); | 
 |  | 
 | 		cdty = atmel_pwm_ch_readl(atmel_pwm, pwm->hwpwm, | 
 | 					  atmel_pwm->data->regs.duty); | 
 | 		tmp = (u64)(cprd - cdty) * NSEC_PER_SEC; | 
 | 		tmp <<= pres; | 
 | 		state->duty_cycle = DIV64_U64_ROUND_UP(tmp, rate); | 
 |  | 
 | 		state->enabled = true; | 
 | 	} else { | 
 | 		state->enabled = false; | 
 | 	} | 
 |  | 
 | 	if (cmr & PWM_CMR_CPOL) | 
 | 		state->polarity = PWM_POLARITY_INVERSED; | 
 | 	else | 
 | 		state->polarity = PWM_POLARITY_NORMAL; | 
 | } | 
 |  | 
 | static const struct pwm_ops atmel_pwm_ops = { | 
 | 	.apply = atmel_pwm_apply, | 
 | 	.get_state = atmel_pwm_get_state, | 
 | 	.owner = THIS_MODULE, | 
 | }; | 
 |  | 
 | static const struct atmel_pwm_data atmel_sam9rl_pwm_data = { | 
 | 	.regs = { | 
 | 		.period		= PWMV1_CPRD, | 
 | 		.period_upd	= PWMV1_CUPD, | 
 | 		.duty		= PWMV1_CDTY, | 
 | 		.duty_upd	= PWMV1_CUPD, | 
 | 	}, | 
 | 	.cfg = { | 
 | 		/* 16 bits to keep period and duty. */ | 
 | 		.period_bits	= 16, | 
 | 	}, | 
 | }; | 
 |  | 
 | static const struct atmel_pwm_data atmel_sama5_pwm_data = { | 
 | 	.regs = { | 
 | 		.period		= PWMV2_CPRD, | 
 | 		.period_upd	= PWMV2_CPRDUPD, | 
 | 		.duty		= PWMV2_CDTY, | 
 | 		.duty_upd	= PWMV2_CDTYUPD, | 
 | 	}, | 
 | 	.cfg = { | 
 | 		/* 16 bits to keep period and duty. */ | 
 | 		.period_bits	= 16, | 
 | 	}, | 
 | }; | 
 |  | 
 | static const struct atmel_pwm_data mchp_sam9x60_pwm_data = { | 
 | 	.regs = { | 
 | 		.period		= PWMV1_CPRD, | 
 | 		.period_upd	= PWMV1_CUPD, | 
 | 		.duty		= PWMV1_CDTY, | 
 | 		.duty_upd	= PWMV1_CUPD, | 
 | 	}, | 
 | 	.cfg = { | 
 | 		/* 32 bits to keep period and duty. */ | 
 | 		.period_bits	= 32, | 
 | 	}, | 
 | }; | 
 |  | 
 | static const struct of_device_id atmel_pwm_dt_ids[] = { | 
 | 	{ | 
 | 		.compatible = "atmel,at91sam9rl-pwm", | 
 | 		.data = &atmel_sam9rl_pwm_data, | 
 | 	}, { | 
 | 		.compatible = "atmel,sama5d3-pwm", | 
 | 		.data = &atmel_sama5_pwm_data, | 
 | 	}, { | 
 | 		.compatible = "atmel,sama5d2-pwm", | 
 | 		.data = &atmel_sama5_pwm_data, | 
 | 	}, { | 
 | 		.compatible = "microchip,sam9x60-pwm", | 
 | 		.data = &mchp_sam9x60_pwm_data, | 
 | 	}, { | 
 | 		/* sentinel */ | 
 | 	}, | 
 | }; | 
 | MODULE_DEVICE_TABLE(of, atmel_pwm_dt_ids); | 
 |  | 
 | static int atmel_pwm_probe(struct platform_device *pdev) | 
 | { | 
 | 	struct atmel_pwm_chip *atmel_pwm; | 
 | 	struct resource *res; | 
 | 	int ret; | 
 |  | 
 | 	atmel_pwm = devm_kzalloc(&pdev->dev, sizeof(*atmel_pwm), GFP_KERNEL); | 
 | 	if (!atmel_pwm) | 
 | 		return -ENOMEM; | 
 |  | 
 | 	mutex_init(&atmel_pwm->isr_lock); | 
 | 	atmel_pwm->data = of_device_get_match_data(&pdev->dev); | 
 | 	atmel_pwm->updated_pwms = 0; | 
 |  | 
 | 	res = platform_get_resource(pdev, IORESOURCE_MEM, 0); | 
 | 	atmel_pwm->base = devm_ioremap_resource(&pdev->dev, res); | 
 | 	if (IS_ERR(atmel_pwm->base)) | 
 | 		return PTR_ERR(atmel_pwm->base); | 
 |  | 
 | 	atmel_pwm->clk = devm_clk_get(&pdev->dev, NULL); | 
 | 	if (IS_ERR(atmel_pwm->clk)) | 
 | 		return PTR_ERR(atmel_pwm->clk); | 
 |  | 
 | 	ret = clk_prepare(atmel_pwm->clk); | 
 | 	if (ret) { | 
 | 		dev_err(&pdev->dev, "failed to prepare PWM clock\n"); | 
 | 		return ret; | 
 | 	} | 
 |  | 
 | 	atmel_pwm->chip.dev = &pdev->dev; | 
 | 	atmel_pwm->chip.ops = &atmel_pwm_ops; | 
 | 	atmel_pwm->chip.of_xlate = of_pwm_xlate_with_flags; | 
 | 	atmel_pwm->chip.of_pwm_n_cells = 3; | 
 | 	atmel_pwm->chip.base = -1; | 
 | 	atmel_pwm->chip.npwm = 4; | 
 |  | 
 | 	ret = pwmchip_add(&atmel_pwm->chip); | 
 | 	if (ret < 0) { | 
 | 		dev_err(&pdev->dev, "failed to add PWM chip %d\n", ret); | 
 | 		goto unprepare_clk; | 
 | 	} | 
 |  | 
 | 	platform_set_drvdata(pdev, atmel_pwm); | 
 |  | 
 | 	return ret; | 
 |  | 
 | unprepare_clk: | 
 | 	clk_unprepare(atmel_pwm->clk); | 
 | 	return ret; | 
 | } | 
 |  | 
 | static int atmel_pwm_remove(struct platform_device *pdev) | 
 | { | 
 | 	struct atmel_pwm_chip *atmel_pwm = platform_get_drvdata(pdev); | 
 |  | 
 | 	clk_unprepare(atmel_pwm->clk); | 
 | 	mutex_destroy(&atmel_pwm->isr_lock); | 
 |  | 
 | 	return pwmchip_remove(&atmel_pwm->chip); | 
 | } | 
 |  | 
 | static struct platform_driver atmel_pwm_driver = { | 
 | 	.driver = { | 
 | 		.name = "atmel-pwm", | 
 | 		.of_match_table = of_match_ptr(atmel_pwm_dt_ids), | 
 | 	}, | 
 | 	.probe = atmel_pwm_probe, | 
 | 	.remove = atmel_pwm_remove, | 
 | }; | 
 | module_platform_driver(atmel_pwm_driver); | 
 |  | 
 | MODULE_ALIAS("platform:atmel-pwm"); | 
 | MODULE_AUTHOR("Bo Shen <voice.shen@atmel.com>"); | 
 | MODULE_DESCRIPTION("Atmel PWM driver"); | 
 | MODULE_LICENSE("GPL v2"); |