source: anotherchoice/tags/jsp-1.4.4-full-UTF8/config/tlcs900-toshiba/zup_f16_ex/uart.c@ 363

/*
 *  TOPPERS/JSP Kernel
 *      Toyohashi Open Platform for Embedded Real-Time Systems/
 *      Just Standard Profile Kernel
 * 
 *  Copyright (C) 2006-2010 by Witz Corporation, JAPAN
 * 
 *  The above copyright holders grant permission gratis to use,
 *  duplicate, modify, or redistribute (hereafter called use) this
 *  software (including the one made by modifying this software),
 *  provided that the following four conditions (1) through (4) are
 *  satisfied.
 * 
 *  (1) When this software is used in the form of source code, the above
 *      copyright notice, this use conditions, and the disclaimer shown
 *      below must be retained in the source code without modification.
 * 
 *  (2) When this software is redistributed in the forms usable for the
 *      development of other software, such as in library form, the above
 *      copyright notice, this use conditions, and the disclaimer shown
 *      below must be shown without modification in the document provided
 *      with the redistributed software, such as the user manual.
 * 
 *  (3) When this software is redistributed in the forms unusable for the
 *      development of other software, such as the case when the software
 *      is embedded in a piece of equipment, either of the following two
 *      conditions must be satisfied:
 * 
 *    (a) The above copyright notice, this use conditions, and the
 *           disclaimer shown below must be shown without modification in
 *        the document provided with the redistributed software, such as
 *        the user manual.
 * 
 *    (b) How the software is to be redistributed must be reported to the
 *        TOPPERS Project according to the procedure described
 *        separately.
 * 
 *  (4) The above copyright holders and the TOPPERS Project are exempt
 *      from responsibility for any type of damage directly or indirectly
 *      caused from the use of this software and are indemnified by any
 *      users or end users of this software from any and all causes of
 *      action whatsoever.
 * 
 *  THIS SOFTWARE IS PROVIDED "AS IS." THE ABOVE COPYRIGHT HOLDERS AND
 *  THE TOPPERS PROJECT DISCLAIM ANY EXPRESS OR IMPLIED WARRANTIES,
 *  INCLUDING, BUT NOT LIMITED TO, ITS APPLICABILITY TO A PARTICULAR
 *  PURPOSE. IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS AND THE
 *  TOPPERS PROJECT BE LIABLE FOR ANY TYPE OF DAMAGE DIRECTLY OR
 *  INDIRECTLY CAUSED FROM THE USE OF THIS SOFTWARE.
 * 
 *  上記著作権者
は，以下の (1)〜(4) ã®æ¡ä»¶ã‚’æº€ãŸã™å ´åˆã«é™ã‚Šï¼Œæœ¬ã‚½ãƒ•ãƒˆã‚¦ã‚§
 *  ア（本ソフトウェアを改変したものを含む．以下同じ）を使用・複製・改変・
 *  再é…
å¸ƒï¼ˆä»¥ä¸‹ï¼Œåˆ©ç”¨ã¨å‘¼ã¶ï¼‰ã™ã‚‹ã“とを無償で許諾する．
 *  (1) æœ¬ã‚½ãƒ•ãƒˆã‚¦ã‚§ã‚¢ã‚’ã‚½ãƒ¼ã‚¹ã‚³ãƒ¼ãƒ‰ã®å½¢ã§åˆ©ç”¨ã™ã‚‹å ´åˆã«ã¯ï¼Œä¸Šè¨˜ã®è‘—ä½œæ¨©
 *      表示，この利用条件および下記の無保証規定が，そのままの形でソース
 *      コード中に含まれていること．
 *  (2) 本ソフトウェアを，ライブラリ形式など，他のソフトウェア開発に使用
 *      できる形で再é…
å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œå†é…
å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨è€…
マ
 *      ニュアルなど）に，上記の著作権表示，この利用条件および下記の無保
 *      証規定を掲載すること．
 *  (3) 本ソフトウェアを，機器に組み込むなど，他のソフトウェア開発に使用
 *      できない形で再é…
å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œæ¬¡ã®ã„ずれかの条件を満たすこと．
 *    (a) 再é…
å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨è€…
マニュアルなど）に，上記の著作
 *        権表示，この利用条件および下記の無保証規定を掲載すること．
 *    (b) 再é…
å¸ƒã®å½¢æ…
‹ã‚’，別に定める方法によって，TOPPERSãƒ—ãƒ­ã‚¸ã‚§ã‚¯ãƒˆã«å ±
 *        告すること．
 *  (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損害
 *      からも，上記著作権者
およびTOPPERSプロジェクトをå…
è²¬ã™ã‚‹ã“と．また，
 *      本ソフトウェアのユーザまたはエンドユーザからのいかなる理由に基づ
 *      く請求からも，上記著作権者
およびTOPPERSプロジェクトをå…
è²¬ã™ã‚‹ã“と．
 * 
 *  本ソフトウェアは，無保証で提供されているものである．上記著作権者
およ
 *  びTOPPERSプロジェクトは，本ソフトウェアに関して，特定の使用目的に対す
 *  る適合性も含めて，いかなる保証も行わない．また，本ソフトウェアの利用
 *  ã«ã‚ˆã‚Šç›´æŽ¥çš„ã¾ãŸã¯é–“æŽ¥çš„ã«ç”Ÿã˜ãŸã„ã‹ãªã‚‹æå®³ã«é–¢ã—ã¦ã‚‚ï¼Œãã®è²¬ä»»ã‚’è² 
 *  わない．
 * 
 *  @(#) $Id: uart.c,v 1.1 2006/04/10 08:19:25 honda Exp $
 */

/*
 *  非同期通信 (UART)シリアルチャンネルデバイス（SIO）ドライバ
 *  （Zup-F16拡張ボード用）
 */
#include <s_services.h>
#include <sil.h>
#include <tmp91cy22.h>
#include <uart.h>

/*
 *  シリアルI/O制御レジスタへのオフセット定義
 */
#define         TOFFSET_SC0BUF                  0x0000
#define         TOFFSET_SC0CR                   0x0001
#define         TOFFSET_SC0MOD0                 0x0002
#define         TOFFSET_BR0CR                   0x0003
#define         TOFFSET_BR0ADD                  0x0004
#define         TOFFSET_SC0MOD1                 0x0005
 
/*
 *  シリアルI/Oポート状æ…
‹ãƒ•ãƒ©ã‚°ã®å®šç¾©
 */
#define         TBIT_STS_DEF                    0x00
#define         TBIT_TXB_EMPTY                  0x01
#define         TBIT_ENE_TXCBR                  0x02
#define         TBIT_ENE_RXCBR                  0x04
#define         TBIT_LOG_PORT                   0x80

/*
 *  シリアルI/Oポート初期化ブロック
 *
 *  ID = 1 をuart1，ID = 2 をuart0に対応させている．
 */
static const SIOPINIB siopinib_table[TNUM_PORT] = {
        { TADR_SFR_SC1BUF, TADR_SFR_INTES1, 0x08, (TBIT_SIOSMU8 | TBIT_SIORXE | TBIT_SIOSCBRG),
          0x00, BRCR_19200, BRADD_19200, TBIT_RX1_CLR } /* ID1用 UART1 19200bps        */
/*      { TADR_SFR_SC1BUF, TADR_SFR_INTES1, 0x08, (TBIT_SIOSMU8 | TBIT_SIORXE | TBIT_SIOSCBRG),
          0x00, BRCR_38400, BRADD_38400, TBIT_RX1_CLR }*/       /* ID1用 UART1 38400bps        */
/*      { TADR_SFR_SC0BUF, TADR_SFR_INTES0, 0x01, (TBIT_SIOSMU8 | TBIT_SIORXE | TBIT_SIOSCBRG),
          0x00, BRCR_19200, BRADD_19200, TBIT_RX0_CLR }*/       /* ID2用 UART0 19200bps        */
};

/*
 *  シリアルI/Oポート管理ブロックのエリア
 */
static SIOPCB siopcb_table[TNUM_PORT];

/*
 *  シリアルI/OポートIDから管理ブロックを取り出すためのマクロ
 */
#define INDEX_SIOP(siopid)      ((UINT)((siopid) - 1))
#define get_siopcb(siopid)      (&(siopcb_table[INDEX_SIOP(siopid)]))

/*
 *  SIOドライバの初期化ルーチン
 */
void
uart_initialize()
{
        SIOPCB  *siopcb;
        UINT    i;

        /*
         *  シリアルI/Oポート管理ブロックの初期化
         */
        for (siopcb = siopcb_table, i = 0; i < TNUM_PORT; siopcb++, i++) {
                siopcb->siopinib = &(siopinib_table[i]);
                siopcb->sts_flag = TBIT_STS_DEF;
                siopcb->rxb = -1;
        }
}

/*
 *  シリアルI/Oポートのオープン
 */
SIOPCB *
uart_opn_por(ID siopid, VP_INT exinf)
{
        SIOPCB          *siopcb;
        const SIOPINIB  *siopinib;
        int i;

        /* ポートIDから管理ブロックを取得 */
        siopcb = get_siopcb(siopid);
        siopinib = siopcb->siopinib;

        /* 管理ブロックに情
å ±è¨­å®š    */
        siopcb->sts_flag |= TBIT_TXB_EMPTY;
        siopcb->exinf = exinf;
        if( siopid == LOGTASK_PORTID ){ /* ã‚·ã‚¹ãƒ†ãƒ ãƒ­ã‚°ç”¨ã®ãƒãƒ¼ãƒˆã®å ´åˆ   */
                siopcb->sts_flag |= TBIT_LOG_PORT;
                if( log_io_busy == TRUE ){
                        /* é€ä¿¡ä¸­ã®å ´åˆã¯å®Œäº†ã¾ã§å¾…
つ      */
                        while( (sil_reb_mem((VP)(siopinib->hint)) & TBIT_INTC_H) == 0 );
                }
                log_io_busy = FALSE;    /* 初期化なので明示的に行っている   */
        }

        /* 受信停止 */
        sil_wrb_mem((VP)(siopinib->cntrl+TOFFSET_SC0MOD0), 0x00 );
        /* ポート設定(TXDとして使用)  */
        sil_wrb_mem((VP)(TADR_SFR_P9FC), siopinib->pcrfc_def );
        sil_wrb_mem((VP)(TADR_SFR_P9CR), siopinib->pcrfc_def );

        /* 動作モード設定        */
        sil_wrb_mem((VP)(siopinib->cntrl+TOFFSET_SC0MOD0), siopinib->scmod0_def );
        sil_reb_mem((VP)(siopinib->cntrl+TOFFSET_SC0CR));       /* 読出しによりエラーフラグクリア        */
        sil_wrb_mem((VP)(siopinib->cntrl+TOFFSET_SC0CR), siopinib->sccr_def );
        sil_wrb_mem((VP)(siopinib->cntrl+TOFFSET_BR0CR), siopinib->brcr_def);
        sil_wrb_mem((VP)(siopinib->cntrl+TOFFSET_BR0ADD), siopinib->bradd_def);
        sil_wrb_mem((VP)(siopinib->cntrl+TOFFSET_SC0MOD1), TBIT_SIOI2S);

        /* シリアル割込みの設定および要求フラグクリア       */
        sil_wrb_mem((VP)TADR_SFR_INTCLR, (siopinib->int_clr) );         /* 受信要求クリア        */
        sil_wrb_mem((VP)TADR_SFR_INTCLR, (VB)(siopinib->int_clr + 1) ); /* 送信要求クリア        */
        sil_wrb_mem((VP)(siopinib->hint), (VB)((INT_LEVEL_UART << 4) | INT_LEVEL_UART) );

        /*
         * ダミーデータ受信
         */
        sil_reb_mem((VP)(siopinib->cntrl+TOFFSET_SC0BUF));
        sil_reb_mem((VP)(siopinib->cntrl+TOFFSET_SC0BUF));

        return(siopcb);
}

/*
 *  シリアルI/Oポートのクローズ
 */
void
uart_cls_por(SIOPCB *siopcb)
{
        const SIOPINIB  *siopinib;

        siopinib = siopcb->siopinib;

        /* 受信停止 */
        sil_wrb_mem((VP)(siopinib->cntrl+TOFFSET_SC0MOD0), 0x00 );

        /* システムログ用ポートの処理      */
        if( (siopcb->sts_flag & TBIT_LOG_PORT) == TBIT_LOG_PORT ){
                if( log_io_busy == TRUE ){
                        /* é€ä¿¡ä¸­ã®å ´åˆã¯å®Œäº†ã¾ã§å¾…
つ      */
                        while( (sil_reb_mem((VP)(TADR_SFR_INTES0)) & TBIT_INTC_H) == 0 );
                }
                log_io_busy = FALSE;
        }

        /* シリアル割込みの禁止および要求フラグクリア       */
        sil_wrb_mem((VP)(siopinib->hint), 0x00 );
        sil_wrb_mem((VP)TADR_SFR_INTCLR, (siopinib->int_clr) );         /* 受信要求クリア        */
        sil_wrb_mem((VP)TADR_SFR_INTCLR, (VB)(siopinib->int_clr + 1) ); /* 送信要求クリア        */
        /* ポート設定(ポートとして使用)    */
        sil_wrb_mem((VP)(TADR_SFR_P9FC), 0x00 );
        sil_wrb_mem((VP)(TADR_SFR_P9CR), 0x00 );

        siopcb->sts_flag = TBIT_STS_DEF;
}

/*
 *  シリアルI/Oポートへの文字送信
 */
BOOL
uart_snd_chr(SIOPCB *siopcb, char c)
{
        if( (siopcb->sts_flag & TBIT_TXB_EMPTY) == TBIT_TXB_EMPTY ){
                siopcb->sts_flag &= (UB)~TBIT_TXB_EMPTY;
                sil_wrb_mem((VP)(siopcb->siopinib->cntrl+TOFFSET_SC0BUF), c);

        /* システムログ用ポートの処理      */
                if( (siopcb->sts_flag & TBIT_LOG_PORT) == TBIT_LOG_PORT ){
                        log_io_busy = TRUE;     /* 送信中    */
                }
                return(TRUE);
        }
        return(FALSE);
}

/*
 *  シリアルI/Oポートからの文字受信
 */
INT
uart_rcv_chr(SIOPCB *siopcb)
{
        return(siopcb->rxb);
}

/*
 *  シリアルI/Oポートからのコールバックの許可
 */
void
uart_ena_cbr(SIOPCB *siopcb, UINT cbrtn)
{
        switch (cbrtn) {
        case UART_ERDY_SND:
                siopcb->sts_flag |= TBIT_ENE_TXCBR;
                break;
        case UART_ERDY_RCV:
                siopcb->sts_flag |= TBIT_ENE_RXCBR;
                break;
        default:
                break;
        }
}

/*
 *  シリアルI/Oポートからのコールバックの禁止
 */
void
uart_dis_cbr(SIOPCB *siopcb, UINT cbrtn)
{
        switch (cbrtn) {
        case UART_ERDY_SND:
                siopcb->sts_flag &= (UB)~TBIT_ENE_TXCBR;
                break;
        case UART_ERDY_RCV:
                siopcb->sts_flag &= (UB)~TBIT_ENE_RXCBR;
                break;
        default:
                break;
        }
}

/*
 *  ポートID=1に指定されているSIOチャンネル(uart1)からの受信割込み
 */
void serial_in_handler1()
{
        SIOPCB *siopcb = &siopcb_table[0];

        /* ã‚¨ãƒ©ãƒ¼ã®å ´åˆå‡¦ç†ã—ãªã„   */
        if( ( sil_reb_mem((VP)(siopcb->siopinib->cntrl+TOFFSET_SC0CR)) & 0x1c ) == 0 ){

                /* データ受信      */
                siopcb->rxb = (INT)sil_reb_mem((VP)(siopcb->siopinib->cntrl+TOFFSET_SC0BUF));

                /* ã‚³ãƒ¼ãƒ«ãƒãƒƒã‚¯ãŒè¨±å¯ã•ã‚Œã¦ã„ã‚‹å ´åˆ     */
                if( (siopcb->sts_flag & TBIT_ENE_RXCBR) == TBIT_ENE_RXCBR ){
                        /*
                         *  受信通知コールバックルーチンを呼び出す．
                         */
                        uart_ierdy_rcv(siopcb->exinf);
                }
        }
}

/*
 *  ポートID=1に指定されているSIOチャンネル(uart1)からの送信割込み
 */
void serial_out_handler1()
{
        SIOPCB *siopcb = &siopcb_table[0];

        /* データ送信完了フラグON     */
        siopcb->sts_flag |= TBIT_TXB_EMPTY;

        /* システムログ用ポートの処理      */
        if( (siopcb->sts_flag & TBIT_LOG_PORT) == TBIT_LOG_PORT ){
                log_io_busy = FALSE;    /* 送信完了 */
        }

        /* ã‚³ãƒ¼ãƒ«ãƒãƒƒã‚¯ãŒè¨±å¯ã•ã‚Œã¦ã„ã‚‹å ´åˆ     */
        if( (siopcb->sts_flag & TBIT_ENE_TXCBR) == TBIT_ENE_TXCBR ){
                /*
                 *  送信可能コールバックルーチンを呼び出す．
                 */
                uart_ierdy_snd(siopcb->exinf);
        }
}

#if TNUM_PORT >= 2
/*
 *  ポートID=2に指定されているSIOチャンネル(uart0)からの受信割込み
 */
void serial_in_handler2()
{
        SIOPCB *siopcb = &siopcb_table[1];

        /* ã‚¨ãƒ©ãƒ¼ã®å ´åˆå‡¦ç†ã—ãªã„   */
        if( ( sil_reb_mem((VP)(siopcb->siopinib->cntrl+TOFFSET_SC0CR)) & 0x1c ) == 0 ){

                /* データ受信      */
                siopcb->rxb = (INT)sil_reb_mem((VP)(siopcb->siopinib->cntrl+TOFFSET_SC0BUF));

                /* ã‚³ãƒ¼ãƒ«ãƒãƒƒã‚¯ãŒè¨±å¯ã•ã‚Œã¦ã„ã‚‹å ´åˆ     */
                if( (siopcb->sts_flag & TBIT_ENE_RXCBR) == TBIT_ENE_RXCBR ){
                        /*
                         *  受信通知コールバックルーチンを呼び出す．
                         */
                        uart_ierdy_rcv(siopcb->exinf);
                }
        }
}

/*
 *  ポートID=2に指定されているSIOチャンネル(uart0)からの送信割込み
 */
void serial_out_handler2()
{
        SIOPCB *siopcb = &siopcb_table[1];

        /* データ送信完了フラグON     */
        siopcb->sts_flag |= TBIT_TXB_EMPTY;

        /* システムログ用ポートの処理      */
        if( (siopcb->sts_flag & TBIT_LOG_PORT) == TBIT_LOG_PORT ){
                log_io_busy = FALSE;    /* 送信完了 */
        }

        /* ã‚³ãƒ¼ãƒ«ãƒãƒƒã‚¯ãŒè¨±å¯ã•ã‚Œã¦ã„ã‚‹å ´åˆ     */
        if( (siopcb->sts_flag & TBIT_ENE_TXCBR) == TBIT_ENE_TXCBR ){
                /*
                 *  送信可能コールバックルーチンを呼び出す．
                 */
                uart_ierdy_snd(siopcb->exinf);
        }
}

#endif