dwiic.c revision 1.3 1 1.3 jakllsch /* $NetBSD: dwiic.c,v 1.3 2018/09/26 18:06:59 jakllsch Exp $ */
2 1.1 bouyer
3 1.1 bouyer /* $OpenBSD dwiic.c,v 1.24 2017/08/17 20:41:16 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.3 jakllsch __KERNEL_RCSID(0, "$NetBSD: dwiic.c,v 1.3 2018/09/26 18:06:59 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.1 bouyer
192 1.1 bouyer /* setup and attach iic bus */
193 1.1 bouyer sc->sc_i2c_tag.ic_cookie = sc;
194 1.1 bouyer sc->sc_i2c_tag.ic_acquire_bus = dwiic_i2c_acquire_bus;
195 1.1 bouyer sc->sc_i2c_tag.ic_release_bus = dwiic_i2c_release_bus;
196 1.1 bouyer sc->sc_i2c_tag.ic_exec = dwiic_i2c_exec;
197 1.1 bouyer
198 1.1 bouyer sc->sc_iba.iba_tag = &sc->sc_i2c_tag;
199 1.1 bouyer
200 1.1 bouyer config_found_ia(sc->sc_dev, "i2cbus", &sc->sc_iba, iicbus_print);
201 1.1 bouyer return 1;
202 1.1 bouyer }
203 1.1 bouyer
204 1.1 bouyer int
205 1.1 bouyer dwiic_detach(device_t self, int flags)
206 1.1 bouyer {
207 1.1 bouyer struct dwiic_softc *sc = device_private(self);
208 1.1 bouyer
209 1.1 bouyer dwiic_enable(sc, 0);
210 1.1 bouyer if (sc->sc_ih != NULL) {
211 1.1 bouyer intr_disestablish(sc->sc_ih);
212 1.1 bouyer sc->sc_ih = NULL;
213 1.1 bouyer }
214 1.1 bouyer
215 1.1 bouyer return 0;
216 1.1 bouyer }
217 1.1 bouyer
218 1.1 bouyer bool
219 1.1 bouyer dwiic_suspend(device_t self, const pmf_qual_t *qual)
220 1.1 bouyer {
221 1.1 bouyer struct dwiic_softc *sc = device_private(self);
222 1.1 bouyer
223 1.1 bouyer /* disable controller */
224 1.1 bouyer dwiic_enable(sc, 0);
225 1.1 bouyer
226 1.1 bouyer /* disable interrupts */
227 1.1 bouyer dwiic_write(sc, DW_IC_INTR_MASK, 0);
228 1.1 bouyer dwiic_read(sc, DW_IC_CLR_INTR);
229 1.1 bouyer if (sc->sc_power != NULL) {
230 1.1 bouyer if (!sc->sc_power(sc, 0)) {
231 1.3 jakllsch device_printf(sc->sc_dev, "failed to power off\n");
232 1.1 bouyer }
233 1.1 bouyer }
234 1.1 bouyer return true;
235 1.1 bouyer }
236 1.1 bouyer
237 1.1 bouyer bool
238 1.1 bouyer dwiic_resume(device_t self, const pmf_qual_t *qual)
239 1.1 bouyer {
240 1.1 bouyer struct dwiic_softc *sc = device_private(self);
241 1.1 bouyer if (sc->sc_power != NULL) {
242 1.1 bouyer if (!sc->sc_power(sc, 1)) {
243 1.3 jakllsch device_printf(sc->sc_dev, "failed to power up\n");
244 1.1 bouyer return false;
245 1.1 bouyer }
246 1.1 bouyer }
247 1.1 bouyer dwiic_init(sc);
248 1.1 bouyer return true;
249 1.1 bouyer }
250 1.1 bouyer
251 1.1 bouyer static uint32_t
252 1.1 bouyer dwiic_read(struct dwiic_softc *sc, int offset)
253 1.1 bouyer {
254 1.1 bouyer u_int32_t b = bus_space_read_4(sc->sc_iot, sc->sc_ioh, offset);
255 1.1 bouyer
256 1.1 bouyer DPRINTF(("%s: read at 0x%x = 0x%x\n", device_xname(sc->sc_dev), offset, b));
257 1.1 bouyer
258 1.1 bouyer return b;
259 1.1 bouyer }
260 1.1 bouyer
261 1.1 bouyer static void
262 1.1 bouyer dwiic_write(struct dwiic_softc *sc, int offset, uint32_t val)
263 1.1 bouyer {
264 1.1 bouyer bus_space_write_4(sc->sc_iot, sc->sc_ioh, offset, val);
265 1.1 bouyer
266 1.1 bouyer DPRINTF(("%s: write at 0x%x: 0x%x\n", device_xname(sc->sc_dev), offset,
267 1.1 bouyer val));
268 1.1 bouyer }
269 1.1 bouyer
270 1.1 bouyer static int
271 1.1 bouyer dwiic_i2c_acquire_bus(void *cookie, int flags)
272 1.1 bouyer {
273 1.1 bouyer struct dwiic_softc *sc = cookie;
274 1.1 bouyer
275 1.1 bouyer if (cold || sc->sc_poll || (flags & I2C_F_POLL))
276 1.1 bouyer return (0);
277 1.1 bouyer
278 1.1 bouyer mutex_enter(&sc->sc_i2c_lock);
279 1.2 jakllsch return 0;
280 1.1 bouyer }
281 1.1 bouyer
282 1.1 bouyer void
283 1.1 bouyer dwiic_i2c_release_bus(void *cookie, int flags)
284 1.1 bouyer {
285 1.1 bouyer struct dwiic_softc *sc = cookie;
286 1.1 bouyer
287 1.1 bouyer if (cold || sc->sc_poll || (flags & I2C_F_POLL))
288 1.1 bouyer return;
289 1.1 bouyer
290 1.1 bouyer mutex_exit(&sc->sc_i2c_lock);
291 1.1 bouyer }
292 1.1 bouyer
293 1.1 bouyer static int
294 1.1 bouyer dwiic_init(struct dwiic_softc *sc)
295 1.1 bouyer {
296 1.1 bouyer uint32_t reg;
297 1.1 bouyer
298 1.1 bouyer /* make sure we're talking to a device we know */
299 1.1 bouyer reg = dwiic_read(sc, DW_IC_COMP_TYPE);
300 1.1 bouyer if (reg != DW_IC_COMP_TYPE_VALUE) {
301 1.1 bouyer DPRINTF(("%s: invalid component type 0x%x\n",
302 1.1 bouyer device_xname(sc->sc_dev), reg));
303 1.1 bouyer return 1;
304 1.1 bouyer }
305 1.1 bouyer
306 1.1 bouyer /* disable the adapter */
307 1.1 bouyer dwiic_enable(sc, 0);
308 1.1 bouyer
309 1.1 bouyer /* write standard-mode SCL timing parameters */
310 1.1 bouyer dwiic_write(sc, DW_IC_SS_SCL_HCNT, sc->ss_hcnt);
311 1.1 bouyer dwiic_write(sc, DW_IC_SS_SCL_LCNT, sc->ss_lcnt);
312 1.1 bouyer
313 1.1 bouyer /* and fast-mode SCL timing parameters */
314 1.1 bouyer dwiic_write(sc, DW_IC_FS_SCL_HCNT, sc->fs_hcnt);
315 1.1 bouyer dwiic_write(sc, DW_IC_FS_SCL_LCNT, sc->fs_lcnt);
316 1.1 bouyer
317 1.1 bouyer /* SDA hold time */
318 1.1 bouyer reg = dwiic_read(sc, DW_IC_COMP_VERSION);
319 1.1 bouyer if (reg >= DW_IC_SDA_HOLD_MIN_VERS)
320 1.1 bouyer dwiic_write(sc, DW_IC_SDA_HOLD, sc->sda_hold_time);
321 1.1 bouyer
322 1.1 bouyer /* FIFO threshold levels */
323 1.1 bouyer sc->tx_fifo_depth = 32;
324 1.1 bouyer sc->rx_fifo_depth = 32;
325 1.1 bouyer dwiic_write(sc, DW_IC_TX_TL, sc->tx_fifo_depth / 2);
326 1.1 bouyer dwiic_write(sc, DW_IC_RX_TL, 0);
327 1.1 bouyer
328 1.1 bouyer /* configure as i2c master with fast speed */
329 1.1 bouyer sc->master_cfg = DW_IC_CON_MASTER | DW_IC_CON_SLAVE_DISABLE |
330 1.1 bouyer DW_IC_CON_RESTART_EN | DW_IC_CON_SPEED_FAST;
331 1.1 bouyer dwiic_write(sc, DW_IC_CON, sc->master_cfg);
332 1.1 bouyer
333 1.1 bouyer return 0;
334 1.1 bouyer }
335 1.1 bouyer
336 1.1 bouyer static void
337 1.1 bouyer dwiic_enable(struct dwiic_softc *sc, bool enable)
338 1.1 bouyer {
339 1.1 bouyer int retries;
340 1.1 bouyer
341 1.1 bouyer for (retries = 100; retries > 0; retries--) {
342 1.1 bouyer dwiic_write(sc, DW_IC_ENABLE, enable);
343 1.1 bouyer if ((dwiic_read(sc, DW_IC_ENABLE_STATUS) & 1) == enable)
344 1.1 bouyer return;
345 1.1 bouyer
346 1.1 bouyer DELAY(25);
347 1.1 bouyer }
348 1.1 bouyer
349 1.3 jakllsch device_printf(sc->sc_dev, "failed to %sable\n",
350 1.1 bouyer (enable ? "en" : "dis"));
351 1.1 bouyer }
352 1.1 bouyer
353 1.1 bouyer static int
354 1.1 bouyer dwiic_i2c_exec(void *cookie, i2c_op_t op, i2c_addr_t addr, const void *cmdbuf,
355 1.1 bouyer size_t cmdlen, void *buf, size_t len, int flags)
356 1.1 bouyer {
357 1.1 bouyer struct dwiic_softc *sc = cookie;
358 1.1 bouyer u_int32_t ic_con, st, cmd, resp;
359 1.1 bouyer int retries, tx_limit, rx_avail, x, readpos;
360 1.1 bouyer const uint8_t *bcmd;
361 1.1 bouyer uint8_t *bdata;
362 1.1 bouyer
363 1.1 bouyer if (cold || sc->sc_poll)
364 1.1 bouyer flags |= I2C_F_POLL;
365 1.1 bouyer
366 1.1 bouyer DPRINTF(("%s: %s: op %d, addr 0x%02x, cmdlen %zu, len %zu, "
367 1.1 bouyer "flags 0x%02x\n", device_xname(sc->sc_dev), __func__, op, addr, cmdlen,
368 1.1 bouyer len, flags));
369 1.1 bouyer
370 1.1 bouyer /* setup transfer */
371 1.1 bouyer sc->sc_i2c_xfer.op = op;
372 1.1 bouyer sc->sc_i2c_xfer.buf = buf;
373 1.1 bouyer sc->sc_i2c_xfer.len = len;
374 1.1 bouyer sc->sc_i2c_xfer.flags = flags;
375 1.1 bouyer sc->sc_i2c_xfer.error = 0;
376 1.1 bouyer
377 1.1 bouyer /* wait for bus to be idle */
378 1.1 bouyer for (retries = 100; retries > 0; retries--) {
379 1.1 bouyer st = dwiic_read(sc, DW_IC_STATUS);
380 1.1 bouyer if (!(st & DW_IC_STATUS_ACTIVITY))
381 1.1 bouyer break;
382 1.1 bouyer DELAY(1000);
383 1.1 bouyer }
384 1.1 bouyer DPRINTF(("%s: %s: status 0x%x\n", device_xname(sc->sc_dev), __func__, st));
385 1.1 bouyer if (st & DW_IC_STATUS_ACTIVITY) {
386 1.1 bouyer return (1);
387 1.1 bouyer }
388 1.1 bouyer
389 1.1 bouyer /* disable controller */
390 1.1 bouyer dwiic_enable(sc, 0);
391 1.1 bouyer
392 1.1 bouyer /* set slave address */
393 1.1 bouyer ic_con = dwiic_read(sc, DW_IC_CON);
394 1.1 bouyer ic_con &= ~DW_IC_CON_10BITADDR_MASTER;
395 1.1 bouyer dwiic_write(sc, DW_IC_CON, ic_con);
396 1.1 bouyer dwiic_write(sc, DW_IC_TAR, addr);
397 1.1 bouyer
398 1.1 bouyer /* disable interrupts */
399 1.1 bouyer dwiic_write(sc, DW_IC_INTR_MASK, 0);
400 1.1 bouyer dwiic_read(sc, DW_IC_CLR_INTR);
401 1.1 bouyer
402 1.1 bouyer /* enable controller */
403 1.1 bouyer dwiic_enable(sc, 1);
404 1.1 bouyer
405 1.1 bouyer /* wait until the controller is ready for commands */
406 1.1 bouyer if (flags & I2C_F_POLL)
407 1.1 bouyer DELAY(200);
408 1.1 bouyer else {
409 1.1 bouyer mutex_enter(&sc->sc_int_lock);
410 1.1 bouyer dwiic_read(sc, DW_IC_CLR_INTR);
411 1.1 bouyer dwiic_write(sc, DW_IC_INTR_MASK, DW_IC_INTR_TX_EMPTY);
412 1.1 bouyer
413 1.1 bouyer if (cv_timedwait(&sc->sc_int_writewait,
414 1.1 bouyer &sc->sc_int_lock, hz / 2) != 0)
415 1.3 jakllsch device_printf(sc->sc_dev,
416 1.1 bouyer "timed out waiting for tx_empty intr\n");
417 1.1 bouyer dwiic_write(sc, DW_IC_INTR_MASK, 0);
418 1.1 bouyer dwiic_read(sc, DW_IC_CLR_INTR);
419 1.1 bouyer mutex_exit(&sc->sc_int_lock);
420 1.1 bouyer }
421 1.1 bouyer
422 1.1 bouyer /* send our command, one byte at a time */
423 1.1 bouyer if (cmdlen > 0) {
424 1.1 bouyer bcmd = (const void *)cmdbuf;
425 1.1 bouyer
426 1.1 bouyer DPRINTF(("%s: %s: sending cmd (len %zu):", device_xname(sc->sc_dev),
427 1.1 bouyer __func__, cmdlen));
428 1.1 bouyer for (x = 0; x < cmdlen; x++)
429 1.1 bouyer DPRINTF((" %02x", bcmd[x]));
430 1.1 bouyer DPRINTF(("\n"));
431 1.1 bouyer
432 1.1 bouyer tx_limit = sc->tx_fifo_depth - dwiic_read(sc, DW_IC_TXFLR);
433 1.1 bouyer if (cmdlen > tx_limit) {
434 1.1 bouyer /* TODO */
435 1.3 jakllsch device_printf(sc->sc_dev, "can't write %zu (> %d)\n",
436 1.1 bouyer cmdlen, tx_limit);
437 1.1 bouyer sc->sc_i2c_xfer.error = 1;
438 1.1 bouyer return (1);
439 1.1 bouyer }
440 1.1 bouyer
441 1.1 bouyer for (x = 0; x < cmdlen; x++) {
442 1.1 bouyer cmd = bcmd[x];
443 1.1 bouyer /*
444 1.1 bouyer * Generate STOP condition if this is the last
445 1.1 bouyer * byte of the transfer.
446 1.1 bouyer */
447 1.1 bouyer if (x == (cmdlen - 1) && len == 0 && I2C_OP_STOP_P(op))
448 1.1 bouyer cmd |= DW_IC_DATA_CMD_STOP;
449 1.1 bouyer dwiic_write(sc, DW_IC_DATA_CMD, cmd);
450 1.1 bouyer }
451 1.1 bouyer }
452 1.1 bouyer
453 1.1 bouyer bdata = (void *)buf;
454 1.1 bouyer x = readpos = 0;
455 1.1 bouyer tx_limit = sc->tx_fifo_depth - dwiic_read(sc, DW_IC_TXFLR);
456 1.1 bouyer
457 1.1 bouyer DPRINTF(("%s: %s: need to read %zu bytes, can send %d read reqs\n",
458 1.1 bouyer device_xname(sc->sc_dev), __func__, len, tx_limit));
459 1.1 bouyer
460 1.1 bouyer while (x < len) {
461 1.1 bouyer if (I2C_OP_WRITE_P(op))
462 1.1 bouyer cmd = bdata[x];
463 1.1 bouyer else
464 1.1 bouyer cmd = DW_IC_DATA_CMD_READ;
465 1.1 bouyer
466 1.1 bouyer /*
467 1.1 bouyer * Generate RESTART condition if we're reversing
468 1.1 bouyer * direction.
469 1.1 bouyer */
470 1.1 bouyer if (x == 0 && cmdlen > 0 && I2C_OP_READ_P(op))
471 1.1 bouyer cmd |= DW_IC_DATA_CMD_RESTART;
472 1.1 bouyer /*
473 1.1 bouyer * Generate STOP conditon on the last byte of the
474 1.1 bouyer * transfer.
475 1.1 bouyer */
476 1.1 bouyer if (x == (len - 1) && I2C_OP_STOP_P(op))
477 1.1 bouyer cmd |= DW_IC_DATA_CMD_STOP;
478 1.1 bouyer
479 1.1 bouyer dwiic_write(sc, DW_IC_DATA_CMD, cmd);
480 1.1 bouyer
481 1.1 bouyer tx_limit--;
482 1.1 bouyer x++;
483 1.1 bouyer
484 1.1 bouyer /*
485 1.1 bouyer * As TXFLR fills up, we need to clear it out by reading all
486 1.1 bouyer * available data.
487 1.1 bouyer */
488 1.1 bouyer while (tx_limit == 0 || x == len) {
489 1.1 bouyer DPRINTF(("%s: %s: tx_limit %d, sent %d read reqs\n",
490 1.1 bouyer device_xname(sc->sc_dev), __func__, tx_limit, x));
491 1.1 bouyer
492 1.1 bouyer if (flags & I2C_F_POLL) {
493 1.1 bouyer for (retries = 100; retries > 0; retries--) {
494 1.1 bouyer rx_avail = dwiic_read(sc, DW_IC_RXFLR);
495 1.1 bouyer if (rx_avail > 0)
496 1.1 bouyer break;
497 1.1 bouyer DELAY(50);
498 1.1 bouyer }
499 1.1 bouyer } else {
500 1.1 bouyer mutex_enter(&sc->sc_int_lock);
501 1.1 bouyer dwiic_read(sc, DW_IC_CLR_INTR);
502 1.1 bouyer dwiic_write(sc, DW_IC_INTR_MASK,
503 1.1 bouyer DW_IC_INTR_RX_FULL);
504 1.1 bouyer
505 1.1 bouyer if (cv_timedwait(&sc->sc_int_readwait,
506 1.1 bouyer &sc->sc_int_lock, hz / 2) != 0)
507 1.3 jakllsch device_printf(sc->sc_dev,
508 1.1 bouyer "timed out waiting for "
509 1.1 bouyer "rx_full intr\n");
510 1.1 bouyer
511 1.1 bouyer dwiic_write(sc, DW_IC_INTR_MASK, 0);
512 1.1 bouyer dwiic_read(sc, DW_IC_CLR_INTR);
513 1.1 bouyer mutex_exit(&sc->sc_int_lock);
514 1.1 bouyer rx_avail = dwiic_read(sc, DW_IC_RXFLR);
515 1.1 bouyer }
516 1.1 bouyer
517 1.1 bouyer if (rx_avail == 0) {
518 1.3 jakllsch device_printf(sc->sc_dev,
519 1.1 bouyer "timed out reading remaining %d\n",
520 1.1 bouyer (int)(len - 1 - readpos));
521 1.1 bouyer sc->sc_i2c_xfer.error = 1;
522 1.1 bouyer return (1);
523 1.1 bouyer }
524 1.1 bouyer
525 1.1 bouyer DPRINTF(("%s: %s: %d avail to read (%zu remaining)\n",
526 1.1 bouyer device_xname(sc->sc_dev), __func__, rx_avail,
527 1.1 bouyer len - readpos));
528 1.1 bouyer
529 1.1 bouyer while (rx_avail > 0) {
530 1.1 bouyer resp = dwiic_read(sc, DW_IC_DATA_CMD);
531 1.1 bouyer if (readpos < len) {
532 1.1 bouyer bdata[readpos] = resp;
533 1.1 bouyer readpos++;
534 1.1 bouyer }
535 1.1 bouyer rx_avail--;
536 1.1 bouyer }
537 1.1 bouyer
538 1.1 bouyer if (readpos >= len)
539 1.1 bouyer break;
540 1.1 bouyer
541 1.1 bouyer DPRINTF(("%s: still need to read %d bytes\n",
542 1.1 bouyer device_xname(sc->sc_dev), (int)(len - readpos)));
543 1.1 bouyer tx_limit = sc->tx_fifo_depth -
544 1.1 bouyer dwiic_read(sc, DW_IC_TXFLR);
545 1.1 bouyer }
546 1.1 bouyer }
547 1.1 bouyer
548 1.1 bouyer return 0;
549 1.1 bouyer }
550 1.1 bouyer
551 1.1 bouyer static uint32_t
552 1.1 bouyer dwiic_read_clear_intrbits(struct dwiic_softc *sc)
553 1.1 bouyer {
554 1.1 bouyer uint32_t stat;
555 1.1 bouyer
556 1.1 bouyer stat = dwiic_read(sc, DW_IC_INTR_STAT);
557 1.1 bouyer
558 1.1 bouyer if (stat & DW_IC_INTR_RX_UNDER)
559 1.1 bouyer dwiic_read(sc, DW_IC_CLR_RX_UNDER);
560 1.1 bouyer if (stat & DW_IC_INTR_RX_OVER)
561 1.1 bouyer dwiic_read(sc, DW_IC_CLR_RX_OVER);
562 1.1 bouyer if (stat & DW_IC_INTR_TX_OVER)
563 1.1 bouyer dwiic_read(sc, DW_IC_CLR_TX_OVER);
564 1.1 bouyer if (stat & DW_IC_INTR_RD_REQ)
565 1.1 bouyer dwiic_read(sc, DW_IC_CLR_RD_REQ);
566 1.1 bouyer if (stat & DW_IC_INTR_TX_ABRT)
567 1.1 bouyer dwiic_read(sc, DW_IC_CLR_TX_ABRT);
568 1.1 bouyer if (stat & DW_IC_INTR_RX_DONE)
569 1.1 bouyer dwiic_read(sc, DW_IC_CLR_RX_DONE);
570 1.1 bouyer if (stat & DW_IC_INTR_ACTIVITY)
571 1.1 bouyer dwiic_read(sc, DW_IC_CLR_ACTIVITY);
572 1.1 bouyer if (stat & DW_IC_INTR_STOP_DET)
573 1.1 bouyer dwiic_read(sc, DW_IC_CLR_STOP_DET);
574 1.1 bouyer if (stat & DW_IC_INTR_START_DET)
575 1.1 bouyer dwiic_read(sc, DW_IC_CLR_START_DET);
576 1.1 bouyer if (stat & DW_IC_INTR_GEN_CALL)
577 1.1 bouyer dwiic_read(sc, DW_IC_CLR_GEN_CALL);
578 1.1 bouyer
579 1.1 bouyer return stat;
580 1.1 bouyer }
581 1.1 bouyer
582 1.1 bouyer int
583 1.1 bouyer dwiic_intr(void *arg)
584 1.1 bouyer {
585 1.1 bouyer struct dwiic_softc *sc = arg;
586 1.1 bouyer uint32_t en, stat;
587 1.1 bouyer
588 1.1 bouyer en = dwiic_read(sc, DW_IC_ENABLE);
589 1.1 bouyer /* probably for the other controller */
590 1.1 bouyer if (!en)
591 1.1 bouyer return 0;
592 1.1 bouyer
593 1.1 bouyer stat = dwiic_read_clear_intrbits(sc);
594 1.1 bouyer DPRINTF(("%s: %s: enabled=0x%x stat=0x%x\n", device_xname(sc->sc_dev),
595 1.1 bouyer __func__, en, stat));
596 1.1 bouyer if (!(stat & ~DW_IC_INTR_ACTIVITY))
597 1.1 bouyer return 1;
598 1.1 bouyer
599 1.1 bouyer if (stat & DW_IC_INTR_TX_ABRT)
600 1.1 bouyer sc->sc_i2c_xfer.error = 1;
601 1.1 bouyer
602 1.1 bouyer if (sc->sc_i2c_xfer.flags & I2C_F_POLL)
603 1.1 bouyer DPRINTF(("%s: %s: intr in poll mode?\n", device_xname(sc->sc_dev),
604 1.1 bouyer __func__));
605 1.1 bouyer else {
606 1.1 bouyer mutex_enter(&sc->sc_int_lock);
607 1.1 bouyer if (stat & DW_IC_INTR_RX_FULL) {
608 1.1 bouyer dwiic_write(sc, DW_IC_INTR_MASK, 0);
609 1.1 bouyer DPRINTF(("%s: %s: waking up reader\n",
610 1.1 bouyer device_xname(sc->sc_dev), __func__));
611 1.1 bouyer cv_signal(&sc->sc_int_readwait);
612 1.1 bouyer }
613 1.1 bouyer if (stat & DW_IC_INTR_TX_EMPTY) {
614 1.1 bouyer dwiic_write(sc, DW_IC_INTR_MASK, 0);
615 1.1 bouyer DPRINTF(("%s: %s: waking up writer\n",
616 1.1 bouyer device_xname(sc->sc_dev), __func__));
617 1.1 bouyer cv_signal(&sc->sc_int_writewait);
618 1.1 bouyer }
619 1.1 bouyer mutex_exit(&sc->sc_int_lock);
620 1.1 bouyer }
621 1.1 bouyer
622 1.1 bouyer return 1;
623 1.1 bouyer }
624