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