1 /*- 2 * Copyright (c) 2017-2018 QCM Technologies. 3 * Copyright (c) 2017-2018 Semihalf. 4 * All rights reserved. 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 * $FreeBSD$ 28 */ 29 30 #include "opt_platform.h" 31 32 #include <sys/cdefs.h> 33 __FBSDID("$FreeBSD$"); 34 35 #include <sys/param.h> 36 #include <sys/endian.h> 37 #include <sys/systm.h> 38 #include <sys/bus.h> 39 #include <sys/conf.h> 40 #include <sys/kernel.h> 41 #include <sys/lock.h> 42 #include <sys/mbuf.h> 43 #include <sys/malloc.h> 44 #include <sys/module.h> 45 #include <sys/mutex.h> 46 #include <sys/rman.h> 47 #include <machine/bus.h> 48 49 #include <vm/vm.h> 50 #include <vm/pmap.h> 51 52 #include <dev/iicbus/iiconf.h> 53 #include <dev/iicbus/iicbus.h> 54 #include "iicbus_if.h" 55 56 #include "opal.h" 57 58 #ifdef FDT 59 #include <dev/ofw/ofw_bus.h> 60 #include <dev/ofw/ofw_bus_subr.h> 61 #endif 62 63 struct opal_i2c_softc 64 { 65 device_t dev; 66 device_t iicbus; 67 uint32_t opal_id; 68 struct mtx sc_mtx; 69 }; 70 71 /* OPAL I2C request */ 72 struct opal_i2c_request { 73 uint8_t type; 74 #define OPAL_I2C_RAW_READ 0 75 #define OPAL_I2C_RAW_WRITE 1 76 #define OPAL_I2C_SM_READ 2 77 #define OPAL_I2C_SM_WRITE 3 78 uint8_t flags; 79 uint8_t subaddr_sz; /* Max 4 */ 80 uint8_t reserved; 81 uint16_t addr; /* 7 or 10 bit address */ 82 uint16_t reserved2; 83 uint32_t subaddr; /* Sub-address if any */ 84 uint32_t size; /* Data size */ 85 uint64_t buffer_pa; /* Buffer real address */ 86 }; 87 88 static int opal_i2c_attach(device_t); 89 static int opal_i2c_callback(device_t, int, caddr_t); 90 static int opal_i2c_probe(device_t); 91 static int opal_i2c_transfer(device_t, struct iic_msg *, uint32_t); 92 static int i2c_opal_send_request(uint32_t, struct opal_i2c_request *); 93 static phandle_t opal_i2c_get_node(device_t bus, device_t dev); 94 95 static device_method_t opal_i2c_methods[] = { 96 /* Device interface */ 97 DEVMETHOD(device_probe, opal_i2c_probe), 98 DEVMETHOD(device_attach, opal_i2c_attach), 99 100 /* iicbus interface */ 101 DEVMETHOD(iicbus_callback, opal_i2c_callback), 102 DEVMETHOD(iicbus_transfer, opal_i2c_transfer), 103 DEVMETHOD(ofw_bus_get_node, opal_i2c_get_node), 104 DEVMETHOD_END 105 }; 106 107 #define I2C_LOCK(_sc) mtx_lock(&(_sc)->sc_mtx) 108 #define I2C_UNLOCK(_sc) mtx_unlock(&(_sc)->sc_mtx) 109 #define I2C_LOCK_INIT(_sc) \ 110 mtx_init(&_sc->sc_mtx, device_get_nameunit(_sc->dev), \ 111 "i2c", MTX_DEF) 112 113 static devclass_t opal_i2c_devclass; 114 115 static driver_t opal_i2c_driver = { 116 "iichb", 117 opal_i2c_methods, 118 sizeof(struct opal_i2c_softc), 119 }; 120 121 static int 122 opal_i2c_probe(device_t dev) 123 { 124 125 if (!(ofw_bus_is_compatible(dev, "ibm,opal-i2c"))) 126 return (ENXIO); 127 128 device_set_desc(dev, "opal-i2c"); 129 130 return (0); 131 } 132 133 static int 134 opal_i2c_attach(device_t dev) 135 { 136 struct opal_i2c_softc *sc; 137 int len; 138 139 sc = device_get_softc(dev); 140 sc->dev = dev; 141 142 len = OF_getproplen(ofw_bus_get_node(dev), "ibm,opal-id"); 143 if (len <= 0) 144 return (EINVAL); 145 OF_getencprop(ofw_bus_get_node(dev), "ibm,opal-id", &sc->opal_id, len); 146 147 if ((sc->iicbus = device_add_child(dev, "iicbus", -1)) == NULL) { 148 device_printf(dev, "could not allocate iicbus instance\n"); 149 return (EINVAL); 150 } 151 152 I2C_LOCK_INIT(sc); 153 154 return (bus_generic_attach(dev)); 155 } 156 157 static int 158 opal_get_async_rc(struct opal_msg msg) 159 { 160 if (msg.msg_type != OPAL_MSG_ASYNC_COMP) 161 return OPAL_PARAMETER; 162 else 163 return htobe64(msg.params[1]); 164 } 165 166 static int 167 i2c_opal_send_request(uint32_t bus_id, struct opal_i2c_request *req) 168 { 169 struct opal_msg msg; 170 int token, rc; 171 172 /* 173 * XXX: 174 * Async tokens should be managed globally. Since there is 175 * only one place now, use hardcoded value. 176 */ 177 token = 0x112233; 178 179 memset(&msg, 0, sizeof(msg)); 180 181 rc = opal_call(OPAL_I2C_REQUEST, token, bus_id, 182 pmap_kextract((uint64_t)req)); 183 if (rc != OPAL_ASYNC_COMPLETION) 184 return (rc); 185 186 do { 187 rc = opal_call(OPAL_CHECK_ASYNC_COMPLETION, 188 pmap_kextract((uint64_t)&msg), sizeof(msg), token); 189 } while (rc == OPAL_BUSY); 190 191 if (rc != OPAL_SUCCESS) 192 return (rc); 193 194 rc = opal_get_async_rc(msg); 195 196 return rc; 197 } 198 199 static int 200 opal_i2c_transfer(device_t dev, struct iic_msg *msgs, uint32_t nmsgs) 201 { 202 struct opal_i2c_softc *sc; 203 int i, err = 0; 204 struct opal_i2c_request req; 205 206 sc = device_get_softc(dev); 207 208 memset(&req, 0, sizeof(req)); 209 210 /* XXX: Currently OPAL can parse only 1 message */ 211 if (nmsgs > 1) { 212 device_printf(dev, 213 "trying to parse %d messages, while only 1 is supported\n", nmsgs); 214 return (ENOMEM); 215 } 216 217 I2C_LOCK(sc); 218 for (i = 0; i < nmsgs; i++) { 219 req.type = (msgs[i].flags & IIC_M_RD) ? 220 OPAL_I2C_RAW_READ : OPAL_I2C_RAW_WRITE; 221 req.addr = htobe16(msgs[0].slave); 222 req.size = htobe32(msgs[0].len); 223 req.buffer_pa = htobe64(pmap_kextract((uint64_t)msgs[0].buf)); 224 225 err = i2c_opal_send_request(sc->opal_id, &req); 226 } 227 I2C_UNLOCK(sc); 228 229 return (err); 230 } 231 232 static int 233 opal_i2c_callback(device_t dev, int index, caddr_t data) 234 { 235 int error = 0; 236 237 switch (index) { 238 case IIC_REQUEST_BUS: 239 break; 240 241 case IIC_RELEASE_BUS: 242 break; 243 244 default: 245 error = EINVAL; 246 } 247 248 return (error); 249 } 250 251 static phandle_t 252 opal_i2c_get_node(device_t bus, device_t dev) 253 { 254 255 /* Share controller node with iibus device. */ 256 return (ofw_bus_get_node(bus)); 257 } 258 259 DRIVER_MODULE(opal_i2c, opal_i2cm, opal_i2c_driver, opal_i2c_devclass, NULL, 260 NULL); 261 DRIVER_MODULE(iicbus, opal_i2c, iicbus_driver, iicbus_devclass, NULL, NULL); 262 MODULE_DEPEND(opal_i2c, iicbus, 1, 1, 1); 263