1 /* $OpenBSD: sdmmc_cis.c,v 1.3 2009/11/11 21:59:16 jasper Exp $ */
2
3 /*
4 * Copyright (c) 2006 Uwe Stuehler <uwe@openbsd.org>
5 *
6 * Permission to use, copy, modify, and distribute this software for any
7 * purpose with or without fee is hereby granted, provided that the above
8 * copyright notice and this permission notice appear in all copies.
9 *
10 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
11 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
12 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
13 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
14 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
15 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
16 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
17 */
18
19 /* Routines to decode the Card Information Structure of SD I/O cards */
20
21 #include <sys/param.h>
22 #include <sys/device.h>
23 #include <sys/systm.h>
24
25 #include <dev/sdmmc/sdmmc_ioreg.h>
26 #include <dev/sdmmc/sdmmcdevs.h>
27 #include <dev/sdmmc/sdmmcvar.h>
28
29 u_int32_t sdmmc_cisptr(struct sdmmc_function *);
30
31 #ifdef SDMMC_DEBUG
32 #define DPRINTF(s) printf s
33 #else
34 #define DPRINTF(s) /**/
35 #endif
36
37 u_int32_t
sdmmc_cisptr(struct sdmmc_function * sf)38 sdmmc_cisptr(struct sdmmc_function *sf)
39 {
40 u_int32_t cisptr = 0;
41
42 SDMMC_ASSERT_LOCKED(sf->sc);
43
44 /* XXX where is the per-function CIS pointer register? */
45 if (sf->number != 0)
46 return SD_IO_CIS_START;
47
48 /* XXX is the CIS pointer stored in little-endian format? */
49 cisptr |= sdmmc_io_read_1(sf, SD_IO_CCCR_CISPTR+0) << 0;
50 cisptr |= sdmmc_io_read_1(sf, SD_IO_CCCR_CISPTR+1) << 8;
51 cisptr |= sdmmc_io_read_1(sf, SD_IO_CCCR_CISPTR+2) << 16;
52
53 return cisptr;
54 }
55
56 int
sdmmc_read_cis(struct sdmmc_function * sf,struct sdmmc_cis * cis)57 sdmmc_read_cis(struct sdmmc_function *sf, struct sdmmc_cis *cis)
58 {
59 int reg;
60 u_int8_t tplcode;
61 u_int8_t tpllen;
62
63 SDMMC_ASSERT_LOCKED(sf->sc);
64
65 bzero(cis, sizeof *cis);
66
67 /* XXX read per-function CIS */
68 if (sf->number != 0)
69 return 1;
70
71 reg = (int)sdmmc_cisptr(sf);
72 if (reg < SD_IO_CIS_START ||
73 reg >= (SD_IO_CIS_START+SD_IO_CIS_SIZE-16)) {
74 printf("%s: bad CIS ptr %#x\n", SDMMCDEVNAME(sf->sc), reg);
75 return 1;
76 }
77
78 for (;;) {
79 tplcode = sdmmc_io_read_1(sf, reg++);
80 tpllen = sdmmc_io_read_1(sf, reg++);
81
82 if (tplcode == 0xff || tpllen == 0) {
83 if (tplcode != 0xff)
84 printf("%s: CIS parse error at %d, "
85 "tuple code %#x, length %d\n",
86 SDMMCDEVNAME(sf->sc), reg, tplcode, tpllen);
87 break;
88 }
89
90 switch (tplcode) {
91 case SD_IO_CISTPL_FUNCID:
92 if (tpllen < 2) {
93 printf("%s: bad CISTPL_FUNCID length\n",
94 SDMMCDEVNAME(sf->sc));
95 reg += tpllen;
96 break;
97 }
98 cis->function = sdmmc_io_read_1(sf, reg);
99 reg += tpllen;
100 break;
101 case SD_IO_CISTPL_MANFID:
102 if (tpllen < 4) {
103 printf("%s: bad CISTPL_MANFID length\n",
104 SDMMCDEVNAME(sf->sc));
105 reg += tpllen;
106 break;
107 }
108 cis->manufacturer = sdmmc_io_read_1(sf, reg++);
109 cis->manufacturer |= sdmmc_io_read_1(sf, reg++) << 8;
110 cis->product = sdmmc_io_read_1(sf, reg++);
111 cis->product |= sdmmc_io_read_1(sf, reg++) << 8;
112 break;
113 case SD_IO_CISTPL_VERS_1:
114 if (tpllen < 2) {
115 printf("%s: CISTPL_VERS_1 too short\n",
116 SDMMCDEVNAME(sf->sc));
117 reg += tpllen;
118 break;
119 }
120 {
121 int start, i, ch, count;
122
123 cis->cis1_major = sdmmc_io_read_1(sf, reg++);
124 cis->cis1_minor = sdmmc_io_read_1(sf, reg++);
125
126 for (count = 0, start = 0, i = 0;
127 (count < 4) && ((i + 4) < 256); i++) {
128 ch = sdmmc_io_read_1(sf, reg + i);
129 if (ch == 0xff)
130 break;
131 cis->cis1_info_buf[i] = ch;
132 if (ch == 0) {
133 cis->cis1_info[count] =
134 cis->cis1_info_buf + start;
135 start = i + 1;
136 count++;
137 }
138 }
139
140 reg += tpllen - 2;
141 }
142 break;
143 default:
144 DPRINTF(("%s: unknown tuple code %#x, length %d\n",
145 SDMMCDEVNAME(sf->sc), tplcode, tpllen));
146 reg += tpllen;
147 break;
148 }
149 }
150
151 return 0;
152 }
153
154 void
sdmmc_print_cis(struct sdmmc_function * sf)155 sdmmc_print_cis(struct sdmmc_function *sf)
156 {
157 struct sdmmc_cis *cis = &sf->cis;
158 int i;
159
160 printf("%s: CIS version %d.%d\n", SDMMCDEVNAME(sf->sc),
161 cis->cis1_major, cis->cis1_minor);
162
163 printf("%s: CIS info: ", SDMMCDEVNAME(sf->sc));
164 for (i = 0; i < 4; i++) {
165 if (cis->cis1_info[i] == NULL)
166 break;
167 if (i)
168 printf(", ");
169 printf("%s", cis->cis1_info[i]);
170 }
171 printf("\n");
172
173 printf("%s: Manufacturer code 0x%x, product 0x%x\n",
174 SDMMCDEVNAME(sf->sc), cis->manufacturer, cis->product);
175
176 printf("%s: function %d: ", SDMMCDEVNAME(sf->sc), sf->number);
177 switch (sf->cis.function) {
178 case SDMMC_FUNCTION_WLAN:
179 printf("wireless network adapter");
180 break;
181 default:
182 printf("unknown (%d)", sf->cis.function);
183 break;
184 }
185 printf("\n");
186 }
187
188 void
sdmmc_check_cis_quirks(struct sdmmc_function * sf)189 sdmmc_check_cis_quirks(struct sdmmc_function *sf)
190 {
191 if (sf->cis.manufacturer == SDMMC_VENDOR_SPECTEC &&
192 sf->cis.product == SDMMC_PRODUCT_SPECTEC_SDW820) {
193 /* This card lacks the VERS_1 tuple. */
194 sf->cis.cis1_major = 0x01;
195 sf->cis.cis1_minor = 0x00;
196 sf->cis.cis1_info[0] = "Spectec";
197 sf->cis.cis1_info[1] = "SDIO WLAN Card";
198 sf->cis.cis1_info[2] = "SDW-820";
199 sf->cis.cis1_info[3] = "";
200 }
201 }
202