sys/arch/alpha/pci/pci_kn300.c

   1 /* $NetBSD: pci_kn300.c,v 1.31 2009/03/14 15:35:59 dsl 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.31 2009/03/14 15:35:59 dsl 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 <uvm/uvm_extern.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 #include "sio.h"
  60 #if NSIO > 0 || NPCEB > 0
  61 #include <alpha/pci/siovar.h>
  62 #endif
  63
  64 int     dec_kn300_intr_map(struct pci_attach_args *,
  65             pci_intr_handle_t *);
  66 const char *dec_kn300_intr_string(void *, pci_intr_handle_t);
  67 const struct evcnt *dec_kn300_intr_evcnt(void *, pci_intr_handle_t);
  68 void    *dec_kn300_intr_establish(void *, pci_intr_handle_t,
  69             int, int (*func)(void *), void *);
  70 void    dec_kn300_intr_disestablish(void *, void *);
  71
  72 #define KN300_PCEB_IRQ  16
  73 #define NPIN            4
  74
  75 #define NIRQ    (MAX_MC_BUS * MCPCIA_PER_MCBUS * MCPCIA_MAXSLOT * NPIN)
  76 static int savirqs[NIRQ];
  77
  78 static struct alpha_shared_intr *kn300_pci_intr;
  79
  80 static struct mcpcia_config *mcpcia_eisaccp = NULL;
  81
  82 void    kn300_iointr(void *, unsigned long);
  83 void    kn300_enable_intr(struct mcpcia_config *, int);
  84 void    kn300_disable_intr(struct mcpcia_config *, int);
  85
  86 void
  87 pci_kn300_pickintr(struct mcpcia_config *ccp, int first)
  88 {
  89         char *cp;
  90         pci_chipset_tag_t pc = &ccp->cc_pc;
  91
  92         if (first) {
  93                 int g;
  94
  95                 kn300_pci_intr = alpha_shared_intr_alloc(NIRQ, 16);
  96                 for (g = 0; g < NIRQ; g++) {
  97                         alpha_shared_intr_set_maxstrays(kn300_pci_intr, g, 25);
  98                         cp = alpha_shared_intr_string(kn300_pci_intr, g);
  99                         sprintf(cp, "irq %d", g);
 100                         evcnt_attach_dynamic(alpha_shared_intr_evcnt(
 101                             kn300_pci_intr, g), EVCNT_TYPE_INTR, NULL,
 102                             "kn300", cp);
 103                         savirqs[g] = (char) -1;
 104                 }
 105         }
 106
 107         pc->pc_intr_v = ccp;
 108         pc->pc_intr_map = dec_kn300_intr_map;
 109         pc->pc_intr_string = dec_kn300_intr_string;
 110         pc->pc_intr_evcnt = dec_kn300_intr_evcnt;
 111         pc->pc_intr_establish = dec_kn300_intr_establish;
 112         pc->pc_intr_disestablish = dec_kn300_intr_disestablish;
 113
 114         /* Not supported on KN300. */
 115         pc->pc_pciide_compat_intr_establish = NULL;
 116
 117         if (EISA_PRESENT(REGVAL(MCPCIA_PCI_REV(ccp)))) {
 118                 mcpcia_eisaccp = ccp;
 119 #if NSIO > 0 || NPCEB > 0
 120                 sio_intr_setup(pc, &ccp->cc_iot);
 121                 kn300_enable_intr(ccp, KN300_PCEB_IRQ);
 122 #endif
 123         }
 124 }
 125
 126 int
 127 dec_kn300_intr_map(struct pci_attach_args *pa, pci_intr_handle_t *ihp)
 128 {
 129         pcitag_t bustag = pa->pa_intrtag;
 130         int buspin = pa->pa_intrpin;
 131         pci_chipset_tag_t pc = pa->pa_pc;
 132         struct mcpcia_config *ccp = (struct mcpcia_config *)pc->pc_intr_v;
 133         int device;
 134         int mcpcia_irq;
 135
 136         if (buspin == 0) {
 137                 /* No IRQ used. */
 138                 return 1;
 139         }
 140         if (buspin > 4 || buspin < 0) {
 141                 printf("dec_kn300_intr_map: bad interrupt pin %d\n", buspin);
 142                 return 1;
 143         }
 144
 145         pci_decompose_tag(pc, bustag, NULL, &device, NULL);
 146
 147         /*
 148          * On MID 5 device 1 is the internal NCR 53c810.
 149          */
 150         if (ccp->cc_mid == 5 && device == 1) {
 151                 mcpcia_irq = 16;
 152         } else if (device >= 2 && device <= 5) {
 153                 mcpcia_irq = (device - 2) * 4 + buspin - 1;
 154         } else {
 155                 printf("dec_kn300_intr_map: weird device number %d\n", device);
 156                 return(1);
 157         }
 158
 159         /*
 160          * handle layout:
 161          *
 162          *      Determine kn300 IRQ (encoded in SCB vector):
 163          *      bits 0..1       buspin-1
 164          *      bits 2..4       PCI Slot (0..7- yes, some don't exist)
 165          *      bits 5..7       MID-4
 166          *      bits 8..10      7-GID
 167          *
 168          *      Software only:
 169          *      bits 11-15      MCPCIA IRQ
 170          */
 171         *ihp = (pci_intr_handle_t)
 172                 (buspin - 1                         )   |
 173                 ((device & 0x7)                 << 2)   |
 174                 ((ccp->cc_mid - 4)              << 5)   |
 175                 ((7 - ccp->cc_gid)              << 8)   |
 176                 (mcpcia_irq                     << 11);
 177         return (0);
 178 }
 179
 180 const char *
 181 dec_kn300_intr_string(void *ccv, pci_intr_handle_t ih)
 182 {
 183         static char irqstr[64];
 184
 185         sprintf(irqstr, "kn300 irq %ld", ih & 0x3ff);
 186         return (irqstr);
 187 }
 188
 189 const struct evcnt *
 190 dec_kn300_intr_evcnt(void *ccv, pci_intr_handle_t ih)
 191 {
 192
 193         return (alpha_shared_intr_evcnt(kn300_pci_intr, ih & 0x3ff));
 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)(void *);
 202         void *arg;
 203 {
 204         struct mcpcia_config *ccp = ccv;
 205         void *cookie;
 206         int irq;
 207
 208         irq = ih & 0x3ff;
 209         cookie = alpha_shared_intr_establish(kn300_pci_intr, irq, IST_LEVEL,
 210             level, func, arg, "kn300 irq");
 211
 212         if (cookie != NULL &&
 213             alpha_shared_intr_firstactive(kn300_pci_intr, irq)) {
 214                 scb_set(MCPCIA_VEC_PCI + SCB_IDXTOVEC(irq),
 215                     kn300_iointr, NULL, level);
 216                 alpha_shared_intr_set_private(kn300_pci_intr, irq, ccp);
 217                 savirqs[irq] = (ih >> 11) & 0x1f;
 218                 kn300_enable_intr(ccp, savirqs[irq]);
 219                 alpha_mb();
 220         }
 221         return (cookie);
 222 }
 223
 224 void
 225 dec_kn300_intr_disestablish(void *ccv, void *cookie)
 226 {
 227         panic("dec_kn300_intr_disestablish not implemented");
 228 }
 229
 230 void
 231 kn300_iointr(void *arg, unsigned long vec)
 232 {
 233         struct mcpcia_softc *mcp;
 234         u_long irq;
 235
 236         irq = SCB_VECTOIDX(vec - MCPCIA_VEC_PCI);
 237
 238         if (alpha_shared_intr_dispatch(kn300_pci_intr, irq)) {
 239                 /*
 240                  * Any claim of an interrupt at this level is a hint to
 241                  * reset the stray interrupt count- elsewise a slow leak
 242                  * over time will cause this level to be shutdown.
 243                  */
 244                 alpha_shared_intr_reset_strays(kn300_pci_intr, irq);
 245                 return;
 246         }
 247
 248         /*
 249          * If we haven't finished configuring yet, or there is no mcp
 250          * registered for this level yet, just return.
 251          */
 252         mcp = alpha_shared_intr_get_private(kn300_pci_intr, irq);
 253         if (mcp == NULL || mcp->mcpcia_cc == NULL)
 254                 return;
 255
 256         /*
 257          * We're getting an interrupt for a device we haven't enabled.
 258          * We had better not try and use -1 to find the right bit to disable.
 259          */
 260         if (savirqs[irq] == -1) {
 261                 printf("kn300_iointr: stray interrupt vector 0x%lx\n", vec);
 262                 return;
 263         }
 264
 265         /*
 266          * Stray interrupt; disable the IRQ on the appropriate MCPCIA
 267          * if we've reached the limit.
 268          */
 269         alpha_shared_intr_stray(kn300_pci_intr, irq, "kn300 irq");
 270         if (ALPHA_SHARED_INTR_DISABLE(kn300_pci_intr, irq) == 0)
 271                 return;
 272         kn300_disable_intr(mcp->mcpcia_cc, savirqs[irq]);
 273 }
 274
 275 void
 276 kn300_enable_intr(struct mcpcia_config *ccp, int irq)
 277 {
 278         alpha_mb();
 279         REGVAL(MCPCIA_INT_MASK0(ccp)) |= (1 << irq);
 280         alpha_mb();
 281 }
 282
 283 void
 284 kn300_disable_intr(struct mcpcia_config *ccp, int irq)
 285 {
 286         alpha_mb();
 287         REGVAL(MCPCIA_INT_MASK0(ccp)) &= ~(1 << irq);
 288         alpha_mb();
 289 }