locore.h revision 1.3 1 /* $NetBSD: locore.h,v 1.3 2002/03/17 14:02:04 uch Exp $ */
2
3 /*-
4 * Copyright (c) 2002 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. All advertising materials mentioning features or use of this software
16 * must display the following acknowledgement:
17 * This product includes software developed by the NetBSD
18 * Foundation, Inc. and its contributors.
19 * 4. Neither the name of The NetBSD Foundation nor the names of its
20 * contributors may be used to endorse or promote products derived
21 * from this software without specific prior written permission.
22 *
23 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
24 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
25 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
26 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
27 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
28 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
29 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
30 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
31 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
32 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
33 * POSSIBILITY OF SUCH DAMAGE.
34 */
35
36 #if defined(SH3) && defined(SH4)
37 #define MOV(x, r) mov.l _L./**/x, r; mov.l @r, r
38 #define REG_SYMBOL(x) _L./**/x: .long _C_LABEL(__sh_/**/x)
39 #define FUNC_SYMBOL(x) _L./**/x: .long _C_LABEL(__sh_/**/x)
40 #elif defined(SH3)
41 #define MOV(x, r) mov.l _L./**/x, r
42 #define REG_SYMBOL(x) _L./**/x: .long SH3_/**/x
43 #define FUNC_SYMBOL(x) _L./**/x: .long _C_LABEL(sh3_/**/x)
44 #elif defined(SH4)
45 #define MOV(x, r) mov.l _L./**/x, r
46 #define REG_SYMBOL(x) _L./**/x: .long SH4_/**/x
47 #define FUNC_SYMBOL(x) _L./**/x: .long _C_LABEL(sh4_/**/x)
48 #endif
49
50 /*
51 * BANK1 r7 contains kernel stack top address.
52 * BANK1 r6 conatins current frame pointer. (per process)
53 */
54 /*
55 * EXCEPTION_ENTRY:
56 * + setup stack pointer
57 * + save all register to frame. (struct trapframe)
58 * + setup kernel stack.
59 * + change bank from 1 to 0
60 * + set BANK0 (r4, r5) = (ssr, spc)
61 */
62 #define EXCEPTION_ENTRY ;\
63 /* Check kernel/user mode. */ ;\
64 mov #0x40, r3 ;\
65 swap.b r3, r3 ;\
66 stc ssr, r2 ;\
67 swap.w r3, r3 /* r3 = 0x40000000 */ ;\
68 mov r2, r0 /* r2 = r0 = SSR */ ;\
69 and r3, r0 ;\
70 tst r0, r0 /* if (SSR.MD == 0) T = 1 */ ;\
71 mov r14, r1 ;\
72 mov r6, r14 /* frame pointer */ ;\
73 bf/s 1f /* T==0 ...Exception from kernel mode */;\
74 mov r15, r0 ;\
75 /* Exception from user mode */ ;\
76 mov r7, r15 /* change to kernel stack */ ;\
77 1: ;\
78 /* Save registers */ ;\
79 mov.l r1, @-r14 /* tf_r14 */ ;\
80 mov.l r0, @-r14 /* tf_r15 */ ;\
81 stc.l r0_bank,@-r14 /* tf_r0 */ ;\
82 stc.l r1_bank,@-r14 /* tf_r1 */ ;\
83 stc.l r2_bank,@-r14 /* tf_r2 */ ;\
84 stc.l r3_bank,@-r14 /* tf_r3 */ ;\
85 stc.l r4_bank,@-r14 /* tf_r4 */ ;\
86 stc.l r5_bank,@-r14 /* tf_r5 */ ;\
87 stc.l r6_bank,@-r14 /* tf_r6 */ ;\
88 stc.l r7_bank,@-r14 /* tf_r7 */ ;\
89 mov.l r8, @-r14 /* tf_r8 */ ;\
90 mov.l r9, @-r14 /* tf_r9 */ ;\
91 mov.l r10, @-r14 /* tf_r10 */ ;\
92 mov.l r11, @-r14 /* tf_r11 */ ;\
93 mov.l r12, @-r14 /* tf_r12 */ ;\
94 mov.l r13, @-r14 /* tf_r13 */ ;\
95 sts.l pr, @-r14 /* tf_pr */ ;\
96 sts.l mach, @-r14 /* tf_mach*/ ;\
97 sts.l macl, @-r14 /* tf_macl*/ ;\
98 mov.l r2, @-r14 /* tf_ssr */ ;\
99 stc.l spc, @-r14 /* tf_spc */ ;\
100 add #-8, r14 /* skip tf_ubc, tf_trapno */ ;\
101 mov r14, r6 /* store frame pointer */ ;\
102 /* Change register bank to 0 */ ;\
103 shlr r3 /* r3 = 0x20000000 */ ;\
104 stc sr, r0 /* r0 = SR */ ;\
105 not r3, r3 ;\
106 and r0, r3 ;\
107 ldc r3, sr /* SR.RB = 0 */ ;\
108 /* Set up argument. r4 = ssr, r5 = spc */ ;\
109 stc r2_bank,r4 ;\
110 stc spc, r5
111
112 /*
113 * EXCEPTION_RETURN:
114 * + block exception
115 * + restore all register from stack.
116 * + rte.
117 */
118 #define EXCEPTION_RETURN ;\
119 mov #0x10, r0 ;\
120 swap.b r0, r0 ;\
121 swap.w r0, r0 /* r0 = 0x10000000 */ ;\
122 stc sr, r1 ;\
123 or r0, r1 ;\
124 ldc r1, sr /* SR.BL = 1 */ ;\
125 stc r6_bank,r0 ;\
126 mov r0, r14 ;\
127 add #TF_SIZE, r0 ;\
128 ldc r0, r6_bank /* roll up frame pointer */ ;\
129 add #8, r14 /* skip tf_trapno, tf_ubc */ ;\
130 mov.l @r14+, r0 /* tf_spc */ ;\
131 ldc r0, spc ;\
132 mov.l @r14+, r0 /* tf_ssr */ ;\
133 ldc r0, ssr ;\
134 lds.l @r14+, macl /* tf_macl*/ ;\
135 lds.l @r14+, mach /* tf_mach*/ ;\
136 lds.l @r14+, pr /* tf_pr */ ;\
137 mov.l @r14+, r13 /* tf_r13 */ ;\
138 mov.l @r14+, r12 /* tf_r12 */ ;\
139 mov.l @r14+, r11 /* tf_r11 */ ;\
140 mov.l @r14+, r10 /* tf_r10 */ ;\
141 mov.l @r14+, r9 /* tf_r9 */ ;\
142 mov.l @r14+, r8 /* tf_r8 */ ;\
143 mov.l @r14+, r7 /* tf_r7 */ ;\
144 mov.l @r14+, r6 /* tf_r6 */ ;\
145 mov.l @r14+, r5 /* tf_r5 */ ;\
146 mov.l @r14+, r4 /* tf_r4 */ ;\
147 mov.l @r14+, r3 /* tf_r3 */ ;\
148 mov.l @r14+, r2 /* tf_r2 */ ;\
149 mov.l @r14+, r1 /* tf_r1 */ ;\
150 mov.l @r14+, r0 /* tf_r0 */ ;\
151 mov.l @r14+ r15 /* tf_r15 */ ;\
152 mov.l @r14+, r14 /* tf_r14 */ ;\
153 rte ;\
154 nop
155
156
157 /*
158 * Macros to disable and enable exceptions (including interrupts).
159 * This modifies SR.BL
160 */
161 #define __0x10 #0x10
162 #define __0x78 #0x78
163
164 #define __EXCEPTION_BLOCK(Rn, Rm) ;\
165 mov __0x10, Rn ;\
166 swap.b Rn, Rn ;\
167 swap.w Rn, Rn /* Rn = 0x10000000 */ ;\
168 stc sr, Rm ;\
169 or Rn, Rm ;\
170 ldc Rm, sr /* block exceptions */
171
172 #define __EXCEPTION_UNBLOCK(Rn, Rm) ;\
173 mov __0x10, Rn ;\
174 swap.b Rn, Rn ;\
175 swap.w Rn, Rn /* Rn = 0x10000000 */ ;\
176 not Rn, Rn ;\
177 stc sr, Rm ;\
178 and Rn, Rm ;\
179 ldc Rm, sr /* unblock exceptions */
180
181 /*
182 * Macros to disable and enable interrupts.
183 * This modifies SR.I[0-3]
184 */
185 #define __INTR_MASK(Rn, Rm) ;\
186 mov __0x78, Rn ;\
187 shll Rn /* Rn = 0x000000f0 */ ;\
188 stc sr, Rm ;\
189 or Rn, Rm ;\
190 ldc Rm, sr /* mask all interrupt */
191
192 #define __INTR_UNMASK(Rn, Rm) ;\
193 mov __0x78, Rn ;\
194 shll Rn /* Rn = 0x000000f0 */ ;\
195 not Rn, Rn ;\
196 stc sr, Rm ;\
197 and Rn, Rm ;\
198 ldc Rm, sr /* unmask all interrupt */
199
200 #define RECURSEENTRY ;\
201 mov r14, r0 ;\
202 stc r6_bank,r14 ;\
203 mov.l r0, @-r14 ;\
204 mov.l r15, @-r14 ;\
205 mov.l r0, @-r14 ;\
206 mov.l r1, @-r14 ;\
207 mov.l r2, @-r14 ;\
208 mov.l r3, @-r14 ;\
209 mov.l r4, @-r14 ;\
210 mov.l r5, @-r14 ;\
211 mov.l r6, @-r14 ;\
212 mov.l r7, @-r14 ;\
213 mov.l r8, @-r14 ;\
214 mov.l r9, @-r14 ;\
215 mov.l r10, @-r14 ;\
216 mov.l r11, @-r14 ;\
217 mov.l r12, @-r14 ;\
218 mov.l r13, @-r14 ;\
219 sts.l pr, @-r14 ;\
220 sts.l mach, @-r14 ;\
221 sts.l macl, @-r14 ;\
222 stc.l ssr, @-r14 ;\
223 stc.l spc, @-r14 ;\
224 add #-8, r14 /* tf_ubc, tf_trapno */ ;\
225 ldc r14, r6_bank /* roll down frame */
226
227 #ifndef _LOCORE
228 void sh3_switch_setup(struct proc *);
229 void sh4_switch_setup(struct proc *);
230 void sh3_switch_resume(struct proc *);
231 void sh4_switch_resume(struct proc *);
232 extern void (*__sh_switch_resume)(struct proc *);
233 #endif /* _LOCORE */
234