]> CyberLeo.Net >> Repos - FreeBSD/FreeBSD.git/blob - sys/arm/nvidia/tegra_i2c.c
Make linux_ptrace() use linux_msg() instead of printf().
[FreeBSD/FreeBSD.git] / sys / arm / nvidia / tegra_i2c.c
1 /*-
2  * Copyright (c) 2016 Michal Meloun <mmel@FreeBSD.org>
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  *
14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24  * SUCH DAMAGE.
25  */
26
27 #include <sys/cdefs.h>
28 __FBSDID("$FreeBSD$");
29
30 /*
31  * I2C driver for Tegra SoCs.
32  */
33 #include <sys/param.h>
34 #include <sys/systm.h>
35 #include <sys/bus.h>
36 #include <sys/kernel.h>
37 #include <sys/limits.h>
38 #include <sys/module.h>
39 #include <sys/resource.h>
40
41 #include <machine/bus.h>
42 #include <machine/resource.h>
43 #include <sys/rman.h>
44
45 #include <sys/lock.h>
46 #include <sys/mutex.h>
47
48 #include <dev/extres/clk/clk.h>
49 #include <dev/extres/hwreset/hwreset.h>
50 #include <dev/iicbus/iiconf.h>
51 #include <dev/iicbus/iicbus.h>
52 #include <dev/ofw/ofw_bus.h>
53 #include <dev/ofw/ofw_bus_subr.h>
54
55 #include "iicbus_if.h"
56
57 #define I2C_CNFG                                0x000
58 #define  I2C_CNFG_MSTR_CLR_BUS_ON_TIMEOUT               (1 << 15)
59 #define  I2C_CNFG_DEBOUNCE_CNT(x)                       (((x) & 0x07) << 12)
60 #define  I2C_CNFG_NEW_MASTER_FSM                        (1 << 11)
61 #define  I2C_CNFG_PACKET_MODE_EN                        (1 << 10)
62 #define  I2C_CNFG_SEND                                  (1 <<  9)
63 #define  I2C_CNFG_NOACK                                 (1 <<  8)
64 #define  I2C_CNFG_CMD2                                  (1 <<  7)
65 #define  I2C_CNFG_CMD1                                  (1 <<  6)
66 #define  I2C_CNFG_START                                 (1 <<  5)
67 #define  I2C_CNFG_SLV2                                  (1 <<  4)
68 #define  I2C_CNFG_LENGTH_SHIFT                          1
69 #define  I2C_CNFG_LENGTH_MASK                           0x7
70 #define  I2C_CNFG_A_MOD                                 (1 <<  0)
71
72 #define I2C_CMD_ADDR0                           0x004
73 #define I2C_CMD_ADDR1                           0x008
74 #define I2C_CMD_DATA1                           0x00c
75 #define I2C_CMD_DATA2                           0x010
76 #define I2C_STATUS                              0x01c
77 #define I2C_SL_CNFG                             0x020
78 #define I2C_SL_RCVD                             0x024
79 #define I2C_SL_STATUS                           0x028
80 #define I2C_SL_ADDR1                            0x02c
81 #define I2C_SL_ADDR2                            0x030
82 #define I2C_TLOW_SEXT                           0x034
83 #define I2C_SL_DELAY_COUNT                      0x03c
84 #define I2C_SL_INT_MASK                         0x040
85 #define I2C_SL_INT_SOURCE                       0x044
86 #define I2C_SL_INT_SET                          0x048
87 #define I2C_TX_PACKET_FIFO                      0x050
88 #define I2C_RX_FIFO                             0x054
89 #define I2C_PACKET_TRANSFER_STATUS              0x058
90 #define I2C_FIFO_CONTROL                        0x05c
91 #define  I2C_FIFO_CONTROL_SLV_TX_FIFO_TRIG(x)           (((x) & 0x07) << 13)
92 #define  I2C_FIFO_CONTROL_SLV_RX_FIFO_TRIG(x)           (((x) & 0x07) << 10)
93 #define  I2C_FIFO_CONTROL_SLV_TX_FIFO_FLUSH             (1 <<  9)
94 #define  I2C_FIFO_CONTROL_SLV_RX_FIFO_FLUSH             (1 <<  8)
95 #define  I2C_FIFO_CONTROL_TX_FIFO_TRIG(x)               (((x) & 0x07) << 5)
96 #define  I2C_FIFO_CONTROL_RX_FIFO_TRIG(x)               (((x) & 0x07) << 2)
97 #define  I2C_FIFO_CONTROL_TX_FIFO_FLUSH                 (1 << 1)
98 #define  I2C_FIFO_CONTROL_RX_FIFO_FLUSH                 (1 << 0)
99
100 #define I2C_FIFO_STATUS                         0x060
101 #define  I2C_FIFO_STATUS_SLV_XFER_ERR_REASON            (1 << 25)
102 #define  I2C_FIFO_STATUS_TX_FIFO_SLV_EMPTY_CNT(x)       (((x) >> 20) & 0xF)
103 #define  I2C_FIFO_STATUS_RX_FIFO_SLV_FULL_CNT(x)        (((x) >> 16) & 0xF)
104 #define  I2C_FIFO_STATUS_TX_FIFO_EMPTY_CNT(x)           (((x) >>  4) & 0xF)
105 #define  I2C_FIFO_STATUS_RX_FIFO_FULL_CNT(x)            (((x) >>  0) & 0xF)
106
107 #define I2C_INTERRUPT_MASK_REGISTER             0x064
108 #define I2C_INTERRUPT_STATUS_REGISTER           0x068
109 #define  I2C_INT_SLV_ACK_WITHHELD                       (1 << 28)
110 #define  I2C_INT_SLV_RD2WR                              (1 << 27)
111 #define  I2C_INT_SLV_WR2RD                              (1 << 26)
112 #define  I2C_INT_SLV_PKT_XFER_ERR                       (1 << 25)
113 #define  I2C_INT_SLV_TX_BUFFER_REQ                      (1 << 24)
114 #define  I2C_INT_SLV_RX_BUFFER_FILLED                   (1 << 23)
115 #define  I2C_INT_SLV_PACKET_XFER_COMPLETE               (1 << 22)
116 #define  I2C_INT_SLV_TFIFO_OVF                          (1 << 21)
117 #define  I2C_INT_SLV_RFIFO_UNF                          (1 << 20)
118 #define  I2C_INT_SLV_TFIFO_DATA_REQ                     (1 << 17)
119 #define  I2C_INT_SLV_RFIFO_DATA_REQ                     (1 << 16)
120 #define  I2C_INT_BUS_CLEAR_DONE                         (1 << 11)
121 #define  I2C_INT_TLOW_MEXT_TIMEOUT                      (1 << 10)
122 #define  I2C_INT_TLOW_SEXT_TIMEOUT                      (1 <<  9)
123 #define  I2C_INT_TIMEOUT                                (1 <<  8)
124 #define  I2C_INT_PACKET_XFER_COMPLETE                   (1 <<  7)
125 #define  I2C_INT_ALL_PACKETS_XFER_COMPLETE              (1 <<  6)
126 #define  I2C_INT_TFIFO_OVR                              (1 <<  5)
127 #define  I2C_INT_RFIFO_UNF                              (1 <<  4)
128 #define  I2C_INT_NOACK                                  (1 <<  3)
129 #define  I2C_INT_ARB_LOST                               (1 <<  2)
130 #define  I2C_INT_TFIFO_DATA_REQ                         (1 <<  1)
131 #define  I2C_INT_RFIFO_DATA_REQ                         (1 <<  0)
132 #define  I2C_ERROR_MASK         (I2C_INT_ARB_LOST | I2C_INT_NOACK |      \
133                                 I2C_INT_RFIFO_UNF | I2C_INT_TFIFO_OVR)
134
135 #define I2C_CLK_DIVISOR                         0x06c
136 #define  I2C_CLK_DIVISOR_STD_FAST_MODE_SHIFT            16
137 #define  I2C_CLK_DIVISOR_STD_FAST_MODE_MASK             0xffff
138 #define  I2C_CLK_DIVISOR_HSMODE_SHIFT                   0
139 #define  I2C_CLK_DIVISOR_HSMODE_MASK                    0xffff
140 #define I2C_INTERRUPT_SOURCE_REGISTER           0x070
141 #define I2C_INTERRUPT_SET_REGISTER              0x074
142 #define I2C_SLV_TX_PACKET_FIFO                  0x07c
143 #define I2C_SLV_PACKET_STATUS                   0x080
144 #define I2C_BUS_CLEAR_CONFIG                    0x084
145 #define  I2C_BUS_CLEAR_CONFIG_BC_SCLK_THRESHOLD(x)      (((x) & 0xFF) << 16)
146 #define  I2C_BUS_CLEAR_CONFIG_BC_STOP_COND              (1 << 2)
147 #define  I2C_BUS_CLEAR_CONFIG_BC_TERMINATE              (1 << 1)
148 #define  I2C_BUS_CLEAR_CONFIG_BC_ENABLE                 (1 << 0)
149
150 #define I2C_BUS_CLEAR_STATUS                    0x088
151 #define  I2C_BUS_CLEAR_STATUS_BC_STATUS                 (1 << 0)
152
153 #define I2C_CONFIG_LOAD                         0x08c
154 #define  I2C_CONFIG_LOAD_TIMEOUT_CONFIG_LOAD            (1 << 2)
155 #define  I2C_CONFIG_LOAD_SLV_CONFIG_LOAD                (1 << 1)
156 #define  I2C_CONFIG_LOAD_MSTR_CONFIG_LOAD               (1 << 0)
157
158 #define I2C_INTERFACE_TIMING_0                  0x094
159 #define I2C_INTERFACE_TIMING_1                  0x098
160 #define I2C_HS_INTERFACE_TIMING_0               0x09c
161 #define I2C_HS_INTERFACE_TIMING_1               0x0a0
162
163 /* Protocol header 0 */
164 #define PACKET_HEADER0_HEADER_SIZE_SHIFT        28
165 #define PACKET_HEADER0_HEADER_SIZE_MASK         0x3
166 #define PACKET_HEADER0_PACKET_ID_SHIFT          16
167 #define PACKET_HEADER0_PACKET_ID_MASK           0xff
168 #define PACKET_HEADER0_CONT_ID_SHIFT            12
169 #define PACKET_HEADER0_CONT_ID_MASK             0xf
170 #define PACKET_HEADER0_PROTOCOL_I2C             (1 << 4)
171 #define PACKET_HEADER0_TYPE_SHIFT               0
172 #define PACKET_HEADER0_TYPE_MASK                0x7
173
174 /* I2C header */
175 #define I2C_HEADER_HIGHSPEED_MODE               (1 << 22)
176 #define I2C_HEADER_CONT_ON_NAK                  (1 << 21)
177 #define I2C_HEADER_SEND_START_BYTE              (1 << 20)
178 #define I2C_HEADER_READ                         (1 << 19)
179 #define I2C_HEADER_10BIT_ADDR                   (1 << 18)
180 #define I2C_HEADER_IE_ENABLE                    (1 << 17)
181 #define I2C_HEADER_REPEAT_START                 (1 << 16)
182 #define I2C_HEADER_CONTINUE_XFER                (1 << 15)
183 #define I2C_HEADER_MASTER_ADDR_SHIFT            12
184 #define I2C_HEADER_MASTER_ADDR_MASK             0x7
185 #define I2C_HEADER_SLAVE_ADDR_SHIFT             0
186 #define I2C_HEADER_SLAVE_ADDR_MASK              0x3ff
187
188 #define I2C_CLK_DIVISOR_STD_FAST_MODE           0x19
189 #define I2C_CLK_MULTIPLIER_STD_FAST_MODE        8
190
191 #define I2C_REQUEST_TIMEOUT                     (5 * hz)
192
193 #define WR4(_sc, _r, _v)        bus_write_4((_sc)->mem_res, (_r), (_v))
194 #define RD4(_sc, _r)            bus_read_4((_sc)->mem_res, (_r))
195
196 #define LOCK(_sc)               mtx_lock(&(_sc)->mtx)
197 #define UNLOCK(_sc)             mtx_unlock(&(_sc)->mtx)
198 #define SLEEP(_sc, timeout)                                             \
199         mtx_sleep(sc, &sc->mtx, 0, "i2cbuswait", timeout);
200 #define LOCK_INIT(_sc)                                                  \
201         mtx_init(&_sc->mtx, device_get_nameunit(_sc->dev), "tegra_i2c", MTX_DEF)
202 #define LOCK_DESTROY(_sc)       mtx_destroy(&_sc->mtx)
203 #define ASSERT_LOCKED(_sc)      mtx_assert(&_sc->mtx, MA_OWNED)
204 #define ASSERT_UNLOCKED(_sc)    mtx_assert(&_sc->mtx, MA_NOTOWNED)
205
206 static struct ofw_compat_data compat_data[] = {
207         {"nvidia,tegra124-i2c", 1},
208         {NULL,                  0}
209 };
210 enum tegra_i2c_xfer_type {
211         XFER_STOP,              /* Send stop condition after xfer */
212         XFER_REPEAT_START,      /* Send repeated start after xfer */
213         XFER_CONTINUE           /* Don't send nothing */
214 } ;
215
216 struct tegra_i2c_softc {
217         device_t                dev;
218         struct mtx              mtx;
219
220         struct resource         *mem_res;
221         struct resource         *irq_res;
222         void                    *irq_h;
223
224         device_t                iicbus;
225         clk_t                   clk;
226         hwreset_t               reset;
227         uint32_t                core_freq;
228         uint32_t                bus_freq;
229         int                     bus_inuse;
230
231         struct iic_msg          *msg;
232         int                     msg_idx;
233         uint32_t                bus_err;
234         int                     done;
235 };
236
237 static int
238 tegra_i2c_flush_fifo(struct tegra_i2c_softc *sc)
239 {
240         int timeout;
241         uint32_t reg;
242
243         reg = RD4(sc, I2C_FIFO_CONTROL);
244         reg |= I2C_FIFO_CONTROL_TX_FIFO_FLUSH | I2C_FIFO_CONTROL_RX_FIFO_FLUSH;
245         WR4(sc, I2C_FIFO_CONTROL, reg);
246
247         timeout = 10;
248         while (timeout > 0) {
249                 reg = RD4(sc, I2C_FIFO_CONTROL);
250                 reg &= I2C_FIFO_CONTROL_TX_FIFO_FLUSH |
251                     I2C_FIFO_CONTROL_RX_FIFO_FLUSH;
252                 if (reg == 0)
253                         break;
254                 DELAY(10);
255         }
256         if (timeout <= 0) {
257                 device_printf(sc->dev, "FIFO flush timedout\n");
258                 return (ETIMEDOUT);
259         }
260         return (0);
261 }
262
263 static void
264 tegra_i2c_setup_clk(struct tegra_i2c_softc *sc, int clk_freq)
265 {
266         int div;
267
268         div = ((sc->core_freq  / clk_freq)  / 10) - 1;
269         if ((sc->core_freq / (10 * (div + 1)))  > clk_freq)
270                 div++;
271         if (div > 65535)
272                 div = 65535;
273         WR4(sc, I2C_CLK_DIVISOR,
274             (1 << I2C_CLK_DIVISOR_HSMODE_SHIFT) |
275             (div << I2C_CLK_DIVISOR_STD_FAST_MODE_SHIFT));
276 }
277
278 static void
279 tegra_i2c_bus_clear(struct tegra_i2c_softc *sc)
280 {
281         int timeout;
282         uint32_t reg, status;
283
284         WR4(sc, I2C_BUS_CLEAR_CONFIG,
285             I2C_BUS_CLEAR_CONFIG_BC_SCLK_THRESHOLD(18) |
286             I2C_BUS_CLEAR_CONFIG_BC_STOP_COND |
287             I2C_BUS_CLEAR_CONFIG_BC_TERMINATE);
288
289         WR4(sc, I2C_CONFIG_LOAD, I2C_CONFIG_LOAD_MSTR_CONFIG_LOAD);
290         for (timeout = 1000; timeout > 0; timeout--) {
291                 if (RD4(sc, I2C_CONFIG_LOAD) == 0)
292                         break;
293                 DELAY(10);
294         }
295         if (timeout <= 0)
296                 device_printf(sc->dev, "config load timeouted\n");
297         reg = RD4(sc, I2C_BUS_CLEAR_CONFIG);
298         reg |= I2C_BUS_CLEAR_CONFIG_BC_ENABLE;
299         WR4(sc, I2C_BUS_CLEAR_CONFIG,reg);
300
301         for (timeout = 1000; timeout > 0; timeout--) {
302                 if ((RD4(sc, I2C_BUS_CLEAR_CONFIG) &
303                     I2C_BUS_CLEAR_CONFIG_BC_ENABLE) == 0)
304                         break;
305                 DELAY(10);
306         }
307         if (timeout <= 0)
308                 device_printf(sc->dev, "bus clear timeouted\n");
309
310         status = RD4(sc, I2C_BUS_CLEAR_STATUS);
311         if ((status & I2C_BUS_CLEAR_STATUS_BC_STATUS) == 0)
312                 device_printf(sc->dev, "bus clear failed\n");
313 }
314
315 static int
316 tegra_i2c_hw_init(struct tegra_i2c_softc *sc)
317 {
318         int rv, timeout;
319
320         /* Reset the core. */
321         rv = hwreset_assert(sc->reset);
322         if (rv != 0) {
323                 device_printf(sc->dev, "Cannot assert reset\n");
324                 return (rv);
325         }
326         DELAY(10);
327         rv = hwreset_deassert(sc->reset);
328         if (rv != 0) {
329                 device_printf(sc->dev, "Cannot clear reset\n");
330                 return (rv);
331         }
332
333         WR4(sc, I2C_INTERRUPT_MASK_REGISTER, 0);
334         WR4(sc, I2C_INTERRUPT_STATUS_REGISTER, 0xFFFFFFFF);
335         WR4(sc, I2C_CNFG, I2C_CNFG_NEW_MASTER_FSM | I2C_CNFG_PACKET_MODE_EN |
336             I2C_CNFG_DEBOUNCE_CNT(2));
337
338         tegra_i2c_setup_clk(sc, sc->bus_freq);
339
340         WR4(sc, I2C_FIFO_CONTROL, I2C_FIFO_CONTROL_TX_FIFO_TRIG(7) |
341             I2C_FIFO_CONTROL_RX_FIFO_TRIG(0));
342
343         WR4(sc, I2C_CONFIG_LOAD, I2C_CONFIG_LOAD_MSTR_CONFIG_LOAD);
344         for (timeout = 1000; timeout > 0; timeout--) {
345                 if (RD4(sc, I2C_CONFIG_LOAD) == 0)
346                         break;
347                 DELAY(10);
348         }
349         if (timeout <= 0)
350                 device_printf(sc->dev, "config load timeouted\n");
351
352         tegra_i2c_bus_clear(sc);
353         return (0);
354 }
355
356 static int
357 tegra_i2c_tx(struct tegra_i2c_softc *sc)
358 {
359         uint32_t reg;
360         int cnt, i;
361
362         if (sc->msg_idx >= sc->msg->len)
363                 panic("Invalid call to tegra_i2c_tx\n");
364
365         while(sc->msg_idx < sc->msg->len) {
366                 reg = RD4(sc, I2C_FIFO_STATUS);
367                 if (I2C_FIFO_STATUS_TX_FIFO_EMPTY_CNT(reg) == 0)
368                         break;
369                 cnt = min(4, sc->msg->len - sc->msg_idx);
370                 reg = 0;
371                 for (i = 0;  i < cnt; i++) {
372                         reg |=  sc->msg->buf[sc->msg_idx] << (i * 8);
373                         sc->msg_idx++;
374                 }
375                 WR4(sc, I2C_TX_PACKET_FIFO, reg);
376         }
377         if (sc->msg_idx >= sc->msg->len)
378                 return (0);
379         return (sc->msg->len - sc->msg_idx - 1);
380 }
381
382 static int
383 tegra_i2c_rx(struct tegra_i2c_softc *sc)
384 {
385         uint32_t reg;
386         int cnt, i;
387
388         if (sc->msg_idx >= sc->msg->len)
389                 panic("Invalid call to tegra_i2c_rx\n");
390
391         while(sc->msg_idx < sc->msg->len) {
392                 reg = RD4(sc, I2C_FIFO_STATUS);
393                 if (I2C_FIFO_STATUS_RX_FIFO_FULL_CNT(reg) == 0)
394                         break;
395                 cnt = min(4, sc->msg->len - sc->msg_idx);
396                 reg = RD4(sc, I2C_RX_FIFO);
397                 for (i = 0;  i < cnt; i++) {
398                         sc->msg->buf[sc->msg_idx] = (reg >> (i * 8)) & 0xFF;
399                         sc->msg_idx++;
400                 }
401         }
402
403         if (sc->msg_idx >= sc->msg->len)
404                 return (0);
405         return (sc->msg->len - sc->msg_idx - 1);
406 }
407
408 static void
409 tegra_i2c_intr(void *arg)
410 {
411         struct tegra_i2c_softc *sc;
412         uint32_t status, reg;
413         int rv;
414
415         sc = (struct tegra_i2c_softc *)arg;
416
417         LOCK(sc);
418         status = RD4(sc, I2C_INTERRUPT_SOURCE_REGISTER);
419         if (sc->msg == NULL) {
420                 /* Unexpected interrupt - disable FIFOs, clear reset. */
421                 reg = RD4(sc, I2C_INTERRUPT_MASK_REGISTER);
422                 reg &= ~I2C_INT_TFIFO_DATA_REQ;
423                 reg &= ~I2C_INT_RFIFO_DATA_REQ;
424                 WR4(sc, I2C_INTERRUPT_MASK_REGISTER, 0);
425                 WR4(sc, I2C_INTERRUPT_STATUS_REGISTER, status);
426                 UNLOCK(sc);
427                 return;
428         }
429
430         if ((status & I2C_ERROR_MASK) != 0) {
431                 if (status & I2C_INT_NOACK)
432                         sc->bus_err = IIC_ENOACK;
433                 if (status & I2C_INT_ARB_LOST)
434                         sc->bus_err = IIC_EBUSERR;
435                 if ((status & I2C_INT_TFIFO_OVR) ||
436                     (status & I2C_INT_RFIFO_UNF))
437                         sc->bus_err = IIC_EBUSERR;
438                 sc->done = 1;
439         } else if ((status & I2C_INT_RFIFO_DATA_REQ) &&
440             (sc->msg != NULL) && (sc->msg->flags & IIC_M_RD)) {
441                 rv = tegra_i2c_rx(sc);
442                 if (rv == 0) {
443                         reg = RD4(sc, I2C_INTERRUPT_MASK_REGISTER);
444                         reg &= ~I2C_INT_RFIFO_DATA_REQ;
445                         WR4(sc, I2C_INTERRUPT_MASK_REGISTER, reg);
446                 }
447         } else if ((status & I2C_INT_TFIFO_DATA_REQ) &&
448             (sc->msg != NULL) && !(sc->msg->flags & IIC_M_RD)) {
449                 rv = tegra_i2c_tx(sc);
450                 if (rv == 0) {
451                         reg = RD4(sc, I2C_INTERRUPT_MASK_REGISTER);
452                         reg &= ~I2C_INT_TFIFO_DATA_REQ;
453                         WR4(sc, I2C_INTERRUPT_MASK_REGISTER, reg);
454                 }
455         } else if ((status & I2C_INT_RFIFO_DATA_REQ) ||
456                     (status & I2C_INT_TFIFO_DATA_REQ)) {
457                 device_printf(sc->dev, "Unexpected data interrupt: 0x%08X\n",
458                     status);
459                 reg = RD4(sc, I2C_INTERRUPT_MASK_REGISTER);
460                 reg &= ~I2C_INT_TFIFO_DATA_REQ;
461                 reg &= ~I2C_INT_RFIFO_DATA_REQ;
462                 WR4(sc, I2C_INTERRUPT_MASK_REGISTER, reg);
463         }
464         if (status & I2C_INT_PACKET_XFER_COMPLETE)
465                 sc->done = 1;
466         WR4(sc, I2C_INTERRUPT_STATUS_REGISTER, status);
467         if (sc->done) {
468                 WR4(sc, I2C_INTERRUPT_MASK_REGISTER, 0);
469                 wakeup(&(sc->done));
470         }
471         UNLOCK(sc);
472 }
473
474 static void
475 tegra_i2c_start_msg(struct tegra_i2c_softc *sc, struct iic_msg *msg,
476     enum tegra_i2c_xfer_type xtype)
477 {
478         uint32_t tmp, mask;
479
480         /* Packet header. */
481         tmp =  (0 << PACKET_HEADER0_HEADER_SIZE_SHIFT) |
482            PACKET_HEADER0_PROTOCOL_I2C |
483            (1 << PACKET_HEADER0_CONT_ID_SHIFT) |
484            (1 << PACKET_HEADER0_PACKET_ID_SHIFT);
485         WR4(sc, I2C_TX_PACKET_FIFO, tmp);
486
487
488         /* Packet size. */
489         WR4(sc, I2C_TX_PACKET_FIFO, msg->len - 1);
490
491         /* I2C header. */
492         tmp = I2C_HEADER_IE_ENABLE;
493         if (xtype == XFER_CONTINUE)
494                 tmp |= I2C_HEADER_CONTINUE_XFER;
495         else if (xtype == XFER_REPEAT_START)
496                 tmp |= I2C_HEADER_REPEAT_START;
497         tmp |= msg->slave << I2C_HEADER_SLAVE_ADDR_SHIFT;
498         if (msg->flags & IIC_M_RD) {
499                 tmp |= I2C_HEADER_READ;
500                 tmp |= 1 << I2C_HEADER_SLAVE_ADDR_SHIFT;
501         } else
502                 tmp &= ~(1 << I2C_HEADER_SLAVE_ADDR_SHIFT);
503
504         WR4(sc, I2C_TX_PACKET_FIFO, tmp);
505
506         /* Interrupt mask. */
507         mask = I2C_INT_NOACK | I2C_INT_ARB_LOST | I2C_INT_PACKET_XFER_COMPLETE;
508         if (msg->flags & IIC_M_RD)
509                 mask |= I2C_INT_RFIFO_DATA_REQ;
510         else
511                 mask |= I2C_INT_TFIFO_DATA_REQ;
512         WR4(sc, I2C_INTERRUPT_MASK_REGISTER, mask);
513 }
514
515 static int
516 tegra_i2c_poll(struct tegra_i2c_softc *sc)
517 {
518         int timeout;
519
520         for(timeout = 10000; timeout > 0; timeout--)  {
521                 UNLOCK(sc);
522                 tegra_i2c_intr(sc);
523                 LOCK(sc);
524                 if (sc->done != 0)
525                          break;
526                 DELAY(1);
527         }
528         if (timeout <= 0)
529                 return (ETIMEDOUT);
530         return (0);
531 }
532
533 static int
534 tegra_i2c_transfer(device_t dev, struct iic_msg *msgs, uint32_t nmsgs)
535 {
536         int rv, i;
537         struct tegra_i2c_softc *sc;
538         enum tegra_i2c_xfer_type xtype;
539
540         sc = device_get_softc(dev);
541         LOCK(sc);
542
543         /* Get the bus. */
544         while (sc->bus_inuse == 1)
545                 SLEEP(sc,  0);
546         sc->bus_inuse = 1;
547
548         rv = 0;
549         for (i = 0; i < nmsgs; i++) {
550                 sc->msg = &msgs[i];
551                 sc->msg_idx = 0;
552                 sc->bus_err = 0;
553                 sc->done = 0;
554                 /* Check for valid parameters. */
555                 if (sc->msg == NULL || sc->msg->buf == NULL ||
556                     sc->msg->len == 0) {
557                         rv = EINVAL;
558                         break;
559                 }
560
561                 /* Get flags for next transfer. */
562                 if (i == (nmsgs - 1)) {
563                         if (msgs[i].flags & IIC_M_NOSTOP)
564                                 xtype = XFER_CONTINUE;
565                         else
566                                 xtype = XFER_STOP;
567                 } else {
568                         if (msgs[i + 1].flags & IIC_M_NOSTART)
569                                 xtype = XFER_CONTINUE;
570                         else
571                                 xtype = XFER_REPEAT_START;
572                 }
573                 tegra_i2c_start_msg(sc, sc->msg, xtype);
574                 if (cold)
575                         rv = tegra_i2c_poll(sc);
576                 else
577                         rv = msleep(&sc->done, &sc->mtx, PZERO, "iic",
578                             I2C_REQUEST_TIMEOUT);
579
580                 WR4(sc, I2C_INTERRUPT_MASK_REGISTER, 0);
581                 WR4(sc, I2C_INTERRUPT_STATUS_REGISTER, 0xFFFFFFFF);
582                 if (rv == 0)
583                         rv = sc->bus_err;
584                 if (rv != 0)
585                         break;
586         }
587
588         if (rv != 0) {
589                 tegra_i2c_hw_init(sc);
590                 tegra_i2c_flush_fifo(sc);
591         }
592
593         sc->msg = NULL;
594         sc->msg_idx = 0;
595         sc->bus_err = 0;
596         sc->done = 0;
597
598         /* Wake up the processes that are waiting for the bus. */
599         sc->bus_inuse = 0;
600         wakeup(sc);
601         UNLOCK(sc);
602
603         return (rv);
604 }
605
606 static int
607 tegra_i2c_iicbus_reset(device_t dev, u_char speed, u_char addr, u_char *oldaddr)
608 {
609         struct tegra_i2c_softc *sc;
610         int busfreq;
611
612         sc = device_get_softc(dev);
613         busfreq = IICBUS_GET_FREQUENCY(sc->iicbus, speed);
614         sc = device_get_softc(dev);
615         LOCK(sc);
616         tegra_i2c_setup_clk(sc, busfreq);
617         UNLOCK(sc);
618         return (0);
619 }
620
621 static int
622 tegra_i2c_probe(device_t dev)
623 {
624         if (!ofw_bus_status_okay(dev))
625                 return (ENXIO);
626
627         if (ofw_bus_search_compatible(dev, compat_data)->ocd_data == 0)
628                 return (ENXIO);
629
630         return (BUS_PROBE_DEFAULT);
631 }
632
633 static int
634 tegra_i2c_attach(device_t dev)
635 {
636         int rv, rid;
637         phandle_t node;
638         struct tegra_i2c_softc *sc;
639         uint64_t freq;
640
641         sc = device_get_softc(dev);
642         sc->dev = dev;
643         node = ofw_bus_get_node(dev);
644
645         LOCK_INIT(sc);
646
647         /* Get the memory resource for the register mapping. */
648         rid = 0;
649         sc->mem_res = bus_alloc_resource_any(dev, SYS_RES_MEMORY, &rid,
650             RF_ACTIVE);
651         if (sc->mem_res == NULL) {
652                 device_printf(dev, "Cannot map registers.\n");
653                 rv = ENXIO;
654                 goto fail;
655         }
656
657         /* Allocate our IRQ resource. */
658         rid = 0;
659         sc->irq_res = bus_alloc_resource_any(dev, SYS_RES_IRQ, &rid,
660             RF_ACTIVE);
661         if (sc->irq_res == NULL) {
662                 device_printf(dev, "Cannot allocate interrupt.\n");
663                 rv = ENXIO;
664                 goto fail;
665         }
666
667         /* FDT resources. */
668         rv = clk_get_by_ofw_name(dev, 0, "div-clk", &sc->clk);
669         if (rv != 0) {
670                 device_printf(dev, "Cannot get i2c clock: %d\n", rv);
671                 goto fail;
672         }
673         rv = hwreset_get_by_ofw_name(sc->dev, 0, "i2c", &sc->reset);
674         if (rv != 0) {
675                 device_printf(sc->dev, "Cannot get i2c reset\n");
676                 return (ENXIO);
677         }
678         rv = OF_getencprop(node, "clock-frequency", &sc->bus_freq,
679             sizeof(sc->bus_freq));
680         if (rv != sizeof(sc->bus_freq)) {
681                 sc->bus_freq = 100000;
682                 goto fail;
683         }
684
685         /* Request maximum frequency for I2C block 136MHz (408MHz / 3). */
686         rv = clk_set_freq(sc->clk, 136000000, CLK_SET_ROUND_DOWN);
687         if (rv != 0) {
688                 device_printf(dev, "Cannot set clock frequency\n");
689                 goto fail;
690         }
691         rv = clk_get_freq(sc->clk, &freq);
692         if (rv != 0) {
693                 device_printf(dev, "Cannot get clock frequency\n");
694                 goto fail;
695         }
696         sc->core_freq = (uint32_t)freq;
697
698         rv = clk_enable(sc->clk);
699         if (rv != 0) {
700                 device_printf(dev, "Cannot enable clock: %d\n", rv);
701                 goto fail;
702         }
703
704         /* Init hardware. */
705         rv = tegra_i2c_hw_init(sc);
706         if (rv) {
707                 device_printf(dev, "tegra_i2c_activate failed\n");
708                 goto fail;
709         }
710
711         /* Setup interrupt. */
712         rv = bus_setup_intr(dev, sc->irq_res, INTR_TYPE_MISC | INTR_MPSAFE,
713             NULL, tegra_i2c_intr, sc, &sc->irq_h);
714         if (rv) {
715                 device_printf(dev, "Cannot setup interrupt.\n");
716                 goto fail;
717         }
718
719         /* Attach the iicbus. */
720         sc->iicbus = device_add_child(dev, "iicbus", -1);
721         if (sc->iicbus == NULL) {
722                 device_printf(dev, "Could not allocate iicbus instance.\n");
723                 rv = ENXIO;
724                 goto fail;
725         }
726
727         /* Probe and attach the iicbus. */
728         return (bus_generic_attach(dev));
729
730 fail:
731         if (sc->irq_h != NULL)
732                 bus_teardown_intr(dev, sc->irq_res, sc->irq_h);
733         if (sc->irq_res != NULL)
734                 bus_release_resource(dev, SYS_RES_IRQ, 0, sc->irq_res);
735         if (sc->mem_res != NULL)
736                 bus_release_resource(dev, SYS_RES_MEMORY, 0, sc->mem_res);
737         LOCK_DESTROY(sc);
738
739         return (rv);
740 }
741
742 static int
743 tegra_i2c_detach(device_t dev)
744 {
745         struct tegra_i2c_softc *sc;
746         int rv;
747
748         sc = device_get_softc(dev);
749         tegra_i2c_hw_init(sc);
750         if (sc->irq_h != NULL)
751                 bus_teardown_intr(dev, sc->irq_res, sc->irq_h);
752         if (sc->irq_res != NULL)
753                 bus_release_resource(dev, SYS_RES_IRQ, 0, sc->irq_res);
754         if (sc->mem_res != NULL)
755                 bus_release_resource(dev, SYS_RES_MEMORY, 0, sc->mem_res);
756
757         LOCK_DESTROY(sc);
758         if (sc->iicbus)
759             rv = device_delete_child(dev, sc->iicbus);
760         return (bus_generic_detach(dev));
761 }
762
763 static phandle_t
764 tegra_i2c_get_node(device_t bus, device_t dev)
765 {
766
767         /* Share controller node with iibus device. */
768         return (ofw_bus_get_node(bus));
769 }
770
771 static device_method_t tegra_i2c_methods[] = {
772         /* Device interface */
773         DEVMETHOD(device_probe,         tegra_i2c_probe),
774         DEVMETHOD(device_attach,        tegra_i2c_attach),
775         DEVMETHOD(device_detach,        tegra_i2c_detach),
776
777         /* Bus interface */
778         DEVMETHOD(bus_setup_intr,       bus_generic_setup_intr),
779         DEVMETHOD(bus_teardown_intr,    bus_generic_teardown_intr),
780         DEVMETHOD(bus_alloc_resource,   bus_generic_alloc_resource),
781         DEVMETHOD(bus_release_resource, bus_generic_release_resource),
782         DEVMETHOD(bus_activate_resource, bus_generic_activate_resource),
783         DEVMETHOD(bus_deactivate_resource, bus_generic_deactivate_resource),
784         DEVMETHOD(bus_adjust_resource,  bus_generic_adjust_resource),
785         DEVMETHOD(bus_set_resource,     bus_generic_rl_set_resource),
786         DEVMETHOD(bus_get_resource,     bus_generic_rl_get_resource),
787
788         /* OFW methods */
789         DEVMETHOD(ofw_bus_get_node,     tegra_i2c_get_node),
790
791         /* iicbus interface */
792         DEVMETHOD(iicbus_callback,      iicbus_null_callback),
793         DEVMETHOD(iicbus_reset,         tegra_i2c_iicbus_reset),
794         DEVMETHOD(iicbus_transfer,      tegra_i2c_transfer),
795
796         DEVMETHOD_END
797 };
798
799 static devclass_t tegra_i2c_devclass;
800 static DEFINE_CLASS_0(iichb, tegra_i2c_driver, tegra_i2c_methods,
801     sizeof(struct tegra_i2c_softc));
802 EARLY_DRIVER_MODULE(tegra_iic, simplebus, tegra_i2c_driver, tegra_i2c_devclass,
803     NULL, NULL, 73);