#!/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.045009970664978); print 'ÿýÿýÿý#ÿý\'ÿý$'; msleep(0.000760078430175781); print ''; msleep(0.000429987907409668); print ''; msleep(0.000169992446899414); print 'ÿþÿþ#ÿþ\'ÿþ$ÿúÿð'; msleep(0.0419000387191772); print ''; msleep(0.00134992599487305); print ' SunOS 5.9 '; msleep(0.194740056991577); print 'ÿûÿûÿýWARNING: This system is for Authorised Users only. Your actions on this server will be logged. login: '; msleep(0.0439199209213257); print ''; msleep(0.00112009048461914); print 'ÿûÿþ'; msleep(0.0488699674606323); print ''; msleep(0.666190028190613); print 'g'; msleep(0.117089986801147); print 'u'; msleep(0.116699934005737); print 'e'; msleep(0.201030015945435); print 's'; msleep(0.250210046768188); print 't'; msleep(0.24347996711731); print ' '; msleep(0.110689997673035); print 'Password: '; msleep(0.324620008468628); print ''; msleep(0.199990034103394); print ''; msleep(0.0699999332427979); print ''; msleep(0.240020036697388); print ''; msleep(0.0599900484085083); print ''; msleep(0.159999966621399); print ''; msleep(0.117280006408691); print ' '; msleep(0.127730011940002); print 'Last login: Mon Nov 17 20:24:16 from mercury Sun Microsystems Inc. SunOS 5.9 Generic May 2002 $ '; msleep(1.03767001628876); print ' '; msleep(0.161739945411682); print '$ '; msleep(0.0984899997711182); print 'b'; msleep(0.130779981613159); print 'a'; msleep(0.0776699781417847); print 'n'; msleep(0.124980092048645); print 'n'; msleep(0.0501499176025391); print 'e'; msleep(0.0778200626373291); print 'r'; msleep(0.0859099626541138); print ' '; msleep(0.160330057144165); print 'h'; msleep(0.109569907188416); print 'e'; msleep(0.10139000415802); print 'l'; msleep(0.148689985275269); print 'l'; msleep(0.19173002243042); print 'o'; msleep(0.285889983177185); print ' '; msleep(0.155920028686523); print ' # # ###### # # #### # # # # # # # ###### ##### # # # # # # # # # # # # # # # # # # # # ###### ###### ###### #### $ '; msleep(0.465350031852722); print ' '; msleep(0.134400010108948); print '$ '; msleep(0.55351996421814); print 'i'; msleep(0.0896899700164795); print 'd'; msleep(0.0800700187683105); print ' '; msleep(0.123170018196106); print '-'; msleep(0.0857900381088257); print 'a'; msleep(0.150110006332397); print ' '; msleep(0.117299914360046); print 'uid=1007(guest) gid=1(other) groups=1(other) $ '; msleep(0.123930096626282); print ' '; msleep(0.175830006599426); print '$ '; msleep(0.275229930877686); print 'l'; msleep(0.0887800455093384); print 's'; msleep(0.126389980316162); print ' '; msleep(0.109409928321838); print 'Bin local.cshrc local.profile passwd thumb.jpg guest.tar.gz local.login motd somefile.txt $ '; msleep(0.322670102119446); print 'l'; msleep(0.0886499881744385); print 's'; msleep(0.0717200040817261); print ' '; msleep(0.0995500087738037); print '-'; msleep(0.0484999418258667); print 'l'; msleep(0.102530002593994); print ' '; msleep(0.166130065917969); print 'total 60 drwxr-xr-x 2 root other 512 Oct 17 23:45 Bin -rw-r--r-- 1 guest other 12155 Oct 5 22:55 guest.tar.gz -rw-r--r-- 1 guest other 136 Oct 5 22:50 local.cshrc -rw-r--r-- 1 guest other 157 Oct 5 22:50 local.login -rw-r--r-- 1 guest other 174 Oct 5 22:50 local.profile -rw-r--r-- 1 guest other 49 Oct 5 22:55 motd -r--r--r-- 1 guest other 516 Oct 5 22:55 passwd -rw-r--r-- 1 guest other 168 Nov 3 23:43 somefile.txt -rw-r--r-- 1 guest other 11096 Oct 5 22:53 thumb.jpg $ '; msleep(0.737289905548096); print ' '; msleep(0.162320017814636); print '$ '; msleep(0.810019969940186); print 'u'; msleep(0.167120099067688); print 'n'; msleep(0.148880004882812); print 'a'; msleep(0.125169992446899); print 'm'; msleep(0.0952699184417725); print 'e'; msleep(0.108749985694885); print ' '; msleep(0.117269992828369); print '-'; msleep(0.112040042877197); print 'a'; msleep(0.19501006603241); print ' '; msleep(0.119709968566895); print 'SunOS mars 5.9 Generic sun4u sparc SUNW,Ultra-5_10 $ '; msleep(0.384549975395203); print ' '; msleep(0.115219950675964); print '$ '; msleep(0.240429997444153); print 'u'; msleep(0.167160034179688); print 'p'; msleep(0.169610023498535); print 't'; msleep(0.11558997631073); print 'i'; msleep(0.049530029296875); print 'm'; msleep(0.0885399580001831); print 'e'; msleep(0.387189984321594); print ' '; msleep(0.18150007724762); print ' 8:38pm up 245 day(s), 1:40, 2 users, load average: 0.01, 0.01, 0.02 $ '; msleep(0.890900015830994); print ' '; msleep(0.108729958534241); print '$ '; msleep(2.62090003490448); print 'b'; msleep(0.137709975242615); print 'a'; msleep(0.101599931716919); print 'n'; msleep(0.124920010566711); print 'n'; msleep(0.107320070266724); print 'e'; msleep(0.0687500238418579); print 'r'; msleep(0.120970010757446); print ' '; msleep(0.172699928283691); print 'g'; msleep(0.0995800495147705); print 'o'; msleep(0.119579911231995); print 'o'; msleep(0.125030040740967); print 'd'; msleep(0.141929984092712); print 'b'; msleep(0.125020027160645); print 'y'; msleep(0.0952600240707397); print 'e'; msleep(0.172609925270081); print ' '; msleep(0.164430022239685); print ' #### #### #### ##### ##### # # ###### # # # # # # # # # # # # # # # # # # # # ##### # ##### # ### # # # # # # # # # # # # # # # # # # # # # # #### #### #### ##### ##### # ###### $ '; msleep(0.101629972457886); print ' '; msleep(0.198140025138855); print '$ '; msleep(0.201330065727234); print 'e'; msleep(0.0741199254989624); print 'x'; msleep(0.128939986228943); print 'i'; msleep(0.142060041427612); print 't'; msleep(0.402559995651245); print ' '; msleep(0.00950002670288086); print ''; msleep(0.562919974327087); print ''; msleep(0);