Bouclier Ethernet comme serveur de fichiers

Bonjour à tous

en raison de notre blog hier, de nombreux clients nous ont contactés qui expérimentaient déjà avec le bouclier et avait des problèmes en utilisant le lecteur de carte SD avec le W5100 en même temps. Nous avons fait des recherches et trouvé une solution que nous aimerions vous présenter aujourd’hui. Gerd nous a récemment montré comment utiliser un ESP comme serveur de fichiers avec une carte AnD. Aujourd’hui, nous adaptons la solution pour l’Uno avec Shield et vous présentons le code de travail avec les bibliothèques standard.

Matériel:

• UnoR3
• EthernetShield W5100
• micro carte SD avec système de fichiers Fat32

Code:

/*
Cette esquisse utilise la fente de carte microSD sur le bouclier Arduino Ethernet
- pour servir des fichiers sur une interface de navigation très minimale
*
Certains codes proviennent des exemples SdFatLib de Bill Greiman,
certains proviennent de l’exemple Arduino Ethernet WebServer, 
Certains sont de Limor Fried (Adafruit),
- certains sont de "jurs" pour le forum allemand Arduino,
- donc c’est probablement sous GPL
*/

#include <Sd.H (en)>
#include <Spi.H (en)>
#include <Ethernet.H (en)>

ETHERNET STUFF
Octet Mac[] = { 0xDE, 0xAD, 0xBE, 0xEF, 0xFE (en), 0xED };
Octet Ip[] = { 192, 168, 168, 245 };
EthernetServer (en anglais) Serveur(80);

SDCARD
Sd2Card (Sd2Card) Carte;
SdVolume (SdVolume) Volume;
SdFile (SdFile) Racine;
SdFile (SdFile) Fichier;

stocker des chaînes d’erreur en flash pour sauver ram
#define Erreur(S) error_P(Pstr (Pstr)(S))

Vide error_P(Const Char Char* Rue) {   PgmPrint("erreur: ");   SerialPrintln_P(Rue);   Si (Carte.Errorcode()) {     PgmPrint("Erreur SD: ");     Série.Imprimer(Carte.Errorcode(), Hexagonale);     Série.Imprimer(',');     Série.println(Carte.Errordata(), Hexagonale);   }   Tandis que(1);
}

Char Char* strupper( Char Char* S )
tableau d’omble de fonction d’aide aux lettres de majuscules
{   Pour (Char Char* P = S; *P; ++P)     *P = Toupper( *P );   Retour S;
}

Char Char* strlower( Char Char* S )
tableau d’omble de fonction d’aide aux lettres de minuscules
{   Pour (Char Char* P = S; *P; ++P)     *P = Tolower( *P );   Retour S;
}

Vide Configuration() {   Série.Commencer(9600);   PgmPrint("Ram gratuit: ");   Série.println(FreeRam (en)());        initialiser la carte SD à SPI_HALF_SPEED pour éviter les erreurs de bus   Des planches à pain.  utiliser SPI_FULL_SPEED pour de meilleures performances.   pinMode(10, Sortie);                       définir la broche SS comme une sortie (nécessaire!)   digitalWrite (en)(10, Haute);                    mais éteignez la puce W5100!   Si (!Carte.Init(SPI_HALF_SPEED, 4)) Erreur("card.init a échoué!");      initialiser un volume FAT   Si (!Volume.Init(&Carte)) Erreur("vol.init a échoué!");   PgmPrint("Le volume est FAT");   Série.println(Volume.fatType (fatType)(),Dec);   Série.println();      Si (!Racine.openRoot(&Volume)) Erreur("openRoot échoué");   fichier de liste dans la racine avec la date et la taille   PgmPrintln("Fichiers trouvés dans la racine:");   Racine.Ls(LS_DATE | LS_SIZE);   Série.println();      Liste récursive de tous les répertoires   PgmPrintln("Fichiers trouvés dans tout ce que vous:");   Racine.Ls(LS_R);      Série.println();   PgmPrintln("Fait");      Debugging complet, nous commençons le serveur!   Ethernet.Commencer(Mac, Ip);   Serveur.Commencer();
}

Vide ListesFiles(EthernetClient Client, uint8_t Drapeaux) {   Ce code vient d’être copié à partir de SdFile.cpp dans la bibliothèque SDFat   et modifié pour imprimer à la sortie du client en html!   dir_t P;      Racine.Rembobiner();   Client.println("Lt;ul’gt;");   Tandis que (Racine.Readdir(P) > 0) {     fait si passé dernière entrée utilisée     Si (P.Nom[0] == DIR_NAME_FREE) Pause;     sauter l’entrée supprimée et les entrées pour . Et..     Si (P.Nom[0] == DIR_NAME_DELETED || P.Nom[0] == '.') Continuer;     ne dressez que des sous-directives et des fichiers     Si (!DIR_IS_FILE_OR_SUBDIR(&P)) Continuer;     imprimer tous les espaces en retrait     Client.Imprimer("Lt;li’gt;lt;a href"");     Pour (uint8_t Ⅰ. = 0; Ⅰ. < 11; Ⅰ.++) {       Si (P.Nom[Ⅰ.] == ' ') Continuer;       Si (Ⅰ. == 8) {         Client.Imprimer('.');       }       Client.Imprimer((Char Char)P.Nom[Ⅰ.]);     }     Client.Imprimer("\">");          nom de fichier d’impression avec le remplissage vide possible     Pour (uint8_t Ⅰ = 0; Ⅰ < 11; Ⅰ++) {       Si (P.Nom[Ⅰ] == ' ') Continuer;       Si (Ⅰ == 8) {         Client.Imprimer('.');       }       Client.Imprimer((char)P.Nom[Ⅰ]);     }          Client.Imprimer("Lt;/a-gt;");          Si (DIR_IS_SUBDIR(&P)) {       Client.Imprimer('/');     }     modifier la date/heure si demandé     Si (Drapeaux & LS_DATE) {        Racine.printFatDate(P.lastWriteDate);        Client.Imprimer(' ');        Racine.printFatTime(P.lastWriteTime lastWriteTime lastWriteTime lastW);     }     taille d’impression si demandé     Si (!DIR_IS_SUBDIR(&P) && (Drapeaux & LS_SIZE)) {       Client.Imprimer(' ');       Client.Imprimer(P.Taille);     }     Client.println("Lt;/li-gt;");   }   Client.println("Lt;/ul’gt;");
}

La taille de notre tampon de ligne devrait être. 100, c’est beaucoup !
#define BUFSIZ BUFSIZ 100

Vide Boucle()
{   char ligne client[BUFSIZ BUFSIZ];   Int Index = 0;      EthernetClient Client = Serveur.Disponible();   Si (Client) {     une demande http se termine par une ligne blanche     Boolean current_line_is_blank = Vrai;          réinitialiser le tampon d’entrée     Index = 0;          Tandis que (Client.Connecté()) {       Si (Client.Disponible()) {         char C = Client.Lire();                  S’il ne s’agit pas d’une nouvelle ligne, ajoutez le personnage au tampon         Si (C != 'n' && C != 'r') {           ligne client[Index] = C;           Index++;           sommes-nous trop gros pour le tampon? commencer à lancer des données           Si (Index >= BUFSIZ BUFSIZ)              Index = BUFSIZ BUFSIZ -1;                      continuer à lire plus de données!           Continuer;         }                  obtenu une nouvelle ligne de n ou de r, ce qui signifie que la chaîne est faite         ligne client[Index] = 0;                  Imprimez-le pour débogage         Série.println(ligne client);                  Recherchez une sous-corde telle qu’une demande d’obtenir le fichier racine         Si (strstr(ligne client, "GET / ") != 0) {           envoyer un en-tête de réponse http standard           Client.println("HTTP/1.1 200 OK");           Client.println("Content-Type: texte/html");           Client.println();                      imprimer tous les fichiers, utiliser une aide pour le garder propre           Client.println("Lt;h2 'gt;Files:lt;/h2 'gt;");           ListesFiles(Client, LS_SIZE);         } Autre Si (strstr(ligne client, "OBTENIR /") != 0) {           cette fois pas d’espace après le /, donc un sous-fichier!           char *Fichier;                      Fichier = ligne client + 5; s’occuper de la "GET /" (5 chars)           un petit truc, cherchez la chaîne " HTTP/1.1 " et            transformer le premier personnage du sous-corde en un 0 pour l’effacer.           (strstr(ligne client, "HTTP"))[0] = 0;                      imprimer le fichier que nous voulons           Série.println(Fichier);           Si (! Fichier.Ouvert(&Racine, Fichier, O_READ)) {             Client.println("HTTP/1.1 404 Non trouvé");             Client.println("Content-Type: texte/html");             Client.println();             Client.println("Lt;h2-gt;File Not Found!);             Pause;           }                      Série.println("Ouvert !");           strlower(Fichier);                     Client.println("HTTP/1.1 200 OK");           Si (strstr(Fichier,".htm")!=Null)             Client.println("Content-Type: texte/html");           Autre Si (strstr(Fichier,".jpg")!=Null)             Client.println("Content-Type: image/jpg");           Autre               Client.println("Content-Type: texte/plaine");           Client.println();                      int16_t C;           Tandis que ((C = Fichier.Lire()) >= 0) {               décompresser la série de déboiffer (lent!)               Serial.print((char)c);               Client.Imprimer((char)C);           }           Fichier.Proche();         } Autre {           tout le reste est un 404           Client.println("HTTP/1.1 404 Non trouvé");           Client.println("Content-Type: texte/html");           Client.println();           Client.println("Lt;h2-gt;File Not Found!);         }         Pause;       }     }     donner au navigateur Web le temps de recevoir les données     Retard(1);     Client.Arrêter();   }
}

Viel Spamd beim Nachbasteln! 

Ich freue mich 'ber Ihre Feedback, und verabschiede mich bis zum n’chiesten Mal.
Moritz Spranger