2009-10-11 10:12:22 +00:00
/*
2011-03-18 18:38:08 +00:00
ChibiOS / RT - Copyright ( C ) 2006 , 2007 , 2008 , 2009 , 2010 ,
2013-02-02 10:58:09 +00:00
2011 , 2012 , 2013 Giovanni Di Sirio .
2009-10-11 10:12:22 +00:00
This file is part of ChibiOS / RT .
ChibiOS / RT is free software ; you can redistribute it and / or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation ; either version 3 of the License , or
( at your option ) any later version .
ChibiOS / RT is distributed in the hope that it will be useful ,
but WITHOUT ANY WARRANTY ; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE . See the
GNU General Public License for more details .
You should have received a copy of the GNU General Public License
along with this program . If not , see < http : //www.gnu.org/licenses/>.
*/
/*
* This file is a modified version of the lwIP web server demo . The original
2010-02-21 07:24:53 +00:00
* author is unknown because the file didn ' t contain any license information .
2009-10-11 10:12:22 +00:00
*/
/**
* @ file web . c
* @ brief HTTP server wrapper thread code .
* @ addtogroup WEB_THREAD
* @ {
*/
2009-12-08 17:44:03 +00:00
# include "ch.h"
2009-10-11 10:12:22 +00:00
# include "lwip/opt.h"
# include "lwip/arch.h"
# include "lwip/api.h"
# include "web.h"
# if LWIP_NETCONN
2009-10-17 10:33:37 +00:00
static const char http_html_hdr [ ] = " HTTP/1.1 200 OK \r \n Content-type: text/html \r \n \r \n " ;
static const char http_index_html [ ] = " <html><head><title>Congrats!</title></head><body><h1>Welcome to our lwIP HTTP server!</h1><p>This is a small test page.</body></html> " ;
2009-10-11 10:12:22 +00:00
static void http_server_serve ( struct netconn * conn ) {
struct netbuf * inbuf ;
char * buf ;
u16_t buflen ;
2011-06-06 09:33:47 +00:00
err_t err ;
2009-10-11 10:12:22 +00:00
/* Read the data from the port, blocking if nothing yet there.
We assume the request ( the part we care about ) is in one netbuf */
2011-06-06 09:33:47 +00:00
err = netconn_recv ( conn , & inbuf ) ;
2009-10-11 10:12:22 +00:00
2011-06-06 09:33:47 +00:00
if ( err = = ERR_OK ) {
2009-10-11 10:12:22 +00:00
netbuf_data ( inbuf , ( void * * ) & buf , & buflen ) ;
/* Is this an HTTP GET command? (only check the first 5 chars, since
there are other formats for GET , and we ' re keeping it very simple ) */
if ( buflen > = 5 & &
buf [ 0 ] = = ' G ' & &
buf [ 1 ] = = ' E ' & &
buf [ 2 ] = = ' T ' & &
buf [ 3 ] = = ' ' & &
buf [ 4 ] = = ' / ' ) {
/* Send the HTML header
* subtract 1 from the size , since we dont send the \ 0 in the string
* NETCONN_NOCOPY : our data is const static , so no need to copy it
*/
netconn_write ( conn , http_html_hdr , sizeof ( http_html_hdr ) - 1 , NETCONN_NOCOPY ) ;
/* Send our HTML page */
netconn_write ( conn , http_index_html , sizeof ( http_index_html ) - 1 , NETCONN_NOCOPY ) ;
}
}
/* Close the connection (server closes in HTTP) */
netconn_close ( conn ) ;
/* Delete the buffer (netconn_recv gives us ownership,
so we have to make sure to deallocate the buffer ) */
netbuf_delete ( inbuf ) ;
}
/**
* Stack area for the http thread .
*/
WORKING_AREA ( wa_http_server , WEB_THREAD_STACK_SIZE ) ;
/**
2010-02-21 07:24:53 +00:00
* HTTP server thread .
2009-10-11 10:12:22 +00:00
*/
msg_t http_server ( void * p ) {
struct netconn * conn , * newconn ;
2011-06-06 09:33:47 +00:00
err_t err ;
2009-10-11 10:12:22 +00:00
2009-10-17 10:33:37 +00:00
( void ) p ;
2009-10-11 10:12:22 +00:00
/* Create a new TCP connection handle */
conn = netconn_new ( NETCONN_TCP ) ;
LWIP_ERROR ( " http_server: invalid conn " , ( conn ! = NULL ) , return RDY_RESET ; ) ;
/* Bind to port 80 (HTTP) with default IP address */
netconn_bind ( conn , NULL , WEB_THREAD_PORT ) ;
/* Put the connection into LISTEN state */
netconn_listen ( conn ) ;
/* Goes to the final priority after initialization.*/
chThdSetPriority ( WEB_THREAD_PRIORITY ) ;
while ( 1 ) {
2011-06-06 09:33:47 +00:00
err = netconn_accept ( conn , & newconn ) ;
if ( err ! = ERR_OK )
continue ;
2009-10-11 10:12:22 +00:00
http_server_serve ( newconn ) ;
netconn_delete ( newconn ) ;
}
return RDY_OK ;
}
# endif /* LWIP_NETCONN */
/** @} */
