source: asp3_wo_tecs/trunk/arch/arm_gcc/common/gic_support.S@ 302

Last change on this file since 302 was 302, checked in by ertl-honda, 7 years ago

TECSレスのASP3の開発のため以下のtrunkからコピー
http://dev.toppers.jp/svn/asp3/branches/WO_TECS-3.C.0

File size: 6.2 KB
Line 
1/*
2 * TOPPERS/ASP Kernel
3 * Toyohashi Open Platform for Embedded Real-Time Systems/
4 * Advanced Standard Profile Kernel
5 *
6 * Copyright (C) 2000-2003 by Embedded and Real-Time Systems Laboratory
7 * Toyohashi Univ. of Technology, JAPAN
8 * Copyright (C) 2006-2015 by Embedded and Real-Time Systems Laboratory
9 * Graduate School of Information Science, Nagoya Univ., JAPAN
10 *
11 * 上記著作権者
12は,以下の(1)〜(4)の条件を満たす場合に限り,本ソフトウェ
13 * ア(本ソフトウェアを改変したものを含む.以下同じ)を使用・複製・改
14 * 変・再é…
15å¸ƒï¼ˆä»¥ä¸‹ï¼Œåˆ©ç”¨ã¨å‘¼ã¶ï¼‰ã™ã‚‹ã“とを無償で許諾する.
16 * (1) 本ソフトウェアをソースコードの形で利用する場合には,上記の著作
17 * 権表示,この利用条件および下記の無保証規定が,そのままの形でソー
18 * スコード中に含まれていること.
19 * (2) 本ソフトウェアを,ライブラリ形式など,他のソフトウェア開発に使
20 * 用できる形で再é…
21å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œå†é…
22å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨
23 * 者
24マニュアルなど)に,上記の著作権表示,この利用条件および下記
25 * の無保証規定を掲載すること.
26 * (3) 本ソフトウェアを,機器に組み込むなど,他のソフトウェア開発に使
27 * 用できない形で再é…
28å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œæ¬¡ã®ã„ずれかの条件を満たすこ
29 * と.
30 * (a) 再é…
31å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨è€…
32マニュアルなど)に,上記の著
33 * 作権表示,この利用条件および下記の無保証規定を掲載すること.
34 * (b) 再é…
35å¸ƒã®å½¢æ…
36‹ã‚’,別に定める方法によって,TOPPERSプロジェクトに
37 * 報告すること.
38 * (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
39 * 害からも,上記著作権者
40およびTOPPERSプロジェクトをå…
41è²¬ã™ã‚‹ã“と.
42 * また,本ソフトウェアのユーザまたはエンドユーザからのいかなる理
43 * 由に基づく請求からも,上記著作権者
44およびTOPPERSプロジェクトを
45 * å…
46è²¬ã™ã‚‹ã“と.
47 *
48 * 本ソフトウェアは,無保証で提供されているものである.上記著作権者
49お
50 * よびTOPPERSプロジェクトは,本ソフトウェアに関して,特定の使用目的
51 * に対する適合性も含めて,いかなる保証も行わない.また,本ソフトウェ
52 * アの利用により直接的または間接的に生じたいかなる損害に関しても,そ
53 * の責任を負わない.
54 *
55 * $Id: gic_support.S 454 2015-08-16 03:18:46Z ertl-hiro $
56 */
57
58/*
59 * カーネルの割込みコントローラ依存部のアセンブリ言語部(GIC用)
60 */
61
62#define TOPPERS_MACRO_ONLY
63#define TOPPERS_ASM_MACRO
64#define UINT_C(val) (val) /* uint_t型の定数を作るマクロ */
65#define ULONG_C(val) (val) /* ulong_t型の定数を作るマクロ */
66#define CAST(type, val) (val) /* 型キャストを行うマクロ */
67#define GIC_REG(base, offset) ((base) + (offset))
68#include "kernel_impl.h"
69#include "core_asm.inc"
70
71#if __TARGET_ARCH_ARM < 6
72#error gic_suport.S supports ARMv6 or later.
73#endif /* __TARGET_ARCH_ARM < 6 */
74
75/*
76 * 割込みハンドラ呼出し前の割込みコントローラ操作
77 *
78 * r4に割込み番号を返す.irc_end_intで用いる情
79報(割込み発生前の割込み
80 * 優å…
81ˆåº¦ãƒžã‚¹ã‚¯ï¼‰ã‚’,スタックに保存する.
82 */
83 ATEXT
84 AALIGN(2)
85 AGLOBAL(irc_begin_int)
86ALABEL(irc_begin_int)
87 /*
88 * 割込み要因を取得する.
89 */
90 ldr r1, =GICC_IAR
91 ldr r3, [r1]
92
93 /*
94 * 割込み要因の割込み優å…
95ˆåº¦ã‚’求め,割込み優å…
96ˆåº¦ãƒžã‚¹ã‚¯ã«è¨­å®šã™ã‚‹ï¼Ž
97 */
98 ldr r1, =GICC_RPR /* 受け付けた割込みの割込み優å…
99ˆåº¦ã‚’取得 */
100 ldr r0, [r1]
101 ldr r1, =GICC_PMR /* 割込み発生前の割込み優å…
102ˆåº¦ã‚’取得 */
103 ldr r2, [r1]
104 str r0, [r1] /* 新しい割込み優å…
105ˆåº¦ãƒžã‚¹ã‚¯ã‚’セットする */
106// DATA_SYNC_BARRIER /* 割込み優å…
107ˆåº¦ãƒžã‚¹ã‚¯ãŒã‚»ãƒƒãƒˆã•ã‚Œã‚‹ã®ã‚’å¾…
108つ */
109#if __TARGET_ARCH_ARM == 6
110 mov r0, #0
111 mcr p15, 0, r0, c7, c10, 4
112#elif __TARGET_ARCH_ARM == 7
113 dsb
114#endif /* __TARGET_ARCH_ARM == 7 */
115 push {r2} /* irc_end_intで用いる情
116報を保存 */
117
118 /*
119 * EOIを発行する.
120 */
121 ldr r1, =GICC_EOIR /* EOIレジスタへの書込み */
122 str r3, [r1]
123
124 /*
125 * 割込み番号を返値としてリターンする.
126 */
127 lsl r4, r3, #22 /* 下位10ビットを取り出す */
128 lsr r4, r4, #22
129 bx lr
130
131/*
132 * 割込みハンドラ呼出し後の割込みコントローラ操作
133 */
134 ATEXT
135 AALIGN(2)
136 AGLOBAL(irc_end_int)
137ALABEL(irc_end_int)
138 /*
139 * 割込み優å…
140ˆåº¦ãƒžã‚¹ã‚¯ã‚’å…
141ƒã«æˆ»ã™ï¼Ž
142 */
143 pop {r2} /* irc_begin_intで保存した情
144報を復帰 */
145 ldr r1, =GICC_PMR /* 割込み優å…
146ˆåº¦ãƒžã‚¹ã‚¯ã‚’å…
147ƒã«æˆ»ã™ */
148 str r2, [r1]
149 bx lr
150
151/*
152 * CPU例外発生前の割込み優å…
153ˆåº¦ã®å–å¾—
154 *
155 * CPU例外の発生で割込み優å…
156ˆåº¦ãŒå¤‰ã‚ã‚‹ã“とはないため,現在の割込み優å…
157ˆ
158 * 度を返す.
159 */
160 ATEXT
161 AALIGN(2)
162 AGLOBAL(irc_get_intpri)
163ALABEL(irc_get_intpri)
164 /*
165 * 割込み優å…
166ˆåº¦ãƒžã‚¹ã‚¯ã‚’外部表現に変換して返す.
167 */
168 ldr r1, =GICC_PMR
169 ldr r0, [r1]
170 asr r0, r0, #GIC_PRI_SHIFT
171 sub r0, r0, #GIC_PRI_MASK
172 bx lr
173
174/*
175 * CPU例外ハンドラ呼出し前の割込みコントローラ操作
176 *
177 * irc_end_excで用いる情
178報(割込み発生前の割込み優å…
179ˆåº¦ãƒžã‚¹ã‚¯ï¼‰ã‚’,スタッ
180 * クに保存する.
181 */
182 ATEXT
183 AALIGN(2)
184 AGLOBAL(irc_begin_exc)
185ALABEL(irc_begin_exc)
186 /*
187 * 割込み優å…
188ˆåº¦ãƒžã‚¹ã‚¯ã‚’保存する.
189 */
190 ldr r1, =GICC_PMR /* 現在の割込み優å…
191ˆåº¦ã‚’取得 */
192 ldr r2, [r1]
193 push {r2} /* irc_end_excで用いる情
194報を保存 */
195 bx lr
196
197/*
198 * CPU例外ハンドラ呼出し後の割込みコントローラ操作
199 */
200 ATEXT
201 AALIGN(2)
202 AGLOBAL(irc_end_exc)
203ALABEL(irc_end_exc)
204 /*
205 * 割込み優å…
206ˆåº¦ãƒžã‚¹ã‚¯ã‚’å…
207ƒã«æˆ»ã™ï¼Ž
208 */
209 pop {r2} /* irc_begin_intで保存した情
210報を復帰 */
211 ldr r1, =GICC_PMR /* 割込み優å…
212ˆåº¦ãƒžã‚¹ã‚¯ã‚’å…
213ƒã«æˆ»ã™ */
214 str r2, [r1]
215 bx lr
Note: See TracBrowser for help on using the repository browser.