File content as of revision 2:5f360876388e:

/*
 * FreeModbus Libary: BARE Port
 * Copyright (C) 2006 Christian Walter <wolti@sil.at>
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2.1 of the License, or (at your option) any later version.
 *
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 *
 * File: $Id: portserial.c,v 1.1 2006/08/22 21:35:13 wolti Exp $
 */

/* ----------------------- System includes ----------------------------------*/
#include "mbed.h"                   // Cam

/* ----------------------- Platform includes --------------------------------*/
#include "port.h"

/* ----------------------- Modbus includes ----------------------------------*/
#include "mb.h"
#include "mbport.h"


/* ----------------------- static functions ---------------------------------*/
static void prvvUARTTxReadyISR( void );
static void prvvUARTRxISR( void );
//static void prvvUARTISR( void );

/* ----------------------- System Variables ---------------------------------*/
//Serial pc(USBTX, USBRX);           // Cam - mbed USB serial port
Serial ser3(D6, PC_11); //serial3
extern Serial pc;
//Ticker simISR;                      // Cam - mbed ticker
                                    // we don't have the TX buff empty interrupt, so
                                    // we just interrupt every 1 mSec and read RX & TX
                                    // status to simulate the proper ISRs.

//static BOOL RxEnable, TxEnable;     // Cam - keep a static copy of the RxEnable and TxEnable
                                    // status for the simulated ISR (ticker)


/* ----------------------- Start implementation -----------------------------*/
//stanley
//#define RX_BUFF_LENGTH 1
//#define TX_BUFF_LENGTH 1
//event_callback_t    serialRxCBEvent;
//event_callback_t    serialTxCBEvent;

//uint8_t rx_buf[RX_BUFF_LENGTH];
//uint8_t tx_buf[TX_BUFF_LENGTH];


//static void serialRxCBFn(int events)
//{
//    
//   prvvUARTRxISR();
//   
//}
//static void serialTxCBFn(int events)
//{
//    prvvUARTTxReadyISR();
//   
//}
// Cam - This is called every 1mS to simulate Rx character received ISR and
// Tx buffer empty ISR.
//static void
//prvvUARTISR( void )
//{
//    if (TxEnable)
//        if(ser3.writeable())
//            prvvUARTTxReadyISR();
//            
//    if (RxEnable)
//        if(ser3.readable())
//            prvvUARTRxISR();          
//}


void
vMBPortSerialEnable( BOOL xRxEnable, BOOL xTxEnable )
{
    /* If xRXEnable enable serial receive interrupts. If xTxENable enable
     * transmitter empty interrupts.
     */
    //RxEnable = xRxEnable;
    //TxEnable = xTxEnable;

	//stanley
	if(xRxEnable)
		pc.printf("xRxEnable\n");
	else
		pc.printf("xRxDisable\n");

	if(xTxEnable)
		pc.printf("xTxEnable\n");
	else
		pc.printf("xTxDisable\n");

	if(xRxEnable)
		ser3.attach(&prvvUARTRxISR,Serial::RxIrq);
	else
		ser3.attach(NULL,Serial::RxIrq);
	
	/*if(xTxEnable)
		ser3.attach(&prvvUARTTxReadyISR,Serial::TxIrq);
	else
		ser3.attach(NULL,Serial::TxIrq);*/
	//if(xTxEnable)
		//¤£¥Î¦b³oÃä³]©wser3.write(tx_buf,TX_BUFF_LENGTH,serialTxCBEvent,SERIAL_EVENT_TX_COMPLETE);
}

BOOL
xMBPortSerialInit( UCHAR ucPORT, ULONG ulBaudRate, UCHAR ucDataBits, eMBParity eParity )
{
    //simISR.attach_us(&prvvUARTISR,1000);    // Cam - attach prvvUARTISR to a 1mS ticker to simulate serial interrupt behaviour
                                            // 1mS is just short of a character time at 9600 bps, so quick enough to pick
                                            // up status on a character by character basis.
   
	pc.printf("in Ini\n");
	//stanley
	//serialRxCBEvent.attach(serialRxCBFn);  
 //   serialTxCBEvent.attach(serialTxCBFn);

	//ser3.attach(&prvvUARTRxISR,Serial::RxIrq);
    //ser3.attach(&prvvUARTTxReadyISR,Serial::TxIrq);
	
	
	return TRUE;
}

BOOL
xMBPortSerialPutByte( CHAR ucByte )
{
    /* Put a byte in the UARTs transmit buffer. This function is called
     * by the protocol stack if pxMBFrameCBTransmitterEmpty( ) has been
     * called. */
    //ser3.putc( ucByte);
	pc.printf("in put\n");
	//stanley
	//while(!ser3.writeable());
	ser3.putc( ucByte);

    return TRUE;
}

BOOL
xMBPortSerialGetByte( CHAR * pucByte )
{
    /* Return the byte in the UARTs receive buffer. This function is called
     * by the protocol stack after pxMBFrameCBByteReceived( ) has been called.
     */
	pc.printf("in get\n");
	if(ser3.readable())
		*pucByte = ser3.getc();

	

    return TRUE;
}

/* Create an interrupt handler for the transmit buffer empty interrupt
 * (or an equivalent) for your target processor. This function should then
 * call pxMBFrameCBTransmitterEmpty( ) which tells the protocol stack that
 * a new character can be sent. The protocol stack will then call 
 * xMBPortSerialPutByte( ) to send the character.
 */
static void prvvUARTTxReadyISR( void )
{
	pc.printf("in Tx_I\n");
    pxMBFrameCBTransmitterEmpty();
}

/* Create an interrupt handler for the receive interrupt for your target
 * processor. This function should then call pxMBFrameCBByteReceived( ). The
 * protocol stack will then call xMBPortSerialGetByte( ) to retrieve the
 * character.
 */
static void prvvUARTRxISR( void )
{
	pc.printf("in Rx_I\n");
    pxMBFrameCBByteReceived();
}