sdmmc_cis.c revision 1.9 1 1.9 jmcneill /* $NetBSD: sdmmc_cis.c,v 1.9 2024/10/13 18:21:20 jmcneill Exp $ */
2 1.1 nonaka /* $OpenBSD: sdmmc_cis.c,v 1.1 2006/06/01 21:53:41 uwe Exp $ */
3 1.1 nonaka
4 1.1 nonaka /*
5 1.1 nonaka * Copyright (c) 2006 Uwe Stuehler <uwe (at) openbsd.org>
6 1.1 nonaka *
7 1.1 nonaka * Permission to use, copy, modify, and distribute this software for any
8 1.1 nonaka * purpose with or without fee is hereby granted, provided that the above
9 1.1 nonaka * copyright notice and this permission notice appear in all copies.
10 1.1 nonaka *
11 1.1 nonaka * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
12 1.1 nonaka * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
13 1.1 nonaka * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
14 1.1 nonaka * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
15 1.1 nonaka * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
16 1.1 nonaka * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
17 1.1 nonaka * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
18 1.1 nonaka */
19 1.1 nonaka
20 1.1 nonaka /* Routines to decode the Card Information Structure of SD I/O cards */
21 1.1 nonaka
22 1.1 nonaka #include <sys/cdefs.h>
23 1.9 jmcneill __KERNEL_RCSID(0, "$NetBSD: sdmmc_cis.c,v 1.9 2024/10/13 18:21:20 jmcneill Exp $");
24 1.4 matt
25 1.4 matt #ifdef _KERNEL_OPT
26 1.4 matt #include "opt_sdmmc.h"
27 1.4 matt #endif
28 1.1 nonaka
29 1.1 nonaka #include <sys/param.h>
30 1.1 nonaka #include <sys/systm.h>
31 1.1 nonaka
32 1.1 nonaka #include <dev/sdmmc/sdmmc_ioreg.h>
33 1.1 nonaka #include <dev/sdmmc/sdmmcdevs.h>
34 1.1 nonaka #include <dev/sdmmc/sdmmcvar.h>
35 1.1 nonaka
36 1.2 kiyohara #include <dev/pcmcia/pcmciareg.h>
37 1.2 kiyohara
38 1.2 kiyohara #ifdef SDMMCCISDEBUG
39 1.1 nonaka #define DPRINTF(s) printf s
40 1.1 nonaka #else
41 1.1 nonaka #define DPRINTF(s) /**/
42 1.1 nonaka #endif
43 1.1 nonaka
44 1.1 nonaka static uint32_t sdmmc_cisptr(struct sdmmc_function *);
45 1.2 kiyohara static void decode_funce_common(struct sdmmc_function *, struct sdmmc_cis *,
46 1.2 kiyohara int, uint32_t);
47 1.2 kiyohara static void decode_funce_function(struct sdmmc_function *, struct sdmmc_cis *,
48 1.2 kiyohara int, uint32_t);
49 1.2 kiyohara static void decode_vers_1(struct sdmmc_function *, struct sdmmc_cis *, int,
50 1.2 kiyohara uint32_t);
51 1.2 kiyohara
52 1.1 nonaka static uint32_t
53 1.1 nonaka sdmmc_cisptr(struct sdmmc_function *sf)
54 1.1 nonaka {
55 1.1 nonaka uint32_t cisptr = 0;
56 1.1 nonaka
57 1.2 kiyohara /* CIS pointer stored in little-endian format. */
58 1.2 kiyohara if (sf->number == 0) {
59 1.2 kiyohara cisptr |= sdmmc_io_read_1(sf, SD_IO_CCCR_CISPTR + 0) << 0;
60 1.2 kiyohara cisptr |= sdmmc_io_read_1(sf, SD_IO_CCCR_CISPTR + 1) << 8;
61 1.2 kiyohara cisptr |= sdmmc_io_read_1(sf, SD_IO_CCCR_CISPTR + 2) << 16;
62 1.2 kiyohara } else {
63 1.2 kiyohara struct sdmmc_function *sf0 = sf->sc->sc_fn0;
64 1.2 kiyohara int num = sf->number;
65 1.2 kiyohara
66 1.2 kiyohara cisptr |= sdmmc_io_read_1(sf0, SD_IO_FBR(num) + 9) << 0;
67 1.2 kiyohara cisptr |= sdmmc_io_read_1(sf0, SD_IO_FBR(num) + 10) << 8;
68 1.2 kiyohara cisptr |= sdmmc_io_read_1(sf0, SD_IO_FBR(num) + 11) << 16;
69 1.2 kiyohara }
70 1.1 nonaka return cisptr;
71 1.1 nonaka }
72 1.1 nonaka
73 1.2 kiyohara static void
74 1.2 kiyohara decode_funce_common(struct sdmmc_function *sf, struct sdmmc_cis *cis,
75 1.2 kiyohara int tpllen, uint32_t reg)
76 1.2 kiyohara {
77 1.3 kiyohara static const int speed_val[] =
78 1.2 kiyohara { 0, 10, 12, 13, 15, 20, 25, 30, 35, 40, 45, 50, 55, 60, 70, 80 };
79 1.3 kiyohara static const int speed_unit[] = { 10, 100, 1000, 10000, };
80 1.2 kiyohara struct sdmmc_function *sf0 = sf->sc->sc_fn0;
81 1.2 kiyohara device_t dev = sf->sc->sc_dev;
82 1.2 kiyohara int fn0_blk_size, max_tran_speed;
83 1.2 kiyohara
84 1.2 kiyohara if (sf->number != 0) {
85 1.2 kiyohara aprint_error_dev(dev,
86 1.2 kiyohara "CISTPL_FUNCE(common) found in function\n");
87 1.2 kiyohara return;
88 1.2 kiyohara }
89 1.2 kiyohara if (tpllen < 4) {
90 1.2 kiyohara aprint_error_dev(dev, "CISTPL_FUNCE(common) too short\n");
91 1.2 kiyohara return;
92 1.2 kiyohara }
93 1.2 kiyohara
94 1.2 kiyohara fn0_blk_size = sdmmc_io_read_1(sf0, reg++);
95 1.2 kiyohara fn0_blk_size |= sdmmc_io_read_1(sf0, reg++) << 8;
96 1.2 kiyohara max_tran_speed = sdmmc_io_read_1(sf0, reg++);
97 1.2 kiyohara sf->csd.tran_speed =
98 1.2 kiyohara speed_val[max_tran_speed >> 3] * speed_unit[max_tran_speed & 7];
99 1.2 kiyohara
100 1.2 kiyohara DPRINTF(
101 1.2 kiyohara ("CISTPL_FUNCE: FN0_BLK_SIZE=0x%x, MAX_TRAN_SPEED=0x%x(%dkHz)\n",
102 1.2 kiyohara fn0_blk_size, max_tran_speed, sf->csd.tran_speed));
103 1.2 kiyohara }
104 1.2 kiyohara
105 1.2 kiyohara static void
106 1.9 jmcneill decode_funce_lan_nid(struct sdmmc_function *sf, struct sdmmc_cis *cis,
107 1.9 jmcneill int tpllen, uint32_t reg)
108 1.9 jmcneill {
109 1.9 jmcneill struct sdmmc_function *sf0 = sf->sc->sc_fn0;
110 1.9 jmcneill device_t dev = sf->sc->sc_dev;
111 1.9 jmcneill uint8_t mac[6] __unused;
112 1.9 jmcneill int i;
113 1.9 jmcneill
114 1.9 jmcneill if (tpllen != 8) {
115 1.9 jmcneill aprint_error_dev(dev,
116 1.9 jmcneill "CISTPL_FUNCE(lan_nid) too short\n");
117 1.9 jmcneill return;
118 1.9 jmcneill }
119 1.9 jmcneill
120 1.9 jmcneill for (i = 0; i < 6; i++) {
121 1.9 jmcneill mac[i] = sdmmc_io_read_1(sf0, reg++);
122 1.9 jmcneill }
123 1.9 jmcneill
124 1.9 jmcneill DPRINTF(
125 1.9 jmcneill ("CISTPL_FUNCE: LAN_NID=%02x:%02x:%02x:%02x:%02x:%02x\n",
126 1.9 jmcneill mac[0], mac[1], mac[2], mac[3], mac[4], mac[5]));
127 1.9 jmcneill }
128 1.9 jmcneill
129 1.9 jmcneill static void
130 1.2 kiyohara decode_funce_function(struct sdmmc_function *sf, struct sdmmc_cis *cis,
131 1.2 kiyohara int tpllen, uint32_t reg)
132 1.2 kiyohara {
133 1.2 kiyohara struct sdmmc_function *sf0 = sf->sc->sc_fn0;
134 1.2 kiyohara device_t dev = sf->sc->sc_dev;
135 1.2 kiyohara int sdiox_cccrx, sdiox, max_blk_size;
136 1.2 kiyohara
137 1.2 kiyohara sdiox_cccrx = sdmmc_io_read_1(sf0, SD_IO_CCCR_CCCR_SDIO_REV);
138 1.2 kiyohara sdiox = SD_IO_CCCR_SDIO_REV(sdiox_cccrx);
139 1.2 kiyohara
140 1.2 kiyohara if (sf->number == 0) {
141 1.2 kiyohara aprint_error_dev(dev,
142 1.2 kiyohara "CISTPL_FUNCE(function) found in common\n");
143 1.2 kiyohara return;
144 1.2 kiyohara }
145 1.2 kiyohara if (sdiox == CCCR_SDIO_REV_1_00 && tpllen < 0x1c) {
146 1.2 kiyohara aprint_error_dev(dev,
147 1.2 kiyohara "CISTPL_FUNCE(function) too short (v1.00)\n");
148 1.2 kiyohara return;
149 1.2 kiyohara } else if (sdiox != CCCR_SDIO_REV_1_00 && tpllen < 0x2a) {
150 1.2 kiyohara aprint_error_dev(dev, "CISTPL_FUNCE(function) too short\n");
151 1.2 kiyohara return;
152 1.2 kiyohara }
153 1.2 kiyohara
154 1.2 kiyohara max_blk_size = sdmmc_io_read_1(sf0, reg + 11);
155 1.2 kiyohara max_blk_size |= sdmmc_io_read_1(sf0, reg + 12) << 8;
156 1.2 kiyohara
157 1.2 kiyohara DPRINTF(("CISTPL_FUNCE: MAX_BLK_SIZE=0x%x\n", max_blk_size));
158 1.2 kiyohara }
159 1.2 kiyohara
160 1.2 kiyohara static void
161 1.2 kiyohara decode_vers_1(struct sdmmc_function *sf, struct sdmmc_cis *cis, int tpllen,
162 1.2 kiyohara uint32_t reg)
163 1.2 kiyohara {
164 1.2 kiyohara struct sdmmc_function *sf0 = sf->sc->sc_fn0;
165 1.2 kiyohara device_t dev = sf->sc->sc_dev;
166 1.2 kiyohara int start, ch, count, i;
167 1.2 kiyohara
168 1.2 kiyohara if (tpllen < 2) {
169 1.2 kiyohara aprint_error_dev(dev, "CISTPL_VERS_1 too short\n");
170 1.2 kiyohara return;
171 1.2 kiyohara }
172 1.2 kiyohara
173 1.2 kiyohara cis->cis1_major = sdmmc_io_read_1(sf0, reg++);
174 1.2 kiyohara cis->cis1_minor = sdmmc_io_read_1(sf0, reg++);
175 1.2 kiyohara
176 1.2 kiyohara for (count = 0, start = 0, i = 0; (count < 4) && ((i + 4) < 256); i++) {
177 1.2 kiyohara ch = sdmmc_io_read_1(sf0, reg + i);
178 1.2 kiyohara if (ch == 0xff)
179 1.2 kiyohara break;
180 1.2 kiyohara cis->cis1_info_buf[i] = ch;
181 1.2 kiyohara if (ch == 0) {
182 1.2 kiyohara cis->cis1_info[count] = cis->cis1_info_buf + start;
183 1.2 kiyohara start = i + 1;
184 1.2 kiyohara count++;
185 1.2 kiyohara }
186 1.2 kiyohara }
187 1.2 kiyohara
188 1.2 kiyohara DPRINTF(("CISTPL_VERS_1\n"));
189 1.2 kiyohara }
190 1.2 kiyohara
191 1.1 nonaka int
192 1.1 nonaka sdmmc_read_cis(struct sdmmc_function *sf, struct sdmmc_cis *cis)
193 1.1 nonaka {
194 1.2 kiyohara struct sdmmc_function *sf0 = sf->sc->sc_fn0;
195 1.1 nonaka device_t dev = sf->sc->sc_dev;
196 1.1 nonaka uint32_t reg;
197 1.2 kiyohara uint8_t tplcode, tpllen;
198 1.1 nonaka
199 1.1 nonaka memset(cis, 0, sizeof *cis);
200 1.1 nonaka
201 1.1 nonaka reg = sdmmc_cisptr(sf);
202 1.1 nonaka if (reg < SD_IO_CIS_START ||
203 1.1 nonaka reg >= (SD_IO_CIS_START + SD_IO_CIS_SIZE - 16)) {
204 1.1 nonaka aprint_error_dev(dev, "bad CIS ptr %#x\n", reg);
205 1.1 nonaka return 1;
206 1.1 nonaka }
207 1.1 nonaka
208 1.1 nonaka for (;;) {
209 1.2 kiyohara tplcode = sdmmc_io_read_1(sf0, reg++);
210 1.2 kiyohara
211 1.2 kiyohara if (tplcode == PCMCIA_CISTPL_NULL) {
212 1.2 kiyohara DPRINTF((" 00\nCISTPL_NONE\n"));
213 1.2 kiyohara continue;
214 1.2 kiyohara }
215 1.1 nonaka
216 1.2 kiyohara tpllen = sdmmc_io_read_1(sf0, reg++);
217 1.2 kiyohara if (tplcode == PCMCIA_CISTPL_END || tpllen == 0) {
218 1.1 nonaka if (tplcode != 0xff)
219 1.1 nonaka aprint_error_dev(dev, "CIS parse error at %d, "
220 1.1 nonaka "tuple code %#x, length %d\n",
221 1.1 nonaka reg, tplcode, tpllen);
222 1.2 kiyohara else {
223 1.2 kiyohara DPRINTF((" ff\nCISTPL_END\n"));
224 1.2 kiyohara }
225 1.1 nonaka break;
226 1.1 nonaka }
227 1.1 nonaka
228 1.2 kiyohara #ifdef SDMMCCISDEBUG
229 1.8 mlelstv {
230 1.2 kiyohara int i;
231 1.2 kiyohara
232 1.2 kiyohara /* print the tuple */
233 1.2 kiyohara DPRINTF((" %02x %02x", tplcode, tpllen));
234 1.2 kiyohara
235 1.2 kiyohara for (i = 0; i < tpllen; i++) {
236 1.2 kiyohara DPRINTF((" %02x",
237 1.2 kiyohara sdmmc_io_read_1(sf0, reg + i)));
238 1.2 kiyohara if ((i % 16) == 13)
239 1.2 kiyohara DPRINTF(("\n"));
240 1.2 kiyohara }
241 1.2 kiyohara if ((i % 16) != 14)
242 1.2 kiyohara DPRINTF(("\n"));
243 1.2 kiyohara }
244 1.2 kiyohara #endif
245 1.2 kiyohara
246 1.1 nonaka switch (tplcode) {
247 1.2 kiyohara case PCMCIA_CISTPL_FUNCE:
248 1.9 jmcneill switch (sdmmc_io_read_1(sf0, reg++)) {
249 1.9 jmcneill case 0:
250 1.2 kiyohara decode_funce_common(sf, cis, tpllen, reg);
251 1.9 jmcneill break;
252 1.9 jmcneill case PCMCIA_TPLFE_TYPE_LAN_NID:
253 1.9 jmcneill decode_funce_lan_nid(sf, cis, tpllen, reg);
254 1.9 jmcneill break;
255 1.9 jmcneill default:
256 1.2 kiyohara decode_funce_function(sf, cis, tpllen, reg);
257 1.9 jmcneill }
258 1.2 kiyohara reg += (tpllen - 1);
259 1.2 kiyohara break;
260 1.2 kiyohara
261 1.2 kiyohara case PCMCIA_CISTPL_FUNCID:
262 1.1 nonaka if (tpllen < 2) {
263 1.1 nonaka aprint_error_dev(dev,
264 1.1 nonaka "bad CISTPL_FUNCID length\n");
265 1.1 nonaka reg += tpllen;
266 1.1 nonaka break;
267 1.1 nonaka }
268 1.2 kiyohara cis->function = sdmmc_io_read_1(sf0, reg);
269 1.2 kiyohara DPRINTF(("CISTPL_FUNCID\n"));
270 1.1 nonaka reg += tpllen;
271 1.1 nonaka break;
272 1.1 nonaka
273 1.2 kiyohara case PCMCIA_CISTPL_MANFID:
274 1.1 nonaka if (tpllen < 4) {
275 1.1 nonaka aprint_error_dev(dev,
276 1.1 nonaka "bad CISTPL_MANFID length\n");
277 1.1 nonaka reg += tpllen;
278 1.1 nonaka break;
279 1.1 nonaka }
280 1.2 kiyohara cis->manufacturer = sdmmc_io_read_1(sf0, reg++);
281 1.2 kiyohara cis->manufacturer |= sdmmc_io_read_1(sf0, reg++) << 8;
282 1.2 kiyohara cis->product = sdmmc_io_read_1(sf0, reg++);
283 1.2 kiyohara cis->product |= sdmmc_io_read_1(sf0, reg++) << 8;
284 1.2 kiyohara DPRINTF(("CISTPL_MANFID\n"));
285 1.1 nonaka break;
286 1.1 nonaka
287 1.2 kiyohara case PCMCIA_CISTPL_VERS_1:
288 1.2 kiyohara decode_vers_1(sf, cis, tpllen, reg);
289 1.2 kiyohara reg += tpllen;
290 1.1 nonaka break;
291 1.1 nonaka
292 1.6 mlelstv case PCMCIA_CISTPL_SDIO:
293 1.6 mlelstv aprint_normal_dev(dev, "SDIO function\n");
294 1.6 mlelstv reg += tpllen;
295 1.6 mlelstv break;
296 1.6 mlelstv
297 1.1 nonaka default:
298 1.5 jmcneill /*
299 1.5 jmcneill * Tuple codes between 80h-8Fh are vendor unique.
300 1.5 jmcneill * Print a warning about all other codes.
301 1.5 jmcneill */
302 1.5 jmcneill if ((tplcode & 0xf0) != 0x80)
303 1.5 jmcneill aprint_error_dev(dev,
304 1.5 jmcneill "unknown tuple code %#x, length %d\n",
305 1.5 jmcneill tplcode, tpllen);
306 1.1 nonaka reg += tpllen;
307 1.1 nonaka break;
308 1.1 nonaka }
309 1.1 nonaka }
310 1.1 nonaka
311 1.1 nonaka return 0;
312 1.1 nonaka }
313 1.1 nonaka
314 1.1 nonaka void
315 1.1 nonaka sdmmc_print_cis(struct sdmmc_function *sf)
316 1.1 nonaka {
317 1.1 nonaka device_t dev = sf->sc->sc_dev;
318 1.1 nonaka struct sdmmc_cis *cis = &sf->cis;
319 1.1 nonaka int i;
320 1.1 nonaka
321 1.1 nonaka printf("%s: CIS version %u.%u\n", device_xname(dev), cis->cis1_major,
322 1.1 nonaka cis->cis1_minor);
323 1.1 nonaka
324 1.1 nonaka printf("%s: CIS info: ", device_xname(dev));
325 1.1 nonaka for (i = 0; i < 4; i++) {
326 1.1 nonaka if (cis->cis1_info[i] == NULL)
327 1.1 nonaka break;
328 1.1 nonaka if (i != 0)
329 1.1 nonaka aprint_verbose(", ");
330 1.1 nonaka printf("%s", cis->cis1_info[i]);
331 1.1 nonaka }
332 1.1 nonaka printf("\n");
333 1.1 nonaka
334 1.1 nonaka printf("%s: Manufacturer code 0x%x, product 0x%x\n", device_xname(dev),
335 1.1 nonaka cis->manufacturer, cis->product);
336 1.1 nonaka
337 1.1 nonaka printf("%s: function %d: ", device_xname(dev), sf->number);
338 1.1 nonaka printf("\n");
339 1.1 nonaka }
340 1.1 nonaka
341 1.1 nonaka void
342 1.1 nonaka sdmmc_check_cis_quirks(struct sdmmc_function *sf)
343 1.1 nonaka {
344 1.1 nonaka char *p;
345 1.1 nonaka int i;
346 1.1 nonaka
347 1.1 nonaka if (sf->cis.manufacturer == SDMMC_VENDOR_SPECTEC &&
348 1.1 nonaka sf->cis.product == SDMMC_PRODUCT_SPECTEC_SDW820) {
349 1.1 nonaka /* This card lacks the VERS_1 tuple. */
350 1.8 mlelstv static const char cis1_info[] =
351 1.1 nonaka "Spectec\0SDIO WLAN Card\0SDW-820\0\0";
352 1.1 nonaka
353 1.1 nonaka sf->cis.cis1_major = 0x01;
354 1.1 nonaka sf->cis.cis1_minor = 0x00;
355 1.1 nonaka
356 1.1 nonaka p = sf->cis.cis1_info_buf;
357 1.1 nonaka strlcpy(p, cis1_info, sizeof(sf->cis.cis1_info_buf));
358 1.1 nonaka for (i = 0; i < 4; i++) {
359 1.1 nonaka sf->cis.cis1_info[i] = p;
360 1.1 nonaka p += strlen(p) + 1;
361 1.1 nonaka }
362 1.1 nonaka }
363 1.1 nonaka }
364