dumped all my old arduino stuff in here.
This commit is contained in:
parent
8cc6f23f59
commit
8f8959b76f
76 changed files with 8127 additions and 2 deletions
|
|
@ -0,0 +1,411 @@
|
|||
#include "etherShield.h"
|
||||
|
||||
// please modify the following lines. mac and ip have to be unique
|
||||
// in your local area network. You can not have the same numbers in
|
||||
// two devices:
|
||||
static uint8_t mymac[6] = {0x54,0x55,0x58,0x10,0x00,0x24};
|
||||
static uint8_t myip[4] = {192,168,1,88};
|
||||
static uint16_t my_port = 1200; // client port
|
||||
|
||||
// client_ip - modify it when you have multiple client on the network
|
||||
// for server to distinguish each ethershield client
|
||||
static char client_ip[] = "192.168.1.88";
|
||||
|
||||
// server settings - modify the service ip to your own server
|
||||
static uint8_t dest_ip[4]={192,168,1,4};
|
||||
static uint8_t dest_mac[6];
|
||||
|
||||
enum CLIENT_STATE
|
||||
{
|
||||
IDLE, ARP_SENT, ARP_REPLY, SYNC_SENT
|
||||
};
|
||||
|
||||
static CLIENT_STATE client_state;
|
||||
|
||||
static uint8_t client_data_ready;
|
||||
|
||||
static uint8_t syn_ack_timeout = 0;
|
||||
|
||||
|
||||
#define BUFFER_SIZE 500
|
||||
static uint8_t buf[BUFFER_SIZE+1];
|
||||
|
||||
char sensorData[10];
|
||||
|
||||
EtherShield es=EtherShield();
|
||||
|
||||
// prepare the webpage by writing the data to the tcp send buffer
|
||||
uint16_t print_webpage(uint8_t *buf);
|
||||
int8_t analyse_cmd(char *str);
|
||||
// get current temperature
|
||||
#define TEMP_PIN 3
|
||||
void getCurrentTemp( char *temperature);
|
||||
void client_process(void);
|
||||
|
||||
void setup(){
|
||||
|
||||
/*initialize enc28j60*/
|
||||
es.ES_enc28j60Init(mymac);
|
||||
es.ES_enc28j60clkout(2); // change clkout from 6.25MHz to 12.5MHz
|
||||
delay(10);
|
||||
|
||||
/* Magjack leds configuration, see enc28j60 datasheet, page 11 */
|
||||
// LEDA=greed LEDB=yellow
|
||||
//
|
||||
// 0x880 is PHLCON LEDB=on, LEDA=on
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 1000 1000 00 00);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x880);
|
||||
delay(500);
|
||||
//
|
||||
// 0x990 is PHLCON LEDB=off, LEDA=off
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 1001 1001 00 00);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x990);
|
||||
delay(500);
|
||||
//
|
||||
// 0x880 is PHLCON LEDB=on, LEDA=on
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 1000 1000 00 00);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x880);
|
||||
delay(500);
|
||||
//
|
||||
// 0x990 is PHLCON LEDB=off, LEDA=off
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 1001 1001 00 00);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x990);
|
||||
delay(500);
|
||||
//
|
||||
// 0x476 is PHLCON LEDA=links status, LEDB=receive/transmit
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 0100 0111 01 10);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x476);
|
||||
delay(100);
|
||||
|
||||
//init the ethernet/ip layer:
|
||||
es.ES_init_ip_arp_udp_tcp(mymac,myip,80);
|
||||
|
||||
// intialize varible;
|
||||
syn_ack_timeout =0;
|
||||
client_data_ready = 0;
|
||||
client_state = IDLE;
|
||||
// initialize DS18B20 datapin
|
||||
digitalWrite(TEMP_PIN, LOW);
|
||||
pinMode(TEMP_PIN, INPUT); // sets the digital pin as input (logic 1)
|
||||
|
||||
|
||||
}
|
||||
|
||||
void loop(){
|
||||
|
||||
if(client_data_ready==0){
|
||||
delay(60000UL); // delay 60s
|
||||
getCurrentTemp(sensorData);
|
||||
client_data_ready = 1;
|
||||
}
|
||||
client_process();
|
||||
|
||||
}
|
||||
|
||||
uint16_t gen_client_request(uint8_t *buf )
|
||||
{
|
||||
uint16_t plen;
|
||||
byte i;
|
||||
|
||||
plen= es.ES_fill_tcp_data_p(buf,0, PSTR ( "GET /ethershield_log/save.php?pwd=secret&client=" ) );
|
||||
for(i=0; client_ip[i]!='\0'; i++){
|
||||
buf[TCP_DATA_P+plen]=client_ip[i];
|
||||
plen++;
|
||||
}
|
||||
plen= es.ES_fill_tcp_data_p(buf,plen, PSTR ( "&status=temperature-" ) );
|
||||
for(i=0; sensorData[i]!='\0'; i++){
|
||||
|
||||
buf[TCP_DATA_P+plen]=sensorData[i];
|
||||
plen++;
|
||||
}
|
||||
|
||||
|
||||
plen= es.ES_fill_tcp_data_p(buf, plen, PSTR ( " HTTP/1.0\r\n" ));
|
||||
plen= es.ES_fill_tcp_data_p(buf, plen, PSTR ( "Host: 192.168.1.4\r\n" ));
|
||||
plen= es.ES_fill_tcp_data_p(buf, plen, PSTR ( "User-Agent: AVR ethernet\r\n" ));
|
||||
plen= es.ES_fill_tcp_data_p(buf, plen, PSTR ( "Accept: text/html\r\n" ));
|
||||
plen= es.ES_fill_tcp_data_p(buf, plen, PSTR ( "Keep-Alive: 300\r\n" ));
|
||||
plen= es.ES_fill_tcp_data_p(buf, plen, PSTR ( "Connection: keep-alive\r\n\r\n" ));
|
||||
|
||||
return plen;
|
||||
}
|
||||
|
||||
//*****************************************************************************************
|
||||
//
|
||||
// Function : client_process
|
||||
// Description : send temparature to web server, this option is disabled by default.
|
||||
// YOU MUST install webserver and server script before enable this option,
|
||||
// I recommented Apache webserver and PHP script.
|
||||
// More detail about Apache and PHP installation please visit http://www.avrportal.com/
|
||||
//
|
||||
//*****************************************************************************************
|
||||
void client_process ( void )
|
||||
{
|
||||
uint16_t plen;
|
||||
uint8_t i;
|
||||
|
||||
if (client_data_ready == 0) return; // nothing to send
|
||||
|
||||
if(client_state == IDLE){ // initialize ARP
|
||||
es.ES_make_arp_request(buf, dest_ip);
|
||||
|
||||
client_state = ARP_SENT;
|
||||
return;
|
||||
}
|
||||
|
||||
|
||||
if(client_state == ARP_SENT){
|
||||
|
||||
plen = es.ES_enc28j60PacketReceive(BUFFER_SIZE, buf);
|
||||
|
||||
// destination ip address was found on network
|
||||
if ( plen!=0 )
|
||||
{
|
||||
if ( es.ES_arp_packet_is_myreply_arp ( buf ) ){
|
||||
client_state = ARP_REPLY;
|
||||
syn_ack_timeout=0;
|
||||
return;
|
||||
}
|
||||
|
||||
}
|
||||
delay(10);
|
||||
syn_ack_timeout++;
|
||||
|
||||
|
||||
if(syn_ack_timeout== 100) { //timeout, server ip not found
|
||||
client_state = IDLE;
|
||||
client_data_ready =0;
|
||||
syn_ack_timeout=0;
|
||||
return;
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
||||
// send SYN packet to initial connection
|
||||
if(client_state == ARP_REPLY){
|
||||
// save dest mac
|
||||
for(i=0; i<6; i++){
|
||||
dest_mac[i] = buf[ETH_SRC_MAC+i];
|
||||
}
|
||||
|
||||
es.ES_tcp_client_send_packet (
|
||||
buf,
|
||||
80,
|
||||
1200,
|
||||
TCP_FLAG_SYN_V, // flag
|
||||
1, // (bool)maximum segment size
|
||||
1, // (bool)clear sequence ack number
|
||||
0, // 0=use old seq, seqack : 1=new seq,seqack no data : new seq,seqack with data
|
||||
0, // tcp data length
|
||||
dest_mac,
|
||||
dest_ip
|
||||
);
|
||||
|
||||
client_state = SYNC_SENT;
|
||||
}
|
||||
// get new packet
|
||||
if(client_state == SYNC_SENT){
|
||||
plen = es.ES_enc28j60PacketReceive(BUFFER_SIZE, buf);
|
||||
|
||||
// no new packet incoming
|
||||
if ( plen == 0 )
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
// check ip packet send to avr or not?
|
||||
// accept ip packet only
|
||||
if ( es.ES_eth_type_is_ip_and_my_ip(buf,plen)==0){
|
||||
return;
|
||||
}
|
||||
|
||||
// check SYNACK flag, after AVR send SYN server response by send SYNACK to AVR
|
||||
if ( buf [ TCP_FLAGS_P ] == ( TCP_FLAG_SYN_V | TCP_FLAG_ACK_V ) )
|
||||
{
|
||||
|
||||
// send ACK to answer SYNACK
|
||||
|
||||
es.ES_tcp_client_send_packet (
|
||||
buf,
|
||||
80,
|
||||
1200,
|
||||
TCP_FLAG_ACK_V, // flag
|
||||
0, // (bool)maximum segment size
|
||||
0, // (bool)clear sequence ack number
|
||||
1, // 0=use old seq, seqack : 1=new seq,seqack no data : new seq,seqack with data
|
||||
0, // tcp data length
|
||||
dest_mac,
|
||||
dest_ip
|
||||
);
|
||||
// setup http request to server
|
||||
plen = gen_client_request( buf );
|
||||
// send http request packet
|
||||
// send packet with PSHACK
|
||||
es.ES_tcp_client_send_packet (
|
||||
buf,
|
||||
80, // destination port
|
||||
1200, // source port
|
||||
TCP_FLAG_ACK_V | TCP_FLAG_PUSH_V, // flag
|
||||
0, // (bool)maximum segment size
|
||||
0, // (bool)clear sequence ack number
|
||||
0, // 0=use old seq, seqack : 1=new seq,seqack no data : >1 new seq,seqack with data
|
||||
plen, // tcp data length
|
||||
dest_mac,
|
||||
dest_ip
|
||||
);
|
||||
return;
|
||||
}
|
||||
// after AVR send http request to server, server response by send data with PSHACK to AVR
|
||||
// AVR answer by send ACK and FINACK to server
|
||||
if ( buf [ TCP_FLAGS_P ] == (TCP_FLAG_ACK_V|TCP_FLAG_PUSH_V) )
|
||||
{
|
||||
plen = es.ES_tcp_get_dlength( (uint8_t*)&buf );
|
||||
|
||||
// send ACK to answer PSHACK from server
|
||||
es.ES_tcp_client_send_packet (
|
||||
buf,
|
||||
80, // destination port
|
||||
1200, // source port
|
||||
TCP_FLAG_ACK_V, // flag
|
||||
0, // (bool)maximum segment size
|
||||
0, // (bool)clear sequence ack number
|
||||
plen, // 0=use old seq, seqack : 1=new seq,seqack no data : >1 new seq,seqack with data
|
||||
0, // tcp data length
|
||||
dest_mac,
|
||||
dest_ip
|
||||
);;
|
||||
// send finack to disconnect from web server
|
||||
|
||||
es.ES_tcp_client_send_packet (
|
||||
buf,
|
||||
80, // destination port
|
||||
1200, // source port
|
||||
TCP_FLAG_FIN_V|TCP_FLAG_ACK_V, // flag
|
||||
0, // (bool)maximum segment size
|
||||
0, // (bool)clear sequence ack number
|
||||
0, // 0=use old seq, seqack : 1=new seq,seqack no data : >1 new seq,seqack with data
|
||||
0,
|
||||
dest_mac,
|
||||
dest_ip
|
||||
);
|
||||
|
||||
return;
|
||||
|
||||
}
|
||||
// answer FINACK from web server by send ACK to web server
|
||||
if ( buf [ TCP_FLAGS_P ] == (TCP_FLAG_ACK_V|TCP_FLAG_FIN_V) )
|
||||
{
|
||||
// send ACK with seqack = 1
|
||||
es.ES_tcp_client_send_packet(
|
||||
|
||||
buf,
|
||||
80, // destination port
|
||||
1200, // source port
|
||||
TCP_FLAG_ACK_V, // flag
|
||||
0, // (bool)maximum segment size
|
||||
0, // (bool)clear sequence ack number
|
||||
1, // 0=use old seq, seqack : 1=new seq,seqack no data : >1 new seq,seqack with data
|
||||
0,
|
||||
dest_mac,
|
||||
dest_ip
|
||||
);
|
||||
client_state = IDLE; // return to IDLE state
|
||||
client_data_ready =0; // client data sent
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
void OneWireReset(int Pin) // reset. Should improve to act as a presence pulse
|
||||
{
|
||||
digitalWrite(Pin, LOW);
|
||||
pinMode(Pin, OUTPUT); // bring low for 500 us
|
||||
delayMicroseconds(500);
|
||||
pinMode(Pin, INPUT);
|
||||
delayMicroseconds(500);
|
||||
}
|
||||
|
||||
void OneWireOutByte(int Pin, byte d) // output byte d (least sig bit first).
|
||||
{
|
||||
byte n;
|
||||
|
||||
for(n=8; n!=0; n--)
|
||||
{
|
||||
if ((d & 0x01) == 1) // test least sig bit
|
||||
{
|
||||
digitalWrite(Pin, LOW);
|
||||
pinMode(Pin, OUTPUT);
|
||||
delayMicroseconds(5);
|
||||
pinMode(Pin, INPUT);
|
||||
delayMicroseconds(60);
|
||||
}
|
||||
else
|
||||
{
|
||||
digitalWrite(Pin, LOW);
|
||||
pinMode(Pin, OUTPUT);
|
||||
delayMicroseconds(60);
|
||||
pinMode(Pin, INPUT);
|
||||
}
|
||||
|
||||
d=d>>1; // now the next bit is in the least sig bit position.
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
byte OneWireInByte(int Pin) // read byte, least sig byte first
|
||||
{
|
||||
byte d, n, b;
|
||||
|
||||
for (n=0; n<8; n++)
|
||||
{
|
||||
digitalWrite(Pin, LOW);
|
||||
pinMode(Pin, OUTPUT);
|
||||
delayMicroseconds(5);
|
||||
pinMode(Pin, INPUT);
|
||||
delayMicroseconds(5);
|
||||
b = digitalRead(Pin);
|
||||
delayMicroseconds(50);
|
||||
d = (d >> 1) | (b<<7); // shift d to right and insert b in most sig bit position
|
||||
}
|
||||
return(d);
|
||||
}
|
||||
|
||||
|
||||
void getCurrentTemp(char *temp)
|
||||
{
|
||||
int HighByte, LowByte, TReading, Tc_100, sign, whole, fract;
|
||||
|
||||
OneWireReset(TEMP_PIN);
|
||||
OneWireOutByte(TEMP_PIN, 0xcc);
|
||||
OneWireOutByte(TEMP_PIN, 0x44); // perform temperature conversion, strong pullup for one sec
|
||||
|
||||
OneWireReset(TEMP_PIN);
|
||||
OneWireOutByte(TEMP_PIN, 0xcc);
|
||||
OneWireOutByte(TEMP_PIN, 0xbe);
|
||||
|
||||
LowByte = OneWireInByte(TEMP_PIN);
|
||||
HighByte = OneWireInByte(TEMP_PIN);
|
||||
TReading = (HighByte << 8) + LowByte;
|
||||
sign = TReading & 0x8000; // test most sig bit
|
||||
if (sign) // negative
|
||||
{
|
||||
TReading = (TReading ^ 0xffff) + 1; // 2's comp
|
||||
}
|
||||
Tc_100 = (6 * TReading) + TReading / 4; // multiply by (100 * 0.0625) or 6.25
|
||||
|
||||
whole = Tc_100 / 100; // separate off the whole and fractional portions
|
||||
fract = Tc_100 % 100;
|
||||
|
||||
if(sign) temp[0]='-';
|
||||
else temp[0]='+';
|
||||
|
||||
|
||||
temp[1]= (whole-(whole/100)*100)/10 +'0' ;
|
||||
temp[2]= whole-(whole/10)*10 +'0';
|
||||
|
||||
temp[3]='.';
|
||||
temp[4]=fract/10 +'0';
|
||||
temp[5]=fract-(fract/10)*10 +'0';
|
||||
|
||||
temp[6] = '\0';
|
||||
}
|
||||
|
|
@ -0,0 +1,333 @@
|
|||
#include "etherShield.h"
|
||||
/*infrared sensor setting*/
|
||||
#define INFRARED_IN 3
|
||||
#define LED_STATUS 5
|
||||
#define ENABLE_EXTERNAL1_INTERRUPT() ( EIMSK |= ( 1<< INT1 ) )
|
||||
#define DISABLE_EXTERNAL1_INTERRUPT() ( EIMSK &= ~( 1<< INT1 ) )
|
||||
|
||||
// please modify the following lines. mac and ip have to be unique
|
||||
// in your local area network. You can not have the same numbers in
|
||||
// two devices:
|
||||
static uint8_t mymac[6] = {0x54,0x55,0x58,0x10,0x00,0x33};
|
||||
static uint8_t myip[4] = {192,168,1,89};
|
||||
static uint16_t my_port = 1200; // client port
|
||||
|
||||
// client_ip - modify it when you have multiple client on the network
|
||||
// for server to distinguish each ethershield client
|
||||
static char client_ip[] = "192.168.1.89";
|
||||
|
||||
// server settings - modify the service ip to your own server
|
||||
static uint8_t dest_ip[4]={192,168,1,4};
|
||||
static uint8_t dest_mac[6];
|
||||
|
||||
enum CLIENT_STATE
|
||||
{
|
||||
IDLE, ARP_SENT, ARP_REPLY, SYNC_SENT
|
||||
};
|
||||
|
||||
static CLIENT_STATE client_state;
|
||||
|
||||
static uint8_t client_data_ready;
|
||||
|
||||
static uint8_t syn_ack_timeout = 0;
|
||||
|
||||
|
||||
#define BUFFER_SIZE 500
|
||||
static uint8_t buf[BUFFER_SIZE+1];
|
||||
|
||||
|
||||
|
||||
EtherShield es=EtherShield();
|
||||
|
||||
|
||||
void setup(){
|
||||
|
||||
/*initialize enc28j60*/
|
||||
es.ES_enc28j60Init(mymac);
|
||||
es.ES_enc28j60clkout(2); // change clkout from 6.25MHz to 12.5MHz
|
||||
delay(10);
|
||||
|
||||
/* Magjack leds configuration, see enc28j60 datasheet, page 11 */
|
||||
// LEDA=greed LEDB=yellow
|
||||
//
|
||||
// 0x880 is PHLCON LEDB=on, LEDA=on
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 1000 1000 00 00);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x880);
|
||||
delay(500);
|
||||
//
|
||||
// 0x990 is PHLCON LEDB=off, LEDA=off
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 1001 1001 00 00);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x990);
|
||||
delay(500);
|
||||
//
|
||||
// 0x880 is PHLCON LEDB=on, LEDA=on
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 1000 1000 00 00);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x880);
|
||||
delay(500);
|
||||
//
|
||||
// 0x990 is PHLCON LEDB=off, LEDA=off
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 1001 1001 00 00);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x990);
|
||||
delay(500);
|
||||
//
|
||||
// 0x476 is PHLCON LEDA=links status, LEDB=receive/transmit
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 0100 0111 01 10);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x476);
|
||||
delay(100);
|
||||
|
||||
//init the ethernet/ip layer:
|
||||
es.ES_init_ip_arp_udp_tcp(mymac,myip,80);
|
||||
|
||||
// intialize varible;
|
||||
syn_ack_timeout =0;
|
||||
client_data_ready = 0;
|
||||
client_state = IDLE;
|
||||
|
||||
// infrared sensor initialization
|
||||
pinMode(LED_STATUS, OUTPUT); // infrad
|
||||
digitalWrite(LED_STATUS,LOW);
|
||||
|
||||
|
||||
pinMode(INFRARED_IN, INPUT);
|
||||
|
||||
|
||||
ENABLE_EXTERNAL1_INTERRUPT();
|
||||
// tigger at INT1 rising edge
|
||||
EICRA = 0x0c;
|
||||
|
||||
|
||||
SREG|=1<<SREG_I;
|
||||
|
||||
|
||||
}
|
||||
|
||||
void loop(){
|
||||
|
||||
if(client_data_ready==1){
|
||||
DISABLE_EXTERNAL1_INTERRUPT();
|
||||
client_process();
|
||||
digitalWrite(LED_STATUS, HIGH);
|
||||
|
||||
}
|
||||
else{
|
||||
delay(100);
|
||||
ENABLE_EXTERNAL1_INTERRUPT();
|
||||
digitalWrite(LED_STATUS, LOW);
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
ISR(INT1_vect) {
|
||||
client_data_ready= 1;
|
||||
}
|
||||
|
||||
|
||||
uint16_t gen_client_request(uint8_t *buf )
|
||||
{
|
||||
uint16_t plen;
|
||||
byte i;
|
||||
|
||||
plen= es.ES_fill_tcp_data_p(buf,0, PSTR ( "GET /ethershield_log/save.php?pwd=secret&client=" ) );
|
||||
for(i=0; client_ip[i]!='\0'; i++){
|
||||
buf[TCP_DATA_P+plen]=client_ip[i];
|
||||
plen++;
|
||||
}
|
||||
plen= es.ES_fill_tcp_data_p(buf,plen, PSTR ( "&status=Infrared_ON" ) );
|
||||
|
||||
|
||||
plen= es.ES_fill_tcp_data_p(buf, plen, PSTR ( " HTTP/1.0\r\n" ));
|
||||
plen= es.ES_fill_tcp_data_p(buf, plen, PSTR ( "Host: 192.168.1.4\r\n" ));
|
||||
plen= es.ES_fill_tcp_data_p(buf, plen, PSTR ( "User-Agent: AVR ethernet\r\n" ));
|
||||
plen= es.ES_fill_tcp_data_p(buf, plen, PSTR ( "Accept: text/html\r\n" ));
|
||||
plen= es.ES_fill_tcp_data_p(buf, plen, PSTR ( "Keep-Alive: 300\r\n" ));
|
||||
plen= es.ES_fill_tcp_data_p(buf, plen, PSTR ( "Connection: keep-alive\r\n\r\n" ));
|
||||
|
||||
return plen;
|
||||
}
|
||||
|
||||
//*****************************************************************************************
|
||||
//
|
||||
// Function : client_process
|
||||
// Description : send temparature to web server, this option is disabled by default.
|
||||
// YOU MUST install webserver and server script before enable this option,
|
||||
// I recommented Apache webserver and PHP script.
|
||||
// More detail about Apache and PHP installation please visit http://www.avrportal.com/
|
||||
//
|
||||
//*****************************************************************************************
|
||||
void client_process ( void )
|
||||
{
|
||||
uint16_t plen;
|
||||
uint8_t i;
|
||||
|
||||
if (client_data_ready == 0) return; // nothing to send
|
||||
|
||||
if(client_state == IDLE){ // initialize ARP
|
||||
es.ES_make_arp_request(buf, dest_ip);
|
||||
|
||||
client_state = ARP_SENT;
|
||||
return;
|
||||
}
|
||||
|
||||
|
||||
if(client_state == ARP_SENT){
|
||||
|
||||
plen = es.ES_enc28j60PacketReceive(BUFFER_SIZE, buf);
|
||||
|
||||
// destination ip address was found on network
|
||||
if ( plen!=0 )
|
||||
{
|
||||
if ( es.ES_arp_packet_is_myreply_arp ( buf ) ){
|
||||
client_state = ARP_REPLY;
|
||||
syn_ack_timeout=0;
|
||||
return;
|
||||
}
|
||||
|
||||
}
|
||||
delay(10);
|
||||
syn_ack_timeout++;
|
||||
|
||||
|
||||
if(syn_ack_timeout== 100) { //timeout, server ip not found
|
||||
client_state = IDLE;
|
||||
client_data_ready =0;
|
||||
syn_ack_timeout=0;
|
||||
return;
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
||||
// send SYN packet to initial connection
|
||||
if(client_state == ARP_REPLY){
|
||||
// save dest mac
|
||||
for(i=0; i<6; i++){
|
||||
dest_mac[i] = buf[ETH_SRC_MAC+i];
|
||||
}
|
||||
|
||||
es.ES_tcp_client_send_packet (
|
||||
buf,
|
||||
80,
|
||||
1200,
|
||||
TCP_FLAG_SYN_V, // flag
|
||||
1, // (bool)maximum segment size
|
||||
1, // (bool)clear sequence ack number
|
||||
0, // 0=use old seq, seqack : 1=new seq,seqack no data : new seq,seqack with data
|
||||
0, // tcp data length
|
||||
dest_mac,
|
||||
dest_ip
|
||||
);
|
||||
|
||||
client_state = SYNC_SENT;
|
||||
}
|
||||
// get new packet
|
||||
if(client_state == SYNC_SENT){
|
||||
plen = es.ES_enc28j60PacketReceive(BUFFER_SIZE, buf);
|
||||
|
||||
// no new packet incoming
|
||||
if ( plen == 0 )
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
// check ip packet send to avr or not?
|
||||
// accept ip packet only
|
||||
if ( es.ES_eth_type_is_ip_and_my_ip(buf,plen)==0){
|
||||
return;
|
||||
}
|
||||
|
||||
// check SYNACK flag, after AVR send SYN server response by send SYNACK to AVR
|
||||
if ( buf [ TCP_FLAGS_P ] == ( TCP_FLAG_SYN_V | TCP_FLAG_ACK_V ) )
|
||||
{
|
||||
|
||||
// send ACK to answer SYNACK
|
||||
|
||||
es.ES_tcp_client_send_packet (
|
||||
buf,
|
||||
80,
|
||||
1200,
|
||||
TCP_FLAG_ACK_V, // flag
|
||||
0, // (bool)maximum segment size
|
||||
0, // (bool)clear sequence ack number
|
||||
1, // 0=use old seq, seqack : 1=new seq,seqack no data : new seq,seqack with data
|
||||
0, // tcp data length
|
||||
dest_mac,
|
||||
dest_ip
|
||||
);
|
||||
// setup http request to server
|
||||
plen = gen_client_request( buf );
|
||||
// send http request packet
|
||||
// send packet with PSHACK
|
||||
es.ES_tcp_client_send_packet (
|
||||
buf,
|
||||
80, // destination port
|
||||
1200, // source port
|
||||
TCP_FLAG_ACK_V | TCP_FLAG_PUSH_V, // flag
|
||||
0, // (bool)maximum segment size
|
||||
0, // (bool)clear sequence ack number
|
||||
0, // 0=use old seq, seqack : 1=new seq,seqack no data : >1 new seq,seqack with data
|
||||
plen, // tcp data length
|
||||
dest_mac,
|
||||
dest_ip
|
||||
);
|
||||
return;
|
||||
}
|
||||
// after AVR send http request to server, server response by send data with PSHACK to AVR
|
||||
// AVR answer by send ACK and FINACK to server
|
||||
if ( buf [ TCP_FLAGS_P ] == (TCP_FLAG_ACK_V|TCP_FLAG_PUSH_V) )
|
||||
{
|
||||
plen = es.ES_tcp_get_dlength( (uint8_t*)&buf );
|
||||
|
||||
// send ACK to answer PSHACK from server
|
||||
es.ES_tcp_client_send_packet (
|
||||
buf,
|
||||
80, // destination port
|
||||
1200, // source port
|
||||
TCP_FLAG_ACK_V, // flag
|
||||
0, // (bool)maximum segment size
|
||||
0, // (bool)clear sequence ack number
|
||||
plen, // 0=use old seq, seqack : 1=new seq,seqack no data : >1 new seq,seqack with data
|
||||
0, // tcp data length
|
||||
dest_mac,
|
||||
dest_ip
|
||||
);;
|
||||
// send finack to disconnect from web server
|
||||
|
||||
es.ES_tcp_client_send_packet (
|
||||
buf,
|
||||
80, // destination port
|
||||
1200, // source port
|
||||
TCP_FLAG_FIN_V|TCP_FLAG_ACK_V, // flag
|
||||
0, // (bool)maximum segment size
|
||||
0, // (bool)clear sequence ack number
|
||||
0, // 0=use old seq, seqack : 1=new seq,seqack no data : >1 new seq,seqack with data
|
||||
0,
|
||||
dest_mac,
|
||||
dest_ip
|
||||
);
|
||||
|
||||
return;
|
||||
|
||||
}
|
||||
// answer FINACK from web server by send ACK to web server
|
||||
if ( buf [ TCP_FLAGS_P ] == (TCP_FLAG_ACK_V|TCP_FLAG_FIN_V) )
|
||||
{
|
||||
// send ACK with seqack = 1
|
||||
es.ES_tcp_client_send_packet(
|
||||
|
||||
buf,
|
||||
80, // destination port
|
||||
1200, // source port
|
||||
TCP_FLAG_ACK_V, // flag
|
||||
0, // (bool)maximum segment size
|
||||
0, // (bool)clear sequence ack number
|
||||
1, // 0=use old seq, seqack : 1=new seq,seqack no data : >1 new seq,seqack with data
|
||||
0,
|
||||
dest_mac,
|
||||
dest_ip
|
||||
);
|
||||
client_state = IDLE; // return to IDLE state
|
||||
client_data_ready =0; // client data sent
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
239
libraries/etherShield/examples/etherShield_ping/Makefile
Normal file
239
libraries/etherShield/examples/etherShield_ping/Makefile
Normal file
|
|
@ -0,0 +1,239 @@
|
|||
# Arduino makefile
|
||||
#
|
||||
# This makefile allows you to build sketches from the command line
|
||||
# without the Arduino environment (or Java).
|
||||
#
|
||||
# The Arduino environment does preliminary processing on a sketch before
|
||||
# compiling it. If you're using this makefile instead, you'll need to do
|
||||
# a few things differently:
|
||||
#
|
||||
# - Give your program's file a .cpp extension (e.g. foo.cpp).
|
||||
#
|
||||
# - Put this line at top of your code: #include <WProgram.h>
|
||||
#
|
||||
# - Write prototypes for all your functions (or define them before you
|
||||
# call them). A prototype declares the types of parameters a
|
||||
# function will take and what type of value it will return. This
|
||||
# means that you can have a call to a function before the definition
|
||||
# of the function. A function prototype looks like the first line of
|
||||
# the function, with a semi-colon at the end. For example:
|
||||
# int digitalRead(int pin);
|
||||
#
|
||||
# - Write a main() function for your program that returns an int, calls
|
||||
# init() and setup() once (in that order), and then calls loop()
|
||||
# repeatedly():
|
||||
#
|
||||
# int main()
|
||||
# {
|
||||
# init();
|
||||
# setup();
|
||||
#
|
||||
# for (;;)
|
||||
# loop();
|
||||
#
|
||||
# return 0;
|
||||
# }
|
||||
#
|
||||
# Instructions for using the makefile:
|
||||
#
|
||||
# 1. Copy this file into the folder with your sketch.
|
||||
#
|
||||
# 2. Below, modify the line containing "TARGET" to refer to the name of
|
||||
# of your program's file without an extension (e.g. TARGET = foo).
|
||||
#
|
||||
# 3. Modify the line containg "ARDUINO" to point the directory that
|
||||
# contains the Arduino core (for normal Arduino installations, this
|
||||
# is the hardware/cores/arduino sub-directory).
|
||||
#
|
||||
# 4. Modify the line containing "PORT" to refer to the filename
|
||||
# representing the USB or serial connection to your Arduino board
|
||||
# (e.g. PORT = /dev/tty.USB0). If the exact name of this file
|
||||
# changes, you can use * as a wildcard (e.g. PORT = /dev/tty.USB*).
|
||||
#
|
||||
# 5. At the command line, change to the directory containing your
|
||||
# program's file and the makefile.
|
||||
#
|
||||
# 6. Type "make" and press enter to compile/verify your program.
|
||||
#
|
||||
# 7. Type "make upload", reset your Arduino board, and press enter to
|
||||
# upload your program to the Arduino board.
|
||||
#
|
||||
# $Id$
|
||||
|
||||
PORT = /dev/tty.usbserial*
|
||||
TARGET = foo
|
||||
ARDUINO = arduino
|
||||
SRC = $(ARDUINO)/pins_arduino.c $(ARDUINO)/wiring.c \
|
||||
$(ARDUINO)/wiring_analog.c $(ARDUINO)/wiring_digital.c \
|
||||
$(ARDUINO)/wiring_pulse.c $(ARDUINO)/wiring_serial.c \
|
||||
$(ARDUINO)/wiring_shift.c $(ARDUINO)/WInterrupts.c
|
||||
CXXSRC = $(ARDUINO)/HardwareSerial.cpp $(ARDUINO)/WRandom.cpp
|
||||
MCU = atmega168
|
||||
F_CPU = 16000000
|
||||
FORMAT = ihex
|
||||
UPLOAD_RATE = 19200
|
||||
|
||||
# Name of this Makefile (used for "make depend").
|
||||
MAKEFILE = Makefile
|
||||
|
||||
# Debugging format.
|
||||
# Native formats for AVR-GCC's -g are stabs [default], or dwarf-2.
|
||||
# AVR (extended) COFF requires stabs, plus an avr-objcopy run.
|
||||
DEBUG = stabs
|
||||
|
||||
OPT = s
|
||||
|
||||
# Place -D or -U options here
|
||||
CDEFS = -DF_CPU=$(F_CPU)
|
||||
CXXDEFS = -DF_CPU=$(F_CPU)
|
||||
|
||||
# Place -I options here
|
||||
CINCS = -I$(ARDUINO)
|
||||
CXXINCS = -I$(ARDUINO)
|
||||
|
||||
# Compiler flag to set the C Standard level.
|
||||
# c89 - "ANSI" C
|
||||
# gnu89 - c89 plus GCC extensions
|
||||
# c99 - ISO C99 standard (not yet fully implemented)
|
||||
# gnu99 - c99 plus GCC extensions
|
||||
CSTANDARD = -std=gnu99
|
||||
CDEBUG = -g$(DEBUG)
|
||||
CWARN = -Wall -Wstrict-prototypes
|
||||
CTUNING = -funsigned-char -funsigned-bitfields -fpack-struct -fshort-enums
|
||||
#CEXTRA = -Wa,-adhlns=$(<:.c=.lst)
|
||||
|
||||
CFLAGS = $(CDEBUG) $(CDEFS) $(CINCS) -O$(OPT) $(CWARN) $(CSTANDARD) $(CEXTRA)
|
||||
CXXFLAGS = $(CDEFS) $(CINCS) -O$(OPT)
|
||||
#ASFLAGS = -Wa,-adhlns=$(<:.S=.lst),-gstabs
|
||||
LDFLAGS = -lm
|
||||
|
||||
|
||||
# Programming support using avrdude. Settings and variables.
|
||||
AVRDUDE_PROGRAMMER = stk500
|
||||
AVRDUDE_PORT = $(PORT)
|
||||
AVRDUDE_WRITE_FLASH = -U flash:w:$(TARGET).hex
|
||||
AVRDUDE_FLAGS = -F -p $(MCU) -P $(AVRDUDE_PORT) -c $(AVRDUDE_PROGRAMMER) \
|
||||
-b $(UPLOAD_RATE)
|
||||
|
||||
# Program settings
|
||||
CC = avr-gcc
|
||||
CXX = avr-g++
|
||||
OBJCOPY = avr-objcopy
|
||||
OBJDUMP = avr-objdump
|
||||
AR = avr-ar
|
||||
SIZE = avr-size
|
||||
NM = avr-nm
|
||||
AVRDUDE = avrdude
|
||||
REMOVE = rm -f
|
||||
MV = mv -f
|
||||
|
||||
# Define all object files.
|
||||
OBJ = $(SRC:.c=.o) $(CXXSRC:.cpp=.o) $(ASRC:.S=.o)
|
||||
|
||||
# Define all listing files.
|
||||
LST = $(ASRC:.S=.lst) $(CXXSRC:.cpp=.lst) $(SRC:.c=.lst)
|
||||
|
||||
# Combine all necessary flags and optional flags.
|
||||
# Add target processor to flags.
|
||||
ALL_CFLAGS = -mmcu=$(MCU) -I. $(CFLAGS)
|
||||
ALL_CXXFLAGS = -mmcu=$(MCU) -I. $(CXXFLAGS)
|
||||
ALL_ASFLAGS = -mmcu=$(MCU) -I. -x assembler-with-cpp $(ASFLAGS)
|
||||
|
||||
|
||||
# Default target.
|
||||
all: build
|
||||
|
||||
build: elf hex
|
||||
|
||||
elf: $(TARGET).elf
|
||||
hex: $(TARGET).hex
|
||||
eep: $(TARGET).eep
|
||||
lss: $(TARGET).lss
|
||||
sym: $(TARGET).sym
|
||||
|
||||
# Program the device.
|
||||
upload: $(TARGET).hex
|
||||
$(AVRDUDE) $(AVRDUDE_FLAGS) $(AVRDUDE_WRITE_FLASH)
|
||||
|
||||
|
||||
|
||||
|
||||
# Convert ELF to COFF for use in debugging / simulating in AVR Studio or VMLAB.
|
||||
COFFCONVERT=$(OBJCOPY) --debugging \
|
||||
--change-section-address .data-0x800000 \
|
||||
--change-section-address .bss-0x800000 \
|
||||
--change-section-address .noinit-0x800000 \
|
||||
--change-section-address .eeprom-0x810000
|
||||
|
||||
|
||||
coff: $(TARGET).elf
|
||||
$(COFFCONVERT) -O coff-avr $(TARGET).elf $(TARGET).cof
|
||||
|
||||
|
||||
extcoff: $(TARGET).elf
|
||||
$(COFFCONVERT) -O coff-ext-avr $(TARGET).elf $(TARGET).cof
|
||||
|
||||
|
||||
.SUFFIXES: .elf .hex .eep .lss .sym
|
||||
|
||||
.elf.hex:
|
||||
$(OBJCOPY) -O $(FORMAT) -R .eeprom $< $@
|
||||
|
||||
.elf.eep:
|
||||
-$(OBJCOPY) -j .eeprom --set-section-flags=.eeprom="alloc,load" \
|
||||
--change-section-lma .eeprom=0 -O $(FORMAT) $< $@
|
||||
|
||||
# Create extended listing file from ELF output file.
|
||||
.elf.lss:
|
||||
$(OBJDUMP) -h -S $< > $@
|
||||
|
||||
# Create a symbol table from ELF output file.
|
||||
.elf.sym:
|
||||
$(NM) -n $< > $@
|
||||
|
||||
|
||||
core.a: $(OBJ)
|
||||
@for i in $(OBJ); do echo $(AR) rcs core.a $$i; $(AR) rcs core.a $$i; done
|
||||
|
||||
# Link: create ELF output file from library.
|
||||
$(TARGET).elf: core.a
|
||||
$(CC) $(ALL_CFLAGS) -o $@ $(TARGET).cpp -L. core.a $(LDFLAGS) -Map=$(TARGET).map
|
||||
|
||||
# Compile: create object files from C++ source files.
|
||||
.cpp.o:
|
||||
$(CXX) -c $(ALL_CXXFLAGS) $< -o $@
|
||||
|
||||
# Compile: create object files from C source files.
|
||||
.c.o:
|
||||
$(CC) -c $(ALL_CFLAGS) $< -o $@
|
||||
|
||||
|
||||
# Compile: create assembler files from C source files.
|
||||
.c.s:
|
||||
$(CC) -S $(ALL_CFLAGS) $< -o $@
|
||||
|
||||
|
||||
# Assemble: create object files from assembler source files.
|
||||
.S.o:
|
||||
$(CC) -c $(ALL_ASFLAGS) $< -o $@
|
||||
|
||||
|
||||
|
||||
# Target: clean project.
|
||||
clean:
|
||||
$(REMOVE) $(TARGET).hex $(TARGET).eep $(TARGET).cof $(TARGET).elf \
|
||||
$(TARGET).map $(TARGET).sym $(TARGET).lss core.a \
|
||||
$(OBJ) $(LST) $(SRC:.c=.s) $(SRC:.c=.d) $(CXXSRC:.cpp=.s) $(CXXSRC:.cpp=.d)
|
||||
|
||||
depend:
|
||||
if grep '^# DO NOT DELETE' $(MAKEFILE) >/dev/null; \
|
||||
then \
|
||||
sed -e '/^# DO NOT DELETE/,$$d' $(MAKEFILE) > \
|
||||
$(MAKEFILE).$$$$ && \
|
||||
$(MV) $(MAKEFILE).$$$$ $(MAKEFILE); \
|
||||
fi
|
||||
echo '# DO NOT DELETE THIS LINE -- make depend depends on it.' \
|
||||
>> $(MAKEFILE); \
|
||||
$(CC) -M -mmcu=$(MCU) $(CDEFS) $(CINCS) $(SRC) $(ASRC) >> $(MAKEFILE)
|
||||
|
||||
.PHONY: all build elf hex eep lss sym program coff extcoff clean depend
|
||||
|
|
@ -0,0 +1,87 @@
|
|||
#include "etherShield.h"
|
||||
|
||||
// please modify the following two lines. mac and ip have to be unique
|
||||
// in your local area network. You can not have the same numbers in
|
||||
// two devices:
|
||||
static uint8_t mymac[6] = {
|
||||
0x54,0x55,0x58,0x10,0x00,0x24};
|
||||
static uint8_t myip[4] = {
|
||||
192,168,1,15};
|
||||
// how did I get the mac addr? Translate the first 3 numbers into ascii is: TUX
|
||||
|
||||
#define BUFFER_SIZE 250
|
||||
unsigned char buf[BUFFER_SIZE+1];
|
||||
|
||||
uint16_t plen;
|
||||
|
||||
EtherShield es=EtherShield();
|
||||
|
||||
|
||||
void setup(){
|
||||
|
||||
|
||||
|
||||
/*initialize enc28j60*/
|
||||
es.ES_enc28j60Init(mymac);
|
||||
es.ES_enc28j60clkout(2); // change clkout from 6.25MHz to 12.5MHz
|
||||
|
||||
delay(10);
|
||||
|
||||
/* Magjack leds configuration, see enc28j60 datasheet, page 11 */
|
||||
// LEDA=green LEDB=yellow
|
||||
//
|
||||
// 0x880 is PHLCON LEDB=on, LEDA=on
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 1000 1000 00 00);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x880);
|
||||
delay(500);
|
||||
|
||||
//
|
||||
// 0x990 is PHLCON LEDB=off, LEDA=off
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 1001 1001 00 00);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x990);
|
||||
delay(500);
|
||||
|
||||
//
|
||||
// 0x880 is PHLCON LEDB=on, LEDA=on
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 1000 1000 00 00);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x880);
|
||||
delay(500);
|
||||
|
||||
//
|
||||
// 0x990 is PHLCON LEDB=off, LEDA=off
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 1001 1001 00 00);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x990);
|
||||
delay(500);
|
||||
|
||||
//
|
||||
// 0x476 is PHLCON LEDA=links status, LEDB=receive/transmit
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 0100 0111 01 10);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x476);
|
||||
delay(100);
|
||||
|
||||
//init the ethernet/ip layer:
|
||||
es.ES_init_ip_arp_udp_tcp(mymac,myip,80);
|
||||
|
||||
|
||||
}
|
||||
|
||||
void loop(){
|
||||
|
||||
plen = es.ES_enc28j60PacketReceive(BUFFER_SIZE, buf);
|
||||
|
||||
/*plen will be unequal to zero if there is a valid packet (without crc error) */
|
||||
if(plen!=0){
|
||||
if(es.ES_eth_type_is_arp_and_my_ip(buf,plen)){
|
||||
es.ES_make_arp_answer_from_request(buf);
|
||||
}
|
||||
// check if ip packets (icmp or udp) are for us:
|
||||
if(es.ES_eth_type_is_ip_and_my_ip(buf,plen)!=0){
|
||||
if(buf[IP_PROTO_P]==IP_PROTO_ICMP_V && buf[ICMP_TYPE_P]==ICMP_TYPE_ECHOREQUEST_V){
|
||||
// a ping packet, let's send pong
|
||||
|
||||
es.ES_make_echo_reply_from_request(buf,plen);
|
||||
}
|
||||
}
|
||||
|
||||
}
|
||||
}
|
||||
|
|
@ -0,0 +1,229 @@
|
|||
#include "etherShield.h"
|
||||
|
||||
|
||||
// please modify the following two lines. mac and ip have to be unique
|
||||
// in your local area network. You can not have the same numbers in
|
||||
// two devices:
|
||||
static uint8_t mymac[6] = {0x54,0x55,0x58,0x10,0x00,0x24};
|
||||
static uint8_t myip[4] = {192,168,1,15};
|
||||
static char baseurl[]="http://192.168.1.15/";
|
||||
static uint16_t mywwwport =80; // listen port for tcp/www (max range 1-254)
|
||||
|
||||
|
||||
|
||||
#define BUFFER_SIZE 500
|
||||
static uint8_t buf[BUFFER_SIZE+1];
|
||||
#define STR_BUFFER_SIZE 22
|
||||
static char strbuf[STR_BUFFER_SIZE+1];
|
||||
|
||||
EtherShield es=EtherShield();
|
||||
|
||||
// prepare the webpage by writing the data to the tcp send buffer
|
||||
uint16_t print_webpage(uint8_t *buf, byte on_off);
|
||||
int8_t analyse_cmd(char *str);
|
||||
|
||||
// LED cathode connects the Pin4, anode to 5V through 1K resistor
|
||||
#define LED_PIN 4
|
||||
|
||||
|
||||
void setup(){
|
||||
|
||||
/*initialize enc28j60*/
|
||||
es.ES_enc28j60Init(mymac);
|
||||
es.ES_enc28j60clkout(2); // change clkout from 6.25MHz to 12.5MHz
|
||||
delay(10);
|
||||
|
||||
/* Magjack leds configuration, see enc28j60 datasheet, page 11 */
|
||||
// LEDA=greed LEDB=yellow
|
||||
//
|
||||
// 0x880 is PHLCON LEDB=on, LEDA=on
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 1000 1000 00 00);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x880);
|
||||
delay(500);
|
||||
//
|
||||
// 0x990 is PHLCON LEDB=off, LEDA=off
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 1001 1001 00 00);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x990);
|
||||
delay(500);
|
||||
//
|
||||
// 0x880 is PHLCON LEDB=on, LEDA=on
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 1000 1000 00 00);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x880);
|
||||
delay(500);
|
||||
//
|
||||
// 0x990 is PHLCON LEDB=off, LEDA=off
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 1001 1001 00 00);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x990);
|
||||
delay(500);
|
||||
//
|
||||
// 0x476 is PHLCON LEDA=links status, LEDB=receive/transmit
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 0100 0111 01 10);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x476);
|
||||
delay(100);
|
||||
|
||||
//init the ethernet/ip layer:
|
||||
es.ES_init_ip_arp_udp_tcp(mymac,myip,80);
|
||||
|
||||
pinMode(LED_PIN, OUTPUT);
|
||||
digitalWrite(LED_PIN, LOW); // switch on LED
|
||||
}
|
||||
|
||||
void loop(){
|
||||
uint16_t plen, dat_p;
|
||||
int8_t cmd;
|
||||
byte on_off = 1;
|
||||
|
||||
plen = es.ES_enc28j60PacketReceive(BUFFER_SIZE, buf);
|
||||
|
||||
/*plen will ne unequal to zero if there is a valid packet (without crc error) */
|
||||
if(plen!=0){
|
||||
|
||||
// arp is broadcast if unknown but a host may also verify the mac address by sending it to a unicast address.
|
||||
if(es.ES_eth_type_is_arp_and_my_ip(buf,plen)){
|
||||
es.ES_make_arp_answer_from_request(buf);
|
||||
return;
|
||||
}
|
||||
|
||||
// check if ip packets are for us:
|
||||
if(es.ES_eth_type_is_ip_and_my_ip(buf,plen)==0){
|
||||
return;
|
||||
}
|
||||
|
||||
if(buf[IP_PROTO_P]==IP_PROTO_ICMP_V && buf[ICMP_TYPE_P]==ICMP_TYPE_ECHOREQUEST_V){
|
||||
es.ES_make_echo_reply_from_request(buf,plen);
|
||||
return;
|
||||
}
|
||||
|
||||
// tcp port www start, compare only the lower byte
|
||||
if (buf[IP_PROTO_P]==IP_PROTO_TCP_V&&buf[TCP_DST_PORT_H_P]==0&&buf[TCP_DST_PORT_L_P]==mywwwport){
|
||||
if (buf[TCP_FLAGS_P] & TCP_FLAGS_SYN_V){
|
||||
es.ES_make_tcp_synack_from_syn(buf); // make_tcp_synack_from_syn does already send the syn,ack
|
||||
return;
|
||||
}
|
||||
if (buf[TCP_FLAGS_P] & TCP_FLAGS_ACK_V){
|
||||
es.ES_init_len_info(buf); // init some data structures
|
||||
dat_p=es.ES_get_tcp_data_pointer();
|
||||
if (dat_p==0){ // we can possibly have no data, just ack:
|
||||
if (buf[TCP_FLAGS_P] & TCP_FLAGS_FIN_V){
|
||||
es.ES_make_tcp_ack_from_any(buf);
|
||||
}
|
||||
return;
|
||||
}
|
||||
if (strncmp("GET ",(char *)&(buf[dat_p]),4)!=0){
|
||||
// head, post and other methods for possible status codes see:
|
||||
// http://www.w3.org/Protocols/rfc2616/rfc2616-sec10.html
|
||||
plen=es.ES_fill_tcp_data_p(buf,0,PSTR("HTTP/1.0 200 OK\r\nContent-Type: text/html\r\n\r\n<h1>200 OK</h1>"));
|
||||
goto SENDTCP;
|
||||
}
|
||||
if (strncmp("/ ",(char *)&(buf[dat_p+4]),2)==0){
|
||||
plen=print_webpage(buf, on_off);
|
||||
goto SENDTCP;
|
||||
}
|
||||
cmd=analyse_cmd((char *)&(buf[dat_p+5]));
|
||||
|
||||
if (cmd==2){
|
||||
on_off=1;
|
||||
digitalWrite(LED_PIN, LOW); // switch on LED
|
||||
}
|
||||
else if (cmd==3){
|
||||
on_off=0;
|
||||
digitalWrite(LED_PIN, HIGH); // switch off LED
|
||||
}
|
||||
plen=print_webpage(buf, on_off);
|
||||
|
||||
plen=print_webpage(buf, on_off);
|
||||
SENDTCP: es.ES_make_tcp_ack_from_any(buf); // send ack for http get
|
||||
es.ES_make_tcp_ack_with_data(buf,plen); // send data
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
}
|
||||
// The returned value is stored in the global var strbuf
|
||||
uint8_t find_key_val(char *str,char *key)
|
||||
{
|
||||
uint8_t found=0;
|
||||
uint8_t i=0;
|
||||
char *kp;
|
||||
kp=key;
|
||||
while(*str && *str!=' ' && found==0){
|
||||
if (*str == *kp){
|
||||
kp++;
|
||||
if (*kp == '\0'){
|
||||
str++;
|
||||
kp=key;
|
||||
if (*str == '='){
|
||||
found=1;
|
||||
}
|
||||
}
|
||||
}else{
|
||||
kp=key;
|
||||
}
|
||||
str++;
|
||||
}
|
||||
if (found==1){
|
||||
// copy the value to a buffer and terminate it with '\0'
|
||||
while(*str && *str!=' ' && *str!='&' && i<STR_BUFFER_SIZE){
|
||||
strbuf[i]=*str;
|
||||
i++;
|
||||
str++;
|
||||
}
|
||||
strbuf[i]='\0';
|
||||
}
|
||||
return(found);
|
||||
}
|
||||
|
||||
int8_t analyse_cmd(char *str)
|
||||
{
|
||||
int8_t r=-1;
|
||||
|
||||
if (find_key_val(str,"cmd")){
|
||||
if (*strbuf < 0x3a && *strbuf > 0x2f){
|
||||
// is a ASCII number, return it
|
||||
r=(*strbuf-0x30);
|
||||
}
|
||||
}
|
||||
return r;
|
||||
}
|
||||
|
||||
|
||||
uint16_t print_webpage(uint8_t *buf, byte on_off)
|
||||
{
|
||||
|
||||
int i=0;
|
||||
|
||||
|
||||
uint16_t plen;
|
||||
|
||||
|
||||
|
||||
plen=es.ES_fill_tcp_data_p(buf,0,PSTR("HTTP/1.0 200 OK\r\nContent-Type: text/html\r\n\r\n"));
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<center><p><h1>Welcome to Arduino Ethernet Shield V1.0 </h1></p> "));
|
||||
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<hr><br><form METHOD=get action=\""));
|
||||
plen=es.ES_fill_tcp_data(buf,plen,baseurl);
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("\">"));
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<h2> REMOTE LED is </h2> "));
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<h1><font color=\"#00FF00\"> "));
|
||||
|
||||
if(on_off)
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("ON"));
|
||||
else
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("OFF"));
|
||||
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR(" </font></h1><br> ") );
|
||||
|
||||
if(on_off){
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<input type=hidden name=cmd value=3>"));
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<input type=submit value=\"Switch off\"></form>"));
|
||||
}
|
||||
else {
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<input type=hidden name=cmd value=2>"));
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<input type=submit value=\"Switch on\"></form>"));
|
||||
}
|
||||
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("</center><hr> <p> V1.0 <a href=\"http://www.nuelectronics.com\">www.nuelectronics.com<a>"));
|
||||
|
||||
return(plen);
|
||||
}
|
||||
|
||||
|
|
@ -0,0 +1,317 @@
|
|||
#include "etherShield.h"
|
||||
|
||||
// please modify the following two lines. mac and ip have to be unique
|
||||
// in your local area network. You can not have the same numbers in
|
||||
// two devices:
|
||||
static uint8_t mymac[6] = {0x54,0x55,0x58,0x10,0x00,0x24};
|
||||
static uint8_t myip[4] = {192,168,1,15};
|
||||
static char baseurl[]="http://192.168.1.15/";
|
||||
static uint16_t mywwwport =80; // listen port for tcp/www (max range 1-254)
|
||||
// or on a different port:
|
||||
//static char baseurl[]="http://10.0.0.24:88/";
|
||||
//static uint16_t mywwwport =88; // listen port for tcp/www (max range 1-254)
|
||||
//
|
||||
|
||||
|
||||
#define BUFFER_SIZE 500
|
||||
static uint8_t buf[BUFFER_SIZE+1];
|
||||
#define STR_BUFFER_SIZE 22
|
||||
static char strbuf[STR_BUFFER_SIZE+1];
|
||||
|
||||
EtherShield es=EtherShield();
|
||||
|
||||
// prepare the webpage by writing the data to the tcp send buffer
|
||||
uint16_t print_webpage(uint8_t *buf);
|
||||
int8_t analyse_cmd(char *str);
|
||||
// get current temperature
|
||||
#define TEMP_PIN 3
|
||||
void getCurrentTemp( int *sign, int *whole, int *fract);
|
||||
|
||||
void setup(){
|
||||
|
||||
/*initialize enc28j60*/
|
||||
es.ES_enc28j60Init(mymac);
|
||||
es.ES_enc28j60clkout(2); // change clkout from 6.25MHz to 12.5MHz
|
||||
delay(10);
|
||||
|
||||
/* Magjack leds configuration, see enc28j60 datasheet, page 11 */
|
||||
// LEDA=greed LEDB=yellow
|
||||
//
|
||||
// 0x880 is PHLCON LEDB=on, LEDA=on
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 1000 1000 00 00);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x880);
|
||||
delay(500);
|
||||
//
|
||||
// 0x990 is PHLCON LEDB=off, LEDA=off
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 1001 1001 00 00);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x990);
|
||||
delay(500);
|
||||
//
|
||||
// 0x880 is PHLCON LEDB=on, LEDA=on
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 1000 1000 00 00);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x880);
|
||||
delay(500);
|
||||
//
|
||||
// 0x990 is PHLCON LEDB=off, LEDA=off
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 1001 1001 00 00);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x990);
|
||||
delay(500);
|
||||
//
|
||||
// 0x476 is PHLCON LEDA=links status, LEDB=receive/transmit
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 0100 0111 01 10);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x476);
|
||||
delay(100);
|
||||
|
||||
//init the ethernet/ip layer:
|
||||
es.ES_init_ip_arp_udp_tcp(mymac,myip,80);
|
||||
|
||||
// initialize DS18B20 datapin
|
||||
digitalWrite(TEMP_PIN, LOW);
|
||||
pinMode(TEMP_PIN, INPUT); // sets the digital pin as input (logic 1)
|
||||
|
||||
|
||||
}
|
||||
|
||||
void loop(){
|
||||
uint16_t plen, dat_p;
|
||||
int8_t cmd;
|
||||
|
||||
plen = es.ES_enc28j60PacketReceive(BUFFER_SIZE, buf);
|
||||
|
||||
/*plen will ne unequal to zero if there is a valid packet (without crc error) */
|
||||
if(plen!=0){
|
||||
|
||||
// arp is broadcast if unknown but a host may also verify the mac address by sending it to a unicast address.
|
||||
if(es.ES_eth_type_is_arp_and_my_ip(buf,plen)){
|
||||
es.ES_make_arp_answer_from_request(buf);
|
||||
return;
|
||||
}
|
||||
|
||||
// check if ip packets are for us:
|
||||
if(es.ES_eth_type_is_ip_and_my_ip(buf,plen)==0){
|
||||
return;
|
||||
}
|
||||
|
||||
if(buf[IP_PROTO_P]==IP_PROTO_ICMP_V && buf[ICMP_TYPE_P]==ICMP_TYPE_ECHOREQUEST_V){
|
||||
es.ES_make_echo_reply_from_request(buf,plen);
|
||||
return;
|
||||
}
|
||||
|
||||
// tcp port www start, compare only the lower byte
|
||||
if (buf[IP_PROTO_P]==IP_PROTO_TCP_V&&buf[TCP_DST_PORT_H_P]==0&&buf[TCP_DST_PORT_L_P]==mywwwport){
|
||||
if (buf[TCP_FLAGS_P] & TCP_FLAGS_SYN_V){
|
||||
es.ES_make_tcp_synack_from_syn(buf); // make_tcp_synack_from_syn does already send the syn,ack
|
||||
return;
|
||||
}
|
||||
if (buf[TCP_FLAGS_P] & TCP_FLAGS_ACK_V){
|
||||
es.ES_init_len_info(buf); // init some data structures
|
||||
dat_p=es.ES_get_tcp_data_pointer();
|
||||
if (dat_p==0){ // we can possibly have no data, just ack:
|
||||
if (buf[TCP_FLAGS_P] & TCP_FLAGS_FIN_V){
|
||||
es.ES_make_tcp_ack_from_any(buf);
|
||||
}
|
||||
return;
|
||||
}
|
||||
if (strncmp("GET ",(char *)&(buf[dat_p]),4)!=0){
|
||||
// head, post and other methods for possible status codes see:
|
||||
// http://www.w3.org/Protocols/rfc2616/rfc2616-sec10.html
|
||||
plen=es.ES_fill_tcp_data_p(buf,0,PSTR("HTTP/1.0 200 OK\r\nContent-Type: text/html\r\n\r\n<h1>200 OK</h1>"));
|
||||
goto SENDTCP;
|
||||
}
|
||||
if (strncmp("/ ",(char *)&(buf[dat_p+4]),2)==0){
|
||||
plen=print_webpage(buf);
|
||||
goto SENDTCP;
|
||||
}
|
||||
cmd=analyse_cmd((char *)&(buf[dat_p+5]));
|
||||
if (cmd==1){
|
||||
plen=print_webpage(buf);
|
||||
}
|
||||
SENDTCP: es.ES_make_tcp_ack_from_any(buf); // send ack for http get
|
||||
es.ES_make_tcp_ack_with_data(buf,plen); // send data
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
}
|
||||
// The returned value is stored in the global var strbuf
|
||||
uint8_t find_key_val(char *str,char *key)
|
||||
{
|
||||
uint8_t found=0;
|
||||
uint8_t i=0;
|
||||
char *kp;
|
||||
kp=key;
|
||||
while(*str && *str!=' ' && found==0){
|
||||
if (*str == *kp){
|
||||
kp++;
|
||||
if (*kp == '\0'){
|
||||
str++;
|
||||
kp=key;
|
||||
if (*str == '='){
|
||||
found=1;
|
||||
}
|
||||
}
|
||||
}else{
|
||||
kp=key;
|
||||
}
|
||||
str++;
|
||||
}
|
||||
if (found==1){
|
||||
// copy the value to a buffer and terminate it with '\0'
|
||||
while(*str && *str!=' ' && *str!='&' && i<STR_BUFFER_SIZE){
|
||||
strbuf[i]=*str;
|
||||
i++;
|
||||
str++;
|
||||
}
|
||||
strbuf[i]='\0';
|
||||
}
|
||||
return(found);
|
||||
}
|
||||
|
||||
int8_t analyse_cmd(char *str)
|
||||
{
|
||||
int8_t r=-1;
|
||||
|
||||
if (find_key_val(str,"cmd")){
|
||||
if (*strbuf < 0x3a && *strbuf > 0x2f){
|
||||
// is a ASCII number, return it
|
||||
r=(*strbuf-0x30);
|
||||
}
|
||||
}
|
||||
return r;
|
||||
}
|
||||
|
||||
|
||||
uint16_t print_webpage(uint8_t *buf)
|
||||
{
|
||||
char temp_string[10];
|
||||
int i=0;
|
||||
//char *temp_string="100";
|
||||
|
||||
uint16_t plen;
|
||||
|
||||
getCurrentTemp(temp_string);
|
||||
|
||||
plen=es.ES_fill_tcp_data_p(buf,0,PSTR("HTTP/1.0 200 OK\r\nContent-Type: text/html\r\n\r\n"));
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<center><p><h1>Welcome to Arduino Ethernet Shield V1.0 </h1></p> "));
|
||||
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<hr><br><form METHOD=get action=\""));
|
||||
plen=es.ES_fill_tcp_data(buf,plen,baseurl);
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("\">"));
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<h2> Current Temperature is </h2> "));
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<h1><font color=\"#00FF00\"> "));
|
||||
|
||||
|
||||
while (temp_string[i]) {
|
||||
buf[TCP_CHECKSUM_L_P+3+plen]=temp_string[i++];
|
||||
plen++;
|
||||
}
|
||||
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR(" °C</font></h1><br> ") );
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<input type=hidden name=cmd value=1>"));
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<input type=submit value=\"Get Temperature\"></form>"));
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("</center><hr> <p> V1.0 <a href=\"http://www.nuelectronics.com\">www.nuelectronics.com<a>"));
|
||||
|
||||
return(plen);
|
||||
}
|
||||
|
||||
|
||||
void OneWireReset(int Pin) // reset. Should improve to act as a presence pulse
|
||||
{
|
||||
digitalWrite(Pin, LOW);
|
||||
pinMode(Pin, OUTPUT); // bring low for 500 us
|
||||
delayMicroseconds(500);
|
||||
pinMode(Pin, INPUT);
|
||||
delayMicroseconds(500);
|
||||
}
|
||||
|
||||
void OneWireOutByte(int Pin, byte d) // output byte d (least sig bit first).
|
||||
{
|
||||
byte n;
|
||||
|
||||
for(n=8; n!=0; n--)
|
||||
{
|
||||
if ((d & 0x01) == 1) // test least sig bit
|
||||
{
|
||||
digitalWrite(Pin, LOW);
|
||||
pinMode(Pin, OUTPUT);
|
||||
delayMicroseconds(5);
|
||||
pinMode(Pin, INPUT);
|
||||
delayMicroseconds(60);
|
||||
}
|
||||
else
|
||||
{
|
||||
digitalWrite(Pin, LOW);
|
||||
pinMode(Pin, OUTPUT);
|
||||
delayMicroseconds(60);
|
||||
pinMode(Pin, INPUT);
|
||||
}
|
||||
|
||||
d=d>>1; // now the next bit is in the least sig bit position.
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
byte OneWireInByte(int Pin) // read byte, least sig byte first
|
||||
{
|
||||
byte d, n, b;
|
||||
|
||||
for (n=0; n<8; n++)
|
||||
{
|
||||
digitalWrite(Pin, LOW);
|
||||
pinMode(Pin, OUTPUT);
|
||||
delayMicroseconds(5);
|
||||
pinMode(Pin, INPUT);
|
||||
delayMicroseconds(5);
|
||||
b = digitalRead(Pin);
|
||||
delayMicroseconds(50);
|
||||
d = (d >> 1) | (b<<7); // shift d to right and insert b in most sig bit position
|
||||
}
|
||||
return(d);
|
||||
}
|
||||
|
||||
|
||||
void getCurrentTemp(char *temp)
|
||||
{
|
||||
int HighByte, LowByte, TReading, Tc_100, sign, whole, fract;
|
||||
|
||||
OneWireReset(TEMP_PIN);
|
||||
OneWireOutByte(TEMP_PIN, 0xcc);
|
||||
OneWireOutByte(TEMP_PIN, 0x44); // perform temperature conversion, strong pullup for one sec
|
||||
|
||||
OneWireReset(TEMP_PIN);
|
||||
OneWireOutByte(TEMP_PIN, 0xcc);
|
||||
OneWireOutByte(TEMP_PIN, 0xbe);
|
||||
|
||||
LowByte = OneWireInByte(TEMP_PIN);
|
||||
HighByte = OneWireInByte(TEMP_PIN);
|
||||
TReading = (HighByte << 8) + LowByte;
|
||||
sign = TReading & 0x8000; // test most sig bit
|
||||
if (sign) // negative
|
||||
{
|
||||
TReading = (TReading ^ 0xffff) + 1; // 2's comp
|
||||
}
|
||||
Tc_100 = (6 * TReading) + TReading / 4; // multiply by (100 * 0.0625) or 6.25
|
||||
|
||||
whole = Tc_100 / 100; // separate off the whole and fractional portions
|
||||
fract = Tc_100 % 100;
|
||||
|
||||
|
||||
if(sign) temp[0]='-';
|
||||
else temp[0]='+';
|
||||
|
||||
if(whole/100==0)
|
||||
temp[1] =' ';
|
||||
else
|
||||
temp[1]= whole/100+'0';
|
||||
temp[2]= (whole-(whole/100)*100)/10 +'0' ;
|
||||
temp[3]= whole-(whole/10)*10 +'0';
|
||||
|
||||
temp[4]='.';
|
||||
temp[5]=fract/10 +'0';
|
||||
temp[6]=fract-(fract/10)*10 +'0';
|
||||
|
||||
temp[7] = '\0';
|
||||
|
||||
|
||||
|
||||
}
|
||||
|
|
@ -0,0 +1,187 @@
|
|||
#include "etherShield.h"
|
||||
|
||||
// please modify the following two lines. mac and ip have to be unique
|
||||
// in your local area network. You can not have the same numbers in
|
||||
// two devices:
|
||||
static uint8_t mymac[6] = {0x54,0x55,0x58,0x10,0x00,0x24};
|
||||
static uint8_t myip[4] = {192,168,1,15};
|
||||
static char baseurl[]="http://192.168.1.15/";
|
||||
static uint16_t mywwwport =80; // listen port for tcp/www (max range 1-254)
|
||||
// or on a different port:
|
||||
//static char baseurl[]="http://10.0.0.24:88/";
|
||||
//static uint16_t mywwwport =88; // listen port for tcp/www (max range 1-254)
|
||||
//
|
||||
|
||||
#define BUFFER_SIZE 500
|
||||
static uint8_t buf[BUFFER_SIZE+1];
|
||||
#define STR_BUFFER_SIZE 22
|
||||
static char strbuf[STR_BUFFER_SIZE+1];
|
||||
|
||||
EtherShield es=EtherShield();
|
||||
|
||||
// prepare the webpage by writing the data to the tcp send buffer
|
||||
uint16_t print_webpage(uint8_t *buf);
|
||||
int8_t analyse_cmd(char *str);
|
||||
void setup(){
|
||||
|
||||
/*initialize enc28j60*/
|
||||
es.ES_enc28j60Init(mymac);
|
||||
es.ES_enc28j60clkout(2); // change clkout from 6.25MHz to 12.5MHz
|
||||
delay(10);
|
||||
|
||||
/* Magjack leds configuration, see enc28j60 datasheet, page 11 */
|
||||
// LEDA=greed LEDB=yellow
|
||||
//
|
||||
// 0x880 is PHLCON LEDB=on, LEDA=on
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 1000 1000 00 00);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x880);
|
||||
delay(500);
|
||||
//
|
||||
// 0x990 is PHLCON LEDB=off, LEDA=off
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 1001 1001 00 00);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x990);
|
||||
delay(500);
|
||||
//
|
||||
// 0x880 is PHLCON LEDB=on, LEDA=on
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 1000 1000 00 00);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x880);
|
||||
delay(500);
|
||||
//
|
||||
// 0x990 is PHLCON LEDB=off, LEDA=off
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 1001 1001 00 00);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x990);
|
||||
delay(500);
|
||||
//
|
||||
// 0x476 is PHLCON LEDA=links status, LEDB=receive/transmit
|
||||
// enc28j60PhyWrite(PHLCON,0b0000 0100 0111 01 10);
|
||||
es.ES_enc28j60PhyWrite(PHLCON,0x476);
|
||||
delay(100);
|
||||
|
||||
//init the ethernet/ip layer:
|
||||
es.ES_init_ip_arp_udp_tcp(mymac,myip,80);
|
||||
|
||||
|
||||
}
|
||||
|
||||
void loop(){
|
||||
uint16_t plen, dat_p;
|
||||
int8_t cmd;
|
||||
|
||||
plen = es.ES_enc28j60PacketReceive(BUFFER_SIZE, buf);
|
||||
|
||||
/*plen will ne unequal to zero if there is a valid packet (without crc error) */
|
||||
if(plen!=0){
|
||||
|
||||
// arp is broadcast if unknown but a host may also verify the mac address by sending it to a unicast address.
|
||||
if(es.ES_eth_type_is_arp_and_my_ip(buf,plen)){
|
||||
es.ES_make_arp_answer_from_request(buf);
|
||||
return;
|
||||
}
|
||||
|
||||
// check if ip packets are for us:
|
||||
if(es.ES_eth_type_is_ip_and_my_ip(buf,plen)==0){
|
||||
return;
|
||||
}
|
||||
|
||||
if(buf[IP_PROTO_P]==IP_PROTO_ICMP_V && buf[ICMP_TYPE_P]==ICMP_TYPE_ECHOREQUEST_V){
|
||||
es.ES_make_echo_reply_from_request(buf,plen);
|
||||
return;
|
||||
}
|
||||
|
||||
// tcp port www start, compare only the lower byte
|
||||
if (buf[IP_PROTO_P]==IP_PROTO_TCP_V&&buf[TCP_DST_PORT_H_P]==0&&buf[TCP_DST_PORT_L_P]==mywwwport){
|
||||
if (buf[TCP_FLAGS_P] & TCP_FLAGS_SYN_V){
|
||||
es.ES_make_tcp_synack_from_syn(buf); // make_tcp_synack_from_syn does already send the syn,ack
|
||||
return;
|
||||
}
|
||||
if (buf[TCP_FLAGS_P] & TCP_FLAGS_ACK_V){
|
||||
es.ES_init_len_info(buf); // init some data structures
|
||||
dat_p=es.ES_get_tcp_data_pointer();
|
||||
if (dat_p==0){ // we can possibly have no data, just ack:
|
||||
if (buf[TCP_FLAGS_P] & TCP_FLAGS_FIN_V){
|
||||
es.ES_make_tcp_ack_from_any(buf);
|
||||
}
|
||||
return;
|
||||
}
|
||||
if (strncmp("GET ",(char *)&(buf[dat_p]),4)!=0){
|
||||
// head, post and other methods for possible status codes see:
|
||||
// http://www.w3.org/Protocols/rfc2616/rfc2616-sec10.html
|
||||
plen=es.ES_fill_tcp_data_p(buf,0,PSTR("HTTP/1.0 200 OK\r\nContent-Type: text/html\r\n\r\n<h1>200 OK</h1>"));
|
||||
goto SENDTCP;
|
||||
}
|
||||
if (strncmp("/ ",(char *)&(buf[dat_p+4]),2)==0){
|
||||
plen=print_webpage(buf);
|
||||
goto SENDTCP;
|
||||
}
|
||||
cmd=analyse_cmd((char *)&(buf[dat_p+5]));
|
||||
if (cmd==1){
|
||||
plen=print_webpage(buf);
|
||||
}
|
||||
SENDTCP: es.ES_make_tcp_ack_from_any(buf); // send ack for http get
|
||||
es.ES_make_tcp_ack_with_data(buf,plen); // send data
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
}
|
||||
// The returned value is stored in the global var strbuf
|
||||
uint8_t find_key_val(char *str,char *key)
|
||||
{
|
||||
uint8_t found=0;
|
||||
uint8_t i=0;
|
||||
char *kp;
|
||||
kp=key;
|
||||
while(*str && *str!=' ' && found==0){
|
||||
if (*str == *kp){
|
||||
kp++;
|
||||
if (*kp == '\0'){
|
||||
str++;
|
||||
kp=key;
|
||||
if (*str == '='){
|
||||
found=1;
|
||||
}
|
||||
}
|
||||
}else{
|
||||
kp=key;
|
||||
}
|
||||
str++;
|
||||
}
|
||||
if (found==1){
|
||||
// copy the value to a buffer and terminate it with '\0'
|
||||
while(*str && *str!=' ' && *str!='&' && i<STR_BUFFER_SIZE){
|
||||
strbuf[i]=*str;
|
||||
i++;
|
||||
str++;
|
||||
}
|
||||
strbuf[i]='\0';
|
||||
}
|
||||
return(found);
|
||||
}
|
||||
|
||||
int8_t analyse_cmd(char *str)
|
||||
{
|
||||
int8_t r=-1;
|
||||
|
||||
if (find_key_val(str,"cmd")){
|
||||
if (*strbuf < 0x3a && *strbuf > 0x2f){
|
||||
// is a ASCII number, return it
|
||||
r=(*strbuf-0x30);
|
||||
}
|
||||
}
|
||||
return r;
|
||||
}
|
||||
|
||||
|
||||
uint16_t print_webpage(uint8_t *buf)
|
||||
{
|
||||
uint16_t plen;
|
||||
plen=es.ES_fill_tcp_data_p(buf,0,PSTR("HTTP/1.0 200 OK\r\nContent-Type: text/html\r\n\r\n"));
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<center><p><h1>Welcome to Arduino Ethernet Shield V1.0 </h1></p> "));
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<hr><br> <h2><font color=\"blue\">-- Put your ARDUINO online -- "));
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<br> Control digital outputs "));
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<br> Read digital analog inputs HERE "));
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR(" <br></font></h2> ") );
|
||||
plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("</center><hr> V1.0 <a href=\"http://www.nuelectronics.com\">www.nuelectronics.com<a>"));
|
||||
|
||||
return(plen);
|
||||
}
|
||||
Loading…
Add table
Add a link
Reference in a new issue