Home | History | Annotate | Line # | Download | only in ic
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