arch/m68k/mac/psc.c

   1 /*
   2  *      Apple Peripheral System Controller (PSC)
   3  *
   4  *      The PSC is used on the AV Macs to control IO functions not handled
   5  *      by the VIAs (Ethernet, DSP, SCC).
   6  *
   7  * TO DO:
   8  *
   9  * Try to figure out what's going on in pIFR5 and pIFR6. There seem to be
  10  * persisant interrupt conditions in those registers and I have no idea what
  11  * they are. Granted it doesn't affect since we're not enabling any interrupts
  12  * on those levels at the moment, but it would be nice to know. I have a feeling
  13  * they aren't actually interrupt lines but data lines (to the DSP?)
  14  */
  15
  16 #include <linux/types.h>
  17 #include <linux/kernel.h>
  18 #include <linux/mm.h>
  19 #include <linux/delay.h>
  20 #include <linux/init.h>
  21
  22 #include <asm/traps.h>
  23 #include <asm/bootinfo.h>
  24 #include <asm/macintosh.h>
  25 #include <asm/macints.h>
  26 #include <asm/mac_psc.h>
  27
  28 #define DEBUG_PSC
  29
  30 int psc_present;
  31 volatile __u8 *psc;
  32
  33 void psc_irq(int, void *, struct pt_regs *);
  34
  35 /*
  36  * Debugging dump, used in various places to see what's going on.
  37  */
  38
  39 void psc_debug_dump(void)
  40 {
  41         int     i;
  42
  43         if (!psc_present) return;
  44         for (i = 0x30 ; i < 0x70 ; i += 0x10) {
  45                 printk("PSC #%d:  IFR = 0x%02X IER = 0x%02X\n",
  46                         i >> 4,
  47                         (int) psc_read_byte(pIFRbase + i),
  48                         (int) psc_read_byte(pIERbase + i));
  49         }
  50 }
  51
  52 /*
  53  * Try to kill all DMA channels on the PSC. Not sure how this his
  54  * supposed to work; this is code lifted from macmace.c and then
  55  * expanded to cover what I think are the other 7 channels.
  56  */
  57
  58 void psc_dma_die_die_die(void)
  59 {
  60         int i;
  61
  62         printk("Killing all PSC DMA channels...");
  63         for (i = 0 ; i < 9 ; i++) {
  64                 psc_write_word(PSC_CTL_BASE + (i << 4), 0x8800);
  65                 psc_write_word(PSC_CTL_BASE + (i << 4), 0x1000);
  66                 psc_write_word(PSC_CMD_BASE + (i << 5), 0x1100);
  67                 psc_write_word(PSC_CMD_BASE + (i << 5) + 0x10, 0x1100);
  68         }
  69         printk("done!\n");
  70 }
  71
  72 /*
  73  * Initialize the PSC. For now this just involves shutting down all
  74  * interrupt sources using the IERs.
  75  */
  76
  77 void __init psc_init(void)
  78 {
  79         int i;
  80
  81         if (macintosh_config->ident != MAC_MODEL_C660
  82          && macintosh_config->ident != MAC_MODEL_Q840)
  83         {
  84                 psc = NULL;
  85                 psc_present = 0;
  86                 return;
  87         }
  88
  89         /*
  90          * The PSC is always at the same spot, but using psc
  91          * keeps things consisant with the psc_xxxx functions.
  92          */
  93
  94         psc = (void *) PSC_BASE;
  95         psc_present = 1;
  96
  97         printk("PSC detected at %p\n", psc);
  98
  99         psc_dma_die_die_die();
 100
 101 #ifdef DEBUG_PSC
 102         psc_debug_dump();
 103 #endif
 104         /*
 105          * Mask and clear all possible interrupts
 106          */
 107
 108         for (i = 0x30 ; i < 0x70 ; i += 0x10) {
 109                 psc_write_byte(pIERbase + i, 0x0F);
 110                 psc_write_byte(pIFRbase + i, 0x0F);
 111         }
 112 }
 113
 114 /*
 115  * Register the PSC interrupt dispatchers for autovector interrupts 3-6.
 116  */
 117
 118 void __init psc_register_interrupts(void)
 119 {
 120         sys_request_irq(3, psc_irq, IRQ_FLG_LOCK, "psc3",
 121                         (void *) 0x30);
 122         sys_request_irq(4, psc_irq, IRQ_FLG_LOCK, "psc4",
 123                         (void *) 0x40);
 124         sys_request_irq(5, psc_irq, IRQ_FLG_LOCK, "psc5",
 125                         (void *) 0x50);
 126         sys_request_irq(6, psc_irq, IRQ_FLG_LOCK, "psc6",
 127                         (void *) 0x60);
 128 }
 129
 130 /*
 131  * PSC interrupt handler. It's a lot like the VIA interrupt handler.
 132  */
 133
 134 void psc_irq(int irq, void *dev_id, struct pt_regs *regs)
 135 {
 136         int pIFR        = pIFRbase + ((int) dev_id);
 137         int pIER        = pIERbase + ((int) dev_id);
 138         int base_irq;
 139         int irq_bit,i;
 140         unsigned char events;
 141
 142         base_irq = irq << 3;
 143
 144 #ifdef DEBUG_IRQS
 145         printk("psc_irq: irq %d pIFR = 0x%02X pIER = 0x%02X\n",
 146                 irq, (int) psc_read_byte(pIFR), (int) psc_read_byte(pIER));
 147 #endif
 148
 149         events = psc_read_byte(pIFR) & psc_read_byte(pIER) & 0xF;
 150         if (!events) return;
 151
 152         for (i = 0, irq_bit = 1 ; i < 4 ; i++, irq_bit <<= 1) {
 153                 if (events & irq_bit) {
 154                         psc_write_byte(pIER, irq_bit);
 155                         mac_do_irq_list(base_irq + i, regs);
 156                         psc_write_byte(pIFR, irq_bit);
 157                         psc_write_byte(pIER, irq_bit | 0x80);
 158                 }
 159         }
 160 }
 161
 162 void psc_irq_enable(int irq) {
 163         int irq_src     = IRQ_SRC(irq);
 164         int irq_idx     = IRQ_IDX(irq);
 165         int pIER        = pIERbase + (irq_src << 4);
 166
 167 #ifdef DEBUG_IRQUSE
 168         printk("psc_irq_enable(%d)\n", irq);
 169 #endif
 170         psc_write_byte(pIER, (1 << irq_idx) | 0x80);
 171 }
 172
 173 void psc_irq_disable(int irq) {
 174         int irq_src     = IRQ_SRC(irq);
 175         int irq_idx     = IRQ_IDX(irq);
 176         int pIER        = pIERbase + (irq_src << 4);
 177
 178 #ifdef DEBUG_IRQUSE
 179         printk("psc_irq_disable(%d)\n", irq);
 180 #endif
 181         psc_write_byte(pIER, 1 << irq_idx);
 182 }
 183
 184 void psc_irq_clear(int irq) {
 185         int irq_src     = IRQ_SRC(irq);
 186         int irq_idx     = IRQ_IDX(irq);
 187         int pIFR        = pIERbase + (irq_src << 4);
 188
 189         psc_write_byte(pIFR, 1 << irq_idx);
 190 }
 191
 192 int psc_irq_pending(int irq)
 193 {
 194         int irq_src     = IRQ_SRC(irq);
 195         int irq_idx     = IRQ_IDX(irq);
 196         int pIFR        = pIERbase + (irq_src << 4);
 197
 198         return psc_read_byte(pIFR) & (1 << irq_idx);
 199 }