//-----------------------------------------------------------------------------
// Note
//  I2Cの通信(スレーブ側)
//  PICの周波数を32Mhzに設定
//-----------------------------------------------------------------------------
#include <xc.h>
#include <stdio.h>
#include <stdlib.h>
#include <stdbool.h>


// コンフィグレーションBIT1 設定
#pragma config FOSC = INTOSC    // Oscillator Selection (INTOSC oscillator: I/O function on CLKIN pin)
#pragma config WDTE = OFF       // Watchdog Timer Enable (WDT disabled)
#pragma config PWRTE = ON       // Power-up Timer Enable (PWRT enabled)
#pragma config MCLRE = OFF      // MCLR Pin Function Select (MCLR/VPP pin function is MCLR)
#pragma config CP = OFF         // Flash Program Memory Code Protection (Program memory code protection is disabled)
#pragma config CPD = OFF        // Data Memory Code Protection (Data memory code protection is disabled)
#pragma config BOREN = OFF      // Brown-out Reset Enable (Brown-out Reset disabled)
#pragma config CLKOUTEN = OFF   // Clock Out Enable (CLKOUT function is disabled. I/O or oscillator function on the CLKOUT pin)
#pragma config IESO = OFF       // Internal/External Switchover (Internal/External Switchover mode is disabled)
#pragma config FCMEN = OFF      // Fail-Safe Clock Monitor Enable (Fail-Safe Clock Monitor is disabled)

// コンフィグレーションBIT2 設定
#pragma config WRT = OFF        // Flash Memory Self-Write Protection (Write protection off)
#pragma config PLLEN = ON       // PLL Enable (4x PLL enabled)
#pragma config STVREN = ON      // Stack Overflow/Underflow Reset Enable (Stack Overflow or Underflow will cause a Reset)
#pragma config BORV = HI        // Brown-out Reset Voltage Selection (Brown-out Reset Voltage (Vbor), high trip point selected.)
#pragma config LVP = OFF        // Low-Voltage Programming Enable (High-voltage on MCLR/VPP must be used for programming)


#define I2C_STAT_RW         0x04
#define I2C_STAT_DA         0x20
#define I2C_STAT_BF         0x01

#define I2C_CON1_CKP        0x10
#define I2C_CON2_ACKSTAT    0x40

unsigned char led = 0;
unsigned char buf = 0;
unsigned char io = 0;
unsigned char send = 0;


void interrupt I2C( void )
{
    if( SSP1IF )
    {
        if( (SSP1STAT & I2C_STAT_RW) == 0)
        {
            // データ or アドレス
            if( (SSP1STAT & I2C_STAT_DA) == 0)
            {
                // アドレスを受信
                buf = SSP1BUF;  // 空読みする
            }
            else
            {
                // データを受信
                led = SSP1BUF;  // データ読出し
            }
            SSP1CON1 |= I2C_CON1_CKP;   // 通信の再開
        }
        else
        {
            // I2Cの送信
            if( (SSP1STAT & I2C_STAT_BF) != 0 )
            {
                // アドレス受信後の割り込み
                buf = SSP1BUF;      // アドレスデータを空読み
                SSP1BUF = send;     // 送信データをセット(初回データ)
                SSP1CON1 |= I2C_CON1_CKP;   // 通信の再開
            }
            else
            {
                // データの送信後のACK受け取りによる割り込み
                if( (SSP1CON2 & I2C_CON2_ACKSTAT) == 0)
                {
                    // ACK応答なら次のデータをセットする
                    SSP1BUF = 0;    // 送信データのセット(2byte以降)
                    SSP1CON1 |= I2C_CON1_CKP;   // 通信の再開
                }
                else
                {
                    // NACKで応答された時は送信終了(処理無し)
                }
            }
        }

        SSP1IF = 0;
    }
}


int main(int argc, char** argv)
{
    unsigned char id = 1;   // スレーブ1用
//    unsigned char id = 2;   // スレーブ2用

    OPTION_REG = 0b00000000 ;// 7bit目が0でプルアップ抵抗が有効
    OSCCON = 0b01110000 ;   // 内部クロック8ＭＨｚ
    ANSELA = 0b00000000 ;   // すべてデジタルI/Oに割当てる
    TRISA  = 0b00101110 ;   // RA1,RA2,RA3,R5を入力とする
    PORTA  = 0b00000000 ;   // ピン状態初期化
    WPUA   = 0b00100000 ;   // RA5をプルアップ抵抗

    SSP1STAT= 0b10000000 ;  // 100kHz
    SSP1CON1= 0b00100110 ;  // SDA/SCLピンをI2C、スレーブ
    SSP1CON2 |= 0x01;       // クロックストレッチを許可
    SSP1ADD = (id << 1) & 0xFE; // スレーブのアドレスを設定
    SSP1MSK = 0xFE;

    SSP1IF = 0;             // I2Cの割り込みフラグをクリア

    SSP1IE = 1;             // I2Cの割り込みを許可
    PEIE   = 1;             // 周辺装置の割り込みを許可
    GIE    = 1;             // 全割り込みを許可

    for(;;)
    {
        // LED点灯/消灯
        RA4 = led;

        // スイッチ入力状態取得
        if( RA5 == 0 )
        {
            io = 1;
        }
        else
        {
            io = 0;
        }

        // スイッチ情報を送信変数へ代入
        send = io;
    }

    return (EXIT_SUCCESS);
}