Simple server for AGH accademic purpose

Dependencies:   EthernetInterface mbed-rtos mbed

Fork of HTTP_SD_Server_K64F by FRDM-K64F Code Share

Committer:
gsteiert
Date:
Sun Apr 12 03:04:28 2015 +0000
Revision:
7:04744a9ce2b9
Parent:
6:ca17ce165ebc
Child:
8:a27748c1fc33
Updated libraries.  Seems to be more stable.

Who changed what in which revision?

UserRevisionLine numberNew contents of line
gsteiert 0:28bc7ce77e20 1 #include "mbed.h"
gsteiert 0:28bc7ce77e20 2 #include "EthernetInterface.h"
gsteiert 0:28bc7ce77e20 3 #include "SDFileSystem.h"
gsteiert 0:28bc7ce77e20 4 #include <stdio.h>
gsteiert 0:28bc7ce77e20 5 #include <string.h>
gsteiert 0:28bc7ce77e20 6
gsteiert 0:28bc7ce77e20 7 #define HTTPD_SERVER_PORT 80
gsteiert 0:28bc7ce77e20 8 #define HTTPD_MAX_REQ_LENGTH 1023
gsteiert 0:28bc7ce77e20 9 #define HTTPD_MAX_HDR_LENGTH 255
gsteiert 0:28bc7ce77e20 10 #define HTTPD_MAX_FNAME_LENGTH 127
gsteiert 3:4f71a37a1ed2 11 #define HTTPD_MAX_DNAME_LENGTH 127
gsteiert 3:4f71a37a1ed2 12
gsteiert 3:4f71a37a1ed2 13 Serial uart(USBTX, USBRX);
gsteiert 0:28bc7ce77e20 14
gsteiert 6:ca17ce165ebc 15 //SDFileSystem sd(p5, p6, p7, p8, "sd"); // LPC1768 MBD2PMD
gsteiert 5:27b09a0f3fb6 16 //SDFileSystem sd(P0_18, P0_17, P0_15, P0_16, "sd"); // Seeeduino Arch Pro SPI2SD
gsteiert 6:ca17ce165ebc 17 SDFileSystem sd(PTE3, PTE1, PTE2, PTE4, "sd"); // K64F
gsteiert 3:4f71a37a1ed2 18
gsteiert 0:28bc7ce77e20 19 EthernetInterface eth;
gsteiert 0:28bc7ce77e20 20 TCPSocketServer server;
gsteiert 0:28bc7ce77e20 21 TCPSocketConnection client;
gsteiert 0:28bc7ce77e20 22
gsteiert 0:28bc7ce77e20 23 char buffer[HTTPD_MAX_REQ_LENGTH+1];
gsteiert 0:28bc7ce77e20 24 char httpHeader[HTTPD_MAX_HDR_LENGTH+1];
gsteiert 3:4f71a37a1ed2 25 char fileName[HTTPD_MAX_FNAME_LENGTH+1];
gsteiert 3:4f71a37a1ed2 26 char dirName[HTTPD_MAX_DNAME_LENGTH+1];
gsteiert 0:28bc7ce77e20 27 char *uristr;
gsteiert 0:28bc7ce77e20 28 char *eou;
gsteiert 0:28bc7ce77e20 29 char *qrystr;
gsteiert 0:28bc7ce77e20 30
gsteiert 0:28bc7ce77e20 31 FILE *fp;
gsteiert 0:28bc7ce77e20 32 int rdCnt;
gsteiert 0:28bc7ce77e20 33
gsteiert 0:28bc7ce77e20 34 void get_file(char* uri)
gsteiert 0:28bc7ce77e20 35 {
gsteiert 3:4f71a37a1ed2 36 uart.printf("get_file %s\n", uri);
gsteiert 0:28bc7ce77e20 37 char *lstchr = strrchr(uri, NULL) -1;
gsteiert 0:28bc7ce77e20 38 if ('/' == *lstchr) {
gsteiert 3:4f71a37a1ed2 39 uart.printf("Open directory /sd%s\n", uri);
gsteiert 0:28bc7ce77e20 40 *lstchr = 0;
gsteiert 3:4f71a37a1ed2 41 sprintf(fileName, "/sd%s", uri);
gsteiert 3:4f71a37a1ed2 42 DIR *d = opendir(fileName);
gsteiert 0:28bc7ce77e20 43 if (d != NULL) {
gsteiert 0:28bc7ce77e20 44 sprintf(httpHeader,"HTTP/1.1 200 OK\r\nContent-Type: text/html\r\nConnection: Close\r\n\r\n");
gsteiert 0:28bc7ce77e20 45 client.send(httpHeader,strlen(httpHeader));
gsteiert 3:4f71a37a1ed2 46 sprintf(httpHeader,"<html><head><title>Directory Listing</title></head><body><h1>%s Directory Listing</h1><ul>", uri);
gsteiert 0:28bc7ce77e20 47 client.send(httpHeader,strlen(httpHeader));
gsteiert 0:28bc7ce77e20 48 struct dirent *p;
gsteiert 0:28bc7ce77e20 49 while((p = readdir(d)) != NULL) {
gsteiert 3:4f71a37a1ed2 50 sprintf(dirName, "%s/%s", fileName, p->d_name);
gsteiert 3:4f71a37a1ed2 51 uart.printf("%s\n", dirName);
gsteiert 3:4f71a37a1ed2 52 DIR *subDir = opendir(dirName);
gsteiert 3:4f71a37a1ed2 53 if (subDir != NULL) {
gsteiert 3:4f71a37a1ed2 54 sprintf(httpHeader,"<li><a href=\"./%s/\">%s/</a></li>", p->d_name, p->d_name);
gsteiert 3:4f71a37a1ed2 55 } else {
gsteiert 3:4f71a37a1ed2 56 sprintf(httpHeader,"<li><a href=\"./%s\">%s</a></li>", p->d_name, p->d_name);
gsteiert 3:4f71a37a1ed2 57 }
gsteiert 0:28bc7ce77e20 58 client.send(httpHeader,strlen(httpHeader));
gsteiert 0:28bc7ce77e20 59 }
gsteiert 0:28bc7ce77e20 60 }
gsteiert 0:28bc7ce77e20 61 closedir(d);
gsteiert 3:4f71a37a1ed2 62 uart.printf("Directory closed\n");
gsteiert 0:28bc7ce77e20 63 sprintf(httpHeader,"</ul></body></html>");
gsteiert 0:28bc7ce77e20 64 client.send(httpHeader,strlen(httpHeader));
gsteiert 0:28bc7ce77e20 65 } else {
gsteiert 3:4f71a37a1ed2 66 sprintf(fileName, "/sd%s", uri);
gsteiert 3:4f71a37a1ed2 67 fp = fopen(fileName, "r");
gsteiert 0:28bc7ce77e20 68 if (fp == NULL) {
gsteiert 7:04744a9ce2b9 69 uart.printf("File not found\n");
gsteiert 0:28bc7ce77e20 70 sprintf(httpHeader,"HTTP/1.1 404 Not Found \r\nContent-Type: text\r\nConnection: Close\r\n\r\n");
gsteiert 0:28bc7ce77e20 71 client.send(httpHeader,strlen(httpHeader));
gsteiert 0:28bc7ce77e20 72 client.send(uri,strlen(uri));
gsteiert 0:28bc7ce77e20 73 } else {
gsteiert 7:04744a9ce2b9 74 uart.printf("Sending: header");
gsteiert 0:28bc7ce77e20 75 sprintf(httpHeader,"HTTP/1.1 200 OK\r\nContent-Type: text/html\r\nConnection: Close\r\n\r\n");
gsteiert 0:28bc7ce77e20 76 client.send(httpHeader,strlen(httpHeader));
gsteiert 7:04744a9ce2b9 77 uart.printf(" file");
gsteiert 0:28bc7ce77e20 78 while ((rdCnt = fread(buffer, sizeof( char ), 1024, fp)) == 1024) {
gsteiert 0:28bc7ce77e20 79 client.send(buffer, rdCnt);
gsteiert 7:04744a9ce2b9 80 uart.printf(".");
gsteiert 0:28bc7ce77e20 81 }
gsteiert 0:28bc7ce77e20 82 client.send(buffer, rdCnt);
gsteiert 0:28bc7ce77e20 83 fclose(fp);
gsteiert 7:04744a9ce2b9 84 uart.printf("done\n");
gsteiert 0:28bc7ce77e20 85 }
gsteiert 0:28bc7ce77e20 86 }
gsteiert 0:28bc7ce77e20 87 }
gsteiert 0:28bc7ce77e20 88
gsteiert 0:28bc7ce77e20 89 int main (void)
gsteiert 0:28bc7ce77e20 90 {
gsteiert 3:4f71a37a1ed2 91 // Serial Interface eth;
gsteiert 3:4f71a37a1ed2 92 uart.baud(115200);
gsteiert 5:27b09a0f3fb6 93 uart.printf("Initializing\n");
gsteiert 3:4f71a37a1ed2 94
gsteiert 3:4f71a37a1ed2 95 // Check File System
gsteiert 5:27b09a0f3fb6 96 uart.printf("Checking File System\n");
gsteiert 3:4f71a37a1ed2 97 DIR *d = opendir("/sd/");
gsteiert 3:4f71a37a1ed2 98 if (d != NULL) {
gsteiert 3:4f71a37a1ed2 99 uart.printf("SD Card Present\n");
gsteiert 3:4f71a37a1ed2 100 } else {
gsteiert 3:4f71a37a1ed2 101 uart.printf("SD Card Root Directory Not Found\n");
gsteiert 3:4f71a37a1ed2 102 }
gsteiert 3:4f71a37a1ed2 103
gsteiert 0:28bc7ce77e20 104 // EthernetInterface eth;
gsteiert 5:27b09a0f3fb6 105 uart.printf("Initializing Ethernet\n");
gsteiert 0:28bc7ce77e20 106 eth.init(); //Use DHCP
gsteiert 5:27b09a0f3fb6 107 uart.printf("Connecting\n");
gsteiert 0:28bc7ce77e20 108 eth.connect();
gsteiert 3:4f71a37a1ed2 109 uart.printf("IP Address is %s\n", eth.getIPAddress());
gsteiert 0:28bc7ce77e20 110
gsteiert 0:28bc7ce77e20 111 // TCPSocketServer server;
gsteiert 0:28bc7ce77e20 112 server.bind(HTTPD_SERVER_PORT);
gsteiert 0:28bc7ce77e20 113 server.listen();
gsteiert 5:27b09a0f3fb6 114 uart.printf("Server Listening\n");
gsteiert 0:28bc7ce77e20 115
gsteiert 0:28bc7ce77e20 116 while (true) {
gsteiert 3:4f71a37a1ed2 117 uart.printf("\nWait for new connection...\r\n");
gsteiert 0:28bc7ce77e20 118 server.accept(client);
gsteiert 0:28bc7ce77e20 119 client.set_blocking(false, 1500); // Timeout after (1.5)s
gsteiert 0:28bc7ce77e20 120
gsteiert 3:4f71a37a1ed2 121 uart.printf("Connection from: %s\r\n", client.get_address());
gsteiert 0:28bc7ce77e20 122 while (true) {
gsteiert 0:28bc7ce77e20 123 int n = client.receive(buffer, sizeof(buffer));
gsteiert 0:28bc7ce77e20 124 if (n <= 0) break;
gsteiert 3:4f71a37a1ed2 125 uart.printf("Recieved Data: %d\r\n\r\n%.*s\r\n",n,n,buffer);
gsteiert 0:28bc7ce77e20 126 if (n >= 1024) {
gsteiert 0:28bc7ce77e20 127 sprintf(httpHeader,"HTTP/1.1 413 Request Entity Too Large \r\nContent-Type: text\r\nConnection: Close\r\n\r\n");
gsteiert 0:28bc7ce77e20 128 client.send(httpHeader,strlen(httpHeader));
gsteiert 0:28bc7ce77e20 129 client.send(buffer,n);
gsteiert 0:28bc7ce77e20 130 break;
gsteiert 0:28bc7ce77e20 131 } else {
gsteiert 0:28bc7ce77e20 132 buffer[n]=0;
gsteiert 0:28bc7ce77e20 133 }
gsteiert 0:28bc7ce77e20 134 if (!strncmp(buffer, "GET ", 4)) {
gsteiert 0:28bc7ce77e20 135 uristr = buffer + 4;
gsteiert 0:28bc7ce77e20 136 eou = strstr(uristr, " ");
gsteiert 0:28bc7ce77e20 137 if (eou == NULL) {
gsteiert 0:28bc7ce77e20 138 sprintf(httpHeader,"HTTP/1.1 400 Bad Request \r\nContent-Type: text\r\nConnection: Close\r\n\r\n");
gsteiert 0:28bc7ce77e20 139 client.send(httpHeader,strlen(httpHeader));
gsteiert 0:28bc7ce77e20 140 client.send(buffer,n);
gsteiert 0:28bc7ce77e20 141 } else {
gsteiert 0:28bc7ce77e20 142 *eou = 0;
gsteiert 3:4f71a37a1ed2 143 get_file(uristr);
gsteiert 0:28bc7ce77e20 144 }
gsteiert 0:28bc7ce77e20 145 }
gsteiert 0:28bc7ce77e20 146 }
gsteiert 0:28bc7ce77e20 147
gsteiert 0:28bc7ce77e20 148 client.close();
gsteiert 0:28bc7ce77e20 149 }
gsteiert 0:28bc7ce77e20 150 }