Annotation of sys/dev/isa/i82365_isasubr.c, Revision 1.1.1.1
1.1 nbrk 1: /* $OpenBSD: i82365_isasubr.c,v 1.21 2006/03/12 01:38:34 brad Exp $ */
2: /* $NetBSD: i82365_isasubr.c,v 1.1 1998/06/07 18:28:31 sommerfe Exp $ */
3:
4: /*
5: * Copyright (c) 1998 Bill Sommerfeld. All rights reserved.
6: * Copyright (c) 1997 Marc Horowitz. All rights reserved.
7: *
8: * Redistribution and use in source and binary forms, with or without
9: * modification, are permitted provided that the following conditions
10: * are met:
11: * 1. Redistributions of source code must retain the above copyright
12: * notice, this list of conditions and the following disclaimer.
13: * 2. Redistributions in binary form must reproduce the above copyright
14: * notice, this list of conditions and the following disclaimer in the
15: * documentation and/or other materials provided with the distribution.
16: * 3. All advertising materials mentioning features or use of this software
17: * must display the following acknowledgement:
18: * This product includes software developed by Marc Horowitz.
19: * 4. The name of the author may not be used to endorse or promote products
20: * derived from this software without specific prior written permission.
21: *
22: * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
23: * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
24: * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
25: * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
26: * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
27: * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
28: * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
29: * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
30: * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
31: * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32: */
33:
34:
35: #include <sys/types.h>
36: #include <sys/param.h>
37: #include <sys/systm.h>
38: #include <sys/device.h>
39: #include <sys/extent.h>
40: #include <sys/malloc.h>
41:
42: #include <machine/bus.h>
43: #include <machine/intr.h>
44:
45: #include <dev/isa/isareg.h>
46: #include <dev/isa/isavar.h>
47:
48: #include <dev/pcmcia/pcmciareg.h>
49: #include <dev/pcmcia/pcmciavar.h>
50: #include <dev/pcmcia/pcmciachip.h>
51:
52: #include <dev/ic/i82365reg.h>
53: #include <dev/ic/i82365var.h>
54: #include <dev/isa/i82365_isavar.h>
55:
56: /*****************************************************************************
57: * Configurable parameters.
58: *****************************************************************************/
59:
60: /*
61: * Default I/O allocation range. If both are set to non-zero, these
62: * values will be used instead. Otherwise, the code attempts to probe
63: * the bus width.
64: */
65:
66: #ifndef PCIC_ISA_ALLOC_IOBASE
67: #define PCIC_ISA_ALLOC_IOBASE 0
68: #endif
69:
70: #ifndef PCIC_ISA_ALLOC_IOSIZE
71: #define PCIC_ISA_ALLOC_IOSIZE 0
72: #endif
73:
74: int pcic_isa_alloc_iobase = PCIC_ISA_ALLOC_IOBASE;
75: int pcic_isa_alloc_iosize = PCIC_ISA_ALLOC_IOSIZE;
76:
77: /*
78: * I am well aware that some of later irqs below are not for real, but there
79: * is a way to deal with that in the search loop. For beauty's sake I want
80: * this list to be a permutation of 0..15.
81: */
82: char pcic_isa_intr_list[] = {
83: 3, 4, 14, 9, 5, 12, 10, 11, 15, 13, 7, 1, 6, 2, 0, 8
84: };
85:
86: struct pcic_ranges pcic_isa_addr[] = {
87: { 0x340, 0x030 },
88: { 0x300, 0x030 },
89: { 0x390, 0x020 },
90: { 0x400, 0xbff },
91: { 0, 0 }, /* terminator */
92: };
93:
94:
95: /*****************************************************************************
96: * End of configurable parameters.
97: *****************************************************************************/
98:
99: #ifdef PCICISADEBUG
100: int pcicsubr_debug = 1 /* XXX */ ;
101: #define DPRINTF(arg) if (pcicsubr_debug) printf arg;
102: #else
103: #define DPRINTF(arg)
104: #endif
105:
106: static int pcic_intr_seen;
107:
108: void
109: pcic_isa_bus_width_probe(sc, iot, ioh, base, length)
110: struct pcic_softc *sc;
111: bus_space_tag_t iot;
112: bus_space_handle_t ioh;
113: bus_addr_t base;
114: u_int32_t length;
115: {
116: bus_space_handle_t ioh_high;
117: int i, iobuswidth, tmp1, tmp2;
118:
119: /*
120: * figure out how wide the isa bus is. Do this by checking if the
121: * pcic controller is mirrored 0x400 above where we expect it to be.
122: *
123: * XXX some hardware doesn't seem to grok addresses in 0x400
124: * range-- apparently missing a bit or more of address lines.
125: * (e.g. CIRRUS_PD672X with Linksys EthernetCard ne2000 clone
126: * in TI TravelMate 5000 -- not clear which is at fault)
127: *
128: * Add a kludge to detect 10 bit wide buses and deal with them,
129: * and also a config file option to override the probe.
130: */
131: iobuswidth = 12;
132:
133: /* Map i/o space. */
134: if (bus_space_map(iot, base + 0x400, length, 0, &ioh_high)) {
135: printf("%s: can't map high i/o space\n", sc->dev.dv_xname);
136: return;
137: }
138:
139: for (i = 0; i < PCIC_NSLOTS; i++) {
140: if (sc->handle[i].flags & PCIC_FLAG_SOCKETP) {
141: /*
142: * read the ident flags from the normal space and
143: * from the mirror, and compare them
144: */
145: bus_space_write_1(iot, ioh, PCIC_REG_INDEX,
146: sc->handle[i].sock + PCIC_IDENT);
147: tmp1 = bus_space_read_1(iot, ioh, PCIC_REG_DATA);
148:
149: bus_space_write_1(iot, ioh_high, PCIC_REG_INDEX,
150: sc->handle[i].sock + PCIC_IDENT);
151: tmp2 = bus_space_read_1(iot, ioh_high, PCIC_REG_DATA);
152:
153: if (tmp1 == tmp2)
154: iobuswidth = 10;
155: }
156: }
157:
158: bus_space_free(iot, ioh_high, length);
159:
160: sc->ranges = pcic_isa_addr;
161: if (iobuswidth == 10) {
162: sc->iobase = 0x000;
163: sc->iosize = 0x400;
164: } else {
165: sc->iobase = 0x0000;
166: sc->iosize = 0x1000;
167: }
168:
169: DPRINTF(("%s: bus_space_alloc range 0x%04lx-0x%04lx (probed)\n",
170: sc->dev.dv_xname, (long) sc->iobase,
171: (long) sc->iobase + sc->iosize));
172:
173: if (pcic_isa_alloc_iobase && pcic_isa_alloc_iosize) {
174: sc->iobase = pcic_isa_alloc_iobase;
175: sc->iosize = pcic_isa_alloc_iosize;
176:
177: DPRINTF(("%s: bus_space_alloc range 0x%04lx-0x%04lx "
178: "(config override)\n", sc->dev.dv_xname, (long) sc->iobase,
179: (long) sc->iobase + sc->iosize));
180: }
181: }
182:
183:
184: void *
185: pcic_isa_chip_intr_establish(pch, pf, ipl, fct, arg, xname)
186: pcmcia_chipset_handle_t pch;
187: struct pcmcia_function *pf;
188: int ipl;
189: int (*fct)(void *);
190: void *arg;
191: char *xname;
192: {
193: struct pcic_handle *h = (struct pcic_handle *)pch;
194: struct pcic_softc *sc = (struct pcic_softc *)(h->ph_parent);
195: isa_chipset_tag_t ic = sc->intr_est;
196: int irq, ist, reg;
197:
198: if (pf->cfe->flags & PCMCIA_CFE_IRQLEVEL)
199: ist = IST_LEVEL;
200: else if (pf->cfe->flags & PCMCIA_CFE_IRQPULSE)
201: ist = IST_PULSE;
202: else
203: ist = IST_EDGE;
204:
205: irq = pcic_intr_find(sc, ist);
206: if (!irq)
207: return (NULL);
208:
209: h->ih_irq = irq;
210: reg = pcic_read(h, PCIC_INTR);
211: reg &= ~(PCIC_INTR_IRQ_MASK | PCIC_INTR_ENABLE);
212: pcic_write(h, PCIC_INTR, reg | irq);
213:
214: return isa_intr_establish(ic, irq, ist, ipl, fct, arg,
215: h->pcmcia->dv_xname);
216: }
217:
218: void
219: pcic_isa_chip_intr_disestablish(pch, ih)
220: pcmcia_chipset_handle_t pch;
221: void *ih;
222: {
223: struct pcic_handle *h = (struct pcic_handle *) pch;
224: struct pcic_softc *sc = (struct pcic_softc *)(h->ph_parent);
225: isa_chipset_tag_t ic = sc->intr_est;
226: int reg;
227:
228: h->ih_irq = 0;
229:
230: isa_intr_disestablish(ic, ih);
231:
232: reg = pcic_read(h, PCIC_INTR);
233: reg &= ~(PCIC_INTR_IRQ_MASK | PCIC_INTR_ENABLE);
234: pcic_write(h, PCIC_INTR, reg);
235: }
236:
237: const char *
238: pcic_isa_chip_intr_string(pch, ih)
239: pcmcia_chipset_handle_t pch;
240: void *ih;
241: {
242: struct pcic_handle *h = (struct pcic_handle *)pch;
243: static char irqstr[64];
244:
245: if (ih == NULL)
246: snprintf(irqstr, sizeof(irqstr), "couldn't establish interrupt");
247: else
248: snprintf(irqstr, sizeof(irqstr), "irq %d", h->ih_irq);
249: return (irqstr);
250: }
251:
252: int
253: pcic_intr_probe(v)
254: void *v;
255: {
256: pcic_intr_seen = 1;
257: return (1);
258: }
259:
260: /*
261: * Try to find a working interrupt, first by searching for a unique
262: * irq that is known to work, verified by tickling the pcic, then
263: * by searching for a shareable irq known to work. If the pcic does
264: * not allow tickling we then fallback to the same strategy but without
265: * tickling just assuming the first usable irq found works.
266: */
267: int
268: pcic_intr_find(sc, ist)
269: struct pcic_softc *sc;
270: int ist;
271: {
272: struct pcic_handle *ph = &sc->handle[0];
273: isa_chipset_tag_t ic = sc->intr_est;
274: int i, tickle, check, irq, chosen_irq = 0, csc_touched = 0;
275: void *ih;
276: u_int8_t saved_csc_intr;
277:
278: /*
279: * First time, look for entirely free interrupts, last
280: * time accept shareable ones.
281: */
282: for (tickle = 1; tickle >= 0; tickle--) {
283: if (tickle)
284: /*
285: * Remember card status change interrupt
286: * configuration.
287: */
288: saved_csc_intr = pcic_read(ph, PCIC_CSC_INTR);
289:
290: for (check = 2; check; check--) {
291:
292: /* Walk over all possible interrupts. */
293: for (i = 0; i < 16; i++) {
294: irq = pcic_isa_intr_list[i];
295:
296: if (((1 << irq) &
297: PCIC_CSC_INTR_IRQ_VALIDMASK) == 0)
298: continue;
299:
300: if (isa_intr_check(ic, irq, ist) < check)
301: continue;
302:
303: if (!tickle) {
304: chosen_irq = irq;
305: goto out;
306: }
307:
308: /*
309: * Prepare for an interrupt tickle.
310: * As this can be called from an
311: * IPL_TTY context (the card status
312: * change interrupt) we need to do
313: * higher.
314: */
315: ih = isa_intr_establish(ic, irq, ist, IPL_VM,
316: pcic_intr_probe, 0, NULL);
317: if (ih == NULL)
318: continue;
319: pcic_intr_seen = 0;
320: pcic_write(ph, PCIC_CSC_INTR,
321: (saved_csc_intr & ~PCIC_CSC_INTR_IRQ_MASK)
322: | PCIC_CSC_INTR_CD_ENABLE
323: | (irq << PCIC_CSC_INTR_IRQ_SHIFT));
324: csc_touched = 1;
325:
326: /* Teehee, you tickle me! ;-) */
327: pcic_write(ph, PCIC_CARD_DETECT,
328: pcic_read(ph, PCIC_CARD_DETECT) |
329: PCIC_CARD_DETECT_SW_INTR);
330:
331: /*
332: * Delay for 10 ms and then shut the
333: * probe off. That should be plenty
334: * of time for the interrupt to be
335: * handled.
336: */
337: delay(10000);
338:
339: /* Acknowledge the interrupt. */
340: pcic_read(ph, PCIC_CSC);
341:
342: isa_intr_disestablish(ic, ih);
343:
344: if (pcic_intr_seen) {
345: chosen_irq = irq;
346: goto out;
347: }
348: }
349: }
350: }
351:
352: out:
353: if (csc_touched)
354: /* Restore card detection bit. */
355: pcic_write(ph, PCIC_CSC_INTR, saved_csc_intr);
356: return (chosen_irq);
357: }
CVSweb