git.sur5r.net Git - freertos/blob - FreeRTOS/Demo/RX600_RX63N-RSK_Renesas/RTOSDemo/webserver/httpd-cgi.c

   1 /**\r
   2  * \addtogroup httpd\r
   3  * @{\r
   4  */\r
   5 \r
   6 /**\r
   7  * \file\r
   8  *         Web server script interface\r
   9  * \author\r
  10  *         Adam Dunkels <adam@sics.se>\r
  11  *\r
  12  */\r
  13 \r
  14 /*\r
  15  * Copyright (c) 2001-2006, Adam Dunkels.\r
  16  * All rights reserved.\r
  17  *\r
  18  * Redistribution and use in source and binary forms, with or without\r
  19  * modification, are permitted provided that the following conditions\r
  20  * are met:\r
  21  * 1. Redistributions of source code must retain the above copyright\r
  22  *    notice, this list of conditions and the following disclaimer.\r
  23  * 2. Redistributions in binary form must reproduce the above copyright\r
  24  *    notice, this list of conditions and the following disclaimer in the\r
  25  *    documentation and/or other materials provided with the distribution.\r
  26  * 3. The name of the author may not be used to endorse or promote\r
  27  *    products derived from this software without specific prior\r
  28  *    written permission.\r
  29  *\r
  30  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS\r
  31  * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED\r
  32  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE\r
  33  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY\r
  34  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL\r
  35  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE\r
  36  * GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS\r
  37  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,\r
  38  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING\r
  39  * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS\r
  40  * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.\r
  41  *\r
  42  * This file is part of the uIP TCP/IP stack.\r
  43  *\r
  44  * $Id: httpd-cgi.c,v 1.2 2006/06/11 21:46:37 adam Exp $\r
  45  *\r
  46  */\r
  47 #include "net/uip.h"\r
  48 #include "net/psock.h"\r
  49 #include "apps/httpd/httpd.h"\r
  50 #include "apps/httpd/httpd-cgi.h"\r
  51 #include "apps/httpd/httpd-fs.h"\r
  52 \r
  53 #include <stdio.h>\r
  54 #include <string.h>\r
  55 \r
  56 #include "FreeRTOS.h"\r
  57 #include "task.h"\r
  58 \r
  59 HTTPD_CGI_CALL( file, "file-stats", file_stats );\r
  60 HTTPD_CGI_CALL( tcp, "tcp-connections", tcp_stats );\r
  61 HTTPD_CGI_CALL( net, "net-stats", net_stats );\r
  62 HTTPD_CGI_CALL( rtos, "rtos-stats", rtos_stats );\r
  63 HTTPD_CGI_CALL( run, "run-time", run_time );\r
  64 HTTPD_CGI_CALL( io, "led-io", led_io );\r
  65 \r
  66 static const struct httpd_cgi_call      *calls[] = { &file, &tcp, &net, &rtos, &run, &io, NULL };\r
  67 \r
  68 /*---------------------------------------------------------------------------*/\r
  69 static PT_THREAD( nullfunction ( struct httpd_state *s, char *ptr ) )\r
  70 {\r
  71         PSOCK_BEGIN( &s->sout );\r
  72         ( void ) ptr;\r
  73         ( void ) PT_YIELD_FLAG;\r
  74         PSOCK_END( &s->sout );\r
  75 }\r
  76 \r
  77 /*---------------------------------------------------------------------------*/\r
  78 httpd_cgifunction httpd_cgi( char *name )\r
  79 {\r
  80         const struct httpd_cgi_call **f;\r
  81 \r
  82         /* Find the matching name in the table, return the function. */\r
  83         for( f = calls; *f != NULL; ++f )\r
  84         {\r
  85                 if( strncmp((*f)->name, name, strlen((*f)->name)) == 0 )\r
  86                 {\r
  87                         return( *f )->function;\r
  88                 }\r
  89         }\r
  90 \r
  91         return nullfunction;\r
  92 }\r
  93 \r
  94 /*---------------------------------------------------------------------------*/\r
  95 static unsigned short generate_file_stats( void *arg )\r
  96 {\r
  97         char    *f = ( char * ) arg;\r
  98         return sprintf( ( char * ) uip_appdata, "%5u", httpd_fs_count(f) );\r
  99 }\r
 100 \r
 101 /*---------------------------------------------------------------------------*/\r
 102 static PT_THREAD( file_stats ( struct httpd_state *s, char *ptr ) )\r
 103 {\r
 104         PSOCK_BEGIN( &s->sout );\r
 105 \r
 106         ( void ) PT_YIELD_FLAG;\r
 107 \r
 108         PSOCK_GENERATOR_SEND( &s->sout, generate_file_stats, strchr(ptr, ' ') + 1 );\r
 109 \r
 110         PSOCK_END( &s->sout );\r
 111 }\r
 112 \r
 113 /*---------------------------------------------------------------------------*/\r
 114 static const char       closed[] = /*  "CLOSED",*/ { 0x43, 0x4c, 0x4f, 0x53, 0x45, 0x44, 0 };\r
 115 static const char       syn_rcvd[] = /*  "SYN-RCVD",*/ { 0x53, 0x59, 0x4e, 0x2d, 0x52, 0x43, 0x56, 0x44, 0 };\r
 116 static const char       syn_sent[] = /*  "SYN-SENT",*/ { 0x53, 0x59, 0x4e, 0x2d, 0x53, 0x45, 0x4e, 0x54, 0 };\r
 117 static const char       established[] = /*  "ESTABLISHED",*/ { 0x45, 0x53, 0x54, 0x41, 0x42, 0x4c, 0x49, 0x53, 0x48, 0x45, 0x44, 0 };\r
 118 static const char       fin_wait_1[] = /*  "FIN-WAIT-1",*/ { 0x46, 0x49, 0x4e, 0x2d, 0x57, 0x41, 0x49, 0x54, 0x2d, 0x31, 0 };\r
 119 static const char       fin_wait_2[] = /*  "FIN-WAIT-2",*/ { 0x46, 0x49, 0x4e, 0x2d, 0x57, 0x41, 0x49, 0x54, 0x2d, 0x32, 0 };\r
 120 static const char       closing[] = /*  "CLOSING",*/ { 0x43, 0x4c, 0x4f, 0x53, 0x49, 0x4e, 0x47, 0 };\r
 121 static const char       time_wait[] = /*  "TIME-WAIT,"*/ { 0x54, 0x49, 0x4d, 0x45, 0x2d, 0x57, 0x41, 0x49, 0x54, 0 };\r
 122 static const char       last_ack[] = /*  "LAST-ACK"*/ { 0x4c, 0x41, 0x53, 0x54, 0x2d, 0x41, 0x43, 0x4b, 0 };\r
 123 \r
 124 static const char       *states[] = { closed, syn_rcvd, syn_sent, established, fin_wait_1, fin_wait_2, closing, time_wait, last_ack };\r
 125 \r
 126 static unsigned short generate_tcp_stats( void *arg )\r
 127 {\r
 128         struct uip_conn         *conn;\r
 129         struct httpd_state      *s = ( struct httpd_state * ) arg;\r
 130 \r
 131         conn = &uip_conns[s->count];\r
 132         return sprintf( ( char * ) uip_appdata,\r
 133                                          "<tr><td>%d</td><td>%u.%u.%u.%u:%u</td><td>%s</td><td>%u</td><td>%u</td><td>%c %c</td></tr>\r\n", htons(conn->lport),\r
 134                                          htons(conn->ripaddr.u16[0]) >> 8, htons(conn->ripaddr.u16[0]) & 0xff, htons(conn->ripaddr.u16[1]) >> 8,\r
 135                                          htons(conn->ripaddr.u16[1]) & 0xff, htons(conn->rport), states[conn->tcpstateflags & UIP_TS_MASK], conn->nrtx, conn->timer,\r
 136                                          (uip_outstanding(conn)) ? '*' : ' ', (uip_stopped(conn)) ? '!' : ' ' );\r
 137 }\r
 138 \r
 139 /*---------------------------------------------------------------------------*/\r
 140 static PT_THREAD( tcp_stats ( struct httpd_state *s, char *ptr ) )\r
 141 {\r
 142         PSOCK_BEGIN( &s->sout );\r
 143         ( void ) ptr;\r
 144         ( void ) PT_YIELD_FLAG;\r
 145         for( s->count = 0; s->count < UIP_CONNS; ++s->count )\r
 146         {\r
 147                 if( (uip_conns[s->count].tcpstateflags & UIP_TS_MASK) != UIP_CLOSED )\r
 148                 {\r
 149                         PSOCK_GENERATOR_SEND( &s->sout, generate_tcp_stats, s );\r
 150                 }\r
 151         }\r
 152 \r
 153         PSOCK_END( &s->sout );\r
 154 }\r
 155 \r
 156 /*---------------------------------------------------------------------------*/\r
 157 static unsigned short generate_net_stats( void *arg )\r
 158 {\r
 159         struct httpd_state      *s = ( struct httpd_state * ) arg;\r
 160         return sprintf( ( char * ) uip_appdata, "%5u\n", (( uip_stats_t * ) &uip_stat)[s->count] );\r
 161 }\r
 162 \r
 163 static PT_THREAD( net_stats ( struct httpd_state *s, char *ptr ) )\r
 164 {\r
 165         PSOCK_BEGIN( &s->sout );\r
 166         ( void ) ptr;\r
 167         ( void ) PT_YIELD_FLAG;\r
 168 #if UIP_STATISTICS\r
 169         for( s->count = 0; s->count < sizeof(uip_stat) / sizeof(uip_stats_t); ++s->count )\r
 170         {\r
 171                 PSOCK_GENERATOR_SEND( &s->sout, generate_net_stats, s );\r
 172         }\r
 173 \r
 174 #endif /* UIP_STATISTICS */\r
 175 \r
 176         PSOCK_END( &s->sout );\r
 177 }\r
 178 \r
 179 /*---------------------------------------------------------------------------*/\r
 180 extern void vTaskList( char *pcWriteBuffer );\r
 181 extern char *pcGetTaskStatusMessage( void );\r
 182 static char cCountBuf[128];\r
 183 long            lRefreshCount = 0;\r
 184 static unsigned short generate_rtos_stats( void *arg )\r
 185 {\r
 186         ( void ) arg;\r
 187         lRefreshCount++;\r
 188         sprintf( cCountBuf, "<p><br>Refresh count = %d<p><br>%s", ( int ) lRefreshCount, pcGetTaskStatusMessage() );\r
 189         vTaskList( ( char * ) uip_appdata );\r
 190         strcat( uip_appdata, cCountBuf );\r
 191 \r
 192         return strlen( uip_appdata );\r
 193 }\r
 194 \r
 195 /*---------------------------------------------------------------------------*/\r
 196 static PT_THREAD( rtos_stats ( struct httpd_state *s, char *ptr ) )\r
 197 {\r
 198         PSOCK_BEGIN( &s->sout );\r
 199         ( void ) ptr;\r
 200         ( void ) PT_YIELD_FLAG;\r
 201         PSOCK_GENERATOR_SEND( &s->sout, generate_rtos_stats, NULL );\r
 202         PSOCK_END( &s->sout );\r
 203 }\r
 204 \r
 205 /*---------------------------------------------------------------------------*/\r
 206 char                    *pcStatus;\r
 207 unsigned long   ulString;\r
 208 \r
 209 static unsigned short generate_io_state( void *arg )\r
 210 {\r
 211         extern long lParTestGetLEDState( unsigned long ulLED );\r
 212         ( void ) arg;\r
 213 \r
 214         /* Are the dynamically setable LEDs currently on or off? */\r
 215         if( lParTestGetLEDState( 3 ) )\r
 216         {\r
 217                 pcStatus = "checked";\r
 218         }\r
 219         else\r
 220         {\r
 221                 pcStatus = "";\r
 222         }\r
 223 \r
 224         sprintf( uip_appdata, "<input type=\"checkbox\" name=\"LED0\" value=\"1\" %s>LED<p><p>", pcStatus );\r
 225 \r
 226         return strlen( uip_appdata );\r
 227 }\r
 228 \r
 229 /*---------------------------------------------------------------------------*/\r
 230 extern void vTaskGetRunTimeStats( char *pcWriteBuffer );\r
 231 extern unsigned short usMaxJitter;\r
 232 static char cJitterBuffer[ 200 ];\r
 233 static unsigned short generate_runtime_stats( void *arg )\r
 234 {\r
 235         ( void ) arg;\r
 236         lRefreshCount++;\r
 237         sprintf( cCountBuf, "<p><br>Refresh count = %d", ( int ) lRefreshCount );\r
 238 \r
 239         #ifdef INCLUDE_HIGH_FREQUENCY_TIMER_TEST\r
 240         {\r
 241                 sprintf( cJitterBuffer, "<p><br>Max high frequency timer jitter = %d peripheral clock periods.<p><br>", ( int ) usMaxJitter );\r
 242                 vTaskGetRunTimeStats( ( char * ) uip_appdata );\r
 243                 strcat( uip_appdata, cJitterBuffer );\r
 244         }\r
 245         #else\r
 246         {\r
 247                 ( void ) cJitterBuffer;\r
 248                 strcpy( uip_appdata, "<p>Run time stats are only available in the debug_with_optimisation build configuration.<p>" );\r
 249         }\r
 250         #endif\r
 251 \r
 252         strcat( uip_appdata, cCountBuf );\r
 253 \r
 254         return strlen( uip_appdata );\r
 255 }\r
 256 \r
 257 /*---------------------------------------------------------------------------*/\r
 258 static PT_THREAD( run_time ( struct httpd_state *s, char *ptr ) )\r
 259 {\r
 260         PSOCK_BEGIN( &s->sout );\r
 261         ( void ) ptr;\r
 262         ( void ) PT_YIELD_FLAG;\r
 263         PSOCK_GENERATOR_SEND( &s->sout, generate_runtime_stats, NULL );\r
 264         PSOCK_END( &s->sout );\r
 265 }\r
 266 \r
 267 /*---------------------------------------------------------------------------*/\r
 268 static PT_THREAD( led_io ( struct httpd_state *s, char *ptr ) )\r
 269 {\r
 270         PSOCK_BEGIN( &s->sout );\r
 271         ( void ) ptr;\r
 272         ( void ) PT_YIELD_FLAG;\r
 273         PSOCK_GENERATOR_SEND( &s->sout, generate_io_state, NULL );\r
 274         PSOCK_END( &s->sout );\r
 275 }\r
 276 \r
 277 /** @} */\r