/*********************************************************************************************************
**				                               Small RTOS(51)
**                                   The Real-Time Kernel(For Keil c51)
**
**                                  (c) Copyright 2002-2002, chenmingji
**                                           All Rights Reserved
**
**                                                  V1.20.0
**
**
**--------------文件信息--------------------------------------------------------------------------------
**文   件   名: serial.c
**創(chuàng)   建   人: 陳明計(jì)
**最后修改日期: 2003年8月31日
**描        述: 在DP-51上實(shí)現(xiàn)鬧鐘的例子的串行口驅(qū)動(dòng)程序
**
**--------------歷史版本信息----------------------------------------------------------------------------
** 創(chuàng)建人: 陳明計(jì)
** 版  本: V1.00
** 日　期: 2003年3月25日
** 描　述: 原始版本
**
**------------------------------------------------------------------------------------------------------
** 修改人: 陳明計(jì)
** 版  本: V1.20.0
** 日　期: 2003年8月31日
** 描　述: 根據(jù)新版本要求修改
**
**--------------當(dāng)前版本修訂------------------------------------------------------------------------------
** 修改人: 
** 日　期:
** 描　述:
**
**------------------------------------------------------------------------------------------------------
********************************************************************************************************/
#define IN_SERIAL

#include "config.h"
                                            /* 聲明使用的外部變量           */
extern uint8 OS_Q_MEM_SEL CommandData[];
extern uint8 OS_Q_MEM_SEL SerialInData[];
extern uint8 OS_Q_MEM_SEL SerialOutData[];
extern uint8 OS_Q_MEM_SEL Alarm[];

void PutChar(uint8 Data);

bit SerialCanSend = 1;                      /* 正在發(fā)送標(biāo)志，0：正在發(fā)送    */

/*********************************************************************************************************
** 函數(shù)名稱: SerialInit
** 功能描述: 初始化串行口
** 輸　入: 無(wú)
** 輸　出: 無(wú)
** 全局變量: 無(wú)
** 調(diào)用模塊: 無(wú)
**
** 作　者: 陳明計(jì)
** 日　期: 2003年3月25日
**-------------------------------------------------------------------------------------------------------
** 修改人:
** 日　期:
**------------------------------------------------------------------------------------------------------
********************************************************************************************************/
        void SerialInit(void)
{
	SCON = 0x50;
	PCON = 0x80;
	TMOD = TMOD & 0x0f;
	TMOD = TMOD | 0x20;
	TH1 = 0xf4;                   //com is 4800 b/s
	TL1 = 0xf4;
	TR1 = 1;
	ES = 1;
}

/*********************************************************************************************************
** 函數(shù)名稱: Send
** 功能描述: 發(fā)送一個(gè)數(shù)據(jù)包
** 輸　入: Data：指向要發(fā)送的數(shù)據(jù)指針
** 輸　出: 無(wú)
** 全局變量: 無(wú)
** 調(diào)用模塊: 無(wú)
**
** 作　者: 陳明計(jì)
** 日　期: 2003年3月25日
**-------------------------------------------------------------------------------------------------------
** 修改人:
** 日　期:
**------------------------------------------------------------------------------------------------------
********************************************************************************************************/
        void Send(uint8 OS_Q_MEM_SEL *Data)
{
    uint8 Sem;
    
    PutChar(STARTBYTE1);
    PutChar(STARTBYTE2);
    Sem = STARTBYTE1 + STARTBYTE2;
    
    PutChar(*Data);
    Sem += *Data++;
    PutChar(*Data);
    Sem += *Data++;
    PutChar(*Data);
    Sem += *Data++;
    PutChar(*Data);
    Sem += *Data++;
    PutChar(*Data);
    Sem += *Data++;
    
    PutChar(-Sem);
}

/*********************************************************************************************************
** 函數(shù)名稱: PutChar
** 功能描述: 發(fā)送一個(gè)字節(jié)
** 輸　入: Data：發(fā)送的數(shù)據(jù)
** 輸　出: 無(wú)
** 全局變量: 無(wú)
** 調(diào)用模塊: 無(wú)
**
** 作　者: 陳明計(jì)
** 日　期: 2003年3月25日
**-------------------------------------------------------------------------------------------------------
** 修改人:
** 日　期:
**------------------------------------------------------------------------------------------------------
********************************************************************************************************/
    void PutChar(uint8 Data)
{
    OS_ENTER_CRITICAL();
    if (SerialCanSend == 1)                         
    {
        SerialCanSend = 0;
        SBUF = Data;                                /* 串口空閑，直接發(fā)送   */
    }
    else
    {
        OSQIntPost(SerialOutData,Data);             /* 數(shù)據(jù)入隊(duì)             */
    }
    OS_EXIT_CRITICAL();
}  

/*********************************************************************************************************
** 函數(shù)名稱: Recuve
** 功能描述: 串口接收處理任務(wù)
** 輸　入: 無(wú)
** 輸　出: 無(wú)
** 全局變量: 無(wú)
** 調(diào)用模塊: 無(wú)
**
** 作　者: 陳明計(jì)
** 日　期: 2003年3月25日
**-------------------------------------------------------------------------------------------------------
** 修改人:
** 日　期:
**------------------------------------------------------------------------------------------------------
********************************************************************************************************/
    void Recuve(void)
{
    uint8 data temp,temp1;
    uint8 Sum,i;
                                                /* 建立所需要的消息隊(duì)列 */
    OSQCreate(CommandData, 16);
    OSQCreate(SerialInData, 16);
    OSQCreate(SerialOutData, 32);
    SerialInit();                               /* 初始化串行口         */
    
    while (1)
    {
        OSQPend(&temp,SerialInData,0);          /* 接收一個(gè)字節(jié)         */
        while (1)
        {
            OSQPend(&temp1,SerialInData,0);     /* 接收一個(gè)字節(jié)         */
            if ((temp == STARTBYTE1) && (temp1 == STARTBYTE2))
            {
                break;                          /* 接收到起始字符       */
            }
            temp = temp1;
        }
        Sum = STARTBYTE1 + STARTBYTE2;
        
        for (i = 0; i < 5; i++)                 /* 接收數(shù)據(jù)包           */
        {
            OSQPend(&temp1, SerialInData, 0);
            Alarm[i] = temp1;
            Sum += temp1;
        }

        OSQPend(&temp1, SerialInData, 0);       /* 接收校驗(yàn)和           */
        Sum += temp1;
        if (Sum == 0)                           /* 檢驗(yàn)接收到的數(shù)據(jù)包   */
        {                                       /* 發(fā)送消息給主任務(wù)     */
            OSQIntPost(CommandData, Alarm[0]);
        }
    }
}

/*********************************************************************************************************
** 函數(shù)名稱: comm
** 功能描述: 串口中斷處理程序
** 輸　入: 無(wú)
** 輸　出: 無(wú)
** 全局變量: 無(wú)
** 調(diào)用模塊: 無(wú)
**
** 作　者: 陳明計(jì)
** 日　期: 2003年3月25日
**-------------------------------------------------------------------------------------------------------
** 修改人: 陳明計(jì)
** 日　期: 2003年8月31日
**------------------------------------------------------------------------------------------------------
********************************************************************************************************/
#pragma disable                                        /* 除非最高優(yōu)先級(jí)中斷，否則，必須加上這一句                 */
		void comm(void) interrupt 4
{
    uint8 data temp;
	if (RI == 1)
	{
        OS_INT_ENTER();
		RI = 0;
        OSQIntPost(SerialInData,SBUF);
        OSIntExit();
		return;
	}
	if (TI == 1)
	{
		TI = 0;
		if (OSQAccept(&temp,SerialOutData) == OS_Q_OK)
		{
		    SBUF = temp;
		}
		else
		{
		    SerialCanSend = 1;
		}
	}
}

/**********************end****************************************/