serial.c

ucos是一个实时的多任务的小型操作系统

#ifndef  OS_MASTER_FILE
#include "includes.h"
#endif

//#include <includes.h>
//#include <serial.h>
//#include <reg51.h>

unsigned char TxBuf[LenTxBuf],RxBuf[LenRxBuf];//收发缓冲区实体
unsigned char *inTxBuf,*outTxBuf,*inRxBuf,*outRxBuf;//收发缓冲区读写指针
bit TIflag=1;//Note:It must be 1.

void InitSerial() reentrant//串口初始化
{
        TMOD=TMOD&0x0F;
        TMOD=TMOD|0x20;
        TL1=0xFD,TH1=0xFD;//19200 , 22.1184MHz
        SCON=0x50;PCON=0x00;
        TR1=1;
}

void InitSerialBuffer(void) reentrant//串口缓冲区初始化
{
        inTxBuf=TxBuf;outTxBuf=TxBuf;
        inRxBuf=RxBuf;outRxBuf=RxBuf;
        ES=1;
        //EA=1;
}

void serial(void) reentrant
{    //中断在汇编中实现，去掉interrupt 4{//串口中断服务子程序
        unsigned char *t;

        if(TI){
                TI=0;
                if(inTxBuf==outTxBuf) {TIflag=1;return;}//TxBuf Empty
                SBUF=*outTxBuf; outTxBuf++;
                if(outTxBuf==TxBuf+LenTxBuf) outTxBuf=TxBuf;	
        }
        if(RI){
                RI=0;
                t=inRxBuf;t++;
                if(t==RxBuf+LenRxBuf) t=RxBuf;
                if(t==outRxBuf) return;                 //RxBuf Full
                *inRxBuf=SBUF;
                inRxBuf=t;
        }
}

bit yygetch(unsigned char *ch) reentrant//从串口缓冲区读1字节数据
{
        //ES=0;        
        if(inRxBuf==outRxBuf) {ES=1;return 0;}          //RxBuf Empty
        *ch=*outRxBuf;  outRxBuf++;
        if(outRxBuf==RxBuf+LenRxBuf) outRxBuf=RxBuf;
        //ES=1;        
        return 1;
}

void PrintChar(unsigned char ch) reentrant//显示字符
{
        unsigned char *t;

        //ES=0;
//入临界区
#pragma ASM
    PUSH IE;
    CLR EA;
#pragma ENDASM
        t=inTxBuf;t++;
        if(t==TxBuf+LenTxBuf) t=TxBuf;
        if(t==outTxBuf) {/*ES=1;*/
//出临界区
#pragma ASM
    POP IE;
#pragma ENDASM
        return;}                  //TxBuf Full
        *inTxBuf=ch;
        inTxBuf=t;
        //ES=1;
//出临界区
#pragma ASM
    POP IE;
#pragma ENDASM
        if(TIflag){		
                TIflag=0;
                TI=1;
        }
}

void PrintCh(unsigned char ch) reentrant//内部使用，不建议用户看到。
{
        if(ch>=0&&ch<=9) ch=ch+'0';
        else ch=ch+'A'-10;
        PrintChar(ch);
}

void insidePrintByte(unsigned char Byte) reentrant//内部使用，以十六进制格式显示1个字节数据
{
        unsigned char c;
        c=Byte;
        c=c>>4;        
        PrintCh(c);
        c=Byte;c=c&0x0F;PrintCh(c);        
}

void PrintByte(unsigned char Byte) reentrant//以十六进制格式显示1个字节数据
{
        //EA=0;
//入临界区
#pragma ASM
    PUSH IE;
    CLR EA;
#pragma ENDASM
        insidePrintByte(Byte);                
        //EA=1;
//出临界区
#pragma ASM
    POP IE;
#pragma ENDASM
}

void insidePrintWord(unsigned int Word) reentrant//内部使用，以十六进制格式显示1个字数据
{	        
        insidePrintByte(Word>>8);
        insidePrintByte(Word&0xFF);                        
}

void PrintWord(unsigned int Word) reentrant//以十六进制格式显示1个字数据
{	
        //EA=0;
//入临界区
#pragma ASM
    PUSH IE;
    CLR EA;
#pragma ENDASM
        insidePrintWord(Word);
        //EA=1;
//出临界区
#pragma ASM
    POP IE;
#pragma ENDASM
}

void PrintLong(unsigned long LongWord) reentrant//以十六进制格式显示1个长字数据
{
        //EA=0;
//入临界区
#pragma ASM
    PUSH IE;
    CLR EA;
#pragma ENDASM
        insidePrintWord(LongWord>>16);
        insidePrintWord(LongWord&0xFFFF);
        //EA=1;
//出临界区
#pragma ASM
    POP IE;
#pragma ENDASM
}

void PrintStr(unsigned char *str) reentrant//显示字符串
{
        int i;
        unsigned char j;
        unsigned char ch;
	
        //EA=0;
//入临界区
#pragma ASM
    PUSH IE;
    CLR EA;
#pragma ENDASM
        for(i=0;i<MaxLenStr;i++){
                ch=*(str+i);
                if(ch=='\0') break;
                else if(ch=='\n'){PrintChar(10);PrintChar(13);} 
                else if(ch=='\t'){
                        for(j=0;j<TABNum;j++)
                                PrintChar(' ');
                }
                else PrintChar(ch);
        }
        //EA=1;
//出临界区
#pragma ASM
    POP IE;
#pragma ENDASM
}

void clrscr() reentrant//清屏
{        
        PrintStr("\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n");//25个回车换行清屏幕。
}

//============================================================================================
//
//============================================================================================
void yyprintf(char *fmt,...) reentrant  //自编简单printf等效函数
{
    void *p;  //任意指针，可以指向任何类型，C语法不对其严格要求。
    char ch;
    unsigned char j;

    p=&fmt;
    p=(char **)p+1;  //此处p是指向指针的指针，fmt是字符串指针，p是指向fmt的指针

//入临界区
#pragma ASM
    PUSH IE;
    CLR EA;
#pragma ENDASM

    while(1){
        while((ch=*fmt++)!='%'){
            if(ch=='\0'){
//出临界区
#pragma ASM
    POP IE;
#pragma ENDASM
                return;
            }
            else if(ch=='\n'){PrintChar(10);PrintChar(13);}
            else if(ch=='\t'){
                for(j=0;j<TABNum;j++)
                    PrintChar(' ');
            }
            else PrintChar(ch);
        }
        ch=*fmt++;
        switch(ch){
            case 'c':
                PrintChar(*((char *)p));
                p=(char *)p+1;
                break;
            case 'd':
                PrintN(*((int *)p),10);
                p=(int *)p+1;
                break;
            case 'x':
                PrintN(*((int *)p),16);
                p=(int *)p+1;
                break;
            case 'o':
                PrintUN(*((int *)p),8);
                p=(int *)p+1;
                break;
            case 'b':
                PrintUN(*((int *)p),2);
                p=(int *)p+1;
                break;
            case 'l':
                ch=*fmt++;
                switch(ch){
                    case 'd':
                        PrintLN(*((long *)p),10);