Last change
on this file since 2334 was
2052,
checked in by mitchb, 13 years ago
|
Quentin is picky about headers - here, have them back
|
-
Property svn:executable set to
*
|
File size:
714 bytes
|
Rev | Line | |
---|
[1200] | 1 | #!/bin/bash |
---|
| 2 | |
---|
[1203] | 3 | ulimit -v 10240 |
---|
[1202] | 4 | |
---|
[1200] | 5 | # Read and ignore the request |
---|
| 6 | line=foo |
---|
| 7 | while [ -n "$line" ]; do |
---|
| 8 | read line |
---|
| 9 | line=${line%[:blank:]} |
---|
| 10 | line=${line% |
---|
| 11 | } |
---|
| 12 | done |
---|
| 13 | |
---|
| 14 | # Generate an HTTP reply |
---|
| 15 | |
---|
| 16 | echo "HTTP/1.0 200 OK |
---|
| 17 | " |
---|
| 18 | echo "Content-type: text/html |
---|
| 19 | " |
---|
| 20 | echo " |
---|
| 21 | " |
---|
| 22 | echo "<html><head><title>scripts.mit.edu server status</title></head><body><h1>scripts.mit.edu server status</h1><p>The following table shows a list of the servers that are currently handling web requests for scripts.mit.edu:</p><table>" |
---|
[2052] | 23 | /sbin/ipvsadm | sed 's/:0//; s/:Port//' | awk 'BEGIN { OFS="</td><td>"; show=1 } /^FWM 2 / { show=1 } /^FWM [^2] / { show=0 } /->/ { if (show==1) print "<tr><td>" $2, $4, $5, $6 "</td></tr>"}' |
---|
[1200] | 24 | echo "</table></body></html>" |
---|
Note: See
TracBrowser
for help on using the repository browser.