xref: /freebsd/sys/dev/fdt/simple_mfd.c (revision 02e9120893770924227138ba49df1edb3896112a)
1 /*-
2  * SPDX-License-Identifier: BSD-2-Clause
3  *
4  * Copyright (c) 2018 Rubicon Communications, LLC (Netgate)
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  *
15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25  * SUCH DAMAGE.
26  *
27  */
28 
29 #include <sys/param.h>
30 #include <sys/systm.h>
31 #include <sys/bus.h>
32 #include <sys/kernel.h>
33 #include <sys/lock.h>
34 #include <sys/module.h>
35 #include <sys/mutex.h>
36 #include <sys/rman.h>
37 
38 #include <machine/bus.h>
39 
40 #include <dev/fdt/simplebus.h>
41 
42 #include <dev/ofw/ofw_bus.h>
43 #include <dev/ofw/ofw_bus_subr.h>
44 
45 #include <dev/fdt/simple_mfd.h>
46 
47 device_t simple_mfd_add_device(device_t dev, phandle_t node, u_int order,
48     const char *name, int unit, struct simplebus_devinfo *di);
49 struct simplebus_devinfo *simple_mfd_setup_dinfo(device_t dev, phandle_t node,
50     struct simplebus_devinfo *di);
51 
52 #include "syscon_if.h"
53 #include <dev/extres/syscon/syscon.h>
54 
55 MALLOC_DECLARE(M_SYSCON);
56 
57 static uint32_t simple_mfd_syscon_read_4(struct syscon *syscon,
58     bus_size_t offset);
59 static int simple_mfd_syscon_write_4(struct syscon *syscon, bus_size_t offset,
60     uint32_t val);
61 static int simple_mfd_syscon_modify_4(struct syscon *syscon, bus_size_t offset,
62     uint32_t clear_bits, uint32_t set_bits);
63 
64 #define	SYSCON_LOCK(_sc)		mtx_lock_spin(&(_sc)->mtx)
65 #define	SYSCON_UNLOCK(_sc)		mtx_unlock_spin(&(_sc)->mtx)
66 #define	SYSCON_LOCK_INIT(_sc)		mtx_init(&(_sc)->mtx,	\
67     device_get_nameunit((_sc)->dev), "syscon", MTX_SPIN)
68 #define	SYSCON_LOCK_DESTROY(_sc)	mtx_destroy(&(_sc)->mtx);
69 #define	SYSCON_ASSERT_LOCKED(_sc)	mtx_assert(&(_sc)->mtx, MA_OWNED);
70 #define	SYSCON_ASSERT_UNLOCKED(_sc)	mtx_assert(&(_sc)->mtx, MA_NOTOWNED);
71 
72 static syscon_method_t simple_mfd_syscon_methods[] = {
73 	SYSCONMETHOD(syscon_unlocked_read_4,	simple_mfd_syscon_read_4),
74 	SYSCONMETHOD(syscon_unlocked_write_4,	simple_mfd_syscon_write_4),
75 	SYSCONMETHOD(syscon_unlocked_modify_4,	simple_mfd_syscon_modify_4),
76 
77 	SYSCONMETHOD_END
78 };
79 DEFINE_CLASS_1(simple_mfd_syscon, simple_mfd_syscon_class,
80     simple_mfd_syscon_methods, 0, syscon_class);
81 
82 static uint32_t
83 simple_mfd_syscon_read_4(struct syscon *syscon, bus_size_t offset)
84 {
85 	struct simple_mfd_softc *sc;
86 	uint32_t val;
87 
88 	sc = device_get_softc(syscon->pdev);
89 	SYSCON_ASSERT_LOCKED(sc);
90 	val = bus_read_4(sc->mem_res, offset);
91 	return (val);
92 }
93 
94 static int
95 simple_mfd_syscon_write_4(struct syscon *syscon, bus_size_t offset,
96     uint32_t val)
97 {
98 	struct simple_mfd_softc *sc;
99 
100 	sc = device_get_softc(syscon->pdev);
101 	SYSCON_ASSERT_LOCKED(sc);
102 	bus_write_4(sc->mem_res, offset, val);
103 	return (0);
104 }
105 
106 static int
107 simple_mfd_syscon_modify_4(struct syscon *syscon, bus_size_t offset,
108     uint32_t clear_bits, uint32_t set_bits)
109 {
110 	struct simple_mfd_softc *sc;
111 	uint32_t val;
112 
113 	sc = device_get_softc(syscon->pdev);
114 	SYSCON_ASSERT_LOCKED(sc);
115 	val = bus_read_4(sc->mem_res, offset);
116 	val &= ~clear_bits;
117 	val |= set_bits;
118 	bus_write_4(sc->mem_res, offset, val);
119 	return (0);
120 }
121 
122 static int
123 simple_mfd_syscon_get_handle(device_t dev, struct syscon **syscon)
124 {
125 	struct simple_mfd_softc *sc;
126 
127 	sc = device_get_softc(dev);
128 	*syscon = sc->syscon;
129 	if (*syscon == NULL)
130 		return (ENODEV);
131 	return (0);
132 }
133 
134 static void
135 simple_mfd_syscon_lock(device_t dev)
136 {
137 	struct simple_mfd_softc *sc;
138 
139 	sc = device_get_softc(dev);
140 	SYSCON_LOCK(sc);
141 }
142 
143 static void
144 simple_mfd_syscon_unlock(device_t dev)
145 {
146 	struct simple_mfd_softc *sc;
147 
148 	sc = device_get_softc(dev);
149 	SYSCON_UNLOCK(sc);
150 }
151 
152 static int
153 simple_mfd_probe(device_t dev)
154 {
155 
156 	if (!ofw_bus_status_okay(dev))
157 		return (ENXIO);
158 	if (!ofw_bus_is_compatible(dev, "simple-mfd"))
159 		return (ENXIO);
160 
161 	device_set_desc(dev, "Simple MFD (Multi-Functions Device)");
162 
163 	return (BUS_PROBE_GENERIC);
164 }
165 
166 static int
167 simple_mfd_attach(device_t dev)
168 {
169 	struct simple_mfd_softc *sc;
170 	phandle_t node, child;
171 	device_t cdev;
172 	int rid;
173 
174 	sc = device_get_softc(dev);
175 	node = ofw_bus_get_node(dev);
176 
177 	sc->dev = dev;
178 	rid = 0;
179 
180 	/* Parse address-cells and size-cells from the parent node as a fallback */
181 	if (OF_getencprop(node, "#address-cells", &sc->sc.acells,
182 	    sizeof(sc->sc.acells)) == -1) {
183 		if (OF_getencprop(OF_parent(node), "#address-cells", &sc->sc.acells,
184 		    sizeof(sc->sc.acells)) == -1) {
185 			sc->sc.acells = 2;
186 		}
187 	}
188 	if (OF_getencprop(node, "#size-cells", &sc->sc.scells,
189 	    sizeof(sc->sc.scells)) == -1) {
190 		if (OF_getencprop(OF_parent(node), "#size-cells", &sc->sc.scells,
191 		    sizeof(sc->sc.scells)) == -1) {
192 			sc->sc.scells = 1;
193 		}
194 	}
195 
196 	/* If the node has a ranges prop, parse it so children mapping will be done correctly */
197 	if (OF_hasprop(node, "ranges")) {
198 		if (simplebus_fill_ranges(node, &sc->sc) < 0) {
199 			device_printf(dev, "could not get ranges\n");
200 			return (ENXIO);
201 		}
202 	}
203 
204 	/* Attach child devices */
205 	for (child = OF_child(node); child > 0; child = OF_peer(child)) {
206 		cdev = simple_mfd_add_device(dev, child, 0, NULL, -1, NULL);
207 		if (cdev != NULL)
208 			device_probe_and_attach(cdev);
209 	}
210 
211 	if (ofw_bus_is_compatible(dev, "syscon")) {
212 		sc->mem_res = bus_alloc_resource_any(dev, SYS_RES_MEMORY, &rid,
213 		    RF_ACTIVE);
214 		if (sc->mem_res == NULL) {
215 			device_printf(dev,
216 			    "Cannot allocate memory resource\n");
217 			return (ENXIO);
218 		}
219 
220 		SYSCON_LOCK_INIT(sc);
221 		sc->syscon = syscon_create_ofw_node(dev,
222 		    &simple_mfd_syscon_class, ofw_bus_get_node(dev));
223 		if (sc->syscon == NULL) {
224 			device_printf(dev,
225 			    "Failed to create/register syscon\n");
226 			return (ENXIO);
227 		}
228 	}
229 	return (bus_generic_attach(dev));
230 }
231 
232 static int
233 simple_mfd_detach(device_t dev)
234 {
235 	struct simple_mfd_softc *sc;
236 
237 	sc = device_get_softc(dev);
238 	if (ofw_bus_is_compatible(dev, "syscon")) {
239 		if (sc->syscon != NULL) {
240 			syscon_unregister(sc->syscon);
241 			free(sc->syscon, M_SYSCON);
242 		}
243 
244 		SYSCON_LOCK_DESTROY(sc);
245 
246 		if (sc->mem_res != NULL)
247 			bus_release_resource(dev, SYS_RES_MEMORY, 0,
248 			    sc->mem_res);
249 	}
250 	return (0);
251 }
252 
253 struct simplebus_devinfo *
254 simple_mfd_setup_dinfo(device_t dev, phandle_t node,
255     struct simplebus_devinfo *di)
256 {
257 	struct simplebus_softc *sc;
258 	struct simplebus_devinfo *ndi;
259 
260 	sc = device_get_softc(dev);
261 	if (di == NULL)
262 		ndi = malloc(sizeof(*ndi), M_DEVBUF, M_WAITOK | M_ZERO);
263 	else
264 		ndi = di;
265 	if (ofw_bus_gen_setup_devinfo(&ndi->obdinfo, node) != 0) {
266 		if (di == NULL)
267 			free(ndi, M_DEVBUF);
268 		return (NULL);
269 	}
270 
271 	/* reg resources is from the parent but interrupts is on the node itself */
272 	resource_list_init(&ndi->rl);
273 	ofw_bus_reg_to_rl(dev, OF_parent(node), sc->acells, sc->scells, &ndi->rl);
274 	ofw_bus_intr_to_rl(dev, node, &ndi->rl, NULL);
275 
276 	return (ndi);
277 }
278 
279 device_t
280 simple_mfd_add_device(device_t dev, phandle_t node, u_int order,
281     const char *name, int unit, struct simplebus_devinfo *di)
282 {
283 	struct simplebus_devinfo *ndi;
284 	device_t cdev;
285 
286 	if ((ndi = simple_mfd_setup_dinfo(dev, node, di)) == NULL)
287 		return (NULL);
288 	cdev = device_add_child_ordered(dev, order, name, unit);
289 	if (cdev == NULL) {
290 		device_printf(dev, "<%s>: device_add_child failed\n",
291 		    ndi->obdinfo.obd_name);
292 		resource_list_free(&ndi->rl);
293 		ofw_bus_gen_destroy_devinfo(&ndi->obdinfo);
294 		if (di == NULL)
295 			free(ndi, M_DEVBUF);
296 		return (NULL);
297 	}
298 	device_set_ivars(cdev, ndi);
299 
300 	return(cdev);
301 }
302 
303 static device_method_t simple_mfd_methods[] = {
304 	/* syscon interface */
305 	DEVMETHOD(syscon_get_handle,	simple_mfd_syscon_get_handle),
306 	DEVMETHOD(syscon_device_lock,	simple_mfd_syscon_lock),
307 	DEVMETHOD(syscon_device_unlock,	simple_mfd_syscon_unlock),
308 
309 	/* Device interface */
310 	DEVMETHOD(device_probe,		simple_mfd_probe),
311 	DEVMETHOD(device_attach,	simple_mfd_attach),
312 	DEVMETHOD(device_detach,	simple_mfd_detach),
313 
314 	DEVMETHOD_END
315 };
316 
317 DEFINE_CLASS_1(simple_mfd, simple_mfd_driver, simple_mfd_methods,
318   sizeof(struct simple_mfd_softc), simplebus_driver);
319 
320 EARLY_DRIVER_MODULE(simple_mfd, simplebus, simple_mfd_driver, 0, 0,
321     BUS_PASS_BUS + BUS_PASS_ORDER_LATE);
322 MODULE_VERSION(simple_mfd, 1);
323