xref: /netbsd-src/sys/dev/i2c/spdmem_i2c.c (revision a02f62015bc67db27d46dce620454668f6a1869b)
1 /* $NetBSD: spdmem_i2c.c,v 1.26 2022/03/30 00:06:50 pgoyette Exp $ */
2 
3 /*
4  * Copyright (c) 2007 Nicolas Joly
5  * Copyright (c) 2007 Paul Goyette
6  * Copyright (c) 2007 Tobias Nygren
7  * Copyright (c) 2015 Michael van Elst
8  * All rights reserved.
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  * 3. The name of the author may not be used to endorse or promote products
19  *    derived from this software without specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS
22  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
23  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
24  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
25  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
26  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
27  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
28  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
29  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
30  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
31  * POSSIBILITY OF SUCH DAMAGE.
32  */
33 
34 /*
35  * Serial Presence Detect (SPD) memory identification
36  *
37  * JEDEC standard No. 21-C
38  * JEDEC document 4_01_06R24
39  * - Definitions of the EE1004-v 4 Kbit Serial Presence Detect EEPROM [...]
40  */
41 
42 #include <sys/cdefs.h>
43 __KERNEL_RCSID(0, "$NetBSD: spdmem_i2c.c,v 1.26 2022/03/30 00:06:50 pgoyette Exp $");
44 
45 #include <sys/param.h>
46 #include <sys/device.h>
47 #include <sys/endian.h>
48 #include <sys/module.h>
49 #include <sys/sysctl.h>
50 #include <machine/bswap.h>
51 
52 #include <dev/i2c/i2cvar.h>
53 #include <dev/ic/spdmemreg.h>
54 #include <dev/ic/spdmemvar.h>
55 
56 /* Constants for matching i2c bus address */
57 #define SPDMEM_I2C_ADDRMASK 0xfff8
58 #define SPDMEM_I2C_ADDR     0x50
59 #define SPDCTL_I2C_ADDR     0x30
60 
61 /* set write protection */
62 #define SPDCTL_SWP0         (SPDCTL_I2C_ADDR + 1)
63 #define SPDCTL_SWP1         (SPDCTL_I2C_ADDR + 4)
64 #define SPDCTL_SWP2         (SPDCTL_I2C_ADDR + 5)
65 #define SPDCTL_SWP3         (SPDCTL_I2C_ADDR + 0)
66 
67 /* clear write protections */
68 #define SPDCTL_CWP          (SPDCTL_I2C_ADDR + 3)
69 
70 /* read protection status */
71 #define SPDCTL_RPS0         (SPDCTL_I2C_ADDR + 1)
72 #define SPDCTL_RPS1         (SPDCTL_I2C_ADDR + 4)
73 #define SPDCTL_RPS2         (SPDCTL_I2C_ADDR + 5)
74 #define SPDCTL_RPS3         (SPDCTL_I2C_ADDR + 0)
75 
76 /* select page address */
77 #define SPDCTL_SPA0         (SPDCTL_I2C_ADDR + 6)
78 #define SPDCTL_SPA1         (SPDCTL_I2C_ADDR + 7)
79 
80 /* read page address */
81 #define SPDCTL_RPA          (SPDCTL_I2C_ADDR + 6)
82 
83 struct spdmem_i2c_softc {
84 	struct spdmem_softc sc_base;
85 	i2c_tag_t sc_tag;
86 	i2c_addr_t sc_addr; /* EEPROM */
87 	i2c_addr_t sc_page0;
88 	i2c_addr_t sc_page1;
89 };
90 
91 static int  spdmem_reset_page(struct spdmem_i2c_softc *);
92 static int  spdmem_i2c_match(device_t, cfdata_t, void *);
93 static void spdmem_i2c_attach(device_t, device_t, void *);
94 static int  spdmem_i2c_detach(device_t, int);
95 
96 CFATTACH_DECL_NEW(spdmem_iic, sizeof(struct spdmem_i2c_softc),
97     spdmem_i2c_match, spdmem_i2c_attach, spdmem_i2c_detach, NULL);
98 
99 static int spdmem_i2c_read(struct spdmem_softc *, uint16_t, uint8_t *);
100 
101 static int
spdmem_reset_page(struct spdmem_i2c_softc * sc)102 spdmem_reset_page(struct spdmem_i2c_softc *sc)
103 {
104 	uint8_t reg, byte0, byte2;
105 	static uint8_t dummy = 0;
106 	int rv;
107 
108 	reg = 0;
109 
110 	rv = iic_acquire_bus(sc->sc_tag, 0);
111 	if (rv)
112 		return rv;
113 
114 	/*
115 	 * Try to read byte 0 and 2. If it failed, it's not spdmem or a device
116 	 * doesn't exist at the address.
117 	 */
118 	rv = iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP, sc->sc_addr, &reg, 1,
119 	    &byte0, 1, 0);
120 	if (rv != 0)
121 		goto error;
122 
123 	reg = 2;
124 	rv = iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP, sc->sc_addr, &reg, 1,
125 	    &byte2, 1, 0);
126 	if (rv != 0)
127 		goto error;
128 
129 	/*
130 	 * Quirk for BIOSes that leave page 1 of a 4kbit EEPROM selected.
131 	 *
132 	 * byte0 is the length, byte2 is the memory type. Both of them should
133 	 * not be zero. If zero, the current page might be 1 (DDR4 and newer).
134 	 * If page 1 is selected, offset 0 can be 0 (Module Characteristics
135 	 * (Energy backup is not available)) and also offset 2 can be 0
136 	 * (Megabytes, and a part of Capacity digits).
137 	 *
138 	 * Note: The encoding of byte0 is vary in memory type, so we check
139 	 * just with zero to be simple.
140 	 *
141 	 * Try to see if we are not at page 0. If it's not, select page 0.
142 	 */
143 	if ((byte0 == 0) || (byte2 == 0)) {
144 		/*
145 		 * Note that SDCTL_RPA is the same as sc->sc_page0(SPDCTL_SPA0)
146 		 * Write is SPA0, read is RPA.
147 		 *
148 		 * This call returns 0 on page 0 and returns -1 on page 1.
149 		 * I don't know whether our icc_exec()'s API is good or not.
150 		 */
151 		rv = iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP, sc->sc_page0,
152 		    &reg, 1, &dummy, 1, 0);
153 		if (rv != 0) {
154 			/*
155 			 * The possibilities are:
156 			 * a) page 1 is selected.
157 			 * b) The device doesn't support page select and
158 			 *    it's not a SPD ROM.
159 			 * Is there no way to distinguish them now?
160 			 */
161 			rv = iic_exec(sc->sc_tag, I2C_OP_WRITE_WITH_STOP,
162 			    sc->sc_page0, &reg, 1, &dummy, 1, 0);
163 			if (rv == 0) {
164 				aprint_debug("Page 1 was selected. Page 0 is "
165 				    "selected now.\n");
166 			} else {
167 				aprint_debug("Failed to select page 0. This "
168 				    "device isn't SPD ROM\n");
169 			}
170 		} else {
171 			/* This device isn't SPD ROM */
172 			rv = -1;
173 		}
174 	}
175 error:
176 	iic_release_bus(sc->sc_tag, 0);
177 
178 	return rv;
179 }
180 
181 static const struct device_compatible_entry compat_data[] = {
182 	{ .compat = "atmel,spd" },
183 	{ .compat = "i2c-at34c02" },
184 	DEVICE_COMPAT_EOL
185 };
186 
187 static int
spdmem_i2c_match(device_t parent,cfdata_t match,void * aux)188 spdmem_i2c_match(device_t parent, cfdata_t match, void *aux)
189 {
190 	struct i2c_attach_args *ia = aux;
191 	struct spdmem_i2c_softc sc;
192 	int match_result;
193 
194 	if (iic_use_direct_match(ia, match, compat_data, &match_result))
195 		return match_result;
196 
197 	/*
198 	 * XXXJRT
199 	 * Should do this with "compatible" strings.  There are also
200 	 * other problems with this "match" routine.  Specifically, if
201 	 * we are doing direct-config, we know the device is already
202 	 * there aren't do need to probe.  I'll leave the logic for
203 	 * now and let someone who knows better clean it later.
204 	 */
205 
206 	if (ia->ia_name) {
207 		/* add other names as we find more firmware variations */
208 		if (strcmp(ia->ia_name, "dimm-spd") &&
209 		    strcmp(ia->ia_name, "dimm"))
210 			return 0;
211 	}
212 
213 	/* only do this lame test when not using direct config */
214 	if (ia->ia_name == NULL) {
215 		if ((ia->ia_addr & SPDMEM_I2C_ADDRMASK) != SPDMEM_I2C_ADDR)
216 			return 0;
217 	}
218 
219 	sc.sc_tag = ia->ia_tag;
220 	sc.sc_addr = ia->ia_addr;
221 	sc.sc_page0 = SPDCTL_SPA0;
222 	sc.sc_page1 = SPDCTL_SPA1;
223 	sc.sc_base.sc_read = spdmem_i2c_read;
224 
225 	/* Check the bank and reset to the page 0 */
226 	if (spdmem_reset_page(&sc) != 0)
227 		return 0;
228 
229 	if (spdmem_common_probe(&sc.sc_base)) {
230 		return ia->ia_name ? I2C_MATCH_DIRECT_SPECIFIC
231 				   : I2C_MATCH_ADDRESS_AND_PROBE;
232 	}
233 	return 0;
234 }
235 
236 static void
spdmem_i2c_attach(device_t parent,device_t self,void * aux)237 spdmem_i2c_attach(device_t parent, device_t self, void *aux)
238 {
239 	struct spdmem_i2c_softc *sc = device_private(self);
240 	struct i2c_attach_args *ia = aux;
241 
242 	sc->sc_tag = ia->ia_tag;
243 	sc->sc_addr = ia->ia_addr;
244 	sc->sc_page0 = SPDCTL_SPA0;
245 	sc->sc_page1 = SPDCTL_SPA1;
246 	sc->sc_base.sc_read = spdmem_i2c_read;
247 
248 	if (!pmf_device_register(self, NULL, NULL))
249 		aprint_error_dev(self, "couldn't establish power handler\n");
250 
251 	spdmem_common_attach(&sc->sc_base, self);
252 }
253 
254 static int
spdmem_i2c_detach(device_t self,int flags)255 spdmem_i2c_detach(device_t self, int flags)
256 {
257 	struct spdmem_i2c_softc *sc = device_private(self);
258 
259 	pmf_device_deregister(self);
260 
261 	return spdmem_common_detach(&sc->sc_base, self);
262 }
263 
264 static int
spdmem_i2c_read(struct spdmem_softc * softc,uint16_t addr,uint8_t * val)265 spdmem_i2c_read(struct spdmem_softc *softc, uint16_t addr, uint8_t *val)
266 {
267 	uint8_t reg;
268 	struct spdmem_i2c_softc *sc = (struct spdmem_i2c_softc *)softc;
269 	static uint8_t dummy = 0;
270 	int rv;
271 
272 	reg = addr & 0xff;
273 
274 	rv = iic_acquire_bus(sc->sc_tag, 0);
275 	if (rv)
276 		return rv;
277 
278 	if (addr & 0x100) {
279 		rv = iic_exec(sc->sc_tag, I2C_OP_WRITE_WITH_STOP, sc->sc_page1,
280 		    &dummy, 1, &dummy, 1, 0);
281 		rv |= iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP, sc->sc_addr,
282 		    &reg, 1, val, 1, 0);
283 		rv |= iic_exec(sc->sc_tag, I2C_OP_WRITE_WITH_STOP,
284 		    sc->sc_page0, &dummy, 1, &dummy, 1, 0);
285 	} else {
286 		rv = iic_exec(sc->sc_tag, I2C_OP_READ_WITH_STOP, sc->sc_addr,
287 		    &reg, 1, val, 1, 0);
288 	}
289 
290 	iic_release_bus(sc->sc_tag, 0);
291 
292 	return rv;
293 }
294 
295 MODULE(MODULE_CLASS_DRIVER, spdmem, "iic");
296 
297 #ifdef _MODULE
298 #include "ioconf.c"
299 #endif
300 
301 static int
spdmem_modcmd(modcmd_t cmd,void * opaque)302 spdmem_modcmd(modcmd_t cmd, void *opaque)
303 {
304 	int error = 0;
305 #ifdef _MODULE
306 	static struct sysctllog *spdmem_sysctl_clog;
307 #endif
308 
309 	switch (cmd) {
310 	case MODULE_CMD_INIT:
311 #ifdef _MODULE
312 		error = config_init_component(cfdriver_ioconf_spdmem,
313 		    cfattach_ioconf_spdmem, cfdata_ioconf_spdmem);
314 #endif
315 		return error;
316 	case MODULE_CMD_FINI:
317 #ifdef _MODULE
318 		error = config_fini_component(cfdriver_ioconf_spdmem,
319 		    cfattach_ioconf_spdmem, cfdata_ioconf_spdmem);
320 		sysctl_teardown(&spdmem_sysctl_clog);
321 #endif
322 		return error;
323 	default:
324 		return ENOTTY;
325 	}
326 }
327