Home | History | Annotate | Line # | Download | only in i2c
ssdfb_i2c.c revision 1.2
      1 /* $NetBSD: ssdfb_i2c.c,v 1.2 2019/03/17 01:47:57 tnn Exp $ */
      2 
      3 /*
      4  * Copyright (c) 2019 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundation
      8  * by Tobias Nygren.
      9  *
     10  * Redistribution and use in source and binary forms, with or without
     11  * modification, are permitted provided that the following conditions
     12  * are met:
     13  * 1. Redistributions of source code must retain the above copyright
     14  *    notice, this list of conditions and the following disclaimer.
     15  * 2. Redistributions in binary form must reproduce the above copyright
     16  *    notice, this list of conditions and the following disclaimer in the
     17  *    documentation and/or other materials provided with the distribution.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29  * POSSIBILITY OF SUCH DAMAGE.
     30  */
     31 
     32 #include <sys/cdefs.h>
     33 __KERNEL_RCSID(0, "$NetBSD: ssdfb_i2c.c,v 1.2 2019/03/17 01:47:57 tnn Exp $");
     34 
     35 #include <sys/param.h>
     36 #include <sys/device.h>
     37 #include <dev/wscons/wsdisplayvar.h>
     38 #include <dev/rasops/rasops.h>
     39 #include <dev/i2c/i2cvar.h>
     40 #include <dev/ic/ssdfbvar.h>
     41 
     42 struct ssdfb_i2c_softc {
     43 	struct		ssdfb_softc sc;
     44 	i2c_tag_t	sc_i2c_tag;
     45 	i2c_addr_t	sc_i2c_addr;
     46 };
     47 
     48 static int	ssdfb_i2c_match(device_t, cfdata_t, void *);
     49 static void	ssdfb_i2c_attach(device_t, device_t, void *);
     50 static int	ssdfb_i2c_detach(device_t, int);
     51 
     52 static int	ssdfb_i2c_cmd(void *, uint8_t *, size_t, bool);
     53 static int	ssdfb_i2c_transfer_rect(void *, uint8_t, uint8_t, uint8_t,
     54 				uint8_t, uint8_t *, size_t, bool);
     55 static int	ssdfb_i2c_transfer_rect_ssd1306(void *, uint8_t, uint8_t,
     56 				uint8_t, uint8_t, uint8_t *, size_t, bool);
     57 static int	ssdfb_i2c_transfer_rect_sh1106(void *, uint8_t, uint8_t,
     58 				uint8_t, uint8_t, uint8_t *, size_t, bool);
     59 static int	ssdfb_smbus_transfer_rect(void *, uint8_t, uint8_t, uint8_t,
     60 				uint8_t, uint8_t *, size_t, bool);
     61 
     62 CFATTACH_DECL_NEW(ssdfb_iic, sizeof(struct ssdfb_i2c_softc),
     63     ssdfb_i2c_match, ssdfb_i2c_attach, ssdfb_i2c_detach, NULL);
     64 
     65 static const struct device_compatible_entry compat_data[] = {
     66 	{ "solomon,ssd1306fb-i2c",	0 },
     67 	{ "sino,sh1106fb-i2c",		0 },
     68 	{ NULL,				0 }
     69 };
     70 
     71 static int
     72 ssdfb_i2c_match(device_t parent, cfdata_t match, void *aux)
     73 {
     74 	struct i2c_attach_args *ia = aux;
     75 	int match_result;
     76 
     77 	if (iic_use_direct_match(ia, match, compat_data, &match_result))
     78 		return match_result;
     79 
     80 	switch (ia->ia_addr) {
     81 	case SSDFB_I2C_DEFAULT_ADDR:
     82 	case SSDFB_I2C_ALTERNATIVE_ADDR:
     83 		return I2C_MATCH_ADDRESS_ONLY;
     84 	}
     85 
     86 	return 0;
     87 }
     88 
     89 static void
     90 ssdfb_i2c_attach(device_t parent, device_t self, void *aux)
     91 {
     92 	struct ssdfb_i2c_softc *sc = device_private(self);
     93 	struct cfdata *cf = device_cfdata(self);
     94 	struct i2c_attach_args *ia = aux;
     95 	int flags = cf->cf_flags;
     96 	int i;
     97 
     98 	if ((flags & SSDFB_ATTACH_FLAG_PRODUCT_MASK) == SSDFB_PRODUCT_UNKNOWN) {
     99 		for (i = 0; i < ia->ia_ncompat; i++) {
    100 			if (strncmp("solomon,ssd1306", ia->ia_compat[i], 15)
    101 			    == 0) {
    102 				flags |= SSDFB_PRODUCT_SSD1306_GENERIC;
    103 				break;
    104 			}
    105 			else if (strncmp("sino,sh1106", ia->ia_compat[i], 11)
    106 			    == 0) {
    107 				flags |= SSDFB_PRODUCT_SH1106_GENERIC;
    108 				break;
    109 			}
    110 		}
    111 	}
    112 	if ((flags & SSDFB_ATTACH_FLAG_PRODUCT_MASK) == SSDFB_PRODUCT_UNKNOWN)
    113 		flags |= SSDFB_PRODUCT_SSD1306_GENERIC;
    114 
    115 	sc->sc.sc_dev = self;
    116 	sc->sc_i2c_tag = ia->ia_tag;
    117 	sc->sc_i2c_addr = ia->ia_addr;
    118 	sc->sc.sc_cookie = (void *)sc;
    119 	sc->sc.sc_cmd = ssdfb_i2c_cmd;
    120 	sc->sc.sc_transfer_rect = ssdfb_i2c_transfer_rect;
    121 
    122 	ssdfb_attach(&sc->sc, flags);
    123 }
    124 
    125 static int
    126 ssdfb_i2c_detach(device_t self, int flags)
    127 {
    128 	struct ssdfb_i2c_softc *sc = device_private(self);
    129 
    130 	return ssdfb_detach(&sc->sc);
    131 }
    132 
    133 static int
    134 ssdfb_i2c_cmd(void *cookie, uint8_t *cmd, size_t len, bool usepoll)
    135 {
    136 	struct ssdfb_i2c_softc *sc = (struct ssdfb_i2c_softc *)cookie;
    137 	int flags = usepoll ? I2C_F_POLL : 0;
    138 	uint8_t cb = 0;
    139 	int error;
    140 
    141 	error = iic_acquire_bus(sc->sc_i2c_tag, flags);
    142 	if (error)
    143 		return error;
    144 	error = iic_exec(sc->sc_i2c_tag, I2C_OP_WRITE_WITH_STOP,
    145 	    sc->sc_i2c_addr, &cb, sizeof(cb), cmd, len, flags);
    146 	(void) iic_release_bus(sc->sc_i2c_tag, flags);
    147 
    148 	return error;
    149 }
    150 
    151 static int
    152 ssdfb_i2c_transfer_rect(void *cookie, uint8_t fromcol, uint8_t tocol,
    153     uint8_t frompage, uint8_t topage, uint8_t *p, size_t stride, bool usepoll)
    154 {
    155 	struct ssdfb_i2c_softc *sc = (struct ssdfb_i2c_softc *)cookie;
    156 	int flags = usepoll ? I2C_F_POLL : 0;
    157 	uint8_t cb = SSDFB_I2C_CTRL_BYTE_DATA_MASK;
    158 	uint8_t data[] = {0, 0, 0};
    159 	uint8_t cmd[2];
    160 	int error;
    161 
    162 	/*
    163 	 * Test if large transfers are supported by the parent i2c bus and
    164 	 * pick the fastest transfer routine for subsequent invocations.
    165 	 */
    166 	switch (sc->sc.sc_p->p_controller_id) {
    167 	case SSDFB_CONTROLLER_SSD1306:
    168 		sc->sc.sc_transfer_rect = ssdfb_i2c_transfer_rect_ssd1306;
    169 		break;
    170 	case SSDFB_CONTROLLER_SH1106:
    171 		sc->sc.sc_transfer_rect = ssdfb_i2c_transfer_rect_sh1106;
    172 		break;
    173 	default:
    174 		sc->sc.sc_transfer_rect = ssdfb_smbus_transfer_rect;
    175 		break;
    176 	}
    177 
    178 	if (sc->sc.sc_transfer_rect != ssdfb_smbus_transfer_rect) {
    179 		error = iic_acquire_bus(sc->sc_i2c_tag, flags);
    180 		if (error)
    181 			return error;
    182 		error = iic_exec(sc->sc_i2c_tag, I2C_OP_WRITE_WITH_STOP,
    183 		    sc->sc_i2c_addr, &cb, sizeof(cb), data, sizeof(data), flags);
    184 		(void) iic_release_bus(sc->sc_i2c_tag, flags);
    185 		if (error) {
    186 			sc->sc.sc_transfer_rect = ssdfb_smbus_transfer_rect;
    187 		}
    188 	}
    189 
    190 	/*
    191 	 * Set addressing mode for SSD1306.
    192 	 */
    193 	if (sc->sc.sc_p->p_controller_id == SSDFB_CONTROLLER_SSD1306) {
    194 		cmd[0] = SSD1306_CMD_SET_MEMORY_ADDRESSING_MODE;
    195 		cmd[1] = sc->sc.sc_transfer_rect
    196 		    == ssdfb_i2c_transfer_rect_ssd1306
    197 		    ? SSD1306_MEMORY_ADDRESSING_MODE_HORIZONTAL
    198 		    : SSD1306_MEMORY_ADDRESSING_MODE_PAGE;
    199 		error = ssdfb_i2c_cmd(cookie, cmd, sizeof(cmd), usepoll);
    200 		if (error)
    201 			return error;
    202 	}
    203 
    204 	return sc->sc.sc_transfer_rect(cookie, fromcol, tocol, frompage, topage,
    205 	    p, stride, usepoll);
    206 }
    207 
    208 
    209 static int
    210 ssdfb_i2c_transfer_rect_ssd1306(void *cookie, uint8_t fromcol, uint8_t tocol,
    211     uint8_t frompage, uint8_t topage, uint8_t *p, size_t stride, bool usepoll)
    212 {
    213 	struct ssdfb_i2c_softc *sc = (struct ssdfb_i2c_softc *)cookie;
    214 	int flags = usepoll ? I2C_F_POLL : 0;
    215 	uint8_t cc = 0;
    216 	uint8_t cb = SSDFB_I2C_CTRL_BYTE_DATA_MASK;
    217 	size_t len = (tocol + 1 - fromcol);
    218 	int error;
    219 	/*
    220 	 * SSD1306 does not implement the Continuation bit correctly.
    221 	 * The SH1106 protocol defines that a control byte WITH Co
    222 	 * set must be inserted between each command. But SSD1306
    223 	 * fails to parse the commands if we do that.
    224 	 */
    225 	uint8_t cmds[] = {
    226 		SSD1306_CMD_SET_COLUMN_ADDRESS,
    227 		fromcol, tocol,
    228 		SSD1306_CMD_SET_PAGE_ADDRESS,
    229 		frompage, topage
    230 	};
    231 
    232 	error = iic_acquire_bus(sc->sc_i2c_tag, flags);
    233 	if (error)
    234 		return error;
    235 	error = iic_exec(sc->sc_i2c_tag, I2C_OP_WRITE_WITH_STOP,
    236 	    sc->sc_i2c_addr, &cc, sizeof(cc), cmds, sizeof(cmds), flags);
    237 	if (error)
    238 		goto out;
    239 	while (frompage <= topage) {
    240 		error = iic_exec(sc->sc_i2c_tag, I2C_OP_WRITE_WITH_STOP,
    241 		    sc->sc_i2c_addr, &cb, sizeof(cb), p, len, flags);
    242 		if (error)
    243 			goto out;
    244 		frompage++;
    245 		p += stride;
    246 	}
    247 out:
    248 	(void) iic_release_bus(sc->sc_i2c_tag, flags);
    249 
    250 	return error;
    251 }
    252 
    253 static int
    254 ssdfb_i2c_transfer_rect_sh1106(void *cookie, uint8_t fromcol, uint8_t tocol,
    255     uint8_t frompage, uint8_t topage, uint8_t *p, size_t stride, bool usepoll)
    256 {
    257 	struct ssdfb_i2c_softc *sc = (struct ssdfb_i2c_softc *)cookie;
    258 	int flags = usepoll ? I2C_F_POLL : 0;
    259 	uint8_t cb = SSDFB_I2C_CTRL_BYTE_DATA_MASK;
    260 	uint8_t cc = SSDFB_I2C_CTRL_BYTE_CONTINUATION_MASK;
    261 	size_t len = (tocol + 1 - fromcol);
    262 	int error;
    263 	uint8_t cmds[] = {
    264 		SSDFB_CMD_SET_PAGE_START_ADDRESS_BASE + frompage,
    265 		SSDFB_I2C_CTRL_BYTE_CONTINUATION_MASK,
    266 		SSDFB_CMD_SET_HIGHER_COLUMN_START_ADDRESS_BASE + (fromcol >> 4),
    267 		SSDFB_I2C_CTRL_BYTE_CONTINUATION_MASK,
    268 		SSDFB_CMD_SET_LOWER_COLUMN_START_ADDRESS_BASE + (fromcol & 0xf)
    269 	};
    270 
    271 	error = iic_acquire_bus(sc->sc_i2c_tag, flags);
    272 	if (error)
    273 		return error;
    274 	while (frompage <= topage) {
    275 		cmds[0] = SSDFB_CMD_SET_PAGE_START_ADDRESS_BASE + frompage;
    276 		error = iic_exec(sc->sc_i2c_tag, I2C_OP_WRITE_WITH_STOP,
    277 		    sc->sc_i2c_addr, &cc, sizeof(cc), cmds, sizeof(cmds), flags);
    278 		if (error)
    279 			goto out;
    280 		error = iic_exec(sc->sc_i2c_tag, I2C_OP_WRITE_WITH_STOP,
    281 		    sc->sc_i2c_addr, &cb, sizeof(cb), p, len, flags);
    282 		if (error)
    283 			goto out;
    284 		frompage++;
    285 		p += stride;
    286 	}
    287 out:
    288 	(void) iic_release_bus(sc->sc_i2c_tag, flags);
    289 
    290 	return error;
    291 }
    292 
    293 /*
    294  * If the parent is an SMBus, then we can only send 2 bytes
    295  * of payload per txn. The SSD1306 triple byte commands are
    296  * not available so we have to use PAGE addressing mode
    297  * and split data into multiple txns.
    298  * This is ugly and slow but it's the best we can do.
    299  */
    300 static int
    301 ssdfb_smbus_transfer_rect(void *cookie, uint8_t fromcol, uint8_t tocol,
    302     uint8_t frompage, uint8_t topage, uint8_t *p, size_t stride, bool usepoll)
    303 {
    304 	struct ssdfb_i2c_softc *sc = (struct ssdfb_i2c_softc *)cookie;
    305 	int flags = usepoll ? I2C_F_POLL : 0;
    306 	uint8_t cb = SSDFB_I2C_CTRL_BYTE_DATA_MASK;
    307 	uint8_t cc = 0;
    308 	size_t len = (tocol + 1 - fromcol);
    309 	uint8_t cmd_higher_col =
    310 	    SSDFB_CMD_SET_HIGHER_COLUMN_START_ADDRESS_BASE + (fromcol >> 4);
    311 	uint8_t cmd_lower_col =
    312 	    SSDFB_CMD_SET_LOWER_COLUMN_START_ADDRESS_BASE + (fromcol & 0xf);
    313 	uint8_t cmd_page;
    314 	uint8_t data[2];
    315 	uint8_t *colp;
    316 	uint8_t *endp;
    317 	int error;
    318 
    319 	error = iic_acquire_bus(sc->sc_i2c_tag, flags);
    320 	if (error)
    321 		return error;
    322 	while (frompage <= topage) {
    323 		error = iic_exec(sc->sc_i2c_tag, I2C_OP_WRITE_WITH_STOP,
    324 		    sc->sc_i2c_addr, &cc, sizeof(cc),
    325 		    &cmd_higher_col, sizeof(cmd_higher_col), flags);
    326 		if (error)
    327 			goto out;
    328 		error = iic_exec(sc->sc_i2c_tag, I2C_OP_WRITE_WITH_STOP,
    329 		    sc->sc_i2c_addr, &cc, sizeof(cc),
    330 		    &cmd_lower_col, sizeof(cmd_lower_col), flags);
    331 		if (error)
    332 			goto out;
    333 		cmd_page = SSDFB_CMD_SET_PAGE_START_ADDRESS_BASE + frompage;
    334 		error = iic_exec(sc->sc_i2c_tag, I2C_OP_WRITE_WITH_STOP,
    335 		    sc->sc_i2c_addr, &cc, sizeof(cc),
    336 		    &cmd_page, sizeof(cmd_page), flags);
    337 		if (error)
    338 			goto out;
    339 		colp = p;
    340 		endp = colp + len;
    341 		if (len & 1) {
    342 			data[0] = *colp++;
    343 			error = iic_exec(sc->sc_i2c_tag, I2C_OP_WRITE_WITH_STOP,
    344 			    sc->sc_i2c_addr, &cb, sizeof(cb), data, 1, flags);
    345 			if (error)
    346 				goto out;
    347 		}
    348 		while (colp < endp) {
    349 			/*
    350 			 * Send two bytes at a time. We can't use colp directly
    351 			 * because i2c controllers sometimes have data alignment
    352 			 * requirements.
    353 			 */
    354 			data[0] = *colp++;
    355 			data[1] = *colp++;
    356 			error = iic_exec(sc->sc_i2c_tag, I2C_OP_WRITE_WITH_STOP,
    357 			    sc->sc_i2c_addr, &cb, sizeof(cb), data, 2, flags);
    358 			if (error)
    359 				goto out;
    360 		}
    361 		frompage++;
    362 		p += stride;
    363 	}
    364 out:
    365 	(void) iic_release_bus(sc->sc_i2c_tag, flags);
    366 	return error;
    367 }
    368