Colony » Colony Scout

#include <stdint.h>

#include <avr/io.h>

#include <avr/interrupt.h>

#include "twi.h"

#include "bomi2c.h"

#define QUEUE_SIZE 64

uint16_t queue[QUEUE_SIZE];

int queue_idx;

char last_bit;

char count;

uint16_t data;

volatile char currently_sending;

char sending_counter;

uint16_t sending_data;

#define READ_BIT(pin, bit) (((pin) >> bit) & 1)

#define SET_BIT(pin, bit) ((pin) |= (1 << (bit)))

#define PRESCALAR 8

#define TIME_US(us) (F_CPU * (us) / 1000000 / PRESCALAR)

static void send_bit(char bit);

static void slave_tx(void) {

  twi_transmit((uint8_t*)queue, queue_idx * sizeof(queue[0]));

  queue_idx = 0;

}

static void slave_rx(uint8_t *buf, int len) {

  if (len > 0) {

    switch (buf[0]) {

      case BOM_I2C_SEND:

        // TODO

        break;

    }

  }

}

static void bom_start(void) {

  data = 0;

  count = 0;

  last_bit = 1;

  // TODO disable interrupt

  // TODO start timer

}

static void bom_stop(void) {

  // TODO stop timer

  // TODO restart INT0

}

static void bom_init(void) {

  // setup INT0

  //EICRA |= _BV(ISC01) | _BV(ISC00);

  //EIMSK |= _BV(INT0);

  // setup timer 0

  TCCR0B |= _BV(CS01);

  TIMSK |= _BV(OCIE0A);

  // setup timer 1 for output

  GTCCR |= _BV(COM1B1);  // Set pin3 low when timer1 matches match b

  OCR1B = TIME_US(320); // Set match b to fire every 320 us

  TIMSK |= _BV(OCIE1A); // Enable interrupt for match a

  TCCR1 |= _BV(CTC1);   // Enables resetting timer1 after matches match a

  // setup output pin

  SET_BIT(DDRD, 5);

  //sei();

  bom_start();

}

ISR(TIMER0_COMPA_vect) {

  char this_bit = READ_BIT(PIND, PD2);

  if (this_bit == 0) {

    if (last_bit == 0) {

      bom_stop();

    }

  } else {

    data = data << 1 | (~last_bit & 1);

    count++;

  }

  last_bit = this_bit;

  if (count == 15) {

    if (queue_idx < QUEUE_SIZE) {

      queue[queue_idx] = data;

      queue_idx++;

    }

    bom_stop();

  }

}

static void send_next_bit() {

  char next_bit = sending_data >> (14-counter) & 1;

  char ocr_temp  next_bit ? TIME_US(2000) : TIME_US(1000);

  OCR1A = ocr_temp;

  OCR1C = ocr_temp;

  SET_BIT(PORTD, PD5);

}

ISR(TIMER1_COMPA_vect) {

  if (++counter > 15) {

    currently_sending = 0;

    TCCR1 &= ~0x0F; // Stop the timer without clearing CTC1

  } else {

    send_next_bit();

  }

}

static void send_data(uint16_t data) {

  sending_data = data;

  sending_counter = 0;

  currently_sending = 1;

  send_next_bit();

  TCCR1 |= _BV(CS12);  // Set prescalar to 8 and start timer

  while (currently_sending) { }

}

int main() {

  bom_init();

  for (;;) {

    send_data(45243);

    _delay_ms(100);

  }

}

ISR(INT0_vect) {

  bom_start();

}