1*57638385Spatrick /* $OpenBSD: qcmtx.c,v 1.1 2023/05/17 23:30:58 patrick Exp $ */
2*57638385Spatrick /*
3*57638385Spatrick * Copyright (c) 2023 Patrick Wildt <patrick@blueri.se>
4*57638385Spatrick *
5*57638385Spatrick * Permission to use, copy, modify, and distribute this software for any
6*57638385Spatrick * purpose with or without fee is hereby granted, provided that the above
7*57638385Spatrick * copyright notice and this permission notice appear in all copies.
8*57638385Spatrick *
9*57638385Spatrick * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10*57638385Spatrick * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11*57638385Spatrick * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12*57638385Spatrick * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13*57638385Spatrick * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14*57638385Spatrick * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15*57638385Spatrick * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16*57638385Spatrick */
17*57638385Spatrick
18*57638385Spatrick #include <sys/param.h>
19*57638385Spatrick #include <sys/systm.h>
20*57638385Spatrick #include <sys/device.h>
21*57638385Spatrick #include <sys/malloc.h>
22*57638385Spatrick
23*57638385Spatrick #include <machine/bus.h>
24*57638385Spatrick #include <machine/fdt.h>
25*57638385Spatrick
26*57638385Spatrick #include <dev/ofw/openfirm.h>
27*57638385Spatrick #include <dev/ofw/ofw_misc.h>
28*57638385Spatrick #include <dev/ofw/fdt.h>
29*57638385Spatrick
30*57638385Spatrick #define QCMTX_OFF(idx) ((idx) * 0x1000)
31*57638385Spatrick #define QCMTX_NUM_LOCKS 32
32*57638385Spatrick #define QCMTX_APPS_PROC_ID 1
33*57638385Spatrick
34*57638385Spatrick #define HREAD4(sc, reg) \
35*57638385Spatrick (bus_space_read_4((sc)->sc_iot, (sc)->sc_ioh, (reg)))
36*57638385Spatrick #define HWRITE4(sc, reg, val) \
37*57638385Spatrick bus_space_write_4((sc)->sc_iot, (sc)->sc_ioh, (reg), (val))
38*57638385Spatrick
39*57638385Spatrick struct qcmtx_softc {
40*57638385Spatrick struct device sc_dev;
41*57638385Spatrick bus_space_tag_t sc_iot;
42*57638385Spatrick bus_space_handle_t sc_ioh;
43*57638385Spatrick int sc_node;
44*57638385Spatrick
45*57638385Spatrick struct hwlock_device sc_hd;
46*57638385Spatrick };
47*57638385Spatrick
48*57638385Spatrick int qcmtx_match(struct device *, void *, void *);
49*57638385Spatrick void qcmtx_attach(struct device *, struct device *, void *);
50*57638385Spatrick
51*57638385Spatrick int qcmtx_lock(void *, uint32_t *, int);
52*57638385Spatrick
53*57638385Spatrick const struct cfattach qcmtx_ca = {
54*57638385Spatrick sizeof (struct qcmtx_softc), qcmtx_match, qcmtx_attach
55*57638385Spatrick };
56*57638385Spatrick
57*57638385Spatrick struct cfdriver qcmtx_cd = {
58*57638385Spatrick NULL, "qcmtx", DV_DULL
59*57638385Spatrick };
60*57638385Spatrick
61*57638385Spatrick int
qcmtx_match(struct device * parent,void * match,void * aux)62*57638385Spatrick qcmtx_match(struct device *parent, void *match, void *aux)
63*57638385Spatrick {
64*57638385Spatrick struct fdt_attach_args *faa = aux;
65*57638385Spatrick
66*57638385Spatrick return OF_is_compatible(faa->fa_node, "qcom,tcsr-mutex");
67*57638385Spatrick }
68*57638385Spatrick
69*57638385Spatrick void
qcmtx_attach(struct device * parent,struct device * self,void * aux)70*57638385Spatrick qcmtx_attach(struct device *parent, struct device *self, void *aux)
71*57638385Spatrick {
72*57638385Spatrick struct qcmtx_softc *sc = (struct qcmtx_softc *)self;
73*57638385Spatrick struct fdt_attach_args *faa = aux;
74*57638385Spatrick
75*57638385Spatrick if (faa->fa_nreg < 1) {
76*57638385Spatrick printf(": no registers\n");
77*57638385Spatrick return;
78*57638385Spatrick }
79*57638385Spatrick
80*57638385Spatrick sc->sc_node = faa->fa_node;
81*57638385Spatrick sc->sc_iot = faa->fa_iot;
82*57638385Spatrick if (bus_space_map(sc->sc_iot, faa->fa_reg[0].addr,
83*57638385Spatrick faa->fa_reg[0].size, 0, &sc->sc_ioh)) {
84*57638385Spatrick printf(": can't map registers\n");
85*57638385Spatrick return;
86*57638385Spatrick }
87*57638385Spatrick
88*57638385Spatrick printf("\n");
89*57638385Spatrick
90*57638385Spatrick sc->sc_hd.hd_node = faa->fa_node;
91*57638385Spatrick sc->sc_hd.hd_cookie = sc;
92*57638385Spatrick sc->sc_hd.hd_lock = qcmtx_lock;
93*57638385Spatrick hwlock_register(&sc->sc_hd);
94*57638385Spatrick }
95*57638385Spatrick
96*57638385Spatrick int
qcmtx_lock(void * cookie,uint32_t * cells,int lock)97*57638385Spatrick qcmtx_lock(void *cookie, uint32_t *cells, int lock)
98*57638385Spatrick {
99*57638385Spatrick struct qcmtx_softc *sc = cookie;
100*57638385Spatrick int idx = cells[0];
101*57638385Spatrick
102*57638385Spatrick if (idx >= QCMTX_NUM_LOCKS)
103*57638385Spatrick return ENXIO;
104*57638385Spatrick
105*57638385Spatrick if (lock) {
106*57638385Spatrick HWRITE4(sc, QCMTX_OFF(idx), QCMTX_APPS_PROC_ID);
107*57638385Spatrick if (HREAD4(sc, QCMTX_OFF(idx)) !=
108*57638385Spatrick QCMTX_APPS_PROC_ID)
109*57638385Spatrick return EAGAIN;
110*57638385Spatrick KASSERT(HREAD4(sc, QCMTX_OFF(idx)) == QCMTX_APPS_PROC_ID);
111*57638385Spatrick } else {
112*57638385Spatrick KASSERT(HREAD4(sc, QCMTX_OFF(idx)) == QCMTX_APPS_PROC_ID);
113*57638385Spatrick HWRITE4(sc, QCMTX_OFF(idx), 0);
114*57638385Spatrick }
115*57638385Spatrick
116*57638385Spatrick return 0;
117*57638385Spatrick }
118