#include "Includes.h"
/*******************************************************************************
 * I2C
 */

void initI2C(void)
{
    /* Zugehörige Tris-Bits auf Input schalten */
    /* Master-Mode - Clock = Fosc / (4*(SSPxADD+1)) */  
    /* SSPxADD values of 0, 1 or 2 are not supported for I2C Mode */
        
    SSPCON1bits.SSPM3 = 1;
    SSPCON1bits.SSPM2 = 0;
    SSPCON1bits.SSPM1 = 0;
    SSPCON1bits.SSPM0 = 0;
    SSPCON1bits.SSPEN = 1;
    SSPADD = 0x27;                      // für 200kHz (Fosc = 8 MHz)
    SSPCON2bits.ACKDT = 0;
}

void waitI2C(void)
{
    while(!PIR1bits.SSPIF);          // Aktion* wurde beendet
    PIR1bits.SSPIF = 0;              // Flag zurücksetzten
} 
 
// *Zum Beispiel: START-Sequenze, Übertragung von 8 Bit, ...

void idleI2C(void)
{
    while( SSPSTATbits.R_W );        // Läuft eine Übertragung?
    while( SSPCON2 & 0x1F );         // Ist irgendwas anderes aktiv?
}

void startI2C(void)
{
    idleI2C();                        // Ist der Bus frei?
    SSPCON2bits.SEN = 1;             // Auslösen einer START-Sequenze
    while( SSPCON2bits.SEN );        // Beendet, wenn SEN gelöscht wurde*
}
/* 
void restartI2C(void)
{
    idleI2C();                        // Ist der Bus frei?
    SSPCON2bits.RSEN=1;              // Auslösen einer RESTART-Sequenze
    while( SSPCON2bits.RSEN );       // Beendet, wenn RSEN gelöscht wurde*
}
 */
void stopI2C(void)
{
    idleI2C();                        // Ist der Bus frei?
    SSPCON2bits.PEN = 1;             // Auslösen einer RESTART-Sequenze
    while( SSPCON2bits.PEN );        // Beendet, wenn RSEN gelöscht wurde*
}
 
// *Oder das Bit SSPxIF gesetzt wurde (siehe Datenblatt)

uint8 sendI2C(uint8 byte)
{
    idleI2C();                        // Ist der Bus verfügbar?
    PIR1bits.SSPIF = 0;              // Flag löschen (wird in waitI2C() abgefragt)
    SSPBUF = byte;                   // Durch füllen des Puffers Sendevorgang auslösen
    waitI2C();                        // Warten bis Übertragung abgeschlossen ist
 
    return ~SSPCON2bits.ACKSTAT;     // Return 1: ACK empfangen, 0: kein ACK empfangen
}
/*
uint8_t reciveI2C_nack(void)
{
    uint8_t incomming = 0;            // Einlesepuffer
 
    idleI2C();                        // Ist der Bus verfügbar?
    PIR1bits.SSPIF = 0;              // Flag löschen (wird in waitI2C() abgefragt)
    SSPCON2bits.RCEN = 1;            // Als Empfänger konfigurieren (wird autom. wieder gelöscht)
    waitI2C();                        // Warten bis Übertragung (lesend) abgeschlossen ist
    SSPCON2bits.ACKDT = 1;           // Mit NACK quitieren (Nicht weiter einlesen)
    SSPCON2bits.ACKEN = 1;           // NACK aussenden
    while( SSPCON2bits.ACKEN );      // NACK abgeschlossen?
    incomming = SSPBUF;              // Empfangenes Byte in den Puffer
        
    return incomming;                 // Und zurück geben
}
 
uint8_t reciveI2C_ack(void)
{
    uint8_t incomming = 0;            // Einlesepuffer
 
    idleI2C();                        // Ist der Bus verfügbar?
    PIR1bits.SSPIF = 0;              // Flag löschen (wird in waitI2C() abgefragt)
    SSPCON2bits.RCEN = 1;            // Als Empfänger konfigurieren (wird autom. wieder gelöscht)
    waitI2C();                        // Warten bis Übertragung (lesend) abgeschlossen ist
    SSPCON2bits.ACKDT = 0;           // Mit AACK quitieren (weiter einlesen)
    SSPCON2bits.ACKEN = 1;           // ACK aussenden
    while( SSPCON2bits.ACKEN );      // ACK abgeschlossen?
    incomming = SSPBUF;              // Empfangenes Byte in den Puffer
 
    return incomming;                 // Und zurück geben
}
 */