1/* $NetBSD: pci_kn20aa.c,v 1.52 2011/04/04 20:37:44 dyoung 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.52 2011/04/04 20:37:44 dyoung 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 <machine/autoconf.h> 44 45#include <dev/pci/pcireg.h> 46#include <dev/pci/pcivar.h> 47 48#include <alpha/pci/ciareg.h> 49#include <alpha/pci/ciavar.h> 50 51#include <alpha/pci/pci_kn20aa.h> 52 53#include "sio.h" 54#if NSIO > 0 || NPCEB > 0 55#include <alpha/pci/siovar.h> 56#endif 57 58int dec_kn20aa_intr_map(const struct pci_attach_args *, 59 pci_intr_handle_t *); 60const char *dec_kn20aa_intr_string(void *, pci_intr_handle_t); 61const struct evcnt *dec_kn20aa_intr_evcnt(void *, pci_intr_handle_t); 62void *dec_kn20aa_intr_establish(void *, pci_intr_handle_t, 63 int, int (*func)(void *), void *); 64void dec_kn20aa_intr_disestablish(void *, void *); 65 66#define KN20AA_PCEB_IRQ 31 67#define KN20AA_MAX_IRQ 32 68#define PCI_STRAY_MAX 5 69 70struct alpha_shared_intr *kn20aa_pci_intr; 71 72void kn20aa_iointr(void *arg, unsigned long vec); 73void kn20aa_enable_intr(int irq); 74void kn20aa_disable_intr(int irq); 75 76void 77pci_kn20aa_pickintr(struct cia_config *ccp) 78{ 79 int i; 80#if NSIO > 0 || NPCEB > 0 81 bus_space_tag_t iot = &ccp->cc_iot; 82#endif 83 pci_chipset_tag_t pc = &ccp->cc_pc; 84 char *cp; 85 86 pc->pc_intr_v = ccp; 87 pc->pc_intr_map = dec_kn20aa_intr_map; 88 pc->pc_intr_string = dec_kn20aa_intr_string; 89 pc->pc_intr_evcnt = dec_kn20aa_intr_evcnt; 90 pc->pc_intr_establish = dec_kn20aa_intr_establish; 91 pc->pc_intr_disestablish = dec_kn20aa_intr_disestablish; 92 93 /* Not supported on KN20AA. */ 94 pc->pc_pciide_compat_intr_establish = NULL; 95 96 kn20aa_pci_intr = alpha_shared_intr_alloc(KN20AA_MAX_IRQ, 8); 97 for (i = 0; i < KN20AA_MAX_IRQ; i++) { 98 alpha_shared_intr_set_maxstrays(kn20aa_pci_intr, i, 99 PCI_STRAY_MAX); 100 101 cp = alpha_shared_intr_string(kn20aa_pci_intr, i); 102 sprintf(cp, "irq %d", i); 103 evcnt_attach_dynamic(alpha_shared_intr_evcnt( 104 kn20aa_pci_intr, i), EVCNT_TYPE_INTR, NULL, 105 "kn20aa", cp); 106 } 107 108#if NSIO > 0 || NPCEB > 0 109 sio_intr_setup(pc, iot); 110 kn20aa_enable_intr(KN20AA_PCEB_IRQ); 111#endif 112} 113 114int 115dec_kn20aa_intr_map(const struct pci_attach_args *pa, pci_intr_handle_t *ihp) 116{ 117 pcitag_t bustag = pa->pa_intrtag; 118 int buspin = pa->pa_intrpin; 119 pci_chipset_tag_t pc = pa->pa_pc; 120 int device; 121 int kn20aa_irq; 122 123 if (buspin == 0) { 124 /* No IRQ used. */ 125 return 1; 126 } 127 if (buspin > 4) { 128 printf("dec_kn20aa_intr_map: bad interrupt pin %d\n", buspin); 129 return 1; 130 } 131 132 /* 133 * Slot->interrupt translation. Appears to work, though it 134 * may not hold up forever. 135 * 136 * The DEC engineers who did this hardware obviously engaged 137 * in random drug testing. 138 */ 139 pci_decompose_tag(pc, bustag, NULL, &device, NULL); 140 switch (device) { 141 case 11: 142 case 12: 143 kn20aa_irq = ((device - 11) + 0) * 4; 144 break; 145 146 case 7: 147 kn20aa_irq = 8; 148 break; 149 150 case 9: 151 kn20aa_irq = 12; 152 break; 153 154 case 6: /* 21040 on AlphaStation 500 */ 155 kn20aa_irq = 13; 156 break; 157 158 case 8: 159 kn20aa_irq = 16; 160 break; 161 162 default: 163 printf("dec_kn20aa_intr_map: weird device number %d\n", 164 device); 165 return 1; 166 } 167 168 kn20aa_irq += buspin - 1; 169 if (kn20aa_irq > KN20AA_MAX_IRQ) 170 panic("dec_kn20aa_intr_map: kn20aa_irq too large (%d)", 171 kn20aa_irq); 172 173 *ihp = kn20aa_irq; 174 return (0); 175} 176 177const char * 178dec_kn20aa_intr_string(void *ccv, pci_intr_handle_t ih) 179{ 180#if 0 181 struct cia_config *ccp = ccv; 182#endif 183 static char irqstr[15]; /* 11 + 2 + NULL + sanity */ 184 185 if (ih > KN20AA_MAX_IRQ) 186 panic("dec_kn20aa_intr_string: bogus kn20aa IRQ 0x%lx", 187 ih); 188 189 sprintf(irqstr, "kn20aa irq %ld", ih); 190 return (irqstr); 191} 192 193const struct evcnt * 194dec_kn20aa_intr_evcnt(void *ccv, pci_intr_handle_t ih) 195{ 196#if 0 197 struct cia_config *ccp = ccv; 198#endif 199 200 if (ih > KN20AA_MAX_IRQ) 201 panic("dec_kn20aa_intr_string: bogus kn20aa IRQ 0x%lx", ih); 202 return (alpha_shared_intr_evcnt(kn20aa_pci_intr, ih)); 203} 204 205void * 206dec_kn20aa_intr_establish( 207 void *ccv, 208 pci_intr_handle_t ih, 209 int level, 210 int (*func)(void *), 211 void *arg) 212{ 213#if 0 214 struct cia_config *ccp = ccv; 215#endif 216 void *cookie; 217 218 if (ih > KN20AA_MAX_IRQ) 219 panic("dec_kn20aa_intr_establish: bogus kn20aa IRQ 0x%lx", 220 ih); 221 222 cookie = alpha_shared_intr_establish(kn20aa_pci_intr, ih, IST_LEVEL, 223 level, func, arg, "kn20aa irq"); 224 225 if (cookie != NULL && 226 alpha_shared_intr_firstactive(kn20aa_pci_intr, ih)) { 227 scb_set(0x900 + SCB_IDXTOVEC(ih), kn20aa_iointr, NULL, 228 level); 229 kn20aa_enable_intr(ih); 230 } 231 return (cookie); 232} 233 234void 235dec_kn20aa_intr_disestablish(void *ccv, void *cookie) 236{ 237#if 0 238 struct cia_config *ccp = ccv; 239#endif 240 struct alpha_shared_intrhand *ih = cookie; 241 unsigned int irq = ih->ih_num; 242 int s; 243 244 s = splhigh(); 245 246 alpha_shared_intr_disestablish(kn20aa_pci_intr, cookie, 247 "kn20aa irq"); 248 if (alpha_shared_intr_isactive(kn20aa_pci_intr, irq) == 0) { 249 kn20aa_disable_intr(irq); 250 alpha_shared_intr_set_dfltsharetype(kn20aa_pci_intr, irq, 251 IST_NONE); 252 scb_free(0x900 + SCB_IDXTOVEC(irq)); 253 } 254 255 splx(s); 256} 257 258void 259kn20aa_iointr(void *arg, unsigned long vec) 260{ 261 int irq; 262 263 irq = SCB_VECTOIDX(vec - 0x900); 264 265 if (!alpha_shared_intr_dispatch(kn20aa_pci_intr, irq)) { 266 alpha_shared_intr_stray(kn20aa_pci_intr, irq, 267 "kn20aa irq"); 268 if (ALPHA_SHARED_INTR_DISABLE(kn20aa_pci_intr, irq)) 269 kn20aa_disable_intr(irq); 270 } else 271 alpha_shared_intr_reset_strays(kn20aa_pci_intr, irq); 272} 273 274void 275kn20aa_enable_intr(int irq) 276{ 277 278 /* 279 * From disassembling small bits of the OSF/1 kernel: 280 * the following appears to enable a given interrupt request. 281 * "blech." I'd give valuable body parts for better docs or 282 * for a good decompiler. 283 */ 284 alpha_mb(); 285 REGVAL(0x8780000000L + 0x40L) |= (1 << irq); /* XXX */ 286 alpha_mb(); 287} 288 289void 290kn20aa_disable_intr(int irq) 291{ 292 293 alpha_mb(); 294 REGVAL(0x8780000000L + 0x40L) &= ~(1 << irq); /* XXX */ 295 alpha_mb(); 296} 297