begriffs open source - cmsis-freertos/blob - Demo/RX600_RX62N-RSK_IAR/webserver/httpd-cgi.c

   1 /**
   2  * \addtogroup httpd
   3  * @{
   4  */
   5
   6 /**
   7  * \file
   8  *         Web server script interface
   9  * \author
  10  *         Adam Dunkels <adam@sics.se>
  11  *
  12  */
  13
  14 /*
  15  * Copyright (c) 2001-2006, Adam Dunkels.
  16  * All rights reserved.
  17  *
  18  * Redistribution and use in source and binary forms, with or without
  19  * modification, are permitted provided that the following conditions
  20  * are met:
  21  * 1. Redistributions of source code must retain the above copyright
  22  *    notice, this list of conditions and the following disclaimer.
  23  * 2. Redistributions in binary form must reproduce the above copyright
  24  *    notice, this list of conditions and the following disclaimer in the
  25  *    documentation and/or other materials provided with the distribution.
  26  * 3. The name of the author may not be used to endorse or promote
  27  *    products derived from this software without specific prior
  28  *    written permission.
  29  *
  30  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS
  31  * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
  32  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  33  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
  34  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  35  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
  36  * GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  37  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
  38  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
  39  * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
  40  * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  41  *
  42  * This file is part of the uIP TCP/IP stack.
  43  *
  44  * $Id: httpd-cgi.c,v 1.2 2006/06/11 21:46:37 adam Exp $
  45  *
  46  */
  47 #include "net/uip.h"
  48 #include "net/psock.h"
  49 #include "apps/httpd/httpd.h"
  50 #include "apps/httpd/httpd-cgi.h"
  51 #include "apps/httpd/httpd-fs.h"
  52
  53 #include <stdio.h>
  54 #include <string.h>
  55
  56 #include "FreeRTOS.h"
  57 #include "task.h"
  58
  59 HTTPD_CGI_CALL( file, "file-stats", file_stats );
  60 HTTPD_CGI_CALL( tcp, "tcp-connections", tcp_stats );
  61 HTTPD_CGI_CALL( net, "net-stats", net_stats );
  62 HTTPD_CGI_CALL( rtos, "rtos-stats", rtos_stats );
  63 HTTPD_CGI_CALL( run, "run-time", run_time );
  64 HTTPD_CGI_CALL( io, "led-io", led_io );
  65
  66 static const struct httpd_cgi_call      *calls[] = { &file, &tcp, &net, &rtos, &run, &io, NULL };
  67
  68 /*---------------------------------------------------------------------------*/
  69 static PT_THREAD( nullfunction ( struct httpd_state *s, char *ptr ) )
  70 {
  71         PSOCK_BEGIN( &s->sout );
  72         ( void ) ptr;
  73         ( void ) PT_YIELD_FLAG;
  74         PSOCK_END( &s->sout );
  75 }
  76
  77 /*---------------------------------------------------------------------------*/
  78 httpd_cgifunction httpd_cgi( char *name )
  79 {
  80         const struct httpd_cgi_call **f;
  81
  82         /* Find the matching name in the table, return the function. */
  83         for( f = calls; *f != NULL; ++f )
  84         {
  85                 if( strncmp((*f)->name, name, strlen((*f)->name)) == 0 )
  86                 {
  87                         return( *f )->function;
  88                 }
  89         }
  90
  91         return nullfunction;
  92 }
  93
  94 /*---------------------------------------------------------------------------*/
  95 static unsigned short generate_file_stats( void *arg )
  96 {
  97         char    *f = ( char * ) arg;
  98         return sprintf( ( char * ) uip_appdata, "%5u", httpd_fs_count(f) );
  99 }
 100
 101 /*---------------------------------------------------------------------------*/
 102 static PT_THREAD( file_stats ( struct httpd_state *s, char *ptr ) )
 103 {
 104         PSOCK_BEGIN( &s->sout );
 105
 106         ( void ) PT_YIELD_FLAG;
 107
 108         PSOCK_GENERATOR_SEND( &s->sout, generate_file_stats, strchr(ptr, ' ') + 1 );
 109
 110         PSOCK_END( &s->sout );
 111 }
 112
 113 /*---------------------------------------------------------------------------*/
 114 static const char       closed[] = /*  "CLOSED",*/ { 0x43, 0x4c, 0x4f, 0x53, 0x45, 0x44, 0 };
 115 static const char       syn_rcvd[] = /*  "SYN-RCVD",*/ { 0x53, 0x59, 0x4e, 0x2d, 0x52, 0x43, 0x56, 0x44, 0 };
 116 static const char       syn_sent[] = /*  "SYN-SENT",*/ { 0x53, 0x59, 0x4e, 0x2d, 0x53, 0x45, 0x4e, 0x54, 0 };
 117 static const char       established[] = /*  "ESTABLISHED",*/ { 0x45, 0x53, 0x54, 0x41, 0x42, 0x4c, 0x49, 0x53, 0x48, 0x45, 0x44, 0 };
 118 static const char       fin_wait_1[] = /*  "FIN-WAIT-1",*/ { 0x46, 0x49, 0x4e, 0x2d, 0x57, 0x41, 0x49, 0x54, 0x2d, 0x31, 0 };
 119 static const char       fin_wait_2[] = /*  "FIN-WAIT-2",*/ { 0x46, 0x49, 0x4e, 0x2d, 0x57, 0x41, 0x49, 0x54, 0x2d, 0x32, 0 };
 120 static const char       closing[] = /*  "CLOSING",*/ { 0x43, 0x4c, 0x4f, 0x53, 0x49, 0x4e, 0x47, 0 };
 121 static const char       time_wait[] = /*  "TIME-WAIT,"*/ { 0x54, 0x49, 0x4d, 0x45, 0x2d, 0x57, 0x41, 0x49, 0x54, 0 };
 122 static const char       last_ack[] = /*  "LAST-ACK"*/ { 0x4c, 0x41, 0x53, 0x54, 0x2d, 0x41, 0x43, 0x4b, 0 };
 123
 124 static const char       *states[] = { closed, syn_rcvd, syn_sent, established, fin_wait_1, fin_wait_2, closing, time_wait, last_ack };
 125
 126 static unsigned short generate_tcp_stats( void *arg )
 127 {
 128         struct uip_conn         *conn;
 129         struct httpd_state      *s = ( struct httpd_state * ) arg;
 130
 131         conn = &uip_conns[s->count];
 132         return sprintf( ( char * ) uip_appdata,
 133                                          "<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),
 134                                          htons(conn->ripaddr.u16[0]) >> 8, htons(conn->ripaddr.u16[0]) & 0xff, htons(conn->ripaddr.u16[1]) >> 8,
 135                                          htons(conn->ripaddr.u16[1]) & 0xff, htons(conn->rport), states[conn->tcpstateflags & UIP_TS_MASK], conn->nrtx, conn->timer,
 136                                          (uip_outstanding(conn)) ? '*' : ' ', (uip_stopped(conn)) ? '!' : ' ' );
 137 }
 138
 139 /*---------------------------------------------------------------------------*/
 140 static PT_THREAD( tcp_stats ( struct httpd_state *s, char *ptr ) )
 141 {
 142         PSOCK_BEGIN( &s->sout );
 143         ( void ) ptr;
 144         ( void ) PT_YIELD_FLAG;
 145         for( s->count = 0; s->count < UIP_CONNS; ++s->count )
 146         {
 147                 if( (uip_conns[s->count].tcpstateflags & UIP_TS_MASK) != UIP_CLOSED )
 148                 {
 149                         PSOCK_GENERATOR_SEND( &s->sout, generate_tcp_stats, s );
 150                 }
 151         }
 152
 153         PSOCK_END( &s->sout );
 154 }
 155
 156 /*---------------------------------------------------------------------------*/
 157 static unsigned short generate_net_stats( void *arg )
 158 {
 159         struct httpd_state      *s = ( struct httpd_state * ) arg;
 160         return sprintf( ( char * ) uip_appdata, "%5u\n", (( uip_stats_t * ) &uip_stat)[s->count] );
 161 }
 162
 163 static PT_THREAD( net_stats ( struct httpd_state *s, char *ptr ) )
 164 {
 165         PSOCK_BEGIN( &s->sout );
 166         ( void ) ptr;
 167         ( void ) PT_YIELD_FLAG;
 168 #if UIP_STATISTICS
 169         for( s->count = 0; s->count < sizeof(uip_stat) / sizeof(uip_stats_t); ++s->count )
 170         {
 171                 PSOCK_GENERATOR_SEND( &s->sout, generate_net_stats, s );
 172         }
 173
 174 #endif /* UIP_STATISTICS */
 175
 176         PSOCK_END( &s->sout );
 177 }
 178
 179 /*---------------------------------------------------------------------------*/
 180 extern void vTaskList( char *pcWriteBuffer );
 181 extern char *pcGetTaskStatusMessage( void );
 182 static char cCountBuf[128];
 183 long            lRefreshCount = 0;
 184 static unsigned short generate_rtos_stats( void *arg )
 185 {
 186         ( void ) arg;
 187         lRefreshCount++;
 188         sprintf( cCountBuf, "<p><br>Refresh count = %d<p><br>%s", ( int ) lRefreshCount, pcGetTaskStatusMessage() );
 189         vTaskList( ( char * ) uip_appdata );
 190         strcat( uip_appdata, cCountBuf );
 191
 192         return strlen( uip_appdata );
 193 }
 194
 195 /*---------------------------------------------------------------------------*/
 196 static PT_THREAD( rtos_stats ( struct httpd_state *s, char *ptr ) )
 197 {
 198         PSOCK_BEGIN( &s->sout );
 199         ( void ) ptr;
 200         ( void ) PT_YIELD_FLAG;
 201         PSOCK_GENERATOR_SEND( &s->sout, generate_rtos_stats, NULL );
 202         PSOCK_END( &s->sout );
 203 }
 204
 205 /*---------------------------------------------------------------------------*/
 206 char                    *pcStatus;
 207 unsigned long   ulString;
 208
 209 static unsigned short generate_io_state( void *arg )
 210 {
 211         extern long lParTestGetLEDState( unsigned long ulLED );
 212         ( void ) arg;
 213
 214         /* Are the dynamically setable LEDs currently on or off? */
 215         if( lParTestGetLEDState( 3 ) )
 216         {
 217                 pcStatus = "checked";
 218         }
 219         else
 220         {
 221                 pcStatus = "";
 222         }
 223
 224         sprintf( uip_appdata, "<input type=\"checkbox\" name=\"LED0\" value=\"1\" %s>LED<p><p>", pcStatus );
 225
 226         return strlen( uip_appdata );
 227 }
 228
 229 /*---------------------------------------------------------------------------*/
 230 extern void vTaskGetRunTimeStats( char *pcWriteBuffer );
 231 extern unsigned short usMaxJitter;
 232 static char cJitterBuffer[ 200 ];
 233 static unsigned short generate_runtime_stats( void *arg )
 234 {
 235         ( void ) arg;
 236         lRefreshCount++;
 237         sprintf( cCountBuf, "<p><br>Refresh count = %d", ( int ) lRefreshCount );
 238
 239         #ifdef INCLUDE_HIGH_FREQUENCY_TIMER_TEST
 240         {
 241                 sprintf( cJitterBuffer, "<p><br>Max high frequency timer jitter = %d peripheral clock periods.<p><br>", ( int ) usMaxJitter );
 242                 vTaskGetRunTimeStats( ( char * ) uip_appdata );
 243                 strcat( uip_appdata, cJitterBuffer );
 244         }
 245         #else
 246         {
 247                 ( void ) cJitterBuffer;
 248                 strcpy( uip_appdata, "<p>Run time stats are only available in the debug_with_optimisation build configuration.<p>" );
 249         }
 250         #endif
 251
 252         strcat( uip_appdata, cCountBuf );
 253
 254         return strlen( uip_appdata );
 255 }
 256
 257 /*---------------------------------------------------------------------------*/
 258 static PT_THREAD( run_time ( struct httpd_state *s, char *ptr ) )
 259 {
 260         PSOCK_BEGIN( &s->sout );
 261         ( void ) ptr;
 262         ( void ) PT_YIELD_FLAG;
 263         PSOCK_GENERATOR_SEND( &s->sout, generate_runtime_stats, NULL );
 264         PSOCK_END( &s->sout );
 265 }
 266
 267 /*---------------------------------------------------------------------------*/
 268 static PT_THREAD( led_io ( struct httpd_state *s, char *ptr ) )
 269 {
 270         PSOCK_BEGIN( &s->sout );
 271         ( void ) ptr;
 272         ( void ) PT_YIELD_FLAG;
 273         PSOCK_GENERATOR_SEND( &s->sout, generate_io_state, NULL );
 274         PSOCK_END( &s->sout );
 275 }
 276
 277 /** @} */