891c462bbd13356c0920d0803e38c070e43c9785
[bertos.git] / bertos / net / http.c
1 /**
2  * \file
3  * <!--
4  * This file is part of BeRTOS.
5  *
6  * Bertos is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
19  *
20  * As a special exception, you may use this file as part of a free software
21  * library without restriction.  Specifically, if other files instantiate
22  * templates or use macros or inline functions from this file, or you compile
23  * this file and link it with other files to produce an executable, this
24  * file does not by itself cause the resulting executable to be covered by
25  * the GNU General Public License.  This exception does not however
26  * invalidate any other reasons why the executable file might be covered by
27  * the GNU General Public License.
28  *
29  * Copyright 2011 Develer S.r.l. (http://www.develer.com/)
30  *
31  * -->
32  *
33  * \author Daniele Basile <asterix@develer.com>
34  *
35  * \brief Simple Http server.
36  *
37  * This simple web server read the site's pages from SD card, and manage
38  * the cases where SD is not present or page not found, using embedded pages.
39  * Quering from browser the /status page, the server return a json dictionary where are store
40  * some board status info, like board temperature, up-time, etc.
41  *
42  * notest: avr
43  */
44
45 #include "http.h"
46
47 #include "hw/hw_sd.h"
48 #include "hw/hw_http.h"
49
50 #include "cfg/cfg_http.h"
51
52 // Define logging setting (for cfg/log.h module).
53 #define LOG_LEVEL         HTTP_LOG_LEVEL
54 #define LOG_VERBOSITY     HTTP_LOG_FORMAT
55 #include <cfg/log.h>
56
57 #include <stdio.h>
58 #include <stdlib.h>
59 #include <string.h>
60
61
62 static const char http_html_hdr_200[] = "HTTP/1.1 200 OK\r\nContent-type: text/html\r\n\r\n";
63 static const char http_html_hdr_404[] = "HTTP/1.1 404 Not Found\r\nContent-type: text/html\r\n\r\n";
64 static const char http_html_hdr_500[] = "HTTP/1.1 500 Internal Server Error\r\nContent-type: text/html\r\n\r\n";
65
66 static HttpCGI *cgi_table;
67 static http_handler_t http_callback;
68
69
70 static char http_hexToAscii(char first, char second)
71 {
72         char hex[5], *stop;
73         hex[0] = '0';
74         hex[1] = 'x';
75         hex[2] = first;
76         hex[3] = second;
77         hex[4] = 0;
78         return strtol(hex, &stop, 16);
79 }
80
81 void http_decodeUri(const char *raw_buf, size_t raw_len, char *decodec_buf, size_t len)
82 {
83         char value;
84         for (size_t i = 0; i < raw_len; i++)
85         {
86                 if (raw_buf[i] == '%')
87                 {
88                         if (i + 2 < raw_len)
89                         {
90                                 /* convert hex value after % */
91                                 value = http_hexToAscii(raw_buf[i + 1], raw_buf[i + 2]);
92                                 if (value)
93                                 {
94                                         *decodec_buf++ = value;
95                                         i += 2;
96                                         continue;
97                                 }
98                         }
99                 }
100                 *decodec_buf++ = raw_buf[i];
101         }
102 }
103
104 void http_getPageName(const char *recv_buf, size_t recv_len, char *page_name, size_t len)
105 {
106         int i = 0;
107         bool str_ok = false;
108
109         if (recv_buf && (recv_len > sizeof("GET /")))
110         {
111                 if (*recv_buf++ == 'G' &&
112                         *recv_buf++ == 'E' && *recv_buf++ == 'T')
113                         {
114                                 str_ok = true;
115                                 /* skip the space and "/" */
116                                 recv_buf += 2;
117                         }
118         }
119
120         if (str_ok)
121         {
122                 while ((size_t)i < recv_len)
123                 {
124                         char ch = *(recv_buf++);
125                         if (ch == ' ' || ch == '\t' || ch == '\n')
126                                 break;
127                         if((size_t)i == len - 1)
128                                 break;
129                         page_name[i++] = ch;
130                 }
131         }
132
133         page_name[i] = '\0';
134 }
135
136 INLINE const char *get_ext(const char *name)
137 {
138         const char *ext = strstr(name, ".");
139         if(ext && (ext + 1))
140                 return (ext + 1);
141
142         return NULL;
143 }
144
145
146 /**
147  * Send on \param client socket
148  * the 200 Ok http header
149  */
150 void http_sendOk(struct netconn *client)
151 {
152         netconn_write(client, http_html_hdr_200, sizeof(http_html_hdr_200) - 1, NETCONN_NOCOPY);
153 }
154
155
156 /**
157  * Send on \param client socket
158  * the 404 File not found http header
159  */
160 void http_sendFileNotFound(struct netconn *client)
161 {
162         netconn_write(client, http_html_hdr_404, sizeof(http_html_hdr_404) - 1, NETCONN_NOCOPY);
163 }
164
165 /**
166  * Send on \param client socket
167  * the 500 internal server error http header
168  */
169 void http_sendInternalErr(struct netconn *client)
170 {
171         netconn_write(client, http_html_hdr_500, sizeof(http_html_hdr_500) - 1, NETCONN_NOCOPY);
172 }
173
174 static http_handler_t cgi_search(const char *name,  HttpCGI *table)
175 {
176         if (!table)
177                 return NULL;
178
179         int i = 0;
180         const char *ext = get_ext(name);
181         LOG_INFO("EXT %s\n", ext);
182         while(table[i].name)
183         {
184                 if (ext && table[i].type == CGI_MATCH_EXT)
185                 {
186                         LOG_INFO("Match all ext %s\n", ext);
187                         if (!strcmp(table[i].name, ext))
188                                 break;
189                 }
190                 else if (table[i].type == CGI_MATCH_NAME)
191                 {
192                         LOG_INFO("Match all name %s\n", name);
193                         if (strstr(name, table[i].name) != NULL)
194                                 break;
195                 }
196                 else /* (table[i].type == CGI_MATCH_WORD) */
197                 {
198                         LOG_INFO("Match all word %s\n", name);
199                         if (!strcmp(table[i].name, name))
200                                 break;
201                 }
202
203                 i++;
204         }
205
206         return table[i].handler;
207 }
208
209 static char req_string[80];
210
211 /**
212  * Http polling function.
213  *
214  * Call this functions to process each client connections.
215  *
216  */
217 void http_poll(struct netconn *server)
218 {
219         struct netconn *client;
220         struct netbuf *rx_buf_conn;
221         char *rx_buf;
222         uint16_t len;
223
224         client = netconn_accept(server);
225         if (!client)
226                 return;
227
228         rx_buf_conn = netconn_recv(client);
229         if (rx_buf_conn)
230         {
231                 netbuf_data(rx_buf_conn, (void **)&rx_buf, &len);
232                 if (rx_buf)
233                 {
234                         memset(req_string, 0, sizeof(req_string));
235                         http_getPageName(rx_buf, len, req_string, sizeof(req_string));
236
237                         LOG_INFO("Search %s\n", req_string);
238                         if (req_string[0] == '\0')
239                                 strcpy(req_string, HTTP_DEFAULT_PAGE);
240
241                         http_handler_t cgi = cgi_search(req_string, cgi_table);
242                         if (cgi)
243                         {
244                                 if (cgi(client, req_string, rx_buf, len) < 0)
245                                 {
246                                         LOG_ERR("Internal server error\n");
247                                         http_sendInternalErr(client);
248                                         netconn_write(client, http_server_error, http_server_error_len - 1, NETCONN_NOCOPY);
249                                 }
250                         }
251                         else
252                         {
253                                 http_callback(client, req_string, rx_buf, len);
254                         }
255                 }
256                 netconn_close(client);
257                 netbuf_delete(rx_buf_conn);
258         }
259         netconn_delete(client);
260 }
261
262 /**
263  * Init the http server.
264  *
265  * The simply http server call for each client request the default_callback function. The
266  * user should define this callback to manage the client request, i.e. reading site's page
267  * from SD card. The user can define the cgi_table, where associate one callback to the user string.
268  * In this way the user could filter some client request and redirect they to custom callback, i.e.
269  * the client could request status of the device only loading the particular page name.
270  *
271  * \param default_callback fuction that server call for all request, that does'nt match cgi table.
272  * \param table of callcack to call when client request a particular page.
273  */
274 void http_init(http_handler_t default_callback, struct HttpCGI *table)
275 {
276         ASSERT(default_callback);
277
278         cgi_table = table;
279         http_callback = default_callback;
280 }
281