sdhc_pci.c revision 1.9.2.3 1 /* $NetBSD: sdhc_pci.c,v 1.9.2.3 2017/12/03 11:37:29 jdolecek Exp $ */
2 /* $OpenBSD: sdhc_pci.c,v 1.7 2007/10/30 18:13:45 chl Exp $ */
3
4 /*
5 * Copyright (c) 2006 Uwe Stuehler <uwe (at) openbsd.org>
6 *
7 * Permission to use, copy, modify, and distribute this software for any
8 * purpose with or without fee is hereby granted, provided that the above
9 * copyright notice and this permission notice appear in all copies.
10 *
11 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
12 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
13 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
14 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
15 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
16 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
17 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
18 */
19
20 #include <sys/cdefs.h>
21 __KERNEL_RCSID(0, "$NetBSD: sdhc_pci.c,v 1.9.2.3 2017/12/03 11:37:29 jdolecek Exp $");
22
23 #ifdef _KERNEL_OPT
24 #include "opt_sdmmc.h"
25 #endif
26
27 #include <sys/param.h>
28 #include <sys/device.h>
29 #include <sys/systm.h>
30 #include <sys/malloc.h>
31 #include <sys/pmf.h>
32
33 #include <dev/pci/pcivar.h>
34 #include <dev/pci/pcidevs.h>
35
36 #include <dev/sdmmc/sdhcreg.h>
37 #include <dev/sdmmc/sdhcvar.h>
38 #include <dev/sdmmc/sdmmcvar.h>
39
40 /* PCI base address registers */
41 #define SDHC_PCI_BAR_START PCI_MAPREG_START
42 #define SDHC_PCI_BAR_END PCI_MAPREG_END
43
44 /* PCI interface classes */
45 #define SDHC_PCI_INTERFACE_NO_DMA 0x00
46 #define SDHC_PCI_INTERFACE_DMA 0x01
47 #define SDHC_PCI_INTERFACE_VENDOR 0x02
48
49 /*
50 * 8-bit PCI configuration register that tells us how many slots there
51 * are and which BAR entry corresponds to the first slot.
52 */
53 #define SDHC_PCI_CONF_SLOT_INFO 0x40
54 #define SDHC_PCI_NUM_SLOTS(info) ((((info) >> 4) & 0x7) + 1)
55 #define SDHC_PCI_FIRST_BAR(info) ((info) & 0x7)
56
57 struct sdhc_pci_softc {
58 struct sdhc_softc sc;
59 pci_chipset_tag_t sc_pc;
60 void *sc_ih;
61 };
62
63 static int sdhc_pci_match(device_t, cfdata_t, void *);
64 static void sdhc_pci_attach(device_t, device_t, void *);
65 static int sdhc_pci_detach(device_t, int);
66
67 CFATTACH_DECL_NEW(sdhc_pci, sizeof(struct sdhc_pci_softc),
68 sdhc_pci_match, sdhc_pci_attach, sdhc_pci_detach, NULL);
69
70 #ifdef SDHC_DEBUG
71 #define DPRINTF(s) printf s
72 #else
73 #define DPRINTF(s) /**/
74 #endif
75
76 static const struct sdhc_pci_quirk {
77 pci_vendor_id_t vendor;
78 pci_product_id_t product;
79 pci_vendor_id_t subvendor;
80 pci_product_id_t subproduct;
81 u_int function;
82
83 uint32_t flags;
84 #define SDHC_PCI_QUIRK_FORCE_DMA __BIT(0)
85 #define SDHC_PCI_QUIRK_TI_HACK __BIT(1)
86 #define SDHC_PCI_QUIRK_NO_PWR0 __BIT(2)
87 #define SDHC_PCI_QUIRK_RICOH_LOWER_FREQ_HACK __BIT(3)
88 #define SDHC_PCI_QUIRK_RICOH_SLOW_SDR50_HACK __BIT(4)
89 #define SDHC_PCI_QUIRK_INTEL_EMMC_HW_RESET __BIT(5)
90 } sdhc_pci_quirk_table[] = {
91 {
92 PCI_VENDOR_TI,
93 PCI_PRODUCT_TI_PCI72111SD,
94 0xffff,
95 0xffff,
96 4,
97 SDHC_PCI_QUIRK_TI_HACK
98 },
99
100 {
101 PCI_VENDOR_TI,
102 PCI_PRODUCT_TI_PCIXX12SD,
103 0xffff,
104 0xffff,
105 3,
106 SDHC_PCI_QUIRK_TI_HACK
107 },
108
109 {
110 PCI_VENDOR_ENE,
111 PCI_PRODUCT_ENE_CB712,
112 0xffff,
113 0xffff,
114 0,
115 SDHC_PCI_QUIRK_NO_PWR0
116 },
117 {
118 PCI_VENDOR_RICOH,
119 PCI_PRODUCT_RICOH_Rx5U823,
120 0xffff,
121 0xffff,
122 0,
123 SDHC_PCI_QUIRK_RICOH_SLOW_SDR50_HACK
124 },
125 {
126 PCI_VENDOR_RICOH,
127 PCI_PRODUCT_RICOH_Rx5C822,
128 0xffff,
129 0xffff,
130 ~0,
131 SDHC_PCI_QUIRK_FORCE_DMA
132 },
133
134 {
135 PCI_VENDOR_RICOH,
136 PCI_PRODUCT_RICOH_Rx5U822,
137 0xffff,
138 0xffff,
139 ~0,
140 SDHC_PCI_QUIRK_FORCE_DMA
141 },
142
143 {
144 PCI_VENDOR_INTEL,
145 PCI_PRODUCT_INTEL_BAYTRAIL_SCC_MMC,
146 0xffff,
147 0xffff,
148 ~0,
149 SDHC_PCI_QUIRK_INTEL_EMMC_HW_RESET
150 },
151
152 {
153 PCI_VENDOR_INTEL,
154 PCI_PRODUCT_INTEL_BSW_SSC_MMC,
155 0xffff,
156 0xffff,
157 ~0,
158 SDHC_PCI_QUIRK_INTEL_EMMC_HW_RESET
159 },
160
161 {
162 PCI_VENDOR_INTEL,
163 PCI_PRODUCT_INTEL_100SERIES_LP_EMMC,
164 0xffff,
165 0xffff,
166 ~0,
167 SDHC_PCI_QUIRK_INTEL_EMMC_HW_RESET
168 },
169 };
170
171 static void sdhc_pci_quirk_ti_hack(struct pci_attach_args *);
172 static void sdhc_pci_quirk_ricoh_lower_freq_hack(struct pci_attach_args *);
173 static void sdhc_pci_intel_emmc_hw_reset(struct sdhc_softc *,
174 struct sdhc_host *);
175
176 static uint32_t
177 sdhc_pci_lookup_quirk_flags(struct pci_attach_args *pa)
178 {
179 const struct sdhc_pci_quirk *q;
180 pcireg_t id;
181 pci_vendor_id_t vendor;
182 pci_product_id_t product;
183 int i;
184
185 for (i = 0; i < __arraycount(sdhc_pci_quirk_table); i++) {
186 q = &sdhc_pci_quirk_table[i];
187
188 if ((PCI_VENDOR(pa->pa_id) == q->vendor)
189 && (PCI_PRODUCT(pa->pa_id) == q->product)) {
190 if ((q->function != ~0)
191 && (pa->pa_function != q->function))
192 continue;
193
194 if ((q->subvendor == 0xffff)
195 && (q->subproduct == 0xffff))
196 return (q->flags);
197
198 id = pci_conf_read(pa->pa_pc, pa->pa_tag,
199 PCI_SUBSYS_ID_REG);
200 vendor = PCI_VENDOR(id);
201 product = PCI_PRODUCT(id);
202
203 if ((q->subvendor != 0xffff)
204 && (q->subproduct != 0xffff)) {
205 if ((vendor == q->subvendor)
206 && (product == q->subproduct))
207 return (q->flags);
208 } else if (q->subvendor != 0xffff) {
209 if (product == q->subproduct)
210 return (q->flags);
211 } else {
212 if (vendor == q->subvendor)
213 return (q->flags);
214 }
215 }
216 }
217 return (0);
218 }
219
220 static int
221 sdhc_pci_match(device_t parent, cfdata_t cf, void *aux)
222 {
223 struct pci_attach_args *pa = aux;
224
225 if (PCI_CLASS(pa->pa_class) == PCI_CLASS_SYSTEM &&
226 PCI_SUBCLASS(pa->pa_class) == PCI_SUBCLASS_SYSTEM_SDHC)
227 return (1);
228 if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_RICOH &&
229 (PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_RICOH_Rx5U822 ||
230 PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_RICOH_Rx5U823))
231 return (1);
232 return (0);
233 }
234
235 static void
236 sdhc_pci_attach(device_t parent, device_t self, void *aux)
237 {
238 struct sdhc_pci_softc *sc = device_private(self);
239 struct pci_attach_args *pa = (struct pci_attach_args *)aux;
240 pci_chipset_tag_t pc = pa->pa_pc;
241 pcitag_t tag = pa->pa_tag;
242 pci_intr_handle_t ih;
243 pcireg_t csr;
244 pcireg_t slotinfo;
245 char const *intrstr;
246 int nslots;
247 int reg;
248 int cnt;
249 bus_space_tag_t iot;
250 bus_space_handle_t ioh;
251 bus_size_t size;
252 uint32_t flags;
253 char intrbuf[PCI_INTRSTR_LEN];
254
255 sc->sc.sc_dev = self;
256 sc->sc.sc_dmat = pa->pa_dmat;
257 sc->sc.sc_host = NULL;
258
259 sc->sc_pc = pc;
260
261 pci_aprint_devinfo(pa, NULL);
262
263 /* Some controllers needs special treatment. */
264 flags = sdhc_pci_lookup_quirk_flags(pa);
265 if (ISSET(flags, SDHC_PCI_QUIRK_TI_HACK))
266 sdhc_pci_quirk_ti_hack(pa);
267 if (ISSET(flags, SDHC_PCI_QUIRK_FORCE_DMA))
268 SET(sc->sc.sc_flags, SDHC_FLAG_FORCE_DMA);
269 if (ISSET(flags, SDHC_PCI_QUIRK_NO_PWR0))
270 SET(sc->sc.sc_flags, SDHC_FLAG_NO_PWR0);
271 if (ISSET(flags, SDHC_PCI_QUIRK_RICOH_LOWER_FREQ_HACK))
272 sdhc_pci_quirk_ricoh_lower_freq_hack(pa);
273 if (ISSET(flags, SDHC_PCI_QUIRK_RICOH_SLOW_SDR50_HACK))
274 SET(sc->sc.sc_flags, SDHC_FLAG_SLOW_SDR50);
275 if (ISSET(flags, SDHC_PCI_QUIRK_INTEL_EMMC_HW_RESET))
276 sc->sc.sc_vendor_hw_reset = sdhc_pci_intel_emmc_hw_reset;
277
278 /*
279 * Map and attach all hosts supported by the host controller.
280 */
281 slotinfo = pci_conf_read(pc, tag, SDHC_PCI_CONF_SLOT_INFO);
282 nslots = SDHC_PCI_NUM_SLOTS(slotinfo);
283
284 /* Allocate an array big enough to hold all the possible hosts */
285 sc->sc.sc_host = malloc(sizeof(struct sdhc_host *) * nslots,
286 M_DEVBUF, M_NOWAIT | M_ZERO);
287 if (sc->sc.sc_host == NULL) {
288 aprint_error_dev(self, "couldn't alloc memory\n");
289 goto err;
290 }
291
292 /* Enable the device. */
293 csr = pci_conf_read(pc, tag, PCI_COMMAND_STATUS_REG);
294 pci_conf_write(pc, tag, PCI_COMMAND_STATUS_REG,
295 csr | PCI_COMMAND_MASTER_ENABLE);
296
297 /* Map and establish the interrupt. */
298 if (pci_intr_map(pa, &ih)) {
299 aprint_error_dev(self, "couldn't map interrupt\n");
300 goto err;
301 }
302
303 intrstr = pci_intr_string(pc, ih, intrbuf, sizeof(intrbuf));
304 sc->sc_ih = pci_intr_establish_xname(pc, ih, IPL_SDMMC, sdhc_intr,
305 &sc->sc, device_xname(self));
306 if (sc->sc_ih == NULL) {
307 aprint_error_dev(self, "couldn't establish interrupt\n");
308 goto err;
309 }
310 aprint_normal_dev(self, "interrupting at %s\n", intrstr);
311
312 /* Enable use of DMA if supported by the interface. */
313 if ((PCI_INTERFACE(pa->pa_class) == SDHC_PCI_INTERFACE_DMA))
314 SET(sc->sc.sc_flags, SDHC_FLAG_USE_DMA);
315
316 /* XXX: handle 64-bit BARs */
317 cnt = 0;
318 for (reg = SDHC_PCI_BAR_START + SDHC_PCI_FIRST_BAR(slotinfo) *
319 sizeof(uint32_t);
320 reg < SDHC_PCI_BAR_END && nslots > 0;
321 reg += sizeof(uint32_t), nslots--) {
322 if (pci_mapreg_map(pa, reg, PCI_MAPREG_TYPE_MEM, 0,
323 &iot, &ioh, NULL, &size)) {
324 continue;
325 }
326
327 cnt++;
328 if (sdhc_host_found(&sc->sc, iot, ioh, size) != 0) {
329 /* XXX: sc->sc_host leak */
330 aprint_error_dev(self,
331 "couldn't initialize host (0x%x)\n", reg);
332 }
333 }
334 if (cnt == 0) {
335 aprint_error_dev(self, "couldn't map register\n");
336 goto err;
337 }
338
339 if (!pmf_device_register1(self, sdhc_suspend, sdhc_resume,
340 sdhc_shutdown)) {
341 aprint_error_dev(self, "couldn't establish powerhook\n");
342 }
343
344 return;
345
346 err:
347 if (sc->sc.sc_host != NULL) {
348 free(sc->sc.sc_host, M_DEVBUF);
349 sc->sc.sc_host = NULL;
350 }
351 }
352
353 static int
354 sdhc_pci_detach(device_t self, int flags)
355 {
356 struct sdhc_pci_softc * const sc = device_private(self);
357 int rv;
358
359 rv = sdhc_detach(&sc->sc, flags);
360 if (rv)
361 return rv;
362
363 if (sc->sc_ih != NULL) {
364 pci_intr_disestablish(sc->sc_pc, sc->sc_ih);
365 sc->sc_ih = NULL;
366 }
367
368 if (sc->sc.sc_host != NULL) {
369 free(sc->sc.sc_host, M_DEVBUF);
370 sc->sc.sc_host = NULL;
371 }
372
373 return rv;
374 }
375
376 static void
377 sdhc_pci_conf_write(struct pci_attach_args *pa, int reg, uint8_t val)
378 {
379 pcireg_t r;
380
381 r = pci_conf_read(pa->pa_pc, pa->pa_tag, reg & ~0x3);
382 r &= ~(0xff << ((reg & 0x3) * 8));
383 r |= (val << ((reg & 0x3) * 8));
384 pci_conf_write(pa->pa_pc, pa->pa_tag, reg & ~0x3, r);
385 }
386
387 /* TI specific register */
388 #define SDHC_PCI_GENERAL_CTL 0x4c
389 #define MMC_SD_DIS 0x02
390
391 static void
392 sdhc_pci_quirk_ti_hack(struct pci_attach_args *pa)
393 {
394 pci_chipset_tag_t pc = pa->pa_pc;
395 pcitag_t tag;
396 pcireg_t id, reg;
397
398 /* Look at func - 1 for the flash device */
399 tag = pci_make_tag(pc, pa->pa_bus, pa->pa_device, pa->pa_function - 1);
400 id = pci_conf_read(pc, tag, PCI_ID_REG);
401 if (PCI_VENDOR(id) != PCI_VENDOR_TI) {
402 return;
403 }
404 switch (PCI_PRODUCT(id)) {
405 case PCI_PRODUCT_TI_PCI72111FM:
406 case PCI_PRODUCT_TI_PCIXX12FM:
407 break;
408 default:
409 return;
410 }
411
412 /*
413 * Disable MMC/SD on the flash media controller so the
414 * SD host takes over.
415 */
416 reg = pci_conf_read(pc, tag, SDHC_PCI_GENERAL_CTL);
417 reg |= MMC_SD_DIS;
418 pci_conf_write(pc, tag, SDHC_PCI_GENERAL_CTL, reg);
419 }
420
421 /* Ricoh specific register */
422 #define SDHC_PCI_MODE_KEY 0xf9
423 #define SDHC_PCI_MODE 0x150
424 #define SDHC_PCI_MODE_SD20 0x10
425 #define SDHC_PCI_BASE_FREQ_KEY 0xfc
426 #define SDHC_PCI_BASE_FREQ 0xe1
427
428 /* Some RICOH controllers need to be bumped into the right mode. */
429 static void
430 sdhc_pci_quirk_ricoh_lower_freq_hack(struct pci_attach_args *pa)
431 {
432 /* Enable SD2.0 mode. */
433 sdhc_pci_conf_write(pa, SDHC_PCI_MODE_KEY, 0xfc);
434 sdhc_pci_conf_write(pa, SDHC_PCI_MODE, SDHC_PCI_MODE_SD20);
435 sdhc_pci_conf_write(pa, SDHC_PCI_MODE_KEY, 0x00);
436
437 /*
438 * Some SD/MMC cards don't work with the default base
439 * clock frequency of 200MHz. Lower it to 50Hz.
440 */
441 sdhc_pci_conf_write(pa, SDHC_PCI_BASE_FREQ_KEY, 0x01);
442 sdhc_pci_conf_write(pa, SDHC_PCI_BASE_FREQ, 50);
443 sdhc_pci_conf_write(pa, SDHC_PCI_BASE_FREQ_KEY, 0x00);
444 printf("quirked\n");
445 }
446
447 static void
448 sdhc_pci_intel_emmc_hw_reset(struct sdhc_softc *sc, struct sdhc_host *hp)
449 {
450 kmutex_t *plock = sdhc_host_lock(hp);
451 uint8_t reg;
452
453 mutex_enter(plock);
454
455 reg = sdhc_host_read_1(hp, SDHC_POWER_CTL);
456 reg |= 0x10;
457 sdhc_host_write_1(hp, SDHC_POWER_CTL, reg);
458
459 sdmmc_delay(10);
460
461 reg &= ~0x10;
462 sdhc_host_write_1(hp, SDHC_POWER_CTL, reg);
463
464 sdmmc_delay(1000);
465
466 mutex_exit(plock);
467 }
468