diff --git a/Web/.wmlrc b/Web/.wmlrc new file mode 100644 index 0000000..f45bb62 --- /dev/null +++ b/Web/.wmlrc @@ -0,0 +1 @@ +-I . diff --git a/Web/Makefile b/Web/Makefile new file mode 100644 index 0000000..d9d3404 --- /dev/null +++ b/Web/Makefile @@ -0,0 +1,19 @@ +PAGESHTML=$(shell ls *.wml | grep -v template | sed 's/.wml/.html/' ) +DEST=bortz@echoping.sourceforge.net:/home/groups/echoping/htdocs + +all: test + +%.html: %.wml template.wml + wml -o $@ ${DEBUG} $< + +test: ${PAGESHTML} + @for page in ${PAGESHTML}; do \ + (nsgmls -s $$page) \ + done + +install: ${PAGESHTML} + cvs commit + scp -v ${PAGESHTML} ${DEST} + +clean: + rm -f ${PAGESHTML} diff --git a/Web/index.wml b/Web/index.wml new file mode 100644 index 0000000..6590378 --- /dev/null +++ b/Web/index.wml @@ -0,0 +1,76 @@ +#use wml::template Title="echoping Home Page" + + + +

"echoping" is a small program to test (approximatively) performances of a +remote host by sending it TCP "echo" (or other protocol) packets. + +

To install it, see the INSTALL file. Or type "make" if you're in a +hurry :-) Download, if you wish. + +

To use it, simply: + +

+% echoping machine.somewhere.org
+
+ +

or use the options before the machine name (see the man page). + +

See the DETAILS file for various traps when benchmarking networks, +specially with this program + +

In any case, be polite: don't bother the remote host with many repeated +requests, especially with large size. Ask for permission if you often +test hosts which aren't yours. + +

Current features: + +

+ +

Examples of output: + +

    + +
  1. (Simple test with 1000 bytes echo TCP packets) +
    +% echoping -v -s 1000 mycisco
+This is echoping, version 2.0.
+Trying to connect to internet address 10.99.64.1 to transmit 256 bytes...
+Connected...
+Sent (1000 bytes)...
+Checked
+Elapsed time: 0.059597 seconds
+
    + +
  2. (Repeated tests with average and median displayed.) +
    +% echoping -n 10 mymachine
+[...]
+Minimum time: 0.170719 seconds (1500 bytes per sec.)
+Maximum time: 0.211176 seconds (1212 bytes per sec.)
+Average time: 0.184577 seconds (1387 bytes per sec.)
+Median time: 0.181332 seconds (1412 bytes per sec.)
+
    + +
  3. (Testing a Web server with an HTTP request for its home page.) +
    +%  echoping -h / mywww
+Elapsed time: 0.686792 seconds
+
    + +
+ +

(The exit status is set if there is any problem, so you can use echoping +to test repeatedly a Web server, to be sure it runs fine.) + +

To do for a future version: + +

diff --git a/Web/template.wml b/Web/template.wml new file mode 100644 index 0000000..db51e2e --- /dev/null +++ b/Web/template.wml @@ -0,0 +1,82 @@ +#use wml::std::info + + + + + + + + + + + +Last update done on +<: +($device, $inode, $mode, $nlink, $uid, $gid, $rdev, + $size, + $access_time, $modif_time, $creat_time, + $block_size, $blocks) + = stat ($WML_SRC_FILENAME); +print &time2string($modif_time, 1); +:> +(last regeneration by +WML $(WML_VERSION) on <: +print &time2string(time(), 1); +:>). + + + + + + +$(Title) + + + + +

$(Title)

+ +<> + + + +
+ +SourceForge Logo
+ +echoping is managed by Stéphane Bortzmeyer +<bortz@users.sourceforge.net>. + + + + + +..Body>> + +<: +sub time2string { + my ($time, $display_day) = @_; + my ($result); + my ($week_day_text); + my ($seconds, $minutes, $hours, $days, $month, $year, $week_day, $year_day, $is_dst) = + gmtime ($time); + $month_text = (January, February, March, April, May, June, July, + August, September, October, November, December) + [$month]; + if ($display_day) { + $week_day_text = (Sunday, Monday, Tuesday, Wednesday, Thursday, + Friday, Saturday) [$week_day]; + } + $year = $year + 1900; + + $result = "$week_day_text $days $month_text $year"; + + return $result; +} + +:>