%description:
Test retransmission:
- initial RTO is 3s
- it doubles with each retransmission, up to 240s
- client gives up after 12 retries

%inifile: {}.ini
[General]
#preload-ned-files = *.ned ../../*.ned @../../../../nedfiles.lst
ned-path = .;../../../../src;../../lib

#omnetpp 5.0 - 5.1 compatibility:
eventlog-file = "${resultdir}/${configname}-${runnumber}.elog"
output-scalar-file = "${resultdir}/${configname}-${runnumber}.sca"
output-vector-file = "${resultdir}/${configname}-${runnumber}.vec"
snapshot-file = "${resultdir}/${configname}-${runnumber}.sna"

#[Cmdenv]
cmdenv-event-banners=false
cmdenv-express-mode=false

#[Parameters]
*.testing=true
cmdenv-log-prefix="[%c]: "

*.cli_app.tSend=1s
*.cli_app.sendBytes=100B

# delete segments to force their retransmission
*.tcptester.script="a3 delete;a4 delete;a5 delete;a6 delete;a7 delete;a8 delete;a9 delete;a10 delete;a11 delete;a12 delete;a13 delete;a14 delete;a15 delete;"

include ../../lib/defaults.ini

%#--------------------------------------------------------------------------------------------------------------
%file: postrun.pl
open FILE, '<test.out';
while($sor = <FILE>)
{
    if ($sor =~ /^\[testing\]: (.*)$/)
    {
        print "$1\n";
    }
}
%#--------------------------------------------------------------------------------------------------------------
%postrun-command:  perl ./postrun.pl
%#--------------------------------------------------------------------------------------------------------------
%contains: postrun-command(1).out
[1.001 A003] A.1000 > B.2000: A 1:101(100) ack 501 win 16384 # deleting
[4.001 A004] A.1000 > B.2000: A 1:101(100) ack 501 win 16384 # deleting
[10.001 A005] A.1000 > B.2000: A 1:101(100) ack 501 win 16384 # deleting
[22.001 A006] A.1000 > B.2000: A 1:101(100) ack 501 win 16384 # deleting
[46.001 A007] A.1000 > B.2000: A 1:101(100) ack 501 win 16384 # deleting
[94.001 A008] A.1000 > B.2000: A 1:101(100) ack 501 win 16384 # deleting
[190.001 A009] A.1000 > B.2000: A 1:101(100) ack 501 win 16384 # deleting
[382.001 A010] A.1000 > B.2000: A 1:101(100) ack 501 win 16384 # deleting
[622.001 A011] A.1000 > B.2000: A 1:101(100) ack 501 win 16384 # deleting
[862.001 A012] A.1000 > B.2000: A 1:101(100) ack 501 win 16384 # deleting
[1102.001 A013] A.1000 > B.2000: A 1:101(100) ack 501 win 16384 # deleting
[1342.001 A014] A.1000 > B.2000: A 1:101(100) ack 501 win 16384 # deleting
[1582.001 A015] A.1000 > B.2000: A 1:101(100) ack 501 win 16384 # deleting
cli_tcp: ESTABLISHED --> CLOSED  (on ABORT)
[1822.000] tcpdump finished, A:15 B:1 segments
%#--------------------------------------------------------------------------------------------------------------
%not-contains: stdout
undisposed object:
%#--------------------------------------------------------------------------------------------------------------
%not-contains: stdout
-- check module destructor
%#--------------------------------------------------------------------------------------------------------------