2 * r8a73a4 clock framework support
4 * Copyright (C) 2013 Renesas Solutions Corp.
5 * Copyright (C) 2013 Magnus Damm
7 * This program is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation; version 2 of the License.
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
20 #include <linux/init.h>
22 #include <linux/kernel.h>
23 #include <linux/sh_clk.h>
24 #include <linux/clkdev.h>
25 #include <mach/clock.h>
26 #include <mach/common.h>
28 #define CPG_BASE 0xe6150000
31 #define SMSTPCR2 0xe6150138
32 #define SMSTPCR3 0xe615013c
33 #define SMSTPCR5 0xe6150144
35 #define FRQCRA 0xE6150000
36 #define FRQCRB 0xE6150004
37 #define FRQCRC 0xE61500E0
38 #define VCLKCR1 0xE6150008
39 #define VCLKCR2 0xE615000C
40 #define VCLKCR3 0xE615001C
41 #define VCLKCR4 0xE6150014
42 #define VCLKCR5 0xE6150034
43 #define ZBCKCR 0xE6150010
44 #define SD0CKCR 0xE6150074
45 #define SD1CKCR 0xE6150078
46 #define SD2CKCR 0xE615007C
47 #define MMC0CKCR 0xE6150240
48 #define MMC1CKCR 0xE6150244
49 #define FSIACKCR 0xE6150018
50 #define FSIBCKCR 0xE6150090
51 #define MPCKCR 0xe6150080
52 #define SPUVCKCR 0xE6150094
53 #define HSICKCR 0xE615026C
54 #define M4CKCR 0xE6150098
55 #define PLLECR 0xE61500D0
56 #define PLL0CR 0xE61500D8
57 #define PLL1CR 0xE6150028
58 #define PLL2CR 0xE615002C
59 #define PLL2SCR 0xE61501F4
60 #define PLL2HCR 0xE61501E4
61 #define CKSCR 0xE61500C0
63 #define CPG_MAP(o) ((o - CPG_BASE) + cpg_mapping.base)
65 static struct clk_mapping cpg_mapping = {
70 static struct clk extalr_clk = {
72 .mapping = &cpg_mapping,
75 static struct clk extal1_clk = {
77 .mapping = &cpg_mapping,
80 static struct clk extal2_clk = {
82 .mapping = &cpg_mapping,
85 static struct sh_clk_ops followparent_clk_ops = {
86 .recalc = followparent_recalc,
89 static struct clk main_clk = {
90 /* .parent will be set r8a73a4_clock_init */
91 .ops = &followparent_clk_ops,
94 SH_CLK_RATIO(div2, 1, 2);
95 SH_CLK_RATIO(div4, 1, 4);
97 SH_FIXED_RATIO_CLK(main_div2_clk, main_clk, div2);
98 SH_FIXED_RATIO_CLK(extal1_div2_clk, extal1_clk, div2);
99 SH_FIXED_RATIO_CLK(extal2_div2_clk, extal2_clk, div2);
100 SH_FIXED_RATIO_CLK(extal2_div4_clk, extal2_clk, div4);
102 /* External FSIACK/FSIBCK clock */
103 static struct clk fsiack_clk = {
106 static struct clk fsibck_clk = {
112 static struct clk *pll_parent_main[] = {
117 static struct clk *pll_parent_main_extal[8] = {
118 [0] = &main_div2_clk,
119 [1] = &extal2_div2_clk,
120 [3] = &extal2_div4_clk,
125 static unsigned long pll_recalc(struct clk *clk)
127 unsigned long mult = 1;
129 if (ioread32(CPG_MAP(PLLECR)) & (1 << clk->enable_bit))
130 mult = (((ioread32(clk->mapped_reg) >> 24) & 0x7f) + 1);
132 return clk->parent->rate * mult;
135 static int pll_set_parent(struct clk *clk, struct clk *parent)
140 if (!clk->parent_table || !clk->parent_num)
143 /* Search the parent */
144 for (i = 0; i < clk->parent_num; i++)
145 if (clk->parent_table[i] == parent)
148 if (i == clk->parent_num)
151 ret = clk_reparent(clk, parent);
155 val = ioread32(clk->mapped_reg) &
156 ~(((1 << clk->src_width) - 1) << clk->src_shift);
158 iowrite32(val | i << clk->src_shift, clk->mapped_reg);
163 static struct sh_clk_ops pll_clk_ops = {
164 .recalc = pll_recalc,
165 .set_parent = pll_set_parent,
168 #define PLL_CLOCK(name, p, pt, w, s, reg, e) \
169 static struct clk name = { \
170 .ops = &pll_clk_ops, \
171 .flags = CLK_ENABLE_ON_INIT, \
173 .parent_table = pt, \
174 .parent_num = ARRAY_SIZE(pt), \
177 .enable_reg = (void __iomem *)reg, \
179 .mapping = &cpg_mapping, \
182 PLL_CLOCK(pll0_clk, &main_clk, pll_parent_main, 1, 20, PLL0CR, 0);
183 PLL_CLOCK(pll1_clk, &main_clk, pll_parent_main, 1, 7, PLL1CR, 1);
184 PLL_CLOCK(pll2_clk, &main_div2_clk, pll_parent_main_extal, 3, 5, PLL2CR, 2);
185 PLL_CLOCK(pll2s_clk, &main_div2_clk, pll_parent_main_extal, 3, 5, PLL2SCR, 4);
186 PLL_CLOCK(pll2h_clk, &main_div2_clk, pll_parent_main_extal, 3, 5, PLL2HCR, 5);
188 SH_FIXED_RATIO_CLK(pll1_div2_clk, pll1_clk, div2);
190 static atomic_t frqcr_lock;
192 /* Several clocks need to access FRQCRB, have to lock */
193 static bool frqcr_kick_check(struct clk *clk)
195 return !(ioread32(CPG_MAP(FRQCRB)) & BIT(31));
198 static int frqcr_kick_do(struct clk *clk)
202 /* set KICK bit in FRQCRB to update hardware setting, check success */
203 iowrite32(ioread32(CPG_MAP(FRQCRB)) | BIT(31), CPG_MAP(FRQCRB));
204 for (i = 1000; i; i--)
205 if (ioread32(CPG_MAP(FRQCRB)) & BIT(31))
213 static int zclk_set_rate(struct clk *clk, unsigned long rate)
215 void __iomem *frqcrc;
217 unsigned long step, p_rate;
220 if (!clk->parent || !__clk_get(clk->parent))
223 if (!atomic_inc_and_test(&frqcr_lock) || !frqcr_kick_check(clk)) {
229 * Users are supposed to first call clk_set_rate() only with
230 * clk_round_rate() results. So, we don't fix wrong rates here, but
231 * guard against them anyway
234 p_rate = clk_get_rate(clk->parent);
235 if (rate == p_rate) {
238 step = DIV_ROUND_CLOSEST(p_rate, 32);
240 if (rate > p_rate || rate < step) {
245 val = 32 - rate / step;
248 frqcrc = clk->mapped_reg + (FRQCRC - (u32)clk->enable_reg);
250 iowrite32((ioread32(frqcrc) & ~(clk->div_mask << clk->enable_bit)) |
251 (val << clk->enable_bit), frqcrc);
253 ret = frqcr_kick_do(clk);
256 atomic_dec(&frqcr_lock);
257 __clk_put(clk->parent);
261 static long zclk_round_rate(struct clk *clk, unsigned long rate)
264 * theoretical rate = parent rate * multiplier / 32,
265 * where 1 <= multiplier <= 32. Therefore we should do
266 * multiplier = rate * 32 / parent rate
267 * rounded rate = parent rate * multiplier / 32.
268 * However, multiplication before division won't fit in 32 bits, so
269 * we sacrifice some precision by first dividing and then multiplying.
270 * To find the nearest divisor we calculate both and pick up the best
271 * one. This avoids 64-bit arithmetics.
273 unsigned long step, mul_min, mul_max, rate_min, rate_max;
275 rate_max = clk_get_rate(clk->parent);
277 /* output freq <= parent */
278 if (rate >= rate_max)
281 step = DIV_ROUND_CLOSEST(rate_max, 32);
282 /* output freq >= parent / 32 */
286 mul_min = rate / step;
287 mul_max = DIV_ROUND_UP(rate, step);
288 rate_min = step * mul_min;
289 if (mul_max == mul_min)
292 rate_max = step * mul_max;
294 if (rate_max - rate < rate - rate_min)
300 static unsigned long zclk_recalc(struct clk *clk)
302 void __iomem *frqcrc = FRQCRC - (u32)clk->enable_reg + clk->mapped_reg;
303 unsigned int max = clk->div_mask + 1;
304 unsigned long val = ((ioread32(frqcrc) >> clk->enable_bit) &
307 return DIV_ROUND_CLOSEST(clk_get_rate(clk->parent), max) *
311 static struct sh_clk_ops zclk_ops = {
312 .recalc = zclk_recalc,
313 .set_rate = zclk_set_rate,
314 .round_rate = zclk_round_rate,
317 static struct clk z_clk = {
321 /* We'll need to access FRQCRB and FRQCRC */
322 .enable_reg = (void __iomem *)FRQCRB,
326 static struct clk *main_clks[] = {
347 static void div4_kick(struct clk *clk)
349 if (!WARN(!atomic_inc_and_test(&frqcr_lock), "FRQCR* lock broken!\n"))
351 atomic_dec(&frqcr_lock);
354 static int divisors[] = { 2, 3, 4, 6, 8, 12, 16, 18, 24, 0, 36, 48, 10};
356 static struct clk_div_mult_table div4_div_mult_table = {
357 .divisors = divisors,
358 .nr_divisors = ARRAY_SIZE(divisors),
361 static struct clk_div4_table div4_table = {
362 .div_mult_table = &div4_div_mult_table,
367 DIV4_I, DIV4_M3, DIV4_B, DIV4_M1, DIV4_M2,
368 DIV4_ZX, DIV4_ZS, DIV4_HP,
371 static struct clk div4_clks[DIV4_NR] = {
372 [DIV4_I] = SH_CLK_DIV4(&pll1_clk, FRQCRA, 20, 0x0dff, CLK_ENABLE_ON_INIT),
373 [DIV4_M3] = SH_CLK_DIV4(&pll1_clk, FRQCRA, 12, 0x1dff, CLK_ENABLE_ON_INIT),
374 [DIV4_B] = SH_CLK_DIV4(&pll1_clk, FRQCRA, 8, 0x0dff, CLK_ENABLE_ON_INIT),
375 [DIV4_M1] = SH_CLK_DIV4(&pll1_clk, FRQCRA, 4, 0x1dff, 0),
376 [DIV4_M2] = SH_CLK_DIV4(&pll1_clk, FRQCRA, 0, 0x1dff, 0),
377 [DIV4_ZX] = SH_CLK_DIV4(&pll1_clk, FRQCRB, 12, 0x0dff, 0),
378 [DIV4_ZS] = SH_CLK_DIV4(&pll1_clk, FRQCRB, 8, 0x0dff, 0),
379 [DIV4_HP] = SH_CLK_DIV4(&pll1_clk, FRQCRB, 4, 0x0dff, 0),
384 DIV6_SDHI0, DIV6_SDHI1, DIV6_SDHI2,
385 DIV6_MMC0, DIV6_MMC1,
386 DIV6_VCK1, DIV6_VCK2, DIV6_VCK3, DIV6_VCK4, DIV6_VCK5,
387 DIV6_FSIA, DIV6_FSIB,
388 DIV6_MP, DIV6_M4, DIV6_HSI, DIV6_SPUV,
391 static struct clk *div6_parents[8] = {
392 [0] = &pll1_div2_clk,
395 [4] = &main_div2_clk,
399 static struct clk *fsia_parents[4] = {
400 [0] = &pll1_div2_clk,
405 static struct clk *fsib_parents[4] = {
406 [0] = &pll1_div2_clk,
411 static struct clk *mp_parents[4] = {
412 [0] = &pll1_div2_clk,
418 static struct clk *m4_parents[2] = {
422 static struct clk *hsi_parents[4] = {
424 [1] = &pll1_div2_clk,
429 * SH_CLK_DIV6_EXT() macro doesn't care .mapping
430 * but, it is necessary on R-Car (= ioremap() base CPG)
431 * The difference between
432 * SH_CLK_DIV6_EXT() <--> SH_CLK_MAP_DIV6_EXT()
435 #define SH_CLK_MAP_DIV6_EXT(_reg, _flags, _parents, \
436 _num_parents, _src_shift, _src_width) \
438 .enable_reg = (void __iomem *)_reg, \
439 .enable_bit = 0, /* unused */ \
440 .flags = _flags | CLK_MASK_DIV_ON_DISABLE, \
441 .div_mask = SH_CLK_DIV6_MSK, \
442 .parent_table = _parents, \
443 .parent_num = _num_parents, \
444 .src_shift = _src_shift, \
445 .src_width = _src_width, \
446 .mapping = &cpg_mapping, \
449 static struct clk div6_clks[DIV6_NR] = {
450 [DIV6_ZB] = SH_CLK_MAP_DIV6_EXT(ZBCKCR, CLK_ENABLE_ON_INIT,
451 div6_parents, 2, 7, 1),
452 [DIV6_SDHI0] = SH_CLK_MAP_DIV6_EXT(SD0CKCR, 0,
453 div6_parents, 2, 6, 2),
454 [DIV6_SDHI1] = SH_CLK_MAP_DIV6_EXT(SD1CKCR, 0,
455 div6_parents, 2, 6, 2),
456 [DIV6_SDHI2] = SH_CLK_MAP_DIV6_EXT(SD2CKCR, 0,
457 div6_parents, 2, 6, 2),
458 [DIV6_MMC0] = SH_CLK_MAP_DIV6_EXT(MMC0CKCR, 0,
459 div6_parents, 2, 6, 2),
460 [DIV6_MMC1] = SH_CLK_MAP_DIV6_EXT(MMC1CKCR, 0,
461 div6_parents, 2, 6, 2),
462 [DIV6_VCK1] = SH_CLK_MAP_DIV6_EXT(VCLKCR1, 0, /* didn't care bit[6-7] */
463 div6_parents, ARRAY_SIZE(div6_parents), 12, 3),
464 [DIV6_VCK2] = SH_CLK_MAP_DIV6_EXT(VCLKCR2, 0, /* didn't care bit[6-7] */
465 div6_parents, ARRAY_SIZE(div6_parents), 12, 3),
466 [DIV6_VCK3] = SH_CLK_MAP_DIV6_EXT(VCLKCR3, 0, /* didn't care bit[6-7] */
467 div6_parents, ARRAY_SIZE(div6_parents), 12, 3),
468 [DIV6_VCK4] = SH_CLK_MAP_DIV6_EXT(VCLKCR4, 0, /* didn't care bit[6-7] */
469 div6_parents, ARRAY_SIZE(div6_parents), 12, 3),
470 [DIV6_VCK5] = SH_CLK_MAP_DIV6_EXT(VCLKCR5, 0, /* didn't care bit[6-7] */
471 div6_parents, ARRAY_SIZE(div6_parents), 12, 3),
472 [DIV6_FSIA] = SH_CLK_MAP_DIV6_EXT(FSIACKCR, 0,
473 fsia_parents, ARRAY_SIZE(fsia_parents), 6, 2),
474 [DIV6_FSIB] = SH_CLK_MAP_DIV6_EXT(FSIBCKCR, 0,
475 fsib_parents, ARRAY_SIZE(fsib_parents), 6, 2),
476 [DIV6_MP] = SH_CLK_MAP_DIV6_EXT(MPCKCR, 0, /* it needs bit[9-11] control */
477 mp_parents, ARRAY_SIZE(mp_parents), 6, 2),
478 /* pll2s will be selected always for M4 */
479 [DIV6_M4] = SH_CLK_MAP_DIV6_EXT(M4CKCR, 0, /* it needs bit[9] control */
480 m4_parents, ARRAY_SIZE(m4_parents), 6, 1),
481 [DIV6_HSI] = SH_CLK_MAP_DIV6_EXT(HSICKCR, 0, /* it needs bit[9] control */
482 hsi_parents, ARRAY_SIZE(hsi_parents), 6, 2),
483 [DIV6_SPUV] = SH_CLK_MAP_DIV6_EXT(SPUVCKCR, 0,
484 mp_parents, ARRAY_SIZE(mp_parents), 6, 2),
489 MSTP217, MSTP216, MSTP207, MSTP206, MSTP204, MSTP203,
490 MSTP315, MSTP314, MSTP313, MSTP312, MSTP305,
495 static struct clk mstp_clks[MSTP_NR] = {
496 [MSTP204] = SH_CLK_MSTP32(&div6_clks[DIV6_MP], SMSTPCR2, 4, 0), /* SCIFA0 */
497 [MSTP203] = SH_CLK_MSTP32(&div6_clks[DIV6_MP], SMSTPCR2, 3, 0), /* SCIFA1 */
498 [MSTP206] = SH_CLK_MSTP32(&div6_clks[DIV6_MP], SMSTPCR2, 6, 0), /* SCIFB0 */
499 [MSTP207] = SH_CLK_MSTP32(&div6_clks[DIV6_MP], SMSTPCR2, 7, 0), /* SCIFB1 */
500 [MSTP216] = SH_CLK_MSTP32(&div6_clks[DIV6_MP], SMSTPCR2, 16, 0), /* SCIFB2 */
501 [MSTP217] = SH_CLK_MSTP32(&div6_clks[DIV6_MP], SMSTPCR2, 17, 0), /* SCIFB3 */
502 [MSTP305] = SH_CLK_MSTP32(&div6_clks[DIV6_MMC1],SMSTPCR3, 5, 0), /* MMCIF1 */
503 [MSTP312] = SH_CLK_MSTP32(&div6_clks[DIV6_SDHI2],SMSTPCR3, 12, 0), /* SDHI2 */
504 [MSTP313] = SH_CLK_MSTP32(&div6_clks[DIV6_SDHI1],SMSTPCR3, 13, 0), /* SDHI1 */
505 [MSTP314] = SH_CLK_MSTP32(&div6_clks[DIV6_SDHI0],SMSTPCR3, 14, 0), /* SDHI0 */
506 [MSTP315] = SH_CLK_MSTP32(&div6_clks[DIV6_MMC0],SMSTPCR3, 15, 0), /* MMCIF0 */
507 [MSTP522] = SH_CLK_MSTP32(&extal2_clk, SMSTPCR5, 22, 0), /* Thermal */
510 static struct clk_lookup lookups[] = {
512 CLKDEV_CON_ID("extal1", &extal1_clk),
513 CLKDEV_CON_ID("extal1_div2", &extal1_div2_clk),
514 CLKDEV_CON_ID("extal2", &extal2_clk),
515 CLKDEV_CON_ID("extal2_div2", &extal2_div2_clk),
516 CLKDEV_CON_ID("extal2_div4", &extal2_div4_clk),
517 CLKDEV_CON_ID("fsiack", &fsiack_clk),
518 CLKDEV_CON_ID("fsibck", &fsibck_clk),
521 CLKDEV_CON_ID("pll1", &pll1_clk),
522 CLKDEV_CON_ID("pll1_div2", &pll1_div2_clk),
523 CLKDEV_CON_ID("pll2", &pll2_clk),
524 CLKDEV_CON_ID("pll2s", &pll2s_clk),
525 CLKDEV_CON_ID("pll2h", &pll2h_clk),
528 CLKDEV_DEV_ID("cpufreq-cpu0", &z_clk),
531 CLKDEV_CON_ID("zb", &div6_clks[DIV6_ZB]),
532 CLKDEV_CON_ID("vck1", &div6_clks[DIV6_VCK1]),
533 CLKDEV_CON_ID("vck2", &div6_clks[DIV6_VCK2]),
534 CLKDEV_CON_ID("vck3", &div6_clks[DIV6_VCK3]),
535 CLKDEV_CON_ID("vck4", &div6_clks[DIV6_VCK4]),
536 CLKDEV_CON_ID("vck5", &div6_clks[DIV6_VCK5]),
537 CLKDEV_CON_ID("fsia", &div6_clks[DIV6_FSIA]),
538 CLKDEV_CON_ID("fsib", &div6_clks[DIV6_FSIB]),
539 CLKDEV_CON_ID("mp", &div6_clks[DIV6_MP]),
540 CLKDEV_CON_ID("m4", &div6_clks[DIV6_M4]),
541 CLKDEV_CON_ID("hsi", &div6_clks[DIV6_HSI]),
542 CLKDEV_CON_ID("spuv", &div6_clks[DIV6_SPUV]),
545 CLKDEV_DEV_ID("sh-sci.0", &mstp_clks[MSTP204]),
546 CLKDEV_DEV_ID("sh-sci.1", &mstp_clks[MSTP203]),
547 CLKDEV_DEV_ID("sh-sci.2", &mstp_clks[MSTP206]),
548 CLKDEV_DEV_ID("sh-sci.3", &mstp_clks[MSTP207]),
549 CLKDEV_DEV_ID("sh-sci.4", &mstp_clks[MSTP216]),
550 CLKDEV_DEV_ID("sh-sci.5", &mstp_clks[MSTP217]),
551 CLKDEV_DEV_ID("rcar_thermal", &mstp_clks[MSTP522]),
552 CLKDEV_DEV_ID("sh_mmcif.1", &mstp_clks[MSTP305]),
553 CLKDEV_DEV_ID("ee220000.mmcif", &mstp_clks[MSTP305]),
554 CLKDEV_DEV_ID("sh_mobile_sdhi.2", &mstp_clks[MSTP312]),
555 CLKDEV_DEV_ID("ee140000.sdhi", &mstp_clks[MSTP312]),
556 CLKDEV_DEV_ID("sh_mobile_sdhi.1", &mstp_clks[MSTP313]),
557 CLKDEV_DEV_ID("ee120000.sdhi", &mstp_clks[MSTP313]),
558 CLKDEV_DEV_ID("sh_mobile_sdhi.0", &mstp_clks[MSTP314]),
559 CLKDEV_DEV_ID("ee100000.sdhi", &mstp_clks[MSTP314]),
560 CLKDEV_DEV_ID("sh_mmcif.0", &mstp_clks[MSTP315]),
561 CLKDEV_DEV_ID("ee200000.mmcif", &mstp_clks[MSTP315]),
564 CLKDEV_DEV_ID("e61f0000.thermal", &mstp_clks[MSTP522]),
567 void __init r8a73a4_clock_init(void)
573 atomic_set(&frqcr_lock, -1);
575 reg = ioremap_nocache(CKSCR, PAGE_SIZE);
577 ckscr = ioread32(reg);
580 switch ((ckscr >> 28) & 0x3) {
582 main_clk.parent = &extal1_clk;
585 main_clk.parent = &extal1_div2_clk;
588 main_clk.parent = &extal2_clk;
591 main_clk.parent = &extal2_div2_clk;
595 for (k = 0; !ret && (k < ARRAY_SIZE(main_clks)); k++)
596 ret = clk_register(main_clks[k]);
599 ret = sh_clk_div4_register(div4_clks, DIV4_NR, &div4_table);
602 ret = sh_clk_div6_reparent_register(div6_clks, DIV6_NR);
605 ret = sh_clk_mstp_register(mstp_clks, MSTP_NR);
607 clkdev_add_table(lookups, ARRAY_SIZE(lookups));
612 panic("failed to setup r8a73a4 clocks\n");