nkeynes@31 | 1 | /**
|
nkeynes@114 | 2 | * $Id: intc.c,v 1.5 2006-03-17 12:12:49 nkeynes Exp $
|
nkeynes@31 | 3 | *
|
nkeynes@31 | 4 | * SH4 onboard interrupt controller (INTC) implementation
|
nkeynes@31 | 5 | *
|
nkeynes@31 | 6 | * Copyright (c) 2005 Nathan Keynes.
|
nkeynes@31 | 7 | *
|
nkeynes@31 | 8 | * This program is free software; you can redistribute it and/or modify
|
nkeynes@31 | 9 | * it under the terms of the GNU General Public License as published by
|
nkeynes@31 | 10 | * the Free Software Foundation; either version 2 of the License, or
|
nkeynes@31 | 11 | * (at your option) any later version.
|
nkeynes@31 | 12 | *
|
nkeynes@31 | 13 | * This program is distributed in the hope that it will be useful,
|
nkeynes@31 | 14 | * but WITHOUT ANY WARRANTY; without even the implied warranty of
|
nkeynes@31 | 15 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
nkeynes@31 | 16 | * GNU General Public License for more details.
|
nkeynes@31 | 17 | */
|
nkeynes@31 | 18 |
|
nkeynes@1 | 19 | #include <assert.h>
|
nkeynes@1 | 20 | #include "sh4mmio.h"
|
nkeynes@1 | 21 | #include "sh4core.h"
|
nkeynes@1 | 22 | #include "intc.h"
|
nkeynes@1 | 23 |
|
nkeynes@1 | 24 | int priorities[12] = {0,0,0,0,0,0,0,0,0,0,0,0};
|
nkeynes@1 | 25 |
|
nkeynes@1 | 26 | struct intc_sources_t {
|
nkeynes@1 | 27 | char *name;
|
nkeynes@1 | 28 | uint32_t code;
|
nkeynes@1 | 29 | int priority;
|
nkeynes@1 | 30 | };
|
nkeynes@1 | 31 |
|
nkeynes@1 | 32 | #define PRIORITY(which) intc_sources[which].priority
|
nkeynes@1 | 33 | #define INTCODE(which) intc_sources[which].code
|
nkeynes@1 | 34 |
|
nkeynes@1 | 35 | static struct intc_sources_t intc_sources[] = {
|
nkeynes@1 | 36 | { "IRQ0", 0x200, 15 }, { "IRQ1", 0x220, 14 }, { "IRQ2", 0x240, 13 },
|
nkeynes@1 | 37 | { "IRQ3", 0x260, 12 }, { "IRQ4", 0x280, 11 }, { "IRQ5", 0x2A0, 10 },
|
nkeynes@1 | 38 | { "IRQ6", 0x2C0, 9 }, { "IRQ7", 0x2E0, 8 }, { "IRQ8", 0x300, 7 },
|
nkeynes@1 | 39 | { "IRQ9", 0x320, 6 }, { "IRQ10",0x340, 5 }, { "IRQ11",0x360, 4 },
|
nkeynes@1 | 40 | { "IRQ12",0x380, 3 }, { "IRQ13",0x3A0, 2 }, { "IRQ14",0x3C0, 1 },
|
nkeynes@1 | 41 | { "NMI", 0x1C0, 16 }, { "H-UDI",0x600, 0 }, { "GPIOI",0x620, 0 },
|
nkeynes@1 | 42 | { "DMTE0",0x640, 0 }, { "DMTE1",0x660, 0 }, { "DMTE2",0x680, 0 },
|
nkeynes@1 | 43 | { "DMTE3",0x6A0, 0 }, { "DMTAE",0x6C0, 0 }, { "TUNI0",0x400, 0 },
|
nkeynes@1 | 44 | { "TUNI1",0x420, 0 }, { "TUNI2",0x440, 0 }, { "TICPI2",0x460, 0 },
|
nkeynes@1 | 45 | { "RTC_ATI",0x480, 0 },{ "RTC_PRI",0x4A0, 0 },{ "RTC_CUI",0x4C0, 0 },
|
nkeynes@1 | 46 | { "SCI_ERI",0x4E0, 0 },{ "SCI_RXI",0x500, 0 },{ "SCI_TXI",0x520, 0 },
|
nkeynes@1 | 47 | { "SCI_TEI",0x540, 0 },
|
nkeynes@1 | 48 | { "SCIF_ERI",0x700, 0 },{ "SCIF_RXI",0x720, 0 },{ "SCIF_BRI",0x740, 0 },
|
nkeynes@1 | 49 | { "SCIF_TXI",0x760, 0 },
|
nkeynes@1 | 50 | { "WDT_ITI",0x560, 0 },{ "RCMI",0x580, 0 }, { "ROVI",0x5A0, 0 } };
|
nkeynes@1 | 51 |
|
nkeynes@1 | 52 | int intc_pending[INT_NUM_SOURCES];
|
nkeynes@1 | 53 | int intc_num_pending = 0;
|
nkeynes@1 | 54 |
|
nkeynes@1 | 55 | void mmio_region_INTC_write( uint32_t reg, uint32_t val )
|
nkeynes@1 | 56 | {
|
nkeynes@1 | 57 | /* Well it saves having to use an intermediate table... */
|
nkeynes@1 | 58 | switch( reg ) {
|
nkeynes@1 | 59 | case ICR: /* care about this later */
|
nkeynes@1 | 60 | break;
|
nkeynes@1 | 61 | case IPRA:
|
nkeynes@1 | 62 | PRIORITY(INT_TMU_TUNI0) = (val>>12)&0x000F;
|
nkeynes@1 | 63 | PRIORITY(INT_TMU_TUNI1) = (val>>8)&0x000F;
|
nkeynes@1 | 64 | PRIORITY(INT_TMU_TUNI2) =
|
nkeynes@1 | 65 | PRIORITY(INT_TMU_TICPI2) = (val>>4)&0x000F;
|
nkeynes@1 | 66 | PRIORITY(INT_RTC_ATI) =
|
nkeynes@1 | 67 | PRIORITY(INT_RTC_PRI) =
|
nkeynes@1 | 68 | PRIORITY(INT_RTC_CUI) = val&0x000F;
|
nkeynes@1 | 69 | break;
|
nkeynes@1 | 70 | case IPRB:
|
nkeynes@1 | 71 | PRIORITY(INT_WDT_ITI) = (val>>12)&0x000F;
|
nkeynes@1 | 72 | PRIORITY(INT_REF_RCMI) =
|
nkeynes@1 | 73 | PRIORITY(INT_REF_ROVI) = (val>>8)&0x000F;
|
nkeynes@1 | 74 | PRIORITY(INT_SCI_ERI) =
|
nkeynes@1 | 75 | PRIORITY(INT_SCI_RXI) =
|
nkeynes@1 | 76 | PRIORITY(INT_SCI_TXI) =
|
nkeynes@1 | 77 | PRIORITY(INT_SCI_TEI) = (val>>4)&0x000F;
|
nkeynes@1 | 78 | /* Bits 0-3 reserved */
|
nkeynes@1 | 79 | break;
|
nkeynes@1 | 80 | case IPRC:
|
nkeynes@1 | 81 | PRIORITY(INT_GPIO) = (val>>12)&0x000F;
|
nkeynes@1 | 82 | PRIORITY(INT_DMA_DMTE0) =
|
nkeynes@1 | 83 | PRIORITY(INT_DMA_DMTE1) =
|
nkeynes@1 | 84 | PRIORITY(INT_DMA_DMTE2) =
|
nkeynes@1 | 85 | PRIORITY(INT_DMA_DMTE3) =
|
nkeynes@1 | 86 | PRIORITY(INT_DMA_DMAE) = (val>>8)&0x000F;
|
nkeynes@1 | 87 | PRIORITY(INT_SCIF_ERI) =
|
nkeynes@1 | 88 | PRIORITY(INT_SCIF_RXI) =
|
nkeynes@1 | 89 | PRIORITY(INT_SCIF_BRI) =
|
nkeynes@1 | 90 | PRIORITY(INT_SCIF_TXI) = (val>>4)&0x000F;
|
nkeynes@1 | 91 | PRIORITY(INT_HUDI) = val&0x000F;
|
nkeynes@1 | 92 | break;
|
nkeynes@1 | 93 | }
|
nkeynes@1 | 94 | MMIO_WRITE( INTC, reg, val );
|
nkeynes@1 | 95 | }
|
nkeynes@1 | 96 |
|
nkeynes@1 | 97 | int32_t mmio_region_INTC_read( uint32_t reg )
|
nkeynes@1 | 98 | {
|
nkeynes@1 | 99 | return MMIO_READ( INTC, reg );
|
nkeynes@1 | 100 | }
|
nkeynes@1 | 101 |
|
nkeynes@1 | 102 | /* We basically maintain a priority queue here, raise_interrupt adds an entry,
|
nkeynes@1 | 103 | * accept_interrupt takes it off. At the moment this is does as a simple
|
nkeynes@1 | 104 | * ordered array, on the basis that in practice there's unlikely to be more
|
nkeynes@1 | 105 | * than one at a time. There are lots of ways to optimize this if it turns out
|
nkeynes@1 | 106 | * to be necessary, but I'd doubt it will be...
|
nkeynes@1 | 107 | */
|
nkeynes@1 | 108 |
|
nkeynes@1 | 109 | void intc_raise_interrupt( int which )
|
nkeynes@1 | 110 | {
|
nkeynes@1 | 111 | int i, j, pri;
|
nkeynes@1 | 112 |
|
nkeynes@1 | 113 | pri = PRIORITY(which);
|
nkeynes@1 | 114 | if( pri == 0 ) return; /* masked off */
|
nkeynes@1 | 115 |
|
nkeynes@1 | 116 | for( i=0; i<intc_num_pending; i++ ) {
|
nkeynes@1 | 117 | if( intc_pending[i] == which ) return; /* Don't queue more than once */
|
nkeynes@1 | 118 | if( PRIORITY(intc_pending[i]) > pri ||
|
nkeynes@1 | 119 | (PRIORITY(intc_pending[i]) == pri &&
|
nkeynes@1 | 120 | intc_pending[i] < which))
|
nkeynes@1 | 121 | break;
|
nkeynes@1 | 122 | }
|
nkeynes@1 | 123 | /* i == insertion point */
|
nkeynes@1 | 124 | for( j=intc_num_pending; j > i; j-- )
|
nkeynes@1 | 125 | intc_pending[j] = intc_pending[j-1];
|
nkeynes@1 | 126 | intc_pending[i] = which;
|
nkeynes@1 | 127 |
|
nkeynes@1 | 128 | if( i == intc_num_pending && (sh4r.sr&SR_BL)==0 && SH4_INTMASK() < pri )
|
nkeynes@1 | 129 | sh4r.int_pending = 1;
|
nkeynes@1 | 130 |
|
nkeynes@1 | 131 | intc_num_pending++;
|
nkeynes@1 | 132 | }
|
nkeynes@1 | 133 |
|
nkeynes@19 | 134 | void intc_clear_interrupt( int which )
|
nkeynes@19 | 135 | {
|
nkeynes@20 | 136 | int i;
|
nkeynes@20 | 137 | for( i=intc_num_pending-1; i>=0; i-- ) {
|
nkeynes@20 | 138 | if( intc_pending[i] == which ) {
|
nkeynes@20 | 139 | /* Shift array contents down */
|
nkeynes@20 | 140 | while( i < intc_num_pending-1 ) {
|
nkeynes@20 | 141 | intc_pending[i] = intc_pending[++i];
|
nkeynes@20 | 142 | }
|
nkeynes@20 | 143 | intc_num_pending--;
|
nkeynes@114 | 144 | intc_mask_changed();
|
nkeynes@20 | 145 | break;
|
nkeynes@20 | 146 | }
|
nkeynes@20 | 147 | }
|
nkeynes@20 | 148 |
|
nkeynes@19 | 149 | }
|
nkeynes@19 | 150 |
|
nkeynes@1 | 151 | uint32_t intc_accept_interrupt( void )
|
nkeynes@1 | 152 | {
|
nkeynes@1 | 153 | assert(intc_num_pending > 0);
|
nkeynes@20 | 154 | return INTCODE(intc_pending[intc_num_pending-1]);
|
nkeynes@1 | 155 | }
|
nkeynes@1 | 156 |
|
nkeynes@1 | 157 | void intc_mask_changed( void )
|
nkeynes@1 | 158 | {
|
nkeynes@1 | 159 | if( intc_num_pending > 0 && (sh4r.sr&SR_BL)==0 &&
|
nkeynes@1 | 160 | SH4_INTMASK() < PRIORITY(intc_pending[intc_num_pending-1]) )
|
nkeynes@1 | 161 | sh4r.int_pending = 1;
|
nkeynes@1 | 162 | else sh4r.int_pending = 0;
|
nkeynes@1 | 163 | }
|
nkeynes@1 | 164 |
|
nkeynes@1 | 165 |
|
nkeynes@1 | 166 | char *intc_get_interrupt_name( int code )
|
nkeynes@1 | 167 | {
|
nkeynes@1 | 168 | return intc_sources[code].name;
|
nkeynes@1 | 169 | }
|
nkeynes@1 | 170 |
|
nkeynes@1 | 171 | void intc_reset( void )
|
nkeynes@1 | 172 | {
|
nkeynes@1 | 173 | intc_num_pending = 0;
|
nkeynes@1 | 174 | sh4r.int_pending = 0;
|
nkeynes@1 | 175 | }
|