#!/bin/tcsh
#
# gen-fig1-2
#
# Michele C. Weigle, mweigle@cs.odu.edu
# Old Dominion University, November 2006

set run = 4
set bw = 100
set stop = 3600
set rate = 50
set pairs = 100000
set window = 64
set debug = 0
set badRNG = 0
set datadir = "uncongested"
mkdir -p $datadir

ns pm-script.tcl \
run $run \
length $stop \
pairs $pairs \
PMrate $rate \
debug $debug \
badRNG $badRNG \
bw $bw \
window $window \
datadir $datadir >&! $datadir/exp-r$run.out

# generate figure 1
set FIG1 = "fig1.gp"
echo set xlabel \"Time \(s\)\"  > $FIG1
echo set ylabel \"Offered Load \(kbps\)\" >> $FIG1
echo set xrange \[:2000\] >> $FIG1
echo set mxtics 5 >> $FIG1
echo plot \"$datadir/exp-r04-load-1s-fwd.dat\" notitle w l lt -1 >> $FIG1

# generate figure 2
set FIG2 = "fig2.gp"
echo set xlabel \"Samples\" > $FIG2
echo set ylabel \"Mean Response Size \(bytes\)\" >> $FIG2
echo set xrange \[-500:100000\] >> $FIG2
echo set mxtics 2 >> $FIG2
echo plot \\ >> $FIG2
echo 7000 notitle w l lt 1 lw 2, \\ >> $FIG2
echo \"$datadir/exp-r04-rspsz-mean-PM0.dat\" notitle w l lt -1 >> $FIG2