source: anotherchoice/tags/jsp-1.4.4-full-UTF8/config/microblaze/microblaze.c

Last change on this file was 363, checked in by ykominami, 5 years ago

add tags/jsp-1.4.4-full-UTF8
  • Property svn:executable set to *
File size: 8.7 KB
Line 
1/*
2 * TOPPERS/JSP Kernel
3 * Toyohashi Open Platform for Embedded Real-Time Systems/
4 * Just Standard Profile Kernel
5 *
6 * Copyright (C) 2000-2003 by Embedded and Real-Time Systems Laboratory
7 * Toyohashi Univ. of Technology, JAPAN
8 *
9 * 上記著作権者
10は，以下の (1)〜(4) の条件か，Free Software Foundation
11 * によってå…
12¬è¡¨ã•ã‚Œã¦ã„ã‚‹ GNU General Public License の Version 2 に記
13 * 述されている条件を満たす場合に限り，本ソフトウェア（本ソフトウェア
14 * を改変したものを含む．以下同じ）を使用・複製・改変・再é…
15å¸ƒï¼ˆä»¥ä¸‹ï¼Œ
16 * 利用と呼ぶ）することを無償で許諾する．
17 * (1) 本ソフトウェアをソースコードの形で利用する場合には，上記の著作
18 * 権表示，この利用条件および下記の無保証規定が，そのままの形でソー
19 * スコード中に含まれていること．
20 * (2) 本ソフトウェアを，ライブラリ形式など，他のソフトウェア開発に使
21 * 用できる形で再é…
22å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œå†é…
23å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨
24 * 者
25マニュアルなど）に，上記の著作権表示，この利用条件および下記
26 * の無保証規定を掲載すること．
27 * (3) 本ソフトウェアを，機器に組み込むなど，他のソフトウェア開発に使
28 * 用できない形で再é…
29å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œæ¬¡ã®ã„ずれかの条件を満たすこ
30 * と．
31 * (a) 再é…
32å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨è€…
33マニュアルなど）に，上記の著
34 * 作権表示，この利用条件および下記の無保証規定を掲載すること．
35 * (b) 再é…
36å¸ƒã®å½¢æ…
37‹ã‚’，別に定める方法によって，TOPPERSプロジェクトに
38 * 報告すること．
39 * (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
40 * 害からも，上記著作権者
41およびTOPPERSプロジェクトをå…
42è²¬ã™ã‚‹ã“と．
43 *
44 * 本ソフトウェアは，無保証で提供されているものである．上記著作権者
45お
46 * よびTOPPERSプロジェクトは，本ソフトウェアに関して，その適用可能性も
47 * 含めて，いかなる保証も行わない．また，本ソフトウェアの利用により直
48 * 接的または間接的に生じたいかなる損害に関しても，その責任を負わない．
49 *
50 * @(#) $Id: microblaze.c,v 1.8 2003/12/11 04:52:44 honda Exp $
51 */
52
53/* * Microblaze 標準ペリフェラル用ドライバ
54 */
55#include <s_services.h>
56#include <microblaze.h>
57
58
59/*
60 * UART Lite用 簡易ドライバ
61 */
62
63/*
64 * シリアルI/Oポート初期化ブロック
65 */
66const SIOPINIB siopinib_table[TNUM_SIOP] = {{}};
67
68/*
69 * シリアルI/Oポート管理ブロックのエリア
70 */
71SIOPCB siopcb_table[TNUM_SIOP];
72
73/*
74 * シリアルI/OポートIDから管理ブロックを取り出すためのマクロ
75 */
76#define INDEX_SIOP(siopid) ((UINT)((siopid) - 1))
77#define get_siopcb(siopid) (&(siopcb_table[INDEX_SIOP(siopid)]))
78
79Inline void
80uart_ena_int(void){
81 sil_wrw_mem((VP)UARTLITE_CTREG,
82 sil_rew_mem((VP)UARTLITE_CTREG) | UARTLITE_ENABLE_INTR);
83}
84
85Inline void
86uart_dis_int(void){
87 sil_wrw_mem((VP)UARTLITE_CTREG,
88 sil_rew_mem((VP)UARTLITE_CTREG) & ~UARTLITE_ENABLE_INTR);
89}
90
91/*
92 * 文字を受信したか?
93 */
94Inline BOOL
95uart_getready(SIOPCB *siopcb)
96{
97 return((sil_rew_mem((VP)UARTLITE_SRREG) &
98 UARTLITE_RX_FIFO_VALID_DATA) != 0);
99
100}
101
102/*
103 * 文字を送信できるか?
104 */
105Inline BOOL
106uart_putready(SIOPCB *siopcb)
107{
108 return((sil_rew_mem((VP)UARTLITE_SRREG) & UARTLITE_TX_FIFO_FULL) == 0);
109}
110
111/*
112 * 受信した文字の取り出し
113 */
114Inline UB
115uart_getchar(SIOPCB *siopcb)
116{
117 return((UB)sil_rew_mem((VP)UARTLITE_RXREG));
118}
119
120/*
121 * 送信する文字の書き込み
122 */
123Inline void
124uart_putchar(SIOPCB *siopcb, UB c)
125{
126 sil_wrw_mem((VP)UARTLITE_TXREG, c);
127}
128
129/*
130 * 送信制御関数
131 * UART Lite には送信割込みを個別に禁止許可する機能はない
132 * そのため，送信終了時には必
133ず1回割込みがå…
134¥ã‚‹
135 */
136/*
137 * 送信割込み許可
138 */
139Inline void
140uart_enable_send(SIOPCB *siopcb)
141{
142
143}
144
145/*
146 * 送信割込み禁止
147 */
148Inline void
149uart_disable_send(SIOPCB *siopcb)
150{
151
152}
153
154
155/*
156 * SIOドライバの初期化ルーチン
157 * 1ポートしかないため，あまり意味はない
158 */
159void
160uart_initialize()
161{
162 SIOPCB *siopcb;
163 UINT i;
164
165 /*
166 * シリアルI/Oポート管理ブロックの初期化
167 */
168 for (siopcb = siopcb_table, i = 0; i < TNUM_SIOP; siopcb++, i++) {
169 siopcb->siopinib = &(siopinib_table[i]);
170 siopcb->openflag = FALSE;
171 siopcb->sendflag = FALSE;
172 }
173}
174
175
176SIOPCB *
177uart_opn_por(ID siopid, VP_INT exinf){
178
179 SIOPCB *siopcb;
180 const SIOPINIB *siopinib;
181
182 siopcb = get_siopcb(siopid);
183 siopinib = siopcb->siopinib;
184
185 /*
186 * 送受信バッファクリア
187 */
188 sil_wrw_mem((VP)UARTLITE_CTREG, UARTLITE_RST_RX_FIFO
189 | UARTLITE_RST_TX_FIFO | UARTLITE_ENABLE_INTR);
190
191// sil_wrw_mem((VP)UARTLITE_CTREG, UARTLITE_RST_RX_FIFO
192// | UARTLITE_RST_TX_FIFO );
193
194 siopcb->exinf = exinf;
195 siopcb->getready = siopcb->putready = FALSE;
196 siopcb->openflag = TRUE;
197
198 return(siopcb);
199}
200
201
202void
203uart_cls_por(SIOPCB *siopcb){
204 sil_wrw_mem((VP)UARTLITE_CTREG, ~UARTLITE_ENABLE_INTR); /* 割込み禁止 */
205 siopcb->openflag = FALSE;
206 siopcb->sendflag = FALSE;
207}
208
209
210
211/*
212 * シリアルI/Oポートへの文字送信
213 */
214BOOL
215uart_snd_chr(SIOPCB *siopcb, INT chr)
216{
217 if(uart_putready(siopcb)){
218 uart_putchar(siopcb, (UB) chr);
219 return(TRUE);
220 }
221 return(FALSE);
222}
223
224
225/*
226 * シリアルI/Oポートからの文字受信
227 */
228INT
229uart_rcv_chr(SIOPCB *siopcb)
230{
231 if (uart_getready(siopcb)) {
232 return((INT)(UB) uart_getchar(siopcb));
233 }
234 return(-1);
235}
236
237/*
238 * OPB_UARTLITE は送信と受信割込みを個別に許可/禁止する機能は持たない
239 */
240
241/*
242 * シリアルI/Oポートからのコールバックの許可
243 */
244void
245uart_ena_cbr(SIOPCB *siopcb, UINT cbrtn)
246{
247
248}
249
250/*
251 * シリアルI/Oポートからのコールバックの禁止
252 */
253void
254uart_dis_cbr(SIOPCB *siopcb, UINT cbrtn)
255{
256
257}
258
259
260/*
261 * シリアルI/Oポートに対する割込み処理
262 */
263static void
264uart_isr_siop(SIOPCB *siopcb)
265{
266 /*
267 * エッジ割込みのため割込み処理前にACK
268 */
269 intc_ack_interrupt(1 << (UARTINTLVL - 1));
270
271 if (uart_getready(siopcb)) {
272 /*
273 * 受信通知コールバックルーチンを呼び出す．
274 */
275 uart_ierdy_rcv(siopcb->exinf);
276 }
277
278 if (uart_putready(siopcb)) {
279 /*
280 * 送信可能コールバックルーチンを呼び出す．
281 */
282 uart_ierdy_snd(siopcb->exinf);
283 }
284}
285
286
287/*
288 * SIOの割込みサービスルーチン
289 */
290void
291uart_isr()
292{
293 if (siopcb_table[0].openflag) {
294 uart_isr_siop(&(siopcb_table[0]));
295 }
296}
297
Note: See TracBrowser for help on using the repository browser.