#!/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);