pci_kn300.c revision 1.11 1 /* $NetBSD: pci_kn300.c,v 1.11 1999/04/15 22:37:25 thorpej Exp $ */
2
3 /*
4 * Copyright (c) 1998 by Matthew Jacob
5 * NASA AMES Research Center.
6 * 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 immediately at the beginning of the file, without modification,
13 * this list of conditions, and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
17 * 3. The name of the author may not be used to endorse or promote products
18 * derived from this software without specific prior written permission.
19 *
20 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
24 * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 * SUCH DAMAGE.
31 */
32
33 #include <sys/cdefs.h> /* RCS ID & Copyright macro defns */
34
35 __KERNEL_RCSID(0, "$NetBSD: pci_kn300.c,v 1.11 1999/04/15 22:37:25 thorpej Exp $");
36
37 #include <sys/types.h>
38 #include <sys/param.h>
39 #include <sys/time.h>
40 #include <sys/systm.h>
41 #include <sys/errno.h>
42 #include <sys/malloc.h>
43 #include <sys/device.h>
44 #include <sys/syslog.h>
45
46 #include <vm/vm.h>
47
48 #include <machine/autoconf.h>
49
50 #include <dev/pci/pcireg.h>
51 #include <dev/pci/pcivar.h>
52
53 #include <alpha/mcbus/mcbusvar.h>
54 #include <alpha/mcbus/mcbusreg.h>
55 #include <alpha/pci/mcpciareg.h>
56 #include <alpha/pci/mcpciavar.h>
57 #include <alpha/pci/pci_kn300.h>
58
59 #ifndef EVCNT_COUNTERS
60 #include <machine/intrcnt.h>
61 #endif
62
63 #include "sio.h"
64 #if NSIO
65 #include <alpha/pci/siovar.h>
66 #endif
67
68 int
69 dec_kn300_intr_map __P((void *, pcitag_t, int, int, pci_intr_handle_t *));
70 const char *dec_kn300_intr_string __P((void *, pci_intr_handle_t));
71 void * dec_kn300_intr_establish __P((void *, pci_intr_handle_t,
72 int, int (*func)(void *), void *));
73 void dec_kn300_intr_disestablish __P((void *, void *));
74
75 #define KN300_PCEB_IRQ 16
76 #define NPIN 4
77
78 #define NVEC (MAX_MC_BUS * MCPCIA_PER_MCBUS * MCPCIA_MAXSLOT * NPIN)
79 static int savunit[NVEC];
80 static int savirqs[NVEC];
81 extern struct mcpcia_softc *mcpcias;
82
83 struct mcpcia_config *mcpcia_eisaccp = NULL;
84
85 static struct alpha_shared_intr *kn300_pci_intr;
86
87 #ifdef EVCNT_COUNTERS
88 struct evcnt kn300_intr_evcnt;
89 #endif
90
91 static char * kn300_spurious __P((int));
92 void kn300_iointr __P((void *, unsigned long));
93 void kn300_enable_intr __P((struct mcpcia_config *, int));
94 void kn300_disable_intr __P((struct mcpcia_config *, int));
95
96 void
97 pci_kn300_pickintr(ccp, first)
98 struct mcpcia_config *ccp;
99 int first;
100 {
101 pci_chipset_tag_t pc = &ccp->cc_pc;
102
103 if (first) {
104 int g;
105
106 kn300_pci_intr = alpha_shared_intr_alloc(NVEC);
107 for (g = 0; g < NVEC; g++) {
108 alpha_shared_intr_set_maxstrays(kn300_pci_intr, g, 25);
109 savunit[g] = (char) -1;
110 savirqs[g] = (char) -1;
111 }
112 set_iointr(kn300_iointr);
113 }
114
115 pc->pc_intr_v = ccp;
116 pc->pc_intr_map = dec_kn300_intr_map;
117 pc->pc_intr_string = dec_kn300_intr_string;
118 pc->pc_intr_establish = dec_kn300_intr_establish;
119 pc->pc_intr_disestablish = dec_kn300_intr_disestablish;
120
121 /* Not supported on KN300. */
122 pc->pc_pciide_compat_intr_establish = NULL;
123
124 #if NSIO > 0
125 if (EISA_PRESENT(REGVAL(MCPCIA_PCI_REV(ccp)))) {
126 sio_intr_setup(pc, &ccp->cc_iot);
127 kn300_enable_intr(ccp, KN300_PCEB_IRQ);
128 }
129 #endif
130 }
131
132 int
133 dec_kn300_intr_map(ccv, bustag, buspin, line, ihp)
134 void *ccv;
135 pcitag_t bustag;
136 int buspin, line;
137 pci_intr_handle_t *ihp;
138 {
139 struct mcpcia_config *ccp = ccv;
140 pci_chipset_tag_t pc = &ccp->cc_pc;
141 int device;
142 int kn300_irq;
143
144 if (buspin == 0) {
145 /* No IRQ used. */
146 return 1;
147 }
148 if (buspin > 4 || buspin < 0) {
149 printf("dec_kn300_intr_map: bad interrupt pin %d\n", buspin);
150 return 1;
151 }
152
153 alpha_pci_decompose_tag(pc, bustag, NULL, &device, NULL);
154
155 /*
156 * On MID 5 device 1 is the internal NCR 53c810.
157 */
158 if (ccp->cc_mid == 5 && device == 1) {
159 kn300_irq = 16;
160 } else if (device >= 2 && device <= 5) {
161 kn300_irq = (device - 2) * 4;
162 } else {
163 printf("dec_kn300_intr_map: weird device number %d\n", device);
164 return(1);
165 }
166
167 /*
168 * handle layout:
169 *
170 * bits 0..1 buspin-1
171 * bits 2..4 PCI Slot (0..7- yes, some don't exist)
172 * bits 5..7 MID-4
173 * bits 8..10 7-GID
174 * bits 11-15 IRQ
175 */
176 *ihp = (pci_intr_handle_t)
177 (buspin - 1 ) |
178 ((device & 0x7) << 2) |
179 ((ccp->cc_mid - 4) << 5) |
180 ((7 - ccp->cc_gid) << 8) |
181 (kn300_irq << 11);
182 return (0);
183 }
184
185 const char *
186 dec_kn300_intr_string(ccv, ih)
187 void *ccv;
188 pci_intr_handle_t ih;
189 {
190 static char irqstr[64];
191 sprintf(irqstr, "kn300 irq %ld PCI Interrupt Pin %c",
192 (ih >> 11) & 0x1f, (int)(ih & 0x3) + 'A');
193 return (irqstr);
194 }
195
196 void *
197 dec_kn300_intr_establish(ccv, ih, level, func, arg)
198 void *ccv;
199 pci_intr_handle_t ih;
200 int level;
201 int (*func) __P((void *));
202 void *arg;
203 {
204 void *cookie;
205 int v;
206
207 v = ih & 0x3ff;
208 cookie = alpha_shared_intr_establish(kn300_pci_intr, v, IST_LEVEL,
209 level, func, arg, "kn300 vector");
210
211 if (cookie != NULL && alpha_shared_intr_isactive(kn300_pci_intr, v)) {
212 struct mcpcia_config *ccp = ccv;
213 savunit[v] = ccp->cc_sc->mcpcia_dev.dv_unit;
214 savirqs[v] = (ih >> 11) & 0x1f;
215 kn300_enable_intr(ccv, (int)((ih >> 11) & 0x1f));
216 alpha_mb();
217 }
218 return (cookie);
219 }
220
221 void
222 dec_kn300_intr_disestablish(ccv, cookie)
223 void *ccv, *cookie;
224 {
225 panic("dec_kn300_intr_disestablish not implemented");
226 }
227
228 static char *
229 kn300_spurious(ih)
230 int ih;
231 {
232 static char str[48];
233 int pidx, slot, midx, gidx;
234
235 pidx = ih & 0x3;
236 slot = (ih >> 2) & 0x7;
237 midx = (ih >> 5) & 0x7;
238 gidx = (ih >> 8) & 0x7;
239 sprintf(str, "mcbus%d mid %d PCI Slot %d PCI Interrupt Pin %c irq",
240 gidx, midx + 4, slot, pidx + 'A');
241 return (str);
242 }
243
244 void
245 kn300_iointr(framep, vec)
246 void *framep;
247 unsigned long vec;
248 {
249 struct mcpcia_softc *mcp;
250 int v, gidx, midx;
251 extern struct cfdriver mcpcia_cd;
252
253 if (vec >= MCPCIA_VEC_EISA && vec < MCPCIA_VEC_PCI) {
254 #if NSIO > 0
255 sio_iointr(framep, vec);
256 return;
257 #else
258 printf("kn300_iointr: (E)ISA interrupt support not configured"
259 " for vector 0x%x", vec);
260 kn300_disable_intr(mcpcia_eisaccp, KN300_PCEB_IRQ);
261 #endif
262 }
263
264 v = (int) vec - MCPCIA_VEC_PCI;
265
266 midx = v / 0x200;
267 gidx = midx / 4;
268 midx = midx % 4;
269
270
271 #ifdef EVCNT_COUNTERS
272 kn300_intr_evcnt.ev_count++;
273 #endif
274 /*
275 * Check for i2c bus interrupts XXXXXXXXX
276 */
277 if (gidx == 0 && midx == 0 && vec == MCPCIA_I2C_CVEC) {
278 #ifndef EVCNT_COUNTERS
279 intrcnt[INTRCNT_KN300_I2C_CTRL]++;
280 #endif
281 printf("i2c: controller interrupt\n");
282 return;
283 }
284 if (gidx == 0 && midx == 0 && vec == MCPCIA_I2C_BVEC) {
285 #ifndef EVCNT_COUNTERS
286 intrcnt[INTRCNT_KN300_I2C_BUS]++;
287 #endif
288 printf("i2c: bus interrupt\n");
289 return;
290 }
291
292
293 /*
294 * Convert vector offset into a dense number.
295 */
296
297 v /= 0x10;
298 #ifndef EVCNT_COUNTERS
299 if (savirqs[v] >= 0 && savirqs[v] <= INTRCNT_KN300_NCR810) {
300 intrcnt[INTRCNT_KN300_IRQ + savirqs[v]]++;
301 }
302 #endif
303
304 if (alpha_shared_intr_dispatch(kn300_pci_intr, v))
305 return;
306
307 /*
308 * Stray interrupt; disable the IRQ on the appropriate MCPCIA
309 * if we've reached the limit.
310 */
311 alpha_shared_intr_stray(kn300_pci_intr, savirqs[v], kn300_spurious(v));
312 if (ALPHA_SHARED_INTR_DISABLE(kn300_pci_intr, v) == 0)
313 return;
314
315 mcp = mcpcia_cd.cd_devs[savunit[v]];
316 kn300_disable_intr(mcp->mcpcia_cc, savirqs[v]);
317 }
318
319 void
320 kn300_enable_intr(ccp, irq)
321 struct mcpcia_config *ccp;
322 int irq;
323 {
324 alpha_mb();
325 REGVAL(MCPCIA_INT_MASK0(ccp)) |= (1 << irq);
326 alpha_mb();
327 }
328
329 void
330 kn300_disable_intr(ccp, irq)
331 struct mcpcia_config *ccp;
332 int irq;
333 {
334 alpha_mb();
335 REGVAL(MCPCIA_INT_MASK0(ccp)) &= ~(1 << irq);
336 alpha_mb();
337 }
338