[337] | 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 |
|
---|
| 50 | /*
|
---|
| 51 | * プリミティブな送信/受信関数
|
---|
| 52 | */
|
---|
| 53 |
|
---|
| 54 | /*
|
---|
| 55 | * 受信バッファに文字があるか?
|
---|
| 56 | */
|
---|
| 57 | Inline bool_t
|
---|
| 58 | scif_getready(CELLCB *p_cellcb)
|
---|
| 59 | {
|
---|
| 60 | /*
|
---|
| 61 | * 受信フラグがONのときのみ受信バッファから文字を取得する.
|
---|
| 62 | * これは, ポーリング受信に対応するためである.
|
---|
| 63 | * しかし, RX600シリーズでは受信フラグがないこと, システムサービス
|
---|
| 64 | * では受信割込みの中からしかデータを受信しに来ないことから, 常に
|
---|
| 65 | * 受信バッファから文字を取得する.
|
---|
| 66 | */
|
---|
| 67 | return true;
|
---|
| 68 | }
|
---|
| 69 |
|
---|
| 70 | /*
|
---|
| 71 | * 送信バッファに空きがあるか?
|
---|
| 72 | */
|
---|
| 73 | Inline bool_t
|
---|
| 74 | scif_putready(CELLCB *p_cellcb)
|
---|
| 75 | {
|
---|
| 76 | if((sil_reb_mem(SCI_SSR(ATTR_baseAddress)) & SCI_SSR_TEND_BIT) != 0){
|
---|
| 77 | return(true);
|
---|
| 78 | }
|
---|
| 79 | return(false);
|
---|
| 80 | }
|
---|
| 81 |
|
---|
| 82 | /*
|
---|
| 83 | * 送信する文字の書込み
|
---|
| 84 | */
|
---|
| 85 | Inline void
|
---|
| 86 | scif_putchar(CELLCB *p_cellcb, char c)
|
---|
| 87 | {
|
---|
| 88 | sil_wrb_mem(SCI_TDR(ATTR_baseAddress), c);
|
---|
| 89 | }
|
---|
| 90 |
|
---|
| 91 | /*
|
---|
| 92 | * シリアルI/Oポートのオープン
|
---|
| 93 | */
|
---|
| 94 | void
|
---|
| 95 | eSIOPort_open(CELLIDX idx)
|
---|
| 96 | {
|
---|
| 97 | CELLCB *p_cellcb = GET_CELLCB(idx);
|
---|
| 98 | uint_t cnt, brr, clk;
|
---|
| 99 | volatile uint8_t i;
|
---|
| 100 |
|
---|
| 101 | if (VAR_initialized) {
|
---|
| 102 | /*
|
---|
| 103 | * 既に初期化している場合は、二重に初期化しない.
|
---|
| 104 | */
|
---|
| 105 | return;
|
---|
| 106 | }
|
---|
| 107 |
|
---|
| 108 | cnt = (FREQ_PCLK * 1000) / (16 * ATTR_baudRate);
|
---|
| 109 | if (cnt < 512)
|
---|
| 110 | clk = 0;
|
---|
| 111 | else if (cnt < 4 * 512)
|
---|
| 112 | clk = 1;
|
---|
| 113 | else if (cnt < 16 * 512)
|
---|
| 114 | clk = 2;
|
---|
| 115 | else if (cnt < 64 * 512)
|
---|
| 116 | clk = 3;
|
---|
| 117 | else
|
---|
| 118 | return;
|
---|
| 119 |
|
---|
| 120 | brr = cnt / (1 << (2 * clk));
|
---|
| 121 | brr = (brr / 2) + (brr % 2) - 1;
|
---|
| 122 |
|
---|
| 123 | /*
|
---|
| 124 | * SCIドライバの初期化ルーチン
|
---|
| 125 | */
|
---|
| 126 |
|
---|
| 127 | /*
|
---|
| 128 | * 割り込み要求先レジスタの設定(ISELRi)
|
---|
| 129 | *
|
---|
| 130 | * リセット値と同じ値を設定することになるため,
|
---|
| 131 | * 処理は省略する.
|
---|
| 132 | */
|
---|
| 133 |
|
---|
| 134 | /*
|
---|
| 135 | * モジュールストップ機能の設定
|
---|
| 136 | */
|
---|
| 137 | sil_wrh_mem(SYSTEM_PRCR_ADDR, (uint16_t)0xA502); /* 書込み許可 */
|
---|
| 138 | sil_wrw_mem(SYSTEM_MSTPCRB_ADDR,
|
---|
| 139 | sil_rew_mem(SYSTEM_MSTPCRB_ADDR) & ~SCI_MSTPCRB_BIT(ATTR_baseAddress));
|
---|
| 140 | sil_wrh_mem(SYSTEM_PRCR_ADDR, (uint16_t)0xA500); /* 書込み禁止 */
|
---|
| 141 |
|
---|
| 142 | /* 送受信禁止, SCKn端子は入出力ポートとして使用 */
|
---|
| 143 | sil_wrb_mem(SCI_SCR(ATTR_baseAddress), 0x00U);
|
---|
| 144 |
|
---|
| 145 | /* クロック選択ビット(SMR.CKS[1:0]ビットを設定) */
|
---|
| 146 | sil_wrb_mem(SCI_SMR(ATTR_baseAddress),
|
---|
| 147 | (sil_reb_mem(SCI_SMR(ATTR_baseAddress)) & ~0x03) | clk);
|
---|
| 148 |
|
---|
| 149 | /* SMRに送信/ 受信フォーマットを設定) */
|
---|
| 150 | sil_wrb_mem(SCI_SMR(ATTR_baseAddress),
|
---|
| 151 | sil_reb_mem(SCI_SMR(ATTR_baseAddress)) & (~SCI_SMR_FLG_ENABLE));
|
---|
| 152 |
|
---|
| 153 | /* ビットレートを設定 */
|
---|
| 154 | sil_wrb_mem(SCI_BRR(ATTR_baseAddress), brr);
|
---|
| 155 |
|
---|
| 156 | /* ビット期間(基本クロック16サイクルの期間が1ビット期間となる) */
|
---|
| 157 | for(i = 0; i < 16; i++) { }
|
---|
| 158 |
|
---|
| 159 | /* 送受信許可 */
|
---|
| 160 | sil_wrb_mem(SCI_SCR(ATTR_baseAddress),
|
---|
| 161 | (sil_reb_mem(SCI_SCR(ATTR_baseAddress)) | SCI_SCR_FLG_ENABLE));
|
---|
| 162 |
|
---|
| 163 | VAR_initialized = true;
|
---|
| 164 | }
|
---|
| 165 |
|
---|
| 166 | /*
|
---|
| 167 | * シリアルI/Oポートのクローズ
|
---|
| 168 | */
|
---|
| 169 | void
|
---|
| 170 | eSIOPort_close(CELLIDX idx)
|
---|
| 171 | {
|
---|
| 172 | CELLCB *p_cellcb = GET_CELLCB(idx);
|
---|
| 173 |
|
---|
| 174 | /*
|
---|
| 175 | * UART停止
|
---|
| 176 | */
|
---|
| 177 | sil_wrb_mem(SCI_SCR(ATTR_baseAddress), 0x00U);
|
---|
| 178 | }
|
---|
| 179 |
|
---|
| 180 | /*
|
---|
| 181 | * シリアルI/Oポートへの文字送信
|
---|
| 182 | */
|
---|
| 183 | bool_t
|
---|
| 184 | eSIOPort_putChar(CELLIDX idx, char c)
|
---|
| 185 | {
|
---|
| 186 | CELLCB *p_cellcb = GET_CELLCB(idx);
|
---|
| 187 |
|
---|
| 188 | if (scif_putready(p_cellcb)){
|
---|
| 189 | scif_putchar(p_cellcb, c);
|
---|
| 190 | return(true);
|
---|
| 191 | }
|
---|
| 192 | return(false);
|
---|
| 193 | }
|
---|
| 194 |
|
---|
| 195 | /*
|
---|
| 196 | * シリアルI/Oポートからの文字受信
|
---|
| 197 | */
|
---|
| 198 | int_t
|
---|
| 199 | eSIOPort_getChar(CELLIDX idx)
|
---|
| 200 | {
|
---|
| 201 | CELLCB *p_cellcb = GET_CELLCB(idx);
|
---|
| 202 | uint8_t reg;
|
---|
| 203 | int_t c = -1;
|
---|
| 204 |
|
---|
| 205 | /* オーバランエラーチェック */ /* ZZZ */
|
---|
| 206 | reg = sil_reb_mem(SCI_SSR(ATTR_baseAddress));
|
---|
| 207 | while((reg & SCI_SSR_ORER_BIT) != 0) {
|
---|
| 208 | sil_wrb_mem(SCI_SSR(ATTR_baseAddress), reg & ~SCI_SSR_ORER_BIT);
|
---|
| 209 | reg = sil_reb_mem(SCI_SSR(ATTR_baseAddress));
|
---|
| 210 | }
|
---|
| 211 |
|
---|
| 212 | /*
|
---|
| 213 | * 受信フラグがONのときのみ受信バッファから文字を取得する.
|
---|
| 214 | * これは, ポーリング受信に対応するためである.
|
---|
| 215 | * しかし, RX600シリーズでは受信フラグがないこと, システムサービス
|
---|
| 216 | * では受信割込みの中からしかデータを受信しに来ないことから, 常に
|
---|
| 217 | * 受信バッファから文字を取得する.
|
---|
| 218 | */
|
---|
| 219 | c = (int)(sil_reb_mem(SCI_RDR(ATTR_baseAddress)));
|
---|
| 220 |
|
---|
| 221 | return c;
|
---|
| 222 | }
|
---|
| 223 |
|
---|
| 224 | /*
|
---|
| 225 | * シリアルI/Oポートからのコールバックの許可
|
---|
| 226 | */
|
---|
| 227 | void
|
---|
| 228 | eSIOPort_enableCBR(CELLIDX idx, uint_t cbrtn)
|
---|
| 229 | {
|
---|
| 230 | CELLCB *p_cellcb = GET_CELLCB(idx);
|
---|
| 231 |
|
---|
| 232 | switch (cbrtn) {
|
---|
| 233 | case SIO_RDY_SND:
|
---|
| 234 | sil_wrb_mem(SCI_SCR(ATTR_baseAddress),
|
---|
| 235 | (sil_reb_mem(SCI_SCR(ATTR_baseAddress)) | SCI_SCR_TEIE_BIT));
|
---|
| 236 | break;
|
---|
| 237 | case SIO_RDY_RCV:
|
---|
| 238 | sil_wrb_mem(SCI_SCR(ATTR_baseAddress),
|
---|
| 239 | (sil_reb_mem(SCI_SCR(ATTR_baseAddress)) | SCI_SCR_RIE_BIT));
|
---|
| 240 | break;
|
---|
| 241 | default:
|
---|
| 242 | assert(1);
|
---|
| 243 | break;
|
---|
| 244 | }
|
---|
| 245 | }
|
---|
| 246 |
|
---|
| 247 | /*
|
---|
| 248 | * シリアルI/Oポートからのコールバックの禁止
|
---|
| 249 | */
|
---|
| 250 | void
|
---|
| 251 | eSIOPort_disableCBR(CELLIDX idx, uint_t cbrtn)
|
---|
| 252 | {
|
---|
| 253 | CELLCB *p_cellcb = GET_CELLCB(idx);
|
---|
| 254 |
|
---|
| 255 | switch (cbrtn) {
|
---|
| 256 | case SIO_RDY_SND:
|
---|
| 257 | sil_wrb_mem(SCI_SCR(ATTR_baseAddress),
|
---|
| 258 | (sil_reb_mem(SCI_SCR(ATTR_baseAddress)) & (~SCI_SCR_TEIE_BIT)));
|
---|
| 259 | break;
|
---|
| 260 | case SIO_RDY_RCV:
|
---|
| 261 | sil_wrb_mem(SCI_SCR(ATTR_baseAddress),
|
---|
| 262 | (sil_reb_mem(SCI_SCR(ATTR_baseAddress)) & (~SCI_SCR_RIE_BIT)));
|
---|
| 263 | break;
|
---|
| 264 | default:
|
---|
| 265 | assert(1);
|
---|
| 266 | break;
|
---|
| 267 | }
|
---|
| 268 | }
|
---|
| 269 |
|
---|
| 270 | /*
|
---|
| 271 | * シリアルI/Oポートに対する受信割込み処理
|
---|
| 272 | */
|
---|
| 273 | void
|
---|
| 274 | eiRxISR_main(CELLIDX idx)
|
---|
| 275 | {
|
---|
| 276 | CELLCB *p_cellcb = GET_CELLCB(idx);
|
---|
| 277 |
|
---|
| 278 | if (scif_getready(p_cellcb)) {
|
---|
| 279 | /*
|
---|
| 280 | * 受信通知コールバックルーチンを呼び出す.
|
---|
| 281 | */
|
---|
| 282 | ciSIOCBR_readyReceive();
|
---|
| 283 | }
|
---|
| 284 | }
|
---|
| 285 |
|
---|
| 286 | /*
|
---|
| 287 | * シリアルI/Oポートに対する送信割込み処理
|
---|
| 288 | */
|
---|
| 289 | void
|
---|
| 290 | eiTxISR_main(CELLIDX idx)
|
---|
| 291 | {
|
---|
| 292 | CELLCB *p_cellcb = GET_CELLCB(idx);
|
---|
| 293 |
|
---|
| 294 | if (scif_putready(p_cellcb)) {
|
---|
| 295 | /*
|
---|
| 296 | * 送信可能コールバックルーチンを呼び出す.
|
---|
| 297 | */
|
---|
| 298 | ciSIOCBR_readySend();
|
---|
| 299 | }
|
---|
| 300 | }
|
---|