git.sur5r.net Git - freertos/blob - Demo/ColdFire_MCF52233_Eclipse/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 \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   PSOCK_BEGIN(&s->sout);\r
  71   ( void ) ptr;\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   PSOCK_BEGIN(&s->sout);\r
 172   ( void ) ptr;\r
 173   for(s->count = 0; s->count < UIP_CONNS; ++s->count) {\r
 174     if((uip_conns[s->count].tcpstateflags & UIP_TS_MASK) != UIP_CLOSED) {\r
 175       PSOCK_GENERATOR_SEND(&s->sout, generate_tcp_stats, s);\r
 176     }\r
 177   }\r
 178 \r
 179   PSOCK_END(&s->sout);\r
 180 }\r
 181 /*---------------------------------------------------------------------------*/\r
 182 static unsigned short\r
 183 generate_net_stats(void *arg)\r
 184 {\r
 185   struct httpd_state *s = (struct httpd_state *)arg;\r
 186   return snprintf((char *)uip_appdata, UIP_APPDATA_SIZE,\r
 187                   "%5u\n", ((uip_stats_t *)&uip_stat)[s->count]);\r
 188 }\r
 189 \r
 190 static\r
 191 PT_THREAD(net_stats(struct httpd_state *s, char *ptr))\r
 192 {\r
 193   PSOCK_BEGIN(&s->sout);\r
 194   ( void ) ptr;\r
 195 #if UIP_STATISTICS\r
 196 \r
 197   for(s->count = 0; s->count < sizeof(uip_stat) / sizeof(uip_stats_t);\r
 198       ++s->count) {\r
 199     PSOCK_GENERATOR_SEND(&s->sout, generate_net_stats, s);\r
 200   }\r
 201 \r
 202 #endif /* UIP_STATISTICS */\r
 203 \r
 204   PSOCK_END(&s->sout);\r
 205 }\r
 206 /*---------------------------------------------------------------------------*/\r
 207 \r
 208 extern void vTaskList( signed char *pcWriteBuffer );\r
 209 extern unsigned long ulGetErrorCode( void );\r
 210 \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, Error code = %d (0 = no errors)", (int)lRefreshCount, (int)ulGetErrorCode() );\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 extern unsigned long uxParTestGetLED( unsigned long uxLED );\r
 239 \r
 240 static unsigned short generate_io_state( void *arg )\r
 241 {\r
 242         ( void ) arg;\r
 243 \r
 244         if( uxParTestGetLED( 3 ) )\r
 245         {\r
 246                 pcStatus = "checked";\r
 247         }\r
 248         else\r
 249         {\r
 250                 pcStatus = "";\r
 251         }\r
 252 \r
 253         sprintf( uip_appdata,\r
 254                 "<input type=\"checkbox\" name=\"LED0\" value=\"1\" %s>LED",\r
 255                 pcStatus );\r
 256 \r
 257         return strlen( uip_appdata );\r
 258 }\r
 259 /*---------------------------------------------------------------------------*/\r
 260 \r
 261 static PT_THREAD(led_io(struct httpd_state *s, char *ptr))\r
 262 {\r
 263   PSOCK_BEGIN(&s->sout);\r
 264   ( void ) ptr;\r
 265   PSOCK_GENERATOR_SEND(&s->sout, generate_io_state, NULL);\r
 266   PSOCK_END(&s->sout);\r
 267 }\r
 268 \r
 269 /** @} */\r
 270 \r
 271 \r
 272 \r
 273 \r
 274 \r
 275 \r