sys/powerpc/ps3/ps3pic.c

   1 /*-
   2  * Copyright 2010 Nathan Whitehorn
   3  *
   4  * Redistribution and use in source and binary forms, with or without
   5  * modification, are permitted provided that the following conditions
   6  * are met:
   7  * 1. Redistributions of source code must retain the above copyright
   8  *    notice, this list of conditions and the following disclaimer.
   9  * 2. Redistributions in binary form must reproduce the above copyright
  10  *    notice, this list of conditions and the following disclaimer in the
  11  *    documentation and/or other materials provided with the distribution.
  12  *
  13  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  14  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  15  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  16  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  17  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
  18  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
  19  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
  20  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
  21  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  22  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  23  * SUCH DAMAGE.
  24  *
  25  * $FreeBSD$
  26  */
  27
  28 #include <sys/param.h>
  29 #include <sys/systm.h>
  30 #include <sys/module.h>
  31 #include <sys/bus.h>
  32 #include <sys/conf.h>
  33 #include <sys/kernel.h>
  34 #include <sys/malloc.h>
  35
  36 #include <vm/vm.h>
  37 #include <vm/pmap.h>
  38
  39 #include <machine/bus.h>
  40 #include <machine/intr_machdep.h>
  41 #include <machine/md_var.h>
  42 #include <machine/platform.h>
  43
  44 #include "ps3-hvcall.h"
  45 #include "pic_if.h"
  46
  47 static void     ps3pic_identify(driver_t *driver, device_t parent);
  48 static int      ps3pic_probe(device_t);
  49 static int      ps3pic_attach(device_t);
  50
  51 static void     ps3pic_dispatch(device_t, struct trapframe *);
  52 static void     ps3pic_enable(device_t, u_int, u_int);
  53 static void     ps3pic_eoi(device_t, u_int);
  54 static void     ps3pic_ipi(device_t, u_int);
  55 static void     ps3pic_mask(device_t, u_int);
  56 static void     ps3pic_unmask(device_t, u_int);
  57
  58 struct ps3pic_softc {
  59         volatile uint64_t *bitmap_thread0;
  60         volatile uint64_t *mask_thread0;
  61         volatile uint64_t *bitmap_thread1;
  62         volatile uint64_t *mask_thread1;
  63
  64         uint64_t        sc_ipi_outlet[2];
  65         uint64_t        sc_ipi_virq;
  66         int             sc_vector[64];
  67 };
  68
  69 static device_method_t  ps3pic_methods[] = {
  70         /* Device interface */
  71         DEVMETHOD(device_identify,      ps3pic_identify),
  72         DEVMETHOD(device_probe,         ps3pic_probe),
  73         DEVMETHOD(device_attach,        ps3pic_attach),
  74
  75         /* PIC interface */
  76         DEVMETHOD(pic_dispatch,         ps3pic_dispatch),
  77         DEVMETHOD(pic_enable,           ps3pic_enable),
  78         DEVMETHOD(pic_eoi,              ps3pic_eoi),
  79         DEVMETHOD(pic_ipi,              ps3pic_ipi),
  80         DEVMETHOD(pic_mask,             ps3pic_mask),
  81         DEVMETHOD(pic_unmask,           ps3pic_unmask),
  82
  83         { 0, 0 },
  84 };
  85
  86 static driver_t ps3pic_driver = {
  87         "ps3pic",
  88         ps3pic_methods,
  89         sizeof(struct ps3pic_softc)
  90 };
  91
  92 static devclass_t ps3pic_devclass;
  93
  94 DRIVER_MODULE(ps3pic, nexus, ps3pic_driver, ps3pic_devclass, 0, 0);
  95
  96 static MALLOC_DEFINE(M_PS3PIC, "ps3pic", "PS3 PIC");
  97
  98 static void
  99 ps3pic_identify(driver_t *driver, device_t parent)
 100 {
 101         if (strcmp(installed_platform(), "ps3") != 0)
 102                 return;
 103
 104         if (device_find_child(parent, "ps3pic", -1) == NULL)
 105                 BUS_ADD_CHILD(parent, 0, "ps3pic", 0);
 106 }
 107
 108 static int
 109 ps3pic_probe(device_t dev)
 110 {
 111         device_set_desc(dev, "Playstation 3 interrupt controller");
 112         return (BUS_PROBE_NOWILDCARD);
 113 }
 114
 115 static int
 116 ps3pic_attach(device_t dev)
 117 {
 118         struct ps3pic_softc *sc;
 119         uint64_t ppe;
 120         int thread;
 121
 122         sc = device_get_softc(dev);
 123
 124         sc->bitmap_thread0 = contigmalloc(128 /* 512 bits * 2 */, M_PS3PIC,
 125             M_NOWAIT | M_ZERO, 0, BUS_SPACE_MAXADDR, 64 /* alignment */,
 126             PAGE_SIZE /* boundary */);
 127         sc->mask_thread0 = sc->bitmap_thread0 + 4;
 128         sc->bitmap_thread1 = sc->bitmap_thread0 + 8;
 129         sc->mask_thread1 = sc->bitmap_thread0 + 12;
 130
 131         lv1_get_logical_ppe_id(&ppe);
 132         thread = 32 - fls(mfctrl());
 133         lv1_configure_irq_state_bitmap(ppe, thread,
 134             vtophys(sc->bitmap_thread0));
 135
 136         sc->sc_ipi_virq = 63;
 137
 138 #ifdef SMP
 139         lv1_configure_irq_state_bitmap(ppe, !thread,
 140             vtophys(sc->bitmap_thread1));
 141
 142         /* Map both IPIs to the same VIRQ to avoid changes in intr_machdep */
 143         lv1_construct_event_receive_port(&sc->sc_ipi_outlet[0]);
 144         lv1_connect_irq_plug_ext(ppe, thread, sc->sc_ipi_virq,
 145             sc->sc_ipi_outlet[0], 0);
 146         lv1_construct_event_receive_port(&sc->sc_ipi_outlet[1]);
 147         lv1_connect_irq_plug_ext(ppe, !thread, sc->sc_ipi_virq,
 148             sc->sc_ipi_outlet[1], 0);
 149 #endif
 150
 151         powerpc_register_pic(dev, 0, sc->sc_ipi_virq, 1, FALSE);
 152         return (0);
 153 }
 154
 155 /*
 156  * PIC I/F methods.
 157  */
 158
 159 static void
 160 ps3pic_dispatch(device_t dev, struct trapframe *tf)
 161 {
 162         uint64_t bitmap, mask;
 163         int irq;
 164         struct ps3pic_softc *sc;
 165
 166         sc = device_get_softc(dev);
 167
 168         if (PCPU_GET(cpuid) == 0) {
 169                 bitmap = sc->bitmap_thread0[0];
 170                 mask = sc->mask_thread0[0];
 171         } else {
 172                 bitmap = sc->bitmap_thread1[0];
 173                 mask = sc->mask_thread1[0];
 174         }
 175
 176         while ((irq = ffsl(bitmap & mask) - 1) != -1) {
 177                 bitmap &= ~(1UL << irq);
 178                 powerpc_dispatch_intr(sc->sc_vector[63 - irq], tf);
 179         }
 180 }
 181
 182 static void
 183 ps3pic_enable(device_t dev, u_int irq, u_int vector)
 184 {
 185         struct ps3pic_softc *sc;
 186
 187         sc = device_get_softc(dev);
 188         sc->sc_vector[irq] = vector;
 189
 190         ps3pic_unmask(dev, irq);
 191 }
 192
 193 static void
 194 ps3pic_eoi(device_t dev, u_int irq)
 195 {
 196         uint64_t ppe;
 197         int thread;
 198
 199         lv1_get_logical_ppe_id(&ppe);
 200         thread = 32 - fls(mfctrl());
 201
 202         lv1_end_of_interrupt_ext(ppe, thread, irq);
 203 }
 204
 205 static void
 206 ps3pic_ipi(device_t dev, u_int cpu)
 207 {
 208         struct ps3pic_softc *sc;
 209         sc = device_get_softc(dev);
 210
 211         lv1_send_event_locally(sc->sc_ipi_outlet[cpu]);
 212 }
 213
 214 static void
 215 ps3pic_mask(device_t dev, u_int irq)
 216 {
 217         struct ps3pic_softc *sc;
 218         uint64_t ppe;
 219
 220         sc = device_get_softc(dev);
 221
 222         /* Do not mask IPIs! */
 223         if (irq == sc->sc_ipi_virq)
 224                 return;
 225
 226         atomic_clear_64(&sc->mask_thread0[0], 1UL << (63 - irq));
 227         atomic_clear_64(&sc->mask_thread1[0], 1UL << (63 - irq));
 228
 229         lv1_get_logical_ppe_id(&ppe);
 230         lv1_did_update_interrupt_mask(ppe, 0);
 231         lv1_did_update_interrupt_mask(ppe, 1);
 232 }
 233
 234 static void
 235 ps3pic_unmask(device_t dev, u_int irq)
 236 {
 237         struct ps3pic_softc *sc;
 238         uint64_t ppe;
 239
 240         sc = device_get_softc(dev);
 241         atomic_set_64(&sc->mask_thread0[0], 1UL << (63 - irq));
 242         atomic_set_64(&sc->mask_thread1[0], 1UL << (63 - irq));
 243
 244         lv1_get_logical_ppe_id(&ppe);
 245         lv1_did_update_interrupt_mask(ppe, 0);
 246         lv1_did_update_interrupt_mask(ppe, 1);
 247 }