sa11x0_irq.S revision 1.14 1 /* $NetBSD: sa11x0_irq.S,v 1.14 2008/06/13 13:24:10 rafal Exp $ */
2
3 /*
4 * Copyright (c) 1998 Mark Brinicombe.
5 * Copyright (c) 1998 Causality Limited
6 * All rights reserved.
7 *
8 * This code is derived from software contributed to the NetBSD Foundation
9 * by IWAMOTO Toshihiro.
10 *
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
13 * are met:
14 * 1. Redistributions of source code must retain the above copyright
15 * notice, this list of conditions and the following disclaimer.
16 * 2. Redistributions in binary form must reproduce the above copyright
17 * notice, this list of conditions and the following disclaimer in the
18 * documentation and/or other materials provided with the distribution.
19 * 3. All advertising materials mentioning features or use of this software
20 * must display the following acknowledgement:
21 * This product includes software developed by Mark Brinicombe
22 * for the NetBSD Project.
23 * 4. The name of the company nor the name of the author may be used to
24 * endorse or promote products derived from this software without specific
25 * prior written permission.
26 *
27 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED
28 * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
29 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
30 * IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT,
31 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
32 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
33 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
34 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
35 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
36 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
37 * SUCH DAMAGE.
38 */
39
40 #include "opt_irqstats.h"
41
42 #include "assym.h"
43 #include <machine/asm.h>
44 #include <machine/cpu.h>
45 #include <machine/frame.h>
46 #include <arm/sa11x0/sa11x0_reg.h>
47
48
49 .text
50 .align 0
51
52 Lspl_masks:
53 .word _C_LABEL(spl_masks)
54
55 Lcpu_info_store:
56 .word _C_LABEL(cpu_info_store)
57
58 .globl _C_LABEL(saipic_base)
59 _C_LABEL(saipic_base):
60 .word 0x00000000
61
62 #ifdef INTR_DEBUG
63 Ldbg_str:
64 .asciz "irq_entry %x %x\n"
65 .align 5
66 #endif
67
68 LOCK_CAS_CHECK_LOCALS
69
70 AST_ALIGNMENT_FAULT_LOCALS
71
72 /*
73 * Register usage
74 *
75 * r6 - Address of current handler
76 * r7 - Pointer to handler pointer list
77 * r8 - Current IRQ requests.
78 * r9 - Used to count through possible IRQ bits.
79 * r10 - Base address of SAIP
80 */
81
82 ASENTRY_NP(irq_entry)
83 sub lr, lr, #0x00000004 /* Adjust the lr */
84
85 PUSHFRAMEINSVC /* Push an interrupt frame */
86 ENABLE_ALIGNMENT_FAULTS
87
88 /* Load r8 with the SAIPIC interrupt requests */
89
90 ldr r10, _C_LABEL(saipic_base)
91 ldr r8, [r10, #(SAIPIC_IP)] /* Load IRQ pending register */
92
93 #ifdef INTR_DEBUG
94 ldr r2, [r10, #(SAIPIC_MR)]
95 adr r0, Ldbg_str
96 mov r1, r8
97 bl _C_LABEL(printf)
98 #endif
99 /*
100 * Note that we have entered the IRQ handler.
101 * We are in SVC mode so we cannot use the processor mode
102 * to determine if we are in an IRQ. Instead we will count the
103 * each time the interrupt handler is nested.
104 */
105
106 ldr r1, [r4, #CI_INTR_DEPTH]
107 add r1, r1, #1
108 str r1, [r4, #CI_INTR_DEPTH]
109
110 /*
111 * Need to block all interrupts at the IPL or lower for
112 * all asserted interrupts.
113 * This basically emulates hardware interrupt priority levels.
114 * Means we need to go through the interrupt mask and for
115 * every asserted interrupt we need to mask out all other
116 * interrupts at the same or lower IPL.
117 * If only we could wait until the main loop but we need to sort
118 * this out first so interrupts can be re-enabled.
119 *
120 * This would benefit from a special ffs type routine
121 */
122
123 mov r9, #(NIPL - 1)
124 ldr r7, Lspl_masks
125
126 Lfind_highest_ipl:
127 ldr r2, [r7, r9, lsl #2]
128 tst r8, r2
129 subeq r9, r9, #1
130 beq Lfind_highest_ipl
131
132 /* r9 = SPL level of highest priority interrupt */
133 add r9, r9, #1
134 ldr r2, [r7, r9, lsl #2]
135
136 ldr r1, [r4, #CI_CPL]
137 str r9, [r4, #CI_CPL]
138 stmfd sp!, {r1}
139
140 /* Update the SAIP irq masks */
141 bl _C_LABEL(irq_setmasks)
142
143 #ifdef INTR_DEBUG
144 stmfd sp!, {r0,r1,r2}
145 adr r0, Ldbg_str
146 mov r1, #1
147 mov r2, r9
148 bl _C_LABEL(printf)
149 ldmia sp!, {r0,r1,r2}
150 #endif
151 mrs r0, cpsr_all /* Enable IRQs */
152 bic r0, r0, #I32_bit
153 msr cpsr_all, r0
154
155 ldr r7, Lirqhandlers
156 mov r9, #0x00000001
157
158 irqloop:
159 /* This would benefit from a special ffs type routine */
160 tst r8, r9 /* Is a bit set ? */
161 beq nextirq /* No ? try next bit */
162
163 ldr r6, [r7] /* Get address of first handler structure */
164
165 teq r6, #0x00000000 /* Do we have a handler */
166 moveq r0, r8 /* IRQ requests as arg 0 */
167 beq _C_LABEL(stray_irqhandler) /* call special handler */
168
169 ldr r0, Lcnt /* Stat info */
170 ldr r1, [r0, #(V_INTR)]
171 add r1, r1, #0x00000001
172 str r1, [r0, #(V_INTR)]
173
174 /*
175 * XXX: Should stats be accumulated for every interrupt routine
176 * called or for every physical interrupt that is serviced.
177 */
178
179 #ifdef IRQSTATS
180 ldr r0, Lintrcnt
181 ldr r1, [r6, #(IH_COUNT)]
182
183 add r0, r0, r1, lsl #2
184 ldr r1, [r0]
185 add r1, r1, #0x00000001
186 str r1, [r0]
187 #endif /* IRQSTATS */
188
189 irqchainloop:
190 #ifdef INTR_DEBUG
191 stmfd sp!, {r0,r1,r2}
192 adr r0, Ldbg_str
193 mov r1, #2
194 bl _C_LABEL(printf)
195 ldmia sp!, {r0,r1,r2}
196 #endif
197 ldr r0, [r6, #(IH_ARG)] /* Get argument pointer */
198 teq r0, #0x00000000 /* If arg is zero pass stack frame */
199 addeq r0, sp, #4 /* ... stack frame [XXX needs care] */
200 mov lr, pc /* return address */
201 ldr pc, [r6, #(IH_FUNC)] /* Call handler */
202
203 teq r0, #0x00000001 /* Was the irq serviced ? */
204 beq irqdone
205
206 ldr r6, [r6, #(IH_NEXT)]
207 teq r6, #0x00000000
208 bne irqchainloop
209
210 irqdone:
211 nextirq:
212 add r7, r7, #0x00000004 /* update pointer to handlers */
213 mov r9, r9, lsl #1 /* move on to next bit */
214 teq r9, #(1 << 31) /* done the last bit ? */
215 bne irqloop /* no - loop back. */
216
217 ldmfd sp!, {r2}
218 str r2, [r4, #CI_CPL]
219
220 /* Restore previous disabled mask */
221 bl _C_LABEL(irq_setmasks)
222
223 #ifdef __HAVE_FAST_SOFTINTS
224 bl _C_LABEL(dosoftints) /* Handle the soft interrupts */
225 #endif
226
227 /* Kill IRQ's in preparation for exit */
228 mrs r0, cpsr_all
229 orr r0, r0, #(I32_bit)
230 msr cpsr_all, r0
231
232 #ifdef INTR_DEBUG
233 adr r0, Ldbg_str
234 mov r1, #3
235 ldr r2, [r10, #(SAIPIC_MR)]
236 bl _C_LABEL(printf)
237 #endif
238
239 /* Decrement the nest count */
240 ldr r1, [r4, #CI_INTR_DEPTH]
241 sub r1, r1, #1
242 str r1, [r4, #CI_INTR_DEPTH]
243
244 LOCK_CAS_CHECK
245
246 DO_AST_AND_RESTORE_ALIGNMENT_FAULTS
247 PULLFRAMEFROMSVCANDEXIT
248
249 /* NOT REACHED */
250 b . - 8
251
252 ENTRY(irq_setmasks)
253 stmfd sp!, {r0, r1, r4, lr} /* Preserve registers */
254
255 /* Disable interrupts */
256 mrs r1, cpsr_all
257 orr r3, r1, #(I32_bit)
258 msr cpsr_all, r3
259
260 /* Calculate interrupt mask */
261 ldr r0, Lspl_masks
262 ldr r4, Lcpu_info_store
263 ldr r2, [r4, #CI_CPL]
264 ldr r2, [r0, r2, lsl #2]
265
266 ldr r0, _C_LABEL(saipic_base)
267 str r2, [r0, #(SAIPIC_MR)] /* Set mask register */
268
269 /* Restore old cpsr and exit */
270 msr cpsr_all, r1
271 ldmia sp!, {r0, r1, r4, pc} /* Restore registers */
272
273 Lcnt:
274 .word _C_LABEL(uvmexp)
275
276 #ifdef IRQSTATS
277 Lintrcnt:
278 .word _C_LABEL(intrcnt)
279 #endif
280
281 Lirqhandlers:
282 .word _C_LABEL(irqhandlers) /* Pointer to array of irqhandlers */
283
284
285 #ifdef IRQSTATS
286 .global _C_LABEL(intrnames), _C_LABEL(eintrnames)
287 .global _C_LABEL(eintrcnt)
288 _C_LABEL(intrnames):
289 _C_LABEL(eintrnames):
290 _C_LABEL(eintrcnt):
291
292 .globl _C_LABEL(intrcnt), _C_LABEL(sintrcnt)
293
294 _C_LABEL(intrcnt):
295 .space ICU_LEN*4 /* XXX Should be linked to number of interrupts */
296
297 _C_LABEL(sintrcnt):
298 .space 32*4
299 #endif
300