typedef enum
{
    AIO0,
    AIO1,
    VDD,
    AIO2,
    AIO3,            /*Only available on certain BlueCore variants.*/
    BATTERY_INTERNAL /*Only available on certain BlueCore variants.*/
} battery_reading_source;

typedef enum
{
    VM_ADC_SRC_AIO0,    /*!< Test pin AIO0 */
    VM_ADC_SRC_AIO1,    /*!< Test pin AIO1 */
    VM_ADC_SRC_VREF,    /*!< The internal reference voltage in the chip */
    VM_ADC_SRC_AIO2,    /*!< Test pin AIO2 */
    VM_ADC_SRC_AIO3,    /*!< Test pin AIO3 (not always available) */
    VM_ADC_SRC_VDD_BAT  /*!< Battery voltage (only available on certain BlueCore variants)*/
} vm_adc_source_type;

static vm_adc_source_type batSrcToAdcSrc(battery_reading_source bat_src)
{
    vm_adc_source_type adc_src = 0;
    
    switch(bat_src)
    {
        case AIO0:
            if(AIO0 == VM_ADC_SRC_AIO0)
                adc_src = (vm_adc_source_type) bat_src;
            else
                adc_src = VM_ADC_SRC_AIO0;
        break;
        case AIO1:
            if(AIO1 == VM_ADC_SRC_AIO1)
                adc_src = (vm_adc_source_type) bat_src;
            else
                adc_src = VM_ADC_SRC_AIO1;
        break;
        case VDD:
            if(VDD == VM_ADC_SRC_VREF)
                adc_src = (vm_adc_source_type) bat_src;
            else
                adc_src = VM_ADC_SRC_VREF;
        break;
        case AIO2:
            if(AIO2 == VM_ADC_SRC_AIO2)
                adc_src = (vm_adc_source_type) bat_src;
            else
                adc_src = VM_ADC_SRC_AIO2;
        break;
        case AIO3:
            if(AIO3 == VM_ADC_SRC_AIO3)
                adc_src = (vm_adc_source_type) bat_src;
            else
                adc_src = VM_ADC_SRC_AIO3;
        break;
        case BATTERY_INTERNAL:
            if(BATTERY_INTERNAL == VM_ADC_SRC_VDD_BAT)
                adc_src = (vm_adc_source_type) bat_src;
            else
                adc_src = VM_ADC_SRC_VDD_BAT;
        break;
    }
    
    return adc_src;
}

#include <panic.h>
#include <stdio.h>
#include <stream.h>
#include <pio.h>
#include <source.h>
#include <string.h>
#include <sink.h>
#include <csrtypes.h>
#include <connection.h>
#include <message.h>

#define VM_UART_(RATE)        (uint16)((RATE*0.004096)+0.5)
#define VM_UART_RATE_1K2       0x0005
#define VM_UART_RATE_1K2       0x0005
#define VM_UART_RATE_2K4       0x000a
#define VM_UART_RATE_4K8       0x0014
#define VM_UART_RATE_76K8      0x013b
#define VM_UART_RATE_1843K2    0x1d7e
#define VM_UART_RATE_2764K8    0x2c3d

#define LED1      0x01        /* bit 1 */
#define DELAY1   200        /* ms */

#define LED2     0x02         /* bit 2 */
#define DELAY2   100         /* ms */

static void led_controller1( Task t, MessageId id, Message payload )
{
        PioSet( LED1, (PioGet() ^ LED1) );
        MessageSendLater( t, 0, 0, DELAY1 );
}

static void led_controller2( Task t, MessageId id, Message payload )
{    
    Source source= StreamUartSource();
    uint16 length = SourceSize (source);
     if(MESSAGE_MORE_DATA==id )
     {
        char *string;
        uint16 offset;
        uint8 *dest;
        Sink sink=StreamUartSink();
        PanicNull(sink);
        string=(char *)SourceMap(source);
        /* Claim space in the sink, getting the offset to it */
        offset = SinkClaim(sink, length);
        if(offset == 0xFFFF) Panic(); /* Space not available */
        /* Map the sink into memory space */
         dest = SinkMap(sink);
        (void) PanicNull(dest);
        /* Copy the string into the claimed space */
        memcpy(dest+offset,SourceMap (source), length);
        /* Flush the data out to the uart */
        PanicZero(SinkFlush(sink, length));
        SourceDrop (source, length);
    }
    PioSet( LED2, (PioGet() ^ LED2) );
    MessageSendLater( t, 0, 0, DELAY2 );
        MessageHostCommsTask(t);     
        MessagePioTask(t);
        MessageSystemTask(t);    
}
static TaskData taskSPP1 ={led_controller1};
static TaskData taskSPP2 = {led_controller2};

int main(void)
{
    PioSetDir(0xFF, 0xFF);         /* Set all PIO to be output */
    PioSet(0xFF, 0);               /* Set all PIO off (0) */
    MessageHostCommsTask(&taskSPP2);     
    MessagePioTask(&taskSPP2);
    MessageSystemTask(&taskSPP2);
    MessageSend( &taskSPP1,  0 , 0 );
    MessageSend( &taskSPP2,  0 , 0 );  
    
    MessageLoop();
    
    return 0;
}