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