/* Name: net.c
 * Author: .
 * Copyright: Arduino
 * License: GPL http://www.gnu.org/licenses/gpl-2.0.html
 * Project: eboot
 * Network and W5100 chip support
 * Version: 0.1 tftp / flashing functional
 */


#include "net.h"
#include "main.h"
#include <avr/eeprom.h>
#include "debug.h"
#include "w5100_reg.h"

#define REGISTER_BLOCK_SIZE 28
//#define REGISTER_BLOCK_SIZE UINT8_C(28)
//SIG1(0x55), SIG2(0XAA), GWIP0, GWIP1, GWIP2, GWIP3, MASK0, MASK1, MASK2, MASK3, MAC0, MAC1, MAC2, MAC3, MAC4, MAC5, IP0, IP1, IP2, IP3
uint8_t registerBuffer[REGISTER_BLOCK_SIZE] = {
  0x80,                           // MR Mode - reset device
  
  // EEPROM block starts here
  192,168,0,1,                    // GWR Gateway IP Address Register
  255,255,252,0,                  // SUBR Subnet Mask Register
  0x00,0x08,0xDC,0xBD,0x25,0xFF,  // SHAR Source Hardware Address Register
  192,168,0,180,                  // SIPR Source IP Address Register
  // EEPROM block ends here
  
  0,0,                            // Reserved locations
  0,                              // IR Interrupt Register
  0,                              // IMR Interrupt Mask Register
  0x07,0xd0,                      // RTR Retry Time-value Register
  0x80,                           // RCR Retry Count Register
  0x55,                           // RMSR Rx Memory Size Register, 2K per socket
  0x55                            // TMSR Tx Memory Size Register, 2K per socket
};

void netWriteReg(uint16_t address, uint8_t value) {

  /*trace("NetWriteReg:");
  tracenum(address);
  putchar(',');
  tracenum(value);
  trace("\r\n");
*/
  //Send uint8_t to Eth controler
  SPCR = _BV(SPE) | _BV(MSTR); //Set SPI as master
  SS_LOW();
  SPDR = SPI_WRITE;       while(!(SPSR & _BV(SPIF)));
  SPDR = address >> 8;    while(!(SPSR & _BV(SPIF)));
  SPDR = address & 0xff;  while(!(SPSR & _BV(SPIF)));
  SPDR = value;           while(!(SPSR & _BV(SPIF)));
  SS_HIGH();
  SPCR = 0;  //turn off SPI
}

uint8_t netReadReg(uint16_t address) {
  //Read uint8_t from Eth controler
  uint8_t returnValue;
  SPCR = _BV(SPE) | _BV(MSTR);
  SS_LOW();
  SPDR = SPI_READ;        while(!(SPSR & _BV(SPIF)));
  SPDR = address >> 8;    while(!(SPSR & _BV(SPIF)));
  SPDR = address & 0xff;  while(!(SPSR & _BV(SPIF)));
  SPDR = 0;               while(!(SPSR & _BV(SPIF)));
  SS_HIGH();
  returnValue = SPDR;
  SPCR = 0;  
  return returnValue;
}
uint16_t netReadWord(uint16_t address) {
  //Read uint16_t from Eth controler
  return (netReadReg(address++)<<8) | netReadReg(address);
}
void netWriteWord(uint16_t address, uint16_t value) {
  //Write uint16_t to Eth controler
  netWriteReg(address++, value >> 8);
  netWriteReg(address, value & 0xff);
}

void netInit() {
  //Init Wiznet Chip
  // Set up SPI

  // Pull in altered presets if available from AVR EEPROM (if signature bytes are set)
  if ((eeprom_read_byte(EEPROM_SIG_1) == EEPROM_SIG_1_VALUE) && (eeprom_read_byte(EEPROM_SIG_2) == EEPROM_SIG_2_VALUE)) {
    uint8_t i=0;
    trace("Using EEPROM settings\r\n");
    for (;i<18; i++) registerBuffer[i+1] = eeprom_read_byte(EEPROM_DATA+i); //copy eeprom to registerBuffer, starting at adress 2
  }
  else {
    trace("Using Default Settings\r\n");
    ;
  }

  // Configure Wiznet chip
  uint8_t i=0;
  for (i=0; i<REGISTER_BLOCK_SIZE; i++){
	  netWriteReg(i,registerBuffer[i]);
  }
}