#!/usr/bin/perl
#
# This is a text SSH replay program. It will replay details of the 
# original SSH session using timestamps from the packet capture log.
#
# USAGE: run the script as normal. You can provide a factor as an
#	argument, eg "2" to run twice as fast, or "0.5" to run
#	at half time. eg,
# 		./session_0002.textSSH.replay 2
#
# Auto generated by Chaosreader.
#
$| = 1;
$factor = $ARGV[0] || 1;
sub ms {
	$ms = shift;
	$ms = $ms / $factor;
	select(undef, undef, undef, $ms);
}
print <<'SUBEND';
SSH text analysis replay
------------------------
"*" is client traffic (including keystrokes), "." is the return text.
A number is a multiple of the previous char, eg ".32" is 32 return chars.

SUBEND
print '*
';
ms(0.0228500366210938);
print '.
';
ms(0.712790012359619);
print '*
';
ms(0.0171999931335449);
print '.
';
ms(0.513009786605835);
print '*
';
ms(0.0170001983642578);
print '.288
';
ms(0.157949924468994);
print '*
';
ms(0.0120398998260498);
print '.112
';
ms(0.16769003868103);
print '*';
ms(0.0123100280761719);
print '.';
ms(0.12664008140564);
print '*';
ms(0.0133600234985352);
print '.';
ms(0.450929880142212);
print '*';
ms(0.0190701484680176);
print '.';
ms(0.204949855804443);
print '*';
ms(0.015049934387207);
print '.';
ms(0.384720087051392);
print '*';
ms(0.01528000831604);
print '.';
ms(0.112720012664795);
print '*';
ms(0.017280101776123);
print '.';
ms(0.142819881439209);
print '*';
ms(0.0171799659729004);
print '.';
ms(0.222769975662231);
print '*';
ms(0.017240047454834);
print '.';
ms(0.286790132522583);
print '*';
ms(0.0131998062133789);
print '.';
ms(0.130779981613159);
print '*
';
ms(0.0192201137542725);
print '.160
';
ms(4.98993992805481);
print '*';
ms(0.0200600624084473);
print '.';
ms(0.186729907989502);
print '*';
ms(0.0132601261138916);
print '.';
ms(0.131749868392944);
print '*';
ms(0.0282599925994873);
print '.';
ms(0.0507800579071045);
print '*';
ms(0.0192201137542725);
print '.';
ms(1.08616995811462);
print '*';
ms(0.0138299465179443);
print '.';
ms(0.112780094146729);
print '*';
ms(0.0172200202941895);
print '.';
ms(0);
print "

Summary: 10.51 seconds, 2880 bytes, 0.26 Kb/sec\n";