dwiic.c revision 1.4 1 1.4 jakllsch /* $NetBSD: dwiic.c,v 1.4 2018/09/26 18:32:51 jakllsch 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.4 jakllsch __KERNEL_RCSID(0, "$NetBSD: dwiic.c,v 1.4 2018/09/26 18:32:51 jakllsch Exp $");
53 1.1 bouyer
54 1.1 bouyer #include <sys/param.h>
55 1.1 bouyer #include <sys/bus.h>
56 1.1 bouyer #include <sys/device.h>
57 1.1 bouyer #include <sys/kernel.h>
58 1.1 bouyer #include <sys/systm.h>
59 1.1 bouyer
60 1.1 bouyer #include <dev/ic/dwiic_var.h>
61 1.1 bouyer
62 1.1 bouyer //#define DWIIC_DEBUG
63 1.1 bouyer
64 1.1 bouyer #ifdef DWIIC_DEBUG
65 1.1 bouyer #define DPRINTF(x) printf x
66 1.1 bouyer #else
67 1.1 bouyer #define DPRINTF(x)
68 1.1 bouyer #endif
69 1.1 bouyer
70 1.1 bouyer /* register offsets */
71 1.1 bouyer #define DW_IC_CON 0x0
72 1.1 bouyer #define DW_IC_TAR 0x4
73 1.1 bouyer #define DW_IC_DATA_CMD 0x10
74 1.1 bouyer #define DW_IC_SS_SCL_HCNT 0x14
75 1.1 bouyer #define DW_IC_SS_SCL_LCNT 0x18
76 1.1 bouyer #define DW_IC_FS_SCL_HCNT 0x1c
77 1.1 bouyer #define DW_IC_FS_SCL_LCNT 0x20
78 1.1 bouyer #define DW_IC_INTR_STAT 0x2c
79 1.1 bouyer #define DW_IC_INTR_MASK 0x30
80 1.1 bouyer #define DW_IC_RAW_INTR_STAT 0x34
81 1.1 bouyer #define DW_IC_RX_TL 0x38
82 1.1 bouyer #define DW_IC_TX_TL 0x3c
83 1.1 bouyer #define DW_IC_CLR_INTR 0x40
84 1.1 bouyer #define DW_IC_CLR_RX_UNDER 0x44
85 1.1 bouyer #define DW_IC_CLR_RX_OVER 0x48
86 1.1 bouyer #define DW_IC_CLR_TX_OVER 0x4c
87 1.1 bouyer #define DW_IC_CLR_RD_REQ 0x50
88 1.1 bouyer #define DW_IC_CLR_TX_ABRT 0x54
89 1.1 bouyer #define DW_IC_CLR_RX_DONE 0x58
90 1.1 bouyer #define DW_IC_CLR_ACTIVITY 0x5c
91 1.1 bouyer #define DW_IC_CLR_STOP_DET 0x60
92 1.1 bouyer #define DW_IC_CLR_START_DET 0x64
93 1.1 bouyer #define DW_IC_CLR_GEN_CALL 0x68
94 1.1 bouyer #define DW_IC_ENABLE 0x6c
95 1.1 bouyer #define DW_IC_STATUS 0x70
96 1.1 bouyer #define DW_IC_TXFLR 0x74
97 1.1 bouyer #define DW_IC_RXFLR 0x78
98 1.1 bouyer #define DW_IC_SDA_HOLD 0x7c
99 1.1 bouyer #define DW_IC_TX_ABRT_SOURCE 0x80
100 1.1 bouyer #define DW_IC_ENABLE_STATUS 0x9c
101 1.1 bouyer #define DW_IC_COMP_PARAM_1 0xf4
102 1.1 bouyer #define DW_IC_COMP_VERSION 0xf8
103 1.1 bouyer #define DW_IC_SDA_HOLD_MIN_VERS 0x3131312A
104 1.1 bouyer #define DW_IC_COMP_TYPE 0xfc
105 1.1 bouyer #define DW_IC_COMP_TYPE_VALUE 0x44570140
106 1.1 bouyer
107 1.1 bouyer #define DW_IC_CON_MASTER 0x1
108 1.1 bouyer #define DW_IC_CON_SPEED_STD 0x2
109 1.1 bouyer #define DW_IC_CON_SPEED_FAST 0x4
110 1.1 bouyer #define DW_IC_CON_10BITADDR_MASTER 0x10
111 1.1 bouyer #define DW_IC_CON_RESTART_EN 0x20
112 1.1 bouyer #define DW_IC_CON_SLAVE_DISABLE 0x40
113 1.1 bouyer
114 1.1 bouyer #define DW_IC_DATA_CMD_READ 0x100
115 1.1 bouyer #define DW_IC_DATA_CMD_STOP 0x200
116 1.1 bouyer #define DW_IC_DATA_CMD_RESTART 0x400
117 1.1 bouyer
118 1.1 bouyer #define DW_IC_INTR_RX_UNDER 0x001
119 1.1 bouyer #define DW_IC_INTR_RX_OVER 0x002
120 1.1 bouyer #define DW_IC_INTR_RX_FULL 0x004
121 1.1 bouyer #define DW_IC_INTR_TX_OVER 0x008
122 1.1 bouyer #define DW_IC_INTR_TX_EMPTY 0x010
123 1.1 bouyer #define DW_IC_INTR_RD_REQ 0x020
124 1.1 bouyer #define DW_IC_INTR_TX_ABRT 0x040
125 1.1 bouyer #define DW_IC_INTR_RX_DONE 0x080
126 1.1 bouyer #define DW_IC_INTR_ACTIVITY 0x100
127 1.1 bouyer #define DW_IC_INTR_STOP_DET 0x200
128 1.1 bouyer #define DW_IC_INTR_START_DET 0x400
129 1.1 bouyer #define DW_IC_INTR_GEN_CALL 0x800
130 1.1 bouyer
131 1.1 bouyer #define DW_IC_STATUS_ACTIVITY 0x1
132 1.1 bouyer
133 1.1 bouyer /* hardware abort codes from the DW_IC_TX_ABRT_SOURCE register */
134 1.1 bouyer #define ABRT_7B_ADDR_NOACK 0
135 1.1 bouyer #define ABRT_10ADDR1_NOACK 1
136 1.1 bouyer #define ABRT_10ADDR2_NOACK 2
137 1.1 bouyer #define ABRT_TXDATA_NOACK 3
138 1.1 bouyer #define ABRT_GCALL_NOACK 4
139 1.1 bouyer #define ABRT_GCALL_READ 5
140 1.1 bouyer #define ABRT_SBYTE_ACKDET 7
141 1.1 bouyer #define ABRT_SBYTE_NORSTRT 9
142 1.1 bouyer #define ABRT_10B_RD_NORSTRT 10
143 1.1 bouyer #define ABRT_MASTER_DIS 11
144 1.1 bouyer #define ARB_LOST 12
145 1.1 bouyer
146 1.1 bouyer static int dwiic_init(struct dwiic_softc *);
147 1.1 bouyer static void dwiic_enable(struct dwiic_softc *, bool);
148 1.1 bouyer static int dwiic_i2c_acquire_bus(void *, int);
149 1.1 bouyer static void dwiic_i2c_release_bus(void *, int);
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_i2c_lock, MUTEX_DEFAULT, IPL_NONE);
188 1.1 bouyer mutex_init(&sc->sc_int_lock, MUTEX_DEFAULT, IPL_VM);
189 1.1 bouyer cv_init(&sc->sc_int_readwait, "dwiicr");
190 1.1 bouyer cv_init(&sc->sc_int_writewait, "dwiicw");
191 1.4 jakllsch cv_init(&sc->sc_int_stopwait, "dwiics");
192 1.1 bouyer
193 1.1 bouyer /* setup and attach iic bus */
194 1.1 bouyer sc->sc_i2c_tag.ic_cookie = sc;
195 1.1 bouyer sc->sc_i2c_tag.ic_acquire_bus = dwiic_i2c_acquire_bus;
196 1.1 bouyer sc->sc_i2c_tag.ic_release_bus = dwiic_i2c_release_bus;
197 1.1 bouyer sc->sc_i2c_tag.ic_exec = dwiic_i2c_exec;
198 1.1 bouyer
199 1.1 bouyer sc->sc_iba.iba_tag = &sc->sc_i2c_tag;
200 1.1 bouyer
201 1.1 bouyer config_found_ia(sc->sc_dev, "i2cbus", &sc->sc_iba, iicbus_print);
202 1.1 bouyer return 1;
203 1.1 bouyer }
204 1.1 bouyer
205 1.1 bouyer int
206 1.1 bouyer dwiic_detach(device_t self, int flags)
207 1.1 bouyer {
208 1.1 bouyer struct dwiic_softc *sc = device_private(self);
209 1.1 bouyer
210 1.1 bouyer dwiic_enable(sc, 0);
211 1.1 bouyer if (sc->sc_ih != NULL) {
212 1.1 bouyer intr_disestablish(sc->sc_ih);
213 1.1 bouyer sc->sc_ih = NULL;
214 1.1 bouyer }
215 1.1 bouyer
216 1.1 bouyer return 0;
217 1.1 bouyer }
218 1.1 bouyer
219 1.1 bouyer bool
220 1.1 bouyer dwiic_suspend(device_t self, const pmf_qual_t *qual)
221 1.1 bouyer {
222 1.1 bouyer struct dwiic_softc *sc = device_private(self);
223 1.1 bouyer
224 1.1 bouyer /* disable controller */
225 1.1 bouyer dwiic_enable(sc, 0);
226 1.1 bouyer
227 1.1 bouyer /* disable interrupts */
228 1.1 bouyer dwiic_write(sc, DW_IC_INTR_MASK, 0);
229 1.1 bouyer dwiic_read(sc, DW_IC_CLR_INTR);
230 1.1 bouyer if (sc->sc_power != NULL) {
231 1.1 bouyer if (!sc->sc_power(sc, 0)) {
232 1.3 jakllsch device_printf(sc->sc_dev, "failed to power off\n");
233 1.1 bouyer }
234 1.1 bouyer }
235 1.1 bouyer return true;
236 1.1 bouyer }
237 1.1 bouyer
238 1.1 bouyer bool
239 1.1 bouyer dwiic_resume(device_t self, const pmf_qual_t *qual)
240 1.1 bouyer {
241 1.1 bouyer struct dwiic_softc *sc = device_private(self);
242 1.1 bouyer if (sc->sc_power != NULL) {
243 1.1 bouyer if (!sc->sc_power(sc, 1)) {
244 1.3 jakllsch device_printf(sc->sc_dev, "failed to power up\n");
245 1.1 bouyer return false;
246 1.1 bouyer }
247 1.1 bouyer }
248 1.1 bouyer dwiic_init(sc);
249 1.1 bouyer return true;
250 1.1 bouyer }
251 1.1 bouyer
252 1.1 bouyer static uint32_t
253 1.1 bouyer dwiic_read(struct dwiic_softc *sc, int offset)
254 1.1 bouyer {
255 1.1 bouyer u_int32_t b = bus_space_read_4(sc->sc_iot, sc->sc_ioh, offset);
256 1.1 bouyer
257 1.1 bouyer DPRINTF(("%s: read at 0x%x = 0x%x\n", device_xname(sc->sc_dev), offset, b));
258 1.1 bouyer
259 1.1 bouyer return b;
260 1.1 bouyer }
261 1.1 bouyer
262 1.1 bouyer static void
263 1.1 bouyer dwiic_write(struct dwiic_softc *sc, int offset, uint32_t val)
264 1.1 bouyer {
265 1.1 bouyer bus_space_write_4(sc->sc_iot, sc->sc_ioh, offset, val);
266 1.1 bouyer
267 1.1 bouyer DPRINTF(("%s: write at 0x%x: 0x%x\n", device_xname(sc->sc_dev), offset,
268 1.1 bouyer val));
269 1.1 bouyer }
270 1.1 bouyer
271 1.1 bouyer static int
272 1.1 bouyer dwiic_i2c_acquire_bus(void *cookie, int flags)
273 1.1 bouyer {
274 1.1 bouyer struct dwiic_softc *sc = cookie;
275 1.1 bouyer
276 1.1 bouyer if (cold || sc->sc_poll || (flags & I2C_F_POLL))
277 1.1 bouyer return (0);
278 1.1 bouyer
279 1.1 bouyer mutex_enter(&sc->sc_i2c_lock);
280 1.2 jakllsch return 0;
281 1.1 bouyer }
282 1.1 bouyer
283 1.1 bouyer void
284 1.1 bouyer dwiic_i2c_release_bus(void *cookie, int flags)
285 1.1 bouyer {
286 1.1 bouyer struct dwiic_softc *sc = cookie;
287 1.1 bouyer
288 1.1 bouyer if (cold || sc->sc_poll || (flags & I2C_F_POLL))
289 1.1 bouyer return;
290 1.1 bouyer
291 1.1 bouyer mutex_exit(&sc->sc_i2c_lock);
292 1.1 bouyer }
293 1.1 bouyer
294 1.1 bouyer static int
295 1.1 bouyer dwiic_init(struct dwiic_softc *sc)
296 1.1 bouyer {
297 1.1 bouyer uint32_t reg;
298 1.1 bouyer
299 1.1 bouyer /* make sure we're talking to a device we know */
300 1.1 bouyer reg = dwiic_read(sc, DW_IC_COMP_TYPE);
301 1.1 bouyer if (reg != DW_IC_COMP_TYPE_VALUE) {
302 1.1 bouyer DPRINTF(("%s: invalid component type 0x%x\n",
303 1.1 bouyer device_xname(sc->sc_dev), reg));
304 1.1 bouyer return 1;
305 1.1 bouyer }
306 1.1 bouyer
307 1.1 bouyer /* disable the adapter */
308 1.1 bouyer dwiic_enable(sc, 0);
309 1.1 bouyer
310 1.1 bouyer /* write standard-mode SCL timing parameters */
311 1.1 bouyer dwiic_write(sc, DW_IC_SS_SCL_HCNT, sc->ss_hcnt);
312 1.1 bouyer dwiic_write(sc, DW_IC_SS_SCL_LCNT, sc->ss_lcnt);
313 1.1 bouyer
314 1.1 bouyer /* and fast-mode SCL timing parameters */
315 1.1 bouyer dwiic_write(sc, DW_IC_FS_SCL_HCNT, sc->fs_hcnt);
316 1.1 bouyer dwiic_write(sc, DW_IC_FS_SCL_LCNT, sc->fs_lcnt);
317 1.1 bouyer
318 1.1 bouyer /* SDA hold time */
319 1.1 bouyer reg = dwiic_read(sc, DW_IC_COMP_VERSION);
320 1.1 bouyer if (reg >= DW_IC_SDA_HOLD_MIN_VERS)
321 1.1 bouyer dwiic_write(sc, DW_IC_SDA_HOLD, sc->sda_hold_time);
322 1.1 bouyer
323 1.1 bouyer /* FIFO threshold levels */
324 1.1 bouyer sc->tx_fifo_depth = 32;
325 1.1 bouyer sc->rx_fifo_depth = 32;
326 1.1 bouyer dwiic_write(sc, DW_IC_TX_TL, sc->tx_fifo_depth / 2);
327 1.1 bouyer dwiic_write(sc, DW_IC_RX_TL, 0);
328 1.1 bouyer
329 1.1 bouyer /* configure as i2c master with fast speed */
330 1.1 bouyer sc->master_cfg = DW_IC_CON_MASTER | DW_IC_CON_SLAVE_DISABLE |
331 1.1 bouyer DW_IC_CON_RESTART_EN | DW_IC_CON_SPEED_FAST;
332 1.1 bouyer dwiic_write(sc, DW_IC_CON, sc->master_cfg);
333 1.1 bouyer
334 1.1 bouyer return 0;
335 1.1 bouyer }
336 1.1 bouyer
337 1.1 bouyer static void
338 1.1 bouyer dwiic_enable(struct dwiic_softc *sc, bool enable)
339 1.1 bouyer {
340 1.1 bouyer int retries;
341 1.1 bouyer
342 1.1 bouyer for (retries = 100; retries > 0; retries--) {
343 1.1 bouyer dwiic_write(sc, DW_IC_ENABLE, enable);
344 1.1 bouyer if ((dwiic_read(sc, DW_IC_ENABLE_STATUS) & 1) == enable)
345 1.1 bouyer return;
346 1.1 bouyer
347 1.1 bouyer DELAY(25);
348 1.1 bouyer }
349 1.1 bouyer
350 1.3 jakllsch device_printf(sc->sc_dev, "failed to %sable\n",
351 1.1 bouyer (enable ? "en" : "dis"));
352 1.1 bouyer }
353 1.1 bouyer
354 1.1 bouyer static int
355 1.1 bouyer dwiic_i2c_exec(void *cookie, i2c_op_t op, i2c_addr_t addr, const void *cmdbuf,
356 1.1 bouyer size_t cmdlen, void *buf, size_t len, int flags)
357 1.1 bouyer {
358 1.1 bouyer struct dwiic_softc *sc = cookie;
359 1.1 bouyer u_int32_t ic_con, st, cmd, resp;
360 1.1 bouyer int retries, tx_limit, rx_avail, x, readpos;
361 1.1 bouyer const uint8_t *bcmd;
362 1.1 bouyer uint8_t *bdata;
363 1.1 bouyer
364 1.1 bouyer if (cold || sc->sc_poll)
365 1.1 bouyer flags |= I2C_F_POLL;
366 1.1 bouyer
367 1.1 bouyer DPRINTF(("%s: %s: op %d, addr 0x%02x, cmdlen %zu, len %zu, "
368 1.1 bouyer "flags 0x%02x\n", device_xname(sc->sc_dev), __func__, op, addr, cmdlen,
369 1.1 bouyer len, flags));
370 1.1 bouyer
371 1.1 bouyer /* setup transfer */
372 1.1 bouyer sc->sc_i2c_xfer.op = op;
373 1.1 bouyer sc->sc_i2c_xfer.buf = buf;
374 1.1 bouyer sc->sc_i2c_xfer.len = len;
375 1.1 bouyer sc->sc_i2c_xfer.flags = flags;
376 1.1 bouyer sc->sc_i2c_xfer.error = 0;
377 1.1 bouyer
378 1.1 bouyer /* wait for bus to be idle */
379 1.1 bouyer for (retries = 100; retries > 0; retries--) {
380 1.1 bouyer st = dwiic_read(sc, DW_IC_STATUS);
381 1.1 bouyer if (!(st & DW_IC_STATUS_ACTIVITY))
382 1.1 bouyer break;
383 1.1 bouyer DELAY(1000);
384 1.1 bouyer }
385 1.1 bouyer DPRINTF(("%s: %s: status 0x%x\n", device_xname(sc->sc_dev), __func__, st));
386 1.1 bouyer if (st & DW_IC_STATUS_ACTIVITY) {
387 1.1 bouyer return (1);
388 1.1 bouyer }
389 1.1 bouyer
390 1.1 bouyer /* disable controller */
391 1.1 bouyer dwiic_enable(sc, 0);
392 1.1 bouyer
393 1.1 bouyer /* set slave address */
394 1.1 bouyer ic_con = dwiic_read(sc, DW_IC_CON);
395 1.1 bouyer ic_con &= ~DW_IC_CON_10BITADDR_MASTER;
396 1.1 bouyer dwiic_write(sc, DW_IC_CON, ic_con);
397 1.1 bouyer dwiic_write(sc, DW_IC_TAR, addr);
398 1.1 bouyer
399 1.1 bouyer /* disable interrupts */
400 1.1 bouyer dwiic_write(sc, DW_IC_INTR_MASK, 0);
401 1.1 bouyer dwiic_read(sc, DW_IC_CLR_INTR);
402 1.1 bouyer
403 1.1 bouyer /* enable controller */
404 1.1 bouyer dwiic_enable(sc, 1);
405 1.1 bouyer
406 1.1 bouyer /* wait until the controller is ready for commands */
407 1.1 bouyer if (flags & I2C_F_POLL)
408 1.1 bouyer DELAY(200);
409 1.1 bouyer else {
410 1.1 bouyer mutex_enter(&sc->sc_int_lock);
411 1.1 bouyer dwiic_read(sc, DW_IC_CLR_INTR);
412 1.1 bouyer dwiic_write(sc, DW_IC_INTR_MASK, DW_IC_INTR_TX_EMPTY);
413 1.1 bouyer
414 1.1 bouyer if (cv_timedwait(&sc->sc_int_writewait,
415 1.1 bouyer &sc->sc_int_lock, hz / 2) != 0)
416 1.3 jakllsch device_printf(sc->sc_dev,
417 1.1 bouyer "timed out waiting for tx_empty intr\n");
418 1.1 bouyer dwiic_write(sc, DW_IC_INTR_MASK, 0);
419 1.1 bouyer dwiic_read(sc, DW_IC_CLR_INTR);
420 1.1 bouyer mutex_exit(&sc->sc_int_lock);
421 1.1 bouyer }
422 1.1 bouyer
423 1.1 bouyer /* send our command, one byte at a time */
424 1.1 bouyer if (cmdlen > 0) {
425 1.1 bouyer bcmd = (const void *)cmdbuf;
426 1.1 bouyer
427 1.1 bouyer DPRINTF(("%s: %s: sending cmd (len %zu):", device_xname(sc->sc_dev),
428 1.1 bouyer __func__, cmdlen));
429 1.1 bouyer for (x = 0; x < cmdlen; x++)
430 1.1 bouyer DPRINTF((" %02x", bcmd[x]));
431 1.1 bouyer DPRINTF(("\n"));
432 1.1 bouyer
433 1.1 bouyer tx_limit = sc->tx_fifo_depth - dwiic_read(sc, DW_IC_TXFLR);
434 1.1 bouyer if (cmdlen > tx_limit) {
435 1.1 bouyer /* TODO */
436 1.3 jakllsch device_printf(sc->sc_dev, "can't write %zu (> %d)\n",
437 1.1 bouyer cmdlen, tx_limit);
438 1.1 bouyer sc->sc_i2c_xfer.error = 1;
439 1.1 bouyer return (1);
440 1.1 bouyer }
441 1.1 bouyer
442 1.1 bouyer for (x = 0; x < cmdlen; x++) {
443 1.1 bouyer cmd = bcmd[x];
444 1.1 bouyer /*
445 1.1 bouyer * Generate STOP condition if this is the last
446 1.1 bouyer * byte of the transfer.
447 1.1 bouyer */
448 1.1 bouyer if (x == (cmdlen - 1) && len == 0 && I2C_OP_STOP_P(op))
449 1.1 bouyer cmd |= DW_IC_DATA_CMD_STOP;
450 1.1 bouyer dwiic_write(sc, DW_IC_DATA_CMD, cmd);
451 1.1 bouyer }
452 1.1 bouyer }
453 1.1 bouyer
454 1.1 bouyer bdata = (void *)buf;
455 1.1 bouyer x = readpos = 0;
456 1.1 bouyer tx_limit = sc->tx_fifo_depth - dwiic_read(sc, DW_IC_TXFLR);
457 1.1 bouyer
458 1.1 bouyer DPRINTF(("%s: %s: need to read %zu bytes, can send %d read reqs\n",
459 1.1 bouyer device_xname(sc->sc_dev), __func__, len, tx_limit));
460 1.1 bouyer
461 1.1 bouyer while (x < len) {
462 1.1 bouyer if (I2C_OP_WRITE_P(op))
463 1.1 bouyer cmd = bdata[x];
464 1.1 bouyer else
465 1.1 bouyer cmd = DW_IC_DATA_CMD_READ;
466 1.1 bouyer
467 1.1 bouyer /*
468 1.1 bouyer * Generate RESTART condition if we're reversing
469 1.1 bouyer * direction.
470 1.1 bouyer */
471 1.1 bouyer if (x == 0 && cmdlen > 0 && I2C_OP_READ_P(op))
472 1.1 bouyer cmd |= DW_IC_DATA_CMD_RESTART;
473 1.1 bouyer /*
474 1.1 bouyer * Generate STOP conditon on the last byte of the
475 1.1 bouyer * transfer.
476 1.1 bouyer */
477 1.1 bouyer if (x == (len - 1) && I2C_OP_STOP_P(op))
478 1.1 bouyer cmd |= DW_IC_DATA_CMD_STOP;
479 1.1 bouyer
480 1.1 bouyer dwiic_write(sc, DW_IC_DATA_CMD, cmd);
481 1.1 bouyer
482 1.1 bouyer tx_limit--;
483 1.1 bouyer x++;
484 1.1 bouyer
485 1.1 bouyer /*
486 1.1 bouyer * As TXFLR fills up, we need to clear it out by reading all
487 1.1 bouyer * available data.
488 1.1 bouyer */
489 1.4 jakllsch while (I2C_OP_READ_P(op) && (tx_limit == 0 || x == len)) {
490 1.1 bouyer DPRINTF(("%s: %s: tx_limit %d, sent %d read reqs\n",
491 1.1 bouyer device_xname(sc->sc_dev), __func__, tx_limit, x));
492 1.1 bouyer
493 1.1 bouyer if (flags & I2C_F_POLL) {
494 1.1 bouyer for (retries = 100; retries > 0; retries--) {
495 1.1 bouyer rx_avail = dwiic_read(sc, DW_IC_RXFLR);
496 1.1 bouyer if (rx_avail > 0)
497 1.1 bouyer break;
498 1.1 bouyer DELAY(50);
499 1.1 bouyer }
500 1.1 bouyer } else {
501 1.1 bouyer mutex_enter(&sc->sc_int_lock);
502 1.1 bouyer dwiic_read(sc, DW_IC_CLR_INTR);
503 1.1 bouyer dwiic_write(sc, DW_IC_INTR_MASK,
504 1.1 bouyer DW_IC_INTR_RX_FULL);
505 1.1 bouyer
506 1.1 bouyer if (cv_timedwait(&sc->sc_int_readwait,
507 1.1 bouyer &sc->sc_int_lock, hz / 2) != 0)
508 1.3 jakllsch device_printf(sc->sc_dev,
509 1.1 bouyer "timed out waiting for "
510 1.1 bouyer "rx_full intr\n");
511 1.1 bouyer
512 1.1 bouyer dwiic_write(sc, DW_IC_INTR_MASK, 0);
513 1.1 bouyer dwiic_read(sc, DW_IC_CLR_INTR);
514 1.1 bouyer mutex_exit(&sc->sc_int_lock);
515 1.1 bouyer rx_avail = dwiic_read(sc, DW_IC_RXFLR);
516 1.1 bouyer }
517 1.1 bouyer
518 1.1 bouyer if (rx_avail == 0) {
519 1.3 jakllsch device_printf(sc->sc_dev,
520 1.1 bouyer "timed out reading remaining %d\n",
521 1.1 bouyer (int)(len - 1 - readpos));
522 1.1 bouyer sc->sc_i2c_xfer.error = 1;
523 1.1 bouyer return (1);
524 1.1 bouyer }
525 1.1 bouyer
526 1.1 bouyer DPRINTF(("%s: %s: %d avail to read (%zu remaining)\n",
527 1.1 bouyer device_xname(sc->sc_dev), __func__, rx_avail,
528 1.1 bouyer len - readpos));
529 1.1 bouyer
530 1.1 bouyer while (rx_avail > 0) {
531 1.1 bouyer resp = dwiic_read(sc, DW_IC_DATA_CMD);
532 1.1 bouyer if (readpos < len) {
533 1.1 bouyer bdata[readpos] = resp;
534 1.1 bouyer readpos++;
535 1.1 bouyer }
536 1.1 bouyer rx_avail--;
537 1.1 bouyer }
538 1.1 bouyer
539 1.1 bouyer if (readpos >= len)
540 1.1 bouyer break;
541 1.1 bouyer
542 1.1 bouyer DPRINTF(("%s: still need to read %d bytes\n",
543 1.1 bouyer device_xname(sc->sc_dev), (int)(len - readpos)));
544 1.1 bouyer tx_limit = sc->tx_fifo_depth -
545 1.1 bouyer dwiic_read(sc, DW_IC_TXFLR);
546 1.1 bouyer }
547 1.1 bouyer }
548 1.1 bouyer
549 1.4 jakllsch if (I2C_OP_STOP_P(op) && I2C_OP_WRITE_P(op)) {
550 1.4 jakllsch if (flags & I2C_F_POLL) {
551 1.4 jakllsch /* wait for bus to be idle */
552 1.4 jakllsch for (retries = 100; retries > 0; retries--) {
553 1.4 jakllsch st = dwiic_read(sc, DW_IC_STATUS);
554 1.4 jakllsch if (!(st & DW_IC_STATUS_ACTIVITY))
555 1.4 jakllsch break;
556 1.4 jakllsch DELAY(1000);
557 1.4 jakllsch }
558 1.4 jakllsch if (st & DW_IC_STATUS_ACTIVITY)
559 1.4 jakllsch device_printf(sc->sc_dev, "timed out waiting "
560 1.4 jakllsch "for bus idle\n");
561 1.4 jakllsch } else {
562 1.4 jakllsch mutex_enter(&sc->sc_int_lock);
563 1.4 jakllsch dwiic_read(sc, DW_IC_CLR_INTR);
564 1.4 jakllsch dwiic_write(sc, DW_IC_INTR_MASK,
565 1.4 jakllsch DW_IC_INTR_STOP_DET);
566 1.4 jakllsch if (cv_timedwait(&sc->sc_int_stopwait,
567 1.4 jakllsch &sc->sc_int_lock, hz / 2) != 0)
568 1.4 jakllsch device_printf(sc->sc_dev, "timed out waiting "
569 1.4 jakllsch "for stop intr\n");
570 1.4 jakllsch dwiic_write(sc, DW_IC_INTR_MASK, 0);
571 1.4 jakllsch dwiic_read(sc, DW_IC_CLR_INTR);
572 1.4 jakllsch mutex_exit(&sc->sc_int_lock);
573 1.4 jakllsch }
574 1.4 jakllsch }
575 1.4 jakllsch
576 1.1 bouyer return 0;
577 1.1 bouyer }
578 1.1 bouyer
579 1.1 bouyer static uint32_t
580 1.1 bouyer dwiic_read_clear_intrbits(struct dwiic_softc *sc)
581 1.1 bouyer {
582 1.1 bouyer uint32_t stat;
583 1.1 bouyer
584 1.1 bouyer stat = dwiic_read(sc, DW_IC_INTR_STAT);
585 1.1 bouyer
586 1.1 bouyer if (stat & DW_IC_INTR_RX_UNDER)
587 1.1 bouyer dwiic_read(sc, DW_IC_CLR_RX_UNDER);
588 1.1 bouyer if (stat & DW_IC_INTR_RX_OVER)
589 1.1 bouyer dwiic_read(sc, DW_IC_CLR_RX_OVER);
590 1.1 bouyer if (stat & DW_IC_INTR_TX_OVER)
591 1.1 bouyer dwiic_read(sc, DW_IC_CLR_TX_OVER);
592 1.1 bouyer if (stat & DW_IC_INTR_RD_REQ)
593 1.1 bouyer dwiic_read(sc, DW_IC_CLR_RD_REQ);
594 1.1 bouyer if (stat & DW_IC_INTR_TX_ABRT)
595 1.1 bouyer dwiic_read(sc, DW_IC_CLR_TX_ABRT);
596 1.1 bouyer if (stat & DW_IC_INTR_RX_DONE)
597 1.1 bouyer dwiic_read(sc, DW_IC_CLR_RX_DONE);
598 1.1 bouyer if (stat & DW_IC_INTR_ACTIVITY)
599 1.1 bouyer dwiic_read(sc, DW_IC_CLR_ACTIVITY);
600 1.1 bouyer if (stat & DW_IC_INTR_STOP_DET)
601 1.1 bouyer dwiic_read(sc, DW_IC_CLR_STOP_DET);
602 1.1 bouyer if (stat & DW_IC_INTR_START_DET)
603 1.1 bouyer dwiic_read(sc, DW_IC_CLR_START_DET);
604 1.1 bouyer if (stat & DW_IC_INTR_GEN_CALL)
605 1.1 bouyer dwiic_read(sc, DW_IC_CLR_GEN_CALL);
606 1.1 bouyer
607 1.1 bouyer return stat;
608 1.1 bouyer }
609 1.1 bouyer
610 1.1 bouyer int
611 1.1 bouyer dwiic_intr(void *arg)
612 1.1 bouyer {
613 1.1 bouyer struct dwiic_softc *sc = arg;
614 1.1 bouyer uint32_t en, stat;
615 1.1 bouyer
616 1.1 bouyer en = dwiic_read(sc, DW_IC_ENABLE);
617 1.1 bouyer /* probably for the other controller */
618 1.1 bouyer if (!en)
619 1.1 bouyer return 0;
620 1.1 bouyer
621 1.1 bouyer stat = dwiic_read_clear_intrbits(sc);
622 1.1 bouyer DPRINTF(("%s: %s: enabled=0x%x stat=0x%x\n", device_xname(sc->sc_dev),
623 1.1 bouyer __func__, en, stat));
624 1.1 bouyer if (!(stat & ~DW_IC_INTR_ACTIVITY))
625 1.1 bouyer return 1;
626 1.1 bouyer
627 1.1 bouyer if (stat & DW_IC_INTR_TX_ABRT)
628 1.1 bouyer sc->sc_i2c_xfer.error = 1;
629 1.1 bouyer
630 1.1 bouyer if (sc->sc_i2c_xfer.flags & I2C_F_POLL)
631 1.1 bouyer DPRINTF(("%s: %s: intr in poll mode?\n", device_xname(sc->sc_dev),
632 1.1 bouyer __func__));
633 1.1 bouyer else {
634 1.1 bouyer mutex_enter(&sc->sc_int_lock);
635 1.1 bouyer if (stat & DW_IC_INTR_RX_FULL) {
636 1.1 bouyer dwiic_write(sc, DW_IC_INTR_MASK, 0);
637 1.1 bouyer DPRINTF(("%s: %s: waking up reader\n",
638 1.1 bouyer device_xname(sc->sc_dev), __func__));
639 1.1 bouyer cv_signal(&sc->sc_int_readwait);
640 1.1 bouyer }
641 1.1 bouyer if (stat & DW_IC_INTR_TX_EMPTY) {
642 1.1 bouyer dwiic_write(sc, DW_IC_INTR_MASK, 0);
643 1.1 bouyer DPRINTF(("%s: %s: waking up writer\n",
644 1.1 bouyer device_xname(sc->sc_dev), __func__));
645 1.1 bouyer cv_signal(&sc->sc_int_writewait);
646 1.1 bouyer }
647 1.4 jakllsch if (stat & DW_IC_INTR_STOP_DET) {
648 1.4 jakllsch dwiic_write(sc, DW_IC_INTR_MASK, 0);
649 1.4 jakllsch DPRINTF(("%s: %s: waking up stopper\n",
650 1.4 jakllsch device_xname(sc->sc_dev), __func__));
651 1.4 jakllsch cv_signal(&sc->sc_int_stopwait);
652 1.4 jakllsch }
653 1.1 bouyer mutex_exit(&sc->sc_int_lock);
654 1.1 bouyer }
655 1.1 bouyer
656 1.1 bouyer return 1;
657 1.1 bouyer }
658