Ethernet-schild als bestandsserver

Hallo iedereen

als gevolg van onze blog post gisteren, veel klanten contact met ons die al experimenteren met het Schild en had problemen met behulp van de SD-kaartlezer samen met de W5100 op hetzelfde moment. We hebben wat onderzoek gedaan en een oplossing gevonden die we u vandaag willen presenteren. Gerd liet ons onlangs zien hoe we een ESP als bestandsserver met AnD-kaart kunnen gebruiken. Vandaag passen we de oplossing voor de Uno met Shield aan en laten we u kennismaken met de werkcode met de standaardbibliotheken.

Hardware:

• UnoR3
• EthernetShield W5100
• micro SD-kaart met Fat32-bestandssysteem

Code:

/*
* Deze schets maakt gebruik van de microSD-kaartsleuf op het Arduino Ethernet-schild
* om bestanden te serveren via een zeer minimale surfinterface
*
* Sommige code is van Bill Greiman's SdFatLib voorbeelden,
* sommige is van de Arduino Ethernet WebServer voorbeeld, 
* sommige is van Limor Fried (Adafruit),
* sommige is van "jurs" voor de Duitse Arduino forum,
* dus zijn waarschijnlijk onder GPL
*/

#include <Sd.H>
#include <Spi.H>
#include <Ethernet.H>

************ ETHERNET-spullen *************
Byte Mac[] = { 0xDE 0xDE, 0xAD 0xAD, 0xBE 0xBE, 0xEF 0xEF, 0xFE, 0xED };
Byte Ip[] = { 192, 168, 168, 245 };
EthernetServer Server(80);

************* SDCARD Stuff *************
Sd2Card Kaart;
SdVolume Volume;
SdFile Root;
SdFile Bestand;

fouttekenreeksen opslaan in flash om RAM op te slaan
#define Fout(S) error_P(Pstr Pstr(S))

Void error_P(Const Char* Street) {   PgmPrint("fout: ");   SerialPrintln_P(Street);   Als (Kaart.Foutcode()) {     PgmPrint("SD-fout: ");     Seriële.Afdrukken(Kaart.Foutcode(), Hex);     Seriële.Afdrukken(',');     Seriële.println(Kaart.Foutgegevens(), Hex);   }   Terwijl(1);
}

Char* strupper strupper( Char* S )
helper functie char array naar hoofdletters
{   Voor (Char* P = S; *P; ++P)     *P = Toupper( *P );   Terug S;
}

Char* strlower( Char* S )
helper functie char array naar kleine letters
{   Voor (Char* P = S; *P; ++P)     *P = Tolower( *P );   Terug S;
}

Void Setup() {   Seriële.Beginnen(9600);   PgmPrint("Gratis RAM: ");   Seriële.println(FreeRam FreeRam FreeRam());        de SD-kaart in SPI_HALF_SPEED initialiseren om busfouten met   Broodplanken.  gebruik SPI_FULL_SPEED voor betere prestaties.   pinMode(10, Output);                       stel de SS-pin in als een output (noodzakelijk!)   digitalWrite(10, Hoge);                    maar zet de W5100 chip!   Als (!Kaart.Init(SPI_HALF_SPEED, 4)) Fout("card.init mislukt!");      een FAT-volume initialiseren   Als (!Volume.Init(&Kaart)) Fout("vol.init mislukt!");   PgmPrint("Volume is VET");   Seriële.println(Volume.fatType(),Dec);   Seriële.println();      Als (!Root.openRoot(&Volume)) Fout("openRoot mislukt");   lijstbestand in root met datum en grootte   PgmPrintln PgmPrintln("Bestanden gevonden in root:");   Root.Ls(LS_DATE | LS_SIZE);   Seriële.println();      Recursieve lijst van alle mappen   PgmPrintln PgmPrintln("Bestanden gevonden in alles wat je:");   Root.Ls(LS_R);      Seriële.println();   PgmPrintln PgmPrintln("Gedaan");      Debugging compleet, we beginnen de server!   Ethernet.Beginnen(Mac, Ip);   Server.Beginnen();
}

Void ListFiles(Ethernetclient Client, uint8_t Vlaggen) {   Deze code is net gekopieerd van SdFile.cpp in de SDFat bibliotheek   en getweaked om af te drukken op de client output in html!   dir_t P;      Root.Terugspoelen();   Client.println("<ul>");   Terwijl (Root.Readdir(P) > 0) {     gedaan als afgelopen laatst gebruikte vermelding     Als (P.Naam[0] == DIR_NAME_FREE) Breken;     verwijderde invoer en vermeldingen overslaan voor . En..     Als (P.Naam[0] == DIR_NAME_DELETED || P.Naam[0] == '.') Blijven;     alleen submappen en bestanden weergeven     Als (!DIR_IS_FILE_OR_SUBDIR(&P)) Blijven;     alle inspringingsruimten afdrukken     Client.Afdrukken("<li><a href="");     Voor (uint8_t I. = 0; I. < 11; I.++) {       Als (P.Naam[I.] == ' ') Blijven;       Als (I. == 8) {         Client.Afdrukken('.');       }       Client.Afdrukken((Char)P.Naam[I.]);     }     Client.Afdrukken("\">");          bestandsnaam afdrukken met mogelijke lege vulling     Voor (uint8_t I = 0; I < 11; I++) {       Als (P.Naam[I] == ' ') Blijven;       Als (I == 8) {         Client.Afdrukken('.');       }       Client.Afdrukken((Char)P.Naam[I]);     }          Client.Afdrukken("</a>");          Als (DIR_IS_SUBDIR(&P)) {       Client.Afdrukken('/');     }     datum/tijd wijzigen indien daarom wordt gevraagd     Als (Vlaggen & LS_DATE) {        Root.printFatDate(P.lastWriteDate);        Client.Afdrukken(' ');        Root.printFatTime(P.lastWriteTime);     }     afdrukgrootte indien daarom wordt gevraagd     Als (!DIR_IS_SUBDIR(&P) && (Vlaggen & LS_SIZE)) {       Client.Afdrukken(' ');       Client.Afdrukken(P.Bestandsgrootte);     }     Client.println("</li>");   }   Client.println("</ul>");
}

Hoe groot onze lijnbuffer zou moeten zijn. 100 is genoeg!
#define BUFSIZ BUFSIZ 100

Void Lus()
{   Char clientline[BUFSIZ BUFSIZ];   Int Index = 0;      Ethernetclient Client = Server.Beschikbaar();   Als (Client) {     een http-aanvraag eindigt met een lege regel     Booleaanse current_line_is_blank = Waar;          de invoerbuffer opnieuw instellen     Index = 0;          Terwijl (Client.Aangesloten()) {       Als (Client.Beschikbaar()) {         Char C = Client.Lezen();                  Als het geen nieuwe regel is, voegt u het teken toe aan de buffer         Als (C != '\n' && C != '\r') {           clientline[Index] = C;           Index++;           zijn we te groot voor de buffer? gegevens uittesen           Als (Index >= BUFSIZ BUFSIZ)              Index = BUFSIZ BUFSIZ -1;                      lees verder!           Blijven;         }                  kreeg een \n of \r nieuwe lijn, wat betekent dat de string is gedaan         clientline[Index] = 0;                  Print het uit voor foutopsporing         Seriële.println(clientline);                  Substring zoeken, zoals een verzoek om het hoofdbestand te krijgen         Als (strstr strstr(clientline, "GET / ") != 0) {           een standaardhttp-antwoordkop verzenden           Client.println("HTTP/1.1 200 OK");           Client.println("Inhoudstype: tekst/html");           Client.println();                      alle bestanden afdrukken, een helper gebruiken om het schoon te houden           Client.println("<h2>Bestanden:</h2>");           ListFiles(Client, LS_SIZE);         } Anders Als (strstr strstr(clientline, "GET /") != 0) {           deze keer geen ruimte na de /, dus een sub-bestand!           Char *Bestandsnaam;                      Bestandsnaam = clientline + 5; kijk na de "GET /" (5 chars)           een trucje, kijk voor de " HTTP/1.1" string en            zet het eerste teken van de substring in een 0 om het uit te wissen.           (strstr strstr(clientline, " HTTP"))[0] = 0;                      het bestand dat we willen afdrukken           Seriële.println(Bestandsnaam);           Als (! Bestand.Open(&Root, Bestandsnaam, O_READ)) {             Client.println("HTTP/1.1 404 Niet gevonden");             Client.println("Inhoudstype: tekst/html");             Client.println();             Client.println("<h2>Bestand niet gevonden!</h2>");             Breken;           }                      Seriële.println("Geopend!");           strlower(Bestandsnaam);                     Client.println("HTTP/1.1 200 OK");           Als (strstr strstr(Bestandsnaam,".htm")!=NULL NULL)             Client.println("Inhoudstype: tekst/html");           Anders Als (strstr strstr(Bestandsnaam,".jpg")!=NULL NULL)             Client.println('Inhoudstype: afbeelding/jpg');           Anders               Client.println("Inhoudstype: tekst/vlakte");           Client.println();                      int16_t C;           Terwijl ((C = Bestand.Lezen()) >= 0) {               uncomment de seriële te debuggen (traag!)               Serial.print((char)c);               Client.Afdrukken((Char)C);           }           Bestand.Sluiten();         } Anders {           al het andere is een 404           Client.println("HTTP/1.1 404 Niet gevonden");           Client.println("Inhoudstype: tekst/html");           Client.println();           Client.println("<h2>Bestand niet gevonden!</h2>");         }         Breken;       }     }     geef de webbrowser de tijd om de gegevens te ontvangen     Vertraging(1);     Client.Stoppen();   }
}

Viel Spaß beim Nachbasteln! 

Ich freue mich über Ihre Feedback, und verabschiede mich bis zum nächsten Mal.
Moritz Spranger