git.sur5r.net Git - freertos/blob - FreeRTOS/Demo/ColdFire_MCF51CN128_CodeWarrior/Sources/httpd/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 \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(io, "led-io", led_io );\r
  62 \r
  63 \r
  64 static const struct httpd_cgi_call *calls[] = { &file, &tcp, &net, &rtos, &io, NULL };\r
  65 \r
  66 /*---------------------------------------------------------------------------*/\r
  67 static\r
  68 PT_THREAD(nullfunction(struct httpd_state *s, char *ptr))\r
  69 {\r
  70   ( void ) ptr;\r
  71   PSOCK_BEGIN(&s->sout);\r
  72   PSOCK_END(&s->sout);\r
  73 }\r
  74 /*---------------------------------------------------------------------------*/\r
  75 httpd_cgifunction\r
  76 httpd_cgi(char *name)\r
  77 {\r
  78   const struct httpd_cgi_call **f;\r
  79 \r
  80   /* Find the matching name in the table, return the function. */\r
  81   for(f = calls; *f != NULL; ++f) {\r
  82     if(strncmp((*f)->name, name, strlen((*f)->name)) == 0) {\r
  83       return (*f)->function;\r
  84     }\r
  85   }\r
  86   return nullfunction;\r
  87 }\r
  88 /*---------------------------------------------------------------------------*/\r
  89 static unsigned short\r
  90 generate_file_stats(void *arg)\r
  91 {\r
  92   char *f = (char *)arg;\r
  93   return snprintf((char *)uip_appdata, UIP_APPDATA_SIZE, "%5u", httpd_fs_count(f));\r
  94 }\r
  95 /*---------------------------------------------------------------------------*/\r
  96 static\r
  97 PT_THREAD(file_stats(struct httpd_state *s, char *ptr))\r
  98 {\r
  99   PSOCK_BEGIN(&s->sout);\r
 100 \r
 101   PSOCK_GENERATOR_SEND(&s->sout, generate_file_stats, strchr(ptr, ' ') + 1);\r
 102 \r
 103   PSOCK_END(&s->sout);\r
 104 }\r
 105 /*---------------------------------------------------------------------------*/\r
 106 static const char closed[] =   /*  "CLOSED",*/\r
 107 {0x43, 0x4c, 0x4f, 0x53, 0x45, 0x44, 0};\r
 108 static const char syn_rcvd[] = /*  "SYN-RCVD",*/\r
 109 {0x53, 0x59, 0x4e, 0x2d, 0x52, 0x43, 0x56,\r
 110  0x44,  0};\r
 111 static const char syn_sent[] = /*  "SYN-SENT",*/\r
 112 {0x53, 0x59, 0x4e, 0x2d, 0x53, 0x45, 0x4e,\r
 113  0x54,  0};\r
 114 static const char established[] = /*  "ESTABLISHED",*/\r
 115 {0x45, 0x53, 0x54, 0x41, 0x42, 0x4c, 0x49, 0x53, 0x48,\r
 116  0x45, 0x44, 0};\r
 117 static const char fin_wait_1[] = /*  "FIN-WAIT-1",*/\r
 118 {0x46, 0x49, 0x4e, 0x2d, 0x57, 0x41, 0x49,\r
 119  0x54, 0x2d, 0x31, 0};\r
 120 static const char fin_wait_2[] = /*  "FIN-WAIT-2",*/\r
 121 {0x46, 0x49, 0x4e, 0x2d, 0x57, 0x41, 0x49,\r
 122  0x54, 0x2d, 0x32, 0};\r
 123 static const char closing[] = /*  "CLOSING",*/\r
 124 {0x43, 0x4c, 0x4f, 0x53, 0x49,\r
 125  0x4e, 0x47, 0};\r
 126 static const char time_wait[] = /*  "TIME-WAIT,"*/\r
 127 {0x54, 0x49, 0x4d, 0x45, 0x2d, 0x57, 0x41,\r
 128  0x49, 0x54, 0};\r
 129 static const char last_ack[] = /*  "LAST-ACK"*/\r
 130 {0x4c, 0x41, 0x53, 0x54, 0x2d, 0x41, 0x43,\r
 131  0x4b, 0};\r
 132 \r
 133 static const char *states[] = {\r
 134   closed,\r
 135   syn_rcvd,\r
 136   syn_sent,\r
 137   established,\r
 138   fin_wait_1,\r
 139   fin_wait_2,\r
 140   closing,\r
 141   time_wait,\r
 142   last_ack};\r
 143 \r
 144 \r
 145 static unsigned short\r
 146 generate_tcp_stats(void *arg)\r
 147 {\r
 148   struct uip_conn *conn;\r
 149   struct httpd_state *s = (struct httpd_state *)arg;\r
 150 \r
 151   conn = &uip_conns[s->count];\r
 152   return snprintf((char *)uip_appdata, UIP_APPDATA_SIZE,\r
 153                  "<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
 154                  htons(conn->lport),\r
 155                  htons(conn->ripaddr[0]) >> 8,\r
 156                  htons(conn->ripaddr[0]) & 0xff,\r
 157                  htons(conn->ripaddr[1]) >> 8,\r
 158                  htons(conn->ripaddr[1]) & 0xff,\r
 159                  htons(conn->rport),\r
 160                  states[conn->tcpstateflags & UIP_TS_MASK],\r
 161                  conn->nrtx,\r
 162                  conn->timer,\r
 163                  (uip_outstanding(conn))? '*':' ',\r
 164                  (uip_stopped(conn))? '!':' ');\r
 165 }\r
 166 /*---------------------------------------------------------------------------*/\r
 167 static\r
 168 PT_THREAD(tcp_stats(struct httpd_state *s, char *ptr))\r
 169 {\r
 170 \r
 171   ( void ) ptr;\r
 172   PSOCK_BEGIN(&s->sout);\r
 173 \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   ( void ) ptr;\r
 195   PSOCK_BEGIN(&s->sout);\r
 196 \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( char *pcWriteBuffer );\r
 211 extern unsigned long ulCheckErrors;\r
 212 static char cCountBuf[ 32 ];\r
 213 long lRefreshCount = 0;\r
 214 static unsigned short\r
 215 generate_rtos_stats(void *arg)\r
 216 {\r
 217         ( void ) arg;\r
 218         lRefreshCount++;\r
 219         sprintf( cCountBuf, "<p><br>Refresh count = %d", lRefreshCount );\r
 220     vTaskList( ( char * ) uip_appdata );\r
 221         strcat( uip_appdata, cCountBuf );\r
 222 \r
 223         /* Have any errors been latched? */\r
 224         if( ulCheckErrors != 0 )\r
 225         {\r
 226                 strcat( uip_appdata, "<p><br><p>The check function has detected an error!  Error code = " );\r
 227                 sprintf( cCountBuf, "%x", ulCheckErrors );\r
 228                 strcat( uip_appdata, cCountBuf );\r
 229         }\r
 230         else\r
 231         {\r
 232                 strcat( uip_appdata, "<p><br><p>All tasks are executing with no errors reported.<p>" );\r
 233         }\r
 234 \r
 235         return strlen( uip_appdata );\r
 236 }\r
 237 /*---------------------------------------------------------------------------*/\r
 238 \r
 239 \r
 240 static\r
 241 PT_THREAD(rtos_stats(struct httpd_state *s, char *ptr))\r
 242 {\r
 243   ( void ) ptr;\r
 244   PSOCK_BEGIN(&s->sout);\r
 245   PSOCK_GENERATOR_SEND(&s->sout, generate_rtos_stats, NULL);\r
 246   PSOCK_END(&s->sout);\r
 247 }\r
 248 /*---------------------------------------------------------------------------*/\r
 249 \r
 250 char *pcStatus;\r
 251 extern unsigned long uxParTestGetLED( unsigned long uxLED );\r
 252 \r
 253 static unsigned short generate_io_state( void *arg )\r
 254 {\r
 255         ( void ) arg;\r
 256         if( uxParTestGetLED( 3 ) )\r
 257         {\r
 258                 pcStatus = "checked";\r
 259         }\r
 260         else\r
 261         {\r
 262                 pcStatus = "";\r
 263         }\r
 264 \r
 265         sprintf( uip_appdata, "<input type=\"checkbox\" name=\"LED3\" value=\"1\" %s>LED", pcStatus );\r
 266         return strlen( uip_appdata );\r
 267 }\r
 268 /*---------------------------------------------------------------------------*/\r
 269 \r
 270 static PT_THREAD(led_io(struct httpd_state *s, char *ptr))\r
 271 {\r
 272   ( void ) ptr;\r
 273   PSOCK_BEGIN(&s->sout);\r
 274   PSOCK_GENERATOR_SEND(&s->sout, generate_io_state, NULL);\r
 275   PSOCK_END(&s->sout);\r
 276 }\r
 277 \r
 278 /** @} */\r
 279 \r
 280 \r
 281 \r
 282 \r
 283 \r
 284 \r