Annotation of sys/dev/ic/tcic2.c, Revision 1.1.1.1
1.1 nbrk 1: /* $OpenBSD: tcic2.c,v 1.7 2005/11/23 11:39:37 mickey Exp $ */
2: /* $NetBSD: tcic2.c,v 1.3 2000/01/13 09:38:17 joda Exp $ */
3:
4: #undef TCICDEBUG
5:
6: /*
7: * Copyright (c) 1998, 1999 Christoph Badura. All rights reserved.
8: * Copyright (c) 1997 Marc Horowitz. 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. All advertising materials mentioning features or use of this software
19: * must display the following acknowledgement:
20: * This product includes software developed by Marc Horowitz.
21: * 4. The name of the author may not be used to endorse or promote products
22: * derived from this software without specific prior written permission.
23: *
24: * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
25: * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
26: * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
27: * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
28: * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
29: * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
30: * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
31: * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
32: * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
33: * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
34: */
35:
36: #include <sys/types.h>
37: #include <sys/param.h>
38: #include <sys/systm.h>
39: #include <sys/device.h>
40: #include <sys/extent.h>
41: #include <sys/malloc.h>
42: #include <sys/kthread.h>
43:
44: #include <uvm/uvm_extern.h>
45:
46: #include <machine/bus.h>
47: #include <machine/intr.h>
48:
49: #include <dev/pcmcia/pcmciareg.h>
50: #include <dev/pcmcia/pcmciavar.h>
51:
52: #include <dev/ic/tcic2reg.h>
53: #include <dev/ic/tcic2var.h>
54:
55: #ifdef TCICDEBUG
56: int tcic_debug = 1;
57: #define DPRINTF(arg) if (tcic_debug) printf arg;
58: #else
59: #define DPRINTF(arg)
60: #endif
61:
62: /*
63: * Individual drivers will allocate their own memory and io regions. Memory
64: * regions must be a multiple of 4k, aligned on a 4k boundary.
65: */
66:
67: #define TCIC_MEM_ALIGN TCIC_MEM_PAGESIZE
68:
69: void tcic_attach_socket(struct tcic_handle *);
70: void tcic_init_socket(struct tcic_handle *);
71:
72: int tcic_submatch(struct device *, void *, void *);
73: int tcic_print(void *arg, const char *pnp);
74: int tcic_intr_socket(struct tcic_handle *);
75:
76: void tcic_attach_card(struct tcic_handle *);
77: void tcic_detach_card(struct tcic_handle *, int);
78: void tcic_deactivate_card(struct tcic_handle *);
79:
80: void tcic_chip_do_mem_map(struct tcic_handle *, int);
81: void tcic_chip_do_io_map(struct tcic_handle *, int);
82:
83: void tcic_create_event_thread(void *);
84: void tcic_event_thread(void *);
85:
86: void tcic_queue_event(struct tcic_handle *, int);
87:
88: struct cfdriver tcic_cd = {
89: NULL, "tcic", DV_DULL
90: };
91:
92: /* Map between irq numbers and internal representation */
93: #if 1
94: int tcic_irqmap[] =
95: { 0, 0, 0, 3, 4, 5, 6, 7, 0, 0, 10, 1, 0, 0, 14, 0 };
96: int tcic_valid_irqs = 0x4cf8;
97: #else
98: int tcic_irqmap[] = /* irqs 9 and 6 switched, some ISA cards */
99: { 0, 0, 0, 3, 4, 5, 0, 7, 0, 6, 10, 1, 0, 0, 14, 0 };
100: int tcic_valid_irqs = 0x4eb8;
101: #endif
102:
103: int tcic_mem_speed = 250; /* memory access time in nanoseconds */
104: int tcic_io_speed = 165; /* io access time in nanoseconds */
105:
106: /*
107: * Check various reserved and otherwise in their value restricted bits.
108: */
109: int
110: tcic_check_reserved_bits(iot, ioh)
111: bus_space_tag_t iot;
112: bus_space_handle_t ioh;
113: {
114: int val, auxreg;
115:
116: DPRINTF(("tcic: chkrsvd 1\n"));
117: /* R_ADDR bit 30:28 have a restricted range. */
118: val = (bus_space_read_2(iot, ioh, TCIC_R_ADDR2) & TCIC_SS_MASK)
119: >> TCIC_SS_SHIFT;
120: if (val > 1)
121: return 0;
122:
123: DPRINTF(("tcic: chkrsvd 2\n"));
124: /* R_SCTRL bits 6,2,1 are reserved. */
125: val = bus_space_read_1(iot, ioh, TCIC_R_SCTRL);
126: if (val & TCIC_SCTRL_RSVD)
127: return 0;
128:
129: DPRINTF(("tcic: chkrsvd 3\n"));
130: /* R_ICSR bit 2 must be same as bit 3. */
131: val = bus_space_read_1(iot, ioh, TCIC_R_ICSR);
132: if (((val >> 1) & 1) != ((val >> 2) & 1))
133: return 0;
134:
135: DPRINTF(("tcic: chkrsvd 4\n"));
136: /* R_IENA bits 7,2 are reserved. */
137: val = bus_space_read_1(iot, ioh, TCIC_R_IENA);
138: if (val & TCIC_IENA_RSVD)
139: return 0;
140:
141: DPRINTF(("tcic: chkrsvd 5\n"));
142: /* Some aux registers have reserved bits. */
143: /* Which are we looking at? */
144: auxreg = bus_space_read_1(iot, ioh, TCIC_R_MODE)
145: & TCIC_AR_MASK;
146: val = bus_space_read_2(iot, ioh, TCIC_R_AUX);
147: DPRINTF(("tcic: auxreg 0x%02x val 0x%04x\n", auxreg, val));
148: switch (auxreg) {
149: case TCIC_AR_SYSCFG:
150: if (INVALID_AR_SYSCFG(val))
151: return 0;
152: break;
153: case TCIC_AR_ILOCK:
154: if (INVALID_AR_ILOCK(val))
155: return 0;
156: break;
157: case TCIC_AR_TEST:
158: if (INVALID_AR_TEST(val))
159: return 0;
160: break;
161: }
162:
163: DPRINTF(("tcic: chkrsvd 6\n"));
164: /* XXX fails if pcmcia bios is enabled. */
165: /* Various bits set or not depending if in RESET mode. */
166: val = bus_space_read_1(iot, ioh, TCIC_R_SCTRL);
167: if (val & TCIC_SCTRL_RESET) {
168: DPRINTF(("tcic: chkrsvd 7\n"));
169: /* Address bits must be 0 */
170: val = bus_space_read_2(iot, ioh, TCIC_R_ADDR);
171: if (val != 0)
172: return 0;
173: val = bus_space_read_2(iot, ioh, TCIC_R_ADDR2);
174: if (val != 0)
175: return 0;
176: DPRINTF(("tcic: chkrsvd 8\n"));
177: /* EDC bits must be 0 */
178: val = bus_space_read_2(iot, ioh, TCIC_R_EDC);
179: if (val != 0)
180: return 0;
181: /* We're OK, so take it out of reset. XXX -chb */
182: bus_space_write_1(iot, ioh, TCIC_R_SCTRL, 0);
183: }
184: else { /* not in RESET mode */
185: int omode;
186: int val1, val2;
187: DPRINTF(("tcic: chkrsvd 9\n"));
188: /* Programming timers must have expired. */
189: val = bus_space_read_1(iot, ioh, TCIC_R_SSTAT);
190: if ((val & (TCIC_SSTAT_6US|TCIC_SSTAT_10US|TCIC_SSTAT_PROGTIME))
191: != (TCIC_SSTAT_6US|TCIC_SSTAT_10US|TCIC_SSTAT_PROGTIME))
192: return 0;
193: DPRINTF(("tcic: chkrsvd 10\n"));
194: /*
195: * EDC bits should change on read from data space
196: * as long as either EDC or the data are nonzero.
197: */
198: if ((bus_space_read_2(iot, ioh, TCIC_R_ADDR2)
199: & TCIC_ADDR2_INDREG) != 0) {
200: val1 = bus_space_read_2(iot, ioh, TCIC_R_EDC);
201: val2 = bus_space_read_2(iot, ioh, TCIC_R_DATA);
202: if (val1 | val2) {
203: val1 = bus_space_read_2(iot, ioh, TCIC_R_EDC);
204: if (val1 == val2)
205: return 0;
206: }
207: }
208: DPRINTF(("tcic: chkrsvd 11\n"));
209: /* XXX what does this check? -chb */
210: omode = bus_space_read_1(iot, ioh, TCIC_R_MODE);
211: val1 = omode ^ TCIC_AR_MASK;
212: bus_space_write_1(iot, ioh, TCIC_R_MODE, val1);
213: val2 = bus_space_read_1(iot, ioh, TCIC_R_MODE);
214: bus_space_write_1(iot, ioh, TCIC_R_MODE, omode);
215: if ( val1 != val2)
216: return 0;
217: }
218: /* All tests passed */
219: return 1;
220: }
221:
222: /*
223: * Read chip ID from AR_ILOCK in test mode.
224: */
225: int
226: tcic_chipid(iot, ioh)
227: bus_space_tag_t iot;
228: bus_space_handle_t ioh;
229: {
230: unsigned id, otest;
231:
232: otest = tcic_read_aux_2(iot, ioh, TCIC_AR_TEST);
233: tcic_write_aux_2(iot, ioh, TCIC_AR_TEST, TCIC_TEST_DIAG);
234: id = tcic_read_aux_2(iot, ioh, TCIC_AR_ILOCK);
235: tcic_write_aux_2(iot, ioh, TCIC_AR_TEST, otest);
236: id &= TCIC_ILOCKTEST_ID_MASK;
237: id >>= TCIC_ILOCKTEST_ID_SHFT;
238:
239: /* clear up IRQs inside tcic. XXX -chb */
240: while (bus_space_read_1(iot, ioh, TCIC_R_ICSR))
241: bus_space_write_1(iot, ioh, TCIC_R_ICSR, TCIC_ICSR_JAM);
242:
243: return id;
244: }
245: /*
246: * Indicate whether the driver can handle the chip.
247: */
248: int
249: tcic_chipid_known(id)
250: int id;
251: {
252: /* XXX only know how to handle DB86082 -chb */
253: switch (id) {
254: case TCIC_CHIPID_DB86082_1:
255: case TCIC_CHIPID_DB86082A:
256: case TCIC_CHIPID_DB86082B_ES:
257: case TCIC_CHIPID_DB86082B:
258: case TCIC_CHIPID_DB86084_1:
259: case TCIC_CHIPID_DB86084A:
260: case TCIC_CHIPID_DB86184_1:
261: case TCIC_CHIPID_DB86072_1_ES:
262: case TCIC_CHIPID_DB86072_1:
263: return 1;
264: }
265:
266: return 0;
267: }
268:
269: char *
270: tcic_chipid_to_string(id)
271: int id;
272: {
273: switch (id) {
274: case TCIC_CHIPID_DB86082_1:
275: return ("Databook DB86082");
276: case TCIC_CHIPID_DB86082A:
277: return ("Databook DB86082A");
278: case TCIC_CHIPID_DB86082B_ES:
279: return ("Databook DB86082B-es");
280: case TCIC_CHIPID_DB86082B:
281: return ("Databook DB86082B");
282: case TCIC_CHIPID_DB86084_1:
283: return ("Databook DB86084");
284: case TCIC_CHIPID_DB86084A:
285: return ("Databook DB86084A");
286: case TCIC_CHIPID_DB86184_1:
287: return ("Databook DB86184");
288: case TCIC_CHIPID_DB86072_1_ES:
289: return ("Databook DB86072-es");
290: case TCIC_CHIPID_DB86072_1:
291: return ("Databook DB86072");
292: }
293:
294: return ("Unknown controller");
295: }
296: /*
297: * Return bitmask of IRQs that the chip can handle.
298: * XXX should be table driven.
299: */
300: int
301: tcic_validirqs(chipid)
302: int chipid;
303: {
304: switch (chipid) {
305: case TCIC_CHIPID_DB86082_1:
306: case TCIC_CHIPID_DB86082A:
307: case TCIC_CHIPID_DB86082B_ES:
308: case TCIC_CHIPID_DB86082B:
309: case TCIC_CHIPID_DB86084_1:
310: case TCIC_CHIPID_DB86084A:
311: case TCIC_CHIPID_DB86184_1:
312: case TCIC_CHIPID_DB86072_1_ES:
313: case TCIC_CHIPID_DB86072_1:
314: return tcic_valid_irqs;
315: }
316: return 0;
317: }
318:
319: void
320: tcic_attach(sc)
321: struct tcic_softc *sc;
322: {
323: int i, reg;
324:
325: /* set more chipset-dependent parameters in the softc. */
326: switch (sc->chipid) {
327: case TCIC_CHIPID_DB86084_1:
328: case TCIC_CHIPID_DB86084A:
329: case TCIC_CHIPID_DB86184_1:
330: sc->pwrena = TCIC_PWR_ENA;
331: break;
332: default:
333: sc->pwrena = 0;
334: break;
335: }
336:
337: /* set up global config registers */
338: reg = TCIC_WAIT_SYNC | TCIC_WAIT_CCLK | TCIC_WAIT_RISING;
339: reg |= (tcic_ns2wscnt(250) & TCIC_WAIT_COUNT_MASK);
340: tcic_write_aux_1(sc->iot, sc->ioh, TCIC_AR_WCTL, TCIC_R_WCTL_WAIT, reg);
341: reg = TCIC_SYSCFG_MPSEL_RI | TCIC_SYSCFG_MCSFULL;
342: tcic_write_aux_2(sc->iot, sc->ioh, TCIC_AR_SYSCFG, reg);
343: reg = tcic_read_aux_2(sc->iot, sc->ioh, TCIC_AR_ILOCK);
344: reg |= TCIC_ILOCK_HOLD_CCLK;
345: tcic_write_aux_2(sc->iot, sc->ioh, TCIC_AR_ILOCK, reg);
346:
347: /* the TCIC has two sockets */
348: /* XXX should i check for actual presence of sockets? -chb */
349: for (i = 0; i < TCIC_NSLOTS; i++) {
350: sc->handle[i].sc = sc;
351: sc->handle[i].sock = i;
352: sc->handle[i].flags = TCIC_FLAG_SOCKETP;
353: sc->handle[i].memwins
354: = sc->chipid == TCIC_CHIPID_DB86082_1 ? 4 : 5;
355: }
356:
357: /* establish the interrupt */
358: reg = tcic_read_1(&sc->handle[0], TCIC_R_IENA);
359: tcic_write_1(&sc->handle[0], TCIC_R_IENA,
360: (reg & ~TCIC_IENA_CFG_MASK) | TCIC_IENA_CFG_HIGH);
361: reg = tcic_read_aux_2(sc->iot, sc->ioh, TCIC_AR_SYSCFG);
362: tcic_write_aux_2(sc->iot, sc->ioh, TCIC_AR_SYSCFG,
363: (reg & ~TCIC_SYSCFG_IRQ_MASK) | tcic_irqmap[sc->irq]);
364:
365: /* XXX block interrupts? */
366:
367: for (i = 0; i < TCIC_NSLOTS; i++) {
368: /* XXX make more clear what happens here -chb */
369: tcic_sel_sock(&sc->handle[i]);
370: tcic_write_ind_2(&sc->handle[i], TCIC_IR_SCF1_N(i), 0);
371: tcic_write_ind_2(&sc->handle[i], TCIC_IR_SCF2_N(i),
372: (TCIC_SCF2_MCD|TCIC_SCF2_MWP|TCIC_SCF2_MRDY
373: #if 1 /* XXX explain byte routing issue */
374: |TCIC_SCF2_MLBAT2|TCIC_SCF2_MLBAT1|TCIC_SCF2_IDBR));
375: #else
376: |TCIC_SCF2_MLBAT2|TCIC_SCF2_MLBAT1));
377: #endif
378: tcic_write_1(&sc->handle[i], TCIC_R_MODE, 0);
379: reg = tcic_read_aux_2(sc->iot, sc->ioh, TCIC_AR_SYSCFG);
380: reg &= ~TCIC_SYSCFG_AUTOBUSY;
381: tcic_write_aux_2(sc->iot, sc->ioh, TCIC_AR_SYSCFG, reg);
382: SIMPLEQ_INIT(&sc->handle[i].events);
383: }
384:
385: if ((sc->handle[0].flags & TCIC_FLAG_SOCKETP) ||
386: (sc->handle[1].flags & TCIC_FLAG_SOCKETP)) {
387: printf("%s: %s has ", sc->dev.dv_xname,
388: tcic_chipid_to_string(sc->chipid));
389:
390: if ((sc->handle[0].flags & TCIC_FLAG_SOCKETP) &&
391: (sc->handle[1].flags & TCIC_FLAG_SOCKETP))
392: printf("sockets A and B\n");
393: else if (sc->handle[0].flags & TCIC_FLAG_SOCKETP)
394: printf("socket A only\n");
395: else
396: printf("socket B only\n");
397:
398: }
399: }
400:
401: void
402: tcic_attach_sockets(sc)
403: struct tcic_softc *sc;
404: {
405: int i;
406:
407: for (i = 0; i < TCIC_NSLOTS; i++)
408: if (sc->handle[i].flags & TCIC_FLAG_SOCKETP)
409: tcic_attach_socket(&sc->handle[i]);
410: }
411:
412: void
413: tcic_attach_socket(h)
414: struct tcic_handle *h;
415: {
416: struct pcmciabus_attach_args paa;
417:
418: /* initialize the rest of the handle */
419:
420: h->shutdown = 0;
421: h->memalloc = 0;
422: h->ioalloc = 0;
423: h->ih_irq = 0;
424:
425: /* now, config one pcmcia device per socket */
426:
427: paa.paa_busname = "pcmcia";
428: paa.pct = (pcmcia_chipset_tag_t) h->sc->pct;
429: paa.pch = (pcmcia_chipset_handle_t) h;
430: paa.iobase = h->sc->iobase;
431: paa.iosize = h->sc->iosize;
432:
433: h->pcmcia = config_found_sm(&h->sc->dev, &paa, tcic_print,
434: tcic_submatch);
435:
436: /* if there's actually a pcmcia device attached, initialize the slot */
437:
438: if (h->pcmcia)
439: tcic_init_socket(h);
440: else
441: h->flags &= ~TCIC_FLAG_SOCKETP;
442: }
443:
444: void
445: tcic_create_event_thread(arg)
446: void *arg;
447: {
448: struct tcic_handle *h = arg;
449: const char *cs;
450:
451: switch (h->sock) {
452: case 0:
453: cs = "0";
454: break;
455: case 1:
456: cs = "1";
457: break;
458: default:
459: panic("tcic_create_event_thread: unknown tcic socket");
460: }
461:
462: if (kthread_create(tcic_event_thread, h, &h->event_thread,
463: "%s,%s", h->sc->dev.dv_xname, cs)) {
464: printf("%s: unable to create event thread for sock 0x%02x\n",
465: h->sc->dev.dv_xname, h->sock);
466: panic("tcic_create_event_thread");
467: }
468: }
469:
470: void
471: tcic_event_thread(arg)
472: void *arg;
473: {
474: struct tcic_handle *h = arg;
475: struct tcic_event *pe;
476: int s;
477:
478: while (h->shutdown == 0) {
479: s = splhigh();
480: if ((pe = SIMPLEQ_FIRST(&h->events)) == NULL) {
481: splx(s);
482: (void) tsleep(&h->events, PWAIT, "tcicev", 0);
483: continue;
484: }
485: SIMPLEQ_REMOVE_HEAD(&h->events, pe_q);
486: splx(s);
487:
488: switch (pe->pe_type) {
489: case TCIC_EVENT_INSERTION:
490: DPRINTF(("%s: insertion event\n", h->sc->dev.dv_xname));
491: tcic_attach_card(h);
492: break;
493:
494: case TCIC_EVENT_REMOVAL:
495: DPRINTF(("%s: removal event\n", h->sc->dev.dv_xname));
496: tcic_detach_card(h, DETACH_FORCE);
497: break;
498:
499: default:
500: panic("tcic_event_thread: unknown event %d",
501: pe->pe_type);
502: }
503: free(pe, M_TEMP);
504: }
505:
506: h->event_thread = NULL;
507:
508: /* In case parent is waiting for us to exit. */
509: wakeup(h->sc);
510:
511: kthread_exit(0);
512: }
513:
514:
515: void
516: tcic_init_socket(h)
517: struct tcic_handle *h;
518: {
519: int reg;
520:
521: /* select this socket's config registers */
522: tcic_sel_sock(h);
523:
524: /* set up the socket to interrupt on card detect */
525: reg = tcic_read_ind_2(h, TCIC_IR_SCF2_N(h->sock));
526: tcic_write_ind_2(h, TCIC_IR_SCF2_N(h->sock), reg & ~TCIC_SCF2_MCD);
527:
528: /* enable CD irq in R_IENA */
529: reg = tcic_read_2(h, TCIC_R_IENA);
530: tcic_write_2(h, TCIC_R_IENA, reg |= TCIC_IENA_CDCHG);
531:
532: /* if there's a card there, then attach it. also save sstat */
533: h->sstat = reg = tcic_read_1(h, TCIC_R_SSTAT) & TCIC_SSTAT_STAT_MASK;
534: if (reg & TCIC_SSTAT_CD)
535: tcic_attach_card(h);
536: }
537:
538: int
539: tcic_submatch(parent, match, aux)
540: struct device *parent;
541: void *match;
542: void *aux;
543: {
544: struct cfdata *cf = match;
545:
546: struct pcmciabus_attach_args *paa = aux;
547: struct tcic_handle *h = (struct tcic_handle *) paa->pch;
548:
549: switch (h->sock) {
550: case 0:
551: if (cf->cf_loc[0 /* PCMCIABUSCF_CONTROLLER */] !=
552: -1 /* PCMCIABUSCF_CONTROLLER_DEFAULT */ &&
553: cf->cf_loc[0 /* PCMCIABUSCF_CONTROLLER */] != 0)
554: return 0;
555: if (cf->cf_loc[1 /* PCMCIABUSCF_SOCKET */] !=
556: -1 /* PCMCIABUSCF_SOCKET_DEFAULT */ &&
557: cf->cf_loc[1 /* PCMCIABUSCF_SOCKET */] != 0)
558: return 0;
559:
560: break;
561: case 1:
562: if (cf->cf_loc[0 /* PCMCIABUSCF_CONTROLLER */] !=
563: -1 /* PCMCIABUSCF_CONTROLLER_DEFAULT */ &&
564: cf->cf_loc[0 /* PCMCIABUSCF_CONTROLLER */] != 0)
565: return 0;
566: if (cf->cf_loc[1 /* PCMCIABUSCF_SOCKET */] !=
567: -1 /* PCMCIABUSCF_SOCKET_DEFAULT */ &&
568: cf->cf_loc[1 /* PCMCIABUSCF_SOCKET */] != 1)
569: return 0;
570:
571: break;
572: default:
573: panic("unknown tcic socket");
574: }
575:
576: return ((*cf->cf_attach->ca_match)(parent, cf, aux));
577: }
578:
579: int
580: tcic_print(arg, pnp)
581: void *arg;
582: const char *pnp;
583: {
584: struct pcmciabus_attach_args *paa = arg;
585: struct tcic_handle *h = (struct tcic_handle *) paa->pch;
586:
587: /* Only "pcmcia"s can attach to "tcic"s... easy. */
588: if (pnp)
589: printf("pcmcia at %s", pnp);
590:
591: switch (h->sock) {
592: case 0:
593: printf(" socket 0");
594: break;
595: case 1:
596: printf(" socket 1");
597: break;
598: default:
599: panic("unknown tcic socket");
600: }
601: return (UNCONF);
602: }
603:
604: int
605: tcic_intr(arg)
606: void *arg;
607: {
608: struct tcic_softc *sc = arg;
609: int i, ret = 0;
610:
611: DPRINTF(("%s: intr\n", sc->dev.dv_xname));
612:
613: for (i = 0; i < TCIC_NSLOTS; i++)
614: if (sc->handle[i].flags & TCIC_FLAG_SOCKETP)
615: ret += tcic_intr_socket(&sc->handle[i]);
616:
617: return (ret ? 1 : 0);
618: }
619:
620: int
621: tcic_intr_socket(h)
622: struct tcic_handle *h;
623: {
624: int icsr, rv;
625:
626: rv = 0;
627: tcic_sel_sock(h);
628: icsr = tcic_read_1(h, TCIC_R_ICSR);
629:
630: DPRINTF(("%s: %d icsr: 0x%02x \n", h->sc->dev.dv_xname, h->sock, icsr));
631:
632: /* XXX or should the next three be handled in tcic_intr? -chb */
633: if (icsr & TCIC_ICSR_PROGTIME) {
634: DPRINTF(("%s: %02x PROGTIME\n", h->sc->dev.dv_xname, h->sock));
635: rv = 1;
636: }
637: if (icsr & TCIC_ICSR_ILOCK) {
638: DPRINTF(("%s: %02x ILOCK\n", h->sc->dev.dv_xname, h->sock));
639: rv = 1;
640: }
641: if (icsr & TCIC_ICSR_ERR) {
642: DPRINTF(("%s: %02x ERR\n", h->sc->dev.dv_xname, h->sock));
643: rv = 1;
644: }
645: if (icsr & TCIC_ICSR_CDCHG) {
646: int sstat, delta;
647:
648: /* compute what changed since last interrupt */
649: sstat = tcic_read_aux_1(h->sc->iot, h->sc->ioh,
650: TCIC_AR_WCTL, TCIC_R_WCTL_XCSR) & TCIC_XCSR_STAT_MASK;
651: delta = h->sstat ^ sstat;
652: h->sstat = sstat;
653:
654: if (delta)
655: rv = 1;
656:
657: DPRINTF(("%s: %02x CDCHG %x\n", h->sc->dev.dv_xname, h->sock,
658: delta));
659:
660: /*
661: * XXX This should probably schedule something to happen
662: * after the interrupt handler completes
663: */
664:
665: if (delta & TCIC_SSTAT_CD) {
666: if (sstat & TCIC_SSTAT_CD) {
667: if (!(h->flags & TCIC_FLAG_CARDP)) {
668: DPRINTF(("%s: enqueing INSERTION event\n",
669: h->sc->dev.dv_xname));
670: tcic_queue_event(h, TCIC_EVENT_INSERTION);
671: }
672: } else {
673: if (h->flags & TCIC_FLAG_CARDP) {
674: /* Deactivate the card now. */
675: DPRINTF(("%s: deactivating card\n",
676: h->sc->dev.dv_xname));
677: tcic_deactivate_card(h);
678:
679: DPRINTF(("%s: enqueing REMOVAL event\n",
680: h->sc->dev.dv_xname));
681: tcic_queue_event(h, TCIC_EVENT_REMOVAL);
682: }
683: }
684: }
685: if (delta & TCIC_SSTAT_RDY) {
686: DPRINTF(("%s: %02x READY\n", h->sc->dev.dv_xname, h->sock));
687: /* shouldn't happen */
688: }
689: if (delta & TCIC_SSTAT_LBAT1) {
690: DPRINTF(("%s: %02x LBAT1\n", h->sc->dev.dv_xname, h->sock));
691: }
692: if (delta & TCIC_SSTAT_LBAT2) {
693: DPRINTF(("%s: %02x LBAT2\n", h->sc->dev.dv_xname, h->sock));
694: }
695: if (delta & TCIC_SSTAT_WP) {
696: DPRINTF(("%s: %02x WP\n", h->sc->dev.dv_xname, h->sock));
697: }
698: }
699: return rv;
700: }
701:
702: void
703: tcic_queue_event(h, event)
704: struct tcic_handle *h;
705: int event;
706: {
707: struct tcic_event *pe;
708: int s;
709:
710: pe = malloc(sizeof(*pe), M_TEMP, M_NOWAIT);
711: if (pe == NULL)
712: panic("tcic_queue_event: can't allocate event");
713:
714: pe->pe_type = event;
715: s = splhigh();
716: SIMPLEQ_INSERT_TAIL(&h->events, pe, pe_q);
717: splx(s);
718: wakeup(&h->events);
719: }
720: void
721: tcic_attach_card(h)
722: struct tcic_handle *h;
723: {
724: DPRINTF(("tcic_attach_card\n"));
725:
726: if (h->flags & TCIC_FLAG_CARDP)
727: panic("tcic_attach_card: already attached");
728:
729: /* call the MI attach function */
730:
731: pcmcia_card_attach(h->pcmcia);
732:
733: h->flags |= TCIC_FLAG_CARDP;
734: }
735:
736: void
737: tcic_detach_card(h, flags)
738: struct tcic_handle *h;
739: int flags; /* DETACH_* */
740: {
741: DPRINTF(("tcic_detach_card\n"));
742:
743: if (!(h->flags & TCIC_FLAG_CARDP))
744: panic("tcic_detach_card: already detached");
745:
746: h->flags &= ~TCIC_FLAG_CARDP;
747:
748: /* call the MI detach function */
749:
750: pcmcia_card_detach(h->pcmcia, flags);
751:
752: }
753:
754: void
755: tcic_deactivate_card(h)
756: struct tcic_handle *h;
757: {
758: int val, reg;
759:
760: if (!(h->flags & TCIC_FLAG_CARDP))
761: panic("tcic_deactivate_card: already detached");
762:
763: /* call the MI deactivate function */
764: pcmcia_card_deactivate(h->pcmcia);
765:
766: tcic_sel_sock(h);
767:
768: /* XXX disable card detect resume and configuration reset??? */
769:
770: /* power down the socket */
771: tcic_write_1(h, TCIC_R_PWR, 0);
772:
773: /* reset the card XXX ? -chb */
774:
775: /* turn off irq's for this socket */
776: reg = TCIC_IR_SCF1_N(h->sock);
777: val = tcic_read_ind_2(h, reg);
778: tcic_write_ind_2(h, reg, (val & ~TCIC_SCF1_IRQ_MASK)|TCIC_SCF1_IRQOFF);
779: reg = TCIC_IR_SCF2_N(h->sock);
780: val = tcic_read_ind_2(h, reg);
781: tcic_write_ind_2(h, reg,
782: (val | (TCIC_SCF2_MLBAT1|TCIC_SCF2_MLBAT2|TCIC_SCF2_MRDY
783: |TCIC_SCF2_MWP|TCIC_SCF2_MCD)));
784: }
785:
786: /* XXX the following routine may need to be rewritten. -chb */
787: int
788: tcic_chip_mem_alloc(pch, size, pcmhp)
789: pcmcia_chipset_handle_t pch;
790: bus_size_t size;
791: struct pcmcia_mem_handle *pcmhp;
792: {
793: struct tcic_handle *h = (struct tcic_handle *) pch;
794: bus_space_handle_t memh;
795: bus_addr_t addr;
796: bus_size_t sizepg;
797: int i, mask, mhandle;
798:
799: /* out of sc->memh, allocate as many pages as necessary */
800:
801: /*
802: * The TCIC can map memory only in sizes that are
803: * powers of two, aligned at the natural boundary for the size.
804: */
805: i = tcic_log2((u_int)size);
806: if ((1<<i) < size)
807: i++;
808: sizepg = max(i, TCIC_MEM_SHIFT) - (TCIC_MEM_SHIFT-1);
809:
810: DPRINTF(("tcic_chip_mem_alloc: size %ld sizepg %ld\n", size, sizepg));
811:
812: /* can't allocate that much anyway */
813: if (sizepg > TCIC_MEM_PAGES) /* XXX -chb */
814: return 1;
815:
816: mask = (1 << sizepg) - 1;
817:
818: addr = 0; /* XXX gcc -Wuninitialized */
819: mhandle = 0; /* XXX gcc -Wuninitialized */
820:
821: /* XXX i should be initialised to always lay on boundary. -chb */
822: for (i = 0; i < (TCIC_MEM_PAGES + 1 - sizepg); i += sizepg) {
823: if ((h->sc->subregionmask & (mask << i)) == (mask << i)) {
824: if (bus_space_subregion(h->sc->memt, h->sc->memh,
825: i * TCIC_MEM_PAGESIZE,
826: sizepg * TCIC_MEM_PAGESIZE, &memh))
827: return (1);
828: mhandle = mask << i;
829: addr = h->sc->membase + (i * TCIC_MEM_PAGESIZE);
830: h->sc->subregionmask &= ~(mhandle);
831: break;
832: }
833: }
834:
835: if (i == (TCIC_MEM_PAGES + 1 - sizepg))
836: return (1);
837:
838: DPRINTF(("tcic_chip_mem_alloc bus addr 0x%lx+0x%lx\n", (u_long) addr,
839: (u_long) size));
840:
841: pcmhp->memt = h->sc->memt;
842: pcmhp->memh = memh;
843: pcmhp->addr = addr;
844: pcmhp->size = size;
845: pcmhp->mhandle = mhandle;
846: pcmhp->realsize = sizepg * TCIC_MEM_PAGESIZE;
847:
848: return (0);
849: }
850:
851: /* XXX the following routine may need to be rewritten. -chb */
852: void
853: tcic_chip_mem_free(pch, pcmhp)
854: pcmcia_chipset_handle_t pch;
855: struct pcmcia_mem_handle *pcmhp;
856: {
857: struct tcic_handle *h = (struct tcic_handle *) pch;
858:
859: h->sc->subregionmask |= pcmhp->mhandle;
860: }
861:
862: void
863: tcic_chip_do_mem_map(h, win)
864: struct tcic_handle *h;
865: int win;
866: {
867: int reg, hwwin, wscnt;
868:
869: int kind = h->mem[win].kind & ~PCMCIA_WIDTH_MEM_MASK;
870: int mem8 = (h->mem[win].kind & PCMCIA_WIDTH_MEM_MASK) == PCMCIA_WIDTH_MEM8;
871: DPRINTF(("tcic_chip_do_mem_map window %d: 0x%lx+0x%lx 0x%lx\n",
872: win, (u_long)h->mem[win].addr, (u_long)h->mem[win].size,
873: (u_long)h->mem[win].offset));
874: /*
875: * the even windows are used for socket 0,
876: * the odd ones for socket 1.
877: */
878: hwwin = (win << 1) + h->sock;
879:
880: /* the WR_MEXT register is MBZ */
881: tcic_write_ind_2(h, TCIC_WR_MEXT_N(hwwin), 0);
882:
883: /* set the host base address and window size */
884: if (h->mem[win].size2 <= 1) {
885: reg = ((h->mem[win].addr >> TCIC_MEM_SHIFT) &
886: TCIC_MBASE_ADDR_MASK) | TCIC_MBASE_4K;
887: } else {
888: reg = ((h->mem[win].addr >> TCIC_MEM_SHIFT) &
889: TCIC_MBASE_ADDR_MASK) | (h->mem[win].size2 >> 1);
890: }
891: tcic_write_ind_2(h, TCIC_WR_MBASE_N(hwwin), reg);
892:
893: /* set the card address and address space */
894: reg = 0;
895: reg = ((h->mem[win].offset >> TCIC_MEM_SHIFT) & TCIC_MMAP_ADDR_MASK);
896: reg |= (kind == PCMCIA_MEM_ATTR) ? TCIC_MMAP_ATTR : 0;
897: DPRINTF(("tcic_chip_do_map_mem window %d(%d) mmap 0x%04x\n",
898: win, hwwin, reg));
899: tcic_write_ind_2(h, TCIC_WR_MMAP_N(hwwin), reg);
900:
901: /* set the MCTL register */
902: /* must save WSCNT field in case this is a DB86082 rev 0 */
903: /* XXX why can't I do the following two in one statement? */
904: reg = tcic_read_ind_2(h, TCIC_WR_MCTL_N(hwwin)) & TCIC_MCTL_WSCNT_MASK;
905: reg |= TCIC_MCTL_ENA|TCIC_MCTL_QUIET;
906: reg |= mem8 ? TCIC_MCTL_B8 : 0;
907: reg |= (h->sock << TCIC_MCTL_SS_SHIFT) & TCIC_MCTL_SS_MASK;
908: #ifdef notyet /* XXX must get speed from CIS somehow. -chb */
909: wscnt = tcic_ns2wscnt(h->mem[win].speed);
910: #else
911: wscnt = tcic_ns2wscnt(tcic_mem_speed); /* 300 is "save" default for CIS memory */
912: #endif
913: if (h->sc->chipid == TCIC_CHIPID_DB86082_1) {
914: /*
915: * this chip has the wait state count in window
916: * register 7 - hwwin.
917: */
918: int reg2;
919: reg2 = tcic_read_ind_2(h, TCIC_WR_MCTL_N(7-hwwin));
920: reg2 &= ~TCIC_MCTL_WSCNT_MASK;
921: reg2 |= wscnt & TCIC_MCTL_WSCNT_MASK;
922: tcic_write_ind_2(h, TCIC_WR_MCTL_N(7-hwwin), reg2);
923: } else {
924: reg |= wscnt & TCIC_MCTL_WSCNT_MASK;
925: }
926: tcic_write_ind_2(h, TCIC_WR_MCTL_N(hwwin), reg);
927:
928: #ifdef TCICDEBUG
929: {
930: int r1, r2, r3;
931:
932: r1 = tcic_read_ind_2(h, TCIC_WR_MBASE_N(hwwin));
933: r2 = tcic_read_ind_2(h, TCIC_WR_MMAP_N(hwwin));
934: r3 = tcic_read_ind_2(h, TCIC_WR_MCTL_N(hwwin));
935:
936: DPRINTF(("tcic_chip_do_mem_map window %d(%d): %04x %04x %04x\n",
937: win, hwwin, r1, r2, r3));
938: }
939: #endif
940: }
941:
942: /* XXX needs work */
943: int
944: tcic_chip_mem_map(pch, kind, card_addr, size, pcmhp, offsetp, windowp)
945: pcmcia_chipset_handle_t pch;
946: int kind;
947: bus_addr_t card_addr;
948: bus_size_t size;
949: struct pcmcia_mem_handle *pcmhp;
950: bus_size_t *offsetp;
951: int *windowp;
952: {
953: struct tcic_handle *h = (struct tcic_handle *) pch;
954: bus_addr_t busaddr;
955: long card_offset;
956: int i, win;
957:
958: win = -1;
959: for (i = 0; i < h->memwins; i++) {
960: if ((h->memalloc & (1 << i)) == 0) {
961: win = i;
962: h->memalloc |= (1 << i);
963: break;
964: }
965: }
966:
967: if (win == -1)
968: return (1);
969:
970: *windowp = win;
971:
972: /* XXX this is pretty gross */
973:
974: if (h->sc->memt != pcmhp->memt)
975: panic("tcic_chip_mem_map memt is bogus");
976:
977: busaddr = pcmhp->addr;
978:
979: /*
980: * compute the address offset to the pcmcia address space for the
981: * tcic. this is intentionally signed. The masks and shifts below
982: * will cause TRT to happen in the tcic registers. Deal with making
983: * sure the address is aligned, and return the alignment offset.
984: */
985:
986: *offsetp = card_addr % TCIC_MEM_ALIGN;
987: card_addr -= *offsetp;
988:
989: DPRINTF(("tcic_chip_mem_map window %d bus %lx+%lx+%lx at card addr "
990: "%lx\n", win, (u_long) busaddr, (u_long) * offsetp, (u_long) size,
991: (u_long) card_addr));
992:
993: /* XXX we can't use size. -chb */
994: /*
995: * include the offset in the size, and decrement size by one, since
996: * the hw wants start/stop
997: */
998: size += *offsetp - 1;
999:
1000: card_offset = (((long) card_addr) - ((long) busaddr));
1001:
1002: DPRINTF(("tcic_chip_mem_map window %d card_offset 0x%lx\n",
1003: win, (u_long)card_offset));
1004:
1005: h->mem[win].addr = busaddr;
1006: h->mem[win].size = size;
1007: h->mem[win].size2 = tcic_log2((u_int)pcmhp->realsize) - TCIC_MEM_SHIFT;
1008: h->mem[win].offset = card_offset;
1009: h->mem[win].kind = kind;
1010:
1011: tcic_chip_do_mem_map(h, win);
1012:
1013: return (0);
1014: }
1015:
1016: void
1017: tcic_chip_mem_unmap(pch, window)
1018: pcmcia_chipset_handle_t pch;
1019: int window;
1020: {
1021: struct tcic_handle *h = (struct tcic_handle *) pch;
1022: int reg, hwwin;
1023:
1024: if (window >= h->memwins)
1025: panic("tcic_chip_mem_unmap: window out of range");
1026:
1027: hwwin = (window << 1) + h->sock;
1028: reg = tcic_read_ind_2(h, TCIC_WR_MCTL_N(hwwin));
1029: reg &= ~TCIC_MCTL_ENA;
1030: tcic_write_ind_2(h, TCIC_WR_MCTL_N(hwwin), reg);
1031:
1032: h->memalloc &= ~(1 << window);
1033: }
1034:
1035: int
1036: tcic_chip_io_alloc(pch, start, size, align, pcihp)
1037: pcmcia_chipset_handle_t pch;
1038: bus_addr_t start;
1039: bus_size_t size;
1040: bus_size_t align;
1041: struct pcmcia_io_handle *pcihp;
1042: {
1043: struct tcic_handle *h = (struct tcic_handle *) pch;
1044: bus_space_tag_t iot;
1045: bus_space_handle_t ioh;
1046: bus_addr_t ioaddr;
1047: int size2, flags = 0;
1048:
1049: /*
1050: * Allocate some arbitrary I/O space.
1051: */
1052:
1053: DPRINTF(("tcic_chip_io_alloc req 0x%lx %ld %ld\n",
1054: (u_long) start, (u_long) size, (u_long) align));
1055: /*
1056: * The TCIC can map I/O space only in sizes that are
1057: * powers of two, aligned at the natural boundary for the size.
1058: */
1059: size2 = tcic_log2((u_int)size);
1060: if ((1 << size2) < size)
1061: size2++;
1062: /* can't allocate that much anyway */
1063: if (size2 > 16) /* XXX 64K -chb */
1064: return 1;
1065: if (align) {
1066: if ((1 << size2) != align)
1067: return 1; /* not suitably aligned */
1068: } else {
1069: align = 1 << size2; /* no alignment given, make it natural */
1070: }
1071: if (start & (align - 1))
1072: return 1; /* not suitably aligned */
1073:
1074: iot = h->sc->iot;
1075:
1076: if (start) {
1077: ioaddr = start;
1078: if (bus_space_map(iot, start, size, 0, &ioh))
1079: return (1);
1080: DPRINTF(("tcic_chip_io_alloc map port %lx+%lx\n",
1081: (u_long) ioaddr, (u_long) size));
1082: } else {
1083: flags |= PCMCIA_IO_ALLOCATED;
1084: if (bus_space_alloc(iot, h->sc->iobase,
1085: h->sc->iobase + h->sc->iosize, size, align, 0, 0,
1086: &ioaddr, &ioh))
1087: return (1);
1088: DPRINTF(("tcic_chip_io_alloc alloc port %lx+%lx\n",
1089: (u_long) ioaddr, (u_long) size));
1090: }
1091:
1092: pcihp->iot = iot;
1093: pcihp->ioh = ioh;
1094: pcihp->addr = ioaddr;
1095: pcihp->size = size;
1096: pcihp->flags = flags;
1097:
1098: return (0);
1099: }
1100:
1101: void
1102: tcic_chip_io_free(pch, pcihp)
1103: pcmcia_chipset_handle_t pch;
1104: struct pcmcia_io_handle *pcihp;
1105: {
1106: bus_space_tag_t iot = pcihp->iot;
1107: bus_space_handle_t ioh = pcihp->ioh;
1108: bus_size_t size = pcihp->size;
1109:
1110: if (pcihp->flags & PCMCIA_IO_ALLOCATED)
1111: bus_space_free(iot, ioh, size);
1112: else
1113: bus_space_unmap(iot, ioh, size);
1114: }
1115:
1116: static int tcic_iowidth_map[] =
1117: { TCIC_ICTL_AUTOSZ, TCIC_ICTL_B8, TCIC_ICTL_B16 };
1118:
1119: void
1120: tcic_chip_do_io_map(h, win)
1121: struct tcic_handle *h;
1122: int win;
1123: {
1124: int reg, size2, iotiny, wbase, hwwin, wscnt;
1125:
1126: DPRINTF(("tcic_chip_do_io_map win %d addr %lx size %lx width %d\n",
1127: win, (long) h->io[win].addr, (long) h->io[win].size,
1128: h->io[win].width * 8));
1129:
1130: /*
1131: * the even windows are used for socket 0,
1132: * the odd ones for socket 1.
1133: */
1134: hwwin = (win << 1) + h->sock;
1135:
1136: /* set the WR_BASE register */
1137: /* XXX what if size isn't power of 2? -chb */
1138: size2 = tcic_log2((u_int)h->io[win].size);
1139: DPRINTF(("tcic_chip_do_io_map win %d size2 %d\n", win, size2));
1140: if (size2 < 1) {
1141: iotiny = TCIC_ICTL_TINY;
1142: wbase = h->io[win].addr;
1143: } else {
1144: iotiny = 0;
1145: /* XXX we should do better -chb */
1146: wbase = h->io[win].addr | (1 << (size2 - 1));
1147: }
1148: tcic_write_ind_2(h, TCIC_WR_IBASE_N(hwwin), wbase);
1149:
1150: /* set the WR_ICTL register */
1151: reg = TCIC_ICTL_ENA | TCIC_ICTL_QUIET;
1152: reg |= (h->sock << TCIC_ICTL_SS_SHIFT) & TCIC_ICTL_SS_MASK;
1153: reg |= iotiny | tcic_iowidth_map[h->io[win].width];
1154: if (h->sc->chipid != TCIC_CHIPID_DB86082_1)
1155: reg |= TCIC_ICTL_PASS16;
1156: #ifdef notyet /* XXX must get speed from CIS somehow. -chb */
1157: wscnt = tcic_ns2wscnt(h->io[win].speed);
1158: #else
1159: wscnt = tcic_ns2wscnt(tcic_io_speed); /* linux uses 0 as default */
1160: #endif
1161: reg |= wscnt & TCIC_ICTL_WSCNT_MASK;
1162: tcic_write_ind_2(h, TCIC_WR_ICTL_N(hwwin), reg);
1163:
1164: #ifdef TCICDEBUG
1165: {
1166: int r1, r2;
1167:
1168: r1 = tcic_read_ind_2(h, TCIC_WR_IBASE_N(hwwin));
1169: r2 = tcic_read_ind_2(h, TCIC_WR_ICTL_N(hwwin));
1170:
1171: DPRINTF(("tcic_chip_do_io_map window %d(%d): %04x %04x\n",
1172: win, hwwin, r1, r2));
1173: }
1174: #endif
1175: }
1176:
1177: int
1178: tcic_chip_io_map(pch, width, offset, size, pcihp, windowp)
1179: pcmcia_chipset_handle_t pch;
1180: int width;
1181: bus_addr_t offset;
1182: bus_size_t size;
1183: struct pcmcia_io_handle *pcihp;
1184: int *windowp;
1185: {
1186: struct tcic_handle *h = (struct tcic_handle *) pch;
1187: bus_addr_t ioaddr = pcihp->addr + offset;
1188: int i, win;
1189: #ifdef TCICDEBUG
1190: static char *width_names[] = { "auto", "io8", "io16" };
1191: #endif
1192:
1193: /* XXX Sanity check offset/size. */
1194:
1195: win = -1;
1196: for (i = 0; i < TCIC_IO_WINS; i++) {
1197: if ((h->ioalloc & (1 << i)) == 0) {
1198: win = i;
1199: h->ioalloc |= (1 << i);
1200: break;
1201: }
1202: }
1203:
1204: if (win == -1)
1205: return (1);
1206:
1207: *windowp = win;
1208:
1209: /* XXX this is pretty gross */
1210:
1211: if (h->sc->iot != pcihp->iot)
1212: panic("tcic_chip_io_map iot is bogus");
1213:
1214: DPRINTF(("tcic_chip_io_map window %d %s port %lx+%lx\n",
1215: win, width_names[width], (u_long) ioaddr, (u_long) size));
1216:
1217: /* XXX wtf is this doing here? */
1218:
1219: printf(" port 0x%lx", (u_long) ioaddr);
1220: if (size > 1)
1221: printf("-0x%lx", (u_long) ioaddr + (u_long) size - 1);
1222:
1223: h->io[win].addr = ioaddr;
1224: h->io[win].size = size;
1225: h->io[win].width = width;
1226:
1227: tcic_chip_do_io_map(h, win);
1228:
1229: return (0);
1230: }
1231:
1232: void
1233: tcic_chip_io_unmap(pch, window)
1234: pcmcia_chipset_handle_t pch;
1235: int window;
1236: {
1237: struct tcic_handle *h = (struct tcic_handle *) pch;
1238: int reg, hwwin;
1239:
1240: if (window >= TCIC_IO_WINS)
1241: panic("tcic_chip_io_unmap: window out of range");
1242:
1243: hwwin = (window << 1) + h->sock;
1244: reg = tcic_read_ind_2(h, TCIC_WR_ICTL_N(hwwin));
1245: reg &= ~TCIC_ICTL_ENA;
1246: tcic_write_ind_2(h, TCIC_WR_ICTL_N(hwwin), reg);
1247:
1248: h->ioalloc &= ~(1 << window);
1249: }
1250:
1251: void
1252: tcic_chip_socket_enable(pch)
1253: pcmcia_chipset_handle_t pch;
1254: {
1255: struct tcic_handle *h = (struct tcic_handle *) pch;
1256: int cardtype, reg, win;
1257:
1258: tcic_sel_sock(h);
1259:
1260: /*
1261: * power down the socket to reset it.
1262: * put card reset into high-z, put chip outputs to card into high-z
1263: */
1264:
1265: tcic_write_1(h, TCIC_R_PWR, 0);
1266: reg = tcic_read_aux_2(h->sc->iot, h->sc->ioh, TCIC_AR_ILOCK);
1267: reg |= TCIC_ILOCK_CWAIT;
1268: reg &= ~(TCIC_ILOCK_CRESET|TCIC_ILOCK_CRESENA);
1269: tcic_write_aux_2(h->sc->iot, h->sc->ioh, TCIC_AR_ILOCK, reg);
1270: tcic_write_1(h, TCIC_R_SCTRL, 0); /* clear TCIC_SCTRL_ENA */
1271:
1272: /* power up the socket */
1273:
1274: /* turn on VCC, turn of VPP */
1275: reg = TCIC_PWR_VCC_N(h->sock) | TCIC_PWR_VPP_N(h->sock) | h->sc->pwrena;
1276: if (h->sc->pwrena) /* this is a '84 type chip */
1277: reg |= TCIC_PWR_VCC5V;
1278: tcic_write_1(h, TCIC_R_PWR, reg);
1279: delay(10000);
1280:
1281: /* enable reset and wiggle it to reset the card */
1282: reg = tcic_read_aux_2(h->sc->iot, h->sc->ioh, TCIC_AR_ILOCK);
1283: reg |= TCIC_ILOCK_CRESENA;
1284: tcic_write_aux_2(h->sc->iot, h->sc->ioh, TCIC_AR_ILOCK, reg);
1285: /* XXX need bus_space_barrier here */
1286: reg |= TCIC_ILOCK_CRESET;
1287: tcic_write_aux_2(h->sc->iot, h->sc->ioh, TCIC_AR_ILOCK, reg);
1288: /* enable card signals */
1289: tcic_write_1(h, TCIC_R_SCTRL, TCIC_SCTRL_ENA);
1290: delay(10); /* wait 10 us */
1291:
1292: /* clear the reset flag */
1293: reg = tcic_read_aux_2(h->sc->iot, h->sc->ioh, TCIC_AR_ILOCK);
1294: reg &= ~(TCIC_ILOCK_CRESET);
1295: tcic_write_aux_2(h->sc->iot, h->sc->ioh, TCIC_AR_ILOCK, reg);
1296:
1297: /* wait 20ms as per pc card standard (r2.01) section 4.3.6 */
1298: delay(20000);
1299:
1300: /* wait for the chip to finish initializing */
1301: tcic_wait_ready(h);
1302:
1303: /* WWW */
1304: /* zero out the address windows */
1305:
1306: /* writing to WR_MBASE_N disables the window */
1307: for (win = 0; win < h->memwins; win++) {
1308: tcic_write_ind_2(h, TCIC_WR_MBASE_N((win<<1)+h->sock), 0);
1309: }
1310: /* writing to WR_IBASE_N disables the window */
1311: for (win = 0; win < TCIC_IO_WINS; win++) {
1312: tcic_write_ind_2(h, TCIC_WR_IBASE_N((win<<1)+h->sock), 0);
1313: }
1314:
1315: /* set the card type */
1316:
1317: cardtype = pcmcia_card_gettype(h->pcmcia);
1318:
1319: #if 0
1320: reg = tcic_read_ind_2(h, TCIC_IR_SCF1_N(h->sock));
1321: reg &= ~TCIC_SCF1_IRQ_MASK;
1322: #else
1323: reg = 0;
1324: #endif
1325: reg |= ((cardtype == PCMCIA_IFTYPE_IO) ?
1326: TCIC_SCF1_IOSTS : 0);
1327: reg |= tcic_irqmap[h->ih_irq]; /* enable interrupts */
1328: reg &= ~TCIC_SCF1_IRQOD;
1329: tcic_write_ind_2(h, TCIC_IR_SCF1_N(h->sock), reg);
1330:
1331: DPRINTF(("%s: tcic_chip_socket_enable %d cardtype %s 0x%02x\n",
1332: h->sc->dev.dv_xname, h->sock,
1333: ((cardtype == PCMCIA_IFTYPE_IO) ? "io" : "mem"), reg));
1334:
1335: /* reinstall all the memory and io mappings */
1336:
1337: for (win = 0; win < h->memwins; win++)
1338: if (h->memalloc & (1 << win))
1339: tcic_chip_do_mem_map(h, win);
1340:
1341: for (win = 0; win < TCIC_IO_WINS; win++)
1342: if (h->ioalloc & (1 << win))
1343: tcic_chip_do_io_map(h, win);
1344: }
1345:
1346: void
1347: tcic_chip_socket_disable(pch)
1348: pcmcia_chipset_handle_t pch;
1349: {
1350: struct tcic_handle *h = (struct tcic_handle *) pch;
1351: int val;
1352:
1353: DPRINTF(("tcic_chip_socket_disable\n"));
1354:
1355: tcic_sel_sock(h);
1356:
1357: /* disable interrupts */
1358: val = tcic_read_ind_2(h, TCIC_IR_SCF1_N(h->sock));
1359: val &= TCIC_SCF1_IRQ_MASK;
1360: tcic_write_ind_2(h, TCIC_IR_SCF1_N(h->sock), val);
1361:
1362: /* disable the output signals */
1363: tcic_write_1(h, TCIC_R_SCTRL, 0);
1364: val = tcic_read_aux_2(h->sc->iot, h->sc->ioh, TCIC_AR_ILOCK);
1365: val &= ~TCIC_ILOCK_CRESENA;
1366: tcic_write_aux_2(h->sc->iot, h->sc->ioh, TCIC_AR_ILOCK, val);
1367:
1368: /* power down the socket */
1369: tcic_write_1(h, TCIC_R_PWR, 0);
1370: }
1371:
1372: /*
1373: * XXX The following is Linux driver but doesn't match the table
1374: * in the manual.
1375: */
1376: int
1377: tcic_ns2wscnt(ns)
1378: int ns;
1379: {
1380: if (ns < 14) {
1381: return 0;
1382: } else {
1383: return (2*(ns-14))/70; /* XXX assumes 14.31818 MHz clock. */
1384: }
1385: }
1386:
1387: int
1388: tcic_log2(val)
1389: u_int val;
1390: {
1391: int i, l2;
1392:
1393: l2 = i = 0;
1394: while (val) {
1395: if (val & 1)
1396: l2 = i;
1397: i++;
1398: val >>= 1;
1399: }
1400: return l2;
1401: }
CVSweb