/****************************************************************************/
/* Copyright 2010 MBARI.                                                    */
/* MBARI Proprietary Information. All rights reserved.                      */
/****************************************************************************/
#include "dig_io.h"
#include "p24Fxxxx.h"
#include "sys_defs.h"

static int dummyBit;

#define TOTAL_OUT_BITS  32

#define OUT_BIT_0 LATBbits.LATB2 // 48V_01_GF
#define OUT_BIT_1 LATBbits.LATB3 // 48V_01_RET_GF
#define OUT_BIT_2 LATBbits.LATB4 // 48V_02_GF
#define OUT_BIT_3 LATBbits.LATB5 // 48V_02_RET_GF
#define OUT_BIT_4 LATBbits.LATB6 // TEST_GF
#define OUT_BIT_5 LATBbits.LATB7 // TEST_RET_GF
#define OUT_BIT_6 LATBbits.LATB8 // SPARE_01
#define OUT_BIT_7 LATBbits.LATB9 // SPARE_02

#define OUT_BIT_8 LATBbits.LATB10 // SPARE_03
#define OUT_BIT_9 LATBbits.LATB11 // SPARE_04
#define OUT_BIT_10 LATBbits.LATB12 // SPARE_05
#define OUT_BIT_11 LATBbits.LATB13 // SPARE_06
#define OUT_BIT_12 LATBbits.LATB14 // SPARE_07
#define OUT_BIT_13 LATBbits.LATB15 // SPARE_08
#define OUT_BIT_14 LATDbits.LATD6 // ADC_01_CS
#define OUT_BIT_15 LATDbits.LATD7 // ADC_02_CS

#define OUT_BIT_16 LATDbits.LATD8 // ISO_ADC_CS
#define OUT_BIT_17 LATDbits.LATD9 // ADC_48V_01_CS
#define OUT_BIT_18 LATDbits.LATD10 // ADC_48V_02_CS
#define OUT_BIT_19 LATDbits.LATD11 // XPORT_INT
#define OUT_BIT_20 LATFbits.LATF0 // FAN_01_CONT
#define OUT_BIT_21 LATFbits.LATF1 // FAN_02_CONT
#define OUT_BIT_22 LATFbits.LATF2 // VICOR_01_CONT
#define OUT_BIT_23 LATFbits.LATF3 // VICOR_02_CONT

#define OUT_BIT_24 LATFbits.LATF4 // NODE_01_CONT
#define OUT_BIT_25 LATFbits.LATF5 // NODE_02_CONT
#define OUT_BIT_26 LATFbits.LATF6 // 48V_ACT
#define OUT_BIT_27 LATGbits.LATG6 // "TEST_LED"
#define OUT_BIT_28 dummyBit
#define OUT_BIT_29 dummyBit
#define OUT_BIT_30 dummyBit
#define OUT_BIT_31 dummyBit

#define TOTAL_IN_BITS  16

#define IN_BIT_0 PORTEbits.RE0 // FAN_01_STATE
#define IN_BIT_1 PORTEbits.RE1 // FAN_02_STATE
#define IN_BIT_2 PORTEbits.RE2 // VICOR_01_STATE
#define IN_BIT_3 PORTEbits.RE3 // VICOR_02_STATE
#define IN_BIT_4 PORTEbits.RE4 // NODE_01_STATE
#define IN_BIT_5 PORTEbits.RE5 // NODE_02_STATE
#define IN_BIT_6 PORTEbits.RE6 // 48V_READY
#define IN_BIT_7 PORTEbits.RE7 // 375V_READY

#define IN_BIT_8 PORTGbits.RG2 // H2O_SENSE_01
#define IN_BIT_9 PORTGbits.RG3 // H2O_SENSE_02
#define IN_BIT_10 dummyBit
#define IN_BIT_11 dummyBit
#define IN_BIT_12 dummyBit
#define IN_BIT_13 dummyBit
#define IN_BIT_14 dummyBit
#define IN_BIT_15 dummyBit






/* init registers */
void digInit()
{
    /* Note: the AD1PCFGL and TRIS registers have to be set on 
    ADC pins if you want to use them as digital I/O pins */    
	
	/* Configure all analog/digital sharing pins to digital */
	// 1 = digital, 0 = analog (n=ADC#)

	AD1PCFGbits.PCFG0 = 1;
	AD1PCFGbits.PCFG1 = 1;
	AD1PCFGbits.PCFG2 = 1;
	AD1PCFGbits.PCFG3 = 1;
	AD1PCFGbits.PCFG4 = 1;
	AD1PCFGbits.PCFG5 = 1;
	AD1PCFGbits.PCFG6 = 1;
	AD1PCFGbits.PCFG7 = 1;
	AD1PCFGbits.PCFG8 = 1;
	AD1PCFGbits.PCFG9 = 1;
	AD1PCFGbits.PCFG10 = 1;
	AD1PCFGbits.PCFG11 = 1;
	AD1PCFGbits.PCFG12 = 1;
	AD1PCFGbits.PCFG13 = 1;
	AD1PCFGbits.PCFG14 = 1;
	AD1PCFGbits.PCFG15 = 1;


    /* set outputs here */

        TRISBbits.TRISB2 = 0;
	TRISBbits.TRISB3 = 0;
	TRISBbits.TRISB4 = 0;
        TRISBbits.TRISB5 = 0;
        TRISBbits.TRISB6 = 0;
        TRISBbits.TRISB7 = 0;
	TRISBbits.TRISB8 = 0;
	TRISBbits.TRISB9 = 0;
        TRISBbits.TRISB10 = 0;
        TRISBbits.TRISB11 = 0;
        TRISBbits.TRISB12 = 0;
        TRISBbits.TRISB13 = 0;
        TRISBbits.TRISB14 = 0;
        TRISBbits.TRISB15 = 0;

	TRISDbits.TRISD6 = 0;
	TRISDbits.TRISD7 = 0;
	TRISDbits.TRISD8 = 0;
        TRISDbits.TRISD9 = 0;
        TRISDbits.TRISD10 = 0;
        TRISDbits.TRISD11 = 0;

	TRISFbits.TRISF0 = 0;
	TRISFbits.TRISF1 = 0;
	TRISFbits.TRISF2 = 0;
	TRISFbits.TRISF3 = 0;
        TRISFbits.TRISF4 = 0;
        TRISFbits.TRISF5 = 0;
	TRISFbits.TRISF6 = 0;
	
	TRISGbits.TRISG6 = 0;

       
    /* set inputs here */
   
	TRISEbits.TRISE0 = 1;
	TRISEbits.TRISE1 = 1;
	TRISEbits.TRISE2 = 1;
        TRISEbits.TRISE3 = 1;
        TRISEbits.TRISE4 = 1;
        TRISEbits.TRISE5 = 1;
        TRISEbits.TRISE6 = 1;

        TRISGbits.TRISG2 = 1;
        TRISGbits.TRISG3 = 1;


    /* put out bits in default state here */
    Nop();
    OUT_BIT_0 = 0;  
    Nop();
    OUT_BIT_1 = 0;  
    Nop();
    OUT_BIT_2 = 0;  
    Nop();
    OUT_BIT_3 = 0;  
    Nop();
    OUT_BIT_4 = 0;  
    Nop();
    OUT_BIT_5 = 0;  
    Nop();
    OUT_BIT_6 = 0;  
    Nop();
    OUT_BIT_7 = 0;  
    Nop();
    OUT_BIT_8 = 0;  
    Nop();
    OUT_BIT_9 = 0;
    Nop();
    OUT_BIT_10 = 0;
    Nop();
    OUT_BIT_11 = 0;
    Nop();
    OUT_BIT_12 = 0;
    Nop();
    OUT_BIT_13 = 0;
    Nop();
    OUT_BIT_14 = 1;
    Nop();
    OUT_BIT_15 = 1;
    Nop();
    OUT_BIT_16 = 1;
    Nop();
    OUT_BIT_17 = 1;
    Nop();
    OUT_BIT_18 = 1;
    Nop();
    OUT_BIT_19 = 1;
    Nop();
    OUT_BIT_20 = 0;
    Nop();
    OUT_BIT_21 = 0;
    Nop();
    OUT_BIT_22 = 1;
    Nop();
    OUT_BIT_23 = 1;
    Nop();
    OUT_BIT_24 = 0;
    Nop();
    OUT_BIT_25 = 0;
    Nop();
    OUT_BIT_26 = 0;
    Nop();
    OUT_BIT_27 = 0;
    Nop();
}

/* power bit API */
void digSetOutBit(int bit, int state)
{
    /* state is non zero, set it to one */
    if ( state )
        state = 1;
    
    Nop();

    switch (bit)
    {
        case 0: OUT_BIT_0 = state; break;
        case 1: OUT_BIT_1 = state; break;
        case 2: OUT_BIT_2 = state; break;
        case 3: OUT_BIT_3 = state; break;
        case 4: OUT_BIT_4 = state; break;
        case 5: OUT_BIT_5 = state; break;
        case 6: OUT_BIT_6 = state; break;
        case 7: OUT_BIT_7 = state; break;
        case 8: OUT_BIT_8 = state; break;
        case 9: OUT_BIT_9 = state; break;
        case 10: OUT_BIT_10 = state; break;
        case 11: OUT_BIT_11 = state; break;
        case 12: OUT_BIT_12 = state; break;
        case 13: OUT_BIT_13 = state; break;
        case 14: OUT_BIT_14 = state; break;
        case 15: OUT_BIT_15 = state; break;
        case 16: OUT_BIT_16 = state; break;
        case 17: OUT_BIT_17 = state; break;
        case 18: OUT_BIT_18 = state; break;
        case 19: OUT_BIT_19 = state; break;
        case 20: OUT_BIT_20 = state; break;
        case 21: OUT_BIT_21 = state; break;
        case 22: OUT_BIT_22 = state; break;
        case 23: OUT_BIT_23 = state; break;
        case 24: OUT_BIT_24 = state; break;
        case 25: OUT_BIT_25 = state; break;
        case 26: OUT_BIT_26 = state; break;
        case 27: OUT_BIT_27 = state; break;
        default: return;
    }
}

int digGetOutBit(int bit)
{
    Nop();

    /* set dummyBit to 0 so undefined bits always read back as 0 */
    dummyBit = 0;
    
    switch (bit)
    {
        case 0: return (int)OUT_BIT_0;
        case 1: return (int)OUT_BIT_1;
        case 2: return (int)OUT_BIT_2;
        case 3: return (int)OUT_BIT_3;
        case 4: return (int)OUT_BIT_4;
        case 5: return (int)OUT_BIT_5;
        case 6: return (int)OUT_BIT_6;
        case 7: return (int)OUT_BIT_7;
	case 8: return (int)OUT_BIT_8;
        case 9: return (int)OUT_BIT_9;
        case 10: return (int)OUT_BIT_10;
        case 11: return (int)OUT_BIT_11;
        case 12: return (int)OUT_BIT_12;
        case 13: return (int)OUT_BIT_13;
        case 14: return (int)OUT_BIT_14;
        case 15: return (int)OUT_BIT_15;
	case 16: return (int)OUT_BIT_16;
        case 17: return (int)OUT_BIT_17;
        case 18: return (int)OUT_BIT_18;
        case 19: return (int)OUT_BIT_19;
        case 20: return (int)OUT_BIT_20;
        case 21: return (int)OUT_BIT_21;
        case 22: return (int)OUT_BIT_22;
        case 23: return (int)OUT_BIT_23;
	case 24: return (int)OUT_BIT_24;
        case 25: return (int)OUT_BIT_25;
        case 26: return (int)OUT_BIT_26;
        case 27: return (int)OUT_BIT_27;
        default: return 0;
    }
}

void digSetOutPort(unsigned int val)
{
    int i;
    unsigned int bit = 0x0001;
     
    for (i = 0; i < TOTAL_OUT_BITS; ++i)
    {
        digSetOutBit(i, (val & bit));
        bit <<= 1;
    }
}

unsigned int digGetOutPort(void)
{
    int i;
    unsigned int bit = 0x0001;
    unsigned int val = 0;

    for (i = 0; i < TOTAL_OUT_BITS; ++i)
    {
        if ( digGetOutBit(i) )
            val += bit;
        
        bit <<= 1;
    }

    return val;
}

/* digital input API */
int digGetInBit(int bit)
{
    Nop();

    /* set dummyBit to 0 so undefined bits always read back as 0 */
    dummyBit = 0;
    
    switch (bit)
    {
        case 0: return (int)IN_BIT_0;
        case 1: return (int)IN_BIT_1;
        case 2: return (int)IN_BIT_2;
        case 3: return (int)IN_BIT_3;
        case 4: return (int)IN_BIT_4;
        case 5: return (int)IN_BIT_5;
        case 6: return (int)IN_BIT_6;
        case 7: return (int)IN_BIT_7;
        case 8: return (int)IN_BIT_8;
        case 9: return (int)IN_BIT_9;
        default: return 0;
    }
}

unsigned int digGetInPort(void)
{
    int i;
    unsigned int bit = 0x0001;
    unsigned int val = 0;

    for (i = 0; i < TOTAL_IN_BITS; ++i)
    {
        if ( digGetInBit(i) )
            val += bit;
        
        bit <<= 1;
    }

    return val;
}

