1 /* $NetBSD: pci_kn20aa.c,v 1.44 2002/09/27 15:35:38 provos Exp $ */ 2 3 /* 4 * Copyright (c) 1995, 1996 Carnegie-Mellon University. 5 * All rights reserved. 6 * 7 * Author: Chris G. Demetriou 8 * 9 * Permission to use, copy, modify and distribute this software and 10 * its documentation is hereby granted, provided that both the copyright 11 * notice and this permission notice appear in all copies of the 12 * software, derivative works or modified versions, and any portions 13 * thereof, and that both notices appear in supporting documentation. 14 * 15 * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS" 16 * CONDITION. CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND 17 * FOR ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE. 18 * 19 * Carnegie Mellon requests users of this software to return to 20 * 21 * Software Distribution Coordinator or Software.Distribution@CS.CMU.EDU 22 * School of Computer Science 23 * Carnegie Mellon University 24 * Pittsburgh PA 15213-3890 25 * 26 * any improvements or extensions that they make and grant Carnegie the 27 * rights to redistribute these changes. 28 */ 29 30 #include <sys/cdefs.h> /* RCS ID & Copyright macro defns */ 31 32 __KERNEL_RCSID(0, "$NetBSD: pci_kn20aa.c,v 1.44 2002/09/27 15:35:38 provos Exp $"); 33 34 #include <sys/types.h> 35 #include <sys/param.h> 36 #include <sys/time.h> 37 #include <sys/systm.h> 38 #include <sys/errno.h> 39 #include <sys/malloc.h> 40 #include <sys/device.h> 41 #include <sys/syslog.h> 42 43 #include <uvm/uvm_extern.h> 44 45 #include <machine/autoconf.h> 46 47 #include <dev/pci/pcireg.h> 48 #include <dev/pci/pcivar.h> 49 50 #include <alpha/pci/ciareg.h> 51 #include <alpha/pci/ciavar.h> 52 53 #include <alpha/pci/pci_kn20aa.h> 54 55 #include "sio.h" 56 #if NSIO > 0 || NPCEB > 0 57 #include <alpha/pci/siovar.h> 58 #endif 59 60 int dec_kn20aa_intr_map __P((struct pci_attach_args *, 61 pci_intr_handle_t *)); 62 const char *dec_kn20aa_intr_string __P((void *, pci_intr_handle_t)); 63 const struct evcnt *dec_kn20aa_intr_evcnt __P((void *, pci_intr_handle_t)); 64 void *dec_kn20aa_intr_establish __P((void *, pci_intr_handle_t, 65 int, int (*func)(void *), void *)); 66 void dec_kn20aa_intr_disestablish __P((void *, void *)); 67 68 #define KN20AA_PCEB_IRQ 31 69 #define KN20AA_MAX_IRQ 32 70 #define PCI_STRAY_MAX 5 71 72 struct alpha_shared_intr *kn20aa_pci_intr; 73 74 void kn20aa_iointr __P((void *arg, unsigned long vec)); 75 void kn20aa_enable_intr __P((int irq)); 76 void kn20aa_disable_intr __P((int irq)); 77 78 void 79 pci_kn20aa_pickintr(ccp) 80 struct cia_config *ccp; 81 { 82 int i; 83 #if NSIO > 0 || NPCEB > 0 84 bus_space_tag_t iot = &ccp->cc_iot; 85 #endif 86 pci_chipset_tag_t pc = &ccp->cc_pc; 87 char *cp; 88 89 pc->pc_intr_v = ccp; 90 pc->pc_intr_map = dec_kn20aa_intr_map; 91 pc->pc_intr_string = dec_kn20aa_intr_string; 92 pc->pc_intr_evcnt = dec_kn20aa_intr_evcnt; 93 pc->pc_intr_establish = dec_kn20aa_intr_establish; 94 pc->pc_intr_disestablish = dec_kn20aa_intr_disestablish; 95 96 /* Not supported on KN20AA. */ 97 pc->pc_pciide_compat_intr_establish = NULL; 98 99 kn20aa_pci_intr = alpha_shared_intr_alloc(KN20AA_MAX_IRQ, 8); 100 for (i = 0; i < KN20AA_MAX_IRQ; i++) { 101 alpha_shared_intr_set_maxstrays(kn20aa_pci_intr, i, 102 PCI_STRAY_MAX); 103 104 cp = alpha_shared_intr_string(kn20aa_pci_intr, i); 105 sprintf(cp, "irq %d", i); 106 evcnt_attach_dynamic(alpha_shared_intr_evcnt( 107 kn20aa_pci_intr, i), EVCNT_TYPE_INTR, NULL, 108 "kn20aa", cp); 109 } 110 111 #if NSIO > 0 || NPCEB > 0 112 sio_intr_setup(pc, iot); 113 kn20aa_enable_intr(KN20AA_PCEB_IRQ); 114 #endif 115 } 116 117 int 118 dec_kn20aa_intr_map(pa, ihp) 119 struct pci_attach_args *pa; 120 pci_intr_handle_t *ihp; 121 { 122 pcitag_t bustag = pa->pa_intrtag; 123 int buspin = pa->pa_intrpin; 124 pci_chipset_tag_t pc = pa->pa_pc; 125 int device; 126 int kn20aa_irq; 127 128 if (buspin == 0) { 129 /* No IRQ used. */ 130 return 1; 131 } 132 if (buspin > 4) { 133 printf("dec_kn20aa_intr_map: bad interrupt pin %d\n", buspin); 134 return 1; 135 } 136 137 /* 138 * Slot->interrupt translation. Appears to work, though it 139 * may not hold up forever. 140 * 141 * The DEC engineers who did this hardware obviously engaged 142 * in random drug testing. 143 */ 144 pci_decompose_tag(pc, bustag, NULL, &device, NULL); 145 switch (device) { 146 case 11: 147 case 12: 148 kn20aa_irq = ((device - 11) + 0) * 4; 149 break; 150 151 case 7: 152 kn20aa_irq = 8; 153 break; 154 155 case 9: 156 kn20aa_irq = 12; 157 break; 158 159 case 6: /* 21040 on AlphaStation 500 */ 160 kn20aa_irq = 13; 161 break; 162 163 case 8: 164 kn20aa_irq = 16; 165 break; 166 167 default: 168 printf("dec_kn20aa_intr_map: weird device number %d\n", 169 device); 170 return 1; 171 } 172 173 kn20aa_irq += buspin - 1; 174 if (kn20aa_irq > KN20AA_MAX_IRQ) 175 panic("dec_kn20aa_intr_map: kn20aa_irq too large (%d)", 176 kn20aa_irq); 177 178 *ihp = kn20aa_irq; 179 return (0); 180 } 181 182 const char * 183 dec_kn20aa_intr_string(ccv, ih) 184 void *ccv; 185 pci_intr_handle_t ih; 186 { 187 #if 0 188 struct cia_config *ccp = ccv; 189 #endif 190 static char irqstr[15]; /* 11 + 2 + NULL + sanity */ 191 192 if (ih > KN20AA_MAX_IRQ) 193 panic("dec_kn20aa_intr_string: bogus kn20aa IRQ 0x%lx", 194 ih); 195 196 sprintf(irqstr, "kn20aa irq %ld", ih); 197 return (irqstr); 198 } 199 200 const struct evcnt * 201 dec_kn20aa_intr_evcnt(ccv, ih) 202 void *ccv; 203 pci_intr_handle_t ih; 204 { 205 #if 0 206 struct cia_config *ccp = ccv; 207 #endif 208 209 if (ih > KN20AA_MAX_IRQ) 210 panic("dec_kn20aa_intr_string: bogus kn20aa IRQ 0x%lx", ih); 211 return (alpha_shared_intr_evcnt(kn20aa_pci_intr, ih)); 212 } 213 214 void * 215 dec_kn20aa_intr_establish(ccv, ih, level, func, arg) 216 void *ccv, *arg; 217 pci_intr_handle_t ih; 218 int level; 219 int (*func) __P((void *)); 220 { 221 #if 0 222 struct cia_config *ccp = ccv; 223 #endif 224 void *cookie; 225 226 if (ih > KN20AA_MAX_IRQ) 227 panic("dec_kn20aa_intr_establish: bogus kn20aa IRQ 0x%lx", 228 ih); 229 230 cookie = alpha_shared_intr_establish(kn20aa_pci_intr, ih, IST_LEVEL, 231 level, func, arg, "kn20aa irq"); 232 233 if (cookie != NULL && 234 alpha_shared_intr_firstactive(kn20aa_pci_intr, ih)) { 235 scb_set(0x900 + SCB_IDXTOVEC(ih), kn20aa_iointr, NULL); 236 kn20aa_enable_intr(ih); 237 } 238 return (cookie); 239 } 240 241 void 242 dec_kn20aa_intr_disestablish(ccv, cookie) 243 void *ccv, *cookie; 244 { 245 #if 0 246 struct cia_config *ccp = ccv; 247 #endif 248 struct alpha_shared_intrhand *ih = cookie; 249 unsigned int irq = ih->ih_num; 250 int s; 251 252 s = splhigh(); 253 254 alpha_shared_intr_disestablish(kn20aa_pci_intr, cookie, 255 "kn20aa irq"); 256 if (alpha_shared_intr_isactive(kn20aa_pci_intr, irq) == 0) { 257 kn20aa_disable_intr(irq); 258 alpha_shared_intr_set_dfltsharetype(kn20aa_pci_intr, irq, 259 IST_NONE); 260 scb_free(0x900 + SCB_IDXTOVEC(irq)); 261 } 262 263 splx(s); 264 } 265 266 void 267 kn20aa_iointr(arg, vec) 268 void *arg; 269 unsigned long vec; 270 { 271 int irq; 272 273 irq = SCB_VECTOIDX(vec - 0x900); 274 275 if (!alpha_shared_intr_dispatch(kn20aa_pci_intr, irq)) { 276 alpha_shared_intr_stray(kn20aa_pci_intr, irq, 277 "kn20aa irq"); 278 if (ALPHA_SHARED_INTR_DISABLE(kn20aa_pci_intr, irq)) 279 kn20aa_disable_intr(irq); 280 } 281 } 282 283 void 284 kn20aa_enable_intr(irq) 285 int irq; 286 { 287 288 /* 289 * From disassembling small bits of the OSF/1 kernel: 290 * the following appears to enable a given interrupt request. 291 * "blech." I'd give valuable body parts for better docs or 292 * for a good decompiler. 293 */ 294 alpha_mb(); 295 REGVAL(0x8780000000L + 0x40L) |= (1 << irq); /* XXX */ 296 alpha_mb(); 297 } 298 299 void 300 kn20aa_disable_intr(irq) 301 int irq; 302 { 303 304 alpha_mb(); 305 REGVAL(0x8780000000L + 0x40L) &= ~(1 << irq); /* XXX */ 306 alpha_mb(); 307 } 308