1 // SPDX-License-Identifier: GPL-2.0-only
2 /*
3  * Copyright (c) 2011 Samsung Electronics Co., Ltd.
4  *		http://www.samsung.com/
5  *
6  * samsung - Common hr-timer support (s3c and s5p)
7  */
8 
9 #include <linux/interrupt.h>
10 #include <linux/irq.h>
11 #include <linux/err.h>
12 #include <linux/clk.h>
13 #include <linux/clockchips.h>
14 #include <linux/list.h>
15 #include <linux/module.h>
16 #include <linux/of.h>
17 #include <linux/of_address.h>
18 #include <linux/of_irq.h>
19 #include <linux/platform_device.h>
20 #include <linux/slab.h>
21 #include <linux/sched_clock.h>
22 
23 #include <clocksource/samsung_pwm.h>
24 
25 /*
26  * Clocksource driver
27  */
28 
29 #define REG_TCFG0			0x00
30 #define REG_TCFG1			0x04
31 #define REG_TCON			0x08
32 #define REG_TINT_CSTAT			0x44
33 
34 #define REG_TCNTB(chan)			(0x0c + 12 * (chan))
35 #define REG_TCMPB(chan)			(0x10 + 12 * (chan))
36 
37 #define TCFG0_PRESCALER_MASK		0xff
38 #define TCFG0_PRESCALER1_SHIFT		8
39 
40 #define TCFG1_SHIFT(x)			((x) * 4)
41 #define TCFG1_MUX_MASK			0xf
42 
43 /*
44  * Each channel occupies 4 bits in TCON register, but there is a gap of 4
45  * bits (one channel) after channel 0, so channels have different numbering
46  * when accessing TCON register.
47  *
48  * In addition, the location of autoreload bit for channel 4 (TCON channel 5)
49  * in its set of bits is 2 as opposed to 3 for other channels.
50  */
51 #define TCON_START(chan)		(1 << (4 * (chan) + 0))
52 #define TCON_MANUALUPDATE(chan)		(1 << (4 * (chan) + 1))
53 #define TCON_INVERT(chan)		(1 << (4 * (chan) + 2))
54 #define _TCON_AUTORELOAD(chan)		(1 << (4 * (chan) + 3))
55 #define _TCON_AUTORELOAD4(chan)		(1 << (4 * (chan) + 2))
56 #define TCON_AUTORELOAD(chan)		\
57 	((chan < 5) ? _TCON_AUTORELOAD(chan) : _TCON_AUTORELOAD4(chan))
58 
59 DEFINE_SPINLOCK(samsung_pwm_lock);
60 EXPORT_SYMBOL(samsung_pwm_lock);
61 
62 struct samsung_pwm_clocksource {
63 	void __iomem *base;
64 	const void __iomem *source_reg;
65 	unsigned int irq[SAMSUNG_PWM_NUM];
66 	struct samsung_pwm_variant variant;
67 
68 	struct clk *timerclk;
69 
70 	unsigned int event_id;
71 	unsigned int source_id;
72 	unsigned int tcnt_max;
73 	unsigned int tscaler_div;
74 	unsigned int tdiv;
75 
76 	unsigned long clock_count_per_tick;
77 };
78 
79 static struct samsung_pwm_clocksource pwm;
80 
81 static void samsung_timer_set_prescale(unsigned int channel, u16 prescale)
82 {
83 	unsigned long flags;
84 	u8 shift = 0;
85 	u32 reg;
86 
87 	if (channel >= 2)
88 		shift = TCFG0_PRESCALER1_SHIFT;
89 
90 	spin_lock_irqsave(&samsung_pwm_lock, flags);
91 
92 	reg = readl(pwm.base + REG_TCFG0);
93 	reg &= ~(TCFG0_PRESCALER_MASK << shift);
94 	reg |= (prescale - 1) << shift;
95 	writel(reg, pwm.base + REG_TCFG0);
96 
97 	spin_unlock_irqrestore(&samsung_pwm_lock, flags);
98 }
99 
100 static void samsung_timer_set_divisor(unsigned int channel, u8 divisor)
101 {
102 	u8 shift = TCFG1_SHIFT(channel);
103 	unsigned long flags;
104 	u32 reg;
105 	u8 bits;
106 
107 	bits = (fls(divisor) - 1) - pwm.variant.div_base;
108 
109 	spin_lock_irqsave(&samsung_pwm_lock, flags);
110 
111 	reg = readl(pwm.base + REG_TCFG1);
112 	reg &= ~(TCFG1_MUX_MASK << shift);
113 	reg |= bits << shift;
114 	writel(reg, pwm.base + REG_TCFG1);
115 
116 	spin_unlock_irqrestore(&samsung_pwm_lock, flags);
117 }
118 
119 static void samsung_time_stop(unsigned int channel)
120 {
121 	unsigned long tcon;
122 	unsigned long flags;
123 
124 	if (channel > 0)
125 		++channel;
126 
127 	spin_lock_irqsave(&samsung_pwm_lock, flags);
128 
129 	tcon = readl_relaxed(pwm.base + REG_TCON);
130 	tcon &= ~TCON_START(channel);
131 	writel_relaxed(tcon, pwm.base + REG_TCON);
132 
133 	spin_unlock_irqrestore(&samsung_pwm_lock, flags);
134 }
135 
136 static void samsung_time_setup(unsigned int channel, unsigned long tcnt)
137 {
138 	unsigned long tcon;
139 	unsigned long flags;
140 	unsigned int tcon_chan = channel;
141 
142 	if (tcon_chan > 0)
143 		++tcon_chan;
144 
145 	spin_lock_irqsave(&samsung_pwm_lock, flags);
146 
147 	tcon = readl_relaxed(pwm.base + REG_TCON);
148 
149 	tcon &= ~(TCON_START(tcon_chan) | TCON_AUTORELOAD(tcon_chan));
150 	tcon |= TCON_MANUALUPDATE(tcon_chan);
151 
152 	writel_relaxed(tcnt, pwm.base + REG_TCNTB(channel));
153 	writel_relaxed(tcnt, pwm.base + REG_TCMPB(channel));
154 	writel_relaxed(tcon, pwm.base + REG_TCON);
155 
156 	spin_unlock_irqrestore(&samsung_pwm_lock, flags);
157 }
158 
159 static void samsung_time_start(unsigned int channel, bool periodic)
160 {
161 	unsigned long tcon;
162 	unsigned long flags;
163 
164 	if (channel > 0)
165 		++channel;
166 
167 	spin_lock_irqsave(&samsung_pwm_lock, flags);
168 
169 	tcon = readl_relaxed(pwm.base + REG_TCON);
170 
171 	tcon &= ~TCON_MANUALUPDATE(channel);
172 	tcon |= TCON_START(channel);
173 
174 	if (periodic)
175 		tcon |= TCON_AUTORELOAD(channel);
176 	else
177 		tcon &= ~TCON_AUTORELOAD(channel);
178 
179 	writel_relaxed(tcon, pwm.base + REG_TCON);
180 
181 	spin_unlock_irqrestore(&samsung_pwm_lock, flags);
182 }
183 
184 static int samsung_set_next_event(unsigned long cycles,
185 				  struct clock_event_device *evt)
186 {
187 	/*
188 	 * This check is needed to account for internal rounding
189 	 * errors inside clockevents core, which might result in
190 	 * passing cycles = 0, which in turn would not generate any
191 	 * timer interrupt and hang the system.
192 	 *
193 	 * Another solution would be to set up the clockevent device
194 	 * with min_delta = 2, but this would unnecessarily increase
195 	 * the minimum sleep period.
196 	 */
197 	if (!cycles)
198 		cycles = 1;
199 
200 	samsung_time_setup(pwm.event_id, cycles);
201 	samsung_time_start(pwm.event_id, false);
202 
203 	return 0;
204 }
205 
206 static int samsung_shutdown(struct clock_event_device *evt)
207 {
208 	samsung_time_stop(pwm.event_id);
209 	return 0;
210 }
211 
212 static int samsung_set_periodic(struct clock_event_device *evt)
213 {
214 	samsung_time_stop(pwm.event_id);
215 	samsung_time_setup(pwm.event_id, pwm.clock_count_per_tick - 1);
216 	samsung_time_start(pwm.event_id, true);
217 	return 0;
218 }
219 
220 static void samsung_clockevent_resume(struct clock_event_device *cev)
221 {
222 	samsung_timer_set_prescale(pwm.event_id, pwm.tscaler_div);
223 	samsung_timer_set_divisor(pwm.event_id, pwm.tdiv);
224 
225 	if (pwm.variant.has_tint_cstat) {
226 		u32 mask = (1 << pwm.event_id);
227 
228 		writel(mask | (mask << 5), pwm.base + REG_TINT_CSTAT);
229 	}
230 }
231 
232 static struct clock_event_device time_event_device = {
233 	.name			= "samsung_event_timer",
234 	.features		= CLOCK_EVT_FEAT_PERIODIC |
235 				  CLOCK_EVT_FEAT_ONESHOT,
236 	.rating			= 200,
237 	.set_next_event		= samsung_set_next_event,
238 	.set_state_shutdown	= samsung_shutdown,
239 	.set_state_periodic	= samsung_set_periodic,
240 	.set_state_oneshot	= samsung_shutdown,
241 	.tick_resume		= samsung_shutdown,
242 	.resume			= samsung_clockevent_resume,
243 };
244 
245 static irqreturn_t samsung_clock_event_isr(int irq, void *dev_id)
246 {
247 	struct clock_event_device *evt = dev_id;
248 
249 	if (pwm.variant.has_tint_cstat) {
250 		u32 mask = (1 << pwm.event_id);
251 
252 		writel(mask | (mask << 5), pwm.base + REG_TINT_CSTAT);
253 	}
254 
255 	evt->event_handler(evt);
256 
257 	return IRQ_HANDLED;
258 }
259 
260 static void __init samsung_clockevent_init(void)
261 {
262 	unsigned long pclk;
263 	unsigned long clock_rate;
264 	unsigned int irq_number;
265 
266 	pclk = clk_get_rate(pwm.timerclk);
267 
268 	samsung_timer_set_prescale(pwm.event_id, pwm.tscaler_div);
269 	samsung_timer_set_divisor(pwm.event_id, pwm.tdiv);
270 
271 	clock_rate = pclk / (pwm.tscaler_div * pwm.tdiv);
272 	pwm.clock_count_per_tick = clock_rate / HZ;
273 
274 	time_event_device.cpumask = cpumask_of(0);
275 	clockevents_config_and_register(&time_event_device,
276 					clock_rate, 1, pwm.tcnt_max);
277 
278 	irq_number = pwm.irq[pwm.event_id];
279 	if (request_irq(irq_number, samsung_clock_event_isr,
280 			IRQF_TIMER | IRQF_IRQPOLL, "samsung_time_irq",
281 			&time_event_device))
282 		pr_err("%s: request_irq() failed\n", "samsung_time_irq");
283 
284 	if (pwm.variant.has_tint_cstat) {
285 		u32 mask = (1 << pwm.event_id);
286 
287 		writel(mask | (mask << 5), pwm.base + REG_TINT_CSTAT);
288 	}
289 }
290 
291 static void samsung_clocksource_suspend(struct clocksource *cs)
292 {
293 	samsung_time_stop(pwm.source_id);
294 }
295 
296 static void samsung_clocksource_resume(struct clocksource *cs)
297 {
298 	samsung_timer_set_prescale(pwm.source_id, pwm.tscaler_div);
299 	samsung_timer_set_divisor(pwm.source_id, pwm.tdiv);
300 
301 	samsung_time_setup(pwm.source_id, pwm.tcnt_max);
302 	samsung_time_start(pwm.source_id, true);
303 }
304 
305 static u64 notrace samsung_clocksource_read(struct clocksource *c)
306 {
307 	return ~readl_relaxed(pwm.source_reg);
308 }
309 
310 static struct clocksource samsung_clocksource = {
311 	.name		= "samsung_clocksource_timer",
312 	.rating		= 250,
313 	.read		= samsung_clocksource_read,
314 	.suspend	= samsung_clocksource_suspend,
315 	.resume		= samsung_clocksource_resume,
316 	.flags		= CLOCK_SOURCE_IS_CONTINUOUS,
317 };
318 
319 /*
320  * Override the global weak sched_clock symbol with this
321  * local implementation which uses the clocksource to get some
322  * better resolution when scheduling the kernel. We accept that
323  * this wraps around for now, since it is just a relative time
324  * stamp. (Inspired by U300 implementation.)
325  */
326 static u64 notrace samsung_read_sched_clock(void)
327 {
328 	return samsung_clocksource_read(NULL);
329 }
330 
331 static int __init samsung_clocksource_init(void)
332 {
333 	unsigned long pclk;
334 	unsigned long clock_rate;
335 
336 	pclk = clk_get_rate(pwm.timerclk);
337 
338 	samsung_timer_set_prescale(pwm.source_id, pwm.tscaler_div);
339 	samsung_timer_set_divisor(pwm.source_id, pwm.tdiv);
340 
341 	clock_rate = pclk / (pwm.tscaler_div * pwm.tdiv);
342 
343 	samsung_time_setup(pwm.source_id, pwm.tcnt_max);
344 	samsung_time_start(pwm.source_id, true);
345 
346 	if (pwm.source_id == 4)
347 		pwm.source_reg = pwm.base + 0x40;
348 	else
349 		pwm.source_reg = pwm.base + pwm.source_id * 0x0c + 0x14;
350 
351 	sched_clock_register(samsung_read_sched_clock,
352 			     pwm.variant.bits, clock_rate);
353 
354 	samsung_clocksource.mask = CLOCKSOURCE_MASK(pwm.variant.bits);
355 	return clocksource_register_hz(&samsung_clocksource, clock_rate);
356 }
357 
358 static void __init samsung_timer_resources(void)
359 {
360 	clk_prepare_enable(pwm.timerclk);
361 
362 	pwm.tcnt_max = (1UL << pwm.variant.bits) - 1;
363 	if (pwm.variant.bits == 16) {
364 		pwm.tscaler_div = 25;
365 		pwm.tdiv = 2;
366 	} else {
367 		pwm.tscaler_div = 2;
368 		pwm.tdiv = 1;
369 	}
370 }
371 
372 /*
373  * PWM master driver
374  */
375 static int __init _samsung_pwm_clocksource_init(void)
376 {
377 	u8 mask;
378 	int channel;
379 
380 	mask = ~pwm.variant.output_mask & ((1 << SAMSUNG_PWM_NUM) - 1);
381 	channel = fls(mask) - 1;
382 	if (channel < 0) {
383 		pr_crit("failed to find PWM channel for clocksource\n");
384 		return -EINVAL;
385 	}
386 	pwm.source_id = channel;
387 
388 	mask &= ~(1 << channel);
389 	channel = fls(mask) - 1;
390 	if (channel < 0) {
391 		pr_crit("failed to find PWM channel for clock event\n");
392 		return -EINVAL;
393 	}
394 	pwm.event_id = channel;
395 
396 	samsung_timer_resources();
397 	samsung_clockevent_init();
398 
399 	return samsung_clocksource_init();
400 }
401 
402 void __init samsung_pwm_clocksource_init(void __iomem *base,
403 					 unsigned int *irqs,
404 					 const struct samsung_pwm_variant *variant)
405 {
406 	pwm.base = base;
407 	memcpy(&pwm.variant, variant, sizeof(pwm.variant));
408 	memcpy(pwm.irq, irqs, SAMSUNG_PWM_NUM * sizeof(*irqs));
409 
410 	pwm.timerclk = clk_get(NULL, "timers");
411 	if (IS_ERR(pwm.timerclk))
412 		panic("failed to get timers clock for timer");
413 
414 	_samsung_pwm_clocksource_init();
415 }
416 
417 #ifdef CONFIG_TIMER_OF
418 static int __init samsung_pwm_alloc(struct device_node *np,
419 				    const struct samsung_pwm_variant *variant)
420 {
421 	struct property *prop;
422 	const __be32 *cur;
423 	u32 val;
424 	int i, ret;
425 
426 	memcpy(&pwm.variant, variant, sizeof(pwm.variant));
427 	for (i = 0; i < SAMSUNG_PWM_NUM; ++i)
428 		pwm.irq[i] = irq_of_parse_and_map(np, i);
429 
430 	of_property_for_each_u32(np, "samsung,pwm-outputs", prop, cur, val) {
431 		if (val >= SAMSUNG_PWM_NUM) {
432 			pr_warn("%s: invalid channel index in samsung,pwm-outputs property\n", __func__);
433 			continue;
434 		}
435 		pwm.variant.output_mask |= 1 << val;
436 	}
437 
438 	pwm.base = of_iomap(np, 0);
439 	if (!pwm.base) {
440 		pr_err("%s: failed to map PWM registers\n", __func__);
441 		return -ENXIO;
442 	}
443 
444 	pwm.timerclk = of_clk_get_by_name(np, "timers");
445 	if (IS_ERR(pwm.timerclk)) {
446 		pr_crit("failed to get timers clock for timer\n");
447 		ret = PTR_ERR(pwm.timerclk);
448 		goto err_clk;
449 	}
450 
451 	ret = _samsung_pwm_clocksource_init();
452 	if (ret)
453 		goto err_clocksource;
454 
455 	return 0;
456 
457 err_clocksource:
458 	clk_put(pwm.timerclk);
459 	pwm.timerclk = NULL;
460 err_clk:
461 	iounmap(pwm.base);
462 	pwm.base = NULL;
463 
464 	return ret;
465 }
466 
467 static const struct samsung_pwm_variant s3c24xx_variant = {
468 	.bits		= 16,
469 	.div_base	= 1,
470 	.has_tint_cstat	= false,
471 	.tclk_mask	= (1 << 4),
472 };
473 
474 static int __init s3c2410_pwm_clocksource_init(struct device_node *np)
475 {
476 	return samsung_pwm_alloc(np, &s3c24xx_variant);
477 }
478 TIMER_OF_DECLARE(s3c2410_pwm, "samsung,s3c2410-pwm", s3c2410_pwm_clocksource_init);
479 
480 static const struct samsung_pwm_variant s3c64xx_variant = {
481 	.bits		= 32,
482 	.div_base	= 0,
483 	.has_tint_cstat	= true,
484 	.tclk_mask	= (1 << 7) | (1 << 6) | (1 << 5),
485 };
486 
487 static int __init s3c64xx_pwm_clocksource_init(struct device_node *np)
488 {
489 	return samsung_pwm_alloc(np, &s3c64xx_variant);
490 }
491 TIMER_OF_DECLARE(s3c6400_pwm, "samsung,s3c6400-pwm", s3c64xx_pwm_clocksource_init);
492 
493 static const struct samsung_pwm_variant s5p64x0_variant = {
494 	.bits		= 32,
495 	.div_base	= 0,
496 	.has_tint_cstat	= true,
497 	.tclk_mask	= 0,
498 };
499 
500 static int __init s5p64x0_pwm_clocksource_init(struct device_node *np)
501 {
502 	return samsung_pwm_alloc(np, &s5p64x0_variant);
503 }
504 TIMER_OF_DECLARE(s5p6440_pwm, "samsung,s5p6440-pwm", s5p64x0_pwm_clocksource_init);
505 
506 static const struct samsung_pwm_variant s5p_variant = {
507 	.bits		= 32,
508 	.div_base	= 0,
509 	.has_tint_cstat	= true,
510 	.tclk_mask	= (1 << 5),
511 };
512 
513 static int __init s5p_pwm_clocksource_init(struct device_node *np)
514 {
515 	return samsung_pwm_alloc(np, &s5p_variant);
516 }
517 TIMER_OF_DECLARE(s5pc100_pwm, "samsung,s5pc100-pwm", s5p_pwm_clocksource_init);
518 #endif
519