uart0.c

lpc2478+ucosII

/*****************************************************************************
 *   uart.c:  UART API file for NXP LPC24xx Family Microprocessors
 *
 *   Copyright(C) 2006, NXP Semiconductor
 *   All rights reserved.
 *
 *   History
 *   2006.07.12  ver 1.00    Prelimnary version, first Release
 *
******************************************************************************/
#include "LPC2468.h"                        /* LPC24xx definitions */
#include "type.h"
#include "target.h"
#include "irq.h"
#include "uart0.h"


volatile DWORD UART0Status;
volatile BYTE UART0TxEmpty = 1;
volatile BYTE UART0Buffer[BUFSIZE]={0x11,0x11,0x11,0x11,0x11,0x22,0x22,0x22};
volatile DWORD UART0Count = 8;

/*****************************************************************************
** Function name:		UART0Handler
**
** Descriptions:		UART0 interrupt handler
**
** parameters:			None
** Returned value:		None
**
*****************************************************************************/
__irq __nested __arm void UART0Handler (void)
{
    BYTE IIRValue, LSRValue;
    volatile BYTE Dummy;

    __enable_interrupt();		/* handles nested interrupt */

    IIRValue = U0IIR;
    IIRValue >>= 1;			/* skip pending bit in IIR */
    IIRValue &= 0x07;			/* check bit 1~3, interrupt identification */
    if ( IIRValue == IIR_RLS )		/* Receive Line Status */
    {
		LSRValue = U0LSR;
		/* Receive Line Status */
		if ( LSRValue & (LSR_OE|LSR_PE|LSR_FE|LSR_RXFE|LSR_BI) )
		{
	    	/* There are errors or break interrupt */
	    	/* Read LSR will clear the interrupt */
	    	UART0Status = LSRValue;
	    	Dummy = U0RBR;		/* Dummy read on RX to clear interrupt, then bail out */
	    	VICVectAddr = 0;	/* Acknowledge Interrupt */
	    	return;
		}
		if ( LSRValue & LSR_RDR )	/* Receive Data Ready */			
		{
	    	/* If no error on RLS, normal ready, save into the data buffer. */
	    	/* Note: read RBR will clear the interrupt */
	    	UART0Buffer[UART0Count] = U0RBR;
	    	UART0Count++;
	    	if ( UART0Count == BUFSIZE )
	    	{
			UART0Count = 0;	/* buffer overflow */
	    	}	
		}
    }
    else if ( IIRValue == IIR_RDA )	/* Receive Data Available */
    {
		/* Receive Data Available */
		UART0Buffer[UART0Count] = U0RBR;
		UART0Count++;
		if ( UART0Count == BUFSIZE )
		{
	    	        UART0Count = 0;	/* buffer overflow */
		}
    }
    else if ( IIRValue == IIR_CTI )	/* Character timeout indicator */
    {
		/* Character Time-out indicator */
		UART0Status |= 0x100;	/* Bit 9 as the CTI error */
    }
    else if ( IIRValue == IIR_THRE )	/* THRE, transmit holding register empty */
    {
		/* THRE interrupt */
		LSRValue = U0LSR;	/* Check status in the LSR to see if valid data in U0THR or not */
		if ( LSRValue & LSR_THRE )
		{
	                UART0TxEmpty = 1;
		}
		else
		{
	                UART0TxEmpty = 0;
		}
    }

    VICVectAddr = 0;		        /* Acknowledge Interrupt */
    return;
}

/*****************************************************************************
** Function name:		UART0Init
**
** Descriptions:		Initialize UART0 port, setup pin select,
**						clock, parity, stop bits, FIFO, etc.
**
** parameters:			UART baudrate
** Returned value:		true or false, return false only if the
**						interrupt handler can't be installed to the
**						VIC table
**
*****************************************************************************/
DWORD UART0Init( DWORD baudrate )
{
    DWORD Fdiv;
    PINSEL0 = 0x00000050;       /* RxD0 and TxD0 */

    U0LCR = 0x83;		/* 8 bits, no Parity, 1 Stop bit */
    Fdiv = ( Fpclk / 16 ) / baudrate ;	/*baud rate */
    U0DLM = Fdiv / 256;							
    U0DLL = Fdiv % 256;
    U0LCR = 0x03;		/* DLAB = 0，禁止访问DL寄存器 */
    U0FCR = 0x07;		/* Enable and reset TX and RX FIFO. */

/*    if ( install_irq( UART0_INT, (void *)UART0Handler, HIGHEST_PRIORITY ) == FALSE )
    {
		return (FALSE);
    }

    U0IER = IER_RBR | IER_THRE | IER_RLS;	/* Enable UART0 interrupt */
    return (TRUE);
}

/*****************************************************************************
** Function name:		UART0Send
**
** Descriptions:		向UART0发送一个字节数据
** parameters:			buffer pointer
** Returned value:		None
**
*****************************************************************************/
void UART0SendByte(BYTE *BufferPtr)
{
    U0THR = *BufferPtr;
    while((U0LSR & 0x40) == 0);   //检测THR是否为空，数据发送是否完毕

    return;
}

/*****************************************************************************
** Function name:		UART0Recv
**
** Descriptions:		从UART0接收一个字节数据
** parameters:			buffer pointer, and data length
** Returned value:		None
**
*****************************************************************************/
void UART0RecvByte(BYTE *BufferPtr)
{
    while((U0LSR & 0x01) == 0);         /* 等待接收数据到达RBR */
    *BufferPtr = U0RBR;

    return;
}

/*****************************************************************************
** Function name:		UART0_puts
**
** Descriptions:		查询方式向UART0发送数据
** parameters:			buffer pointer
** Returned value:		None
**
*****************************************************************************/
void UART0_puts(BYTE *BufferPtr)
{
    while( *BufferPtr != 0)
      {
        UART0SendByte(BufferPtr);
        BufferPtr ++;
      }

    return;
}

/*****************************************************************************
** Function name:		UART0_gets
**
** Descriptions:		查询方式从UART0接收数据
** parameters:			buffer pointer
** Returned value:		None
**
*****************************************************************************/
void UART0_gets(BYTE *BufferPtr)
{
    while( 1 )
    {
      UART0RecvByte(BufferPtr);
      if(*BufferPtr == '\0')break;      // 接收到的数据是否为结束符

      BufferPtr ++;             // 未做边界检查，可能会有危险
    }

    return;
}

/*****************************************************************************
** Function name:		UART0_PrintNum
**
** Descriptions:		以2、10、16进制的方式输出32位数据
** parameters:			数据，进制
** Returned value:		None
**
*****************************************************************************/
void UART0_PrintNum(DWORD data, BYTE chg)
{
  BYTE i, chr_buf[34], *temp;

  switch(chg)
  {
  case 2:
    chr_buf[32] = 'B';
    break;
  case 10:
    chr_buf[32] = '\0';
    break;
  case 16:
    chr_buf[32] = 'H';
    break;
  default:
    UART0_puts("Don't support this decimal!\r\n");return;
  }
  chr_buf[33] = '\0';

  for(i=0;i<32;i++)chr_buf[i]=0x30;   //格式调整

  do
  {
    chr_buf[--i] += data%chg;           // 逐位计算
    if(chr_buf[i] > 0x39)chr_buf[i]+=7;  // ASCII码转换
    data = data/chg;
  }while(i != 0);

  temp = chr_buf;
  while(*temp == 0x30 && temp != chr_buf+31)temp++;

  UART0_puts(temp);
}

/******************************************************************************
**                            End Of File
******************************************************************************/