![](/media/cache/profiles/dc960c46c38bd16e953d97cdeefdbc68.50x50_q85.jpg)
Port of Keils USBCDC example, compiles ok. Gets stuck at init
serial.c
- Committer:
- tecnosys
- Date:
- 2010-07-05
- Revision:
- 0:0b777ff85deb
File content as of revision 0:0b777ff85deb:
/*---------------------------------------------------------------------------- * Name: serial.c * Purpose: serial port handling for LPC17xx * Version: V1.20 *---------------------------------------------------------------------------- * This software is supplied "AS IS" without any warranties, express, * implied or statutory, including but not limited to the implied * warranties of fitness for purpose, satisfactory quality and * noninfringement. Keil extends you a royalty-free right to reproduce * and distribute executable files created using this software for use * on NXP Semiconductors LPC microcontroller devices only. Nothing else * gives you the right to use this software. * * Copyright (c) 2009 Keil - An ARM Company. All rights reserved. *---------------------------------------------------------------------------*/ #include "LPC17xx.h" // LPC17xx definitions //#include "LPC23xx.h" #include "type.h" #include "serial.h" #include "compatible.h" /*---------------------------------------------------------------------------- Defines for ring buffers *---------------------------------------------------------------------------*/ #define SER_BUF_SIZE (128) // serial buffer in bytes (power 2) #define SER_BUF_MASK (SER_BUF_SIZE-1ul) // buffer size mask /* Buffer read / write macros */ #define SER_BUF_RESET(serBuf) (serBuf.rdIdx = serBuf.wrIdx = 0) #define SER_BUF_WR(serBuf, dataIn) (serBuf.data[SER_BUF_MASK & serBuf.wrIdx++] = (dataIn)) #define SER_BUF_RD(serBuf) (serBuf.data[SER_BUF_MASK & serBuf.rdIdx++]) #define SER_BUF_EMPTY(serBuf) (serBuf.rdIdx == serBuf.wrIdx) #define SER_BUF_FULL(serBuf) (serBuf.rdIdx == serBuf.wrIdx+1) #define SER_BUF_COUNT(serBuf) (SER_BUF_MASK & (serBuf.wrIdx - serBuf.rdIdx)) // buffer type typedef struct __SER_BUF_T { unsigned char data[SER_BUF_SIZE]; unsigned int wrIdx; unsigned int rdIdx; } SER_BUF_T; unsigned long ser_txRestart; // NZ if TX restart is required unsigned short ser_lineState; // ((msr << 8) | (lsr)) SER_BUF_T ser_out; // Serial data buffers SER_BUF_T ser_in; /*---------------------------------------------------------------------------- open the serial port *---------------------------------------------------------------------------*/ void ser_OpenPort (char portNum) { if ( portNum == 0 ) { /* Port 0 */ NVIC_DisableIRQ(UART0_IRQn); LPC_PINCON->PINSEL0 &= ~0x000000F0; LPC_PINCON->PINSEL0 |= 0x00000050; /* RxD0 is P0.3 and TxD0 is P0.2 */ } else { /* Port 1 */ NVIC_DisableIRQ(UART1_IRQn); LPC_PINCON->PINSEL4 &= ~0x0000000F; LPC_PINCON->PINSEL4 |= 0x0000000A; /* Enable RxD1 P2.1, TxD1 P2.0 */ } return; } /*---------------------------------------------------------------------------- close the serial port *---------------------------------------------------------------------------*/ void ser_ClosePort (char portNum ) { if ( portNum == 0 ) { /* POrt 0 */ LPC_PINCON->PINSEL0 &= ~0x000000F0; /* Disable the interrupt in the VIC and UART controllers */ LPC_UART0->IER = 0; NVIC_DisableIRQ(UART0_IRQn); } else { /* Port 1 */ LPC_PINCON->PINSEL4 &= ~0x0000000F; /* Disable the interrupt in the VIC and UART controllers */ LPC_UART1->IER = 0; NVIC_DisableIRQ(UART1_IRQn); } return; } /*---------------------------------------------------------------------------- initialize the serial port *---------------------------------------------------------------------------*/ void ser_InitPort0 (unsigned long baudrate, unsigned int databits, unsigned int parity, unsigned int stopbits) { unsigned char lcr_p, lcr_s, lcr_d; unsigned int dll; unsigned int pclkdiv, pclk; switch (databits) { case 5: // 5 Data bits lcr_d = 0x00; break; case 6: // 6 Data bits lcr_d = 0x01; break; case 7: // 7 Data bits lcr_d = 0x02; break; case 8: // 8 Data bits default: lcr_d = 0x03; break; } switch (stopbits) { case 1: // 1,5 Stop bits case 2: // 2 Stop bits lcr_s = 0x04; break; case 0: // 1 Stop bit default: lcr_s = 0x00; break; } switch (parity) { case 1: // Parity Odd lcr_p = 0x08; break; case 2: // Parity Even lcr_p = 0x18; break; case 3: // Parity Mark lcr_p = 0x28; break; case 4: // Parity Space lcr_p = 0x38; break; case 0: // Parity None default: lcr_p = 0x00; break; } SER_BUF_RESET(ser_out); // reset out buffer SER_BUF_RESET(ser_in); // reset in buffer /* Bit 6~7 is for UART0 */ pclkdiv = (LPC_SC->PCLKSEL0 >> 6) & 0x03; switch ( pclkdiv ) { case 0x00: default: pclk = SystemFrequency/4; break; case 0x01: pclk = SystemFrequency; break; case 0x02: pclk = SystemFrequency/2; break; case 0x03: pclk = SystemFrequency/8; break; } dll = (pclk/16)/baudrate ; /*baud rate */ LPC_UART0->FDR = 0; // Fractional divider not used LPC_UART0->LCR = 0x80 | lcr_d | lcr_p | lcr_s; // Data bits, Parity, Stop bit LPC_UART0->DLL = dll; // Baud Rate depending on PCLK LPC_UART0->DLM = (dll >> 8); // High divisor latch LPC_UART0->LCR = 0x00 | lcr_d | lcr_p | lcr_s; // DLAB = 0 LPC_UART0->IER = 0x03; // Enable TX/RX interrupts LPC_UART0->FCR = 0x07; /* Enable and reset TX and RX FIFO. */ ser_txRestart = 1; // TX fifo is empty /* Enable the UART Interrupt */ NVIC_EnableIRQ(UART0_IRQn); return; } /*---------------------------------------------------------------------------- initialize the serial port *---------------------------------------------------------------------------*/ void ser_InitPort1 (unsigned long baudrate, unsigned int databits, unsigned int parity, unsigned int stopbits) { unsigned char lcr_p, lcr_s, lcr_d; unsigned int dll; unsigned int pclkdiv, pclk; switch (databits) { case 5: // 5 Data bits lcr_d = 0x00; break; case 6: // 6 Data bits lcr_d = 0x01; break; case 7: // 7 Data bits lcr_d = 0x02; break; case 8: // 8 Data bits default: lcr_d = 0x03; break; } switch (stopbits) { case 1: // 1,5 Stop bits case 2: // 2 Stop bits lcr_s = 0x04; break; case 0: // 1 Stop bit default: lcr_s = 0x00; break; } switch (parity) { case 1: // Parity Odd lcr_p = 0x08; break; case 2: // Parity Even lcr_p = 0x18; break; case 3: // Parity Mark lcr_p = 0x28; break; case 4: // Parity Space lcr_p = 0x38; break; case 0: // Parity None default: lcr_p = 0x00; break; } SER_BUF_RESET(ser_out); // reset out buffer SER_BUF_RESET(ser_in); // reset in buffer /* Bit 8,9 are for UART1 */ pclkdiv = (LPC_SC->PCLKSEL0 >> 8) & 0x03; switch ( pclkdiv ) { case 0x00: default: pclk = SystemFrequency/4; break; case 0x01: pclk = SystemFrequency; break; case 0x02: pclk = SystemFrequency/2; break; case 0x03: pclk = SystemFrequency/8; break; } dll = (pclk/16)/baudrate ; /*baud rate */ LPC_UART1->FDR = 0; // Fractional divider not used LPC_UART1->LCR = 0x80 | lcr_d | lcr_p | lcr_s; // Data bits, Parity, Stop bit LPC_UART1->DLL = dll; // Baud Rate depending on PCLK LPC_UART1->DLM = (dll >> 8); // High divisor latch LPC_UART1->LCR = 0x00 | lcr_d | lcr_p | lcr_s; // DLAB = 0 LPC_UART1->IER = 0x03; // Enable TX/RX interrupts LPC_UART1->FCR = 0x07; /* Enable and reset TX and RX FIFO. */ ser_txRestart = 1; // TX fifo is empty /* Enable the UART Interrupt */ NVIC_EnableIRQ(UART1_IRQn); return; } /*---------------------------------------------------------------------------- read data from serial port *---------------------------------------------------------------------------*/ int ser_Read (char *buffer, const int *length) { int bytesToRead, bytesRead; /* Read *length bytes, block if *bytes are not avaialable */ bytesToRead = *length; bytesToRead = (bytesToRead < (*length)) ? bytesToRead : (*length); bytesRead = bytesToRead; while (bytesToRead--) { while (SER_BUF_EMPTY(ser_in)); // Block until data is available if none *buffer++ = SER_BUF_RD(ser_in); } return (bytesRead); } /*---------------------------------------------------------------------------- write data to the serial port *---------------------------------------------------------------------------*/ int ser_Write (char portNum, const char *buffer, int *length) { int bytesToWrite, bytesWritten; // Write *length bytes bytesToWrite = *length; bytesWritten = bytesToWrite; while (!SER_BUF_EMPTY(ser_out)); // Block until space is available if none while (bytesToWrite) { SER_BUF_WR(ser_out, *buffer++); // Read Rx FIFO to buffer bytesToWrite--; } if (ser_txRestart) { ser_txRestart = 0; if ( portNum == 0 ) { LPC_UART0->THR = SER_BUF_RD(ser_out); // Write to the Tx Register } else { LPC_UART1->THR = SER_BUF_RD(ser_out); // Write to the Tx Register } } return (bytesWritten); } /*---------------------------------------------------------------------------- check if character(s) are available at the serial interface *---------------------------------------------------------------------------*/ void ser_AvailChar (int *availChar) { *availChar = SER_BUF_COUNT(ser_in); } /*---------------------------------------------------------------------------- read the line state of the serial port *---------------------------------------------------------------------------*/ void ser_LineState (unsigned short *lineState) { *lineState = ser_lineState; ser_lineState = 0; } /*---------------------------------------------------------------------------- serial port 0 interrupt *---------------------------------------------------------------------------*/ void UART0_IRQHandler(void) { volatile unsigned long iir; iir = LPC_UART0->IIR; if ((iir & 0x4) || (iir & 0xC)) { // RDA or CTI pending while (LPC_UART0->LSR & 0x01) { // Rx FIFO is not empty SER_BUF_WR(ser_in, LPC_UART0->RBR); // Read Rx FIFO to buffer } } if ((iir & 0x2)) { // TXMIS pending if (SER_BUF_COUNT(ser_out) != 0) { LPC_UART0->THR = SER_BUF_RD(ser_out); // Write to the Tx FIFO ser_txRestart = 0; } else { ser_txRestart = 1; } } ser_lineState = LPC_UART0->LSR & 0x1E; // update linestate return; } /*---------------------------------------------------------------------------- serial port 1 interrupt *---------------------------------------------------------------------------*/ void UART1_IRQHandler(void) { volatile unsigned long iir; iir = LPC_UART1->IIR; if ((iir & 0x4) || (iir & 0xC)) { // RDA or CTI pending while (LPC_UART1->LSR & 0x01) { // Rx FIFO is not empty SER_BUF_WR(ser_in, LPC_UART1->RBR); // Read Rx FIFO to buffer } } if ((iir & 0x2)) { // TXMIS pending if (SER_BUF_COUNT(ser_out) != 0) { LPC_UART1->THR = SER_BUF_RD(ser_out); // Write to the Tx FIFO ser_txRestart = 0; } else { ser_txRestart = 1; } } ser_lineState = ((LPC_UART1->MSR<<8)|LPC_UART1->LSR) & 0xE01E; // update linestate return; }