source: anotherchoice/tags/jsp-1.4.4-full-UTF8/config/sh3-ghs/solution_engine/fdc37c935a.c@ 26

Last change on this file since 26 was 26, checked in by ykominami, 10 years ago

initial

File size: 10.2 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 * 2003 by Advanced Data Controls, Corp
9 *
10 * 上記著作権者
11は,以下の (1)〜(4) の条件か,Free Software Foundation
12 * によってå…
13¬è¡¨ã•ã‚Œã¦ã„ã‚‹ GNU General Public License の Version 2 に記
14 * 述されている条件を満たす場合に限り,本ソフトウェア(本ソフトウェア
15 * を改変したものを含む.以下同じ)を使用・複製・改変・再é…
16å¸ƒï¼ˆä»¥ä¸‹ï¼Œ
17 * 利用と呼ぶ)することを無償で許諾する.
18 * (1) 本ソフトウェアをソースコードの形で利用する場合には,上記の著作
19 * 権表示,この利用条件および下記の無保証規定が,そのままの形でソー
20 * スコード中に含まれていること.
21 * (2) 本ソフトウェアを,ライブラリ形式など,他のソフトウェア開発に使
22 * 用できる形で再é…
23å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œå†é…
24å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨
25 * 者
26マニュアルなど)に,上記の著作権表示,この利用条件および下記
27 * の無保証規定を掲載すること.
28 * (3) 本ソフトウェアを,機器に組み込むなど,他のソフトウェア開発に使
29 * 用できない形で再é…
30å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œæ¬¡ã®ã„ずれかの条件を満たすこ
31 * と.
32 * (a) 再é…
33å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨è€…
34マニュアルなど)に,上記の著
35 * 作権表示,この利用条件および下記の無保証規定を掲載すること.
36 * (b) 再é…
37å¸ƒã®å½¢æ…
38‹ã‚’,別に定める方法によって,TOPPERSプロジェクトに
39 * 報告すること.
40 * (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
41 * 害からも,上記著作権者
42およびTOPPERSプロジェクトをå…
43è²¬ã™ã‚‹ã“と.
44 *
45 * 本ソフトウェアは,無保証で提供されているものである.上記著作権者
46お
47 * よびTOPPERSプロジェクトは,本ソフトウェアに関して,その適用可能性も
48 * 含めて,いかなる保証も行わない.また,本ソフトウェアの利用により直
49 * 接的または間接的に生じたいかなる損害に関しても,その責任を負わない.
50 *
51 * @(#) $Id: fdc37c935a.c,v 1.4 2003/12/24 08:00:42 honda Exp $
52 */
53
54/*
55 * スーパI/O FDC37C935A 用ドライバ
56 */
57
58#include <s_services.h>
59#include "fdc37c935a.h"
60
61/*
62 * 初期化
63 */
64void
65smsc_init(void)
66{
67 /*
68 * Enter Config mode
69 */
70 sil_wrh_mem((VP)SMSC_CONFIG_PORT, (0x55 << 8));
71 sil_wrh_mem((VP)SMSC_CONFIG_PORT, (0x55 << 8));
72
73 /*
74 * Init SCI0
75 */
76 /* Power on */
77 smsc_config_write(0x22, (smsc_config_read(0x22) | 0x10));
78 /* Select SCI0 */
79 smsc_config_write(0x07, 0x04);
80 /* Enable SCI0 */
81 smsc_config_write(0x30, 0x01);
82 /* Set SCI0 Base Address */
83 smsc_config_write(0x60, (SMSC_SCI0_BASE_ADDR & 0xff00) >> 8);
84 smsc_config_write(0x61, (SMSC_SCI0_BASE_ADDR & 0xff));
85 /* IRQ4 */
86 smsc_config_write(0x70, 0x04);
87
88
89 /*
90 * Exit Config mode
91 */
92 sil_wrh_mem((VP)SMSC_CONFIG_PORT, (0xAA << 8));
93}
94
95
96/*
97 * スーパーI/O(FDC37C935A)用 簡易SIOドライバ
98 */
99
100/*
101 * シリアルI/Oポート初期化ブロック
102 */
103typedef struct sio_port_initialization_block {
104 char dummy;
105} SIOPINIB;
106
107/*
108 * シリアルI/Oポート管理ブロック
109 */
110struct sio_port_control_block {
111 const SIOPINIB *siopinib; /* シリアルI/Oポート初期化ブロック */
112 VP_INT exinf; /* 拡張情
113å ± */
114 BOOL openflag; /* オープン済みフラグ */
115 BOOL sendflag; /* 送信割込みイネーブルフラグ */
116 BOOL getready; /* 文字を受信した状æ…
117‹ */
118 BOOL putready; /* 文字を送信できる状æ…
119‹ */
120};
121
122/*
123 * シリアルI/Oポート初期化ブロック
124 */
125const SIOPINIB siopinib_table[TNUM_SIOP]= {{0}};
126
127/*
128 * シリアルI/Oポート管理ブロックのエリア
129 */
130SIOPCB siopcb_table[TNUM_SIOP];
131
132
133/*
134 * シリアルI/OポートIDから管理ブロックを取り出すためのマクロ
135 */
136#define INDEX_SIOP(siopid) ((UINT)((siopid) - 1))
137#define get_siopcb(siopid) (&(siopcb_table[INDEX_SIOP(siopid)]))
138
139
140/*
141 * 文字を受信したか?
142 */
143Inline BOOL
144smsc_sci0_getready(SIOPCB *siopcb)
145{
146 return(((sil_reh_mem((VP)SMSC_SCI0_LSR) >> 8) & 0x01) != 0);
147}
148
149/*
150 * 文字を送信できるか?
151 */
152Inline BOOL
153smsc_sci0_putready(SIOPCB *siopcb)
154{
155 return(((sil_reh_mem((VP)SMSC_SCI0_LSR) >> 8) & 0x60) != 0);
156}
157
158/*
159 * 受信した文字の取り出し
160 */
161Inline char
162smsc_sci0_getchar(SIOPCB *siopcb)
163{
164 return (sil_reh_mem((VP)SMSC_SCI0_RBR) >> 8);
165}
166
167/*
168 * 送信する文字の書き込み
169 */
170Inline void
171smsc_sci0_putchar(SIOPCB *siopcb, char c)
172{
173 sil_wrh_mem((VP)SMSC_SCI0_THR, c << 8);
174}
175
176/*
177 * 送信割込み許可
178 */
179Inline void
180smsc_sci0_enable_send(SIOPCB *siopcb)
181{
182
183 sil_wrh_mem((VP)SMSC_SCI0_IER,
184 (((sil_reh_mem((VP)SMSC_SCI0_IER) >> 8) | 0x02) << 8));
185}
186
187/*
188 * 送信割込み禁止
189 */
190Inline void
191smsc_sci0_disable_send(SIOPCB *siopcb)
192{
193 sil_wrh_mem((VP)SMSC_SCI0_IER,
194 (((sil_reh_mem((VP)SMSC_SCI0_IER) >> 8) & ~0x02) << 8));
195}
196
197/*
198 * 受信割込み許可
199 */
200Inline void
201smsc_sci0_enable_rcv(SIOPCB *siopcb)
202{
203
204 sil_wrh_mem((VP)SMSC_SCI0_IER,
205 (((sil_reh_mem((VP)SMSC_SCI0_IER) >> 8) | 0x01) << 8));
206}
207
208/*
209 * 受信割込み禁止
210 */
211Inline void
212smsc_sci0_disable_rcv(SIOPCB *siopcb)
213{
214 sil_wrh_mem((VP)SMSC_SCI0_IER,
215 (((sil_reh_mem((VP)SMSC_SCI0_IER) >> 8) & ~0x01) << 8));
216}
217
218
219
220
221
222/*
223 * SIOドライバの初期化ルーチン
224 * 1ポートしかないため,あまり意味はない
225 */
226void
227smsc_sci0_initialize()
228{
229 SIOPCB *siopcb;
230 UINT i;
231
232 /*
233 * シルアルI/Oポート管理ブロックの初期化
234 */
235 for (siopcb = siopcb_table, i = 0; i < TNUM_SIOP; siopcb++, i++) {
236 siopcb->siopinib = &(siopinib_table[i]);
237 siopcb->openflag = FALSE;
238 siopcb->sendflag = FALSE;
239 }
240}
241
242/*
243 * 割込み以外の初期化
244 */
245void
246fdc37c935a_init(void)
247{
248 volatile UH dummy;
249
250 /* BIT7 = 1 */
251 sil_wrh_mem((VP)SMSC_SCI0_LCR, 0x83 << 8);
252
253 /* Set BPS */
254 sil_wrh_mem((VP)SMSC_SCI0_DLL, ((SMSC_SCI0_BPS & 0x00ff) << 8));
255 sil_wrh_mem((VP)SMSC_SCI0_DLM, ((SMSC_SCI0_BPS >> 8) << 8));
256
257 /* BIT7 = 0 Divisor Latch BIT6 = 0 No Break : BIT3 = 0 NoParity
258 : BIT2 = 0 1Stopbit : BIT1,0 = {1.1} 8bitData */
259 sil_wrh_mem((VP)SMSC_SCI0_LCR, 0x03 << 8);
260
261 /* Do not use FIFO */
262 sil_wrh_mem((VP)SMSC_SCI0_FCR, 0x0000);
263
264 /* Clear Status */
265 dummy = sil_reh_mem((VP)SMSC_SCI0_RBR);
266 dummy = sil_reh_mem((VP)SMSC_SCI0_LSR);
267}
268
269/*
270 * オープンしているポートがあるか
271 */
272BOOL
273smsc_sci0_openflag(void)
274{
275 return(siopcb_table[0].openflag);
276}
277
278/*
279 * シリアルI/Oポートのオープン
280 */
281SIOPCB *
282smsc_sci0_opn_por(ID siopid, VP_INT exinf)
283{
284 SIOPCB *siopcb;
285 const SIOPINIB *siopinib;
286
287
288 siopcb = get_siopcb(siopid);
289 siopinib = siopcb->siopinib;
290
291 fdc37c935a_init();
292
293 /* Enable Receive Data Interrupt */
294 sil_wrh_mem((VP)SMSC_SCI0_IER, (0x01 << 8));
295 sil_wrh_mem((VP)SMSC_SCI0_MCR, 0x08 << 8);
296
297 /*
298 * MS7729RSE01では,一度送信割込みを発生させておかないと割込み
299 * レベル16の割込みが発生してしまい正しく動作しない.
300 */
301 /* 送信割り込み要求を許可 */
302 sil_wrh_mem((VP)SMSC_SCI0_IER,
303 (((sil_reh_mem((VP)SMSC_SCI0_IER) >> 8) | 0x02) << 8));
304 /* 送信割り込み要求を禁止 */
305 sil_wrh_mem((VP)SMSC_SCI0_IER,
306 (((sil_reh_mem((VP)SMSC_SCI0_IER) >> 8) & ~0x02) << 8));
307
308 siopcb->exinf = exinf;
309 siopcb->getready = siopcb->putready = FALSE;
310 siopcb->openflag = TRUE;
311
312 return(siopcb);
313}
314
315/*
316 * シリアルI/Oポートのクローズ
317 */
318void
319smsc_sci0_cls_por(SIOPCB *siopcb)
320{
321 sil_wrh_mem((VP)SMSC_SCI0_IER, 0x00); /* 割込みの禁止 */
322 siopcb->openflag = FALSE;
323}
324
325/*
326 * シリアルI/Oポートへのポーリングでの出力
327 */
328void
329fdc37c935a_pol_putc(char c)
330{
331 while(((sil_reh_mem((VP)SMSC_SCI0_LSR) >> 8) & 0x60) == 0)
332 ;
333
334 sil_wrh_mem((VP)SMSC_SCI0_THR, c << 8);
335}
336
337/*
338 * シリアルI/Oポートへの文字送信
339 */
340BOOL
341smsc_sci0_snd_chr(SIOPCB *siopcb, char c)
342{
343 if (smsc_sci0_putready(siopcb)){
344 smsc_sci0_putchar(siopcb, c);
345 return(TRUE);
346 }
347 return(FALSE);
348}
349
350/*
351 * シリアルI/Oポートからの文字受信
352 */
353INT
354smsc_sci0_rcv_chr(SIOPCB *siopcb)
355{
356 if (smsc_sci0_getready(siopcb)) {
357 return((INT)(UB) smsc_sci0_getchar(siopcb));
358 }
359 return(-1);
360}
361
362
363/*
364 * シリアルI/Oポートからのコールバックの許可
365 */
366void
367smsc_sci0_ena_cbr(SIOPCB *siopcb, UINT cbrtn)
368{
369
370 switch (cbrtn) {
371 case SIO_ERDY_SND:
372 smsc_sci0_enable_send(siopcb);
373 break;
374 case SIO_ERDY_RCV:
375 smsc_sci0_enable_rcv(siopcb);
376 break;
377 }
378}
379
380/*
381 * シリアルI/Oポートからのコールバックの禁止
382 */
383void
384smsc_sci0_dis_cbr(SIOPCB *siopcb, UINT cbrtn)
385{
386 switch (cbrtn) {
387 case SIO_ERDY_SND:
388 smsc_sci0_disable_send(siopcb);
389 break;
390 case SIO_ERDY_RCV:
391 smsc_sci0_disable_rcv(siopcb);
392 break;
393 }
394}
395
396/*
397 * シリアルI/Oポートに対する割込み処理
398 */
399static void
400smsc_sci0_isr_siop(SIOPCB *siopcb)
401{
402 if (smsc_sci0_getready(siopcb)) {
403 /*
404 * 受信通知コールバックルーチンを呼び出す.
405 */
406 smsc_sci0_ierdy_rcv(siopcb->exinf);
407 }
408 if (smsc_sci0_putready(siopcb)) {
409 /*
410 * 送信可能コールバックルーチンを呼び出す.
411 */
412 smsc_sci0_ierdy_snd(siopcb->exinf);
413 }
414}
415
416/*
417 * SIOの割込みサービスルーチン
418 */
419void
420smsc_sci0_isr()
421{
422 smsc_sci0_isr_siop(&(siopcb_table[0]));
423}
Note: See TracBrowser for help on using the repository browser.