Merge branch 'for-linus' of git://git.kernel.org/pub/scm/linux/kernel/git/mason/linux...
[platform/adaptation/renesas_rcar/renesas_kernel.git] / drivers / clk / clk-highbank.c
1 /*
2  * Copyright 2011-2012 Calxeda, Inc.
3  *
4  * This program is free software; you can redistribute it and/or modify it
5  * under the terms and conditions of the GNU General Public License,
6  * version 2, as published by the Free Software Foundation.
7  *
8  * This program is distributed in the hope it will be useful, but WITHOUT
9  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
10  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
11  * more details.
12  *
13  * You should have received a copy of the GNU General Public License along with
14  * this program.  If not, see <http://www.gnu.org/licenses/>.
15  */
16
17 #include <linux/kernel.h>
18 #include <linux/slab.h>
19 #include <linux/err.h>
20 #include <linux/clk-provider.h>
21 #include <linux/io.h>
22 #include <linux/of.h>
23 #include <linux/of_address.h>
24
25 #define HB_PLL_LOCK_500         0x20000000
26 #define HB_PLL_LOCK             0x10000000
27 #define HB_PLL_DIVF_SHIFT       20
28 #define HB_PLL_DIVF_MASK        0x0ff00000
29 #define HB_PLL_DIVQ_SHIFT       16
30 #define HB_PLL_DIVQ_MASK        0x00070000
31 #define HB_PLL_DIVR_SHIFT       8
32 #define HB_PLL_DIVR_MASK        0x00001f00
33 #define HB_PLL_RANGE_SHIFT      4
34 #define HB_PLL_RANGE_MASK       0x00000070
35 #define HB_PLL_BYPASS           0x00000008
36 #define HB_PLL_RESET            0x00000004
37 #define HB_PLL_EXT_BYPASS       0x00000002
38 #define HB_PLL_EXT_ENA          0x00000001
39
40 #define HB_PLL_VCO_MIN_FREQ     2133000000
41 #define HB_PLL_MAX_FREQ         HB_PLL_VCO_MIN_FREQ
42 #define HB_PLL_MIN_FREQ         (HB_PLL_VCO_MIN_FREQ / 64)
43
44 #define HB_A9_BCLK_DIV_MASK     0x00000006
45 #define HB_A9_BCLK_DIV_SHIFT    1
46 #define HB_A9_PCLK_DIV          0x00000001
47
48 struct hb_clk {
49         struct clk_hw   hw;
50         void __iomem    *reg;
51         char *parent_name;
52 };
53 #define to_hb_clk(p) container_of(p, struct hb_clk, hw)
54
55 static int clk_pll_prepare(struct clk_hw *hwclk)
56         {
57         struct hb_clk *hbclk = to_hb_clk(hwclk);
58         u32 reg;
59
60         reg = readl(hbclk->reg);
61         reg &= ~HB_PLL_RESET;
62         writel(reg, hbclk->reg);
63
64         while ((readl(hbclk->reg) & HB_PLL_LOCK) == 0)
65                 ;
66         while ((readl(hbclk->reg) & HB_PLL_LOCK_500) == 0)
67                 ;
68
69         return 0;
70 }
71
72 static void clk_pll_unprepare(struct clk_hw *hwclk)
73 {
74         struct hb_clk *hbclk = to_hb_clk(hwclk);
75         u32 reg;
76
77         reg = readl(hbclk->reg);
78         reg |= HB_PLL_RESET;
79         writel(reg, hbclk->reg);
80 }
81
82 static int clk_pll_enable(struct clk_hw *hwclk)
83 {
84         struct hb_clk *hbclk = to_hb_clk(hwclk);
85         u32 reg;
86
87         reg = readl(hbclk->reg);
88         reg |= HB_PLL_EXT_ENA;
89         writel(reg, hbclk->reg);
90
91         return 0;
92 }
93
94 static void clk_pll_disable(struct clk_hw *hwclk)
95 {
96         struct hb_clk *hbclk = to_hb_clk(hwclk);
97         u32 reg;
98
99         reg = readl(hbclk->reg);
100         reg &= ~HB_PLL_EXT_ENA;
101         writel(reg, hbclk->reg);
102 }
103
104 static unsigned long clk_pll_recalc_rate(struct clk_hw *hwclk,
105                                          unsigned long parent_rate)
106 {
107         struct hb_clk *hbclk = to_hb_clk(hwclk);
108         unsigned long divf, divq, vco_freq, reg;
109
110         reg = readl(hbclk->reg);
111         if (reg & HB_PLL_EXT_BYPASS)
112                 return parent_rate;
113
114         divf = (reg & HB_PLL_DIVF_MASK) >> HB_PLL_DIVF_SHIFT;
115         divq = (reg & HB_PLL_DIVQ_MASK) >> HB_PLL_DIVQ_SHIFT;
116         vco_freq = parent_rate * (divf + 1);
117
118         return vco_freq / (1 << divq);
119 }
120
121 static void clk_pll_calc(unsigned long rate, unsigned long ref_freq,
122                         u32 *pdivq, u32 *pdivf)
123 {
124         u32 divq, divf;
125         unsigned long vco_freq;
126
127         if (rate < HB_PLL_MIN_FREQ)
128                 rate = HB_PLL_MIN_FREQ;
129         if (rate > HB_PLL_MAX_FREQ)
130                 rate = HB_PLL_MAX_FREQ;
131
132         for (divq = 1; divq <= 6; divq++) {
133                 if ((rate * (1 << divq)) >= HB_PLL_VCO_MIN_FREQ)
134                         break;
135         }
136
137         vco_freq = rate * (1 << divq);
138         divf = (vco_freq + (ref_freq / 2)) / ref_freq;
139         divf--;
140
141         *pdivq = divq;
142         *pdivf = divf;
143 }
144
145 static long clk_pll_round_rate(struct clk_hw *hwclk, unsigned long rate,
146                                unsigned long *parent_rate)
147 {
148         u32 divq, divf;
149         unsigned long ref_freq = *parent_rate;
150
151         clk_pll_calc(rate, ref_freq, &divq, &divf);
152
153         return (ref_freq * (divf + 1)) / (1 << divq);
154 }
155
156 static int clk_pll_set_rate(struct clk_hw *hwclk, unsigned long rate,
157                             unsigned long parent_rate)
158 {
159         struct hb_clk *hbclk = to_hb_clk(hwclk);
160         u32 divq, divf;
161         u32 reg;
162
163         clk_pll_calc(rate, parent_rate, &divq, &divf);
164
165         reg = readl(hbclk->reg);
166         if (divf != ((reg & HB_PLL_DIVF_MASK) >> HB_PLL_DIVF_SHIFT)) {
167                 /* Need to re-lock PLL, so put it into bypass mode */
168                 reg |= HB_PLL_EXT_BYPASS;
169                 writel(reg | HB_PLL_EXT_BYPASS, hbclk->reg);
170
171                 writel(reg | HB_PLL_RESET, hbclk->reg);
172                 reg &= ~(HB_PLL_DIVF_MASK | HB_PLL_DIVQ_MASK);
173                 reg |= (divf << HB_PLL_DIVF_SHIFT) | (divq << HB_PLL_DIVQ_SHIFT);
174                 writel(reg | HB_PLL_RESET, hbclk->reg);
175                 writel(reg, hbclk->reg);
176
177                 while ((readl(hbclk->reg) & HB_PLL_LOCK) == 0)
178                         ;
179                 while ((readl(hbclk->reg) & HB_PLL_LOCK_500) == 0)
180                         ;
181                 reg |= HB_PLL_EXT_ENA;
182                 reg &= ~HB_PLL_EXT_BYPASS;
183         } else {
184                 writel(reg | HB_PLL_EXT_BYPASS, hbclk->reg);
185                 reg &= ~HB_PLL_DIVQ_MASK;
186                 reg |= divq << HB_PLL_DIVQ_SHIFT;
187                 writel(reg | HB_PLL_EXT_BYPASS, hbclk->reg);
188         }
189         writel(reg, hbclk->reg);
190
191         return 0;
192 }
193
194 static const struct clk_ops clk_pll_ops = {
195         .prepare = clk_pll_prepare,
196         .unprepare = clk_pll_unprepare,
197         .enable = clk_pll_enable,
198         .disable = clk_pll_disable,
199         .recalc_rate = clk_pll_recalc_rate,
200         .round_rate = clk_pll_round_rate,
201         .set_rate = clk_pll_set_rate,
202 };
203
204 static unsigned long clk_cpu_periphclk_recalc_rate(struct clk_hw *hwclk,
205                                                    unsigned long parent_rate)
206 {
207         struct hb_clk *hbclk = to_hb_clk(hwclk);
208         u32 div = (readl(hbclk->reg) & HB_A9_PCLK_DIV) ? 8 : 4;
209         return parent_rate / div;
210 }
211
212 static const struct clk_ops a9periphclk_ops = {
213         .recalc_rate = clk_cpu_periphclk_recalc_rate,
214 };
215
216 static unsigned long clk_cpu_a9bclk_recalc_rate(struct clk_hw *hwclk,
217                                                 unsigned long parent_rate)
218 {
219         struct hb_clk *hbclk = to_hb_clk(hwclk);
220         u32 div = (readl(hbclk->reg) & HB_A9_BCLK_DIV_MASK) >> HB_A9_BCLK_DIV_SHIFT;
221
222         return parent_rate / (div + 2);
223 }
224
225 static const struct clk_ops a9bclk_ops = {
226         .recalc_rate = clk_cpu_a9bclk_recalc_rate,
227 };
228
229 static unsigned long clk_periclk_recalc_rate(struct clk_hw *hwclk,
230                                              unsigned long parent_rate)
231 {
232         struct hb_clk *hbclk = to_hb_clk(hwclk);
233         u32 div;
234
235         div = readl(hbclk->reg) & 0x1f;
236         div++;
237         div *= 2;
238
239         return parent_rate / div;
240 }
241
242 static long clk_periclk_round_rate(struct clk_hw *hwclk, unsigned long rate,
243                                    unsigned long *parent_rate)
244 {
245         u32 div;
246
247         div = *parent_rate / rate;
248         div++;
249         div &= ~0x1;
250
251         return *parent_rate / div;
252 }
253
254 static int clk_periclk_set_rate(struct clk_hw *hwclk, unsigned long rate,
255                                 unsigned long parent_rate)
256 {
257         struct hb_clk *hbclk = to_hb_clk(hwclk);
258         u32 div;
259
260         div = parent_rate / rate;
261         if (div & 0x1)
262                 return -EINVAL;
263
264         writel(div >> 1, hbclk->reg);
265         return 0;
266 }
267
268 static const struct clk_ops periclk_ops = {
269         .recalc_rate = clk_periclk_recalc_rate,
270         .round_rate = clk_periclk_round_rate,
271         .set_rate = clk_periclk_set_rate,
272 };
273
274 static __init struct clk *hb_clk_init(struct device_node *node, const struct clk_ops *ops)
275 {
276         u32 reg;
277         struct clk *clk;
278         struct hb_clk *hb_clk;
279         const char *clk_name = node->name;
280         const char *parent_name;
281         struct clk_init_data init;
282         struct device_node *srnp;
283         int rc;
284
285         rc = of_property_read_u32(node, "reg", &reg);
286         if (WARN_ON(rc))
287                 return NULL;
288
289         hb_clk = kzalloc(sizeof(*hb_clk), GFP_KERNEL);
290         if (WARN_ON(!hb_clk))
291                 return NULL;
292
293         /* Map system registers */
294         srnp = of_find_compatible_node(NULL, NULL, "calxeda,hb-sregs");
295         hb_clk->reg = of_iomap(srnp, 0);
296         BUG_ON(!hb_clk->reg);
297         hb_clk->reg += reg;
298
299         of_property_read_string(node, "clock-output-names", &clk_name);
300
301         init.name = clk_name;
302         init.ops = ops;
303         init.flags = 0;
304         parent_name = of_clk_get_parent_name(node, 0);
305         init.parent_names = &parent_name;
306         init.num_parents = 1;
307
308         hb_clk->hw.init = &init;
309
310         clk = clk_register(NULL, &hb_clk->hw);
311         if (WARN_ON(IS_ERR(clk))) {
312                 kfree(hb_clk);
313                 return NULL;
314         }
315         rc = of_clk_add_provider(node, of_clk_src_simple_get, clk);
316         return clk;
317 }
318
319 static void __init hb_pll_init(struct device_node *node)
320 {
321         hb_clk_init(node, &clk_pll_ops);
322 }
323 CLK_OF_DECLARE(hb_pll, "calxeda,hb-pll-clock", hb_pll_init);
324
325 static void __init hb_a9periph_init(struct device_node *node)
326 {
327         hb_clk_init(node, &a9periphclk_ops);
328 }
329 CLK_OF_DECLARE(hb_a9periph, "calxeda,hb-a9periph-clock", hb_a9periph_init);
330
331 static void __init hb_a9bus_init(struct device_node *node)
332 {
333         struct clk *clk = hb_clk_init(node, &a9bclk_ops);
334         clk_prepare_enable(clk);
335 }
336 CLK_OF_DECLARE(hb_a9bus, "calxeda,hb-a9bus-clock", hb_a9bus_init);
337
338 static void __init hb_emmc_init(struct device_node *node)
339 {
340         hb_clk_init(node, &periclk_ops);
341 }
342 CLK_OF_DECLARE(hb_emmc, "calxeda,hb-emmc-clock", hb_emmc_init);