main.i

Control ENC28J60 codevision

#pragma used+
sfrb PINF=0;
sfrb PINE=1;
sfrb DDRE=2;
sfrb PORTE=3;
sfrb ADCL=4;
sfrb ADCH=5;
sfrw ADCW=4;      
sfrb ADCSRA=6;
sfrb ADMUX=7;
sfrb ACSR=8;
sfrb UBRR0L=9;
sfrb UCSR0B=0xa;
sfrb UCSR0A=0xb;
sfrb UDR0=0xc;
sfrb SPCR=0xd;
sfrb SPSR=0xe;
sfrb SPDR=0xf;
sfrb PIND=0x10;
sfrb DDRD=0x11;
sfrb PORTD=0x12;
sfrb PINC=0x13;
sfrb DDRC=0x14;
sfrb PORTC=0x15;
sfrb PINB=0x16;
sfrb DDRB=0x17;
sfrb PORTB=0x18;
sfrb PINA=0x19;
sfrb DDRA=0x1a;
sfrb PORTA=0x1b;
sfrb EECR=0x1c;
sfrb EEDR=0x1d;
sfrb EEARL=0x1e;
sfrb EEARH=0x1f;
sfrw EEAR=0x1e;   
sfrb SFIOR=0x20;
sfrb WDTCR=0x21;
sfrb OCDR=0x22;
sfrb OCR2=0x23;
sfrb TCNT2=0x24;
sfrb TCCR2=0x25;
sfrb ICR1L=0x26;
sfrb ICR1H=0x27;
sfrw ICR1=0x26;   
sfrb OCR1BL=0x28;
sfrb OCR1BH=0x29;
sfrw OCR1B=0x28;  
sfrb OCR1AL=0x2a;
sfrb OCR1AH=0x2b;
sfrw OCR1A=0x2a;  
sfrb TCNT1L=0x2c;
sfrb TCNT1H=0x2d;
sfrw TCNT1=0x2c;  
sfrb TCCR1B=0x2e;
sfrb TCCR1A=0x2f;
sfrb ASSR=0x30;
sfrb OCR0=0x31;
sfrb TCNT0=0x32;
sfrb TCCR0=0x33;
sfrb MCUCSR=0x34;
sfrb MCUCR=0x35;
sfrb TIFR=0x36;
sfrb TIMSK=0x37;
sfrb EIFR=0x38;
sfrb EIMSK=0x39;
sfrb EICRB=0x3a;
sfrb XDIV=0x3c;
sfrb SPL=0x3d;
sfrb SPH=0x3e;
sfrb SREG=0x3f;
#pragma used-

#asm
	#ifndef __SLEEP_DEFINED__
	#define __SLEEP_DEFINED__
	.EQU __se_bit=0x20
	.EQU __sm_mask=0x1C
	.EQU __sm_powerdown=0x10
	.EQU __sm_powersave=0x18
	.EQU __sm_standby=0x14
	.EQU __sm_ext_standby=0x1C
	.EQU __sm_adc_noise_red=0x08
	.SET power_ctrl_reg=mcucr
	#endif
#endasm

#pragma used+

void delay_us(unsigned int n);
void delay_ms(unsigned int n);

#pragma used-

typedef char *va_list;

#pragma used+

char getchar(void);
void putchar(char c);
void puts(char *str);
void putsf(char flash *str);

char *gets(char *str,unsigned int len);

void printf(char flash *fmtstr,...);
void sprintf(char *str, char flash *fmtstr,...);
void snprintf(char *str, unsigned int size, char flash *fmtstr,...);
void vprintf (char flash * fmtstr, va_list argptr);
void vsprintf (char *str, char flash * fmtstr, va_list argptr);
void vsnprintf (char *str, unsigned int size, char flash * fmtstr, va_list argptr);
signed char scanf(char flash *fmtstr,...);
signed char sscanf(char *str, char flash *fmtstr,...);

#pragma used-

#pragma library stdio.lib

unsigned char   enc28j60ReadOp(unsigned char op, unsigned char address);
void            enc28j60WriteOp(unsigned char op, unsigned char address, unsigned char data);
void            enc28j60ReadBuffer(unsigned int len, unsigned char* data);
void            enc28j60WriteBuffer(unsigned int len, unsigned char* data);
void            enc28j60SetBank(unsigned char address);
unsigned char   enc28j60Read(unsigned char address);
void            enc28j60Write(unsigned char address, unsigned char data);
void            enc28j60PhyWrite(unsigned char address, unsigned int data);
void            enc28j60clkout(unsigned char clk);
void            enc28j60Init(unsigned char* macaddr);
void            enc28j60PacketSend(unsigned int len, unsigned char* packet);
unsigned int    enc28j60PacketReceive(unsigned int maxlen, unsigned char* packet);
unsigned char   enc28j60getrev(void);

void init_ip_arp_udp_tcp(unsigned char *mymac,unsigned char *myip,unsigned char wwwp);

unsigned char eth_type_is_arp_and_my_ip(unsigned char* buf,unsigned int len);
unsigned char eth_type_is_ip_and_my_ip(unsigned char* buf,unsigned int len);
void make_arp_answer_from_request(unsigned char* buf);
void make_echo_reply_from_request(unsigned char* buf,unsigned int len);
void make_udp_reply_from_request(unsigned char* buf,char* data,unsigned char datalen,unsigned int port);
void make_tcp_synack_from_syn(unsigned char* buf);
void init_len_info(unsigned char* buf);
unsigned int get_tcp_data_pointer(void);
unsigned int fill_tcp_data_p(unsigned char* buf,unsigned int pos, unsigned char* progmem_s);
unsigned int fill_tcp_data(unsigned char* buf,unsigned int pos, const char* s);
void make_tcp_ack_from_any(unsigned char* buf);
void make_tcp_ack_with_data(unsigned char* buf,unsigned int dlen);
void make_arp_request(unsigned char* buf, unsigned char* server_ip);
unsigned char arp_packet_is_myreply_arp ( unsigned char *buf );
void tcp_client_send_packet(unsigned char* buf,unsigned int dest_port, unsigned int src_port, unsigned char flags, unsigned char max_segment_size, 
unsigned char clear_seqck, unsigned int next_ack_num, unsigned int dlength, unsigned char* dest_mac, unsigned char* dest_ip);
unsigned int tcp_get_dlength ( unsigned char* buf );

static unsigned char mymac[6] = {0x00,0x55,0x58,0x10,0x00,0x24}; 
static unsigned char myip[4] = {192,168,1,15};

unsigned int plen;

unsigned char buffer[250+1];

void setup()
{ 
enc28j60Init(mymac);
enc28j60clkout(2); 
delay_ms(10);
enc28j60PhyWrite(0x14,0x880);  
delay_ms(500);
enc28j60PhyWrite(0x14,0x990);  
delay_ms(500);
enc28j60PhyWrite(0x14,0x880);
delay_ms(500);
enc28j60PhyWrite(0x14,0x990);
delay_ms(500);
enc28j60PhyWrite(0x14,0x476);
delay_ms(100);
init_ip_arp_udp_tcp(mymac,myip,80);
}

void main()
{
unsigned int i=0;
(*(unsigned char *) 0x9b)=0x00;(*(unsigned char *) 0x9a)=0x18;(*(unsigned char *) 0x9d)=0x06;(*(unsigned char *) 0x98)=0x00;(*(unsigned char *) 0x99)=0x0C;
PORTD.2=1;PORTD.3=1;
DDRD.3=1;

setup();
DDRD.4=1;
while(1)
{
plen = enc28j60PacketReceive(250, buffer);
if(plen!=0)
{

}

if(plen!=0)
{         
if(eth_type_is_arp_and_my_ip(buffer,plen))
{
make_arp_answer_from_request(buffer);
}

if(eth_type_is_ip_and_my_ip(&buffer[0],plen)!=0)
{
if(buffer[0x17]==0x01 && buffer[0x22]==8)
{

make_echo_reply_from_request(buffer,plen);               
}
} 
}
}  
}