Go Down

Topic: Domo'Duino, la domotique par Arduino (NEWS: Modules 2.4ghz ) (Read 112501 times) previous topic - next topic

chesnel

Je suis vraiment désolé pour toi que tu bloques totalement... personnellement je suis aussi sur des petits projets similaire pour contrôler à distance mon arduino. mais en vus que tu utilises une version chinoise de l'ethernet shield il est difficile pour moi d'aider. Et si je peux me permettre, oui la version officiel coûte plus cher mais tu aurais certainement eu moins de trouble et peut-être plus de facilité à avoir de l'aide :/ Je reste aussi sur le faite que l'arduino n'est  vraiment pas adapter pour générer des pages html.

osaka

#91
Aug 07, 2011, 06:10 pm Last Edit: Aug 07, 2011, 06:53 pm by osaka Reason: 1
Je comprend vraiment pas ta façon de fonctionné, tu marche en aveugle là et au risque de me répéter tu met la charrue avant le bœufs tu n'es même pas certain que ton serveur marche que tu y ajoute la gestion de tes leds  qui pourrait parasiter le code serveur ...
Commence par des chose simple

teste si une connexion est possible d'abord, tu pourras déjà savoir si c'est un problème niveau configuration, matériel ou autre ...

Code: [Select]

#include <Ethernet.h>

byte mac[] = { 0x54, 0x55, 0x58, 0x10, 0x00, 0x24 };
byte ip[] = {192,168,1,15};

Server server(80);

void setup()
{
Ethernet.begin(mac, ip);
server.begin();
}

void loop()
{
Client client = server.available();
if (client)
{
Serial.print("client");
               
delay(1);
client.stop();
}
}


Si c'est ok teste l'envoi de donnée au client ...

Code: [Select]

#include <Ethernet.h>

byte mac[] = { 0xDE, 0xAD, 0xBE, 0xEF, 0xFE, 0xED };
byte ip[] = { 192, 168, 1, 177 };

Server server(80);

void setup()
{
Ethernet.begin(mac, ip);
server.begin();
}

void loop()
{
Client client = server.available();
if (client)
{
boolean current_line_is_blank = true;
while (client.connected())
{
if (client.available())
{
char c = client.read();
if (c == '\n' && current_line_is_blank)
{
client.println("HTTP/1.1 200 OK");
client.println("Content-Type: text/html");
client.println();

client.print("hello world");
break;
}
if (c == '\n')
{
current_line_is_blank = true;
}
else if (c != '\r')
{
current_line_is_blank = false;
}
}
}
delay(1);
client.stop();
}
}


ensuite teste la réception de données ...

Code: [Select]

#include <Ethernet.h>

byte mac[] = { 0x54, 0x55, 0x58, 0x10, 0x00, 0x24 };
byte ip[] = {192,168,1,15};

Server server(80);

void setup()
{
Ethernet.begin(mac, ip);
server.begin();
}

void loop()
{
Client client = server.available();
if (client)
{
while(client.connected())
{
if(client.available())
{
Serial.print(client.read());
}
}
delay(1);
client.stop();
}
}


etc, etc, tec, ...

Edit: je viens de voire qu'il y a un exemple en mode debug ... commence par là, tu pourras voire dans ta console ce qui marche ou pas ...

https://github.com/turicas/Ethernet_ENC28J60/blob/master/examples/WebServerDEBUG/WebServerDEBUG.pde

chicotore

C'est vrai qu'il aurait peut-etre été mieux de réaliser un site complet sur un serveur en ligne comme les FTP free et d'envoyer des ordres a l'ethernet-shield comme je faisait au début par le biais de processing ...

Enfin bref j'abandonne  ;) bientôt mon matos sera en vente sur ebay ou ici ( duemilanove, ethernetshield, relais, lcd ... )

chesnel

Si tu es un peu patient (une journée) j'ai fait un tutoriel, qui est correction orthographique :p qui explique comment communiquer arduino grâce à un site internet. je fournis les explications et les fichiers dans le tutoriel. C'est quand même dommage de stopper au points de revendre ton matériel :/

al1fch

#94
Aug 07, 2011, 08:36 pm Last Edit: Aug 07, 2011, 08:39 pm by al1fch Reason: 1
@chicotore
Comme indiqué je viens de réinstaller la librairie de Turicas (qui je le rappelle est en chantier)
Les exemples WebServer et WebserverSimple sont OK du premier coup sans retouches  :).
L'exemple WebServerSimpleLED ne marche pas tel quel  :(
Pour le faire marcher (photo jointe) j'ai :
-augmenté un peu le buffer défini  dans  /utility/socket.
Code: [Select]
#define BUFFER_SIZE   650  
-raccourci un peu l'html envoyé en jouant soit sur le titre, sur le H1.....ou autre chose de non essentiel
(il n'est pas sûr osaka que le mode debug soit opérationnel)

hardware : mega328 et enc28j60 tous les deux en 3,3V (pas d'adaptation de tension, mais câblage identique à l'EtherShield)

68tjs

Non tu n'arrètes pas!
Le développement c'est ça : toujours dans les emmerdes, mais quel plaisir et quelle satisfaction quand tu trouves la solution !

Comme beaucoup te l'ont dit reprends ton projet à zéro, mets tout sur la table et tries.  Choisis des objectifs simples et atteignables, il est plus facile de monter un escalier de 20 marches de 10 cm qu'un escalier de 5 marches de 40 cm ! Je sais ça parrait être du temps perdu que de se limiter à de tout petits tests alors qu'on pourrait tout faire en une seule fois sauf que la deuxièmme solution mêne souvant à l'échec.

Il faut aussi que tu détermines si des applications auront besoin  de matériels spécifiques (électronique  et/ou mécanique), cette détermination définira un budjet.

Ton projet est ambitieux, peut être faut-il le mener à plusieurs ? Mais si veut trouver des volontaires pour te suivre il faut avoir une feuille de route et non pas partir au grès du vent.



Bon courage

osaka

#96
Aug 08, 2011, 07:27 pm Last Edit: Aug 08, 2011, 07:30 pm by osaka Reason: 1
Par curiosité est ce que ça marche, en adaptant l'ip et la baseurl évidement ?

Code: [Select]

#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] = {1,1,1,1};
static char baseurl[]="http://xxxxxxx.dyndns-home.com/";
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, byte on_off2);
int8_t analyse_cmd(char *str);

// LED cathode connects the Pin4, anode to 5V through 1K resistor
#define LED_PIN  4
#define LED_PIN2  5


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
         pinMode(LED_PIN2, OUTPUT);
digitalWrite(LED_PIN2, LOW);
}

void loop(){
  uint16_t plen, dat_p;
  int8_t cmd;
  byte on_off = 1;
  byte on_off2 = 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, on_off2);
            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
        }
        else if (cmd==4){
                on_off2=1;
        digitalWrite(LED_PIN2, LOW);  // switch on LED
        }
        else if (cmd==5){
                on_off2=0;
        digitalWrite(LED_PIN2, HIGH);  // switch off LED
        }
       
        plen=print_webpage(buf, on_off, on_off2);
       
//           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, byte on_off2)
{

       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("<body bgcolor=\"#EFECCA\"> "));
        plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<center><img src=\"http://i45.servimg.com/u/f45/11/05/63/75/chambr10.png\"  >"));

      plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<center><a href=\""));
        plen=es.ES_fill_tcp_data(buf,plen,baseurl);
       
        if(on_off)
                plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("?cmd=2\"><img src=\"http://i45.servimg.com/u/f45/11/05/63/75/on11.png\"></a>"));
        else
                plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("?cmd=3\"><img src=\"http://i45.servimg.com/u/f45/11/05/63/75/off12.png\"></a>"));
       
        plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<center><a href=\""));
        plen=es.ES_fill_tcp_data(buf,plen,baseurl);
               
        if(on_off2)
                plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("?cmd=4\"><img src=\"http://i45.servimg.com/u/f45/11/05/63/75/on11.png\"></a>"));
        else
                plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("?cmd=5\"><img src=\"http://i45.servimg.com/u/f45/11/05/63/75/off12.png\"></a>"));
       
        plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("</body> "));
               
        return(plen);
}

chicotore

Avec ton code j'obtient donc 2 boutons cliquables mais en fait même en cliquant dessus ils restent toujours à la valeur (cmd=2 et cmd=4) donc toujours ON et l'image qui va avec  :smiley-roll:

merci a toi

osaka

#98
Aug 08, 2011, 08:11 pm Last Edit: Aug 08, 2011, 10:58 pm by osaka Reason: 1
Les variables on_off sont mal positionnée il me semble elle sont local à la fonction loop (j'avais repris ton dernier code fonctionnel) donc réinitialisé à chaque boucle à 1, faut les mettre en global en dehors de toute méthodes (avant setup).

Code: [Select]

byte on_off = 1;
byte on_off2 = 1;


version corrigé

Code: [Select]

#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] = {xxx,xxx,x,xx};
static char baseurl[]="http://xxxxxxx.dyndns-home.com/";
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, byte on_off2);
int8_t analyse_cmd(char *str);

// LED cathode connects the Pin4, anode to 5V through 1K resistor
#define LED_PIN  4
#define LED_PIN2  5


byte on_off = 1;
byte on_off2 = 1;

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
         pinMode(LED_PIN2, OUTPUT);
digitalWrite(LED_PIN2, LOW);
}

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, 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
        }
        else if (cmd==4){
                on_off=1;
        digitalWrite(LED_PIN2, LOW);  // switch on LED
        }
        else if (cmd==5){
                on_off=0;
        digitalWrite(LED_PIN2, 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, byte on_off2)
{

       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("<body bgcolor=\"#EFECCA\"> "));
        plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<center><img src=\"http://i45.servimg.com/u/f45/11/05/63/75/chambr10.png\"  >"));

      plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<center><a href=\"");
        plen=es.ES_fill_tcp_data(buf,plen,baseurl);
       
        if(on_off)
                plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("?cmd=2\"><img src=\"http://i45.servimg.com/u/f45/11/05/63/75/on11.png\"></a>");
           
        else
                plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("?cmd=3\"><img src=\"http://i45.servimg.com/u/f45/11/05/63/75/off12.png\"></a>");
               
        if(on_off2)
                plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("?cmd=4\"><img src=\"http://i45.servimg.com/u/f45/11/05/63/75/on11.png\"></a>");
           
        else
                plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("?cmd=5\"><img src=\"http://i45.servimg.com/u/f45/11/05/63/75/off12.png\"></a>");
       
        plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("</body> "));
               
        return(plen);
}



petite explication:

Il faut voire la fonction loop comme une boucle infinie

Code: [Select]

while(true) //la condition est toujours vraie donc pas de sortie de boucle.
{
}


ici ta variable initialisée à 1 le sera à chaque entrée de boucle.
Code: [Select]

while(true)
{
    byte on_off = 1;
    on_off+=1;
}

chicotore

Bon alors avec ton code cela ne fonctionne pas, voila l'erreur ...



J'ai donc repris le premier code que tu m'avait donné mais ou l'image ne changeait pas et j'ai déplacer les "byte on_off et byte on_off2" comme cela

Code: [Select]
// LED cathode connects the Pin4, anode to 5V through 1K resistor
#define LED_PIN  4
#define LED_PIN2  5

byte on_off = 1;
byte on_off2 = 1;


La le compilateur ne détecte pas d'erreur (bizarre d'ailleurs car c'est la même chose que ton code non ?  :smiley-eek: j'ai pas trouver d'autres différences que le déplacement de ces deux choses ), mais ça ne fonctionne pas quand je veut accéder a l'arduino par internet ... "serveur introuvable"

osaka

arf vi pour les erreurs c'est de ma fautes mauvais copier coller j'ai oublier de fermer ")" la fonction PSTR et de modifier les méthodes print_webpage() avec le on_off2.

modifie myip et base url
Code: [Select]

#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] = {1,1,1,1};
static char baseurl[]="http://xxxxxxx.dyndns-home.com/";
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, byte on_off2);
int8_t analyse_cmd(char *str);

// LED cathode connects the Pin4, anode to 5V through 1K resistor
#define LED_PIN  4
#define LED_PIN2  5


byte on_off = 1;
byte on_off2 = 1;

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
         pinMode(LED_PIN2, OUTPUT);
digitalWrite(LED_PIN2, LOW);
}

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, on_off, on_off2);
            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
        }
        else if (cmd==4){
                on_off=1;
        digitalWrite(LED_PIN2, LOW);  // switch on LED
        }
        else if (cmd==5){
                on_off=0;
        digitalWrite(LED_PIN2, HIGH);  // switch off LED
        }
       
        plen=print_webpage(buf, on_off, on_off2);
       
//           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, byte on_off2)
{

       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("<body bgcolor=\"#EFECCA\"> "));
        plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<center><img src=\"http://i45.servimg.com/u/f45/11/05/63/75/chambr10.png\"  >"));

      plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<center><a href=\""));
        plen=es.ES_fill_tcp_data(buf,plen,baseurl);
       
        if(on_off)
                plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("?cmd=2\"><img src=\"http://i45.servimg.com/u/f45/11/05/63/75/on11.png\"></a>"));
           
        else
                plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("?cmd=3\"><img src=\"http://i45.servimg.com/u/f45/11/05/63/75/off12.png\"></a>"));
               
        if(on_off2)
                plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("?cmd=4\"><img src=\"http://i45.servimg.com/u/f45/11/05/63/75/on11.png\"></a>"));
           
        else
                plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("?cmd=5\"><img src=\"http://i45.servimg.com/u/f45/11/05/63/75/off12.png\"></a>"));
       
        plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("</body> "));
               
        return(plen);
}


chicotore

Encore a little problème ^^ j'essaye de regarder s'il n'y a pas une "(" manquante quelque part


osaka

#102
Aug 09, 2011, 07:12 pm Last Edit: Aug 09, 2011, 07:15 pm by osaka Reason: 1
Oups , c'est le résultat de mon mauvais copier coller


Code: [Select]

#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] = {1,1,1,1};
static char baseurl[]="http://xxxx.dyndns-home.com/";
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, byte on_off2);
int8_t analyse_cmd(char *str);

// LED cathode connects the Pin4, anode to 5V through 1K resistor
#define LED_PIN  4
#define LED_PIN2  5


byte on_off = 1;
byte on_off2 = 1;

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
        pinMode(LED_PIN2, OUTPUT);
digitalWrite(LED_PIN2, LOW);
}

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, on_off, on_off2);
           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
       }
       else if (cmd==4){
               on_off=1;
        digitalWrite(LED_PIN2, LOW);  // switch on LED
       }
       else if (cmd==5){
               on_off=0;
        digitalWrite(LED_PIN2, HIGH);  // switch off LED
       }
       
       plen=print_webpage(buf, on_off, on_off2);
       
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, byte on_off2)
{
   
       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("<body bgcolor=\"#EFECCA\"> "));
       plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<center><img src=\"http://i45.servimg.com/u/f45/11/05/63/75/chambr10.png\"  >"));

      plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<center><a href=\""));
       plen=es.ES_fill_tcp_data(buf,plen,baseurl);
       
       if(on_off)
               plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("?cmd=2\"><img src=\"http://i45.servimg.com/u/f45/11/05/63/75/on11.png\"></a>"));
           
       else
               plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("?cmd=3\"><img src=\"http://i45.servimg.com/u/f45/11/05/63/75/off12.png\"></a>"));
               
       plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<center><a href=\""));
       plen=es.ES_fill_tcp_data(buf,plen,baseurl);
       
       if(on_off2)
               plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("?cmd=4\"><img src=\"http://i45.servimg.com/u/f45/11/05/63/75/on11.png\"></a>"));
           
       else
               plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("?cmd=5\"><img src=\"http://i45.servimg.com/u/f45/11/05/63/75/off12.png\"></a>"));
       
       plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("</body> "));
               
       return(plen);
}


chicotore

Ouep j'avais vu l'erreur j'étais en train de poster au même moment  :D par contre, les boutons restent toujours en cmd=2 et cmd=4, toujours avec l'image ON ...  :smiley-roll:

osaka

#104
Aug 09, 2011, 07:33 pm Last Edit: Aug 09, 2011, 07:35 pm by osaka Reason: 1
teste une fois ceci, j'y ai mis quelque sortie console pour voire ce qu'il ce passe.

Code: [Select]

#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] = {1,1,1,1};
static char baseurl[]="http://xxxxxxx.dyndns-home.com/";
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, byte on_off2);
int8_t analyse_cmd(char *str);

// LED cathode connects the Pin4, anode to 5V through 1K resistor
#define LED_PIN  4
#define LED_PIN2  5


byte on_off = 1;
byte on_off2 = 1;

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
        pinMode(LED_PIN2, OUTPUT);
digitalWrite(LED_PIN2, LOW);
}

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, on_off, on_off2);
           goto SENDTCP;
        }
       cmd=analyse_cmd((char *)&(buf[dat_p+5]));
       
       Serial.print("cmd:");
       Serial.println(cmd);
       Serial.print("on_off:");
       Serial.println(on_off);
       Serial.print("on_off2:");
       Serial.println(on_off2);
       
       if (cmd==2)
       {
               Serial.println("cmd2 ok");
               on_off=1;
        digitalWrite(LED_PIN, LOW);  // switch on LED
       }
       else if (cmd==3)
       {
               Serial.println("cmd3 ok");
               on_off=0;
        digitalWrite(LED_PIN, HIGH);  // switch off LED
       }
       else if (cmd==4)
       {
               Serial.println("cmd4 ok");
               on_off2=1;
        digitalWrite(LED_PIN2, LOW);  // switch on LED
       }
       else if (cmd==5)
       {
               Serial.println("cmd5 ok");
               on_off2=0;
        digitalWrite(LED_PIN2, HIGH);  // switch off LED
       }
       
       plen=print_webpage(buf, on_off, on_off2);
       
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)
{
       Serial.println("analyse_cmd ...");
       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, byte on_off2)
{
   
       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("<body bgcolor=\"#EFECCA\"> "));
       plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<center><img src=\"http://i45.servimg.com/u/f45/11/05/63/75/chambr10.png\"  >"));

      plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<center><a href=\""));
       plen=es.ES_fill_tcp_data(buf,plen,baseurl);
       
       if(on_off)
               plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("?cmd=2\"><img src=\"http://i45.servimg.com/u/f45/11/05/63/75/on11.png\"></a>"));
           
       else
               plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("?cmd=3\"><img src=\"http://i45.servimg.com/u/f45/11/05/63/75/off12.png\"></a>"));
               
       plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("<center><a href=\""));
       plen=es.ES_fill_tcp_data(buf,plen,baseurl);
       
       if(on_off2)
               plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("?cmd=4\"><img src=\"http://i45.servimg.com/u/f45/11/05/63/75/on11.png\"></a>"));
           
       else
               plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("?cmd=5\"><img src=\"http://i45.servimg.com/u/f45/11/05/63/75/off12.png\"></a>"));
       
       plen=es.ES_fill_tcp_data_p(buf,plen,PSTR("</body> "));
               
       return(plen);
}


Peut être inversé les valeur de "on_off" les initialisé à 0 au lieu de 1 ou inversé dans les if(cmd == 2) pour teste.

Go Up