xref: /netbsd-src/sys/arch/arm/sunxi/sunxi_ccu.c (revision 796c32c94f6e154afc9de0f63da35c91bb739b45)
1 /* $NetBSD: sunxi_ccu.c,v 1.7 2017/09/30 12:48:58 jmcneill Exp $ */
2 
3 /*-
4  * Copyright (c) 2017 Jared McNeill <jmcneill@invisible.ca>
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  *
16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
21  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
22  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
23  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
24  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26  * SUCH DAMAGE.
27  */
28 
29 #include "opt_soc.h"
30 #include "opt_multiprocessor.h"
31 #include "opt_fdt_arm.h"
32 
33 #include <sys/cdefs.h>
34 __KERNEL_RCSID(0, "$NetBSD: sunxi_ccu.c,v 1.7 2017/09/30 12:48:58 jmcneill Exp $");
35 
36 #include <sys/param.h>
37 #include <sys/bus.h>
38 #include <sys/cpu.h>
39 #include <sys/device.h>
40 
41 #include <dev/fdt/fdtvar.h>
42 
43 #include <dev/clk/clk_backend.h>
44 
45 #include <arm/sunxi/sunxi_ccu.h>
46 
47 static void *
48 sunxi_ccu_reset_acquire(device_t dev, const void *data, size_t len)
49 {
50 	struct sunxi_ccu_softc * const sc = device_private(dev);
51 	struct sunxi_ccu_reset *reset;
52 
53 	if (len != 4)
54 		return NULL;
55 
56 	const u_int reset_id = be32dec(data);
57 
58 	if (reset_id >= sc->sc_nresets)
59 		return NULL;
60 
61 	reset = &sc->sc_resets[reset_id];
62 	if (reset->mask == 0)
63 		return NULL;
64 
65 	return reset;
66 }
67 
68 static void
69 sunxi_ccu_reset_release(device_t dev, void *priv)
70 {
71 }
72 
73 static int
74 sunxi_ccu_reset_assert(device_t dev, void *priv)
75 {
76 	struct sunxi_ccu_softc * const sc = device_private(dev);
77 	struct sunxi_ccu_reset * const reset = priv;
78 
79 	const uint32_t val = CCU_READ(sc, reset->reg);
80 	CCU_WRITE(sc, reset->reg, val & ~reset->mask);
81 
82 	return 0;
83 }
84 
85 static int
86 sunxi_ccu_reset_deassert(device_t dev, void *priv)
87 {
88 	struct sunxi_ccu_softc * const sc = device_private(dev);
89 	struct sunxi_ccu_reset * const reset = priv;
90 
91 	const uint32_t val = CCU_READ(sc, reset->reg);
92 	CCU_WRITE(sc, reset->reg, val | reset->mask);
93 
94 	return 0;
95 }
96 
97 static const struct fdtbus_reset_controller_func sunxi_ccu_fdtreset_funcs = {
98 	.acquire = sunxi_ccu_reset_acquire,
99 	.release = sunxi_ccu_reset_release,
100 	.reset_assert = sunxi_ccu_reset_assert,
101 	.reset_deassert = sunxi_ccu_reset_deassert,
102 };
103 
104 static struct clk *
105 sunxi_ccu_clock_decode(device_t dev, const void *data, size_t len)
106 {
107 	struct sunxi_ccu_softc * const sc = device_private(dev);
108 	struct sunxi_ccu_clk *clk;
109 
110 	if (len != 4)
111 		return NULL;
112 
113 	const u_int clock_id = be32dec(data);
114 	if (clock_id >= sc->sc_nclks)
115 		return NULL;
116 
117 	clk = &sc->sc_clks[clock_id];
118 	if (clk->type == SUNXI_CCU_UNKNOWN)
119 		return NULL;
120 
121 	return &clk->base;
122 }
123 
124 static const struct fdtbus_clock_controller_func sunxi_ccu_fdtclock_funcs = {
125 	.decode = sunxi_ccu_clock_decode,
126 };
127 
128 static struct clk *
129 sunxi_ccu_clock_get(void *priv, const char *name)
130 {
131 	struct sunxi_ccu_softc * const sc = priv;
132 	struct sunxi_ccu_clk *clk;
133 
134 	clk = sunxi_ccu_clock_find(sc, name);
135 	if (clk == NULL)
136 		return NULL;
137 
138 	return &clk->base;
139 }
140 
141 static void
142 sunxi_ccu_clock_put(void *priv, struct clk *clk)
143 {
144 }
145 
146 static u_int
147 sunxi_ccu_clock_get_rate(void *priv, struct clk *clkp)
148 {
149 	struct sunxi_ccu_softc * const sc = priv;
150 	struct sunxi_ccu_clk *clk = (struct sunxi_ccu_clk *)clkp;
151 	struct clk *clkp_parent;
152 
153 	if (clk->get_rate)
154 		return clk->get_rate(sc, clk);
155 
156 	clkp_parent = clk_get_parent(clkp);
157 	if (clkp_parent == NULL) {
158 		aprint_error("%s: no parent for %s\n", __func__, clk->base.name);
159 		return 0;
160 	}
161 
162 	return clk_get_rate(clkp_parent);
163 }
164 
165 static int
166 sunxi_ccu_clock_set_rate(void *priv, struct clk *clkp, u_int rate)
167 {
168 	struct sunxi_ccu_softc * const sc = priv;
169 	struct sunxi_ccu_clk *clk = (struct sunxi_ccu_clk *)clkp;
170 	struct clk *clkp_parent;
171 
172 	if (clkp->flags & CLK_SET_RATE_PARENT) {
173 		clkp_parent = clk_get_parent(clkp);
174 		if (clkp_parent == NULL) {
175 			aprint_error("%s: no parent for %s\n", __func__, clk->base.name);
176 			return ENXIO;
177 		}
178 		return clk_set_rate(clkp_parent, rate);
179 	}
180 
181 	if (clk->set_rate)
182 		return clk->set_rate(sc, clk, rate);
183 
184 	return ENXIO;
185 }
186 
187 static int
188 sunxi_ccu_clock_enable(void *priv, struct clk *clkp)
189 {
190 	struct sunxi_ccu_softc * const sc = priv;
191 	struct sunxi_ccu_clk *clk = (struct sunxi_ccu_clk *)clkp;
192 	struct clk *clkp_parent;
193 	int error = 0;
194 
195 	clkp_parent = clk_get_parent(clkp);
196 	if (clkp_parent != NULL) {
197 		error = clk_enable(clkp_parent);
198 		if (error != 0)
199 			return error;
200 	}
201 
202 	if (clk->enable)
203 		error = clk->enable(sc, clk, 1);
204 
205 	return error;
206 }
207 
208 static int
209 sunxi_ccu_clock_disable(void *priv, struct clk *clkp)
210 {
211 	struct sunxi_ccu_softc * const sc = priv;
212 	struct sunxi_ccu_clk *clk = (struct sunxi_ccu_clk *)clkp;
213 	int error = EINVAL;
214 
215 	if (clk->enable)
216 		error = clk->enable(sc, clk, 0);
217 
218 	return error;
219 }
220 
221 static int
222 sunxi_ccu_clock_set_parent(void *priv, struct clk *clkp,
223     struct clk *clkp_parent)
224 {
225 	struct sunxi_ccu_softc * const sc = priv;
226 	struct sunxi_ccu_clk *clk = (struct sunxi_ccu_clk *)clkp;
227 
228 	if (clk->set_parent == NULL)
229 		return EINVAL;
230 
231 	return clk->set_parent(sc, clk, clkp_parent->name);
232 }
233 
234 static struct clk *
235 sunxi_ccu_clock_get_parent(void *priv, struct clk *clkp)
236 {
237 	struct sunxi_ccu_softc * const sc = priv;
238 	struct sunxi_ccu_clk *clk = (struct sunxi_ccu_clk *)clkp;
239 	struct sunxi_ccu_clk *clk_parent;
240 	const char *parent;
241 
242 	if (clk->get_parent == NULL)
243 		return NULL;
244 
245 	parent = clk->get_parent(sc, clk);
246 	if (parent == NULL)
247 		return NULL;
248 
249 	clk_parent = sunxi_ccu_clock_find(sc, parent);
250 	if (clk_parent != NULL)
251 		return &clk_parent->base;
252 
253 	/* No parent in this domain, try FDT */
254 	return fdtbus_clock_get(sc->sc_phandle, parent);
255 }
256 
257 static const struct clk_funcs sunxi_ccu_clock_funcs = {
258 	.get = sunxi_ccu_clock_get,
259 	.put = sunxi_ccu_clock_put,
260 	.get_rate = sunxi_ccu_clock_get_rate,
261 	.set_rate = sunxi_ccu_clock_set_rate,
262 	.enable = sunxi_ccu_clock_enable,
263 	.disable = sunxi_ccu_clock_disable,
264 	.set_parent = sunxi_ccu_clock_set_parent,
265 	.get_parent = sunxi_ccu_clock_get_parent,
266 };
267 
268 struct sunxi_ccu_clk *
269 sunxi_ccu_clock_find(struct sunxi_ccu_softc *sc, const char *name)
270 {
271 	for (int i = 0; i < sc->sc_nclks; i++) {
272 		if (sc->sc_clks[i].base.name == NULL)
273 			continue;
274 		if (strcmp(sc->sc_clks[i].base.name, name) == 0)
275 			return &sc->sc_clks[i];
276 	}
277 
278 	return NULL;
279 }
280 
281 int
282 sunxi_ccu_attach(struct sunxi_ccu_softc *sc)
283 {
284 	bus_addr_t addr;
285 	bus_size_t size;
286 	int i;
287 
288 	if (fdtbus_get_reg(sc->sc_phandle, 0, &addr, &size) != 0) {
289 		aprint_error(": couldn't get registers\n");
290 		return ENXIO;
291 	}
292 	if (bus_space_map(sc->sc_bst, addr, size, 0, &sc->sc_bsh) != 0) {
293 		aprint_error(": couldn't map registers\n");
294 		return ENXIO;
295 	}
296 
297 	sc->sc_clkdom.funcs = &sunxi_ccu_clock_funcs;
298 	sc->sc_clkdom.priv = sc;
299 	for (i = 0; i < sc->sc_nclks; i++)
300 		sc->sc_clks[i].base.domain = &sc->sc_clkdom;
301 
302 	fdtbus_register_clock_controller(sc->sc_dev, sc->sc_phandle,
303 	    &sunxi_ccu_fdtclock_funcs);
304 
305 	fdtbus_register_reset_controller(sc->sc_dev, sc->sc_phandle,
306 	    &sunxi_ccu_fdtreset_funcs);
307 
308 	return 0;
309 }
310 
311 void
312 sunxi_ccu_print(struct sunxi_ccu_softc *sc)
313 {
314 	struct sunxi_ccu_clk *clk;
315 	struct clk *clkp_parent;
316 	const char *type;
317 	int i;
318 
319 	for (i = 0; i < sc->sc_nclks; i++) {
320 		clk = &sc->sc_clks[i];
321 		if (clk->type == SUNXI_CCU_UNKNOWN)
322 			continue;
323 
324 		clkp_parent = clk_get_parent(&clk->base);
325 
326 		switch (clk->type) {
327 		case SUNXI_CCU_GATE:		type = "gate"; break;
328 		case SUNXI_CCU_NM:		type = "nm"; break;
329 		case SUNXI_CCU_NKMP:		type = "nkmp"; break;
330 		case SUNXI_CCU_PREDIV:		type = "prediv"; break;
331 		case SUNXI_CCU_DIV:		type = "div"; break;
332 		case SUNXI_CCU_PHASE:		type = "phase"; break;
333 		case SUNXI_CCU_FIXED_FACTOR:	type = "fixed-factor"; break;
334 		default:			type = "???"; break;
335 		}
336 
337         	aprint_debug_dev(sc->sc_dev,
338 		    "%3d %-12s %2s %-12s %-7s ",
339 		    i,
340         	    clk->base.name,
341         	    clkp_parent ? "<-" : "",
342         	    clkp_parent ? clkp_parent->name : "",
343         	    type);
344 		aprint_debug("%10d Hz\n", clk_get_rate(&clk->base));
345 	}
346 }
347