Rev Author Line No. Line
3328 povik 1 /**
2 * \addtogroup httpd
3 * @{
4 */
5  
6 /**
7 * \file
8 * HTTP server script language C functions file.
9 * \author Adam Dunkels <adam@dunkels.com>
10 *
11 * This file contains functions that are called by the web server
12 * scripts. The functions takes one argument, and the return value is
13 * interpreted as follows. A zero means that the function did not
14 * complete and should be invoked for the next packet as well. A
15 * non-zero value indicates that the function has completed and that
16 * the web server should move along to the next script line.
17 *
18 */
19  
20 /*
21 * Copyright (c) 2001, Adam Dunkels.
22 * All rights reserved.
23 *
24 * Redistribution and use in source and binary forms, with or without
25 * modification, are permitted provided that the following conditions
26 * are met:
27 * 1. Redistributions of source code must retain the above copyright
28 * notice, this list of conditions and the following disclaimer.
29 * 2. Redistributions in binary form must reproduce the above copyright
30 * notice, this list of conditions and the following disclaimer in the
31 * documentation and/or other materials provided with the distribution.
32 * 3. The name of the author may not be used to endorse or promote
33 * products derived from this software without specific prior
34 * written permission.
35 *
36 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS
37 * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
38 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
39 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
40 * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
41 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
42 * GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
43 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
44 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
45 * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
46 * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
47 *
48 * This file is part of the uIP TCP/IP stack.
49 *
50 * $Id: cgi.c,v 1.23.2.4 2003/10/07 13:22:27 adam Exp $
51 *
52 */
53  
54 #include "uip.h"
55 #include "cgi.h"
56 #include "httpd.h"
57 #include "fs.h"
58  
59 #include <stdio.h>
60 #include <string.h>
61  
62 static u8_t print_stats(u8_t next);
63 static u8_t file_stats(u8_t next);
64 static u8_t tcp_stats(u8_t next);
65  
66 cgifunction cgitab[] = {
67 print_stats, /* CGI function "a" */
68 file_stats, /* CGI function "b" */
69 tcp_stats /* CGI function "c" */
70 };
71  
72 static const char closed[] = /* "CLOSED",*/
73 {0x43, 0x4c, 0x4f, 0x53, 0x45, 0x44, 0};
74 static const char syn_rcvd[] = /* "SYN-RCVD",*/
75 {0x53, 0x59, 0x4e, 0x2d, 0x52, 0x43, 0x56,
76 0x44, 0};
77 static const char syn_sent[] = /* "SYN-SENT",*/
78 {0x53, 0x59, 0x4e, 0x2d, 0x53, 0x45, 0x4e,
79 0x54, 0};
80 static const char established[] = /* "ESTABLISHED",*/
81 {0x45, 0x53, 0x54, 0x41, 0x42, 0x4c, 0x49, 0x53, 0x48,
82 0x45, 0x44, 0};
83 static const char fin_wait_1[] = /* "FIN-WAIT-1",*/
84 {0x46, 0x49, 0x4e, 0x2d, 0x57, 0x41, 0x49,
85 0x54, 0x2d, 0x31, 0};
86 static const char fin_wait_2[] = /* "FIN-WAIT-2",*/
87 {0x46, 0x49, 0x4e, 0x2d, 0x57, 0x41, 0x49,
88 0x54, 0x2d, 0x32, 0};
89 static const char closing[] = /* "CLOSING",*/
90 {0x43, 0x4c, 0x4f, 0x53, 0x49,
91 0x4e, 0x47, 0};
92 static const char time_wait[] = /* "TIME-WAIT,"*/
93 {0x54, 0x49, 0x4d, 0x45, 0x2d, 0x57, 0x41,
94 0x49, 0x54, 0};
95 static const char last_ack[] = /* "LAST-ACK"*/
96 {0x4c, 0x41, 0x53, 0x54, 0x2d, 0x41, 0x43,
97 0x4b, 0};
98  
99 static const char *states[] = {
100 closed,
101 syn_rcvd,
102 syn_sent,
103 established,
104 fin_wait_1,
105 fin_wait_2,
106 closing,
107 time_wait,
108 last_ack};
109  
110  
111 /*-----------------------------------------------------------------------------------*/
112 /* print_stats:
113 *
114 * Prints out a part of the uIP statistics. The statistics data is
115 * written into the uip_appdata buffer. It overwrites any incoming
116 * packet.
117 */
118 static u8_t
119 print_stats(u8_t next)
120 {
121 #if UIP_STATISTICS
122 u16_t i, j;
123 u8_t *buf;
124 u16_t *databytes;
125  
126 if(next) {
127 /* If our last data has been acknowledged, we move on the next
128 chunk of statistics. */
129 hs->count = hs->count + 4;
130 if(hs->count >= sizeof(struct uip_stats)/sizeof(u16_t)) {
131 /* We have printed out all statistics, so we return 1 to
132 indicate that we are done. */
133 return 1;
134 }
135 }
136  
137 /* Write part of the statistics into the uip_appdata buffer. */
138 databytes = (u16_t *)&uip_stat + hs->count;
139 buf = (u8_t *)uip_appdata;
140  
141 j = 4 + 1;
142 i = hs->count;
143 while (i < sizeof(struct uip_stats)/sizeof(u16_t) && --j > 0) {
144 sprintf((char *)buf, "%5u\r\n", *databytes);
145 ++databytes;
146 buf += 6;
147 ++i;
148 }
149  
150 /* Send the data. */
151 uip_send(uip_appdata, buf - uip_appdata);
152  
153 return 0;
154 #else
155 return 1;
156 #endif /* UIP_STATISTICS */
157 }
158 /*-----------------------------------------------------------------------------------*/
159 static u8_t
160 file_stats(u8_t next)
161 {
162 /* We use sprintf() to print the number of file accesses to a
163 particular file (given as an argument to the function in the
164 script). We then use uip_send() to actually send the data. */
165 if(next) {
166 return 1;
167 }
168 uip_send(uip_appdata, sprintf((char *)uip_appdata, "%5u", fs_count(&hs->script[4])));
169 return 0;
170 }
171 /*-----------------------------------------------------------------------------------*/
172 static u8_t
173 tcp_stats(u8_t next)
174 {
175 struct uip_conn *conn;
176  
177 if(next) {
178 /* If the previously sent data has been acknowledged, we move
179 forward one connection. */
180 if(++hs->count == UIP_CONNS) {
181 /* If all connections has been printed out, we are done and
182 return 1. */
183 return 1;
184 }
185 }
186  
187 conn = &uip_conns[hs->count];
188 if((conn->tcpstateflags & TS_MASK) == CLOSED) {
189 uip_send(uip_appdata, sprintf((char *)uip_appdata,
190 "<tr align=\"center\"><td>-</td><td>-</td><td>%u</td><td>%u</td><td>%c %c</td></tr>\r\n",
191 conn->nrtx,
192 conn->timer,
193 (uip_outstanding(conn))? '*':' ',
194 (uip_stopped(conn))? '!':' '));
195 } else {
196 uip_send(uip_appdata, sprintf((char *)uip_appdata,
197 "<tr align=\"center\"><td>%u.%u.%u.%u:%u</td><td>%s</td><td>%u</td><td>%u</td><td>%c %c</td></tr>\r\n",
198 htons(conn->ripaddr[0]) >> 8,
199 htons(conn->ripaddr[0]) & 0xff,
200 htons(conn->ripaddr[1]) >> 8,
201 htons(conn->ripaddr[1]) & 0xff,
202 htons(conn->rport),
203 states[conn->tcpstateflags & TS_MASK],
204 conn->nrtx,
205 conn->timer,
206 (uip_outstanding(conn))? '*':' ',
207 (uip_stopped(conn))? '!':' '));
208 }
209 return 0;
210 }
211 /*-----------------------------------------------------------------------------------*/