source: asp3_tinet_ecnl_rx/trunk/asp3_dcre/arch/rx630_gcc/tSCIF.c@ 374

Last change on this file since 374 was 374, checked in by coas-nagasima, 5 years ago

mbed関連を更新
シリアルドライバをmbedのHALを使うよう変更
ファイルディスクリプタの処理を更新
  • Property svn:eol-style set to native
  • Property svn:mime-type set to text/x-csrc;charset=UTF-8
File size: 8.5 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) 2006-2016 by Embedded and Real-Time Systems Laboratory
7 * Graduate School of Information Science, Nagoya Univ., JAPAN
8 * Copyright (C) 2017 by Cores Co., Ltd. Japan
9 *
10 * 上記著作権者は，以下の(1)～(4)の条件を満たす場合に限り，本ソフトウェ
11 * ア（本ソフトウェアを改変したものを含む．以下同じ）を使用・複製・改
12 * 変・再配布（以下，利用と呼ぶ）することを無償で許諾する．
13 * (1) 本ソフトウェアをソースコードの形で利用する場合には，上記の著作
14 * 権表示，この利用条件および下記の無保証規定が，そのままの形でソー
15 * スコード中に含まれていること．
16 * (2) 本ソフトウェアを，ライブラリ形式など，他のソフトウェア開発に使
17 * 用できる形で再配布する場合には，再配布に伴うドキュメント（利用
18 * 者マニュアルなど）に，上記の著作権表示，この利用条件および下記
19 * の無保証規定を掲載すること．
20 * (3) 本ソフトウェアを，機器に組み込むなど，他のソフトウェア開発に使
21 * 用できない形で再配布する場合には，次のいずれかの条件を満たすこ
22 * と．
23 * (a) 再配布に伴うドキュメント（利用者マニュアルなど）に，上記の著
24 * 作権表示，この利用条件および下記の無保証規定を掲載すること．
25 * (b) 再配布の形態を，別に定める方法によって，TOPPERSプロジェクトに
26 * 報告すること．
27 * (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
28 * 害からも，上記著作権者およびTOPPERSプロジェクトを免責すること．
29 * また，本ソフトウェアのユーザまたはエンドユーザからのいかなる理
30 * 由に基づく請求からも，上記著作権者およびTOPPERSプロジェクトを
31 * 免責すること．
32 *
33 * 本ソフトウェアは，無保証で提供されているものである．上記著作権者お
34 * よびTOPPERSプロジェクトは，本ソフトウェアに関して，特定の使用目的
35 * に対する適合性も含めて，いかなる保証も行わない．また，本ソフトウェ
36 * アの利用により直接的または間接的に生じたいかなる損害に関しても，そ
37 * の責任を負わない．
38 *
39 * $Id$
40 */
41
42/*
43 * FIFO内蔵シリアルコミュニケーションインタフェース用 簡易SIOドライバ
44 */
45
46#include <sil.h>
47#include "tSCIF_tecsgen.h"
48#include "scif.h"
49#include "target_kernel_impl.h"
50
51/*
52 * プリミティブな送信／受信関数
53 */
54
55/*
56 * 受信バッファに文字があるか？
57 */
58Inline bool_t
59scif_getready(CELLCB *p_cellcb)
60{
61 /*
62 * 受信フラグがONのときのみ受信バッファから文字を取得する.
63 * これは, ポーリング受信に対応するためである.
64 * しかし, RX600シリーズでは受信フラグがないこと, システムサービス
65 * では受信割込みの中からしかデータを受信しに来ないことから, 常に
66 * 受信バッファから文字を取得する.
67 */
68 return true;
69}
70
71/*
72 * 送信バッファに空きがあるか？
73 */
74Inline bool_t
75scif_putready(CELLCB *p_cellcb)
76{
77 if((sil_reb_mem(SCI_SSR(ATTR_baseAddress)) & SCI_SSR_TEND_BIT) != 0){
78 return(true);
79 }
80 return(false);
81}
82
83/*
84 * 送信する文字の書込み
85 */
86Inline void
87scif_putchar(CELLCB *p_cellcb, char c)
88{
89 sil_wrb_mem(SCI_TDR(ATTR_baseAddress), c);
90}
91
92/*
93 * シリアルI/Oポートのオープン
94 */
95void
96eSIOPort_open(CELLIDX idx)
97{
98 CELLCB *p_cellcb = GET_CELLCB(idx);
99 uint_t cnt, brr, clk;
100 volatile uint8_t i;
101
102 if (VAR_initialized) {
103 /*
104 * 既に初期化している場合は、二重に初期化しない．
105 */
106 return;
107 }
108
109 cnt = (FREQ_PCLK * 1000) / (16 * ATTR_baudRate);
110 if (cnt < 512)
111 clk = 0;
112 else if (cnt < 4 * 512)
113 clk = 1;
114 else if (cnt < 16 * 512)
115 clk = 2;
116 else if (cnt < 64 * 512)
117 clk = 3;
118 else
119 return;
120
121 brr = cnt / (1 << (2 * clk));
122 brr = (brr / 2) + (brr % 2) - 1;
123
124 /*
125 * SCIドライバの初期化ルーチン
126 */
127
128 /*
129 * 割り込み要求先レジスタの設定(ISELRi)
130 *
131 * リセット値と同じ値を設定することになるため,
132 * 処理は省略する.
133 */
134
135 /*
136 * モジュールストップ機能の設定
137 */
138 sil_wrh_mem(SYSTEM_PRCR_ADDR, (uint16_t)0xA502); /* 書込み許可 */
139 sil_wrw_mem(SYSTEM_MSTPCRB_ADDR,
140 sil_rew_mem(SYSTEM_MSTPCRB_ADDR) & ~SCI_MSTPCRB_BIT(ATTR_baseAddress));
141 sil_wrh_mem(SYSTEM_PRCR_ADDR, (uint16_t)0xA500); /* 書込み禁止 */
142
143 /* 送受信禁止, SCKn端子は入出力ポートとして使用 */
144 sil_wrb_mem(SCI_SCR(ATTR_baseAddress), 0x00U);
145
146 /* クロック選択ビット(SMR.CKS[1:0]ビットを設定) */
147 sil_wrb_mem(SCI_SMR(ATTR_baseAddress),
148 (sil_reb_mem(SCI_SMR(ATTR_baseAddress)) & ~0x03) | clk);
149
150 /* SMRに送信／ 受信フォーマットを設定) */
151 sil_wrb_mem(SCI_SMR(ATTR_baseAddress),
152 sil_reb_mem(SCI_SMR(ATTR_baseAddress)) & (~SCI_SMR_FLG_ENABLE));
153
154 /* ビットレートを設定 */
155 sil_wrb_mem(SCI_BRR(ATTR_baseAddress), brr);
156
157 /* ビット期間(基本クロック16サイクルの期間が1ビット期間となる) */
158 for(i = 0; i < 16; i++) { }
159
160 /* 送受信許可 */
161 sil_wrb_mem(SCI_SCR(ATTR_baseAddress),
162 (sil_reb_mem(SCI_SCR(ATTR_baseAddress)) | SCI_SCR_FLG_ENABLE));
163
164 VAR_initialized = true;
165}
166
167/*
168 * シリアルI/Oポートのクローズ
169 */
170void
171eSIOPort_close(CELLIDX idx)
172{
173 CELLCB *p_cellcb = GET_CELLCB(idx);
174
175 /*
176 * UART停止
177 */
178 sil_wrb_mem(SCI_SCR(ATTR_baseAddress), 0x00U);
179}
180
181/*
182 * シリアルI/Oポートへの文字送信
183 */
184bool_t
185eSIOPort_putChar(CELLIDX idx, char c)
186{
187 CELLCB *p_cellcb = GET_CELLCB(idx);
188
189 if (scif_putready(p_cellcb)){
190 scif_putchar(p_cellcb, c);
191 return(true);
192 }
193 return(false);
194}
195
196/*
197 * シリアルI/Oポートからの文字受信
198 */
199int_t
200eSIOPort_getChar(CELLIDX idx)
201{
202 CELLCB *p_cellcb = GET_CELLCB(idx);
203 uint8_t reg;
204 int_t c = -1;
205
206 /* オーバランエラーチェック */ /* ZZZ */
207 reg = sil_reb_mem(SCI_SSR(ATTR_baseAddress));
208 while((reg & SCI_SSR_ORER_BIT) != 0) {
209 sil_wrb_mem(SCI_SSR(ATTR_baseAddress), reg & ~SCI_SSR_ORER_BIT);
210 reg = sil_reb_mem(SCI_SSR(ATTR_baseAddress));
211 }
212
213 /*
214 * 受信フラグがONのときのみ受信バッファから文字を取得する.
215 * これは, ポーリング受信に対応するためである.
216 * しかし, RX600シリーズでは受信フラグがないこと, システムサービス
217 * では受信割込みの中からしかデータを受信しに来ないことから, 常に
218 * 受信バッファから文字を取得する.
219 */
220 c = (int)(sil_reb_mem(SCI_RDR(ATTR_baseAddress)));
221
222 return c;
223}
224
225/*
226 * シリアルI/Oポートからのコールバックの許可
227 */
228void
229eSIOPort_enableCBR(CELLIDX idx, uint_t cbrtn)
230{
231 CELLCB *p_cellcb = GET_CELLCB(idx);
232
233 switch (cbrtn) {
234 case SIO_RDY_SND:
235 sil_wrb_mem(SCI_SCR(ATTR_baseAddress),
236 (sil_reb_mem(SCI_SCR(ATTR_baseAddress)) | SCI_SCR_TEIE_BIT));
237 break;
238 case SIO_RDY_RCV:
239 sil_wrb_mem(SCI_SCR(ATTR_baseAddress),
240 (sil_reb_mem(SCI_SCR(ATTR_baseAddress)) | SCI_SCR_RIE_BIT));
241 break;
242 default:
243 assert(1);
244 break;
245 }
246}
247
248/*
249 * シリアルI/Oポートからのコールバックの禁止
250 */
251void
252eSIOPort_disableCBR(CELLIDX idx, uint_t cbrtn)
253{
254 CELLCB *p_cellcb = GET_CELLCB(idx);
255
256 switch (cbrtn) {
257 case SIO_RDY_SND:
258 sil_wrb_mem(SCI_SCR(ATTR_baseAddress),
259 (sil_reb_mem(SCI_SCR(ATTR_baseAddress)) & (~SCI_SCR_TEIE_BIT)));
260 break;
261 case SIO_RDY_RCV:
262 sil_wrb_mem(SCI_SCR(ATTR_baseAddress),
263 (sil_reb_mem(SCI_SCR(ATTR_baseAddress)) & (~SCI_SCR_RIE_BIT)));
264 break;
265 default:
266 assert(1);
267 break;
268 }
269}
270
271/*
272 * シリアルI/Oポートに対する受信割込み処理
273 */
274void
275eiRxISR_main(CELLIDX idx)
276{
277 CELLCB *p_cellcb = GET_CELLCB(idx);
278
279 if (scif_getready(p_cellcb)) {
280 /*
281 * 受信通知コールバックルーチンを呼び出す．
282 */
283 ciSIOCBR_readyReceive();
284 }
285}
286
287/*
288 * シリアルI/Oポートに対する送信割込み処理
289 */
290void
291eiTxISR_main(CELLIDX idx)
292{
293 CELLCB *p_cellcb = GET_CELLCB(idx);
294
295 if (scif_putready(p_cellcb)) {
296 /*
297 * 送信可能コールバックルーチンを呼び出す．
298 */
299 ciSIOCBR_readySend();
300 }
301}
Note: See TracBrowser for help on using the repository browser.