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/cdefs.h>
30 #include <sys/param.h>
31 #include <sys/systm.h>
32 #include <sys/bus.h>
33 #include <sys/kernel.h>
34 #include <sys/lock.h>
35 #include <sys/module.h>
36 #include <sys/mutex.h>
37 #include <sys/rman.h>
38
39 #include <machine/bus.h>
40
41 #include <dev/fdt/simplebus.h>
42
43 #include <dev/ofw/ofw_bus.h>
44 #include <dev/ofw/ofw_bus_subr.h>
45
46 #include <dev/fdt/simple_mfd.h>
47
48 device_t simple_mfd_add_device(device_t dev, phandle_t node, u_int order,
49 const char *name, int unit, struct simplebus_devinfo *di);
50 struct simplebus_devinfo *simple_mfd_setup_dinfo(device_t dev, phandle_t node,
51 struct simplebus_devinfo *di);
52
53 #include "syscon_if.h"
54 #include <dev/extres/syscon/syscon.h>
55
56 MALLOC_DECLARE(M_SYSCON);
57
58 static uint32_t simple_mfd_syscon_read_4(struct syscon *syscon,
59 bus_size_t offset);
60 static int simple_mfd_syscon_write_4(struct syscon *syscon, bus_size_t offset,
61 uint32_t val);
62 static int simple_mfd_syscon_modify_4(struct syscon *syscon, bus_size_t offset,
63 uint32_t clear_bits, uint32_t set_bits);
64
65 #define SYSCON_LOCK(_sc) mtx_lock_spin(&(_sc)->mtx)
66 #define SYSCON_UNLOCK(_sc) mtx_unlock_spin(&(_sc)->mtx)
67 #define SYSCON_LOCK_INIT(_sc) mtx_init(&(_sc)->mtx, \
68 device_get_nameunit((_sc)->dev), "syscon", MTX_SPIN)
69 #define SYSCON_LOCK_DESTROY(_sc) mtx_destroy(&(_sc)->mtx);
70 #define SYSCON_ASSERT_LOCKED(_sc) mtx_assert(&(_sc)->mtx, MA_OWNED);
71 #define SYSCON_ASSERT_UNLOCKED(_sc) mtx_assert(&(_sc)->mtx, MA_NOTOWNED);
72
73 static syscon_method_t simple_mfd_syscon_methods[] = {
74 SYSCONMETHOD(syscon_unlocked_read_4, simple_mfd_syscon_read_4),
75 SYSCONMETHOD(syscon_unlocked_write_4, simple_mfd_syscon_write_4),
76 SYSCONMETHOD(syscon_unlocked_modify_4, simple_mfd_syscon_modify_4),
77
78 SYSCONMETHOD_END
79 };
80 DEFINE_CLASS_1(simple_mfd_syscon, simple_mfd_syscon_class,
81 simple_mfd_syscon_methods, 0, syscon_class);
82
83 static uint32_t
simple_mfd_syscon_read_4(struct syscon * syscon,bus_size_t offset)84 simple_mfd_syscon_read_4(struct syscon *syscon, bus_size_t offset)
85 {
86 struct simple_mfd_softc *sc;
87 uint32_t val;
88
89 sc = device_get_softc(syscon->pdev);
90 SYSCON_ASSERT_LOCKED(sc);
91 val = bus_read_4(sc->mem_res, offset);
92 return (val);
93 }
94
95 static int
simple_mfd_syscon_write_4(struct syscon * syscon,bus_size_t offset,uint32_t val)96 simple_mfd_syscon_write_4(struct syscon *syscon, bus_size_t offset,
97 uint32_t val)
98 {
99 struct simple_mfd_softc *sc;
100
101 sc = device_get_softc(syscon->pdev);
102 SYSCON_ASSERT_LOCKED(sc);
103 bus_write_4(sc->mem_res, offset, val);
104 return (0);
105 }
106
107 static int
simple_mfd_syscon_modify_4(struct syscon * syscon,bus_size_t offset,uint32_t clear_bits,uint32_t set_bits)108 simple_mfd_syscon_modify_4(struct syscon *syscon, bus_size_t offset,
109 uint32_t clear_bits, uint32_t set_bits)
110 {
111 struct simple_mfd_softc *sc;
112 uint32_t val;
113
114 sc = device_get_softc(syscon->pdev);
115 SYSCON_ASSERT_LOCKED(sc);
116 val = bus_read_4(sc->mem_res, offset);
117 val &= ~clear_bits;
118 val |= set_bits;
119 bus_write_4(sc->mem_res, offset, val);
120 return (0);
121 }
122
123 static int
simple_mfd_syscon_get_handle(device_t dev,struct syscon ** syscon)124 simple_mfd_syscon_get_handle(device_t dev, struct syscon **syscon)
125 {
126 struct simple_mfd_softc *sc;
127
128 sc = device_get_softc(dev);
129 *syscon = sc->syscon;
130 if (*syscon == NULL)
131 return (ENODEV);
132 return (0);
133 }
134
135 static void
simple_mfd_syscon_lock(device_t dev)136 simple_mfd_syscon_lock(device_t dev)
137 {
138 struct simple_mfd_softc *sc;
139
140 sc = device_get_softc(dev);
141 SYSCON_LOCK(sc);
142 }
143
144 static void
simple_mfd_syscon_unlock(device_t dev)145 simple_mfd_syscon_unlock(device_t dev)
146 {
147 struct simple_mfd_softc *sc;
148
149 sc = device_get_softc(dev);
150 SYSCON_UNLOCK(sc);
151 }
152
153 static int
simple_mfd_probe(device_t dev)154 simple_mfd_probe(device_t dev)
155 {
156
157 if (!ofw_bus_status_okay(dev))
158 return (ENXIO);
159 if (!ofw_bus_is_compatible(dev, "simple-mfd"))
160 return (ENXIO);
161
162 device_set_desc(dev, "Simple MFD (Multi-Functions Device)");
163
164 return (BUS_PROBE_GENERIC);
165 }
166
167 static int
simple_mfd_attach(device_t dev)168 simple_mfd_attach(device_t dev)
169 {
170 struct simple_mfd_softc *sc;
171 phandle_t node, child;
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 (void)simple_mfd_add_device(dev, child, 0, NULL, -1, NULL);
207 }
208
209 if (ofw_bus_is_compatible(dev, "syscon")) {
210 sc->mem_res = bus_alloc_resource_any(dev, SYS_RES_MEMORY, &rid,
211 RF_ACTIVE);
212 if (sc->mem_res == NULL) {
213 device_printf(dev,
214 "Cannot allocate memory resource\n");
215 return (ENXIO);
216 }
217
218 SYSCON_LOCK_INIT(sc);
219 sc->syscon = syscon_create_ofw_node(dev,
220 &simple_mfd_syscon_class, ofw_bus_get_node(dev));
221 if (sc->syscon == NULL) {
222 device_printf(dev,
223 "Failed to create/register syscon\n");
224 return (ENXIO);
225 }
226 }
227 return (bus_generic_attach(dev));
228 }
229
230 static int
simple_mfd_detach(device_t dev)231 simple_mfd_detach(device_t dev)
232 {
233 struct simple_mfd_softc *sc;
234
235 sc = device_get_softc(dev);
236 if (ofw_bus_is_compatible(dev, "syscon")) {
237 if (sc->syscon != NULL) {
238 syscon_unregister(sc->syscon);
239 free(sc->syscon, M_SYSCON);
240 }
241
242 SYSCON_LOCK_DESTROY(sc);
243
244 if (sc->mem_res != NULL)
245 bus_release_resource(dev, SYS_RES_MEMORY, 0,
246 sc->mem_res);
247 }
248 return (0);
249 }
250
251 struct simplebus_devinfo *
simple_mfd_setup_dinfo(device_t dev,phandle_t node,struct simplebus_devinfo * di)252 simple_mfd_setup_dinfo(device_t dev, phandle_t node,
253 struct simplebus_devinfo *di)
254 {
255 struct simplebus_softc *sc;
256 struct simplebus_devinfo *ndi;
257
258 sc = device_get_softc(dev);
259 if (di == NULL)
260 ndi = malloc(sizeof(*ndi), M_DEVBUF, M_WAITOK | M_ZERO);
261 else
262 ndi = di;
263 if (ofw_bus_gen_setup_devinfo(&ndi->obdinfo, node) != 0) {
264 if (di == NULL)
265 free(ndi, M_DEVBUF);
266 return (NULL);
267 }
268
269 /* reg resources is from the parent but interrupts is on the node itself */
270 resource_list_init(&ndi->rl);
271 ofw_bus_reg_to_rl(dev, OF_parent(node), sc->acells, sc->scells, &ndi->rl);
272 ofw_bus_intr_to_rl(dev, node, &ndi->rl, NULL);
273
274 return (ndi);
275 }
276
277 device_t
simple_mfd_add_device(device_t dev,phandle_t node,u_int order,const char * name,int unit,struct simplebus_devinfo * di)278 simple_mfd_add_device(device_t dev, phandle_t node, u_int order,
279 const char *name, int unit, struct simplebus_devinfo *di)
280 {
281 struct simplebus_devinfo *ndi;
282 device_t cdev;
283
284 if ((ndi = simple_mfd_setup_dinfo(dev, node, di)) == NULL)
285 return (NULL);
286 cdev = device_add_child_ordered(dev, order, name, unit);
287 if (cdev == NULL) {
288 device_printf(dev, "<%s>: device_add_child failed\n",
289 ndi->obdinfo.obd_name);
290 resource_list_free(&ndi->rl);
291 ofw_bus_gen_destroy_devinfo(&ndi->obdinfo);
292 if (di == NULL)
293 free(ndi, M_DEVBUF);
294 return (NULL);
295 }
296 device_set_ivars(cdev, ndi);
297
298 return(cdev);
299 }
300
301 static device_method_t simple_mfd_methods[] = {
302 /* syscon interface */
303 DEVMETHOD(syscon_get_handle, simple_mfd_syscon_get_handle),
304 DEVMETHOD(syscon_device_lock, simple_mfd_syscon_lock),
305 DEVMETHOD(syscon_device_unlock, simple_mfd_syscon_unlock),
306
307 /* Device interface */
308 DEVMETHOD(device_probe, simple_mfd_probe),
309 DEVMETHOD(device_attach, simple_mfd_attach),
310 DEVMETHOD(device_detach, simple_mfd_detach),
311
312 DEVMETHOD_END
313 };
314
315 DEFINE_CLASS_1(simple_mfd, simple_mfd_driver, simple_mfd_methods,
316 sizeof(struct simple_mfd_softc), simplebus_driver);
317
318 EARLY_DRIVER_MODULE(simple_mfd, simplebus, simple_mfd_driver, 0, 0,
319 BUS_PASS_BUS + BUS_PASS_ORDER_LATE);
320 MODULE_VERSION(simple_mfd, 1);
321