#!/usr/bin/perl
#
# This is a telnet/login replay program. It will replay a session using
# the timestamps from the packet 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.telnet.replay 2
#
# Auto generated by Chaosreader.
#
$| = 1;
$factor = $ARGV[0] || 1;
sub msleep {
	$ms = shift;
	$ms = $ms / $factor;
	select(undef, undef, undef, $ms);
}
print '';
msleep(0.0439499616622925);
print 'ÿýÿýÿý#ÿý\'ÿý$';
msleep(0.000810027122497559);
print '';
msleep(0.000429987907409668);
print '';
msleep(0.00018000602722168);
print 'ÿþÿþ#ÿþ\'ÿþ$ÿúÿð';
msleep(0.0473400354385376);
print '';
msleep(0.00177001953125);
print '

SunOS 5.9
 
 ';
msleep(0.155709981918335);
print 'ÿûÿûÿýWARNING: This system is for Authorised Users only.
        Your actions on this server will be logged.
login: ';
msleep(0.0425299406051636);
print '';
msleep(0.00074005126953125);
print 'ÿûÿþ';
msleep(0.0492600202560425);
print '';
msleep(0.837239980697632);
print 'r';
msleep(0.101310014724731);
print 'o';
msleep(0.14148998260498);
print 'o';
msleep(0.071429967880249);
print 't';
msleep(0.143229961395264);
print '
';
msleep(0.11214005947113);
print 'Password: ';
msleep(0.533210039138794);
print '';
msleep(0.119919896125793);
print '';
msleep(0.170000076293945);
print '';
msleep(0.100000023841858);
print '';
msleep(0.120009899139404);
print '';
msleep(0.119989991188049);
print '';
msleep(0.189990043640137);
print '';
msleep(0.10001003742218);
print '';
msleep(0.129989981651306);
print '';
msleep(0.188269972801208);
print '
';
msleep(4.00206005573273);
print 'Login incorrect
';
msleep(0.12434995174408);
print 'WARNING: This system is for Authorised Users only.
        Your actions on this server will be logged.
login: ';
msleep(0.56659996509552);
print 'r';
msleep(0.091670036315918);
print 'o';
msleep(0.119430065155029);
print 'o';
msleep(0.0681499242782593);
print 't';
msleep(0.166949987411499);
print '
';
msleep(0.186740040779114);
print 'Password: ';
msleep(0.525789976119995);
print '';
msleep(0.140009999275208);
print '';
msleep(0.14998996257782);
print '';
msleep(0.190000057220459);
print '';
msleep(0.120010018348694);
print '';
msleep(0.159979939460754);
print '';
msleep(0.0700000524520874);
print '';
msleep(0.149080038070679);
print '
';
msleep(4.00130999088287);
print 'Login incorrect
';
msleep(0.191669940948486);
print 'WARNING: This system is for Authorised Users only.
        Your actions on this server will be logged.
login: ';
msleep(2.24572002887726);
print 'r';
msleep(0.101410031318665);
print 'o';
msleep(0.145239949226379);
print 'o';
msleep(0.097599983215332);
print 't';
msleep(0.14762008190155);
print '
';
msleep(0.161019921302795);
print 'Password: ';
msleep(0.579370021820068);
print '';
msleep(0.129960060119629);
print '';
msleep(0.11001992225647);
print '';
msleep(0.190029978752136);
print '';
msleep(0.119970083236694);
print '';
msleep(0.0852599143981934);
print '
';
msleep(3.99496006965637);
print 'Login incorrect
';
msleep(0.18870997428894);
print 'WARNING: This system is for Authorised Users only.
        Your actions on this server will be logged.
login: ';
msleep(0);
