git.sur5r.net Git - freertos/blob - FreeRTOS/Demo/CORTEX_A2F200_IAR_and_Keil/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 #include "mss_ace.h"\r
  53 \r
  54 #include <stdio.h>\r
  55 #include <string.h>\r
  56 \r
  57 #include "FreeRTOS.h"\r
  58 #include "task.h"\r
  59 \r
  60 HTTPD_CGI_CALL( file, "file-stats", file_stats );\r
  61 HTTPD_CGI_CALL( tcp, "tcp-connections", tcp_stats );\r
  62 HTTPD_CGI_CALL( net, "net-stats", net_stats );\r
  63 HTTPD_CGI_CALL( rtos, "rtos-stats", rtos_stats );\r
  64 HTTPD_CGI_CALL( run, "run-time", run_time );\r
  65 HTTPD_CGI_CALL( io, "led-io", led_io );\r
  66 \r
  67 static const struct httpd_cgi_call      *calls[] = { &file, &tcp, &net, &rtos, &run, &io, NULL };\r
  68 \r
  69 /*---------------------------------------------------------------------------*/\r
  70 static PT_THREAD( nullfunction ( struct httpd_state *s, char *ptr ) )\r
  71 {\r
  72         PSOCK_BEGIN( &s->sout );\r
  73         ( void ) ptr;\r
  74         ( void ) PT_YIELD_FLAG;\r
  75         PSOCK_END( &s->sout );\r
  76 }\r
  77 \r
  78 /*---------------------------------------------------------------------------*/\r
  79 httpd_cgifunction httpd_cgi( char *name )\r
  80 {\r
  81         const struct httpd_cgi_call **f;\r
  82 \r
  83         /* Find the matching name in the table, return the function. */\r
  84         for( f = calls; *f != NULL; ++f )\r
  85         {\r
  86                 if( strncmp((*f)->name, name, strlen((*f)->name)) == 0 )\r
  87                 {\r
  88                         return( *f )->function;\r
  89                 }\r
  90         }\r
  91 \r
  92         return nullfunction;\r
  93 }\r
  94 \r
  95 /*---------------------------------------------------------------------------*/\r
  96 static unsigned short generate_file_stats( void *arg )\r
  97 {\r
  98         char    *f = ( char * ) arg;\r
  99         return sprintf( ( char * ) uip_appdata, "%5u", httpd_fs_count(f) );\r
 100 }\r
 101 \r
 102 /*---------------------------------------------------------------------------*/\r
 103 static PT_THREAD( file_stats ( struct httpd_state *s, char *ptr ) )\r
 104 {\r
 105         PSOCK_BEGIN( &s->sout );\r
 106 \r
 107         ( void ) PT_YIELD_FLAG;\r
 108 \r
 109         PSOCK_GENERATOR_SEND( &s->sout, generate_file_stats, strchr(ptr, ' ') + 1 );\r
 110 \r
 111         PSOCK_END( &s->sout );\r
 112 }\r
 113 \r
 114 /*---------------------------------------------------------------------------*/\r
 115 static const char       closed[] = /*  "CLOSED",*/ { 0x43, 0x4c, 0x4f, 0x53, 0x45, 0x44, 0 };\r
 116 static const char       syn_rcvd[] = /*  "SYN-RCVD",*/ { 0x53, 0x59, 0x4e, 0x2d, 0x52, 0x43, 0x56, 0x44, 0 };\r
 117 static const char       syn_sent[] = /*  "SYN-SENT",*/ { 0x53, 0x59, 0x4e, 0x2d, 0x53, 0x45, 0x4e, 0x54, 0 };\r
 118 static const char       established[] = /*  "ESTABLISHED",*/ { 0x45, 0x53, 0x54, 0x41, 0x42, 0x4c, 0x49, 0x53, 0x48, 0x45, 0x44, 0 };\r
 119 static const char       fin_wait_1[] = /*  "FIN-WAIT-1",*/ { 0x46, 0x49, 0x4e, 0x2d, 0x57, 0x41, 0x49, 0x54, 0x2d, 0x31, 0 };\r
 120 static const char       fin_wait_2[] = /*  "FIN-WAIT-2",*/ { 0x46, 0x49, 0x4e, 0x2d, 0x57, 0x41, 0x49, 0x54, 0x2d, 0x32, 0 };\r
 121 static const char       closing[] = /*  "CLOSING",*/ { 0x43, 0x4c, 0x4f, 0x53, 0x49, 0x4e, 0x47, 0 };\r
 122 static const char       time_wait[] = /*  "TIME-WAIT,"*/ { 0x54, 0x49, 0x4d, 0x45, 0x2d, 0x57, 0x41, 0x49, 0x54, 0 };\r
 123 static const char       last_ack[] = /*  "LAST-ACK"*/ { 0x4c, 0x41, 0x53, 0x54, 0x2d, 0x41, 0x43, 0x4b, 0 };\r
 124 \r
 125 static const char       *states[] = { closed, syn_rcvd, syn_sent, established, fin_wait_1, fin_wait_2, closing, time_wait, last_ack };\r
 126 \r
 127 static unsigned short generate_tcp_stats( void *arg )\r
 128 {\r
 129         struct uip_conn         *conn;\r
 130         struct httpd_state      *s = ( struct httpd_state * ) arg;\r
 131 \r
 132         conn = &uip_conns[s->count];\r
 133         return sprintf( ( char * ) uip_appdata,\r
 134                                          "<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
 135                                          htons(conn->ripaddr.u16[0]) >> 8, htons(conn->ripaddr.u16[0]) & 0xff, htons(conn->ripaddr.u16[1]) >> 8,\r
 136                                          htons(conn->ripaddr.u16[1]) & 0xff, htons(conn->rport), states[conn->tcpstateflags & UIP_TS_MASK], conn->nrtx, conn->timer,\r
 137                                          (uip_outstanding(conn)) ? '*' : ' ', (uip_stopped(conn)) ? '!' : ' ' );\r
 138 }\r
 139 \r
 140 /*---------------------------------------------------------------------------*/\r
 141 static PT_THREAD( tcp_stats ( struct httpd_state *s, char *ptr ) )\r
 142 {\r
 143         PSOCK_BEGIN( &s->sout );\r
 144         ( void ) ptr;\r
 145         ( void ) PT_YIELD_FLAG;\r
 146         for( s->count = 0; s->count < UIP_CONNS; ++s->count )\r
 147         {\r
 148                 if( (uip_conns[s->count].tcpstateflags & UIP_TS_MASK) != UIP_CLOSED )\r
 149                 {\r
 150                         PSOCK_GENERATOR_SEND( &s->sout, generate_tcp_stats, s );\r
 151                 }\r
 152         }\r
 153 \r
 154         PSOCK_END( &s->sout );\r
 155 }\r
 156 \r
 157 /*---------------------------------------------------------------------------*/\r
 158 static unsigned short generate_net_stats( void *arg )\r
 159 {\r
 160         struct httpd_state      *s = ( struct httpd_state * ) arg;\r
 161         return sprintf( ( char * ) uip_appdata, "%5u\n", (( uip_stats_t * ) &uip_stat)[s->count] );\r
 162 }\r
 163 \r
 164 static PT_THREAD( net_stats ( struct httpd_state *s, char *ptr ) )\r
 165 {\r
 166         PSOCK_BEGIN( &s->sout );\r
 167         ( void ) ptr;\r
 168         ( void ) PT_YIELD_FLAG;\r
 169 #if UIP_STATISTICS\r
 170         for( s->count = 0; s->count < sizeof(uip_stat) / sizeof(uip_stats_t); ++s->count )\r
 171         {\r
 172                 PSOCK_GENERATOR_SEND( &s->sout, generate_net_stats, s );\r
 173         }\r
 174 \r
 175 #endif /* UIP_STATISTICS */\r
 176 \r
 177         PSOCK_END( &s->sout );\r
 178 }\r
 179 \r
 180 /*---------------------------------------------------------------------------*/\r
 181 extern void vTaskList( char *pcWriteBuffer );\r
 182 extern char *pcGetTaskStatusMessage( void );\r
 183 static char cCountBuf[128];\r
 184 long            lRefreshCount = 0;\r
 185 static unsigned short generate_rtos_stats( void *arg )\r
 186 {\r
 187         ( void ) arg;\r
 188         lRefreshCount++;\r
 189         sprintf( cCountBuf, "<p><br>Refresh count = %d<p><br>%s", ( int ) lRefreshCount, pcGetTaskStatusMessage() );\r
 190         vTaskList( ( char * ) uip_appdata );\r
 191         strcat( uip_appdata, cCountBuf );\r
 192 \r
 193         return strlen( uip_appdata );\r
 194 }\r
 195 \r
 196 /*---------------------------------------------------------------------------*/\r
 197 static PT_THREAD( rtos_stats ( struct httpd_state *s, char *ptr ) )\r
 198 {\r
 199         PSOCK_BEGIN( &s->sout );\r
 200         ( void ) ptr;\r
 201         ( void ) PT_YIELD_FLAG;\r
 202         PSOCK_GENERATOR_SEND( &s->sout, generate_rtos_stats, NULL );\r
 203         PSOCK_END( &s->sout );\r
 204 }\r
 205 \r
 206 /*---------------------------------------------------------------------------*/\r
 207 char                    *pcStatus;\r
 208 unsigned long   ulString;\r
 209 \r
 210 static unsigned short generate_io_state( void *arg )\r
 211 {\r
 212         extern long lParTestGetLEDState( unsigned long ulLED );\r
 213         unsigned short usRawVoltage;\r
 214         const ace_channel_handle_t xVoltageChannel = ( ace_channel_handle_t ) 0;\r
 215 \r
 216         ( void ) arg;\r
 217 \r
 218         /* Are the dynamically setable LEDs currently on or off? */\r
 219         if( lParTestGetLEDState( 3 ) )\r
 220         {\r
 221                 pcStatus = "checked";\r
 222         }\r
 223         else\r
 224         {\r
 225                 pcStatus = "";\r
 226         }\r
 227 \r
 228         usRawVoltage = ( unsigned short ) ACE_get_ppe_sample( xVoltageChannel );\r
 229         sprintf( uip_appdata, "<input type=\"checkbox\" name=\"LED0\" value=\"1\" %s>LED<p><p><p>Raw voltage input is %d", pcStatus, usRawVoltage );\r
 230 \r
 231         return strlen( uip_appdata );\r
 232 }\r
 233 \r
 234 /*---------------------------------------------------------------------------*/\r
 235 extern void vTaskGetRunTimeStats( char *pcWriteBuffer );\r
 236 extern unsigned short usMaxJitter;\r
 237 static unsigned short generate_runtime_stats( void *arg )\r
 238 {\r
 239         ( void ) arg;\r
 240         lRefreshCount++;\r
 241         sprintf( cCountBuf, "<p><br>Refresh count = %d", ( int ) lRefreshCount );\r
 242 \r
 243         vTaskGetRunTimeStats( ( char * ) uip_appdata );\r
 244         strcat( uip_appdata, cCountBuf );\r
 245 \r
 246         return strlen( uip_appdata );\r
 247 }\r
 248 \r
 249 /*---------------------------------------------------------------------------*/\r
 250 static PT_THREAD( run_time ( struct httpd_state *s, char *ptr ) )\r
 251 {\r
 252         PSOCK_BEGIN( &s->sout );\r
 253         ( void ) ptr;\r
 254         ( void ) PT_YIELD_FLAG;\r
 255         PSOCK_GENERATOR_SEND( &s->sout, generate_runtime_stats, NULL );\r
 256         PSOCK_END( &s->sout );\r
 257 }\r
 258 \r
 259 /*---------------------------------------------------------------------------*/\r
 260 static PT_THREAD( led_io ( struct httpd_state *s, char *ptr ) )\r
 261 {\r
 262         PSOCK_BEGIN( &s->sout );\r
 263         ( void ) ptr;\r
 264         ( void ) PT_YIELD_FLAG;\r
 265         PSOCK_GENERATOR_SEND( &s->sout, generate_io_state, NULL );\r
 266         PSOCK_END( &s->sout );\r
 267 }\r
 268 \r
 269 /** @} */\r