xref: /netbsd-src/sys/dev/fdt/fdt_clock.c (revision 7330f729ccf0bd976a06f95fad452fe774fc7fd1)
1 /* $NetBSD: fdt_clock.c,v 1.9 2019/10/28 21:15:34 jmcneill Exp $ */
2 
3 /*-
4  * Copyright (c) 2015 Jared D. 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 <sys/cdefs.h>
30 __KERNEL_RCSID(0, "$NetBSD: fdt_clock.c,v 1.9 2019/10/28 21:15:34 jmcneill Exp $");
31 
32 #include <sys/param.h>
33 #include <sys/bus.h>
34 #include <sys/kmem.h>
35 #include <sys/queue.h>
36 
37 #include <libfdt.h>
38 #include <dev/fdt/fdtvar.h>
39 
40 #include <dev/clk/clk_backend.h>
41 
42 struct fdtbus_clock_controller {
43 	device_t cc_dev;
44 	int cc_phandle;
45 	const struct fdtbus_clock_controller_func *cc_funcs;
46 
47 	LIST_ENTRY(fdtbus_clock_controller) cc_next;
48 };
49 
50 static LIST_HEAD(, fdtbus_clock_controller) fdtbus_clock_controllers =
51     LIST_HEAD_INITIALIZER(fdtbus_clock_controller);
52 
53 int
54 fdtbus_register_clock_controller(device_t dev, int phandle,
55     const struct fdtbus_clock_controller_func *funcs)
56 {
57 	struct fdtbus_clock_controller *cc;
58 
59 	cc = kmem_alloc(sizeof(*cc), KM_SLEEP);
60 	cc->cc_dev = dev;
61 	cc->cc_phandle = phandle;
62 	cc->cc_funcs = funcs;
63 
64 	LIST_INSERT_HEAD(&fdtbus_clock_controllers, cc, cc_next);
65 
66 	fdtbus_clock_assign(phandle);
67 
68 	return 0;
69 }
70 
71 static struct fdtbus_clock_controller *
72 fdtbus_get_clock_controller(int phandle)
73 {
74 	struct fdtbus_clock_controller *cc;
75 
76 	LIST_FOREACH(cc, &fdtbus_clock_controllers, cc_next) {
77 		if (cc->cc_phandle == phandle)
78 			return cc;
79 	}
80 
81 	return NULL;
82 }
83 
84 static struct clk *
85 fdtbus_clock_get_index_prop(int phandle, u_int index, const char *prop)
86 {
87 	struct fdtbus_clock_controller *cc;
88 	struct clk *clk = NULL;
89 	const u_int *p;
90 	u_int n, clock_cells;
91 	int len, resid;
92 
93 	p = fdtbus_get_prop(phandle, prop, &len);
94 	if (p == NULL)
95 		return NULL;
96 
97 	for (n = 0, resid = len; resid > 0; n++) {
98 		const int cc_phandle =
99 		    fdtbus_get_phandle_from_native(be32toh(p[0]));
100 		if (of_getprop_uint32(cc_phandle, "#clock-cells", &clock_cells))
101 			break;
102 		if (n == index) {
103 			cc = fdtbus_get_clock_controller(cc_phandle);
104 			if (cc == NULL)
105 				break;
106 			clk = cc->cc_funcs->decode(cc->cc_dev, cc_phandle,
107 			    clock_cells > 0 ? &p[1] : NULL, clock_cells * 4);
108 			break;
109 		}
110 		resid -= (clock_cells + 1) * 4;
111 		p += clock_cells + 1;
112 	}
113 
114 	return clk;
115 }
116 
117 struct clk *
118 fdtbus_clock_get_index(int phandle, u_int index)
119 {
120 	return fdtbus_clock_get_index_prop(phandle, index, "clocks");
121 }
122 
123 static struct clk *
124 fdtbus_clock_get_prop(int phandle, const char *clkname, const char *prop)
125 {
126 	u_int index;
127 	int err;
128 
129 	err = fdtbus_get_index(phandle, prop, clkname, &index);
130 	if (err != 0)
131 		return NULL;
132 
133 	return fdtbus_clock_get_index(phandle, index);
134 }
135 
136 u_int
137 fdtbus_clock_count(int phandle, const char *prop)
138 {
139 	u_int n, clock_cells;
140 	int len, resid;
141 
142 	const u_int *p = fdtbus_get_prop(phandle, prop, &len);
143 	if (p == NULL)
144 		return 0;
145 
146 	for (n = 0, resid = len; resid > 0; n++) {
147 		const int cc_phandle =
148 		    fdtbus_get_phandle_from_native(be32toh(p[0]));
149 		if (of_getprop_uint32(cc_phandle, "#clock-cells", &clock_cells))
150 			break;
151 		resid -= (clock_cells + 1) * 4;
152 		p += clock_cells + 1;
153 	}
154 
155 	return n;
156 }
157 
158 struct clk *
159 fdtbus_clock_get(int phandle, const char *clkname)
160 {
161 	return fdtbus_clock_get_prop(phandle, clkname, "clock-names");
162 }
163 
164 /*
165  * Search the DT for a clock by "clock-output-names" property.
166  *
167  * This should only be used by clk backends. Not for use by ordinary
168  * clock consumers!
169  */
170 struct clk *
171 fdtbus_clock_byname(const char *clkname)
172 {
173 	struct fdtbus_clock_controller *cc;
174 	u_int index, clock_cells;
175 	int err;
176 
177 	LIST_FOREACH(cc, &fdtbus_clock_controllers, cc_next) {
178 		err = fdtbus_get_index(cc->cc_phandle, "clock-output-names", clkname, &index);
179 		if (err != 0)
180 			continue;
181 		if (of_getprop_uint32(cc->cc_phandle, "#clock-cells", &clock_cells))
182 			continue;
183 		const u_int index_raw = htobe32(index);
184 		return cc->cc_funcs->decode(cc->cc_dev,
185 		    cc->cc_phandle,
186 		    clock_cells > 0 ? &index_raw : NULL,
187 		    clock_cells > 0 ? 4 : 0);
188 	}
189 
190 	return NULL;
191 }
192 
193 /*
194  * Apply assigned clock parents and rates.
195  *
196  * This is automatically called by fdtbus_register_clock_controller, so clock
197  * drivers likely don't need to call this directly.
198  */
199 void
200 fdtbus_clock_assign(int phandle)
201 {
202 	u_int index, rates_len;
203 	struct clk *clk, *clk_parent;
204 	int error;
205 
206 	const u_int *rates = fdtbus_get_prop(phandle, "assigned-clock-rates", &rates_len);
207 	if (rates == NULL)
208 		rates_len = 0;
209 
210 	const u_int nclocks = fdtbus_clock_count(phandle, "assigned-clocks");
211 	const u_int nparents = fdtbus_clock_count(phandle, "assigned-clock-parents");
212 	const u_int nrates = rates_len / sizeof(*rates);
213 
214 	for (index = 0; index < nclocks; index++) {
215 		clk = fdtbus_clock_get_index_prop(phandle, index, "assigned-clocks");
216 		if (clk == NULL) {
217 			aprint_debug("clk: assigned clock (%u) not found, skipping...\n", index);
218 			continue;
219 		}
220 
221 		if (index < nparents) {
222 			clk_parent = fdtbus_clock_get_index_prop(phandle, index, "assigned-clock-parents");
223 			if (clk_parent != NULL) {
224 				error = clk_set_parent(clk, clk_parent);
225 				if (error != 0) {
226 					aprint_error("clk: failed to set %s parent to %s, error %d\n",
227 					    clk->name, clk_parent->name, error);
228 				}
229 			} else {
230 				aprint_debug("clk: failed to set %s parent (not found)\n", clk->name);
231 			}
232 		}
233 
234 		if (index < nrates) {
235 			const u_int rate = be32toh(rates[index]);
236 			if (rate != 0) {
237 				error = clk_set_rate(clk, rate);
238 				if (error != 0)
239 					aprint_error("clk: failed to set %s rate to %u Hz, error %d\n",
240 					    clk->name, rate, error);
241 			}
242 		}
243 	}
244 }
245