1a9464ee8fe85240ac1c87f13ad7702feb9de52d
[pub/USBasp.git] / Projects / Webserver / Lib / HTTPServerApp.c
1 /*
2 LUFA Library
3 Copyright (C) Dean Camera, 2010.
4
5 dean [at] fourwalledcubicle [dot] com
6 www.lufa-lib.org
7 */
8
9 /*
10 Copyright 2010 Dean Camera (dean [at] fourwalledcubicle [dot] com)
11
12 Permission to use, copy, modify, distribute, and sell this
13 software and its documentation for any purpose is hereby granted
14 without fee, provided that the above copyright notice appear in
15 all copies and that both that the copyright notice and this
16 permission notice and warranty disclaimer appear in supporting
17 documentation, and that the name of the author not be used in
18 advertising or publicity pertaining to distribution of the
19 software without specific, written prior permission.
20
21 The author disclaim all warranties with regard to this
22 software, including all implied warranties of merchantability
23 and fitness. In no event shall the author be liable for any
24 special, indirect or consequential damages or any damages
25 whatsoever resulting from loss of use, data or profits, whether
26 in an action of contract, negligence or other tortious action,
27 arising out of or in connection with the use or performance of
28 this software.
29 */
30
31 /** \file
32 *
33 * Simple HTTP Webserver Application. When connected to the uIP stack,
34 * this will serve out files to HTTP clients on port 80.
35 */
36
37 #define INCLUDE_FROM_HTTPSERVERAPP_C
38 #include "HTTPServerApp.h"
39
40 /** HTTP server response header, for transmission before the page contents. This indicates to the host that a page exists at the
41 * given location, and gives extra connection information.
42 */
43 const char PROGMEM HTTP200Header[] = "HTTP/1.1 200 OK\r\n"
44 "Server: LUFA " LUFA_VERSION_STRING "\r\n"
45 "Connection: close\r\n"
46 "MIME-version: 1.0\r\n"
47 "Content-Type: ";
48
49 /** HTTP server response header, for transmission before a resource not found error. This indicates to the host that the given
50 * given URL is invalid, and gives extra error information.
51 */
52 const char PROGMEM HTTP404Header[] = "HTTP/1.1 404 Not Found\r\n"
53 "Server: LUFA " LUFA_VERSION_STRING "\r\n"
54 "Connection: close\r\n"
55 "MIME-version: 1.0\r\n"
56 "Content-Type: text/plain\r\n\r\n"
57 "Error 404: File Not Found: /";
58
59 /** Default filename to fetch when a directory is requested */
60 const char PROGMEM DefaultDirFileName[] = "index.htm";
61
62 /** Default MIME type sent if no other MIME type can be determined. */
63 const char PROGMEM DefaultMIMEType[] = "text/plain";
64
65 /** List of MIME types for each supported file extension. */
66 const MIME_Type_t MIMETypes[] =
67 {
68 {.Extension = "htm", .MIMEType = "text/html"},
69 {.Extension = "jpg", .MIMEType = "image/jpeg"},
70 {.Extension = "gif", .MIMEType = "image/gif"},
71 {.Extension = "bmp", .MIMEType = "image/bmp"},
72 {.Extension = "png", .MIMEType = "image/png"},
73 {.Extension = "ico", .MIMEType = "image/x-icon"},
74 {.Extension = "exe", .MIMEType = "application/octet-stream"},
75 {.Extension = "gz", .MIMEType = "application/x-gzip"},
76 {.Extension = "zip", .MIMEType = "application/zip"},
77 {.Extension = "pdf", .MIMEType = "application/pdf"},
78 };
79
80 /** FATFs structure to hold the internal state of the FAT driver for the Dataflash contents. */
81 FATFS DiskFATState;
82
83
84 /** Initialization function for the simple HTTP webserver. */
85 void HTTPServerApp_Init(void)
86 {
87 /* Listen on port 80 for HTTP connections from hosts */
88 uip_listen(HTONS(HTTP_SERVER_PORT));
89
90 /* Mount the Dataflash disk via FatFS */
91 f_mount(0, &DiskFATState);
92 }
93
94 /** uIP stack application callback for the simple HTTP webserver. This function must be called each time the
95 * TCP/IP stack needs a TCP packet to be processed.
96 */
97 void HTTPServerApp_Callback(void)
98 {
99 uip_tcp_appstate_t* const AppState = &uip_conn->appstate;
100
101 if (uip_aborted() || uip_timedout() || uip_closed())
102 {
103 /* Lock to the closed state so that no further processing will occur on the connection */
104 AppState->HTTPServer.CurrentState = WEBSERVER_STATE_Closing;
105 AppState->HTTPServer.NextState = WEBSERVER_STATE_Closing;
106 }
107
108 if (uip_connected())
109 {
110 /* New connection - initialize connection state values */
111 AppState->HTTPServer.CurrentState = WEBSERVER_STATE_OpenRequestedFile;
112 AppState->HTTPServer.NextState = WEBSERVER_STATE_OpenRequestedFile;
113 AppState->HTTPServer.FileOpen = false;
114 AppState->HTTPServer.ACKedFilePos = 0;
115 AppState->HTTPServer.SentChunkSize = 0;
116 }
117
118 if (uip_acked())
119 {
120 /* Add the amount of ACKed file data to the total sent file bytes counter */
121 AppState->HTTPServer.ACKedFilePos += AppState->HTTPServer.SentChunkSize;
122
123 /* Progress to the next state once the current state's data has been ACKed */
124 AppState->HTTPServer.CurrentState = AppState->HTTPServer.NextState;
125 }
126
127 if (uip_rexmit())
128 {
129 /* Return file pointer to the last ACKed position */
130 f_lseek(&AppState->HTTPServer.FileHandle, AppState->HTTPServer.ACKedFilePos);
131 }
132
133 if (uip_rexmit() || uip_acked() || uip_newdata() || uip_connected() || uip_poll())
134 {
135 switch (AppState->HTTPServer.CurrentState)
136 {
137 case WEBSERVER_STATE_OpenRequestedFile:
138 HTTPServerApp_OpenRequestedFile();
139 break;
140 case WEBSERVER_STATE_SendResponseHeader:
141 HTTPServerApp_SendResponseHeader();
142 break;
143 case WEBSERVER_STATE_SendData:
144 HTTPServerApp_SendData();
145 break;
146 case WEBSERVER_STATE_Closing:
147 /* Connection is being terminated for some reason - close file handle */
148 f_close(&AppState->HTTPServer.FileHandle);
149 AppState->HTTPServer.FileOpen = false;
150
151 /* If connection is not already closed, close it */
152 uip_close();
153
154 AppState->HTTPServer.CurrentState = WEBSERVER_STATE_Closed;
155 AppState->HTTPServer.NextState = WEBSERVER_STATE_Closed;
156 break;
157 }
158 }
159 }
160
161 /** HTTP Server State handler for the Request Process state. This state manages the processing of incoming HTTP
162 * GET requests to the server from the receiving HTTP client.
163 */
164 static void HTTPServerApp_OpenRequestedFile(void)
165 {
166 uip_tcp_appstate_t* const AppState = &uip_conn->appstate;
167 char* const AppData = (char*)uip_appdata;
168
169 /* No HTTP header received from the client, abort processing */
170 if (!(uip_newdata()))
171 return;
172
173 char* RequestToken = strtok(AppData, " ");
174 char* RequestedFileName = strtok(NULL, " ");
175
176 /* Must be a GET request, abort otherwise */
177 if (strcmp_P(RequestToken, PSTR("GET")) != 0)
178 {
179 uip_abort();
180 return;
181 }
182
183 /* Copy over the requested filename */
184 strncpy(AppState->HTTPServer.FileName, &RequestedFileName[1], (sizeof(AppState->HTTPServer.FileName) - 1));
185
186 /* Ensure filename is null-terminated */
187 AppState->HTTPServer.FileName[sizeof(AppState->HTTPServer.FileName) - 1] = 0x00;
188
189 /* Determine the length of the URI so that it can be checked to see if it is a directory */
190 uint8_t FileNameLen = strlen(AppState->HTTPServer.FileName);
191
192 /* If the URI is a directory, append the default filename */
193 if (AppState->HTTPServer.FileName[FileNameLen - 1] == '/')
194 {
195 strncpy_P(&AppState->HTTPServer.FileName[FileNameLen], DefaultDirFileName,
196 (sizeof(AppState->HTTPServer.FileName) - FileNameLen));
197
198 /* Ensure altered filename is still null-terminated */
199 AppState->HTTPServer.FileName[sizeof(AppState->HTTPServer.FileName) - 1] = 0x00;
200 }
201
202 /* Try to open the file from the Dataflash disk */
203 AppState->HTTPServer.FileOpen = (f_open(&AppState->HTTPServer.FileHandle, AppState->HTTPServer.FileName,
204 (FA_OPEN_EXISTING | FA_READ)) == FR_OK);
205
206 /* Lock to the SendResponseHeader state until connection terminated */
207 AppState->HTTPServer.CurrentState = WEBSERVER_STATE_SendResponseHeader;
208 AppState->HTTPServer.NextState = WEBSERVER_STATE_SendResponseHeader;
209 }
210
211 /** HTTP Server State handler for the HTTP Response Header Send state. This state manages the transmission of
212 * the HTTP response header to the receiving HTTP client.
213 */
214 static void HTTPServerApp_SendResponseHeader(void)
215 {
216 uip_tcp_appstate_t* const AppState = &uip_conn->appstate;
217 char* const AppData = (char*)uip_appdata;
218
219 char* Extension = strpbrk(AppState->HTTPServer.FileName, ".");
220 bool FoundMIMEType = false;
221
222 /* If the file isn't already open, it wasn't found - send back a 404 error response and abort */
223 if (!(AppState->HTTPServer.FileOpen))
224 {
225 /* Copy over the HTTP 404 response header and send it to the receiving client */
226 strcpy_P(AppData, HTTP404Header);
227 strcpy(&AppData[strlen(AppData)], AppState->HTTPServer.FileName);
228 uip_send(AppData, strlen(AppData));
229
230 AppState->HTTPServer.NextState = WEBSERVER_STATE_Closing;
231 return;
232 }
233
234 /* Copy over the HTTP 200 response header and send it to the receiving client */
235 strcpy_P(AppData, HTTP200Header);
236
237 /* Check to see if a MIME type for the requested file's extension was found */
238 if (Extension != NULL)
239 {
240 /* Look through the MIME type list, copy over the required MIME type if found */
241 for (uint8_t i = 0; i < (sizeof(MIMETypes) / sizeof(MIMETypes[0])); i++)
242 {
243 if (strcmp(&Extension[1], MIMETypes[i].Extension) == 0)
244 {
245 strcpy(&AppData[strlen(AppData)], MIMETypes[i].MIMEType);
246 FoundMIMEType = true;
247 break;
248 }
249 }
250 }
251
252 /* Check if a MIME type was found and copied to the output buffer */
253 if (!(FoundMIMEType))
254 {
255 /* MIME type not found - copy over the default MIME type */
256 strcpy_P(&AppData[strlen(AppData)], DefaultMIMEType);
257 }
258
259 /* Add the end-of-line terminator and end-of-headers terminator after the MIME type */
260 strcpy_P(&AppData[strlen(AppData)], PSTR("\r\n\r\n"));
261
262 /* Send the MIME header to the receiving client */
263 uip_send(AppData, strlen(AppData));
264
265 /* When the MIME header is ACKed, progress to the data send stage */
266 AppState->HTTPServer.NextState = WEBSERVER_STATE_SendData;
267 }
268
269 /** HTTP Server State handler for the Data Send state. This state manages the transmission of file chunks
270 * to the receiving HTTP client.
271 */
272 static void HTTPServerApp_SendData(void)
273 {
274 uip_tcp_appstate_t* const AppState = &uip_conn->appstate;
275 char* const AppData = (char*)uip_appdata;
276
277 /* Get the maximum segment size for the current packet */
278 uint16_t MaxChunkSize = uip_mss();
279
280 /* Read the next chunk of data from the open file */
281 f_read(&AppState->HTTPServer.FileHandle, AppData, MaxChunkSize, &AppState->HTTPServer.SentChunkSize);
282
283 /* Send the next file chunk to the receiving client */
284 uip_send(AppData, AppState->HTTPServer.SentChunkSize);
285
286 /* Check if we are at the last chunk of the file, if so next ACK should close the connection */
287 if (MaxChunkSize != AppState->HTTPServer.SentChunkSize)
288 AppState->HTTPServer.NextState = WEBSERVER_STATE_Closing;
289 }
290