hw_serial.h

嵌入式系统开发 TOPPERS and JSP Kernel Release 1.3 TOPPERS = Toyohashi Open Platform for Embedded Real-Tim

/*
 *  TOPPERS/JSP Kernel
 *      Toyohashi Open Platform for Embedded Real-Time Systems/
 *      Just Standard Profile Kernel
 *
 *  Copyright (C) 2000-2002 by Embedded and Real-Time Systems Laboratory
 *                              Toyohashi Univ. of Technology, JAPAN
 *  Copyright (C) 2001,2002 by Dep. of Computer Science and Engineering
 *                   Tomakomai National College of Technology, JAPAN
 *  Copyright (C) 2001,2002 by Industrial Technology Institute,
 *                              Miyagi Prefectural Government, JAPAN
 *
 *  惧淡螟侯涪荚は·Free Software Foundation によって给山されている
 *  GNU General Public License の Version 2 に淡揭されている掘凤か·笆
 *  布の(1)×(4)の掘凤を塔たす眷圭に嘎り·塑ソフトウェア∈塑ソフトウェ
 *  アを猖恃したものを崔むˉ笆布票じ∷を蝗脱ˇ剩澜ˇ猖恃ˇ浩芹邵∈笆布·
 *  网脱と钙ぶ∷することを痰浸で钓满するˉ
 *  (1) 塑ソフトウェアをソ〖スコ〖ドの妨で网脱する眷圭には·惧淡の螟侯
 *      涪山绩·この网脱掘凤および布淡の痰瘦沮惮年が·そのままの妨でソ〖
 *      スコ〖ド面に崔まれていることˉ
 *  (2) 塑ソフトウェアを浩网脱材墙なバイナリコ〖ド∈リロケ〖タブルオブ
 *      ジェクトファイルやライブラリなど∷の妨で网脱する眷圭には·网脱
 *      に燃うドキュメント∈网脱荚マニュアルなど∷に·惧淡の螟侯涪山绩·
 *      この网脱掘凤および布淡の痰瘦沮惮年を非很することˉ
 *  (3) 塑ソフトウェアを浩网脱稍材墙なバイナリコ〖ドの妨または怠达に寥
 *      み哈んだ妨で网脱する眷圭には·肌のいずれかの掘凤を塔たすことˉ
 *    (a) 网脱に燃うドキュメント∈网脱荚マニュアルなど∷に·惧淡の螟侯
 *        涪山绩·この网脱掘凤および布淡の痰瘦沮惮年を非很することˉ
 *    (b) 网脱の妨轮を·侍に年める数恕によって·惧淡螟侯涪荚に鼠桂する
 *        ことˉ
 *  (4) 塑ソフトウェアの网脱により木儡弄または粗儡弄に栏じるいかなる禄
 *      巢からも·惧淡螟侯涪荚を倘勒することˉ
 *
 *  塑ソフトウェアは·痰瘦沮で捏丁されているものであるˉ惧淡螟侯涪荚は·
 *  塑ソフトウェアに簇して·その努脱材墙拉も崔めて·いかなる瘦沮も乖わ
 *  ないˉまた·塑ソフトウェアの网脱により木儡弄または粗儡弄に栏じたい
 *  かなる禄巢に簇しても·その勒扦を砷わないˉ
 *
 *  @(#) $Id: hw_serial.h,v 1.2 2002/04/13 13:14:45 imai Exp $
 */

#ifndef _HW_SERIAL_H_
#define _HW_SERIAL_H_

/*
 *  タ〖ゲット巴赂シリアルI/Oモジュ〖ル∈H8S脱∷
 *  SCI0を蝗脱
 *  　　鼎奶婶のモジュ〖ルによって、XON/XOFFフロ〖扩告が乖わ
 *  　　れているので、慨规俐はTxDとRxDの2塑でよい
 */

#include "sys_config.h"
#include "cpu_config.h"

#ifndef _MACRO_ONLY


/*  インライン簇眶鸥倡の回年  */

#pragma inline(SCI_initialize, hw_port_initialize, hw_port_terminate)
#pragma inline(hw_serial_handler_in, hw_serial_handler_out, hw_port_getready)
#pragma inline(hw_port_putready, hw_port_getchar, hw_port_putchar, SCI_putchar)
#pragma inline(hw_port_sendstart, hw_port_sendstop)

/*
 *  シリアルポ〖トのハ〖ドウェア巴赂攫鼠の年盗
 */

typedef struct hardware_serial_port_descripter {
	UW	base;	/* SCI のベ〖スアドレス		*/
	UW	enaix;	/* SCI の流慨充哈み觉轮の瑚苞	*/
} HWPORT;

#endif	/* of #ifndef _MACRO_ONLY */

/*
 *  你レベルポ〖ト攫鼠瓷妄ブロックの介袋猛
 */

#define NUM_PORT	1	/* サポ〖トするシリアルポ〖トの眶 */
#define PORT_ID1	1	/* プログラム面のPORT1は、SCI0を回している */

#define HWPORT1	{ SYSTEM_SCI, 0 }

#ifndef _MACRO_ONLY

/*
 *  シリアルポ〖トの介袋步
 */

/*  
 *  SCI_initialize()でのシリアルポ〖トの介袋步は、hw_port_initialize()柒で肋年
 *  すべきであると蛔うが、H8との琵圭を雇胃し、附檬超では、恃构しない
 */

Inline void
SCI_initialize(UW base)
{
    int i;
    
		   /*  モジュ〖ルストップモ〖ド豺近  */
    MSTPCR &= ~MSTPCR_SCI0;
    
					/* 流减慨匿贿 */
    outb(base + H8SSCR, (UB)(inb(base + H8SSCR) & ~(H8SSCR_TE | H8SSCR_RE)));

    					/*   流减慨フォ〖マット	*/
         		/*  拇殊票袋及				*/
         		/*  キャラクタレングス¨8ビット		*/
         		/*  パリティなし			*/
         		/*  ストップビットレングス¨1		*/
         		/*  クロックセレクト∈尸件孺∷:尸件なし	*/
    outb(base + H8SSMR, 0);

    outb(base + H8SBRR, H8SBRR_RATE);	/*  ボ〖レ〖ト肋年  	*/

    			/* 充哈み敦贿とクロックソ〖スの联买	*/
    outb(base + H8SSCR,
     (UB)(inb(base + H8SSCR) & ~(H8SSCR_TIE  | H8SSCR_RIE  |
                           H8SSCR_MPIE | H8SSCR_TEIE |
                           H8SSCR_CKE1 | H8SSCR_CKE0 )));

    /* ボ〖レ〖トの肋年稿、1ビット尸略たなければならない。*/

    for(i = SCI_SETUP_COUNT; i -- > 0; )
    	;

    				/* エラ〖フラグをクリア		*/
    outb(base + H8SSSR,
     (UB)(inb(base + H8SSSR) & ~(H8SSSR_ORER | H8SSSR_FER | H8SSSR_PER)));

    /* 减慨充り哈み钓材, 流慨充哈みの钓材は流慨扩告簇眶で乖う	*/
    /* 流减慨钓材 */

    outb(base + H8SSCR,
     (UB)(inb(base + H8SSCR) | (H8SSCR_RIE | H8SSCR_TE | H8SSCR_RE)));

    /*
     * 充り哈み簇息の肋年
     * エラ〖ハンドラも判峡すべき
     */
        			/* 充り哈みレベル肋年 */
        outb(SYSTEM_SCI_IPR,(UB)((inb(SYSTEM_SCI_IPR)&~(0x7<<SCI_BIT_SHIFT)) | (SCI_INTLVL<<SCI_BIT_SHIFT)));
}

/*
 * serial_open、serial_close [systask/serial.c] から钙ばれる
 * 簇眶では部もしない。
 * sys_initialize [config/h8/akih8_3048f/sys_config.c] で乖う。
 *    	->妥恃构
 */

Inline BOOL
hw_port_initialize(HWPORT *p)
{
	return (FALSE);
}

/*
 *  H8惹では、hw_port_terminate()柒は、部も肋年していない。H8惹とH8S惹の琵圭
 *  の狠は、庙罢が涩妥である
 */
Inline void
hw_port_terminate(HWPORT *p)
{
              						/*  流减慨匿贿  */
	outb(p->base + H8SSCR, (UB)(inb(p->base + H8SSCR) & ~(H8SSCR_TE | H8SSCR_RE)));
							/*  充哈みレベルクリア  */

 	outb(SYSTEM_SCI_IPR,(UB)((inb(SYSTEM_SCI_IPR)&~(0x7<<SCI_BIT_SHIFT)) | (LEVEL0<<SCI_BIT_SHIFT)));
}

/*
 *  シリアルポ〖ト充哈みサ〖ビスル〖チン∈涟数徊救∷
 */

extern void	serial_handler_in(int portid);
extern void	serial_handler_out(int portid);

/*
 *  シリアルI/Oポ〖トの充哈みハンドラ
 */

Inline void
hw_serial_handler_in(void)
{
	serial_handler_in(PORT_ID1);

    	/* エラ〖フラグをクリア		*/
	outb(H8SSCI0 + H8SSSR,(UB)(inb(H8SSCI0 + H8SSSR) & ~(H8SSSR_ORER | H8SSSR_FER | H8SSSR_PER)));

}

Inline void
hw_serial_handler_out(void)
{
	serial_handler_out(PORT_ID1);
}

/*
 *  矢机を减慨したか々
 */

Inline BOOL
hw_port_getready(HWPORT *p)
{
	/*  レシ〖ブデ〖タレジスタフルˇフラグのチェック  */
	return(inb(p->base + H8SSSR) & H8SSSR_RDRF);
}

/*
 *  矢机を流慨できるか々
 */

Inline BOOL
hw_port_putready(HWPORT *p)
{
	/*  トランスミットデ〖タレジスタエンプティˇフラグのチェック*/

	return(inb(p->base + H8SSSR) & H8SSSR_TDRE);
}

/*
 *  减慨した矢机の艰り叫し
 */

Inline UB
hw_port_getchar(HWPORT *p)
{
	UB data;
	UW addr = p->base + H8SSSR;

	data = inb(p->base + H8SRDR);

 	/*  シリアルステ〖タスレジスタ(SSR∷のレシ〖ブデ〖タレジスタフル(RDRF)のクリア  */
        bitclr(addr, H8SSSR_RDRF_BIT);

	return data;
}

/*
 *  流慨する矢机の今き哈み
 */

Inline void
hw_port_putchar(HWPORT *p, char c)
{
	UW addr = p->base + H8SSSR;

	outb(p->base + H8STDR, c);
  		/*  シリアルステ〖タスレジスタ(SSR∷のトランスミットデ〖タレジスタエンプティ(TDRE)のクリア  */
	bitclr(addr, H8SSSR_TDRE_BIT);
}

/*
 * 木儡叫蜗 (略ちあり)
 */

Inline void
SCI_putchar (int base, char c)		/*  int(16bits) -> UW(32bits)  */
{
	UW addr = base + H8SSSR;

	/* TDRE が 1 になるまで略つ */
	while ((inb(addr) & H8SSSR_TDRE) == 0)
		;
	outb(base + H8STDR, c);
		/*  シリアルステ〖タスレジスタ(SSR∷のトランスミットデ〖タレジスタエンプティ(TDRE)のクリア  */
	bitclr(addr, H8SSSR_TDRE_BIT);
}

/*
 *  流慨扩告簇眶
 */

Inline void
hw_port_sendstart(HWPORT *p)
{
	UW addr = p->base + H8SSCR;
		/*  流慨充哈み妥滇を钓材  */
	bitset(addr, H8SSCR_TIE_BIT);
}

Inline void
hw_port_sendstop(HWPORT *p)
{
	UW addr = p->base + H8SSCR;
		/*  流慨充哈み妥滇を敦贿  */
	bitclr(addr, H8SSCR_TIE_BIT);
}


#endif	/* of #ifndef _MACRO_ONLY */

#endif /* _HW_SERIAL_H_ */