dwiic.c revision 1.9 1 1.9 riastrad /* $NetBSD: dwiic.c,v 1.9 2022/10/19 22:34:10 riastradh Exp $ */
2 1.1 bouyer
3 1.4 jakllsch /* $OpenBSD: dwiic.c,v 1.4 2018/05/23 22:08:00 kettenis Exp $ */
4 1.1 bouyer
5 1.1 bouyer /*-
6 1.1 bouyer * Copyright (c) 2017 The NetBSD Foundation, Inc.
7 1.1 bouyer * All rights reserved.
8 1.1 bouyer *
9 1.1 bouyer * This code is derived from software contributed to The NetBSD Foundation
10 1.1 bouyer * by Manuel Bouyer.
11 1.1 bouyer *
12 1.1 bouyer * Redistribution and use in source and binary forms, with or without
13 1.1 bouyer * modification, are permitted provided that the following conditions
14 1.1 bouyer * are met:
15 1.1 bouyer * 1. Redistributions of source code must retain the above copyright
16 1.1 bouyer * notice, this list of conditions and the following disclaimer.
17 1.1 bouyer * 2. Redistributions in binary form must reproduce the above copyright
18 1.1 bouyer * notice, this list of conditions and the following disclaimer in the
19 1.1 bouyer * documentation and/or other materials provided with the distribution.
20 1.1 bouyer *
21 1.1 bouyer * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
22 1.1 bouyer * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
23 1.1 bouyer * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
24 1.1 bouyer * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
25 1.1 bouyer * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
26 1.1 bouyer * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
27 1.1 bouyer * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
28 1.1 bouyer * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
29 1.1 bouyer * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
30 1.1 bouyer * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
31 1.1 bouyer * POSSIBILITY OF SUCH DAMAGE.
32 1.1 bouyer */
33 1.1 bouyer /*
34 1.1 bouyer * Synopsys DesignWare I2C controller
35 1.1 bouyer *
36 1.1 bouyer * Copyright (c) 2015, 2016 joshua stein <jcs (at) openbsd.org>
37 1.1 bouyer *
38 1.1 bouyer * Permission to use, copy, modify, and/or distribute this software for any
39 1.1 bouyer * purpose with or without fee is hereby granted, provided that the above
40 1.1 bouyer * copyright notice and this permission notice appear in all copies.
41 1.1 bouyer *
42 1.1 bouyer * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
43 1.1 bouyer * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
44 1.1 bouyer * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
45 1.1 bouyer * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
46 1.1 bouyer * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
47 1.1 bouyer * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
48 1.1 bouyer * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
49 1.1 bouyer */
50 1.1 bouyer
51 1.1 bouyer #include <sys/cdefs.h>
52 1.9 riastrad __KERNEL_RCSID(0, "$NetBSD: dwiic.c,v 1.9 2022/10/19 22:34:10 riastradh Exp $");
53 1.1 bouyer
54 1.1 bouyer #include <sys/param.h>
55 1.9 riastrad
56 1.9 riastrad #include <sys/atomic.h>
57 1.1 bouyer #include <sys/bus.h>
58 1.1 bouyer #include <sys/device.h>
59 1.1 bouyer #include <sys/kernel.h>
60 1.1 bouyer #include <sys/systm.h>
61 1.1 bouyer
62 1.1 bouyer #include <dev/ic/dwiic_var.h>
63 1.1 bouyer
64 1.1 bouyer //#define DWIIC_DEBUG
65 1.1 bouyer
66 1.1 bouyer #ifdef DWIIC_DEBUG
67 1.1 bouyer #define DPRINTF(x) printf x
68 1.1 bouyer #else
69 1.1 bouyer #define DPRINTF(x)
70 1.1 bouyer #endif
71 1.1 bouyer
72 1.1 bouyer /* register offsets */
73 1.1 bouyer #define DW_IC_CON 0x0
74 1.1 bouyer #define DW_IC_TAR 0x4
75 1.1 bouyer #define DW_IC_DATA_CMD 0x10
76 1.1 bouyer #define DW_IC_SS_SCL_HCNT 0x14
77 1.1 bouyer #define DW_IC_SS_SCL_LCNT 0x18
78 1.1 bouyer #define DW_IC_FS_SCL_HCNT 0x1c
79 1.1 bouyer #define DW_IC_FS_SCL_LCNT 0x20
80 1.1 bouyer #define DW_IC_INTR_STAT 0x2c
81 1.1 bouyer #define DW_IC_INTR_MASK 0x30
82 1.1 bouyer #define DW_IC_RAW_INTR_STAT 0x34
83 1.1 bouyer #define DW_IC_RX_TL 0x38
84 1.1 bouyer #define DW_IC_TX_TL 0x3c
85 1.1 bouyer #define DW_IC_CLR_INTR 0x40
86 1.1 bouyer #define DW_IC_CLR_RX_UNDER 0x44
87 1.1 bouyer #define DW_IC_CLR_RX_OVER 0x48
88 1.1 bouyer #define DW_IC_CLR_TX_OVER 0x4c
89 1.1 bouyer #define DW_IC_CLR_RD_REQ 0x50
90 1.1 bouyer #define DW_IC_CLR_TX_ABRT 0x54
91 1.1 bouyer #define DW_IC_CLR_RX_DONE 0x58
92 1.1 bouyer #define DW_IC_CLR_ACTIVITY 0x5c
93 1.1 bouyer #define DW_IC_CLR_STOP_DET 0x60
94 1.1 bouyer #define DW_IC_CLR_START_DET 0x64
95 1.1 bouyer #define DW_IC_CLR_GEN_CALL 0x68
96 1.1 bouyer #define DW_IC_ENABLE 0x6c
97 1.1 bouyer #define DW_IC_STATUS 0x70
98 1.1 bouyer #define DW_IC_TXFLR 0x74
99 1.1 bouyer #define DW_IC_RXFLR 0x78
100 1.1 bouyer #define DW_IC_SDA_HOLD 0x7c
101 1.1 bouyer #define DW_IC_TX_ABRT_SOURCE 0x80
102 1.1 bouyer #define DW_IC_ENABLE_STATUS 0x9c
103 1.1 bouyer #define DW_IC_COMP_PARAM_1 0xf4
104 1.1 bouyer #define DW_IC_COMP_VERSION 0xf8
105 1.1 bouyer #define DW_IC_SDA_HOLD_MIN_VERS 0x3131312A
106 1.1 bouyer #define DW_IC_COMP_TYPE 0xfc
107 1.1 bouyer #define DW_IC_COMP_TYPE_VALUE 0x44570140
108 1.1 bouyer
109 1.1 bouyer #define DW_IC_CON_MASTER 0x1
110 1.1 bouyer #define DW_IC_CON_SPEED_STD 0x2
111 1.1 bouyer #define DW_IC_CON_SPEED_FAST 0x4
112 1.1 bouyer #define DW_IC_CON_10BITADDR_MASTER 0x10
113 1.1 bouyer #define DW_IC_CON_RESTART_EN 0x20
114 1.1 bouyer #define DW_IC_CON_SLAVE_DISABLE 0x40
115 1.1 bouyer
116 1.1 bouyer #define DW_IC_DATA_CMD_READ 0x100
117 1.1 bouyer #define DW_IC_DATA_CMD_STOP 0x200
118 1.1 bouyer #define DW_IC_DATA_CMD_RESTART 0x400
119 1.1 bouyer
120 1.1 bouyer #define DW_IC_INTR_RX_UNDER 0x001
121 1.1 bouyer #define DW_IC_INTR_RX_OVER 0x002
122 1.1 bouyer #define DW_IC_INTR_RX_FULL 0x004
123 1.1 bouyer #define DW_IC_INTR_TX_OVER 0x008
124 1.1 bouyer #define DW_IC_INTR_TX_EMPTY 0x010
125 1.1 bouyer #define DW_IC_INTR_RD_REQ 0x020
126 1.1 bouyer #define DW_IC_INTR_TX_ABRT 0x040
127 1.1 bouyer #define DW_IC_INTR_RX_DONE 0x080
128 1.1 bouyer #define DW_IC_INTR_ACTIVITY 0x100
129 1.1 bouyer #define DW_IC_INTR_STOP_DET 0x200
130 1.1 bouyer #define DW_IC_INTR_START_DET 0x400
131 1.1 bouyer #define DW_IC_INTR_GEN_CALL 0x800
132 1.1 bouyer
133 1.1 bouyer #define DW_IC_STATUS_ACTIVITY 0x1
134 1.1 bouyer
135 1.1 bouyer /* hardware abort codes from the DW_IC_TX_ABRT_SOURCE register */
136 1.1 bouyer #define ABRT_7B_ADDR_NOACK 0
137 1.1 bouyer #define ABRT_10ADDR1_NOACK 1
138 1.1 bouyer #define ABRT_10ADDR2_NOACK 2
139 1.1 bouyer #define ABRT_TXDATA_NOACK 3
140 1.1 bouyer #define ABRT_GCALL_NOACK 4
141 1.1 bouyer #define ABRT_GCALL_READ 5
142 1.1 bouyer #define ABRT_SBYTE_ACKDET 7
143 1.1 bouyer #define ABRT_SBYTE_NORSTRT 9
144 1.1 bouyer #define ABRT_10B_RD_NORSTRT 10
145 1.1 bouyer #define ABRT_MASTER_DIS 11
146 1.1 bouyer #define ARB_LOST 12
147 1.1 bouyer
148 1.1 bouyer static int dwiic_init(struct dwiic_softc *);
149 1.1 bouyer static void dwiic_enable(struct dwiic_softc *, bool);
150 1.1 bouyer static uint32_t dwiic_read(struct dwiic_softc *, int);
151 1.1 bouyer static void dwiic_write(struct dwiic_softc *, int, uint32_t);
152 1.1 bouyer static int dwiic_i2c_exec(void *, i2c_op_t, i2c_addr_t, const void *,
153 1.1 bouyer size_t, void *, size_t, int);
154 1.1 bouyer
155 1.1 bouyer bool
156 1.1 bouyer dwiic_attach(struct dwiic_softc *sc)
157 1.1 bouyer {
158 1.1 bouyer if (sc->sc_power != NULL) {
159 1.1 bouyer if (!sc->sc_power(sc, 1)) {
160 1.1 bouyer aprint_error_dev(sc->sc_dev, "failed to power up\n");
161 1.1 bouyer return 0;
162 1.1 bouyer }
163 1.1 bouyer }
164 1.1 bouyer
165 1.1 bouyer /* fetch timing parameters */
166 1.1 bouyer if (sc->ss_hcnt == 0)
167 1.1 bouyer sc->ss_hcnt = dwiic_read(sc, DW_IC_SS_SCL_HCNT);
168 1.1 bouyer if (sc->ss_lcnt == 0)
169 1.1 bouyer sc->ss_lcnt = dwiic_read(sc, DW_IC_SS_SCL_LCNT);
170 1.1 bouyer if (sc->fs_hcnt == 0)
171 1.1 bouyer sc->fs_hcnt = dwiic_read(sc, DW_IC_FS_SCL_HCNT);
172 1.1 bouyer if (sc->fs_lcnt == 0)
173 1.1 bouyer sc->fs_lcnt = dwiic_read(sc, DW_IC_FS_SCL_LCNT);
174 1.1 bouyer if (sc->sda_hold_time == 0)
175 1.1 bouyer sc->sda_hold_time = dwiic_read(sc, DW_IC_SDA_HOLD);
176 1.1 bouyer
177 1.1 bouyer if (dwiic_init(sc)) {
178 1.1 bouyer aprint_error_dev(sc->sc_dev, "failed initializing\n");
179 1.1 bouyer return 0;
180 1.1 bouyer }
181 1.1 bouyer
182 1.1 bouyer /* leave the controller disabled */
183 1.1 bouyer dwiic_write(sc, DW_IC_INTR_MASK, 0);
184 1.1 bouyer dwiic_enable(sc, 0);
185 1.1 bouyer dwiic_read(sc, DW_IC_CLR_INTR);
186 1.1 bouyer
187 1.1 bouyer mutex_init(&sc->sc_int_lock, MUTEX_DEFAULT, IPL_VM);
188 1.1 bouyer cv_init(&sc->sc_int_readwait, "dwiicr");
189 1.1 bouyer cv_init(&sc->sc_int_writewait, "dwiicw");
190 1.4 jakllsch cv_init(&sc->sc_int_stopwait, "dwiics");
191 1.1 bouyer
192 1.1 bouyer /* setup and attach iic bus */
193 1.6 thorpej iic_tag_init(&sc->sc_i2c_tag);
194 1.1 bouyer sc->sc_i2c_tag.ic_cookie = sc;
195 1.1 bouyer sc->sc_i2c_tag.ic_exec = dwiic_i2c_exec;
196 1.1 bouyer
197 1.1 bouyer sc->sc_iba.iba_tag = &sc->sc_i2c_tag;
198 1.1 bouyer
199 1.5 jakllsch /* config_found_ia for "i2cbus" is done in the bus-attachment glue */
200 1.5 jakllsch
201 1.9 riastrad atomic_store_release(&sc->sc_attached, true);
202 1.9 riastrad
203 1.1 bouyer return 1;
204 1.1 bouyer }
205 1.1 bouyer
206 1.1 bouyer int
207 1.1 bouyer dwiic_detach(device_t self, int flags)
208 1.1 bouyer {
209 1.1 bouyer struct dwiic_softc *sc = device_private(self);
210 1.1 bouyer
211 1.1 bouyer dwiic_enable(sc, 0);
212 1.1 bouyer if (sc->sc_ih != NULL) {
213 1.1 bouyer intr_disestablish(sc->sc_ih);
214 1.1 bouyer sc->sc_ih = NULL;
215 1.1 bouyer }
216 1.1 bouyer
217 1.1 bouyer return 0;
218 1.1 bouyer }
219 1.1 bouyer
220 1.1 bouyer bool
221 1.1 bouyer dwiic_suspend(device_t self, const pmf_qual_t *qual)
222 1.1 bouyer {
223 1.1 bouyer struct dwiic_softc *sc = device_private(self);
224 1.1 bouyer
225 1.1 bouyer /* disable controller */
226 1.1 bouyer dwiic_enable(sc, 0);
227 1.1 bouyer
228 1.1 bouyer /* disable interrupts */
229 1.1 bouyer dwiic_write(sc, DW_IC_INTR_MASK, 0);
230 1.1 bouyer dwiic_read(sc, DW_IC_CLR_INTR);
231 1.1 bouyer if (sc->sc_power != NULL) {
232 1.1 bouyer if (!sc->sc_power(sc, 0)) {
233 1.3 jakllsch device_printf(sc->sc_dev, "failed to power off\n");
234 1.1 bouyer }
235 1.1 bouyer }
236 1.1 bouyer return true;
237 1.1 bouyer }
238 1.1 bouyer
239 1.1 bouyer bool
240 1.1 bouyer dwiic_resume(device_t self, const pmf_qual_t *qual)
241 1.1 bouyer {
242 1.1 bouyer struct dwiic_softc *sc = device_private(self);
243 1.1 bouyer if (sc->sc_power != NULL) {
244 1.1 bouyer if (!sc->sc_power(sc, 1)) {
245 1.3 jakllsch device_printf(sc->sc_dev, "failed to power up\n");
246 1.1 bouyer return false;
247 1.1 bouyer }
248 1.1 bouyer }
249 1.1 bouyer dwiic_init(sc);
250 1.1 bouyer return true;
251 1.1 bouyer }
252 1.1 bouyer
253 1.1 bouyer static uint32_t
254 1.1 bouyer dwiic_read(struct dwiic_softc *sc, int offset)
255 1.1 bouyer {
256 1.1 bouyer u_int32_t b = bus_space_read_4(sc->sc_iot, sc->sc_ioh, offset);
257 1.1 bouyer
258 1.1 bouyer DPRINTF(("%s: read at 0x%x = 0x%x\n", device_xname(sc->sc_dev), offset, b));
259 1.1 bouyer
260 1.1 bouyer return b;
261 1.1 bouyer }
262 1.1 bouyer
263 1.1 bouyer static void
264 1.1 bouyer dwiic_write(struct dwiic_softc *sc, int offset, uint32_t val)
265 1.1 bouyer {
266 1.1 bouyer bus_space_write_4(sc->sc_iot, sc->sc_ioh, offset, val);
267 1.1 bouyer
268 1.1 bouyer DPRINTF(("%s: write at 0x%x: 0x%x\n", device_xname(sc->sc_dev), offset,
269 1.1 bouyer val));
270 1.1 bouyer }
271 1.1 bouyer
272 1.1 bouyer static int
273 1.1 bouyer dwiic_init(struct dwiic_softc *sc)
274 1.1 bouyer {
275 1.1 bouyer uint32_t reg;
276 1.1 bouyer
277 1.1 bouyer /* make sure we're talking to a device we know */
278 1.1 bouyer reg = dwiic_read(sc, DW_IC_COMP_TYPE);
279 1.1 bouyer if (reg != DW_IC_COMP_TYPE_VALUE) {
280 1.1 bouyer DPRINTF(("%s: invalid component type 0x%x\n",
281 1.1 bouyer device_xname(sc->sc_dev), reg));
282 1.1 bouyer return 1;
283 1.1 bouyer }
284 1.1 bouyer
285 1.1 bouyer /* disable the adapter */
286 1.1 bouyer dwiic_enable(sc, 0);
287 1.1 bouyer
288 1.1 bouyer /* write standard-mode SCL timing parameters */
289 1.1 bouyer dwiic_write(sc, DW_IC_SS_SCL_HCNT, sc->ss_hcnt);
290 1.1 bouyer dwiic_write(sc, DW_IC_SS_SCL_LCNT, sc->ss_lcnt);
291 1.1 bouyer
292 1.1 bouyer /* and fast-mode SCL timing parameters */
293 1.1 bouyer dwiic_write(sc, DW_IC_FS_SCL_HCNT, sc->fs_hcnt);
294 1.1 bouyer dwiic_write(sc, DW_IC_FS_SCL_LCNT, sc->fs_lcnt);
295 1.1 bouyer
296 1.1 bouyer /* SDA hold time */
297 1.1 bouyer reg = dwiic_read(sc, DW_IC_COMP_VERSION);
298 1.1 bouyer if (reg >= DW_IC_SDA_HOLD_MIN_VERS)
299 1.1 bouyer dwiic_write(sc, DW_IC_SDA_HOLD, sc->sda_hold_time);
300 1.1 bouyer
301 1.1 bouyer /* FIFO threshold levels */
302 1.1 bouyer sc->tx_fifo_depth = 32;
303 1.1 bouyer sc->rx_fifo_depth = 32;
304 1.1 bouyer dwiic_write(sc, DW_IC_TX_TL, sc->tx_fifo_depth / 2);
305 1.1 bouyer dwiic_write(sc, DW_IC_RX_TL, 0);
306 1.1 bouyer
307 1.1 bouyer /* configure as i2c master with fast speed */
308 1.1 bouyer sc->master_cfg = DW_IC_CON_MASTER | DW_IC_CON_SLAVE_DISABLE |
309 1.1 bouyer DW_IC_CON_RESTART_EN | DW_IC_CON_SPEED_FAST;
310 1.1 bouyer dwiic_write(sc, DW_IC_CON, sc->master_cfg);
311 1.1 bouyer
312 1.1 bouyer return 0;
313 1.1 bouyer }
314 1.1 bouyer
315 1.1 bouyer static void
316 1.1 bouyer dwiic_enable(struct dwiic_softc *sc, bool enable)
317 1.1 bouyer {
318 1.1 bouyer int retries;
319 1.1 bouyer
320 1.1 bouyer for (retries = 100; retries > 0; retries--) {
321 1.1 bouyer dwiic_write(sc, DW_IC_ENABLE, enable);
322 1.1 bouyer if ((dwiic_read(sc, DW_IC_ENABLE_STATUS) & 1) == enable)
323 1.1 bouyer return;
324 1.1 bouyer
325 1.1 bouyer DELAY(25);
326 1.1 bouyer }
327 1.1 bouyer
328 1.3 jakllsch device_printf(sc->sc_dev, "failed to %sable\n",
329 1.1 bouyer (enable ? "en" : "dis"));
330 1.1 bouyer }
331 1.1 bouyer
332 1.1 bouyer static int
333 1.1 bouyer dwiic_i2c_exec(void *cookie, i2c_op_t op, i2c_addr_t addr, const void *cmdbuf,
334 1.1 bouyer size_t cmdlen, void *buf, size_t len, int flags)
335 1.1 bouyer {
336 1.1 bouyer struct dwiic_softc *sc = cookie;
337 1.1 bouyer u_int32_t ic_con, st, cmd, resp;
338 1.1 bouyer int retries, tx_limit, rx_avail, x, readpos;
339 1.1 bouyer const uint8_t *bcmd;
340 1.1 bouyer uint8_t *bdata;
341 1.1 bouyer
342 1.7 thorpej if (sc->sc_poll)
343 1.1 bouyer flags |= I2C_F_POLL;
344 1.1 bouyer
345 1.1 bouyer DPRINTF(("%s: %s: op %d, addr 0x%02x, cmdlen %zu, len %zu, "
346 1.1 bouyer "flags 0x%02x\n", device_xname(sc->sc_dev), __func__, op, addr, cmdlen,
347 1.1 bouyer len, flags));
348 1.1 bouyer
349 1.1 bouyer /* setup transfer */
350 1.1 bouyer sc->sc_i2c_xfer.op = op;
351 1.1 bouyer sc->sc_i2c_xfer.buf = buf;
352 1.1 bouyer sc->sc_i2c_xfer.len = len;
353 1.1 bouyer sc->sc_i2c_xfer.flags = flags;
354 1.1 bouyer sc->sc_i2c_xfer.error = 0;
355 1.1 bouyer
356 1.1 bouyer /* wait for bus to be idle */
357 1.1 bouyer for (retries = 100; retries > 0; retries--) {
358 1.1 bouyer st = dwiic_read(sc, DW_IC_STATUS);
359 1.1 bouyer if (!(st & DW_IC_STATUS_ACTIVITY))
360 1.1 bouyer break;
361 1.1 bouyer DELAY(1000);
362 1.1 bouyer }
363 1.1 bouyer DPRINTF(("%s: %s: status 0x%x\n", device_xname(sc->sc_dev), __func__, st));
364 1.1 bouyer if (st & DW_IC_STATUS_ACTIVITY) {
365 1.1 bouyer return (1);
366 1.1 bouyer }
367 1.1 bouyer
368 1.1 bouyer /* disable controller */
369 1.1 bouyer dwiic_enable(sc, 0);
370 1.1 bouyer
371 1.1 bouyer /* set slave address */
372 1.1 bouyer ic_con = dwiic_read(sc, DW_IC_CON);
373 1.1 bouyer ic_con &= ~DW_IC_CON_10BITADDR_MASTER;
374 1.1 bouyer dwiic_write(sc, DW_IC_CON, ic_con);
375 1.1 bouyer dwiic_write(sc, DW_IC_TAR, addr);
376 1.1 bouyer
377 1.1 bouyer /* disable interrupts */
378 1.1 bouyer dwiic_write(sc, DW_IC_INTR_MASK, 0);
379 1.1 bouyer dwiic_read(sc, DW_IC_CLR_INTR);
380 1.1 bouyer
381 1.1 bouyer /* enable controller */
382 1.1 bouyer dwiic_enable(sc, 1);
383 1.1 bouyer
384 1.1 bouyer /* wait until the controller is ready for commands */
385 1.1 bouyer if (flags & I2C_F_POLL)
386 1.1 bouyer DELAY(200);
387 1.1 bouyer else {
388 1.1 bouyer mutex_enter(&sc->sc_int_lock);
389 1.1 bouyer dwiic_read(sc, DW_IC_CLR_INTR);
390 1.1 bouyer dwiic_write(sc, DW_IC_INTR_MASK, DW_IC_INTR_TX_EMPTY);
391 1.1 bouyer
392 1.1 bouyer if (cv_timedwait(&sc->sc_int_writewait,
393 1.1 bouyer &sc->sc_int_lock, hz / 2) != 0)
394 1.3 jakllsch device_printf(sc->sc_dev,
395 1.1 bouyer "timed out waiting for tx_empty intr\n");
396 1.1 bouyer dwiic_write(sc, DW_IC_INTR_MASK, 0);
397 1.1 bouyer dwiic_read(sc, DW_IC_CLR_INTR);
398 1.1 bouyer mutex_exit(&sc->sc_int_lock);
399 1.1 bouyer }
400 1.1 bouyer
401 1.1 bouyer /* send our command, one byte at a time */
402 1.1 bouyer if (cmdlen > 0) {
403 1.1 bouyer bcmd = (const void *)cmdbuf;
404 1.1 bouyer
405 1.1 bouyer DPRINTF(("%s: %s: sending cmd (len %zu):", device_xname(sc->sc_dev),
406 1.1 bouyer __func__, cmdlen));
407 1.1 bouyer for (x = 0; x < cmdlen; x++)
408 1.1 bouyer DPRINTF((" %02x", bcmd[x]));
409 1.1 bouyer DPRINTF(("\n"));
410 1.1 bouyer
411 1.1 bouyer tx_limit = sc->tx_fifo_depth - dwiic_read(sc, DW_IC_TXFLR);
412 1.1 bouyer if (cmdlen > tx_limit) {
413 1.1 bouyer /* TODO */
414 1.3 jakllsch device_printf(sc->sc_dev, "can't write %zu (> %d)\n",
415 1.1 bouyer cmdlen, tx_limit);
416 1.1 bouyer sc->sc_i2c_xfer.error = 1;
417 1.1 bouyer return (1);
418 1.1 bouyer }
419 1.1 bouyer
420 1.1 bouyer for (x = 0; x < cmdlen; x++) {
421 1.1 bouyer cmd = bcmd[x];
422 1.1 bouyer /*
423 1.1 bouyer * Generate STOP condition if this is the last
424 1.1 bouyer * byte of the transfer.
425 1.1 bouyer */
426 1.1 bouyer if (x == (cmdlen - 1) && len == 0 && I2C_OP_STOP_P(op))
427 1.1 bouyer cmd |= DW_IC_DATA_CMD_STOP;
428 1.1 bouyer dwiic_write(sc, DW_IC_DATA_CMD, cmd);
429 1.1 bouyer }
430 1.1 bouyer }
431 1.1 bouyer
432 1.1 bouyer bdata = (void *)buf;
433 1.1 bouyer x = readpos = 0;
434 1.1 bouyer tx_limit = sc->tx_fifo_depth - dwiic_read(sc, DW_IC_TXFLR);
435 1.1 bouyer
436 1.1 bouyer DPRINTF(("%s: %s: need to read %zu bytes, can send %d read reqs\n",
437 1.1 bouyer device_xname(sc->sc_dev), __func__, len, tx_limit));
438 1.1 bouyer
439 1.1 bouyer while (x < len) {
440 1.1 bouyer if (I2C_OP_WRITE_P(op))
441 1.1 bouyer cmd = bdata[x];
442 1.1 bouyer else
443 1.1 bouyer cmd = DW_IC_DATA_CMD_READ;
444 1.1 bouyer
445 1.1 bouyer /*
446 1.1 bouyer * Generate RESTART condition if we're reversing
447 1.1 bouyer * direction.
448 1.1 bouyer */
449 1.1 bouyer if (x == 0 && cmdlen > 0 && I2C_OP_READ_P(op))
450 1.1 bouyer cmd |= DW_IC_DATA_CMD_RESTART;
451 1.1 bouyer /*
452 1.8 andvar * Generate STOP condition on the last byte of the
453 1.1 bouyer * transfer.
454 1.1 bouyer */
455 1.1 bouyer if (x == (len - 1) && I2C_OP_STOP_P(op))
456 1.1 bouyer cmd |= DW_IC_DATA_CMD_STOP;
457 1.1 bouyer
458 1.1 bouyer dwiic_write(sc, DW_IC_DATA_CMD, cmd);
459 1.1 bouyer
460 1.1 bouyer tx_limit--;
461 1.1 bouyer x++;
462 1.1 bouyer
463 1.1 bouyer /*
464 1.1 bouyer * As TXFLR fills up, we need to clear it out by reading all
465 1.1 bouyer * available data.
466 1.1 bouyer */
467 1.4 jakllsch while (I2C_OP_READ_P(op) && (tx_limit == 0 || x == len)) {
468 1.1 bouyer DPRINTF(("%s: %s: tx_limit %d, sent %d read reqs\n",
469 1.1 bouyer device_xname(sc->sc_dev), __func__, tx_limit, x));
470 1.1 bouyer
471 1.1 bouyer if (flags & I2C_F_POLL) {
472 1.1 bouyer for (retries = 100; retries > 0; retries--) {
473 1.1 bouyer rx_avail = dwiic_read(sc, DW_IC_RXFLR);
474 1.1 bouyer if (rx_avail > 0)
475 1.1 bouyer break;
476 1.1 bouyer DELAY(50);
477 1.1 bouyer }
478 1.1 bouyer } else {
479 1.1 bouyer mutex_enter(&sc->sc_int_lock);
480 1.1 bouyer dwiic_read(sc, DW_IC_CLR_INTR);
481 1.1 bouyer dwiic_write(sc, DW_IC_INTR_MASK,
482 1.1 bouyer DW_IC_INTR_RX_FULL);
483 1.1 bouyer
484 1.1 bouyer if (cv_timedwait(&sc->sc_int_readwait,
485 1.1 bouyer &sc->sc_int_lock, hz / 2) != 0)
486 1.3 jakllsch device_printf(sc->sc_dev,
487 1.1 bouyer "timed out waiting for "
488 1.1 bouyer "rx_full intr\n");
489 1.1 bouyer
490 1.1 bouyer dwiic_write(sc, DW_IC_INTR_MASK, 0);
491 1.1 bouyer dwiic_read(sc, DW_IC_CLR_INTR);
492 1.1 bouyer mutex_exit(&sc->sc_int_lock);
493 1.1 bouyer rx_avail = dwiic_read(sc, DW_IC_RXFLR);
494 1.1 bouyer }
495 1.1 bouyer
496 1.1 bouyer if (rx_avail == 0) {
497 1.3 jakllsch device_printf(sc->sc_dev,
498 1.1 bouyer "timed out reading remaining %d\n",
499 1.1 bouyer (int)(len - 1 - readpos));
500 1.1 bouyer sc->sc_i2c_xfer.error = 1;
501 1.1 bouyer return (1);
502 1.1 bouyer }
503 1.1 bouyer
504 1.1 bouyer DPRINTF(("%s: %s: %d avail to read (%zu remaining)\n",
505 1.1 bouyer device_xname(sc->sc_dev), __func__, rx_avail,
506 1.1 bouyer len - readpos));
507 1.1 bouyer
508 1.1 bouyer while (rx_avail > 0) {
509 1.1 bouyer resp = dwiic_read(sc, DW_IC_DATA_CMD);
510 1.1 bouyer if (readpos < len) {
511 1.1 bouyer bdata[readpos] = resp;
512 1.1 bouyer readpos++;
513 1.1 bouyer }
514 1.1 bouyer rx_avail--;
515 1.1 bouyer }
516 1.1 bouyer
517 1.1 bouyer if (readpos >= len)
518 1.1 bouyer break;
519 1.1 bouyer
520 1.1 bouyer DPRINTF(("%s: still need to read %d bytes\n",
521 1.1 bouyer device_xname(sc->sc_dev), (int)(len - readpos)));
522 1.1 bouyer tx_limit = sc->tx_fifo_depth -
523 1.1 bouyer dwiic_read(sc, DW_IC_TXFLR);
524 1.1 bouyer }
525 1.1 bouyer }
526 1.1 bouyer
527 1.4 jakllsch if (I2C_OP_STOP_P(op) && I2C_OP_WRITE_P(op)) {
528 1.4 jakllsch if (flags & I2C_F_POLL) {
529 1.4 jakllsch /* wait for bus to be idle */
530 1.4 jakllsch for (retries = 100; retries > 0; retries--) {
531 1.4 jakllsch st = dwiic_read(sc, DW_IC_STATUS);
532 1.4 jakllsch if (!(st & DW_IC_STATUS_ACTIVITY))
533 1.4 jakllsch break;
534 1.4 jakllsch DELAY(1000);
535 1.4 jakllsch }
536 1.4 jakllsch if (st & DW_IC_STATUS_ACTIVITY)
537 1.4 jakllsch device_printf(sc->sc_dev, "timed out waiting "
538 1.4 jakllsch "for bus idle\n");
539 1.4 jakllsch } else {
540 1.4 jakllsch mutex_enter(&sc->sc_int_lock);
541 1.4 jakllsch dwiic_read(sc, DW_IC_CLR_INTR);
542 1.4 jakllsch dwiic_write(sc, DW_IC_INTR_MASK,
543 1.4 jakllsch DW_IC_INTR_STOP_DET);
544 1.4 jakllsch if (cv_timedwait(&sc->sc_int_stopwait,
545 1.4 jakllsch &sc->sc_int_lock, hz / 2) != 0)
546 1.4 jakllsch device_printf(sc->sc_dev, "timed out waiting "
547 1.4 jakllsch "for stop intr\n");
548 1.4 jakllsch dwiic_write(sc, DW_IC_INTR_MASK, 0);
549 1.4 jakllsch dwiic_read(sc, DW_IC_CLR_INTR);
550 1.4 jakllsch mutex_exit(&sc->sc_int_lock);
551 1.4 jakllsch }
552 1.4 jakllsch }
553 1.4 jakllsch
554 1.1 bouyer return 0;
555 1.1 bouyer }
556 1.1 bouyer
557 1.1 bouyer static uint32_t
558 1.1 bouyer dwiic_read_clear_intrbits(struct dwiic_softc *sc)
559 1.1 bouyer {
560 1.1 bouyer uint32_t stat;
561 1.1 bouyer
562 1.1 bouyer stat = dwiic_read(sc, DW_IC_INTR_STAT);
563 1.1 bouyer
564 1.1 bouyer if (stat & DW_IC_INTR_RX_UNDER)
565 1.1 bouyer dwiic_read(sc, DW_IC_CLR_RX_UNDER);
566 1.1 bouyer if (stat & DW_IC_INTR_RX_OVER)
567 1.1 bouyer dwiic_read(sc, DW_IC_CLR_RX_OVER);
568 1.1 bouyer if (stat & DW_IC_INTR_TX_OVER)
569 1.1 bouyer dwiic_read(sc, DW_IC_CLR_TX_OVER);
570 1.1 bouyer if (stat & DW_IC_INTR_RD_REQ)
571 1.1 bouyer dwiic_read(sc, DW_IC_CLR_RD_REQ);
572 1.1 bouyer if (stat & DW_IC_INTR_TX_ABRT)
573 1.1 bouyer dwiic_read(sc, DW_IC_CLR_TX_ABRT);
574 1.1 bouyer if (stat & DW_IC_INTR_RX_DONE)
575 1.1 bouyer dwiic_read(sc, DW_IC_CLR_RX_DONE);
576 1.1 bouyer if (stat & DW_IC_INTR_ACTIVITY)
577 1.1 bouyer dwiic_read(sc, DW_IC_CLR_ACTIVITY);
578 1.1 bouyer if (stat & DW_IC_INTR_STOP_DET)
579 1.1 bouyer dwiic_read(sc, DW_IC_CLR_STOP_DET);
580 1.1 bouyer if (stat & DW_IC_INTR_START_DET)
581 1.1 bouyer dwiic_read(sc, DW_IC_CLR_START_DET);
582 1.1 bouyer if (stat & DW_IC_INTR_GEN_CALL)
583 1.1 bouyer dwiic_read(sc, DW_IC_CLR_GEN_CALL);
584 1.1 bouyer
585 1.1 bouyer return stat;
586 1.1 bouyer }
587 1.1 bouyer
588 1.1 bouyer int
589 1.1 bouyer dwiic_intr(void *arg)
590 1.1 bouyer {
591 1.1 bouyer struct dwiic_softc *sc = arg;
592 1.1 bouyer uint32_t en, stat;
593 1.1 bouyer
594 1.9 riastrad /*
595 1.9 riastrad * Give up if attach hasn't succeeded. If it failed, nothing
596 1.9 riastrad * to do here. If it is still ongoing and simply hasn't yet
597 1.9 riastrad * succeeded, interrupts from the device are masked -- so this
598 1.9 riastrad * interrupt must be shared with another driver -- and any
599 1.9 riastrad * interrupts applicable to us will be delivered once
600 1.9 riastrad * interrupts from the device are unmasked in dwiic_i2c_exec.
601 1.9 riastrad */
602 1.9 riastrad if (!atomic_load_acquire(&sc->sc_attached))
603 1.9 riastrad return 0;
604 1.9 riastrad
605 1.1 bouyer en = dwiic_read(sc, DW_IC_ENABLE);
606 1.1 bouyer /* probably for the other controller */
607 1.1 bouyer if (!en)
608 1.1 bouyer return 0;
609 1.1 bouyer
610 1.1 bouyer stat = dwiic_read_clear_intrbits(sc);
611 1.1 bouyer DPRINTF(("%s: %s: enabled=0x%x stat=0x%x\n", device_xname(sc->sc_dev),
612 1.1 bouyer __func__, en, stat));
613 1.1 bouyer if (!(stat & ~DW_IC_INTR_ACTIVITY))
614 1.1 bouyer return 1;
615 1.1 bouyer
616 1.1 bouyer if (stat & DW_IC_INTR_TX_ABRT)
617 1.1 bouyer sc->sc_i2c_xfer.error = 1;
618 1.1 bouyer
619 1.1 bouyer if (sc->sc_i2c_xfer.flags & I2C_F_POLL)
620 1.1 bouyer DPRINTF(("%s: %s: intr in poll mode?\n", device_xname(sc->sc_dev),
621 1.1 bouyer __func__));
622 1.1 bouyer else {
623 1.1 bouyer mutex_enter(&sc->sc_int_lock);
624 1.1 bouyer if (stat & DW_IC_INTR_RX_FULL) {
625 1.1 bouyer dwiic_write(sc, DW_IC_INTR_MASK, 0);
626 1.1 bouyer DPRINTF(("%s: %s: waking up reader\n",
627 1.1 bouyer device_xname(sc->sc_dev), __func__));
628 1.1 bouyer cv_signal(&sc->sc_int_readwait);
629 1.1 bouyer }
630 1.1 bouyer if (stat & DW_IC_INTR_TX_EMPTY) {
631 1.1 bouyer dwiic_write(sc, DW_IC_INTR_MASK, 0);
632 1.1 bouyer DPRINTF(("%s: %s: waking up writer\n",
633 1.1 bouyer device_xname(sc->sc_dev), __func__));
634 1.1 bouyer cv_signal(&sc->sc_int_writewait);
635 1.1 bouyer }
636 1.4 jakllsch if (stat & DW_IC_INTR_STOP_DET) {
637 1.4 jakllsch dwiic_write(sc, DW_IC_INTR_MASK, 0);
638 1.4 jakllsch DPRINTF(("%s: %s: waking up stopper\n",
639 1.4 jakllsch device_xname(sc->sc_dev), __func__));
640 1.4 jakllsch cv_signal(&sc->sc_int_stopwait);
641 1.4 jakllsch }
642 1.1 bouyer mutex_exit(&sc->sc_int_lock);
643 1.1 bouyer }
644 1.1 bouyer
645 1.1 bouyer return 1;
646 1.1 bouyer }
647