ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
Вернуться   Форум АНТИЧАТ > ИНФО > Мировые новости
Перезагрузить страницу В сети выложили базу жителей России и СНГ
   
Закрытая тема
Страница 12 из 14 « Первая < 2 8 9 10 11 12 13 14 >
 
Опции темы Поиск в этой теме Опции просмотра

  #111  
Старый 23.03.2008, 08:18
te$t
Познающий
Регистрация: 08.08.2007
Сообщений: 73
Провел на форуме:
167396

Репутация: 91
По умолчанию
Жесть! 3tb солидная база, и за сервачек отвалили наверное нехило....
 

  #112  
Старый 23.03.2008, 17:02
Female
Участник форума
Регистрация: 12.07.2007
Сообщений: 100
Провел на форуме:
577167

Репутация: 135
По умолчанию
У меня сайт не грузится
 

  #113  
Старый 23.03.2008, 17:46
Rogun
Познающий
Регистрация: 12.02.2008
Сообщений: 90
Провел на форуме:
535943

Репутация: 20
Отправить сообщение для Rogun с помощью ICQ
По умолчанию
Почему сайт неоткрывается??
Ещё эту базу можно скачать или её прямо на сайте вводиш данные получаеш инфу?
 

  #114  
Старый 23.03.2008, 17:55
CaNNabi$
Познающий
Регистрация: 21.01.2008
Сообщений: 85
Провел на форуме:
839509

Репутация: 338
Отправить сообщение для CaNNabi$ с помощью ICQ
По умолчанию
Отвечаю заепался ждать уже 3 день((
Дайте кто ниуть акк, с меня +++
 

  #115  
Старый 23.03.2008, 18:20
BitHack
Познающий
Регистрация: 14.01.2008
Сообщений: 50
Провел на форуме:
1065528

Репутация: 105
Отправить сообщение для BitHack с помощью ICQ
По умолчанию
я тоже жду 3-ий день......
думаю что наврятле здесь у кого то есть акк =\
 

  #116  
Старый 23.03.2008, 18:31
Mosvit
Познающий
Регистрация: 05.03.2007
Сообщений: 99
Провел на форуме:
744734

Репутация: 44
По умолчанию
Его досят.
Есть люди которые действуют по принципу - ни себе ни людям
 

  #117  
Старый 23.03.2008, 21:17
xJeWeL
Участник форума
Регистрация: 07.01.2008
Сообщений: 152
Провел на форуме:
315077

Репутация: 24
По умолчанию
чесно - хз . Но тут где то хитрость. Что то не вериться, что вот так просто можно выложить всю КонфИнфу за всю Страну за так, да еще в таком обьеме.

Возможно сборо мыла + может и сплойт на главной + какой нить пилотный проект.

-----
Они или психи или это админи немного пратест объявили. Ждем требований.
Может и правительство и досит. Нах им такой геморой на всю страну.
----
ваще пы...Ц !
 

  #118  
Старый 23.03.2008, 21:31
neprovad
Постоянный
Регистрация: 19.10.2007
Сообщений: 794
Провел на форуме:
1013791

Репутация: 711


По умолчанию
Может кому пригодится или поможет..
/cdbs/web/contact/sendmail.cgi~
Код:
#!/usr/bin/perl
##############################################################################
# By BumbleBeeWare.com 2006
# Simple CAPTCHA using static premade images
# check-captcha.cgi
##############################################################################

use Mail::Sender;
use CGI;
use CGI::Carp qw ( fatalsToBrowser ); 
use File::Basename;
use Encode;

$CGI::POST_MAX = 1024 * 2000;
$upload_dir = "/tmp/upload";

print "Content-type: text/html\n\n";
open IN1, "sendmail1.html.txt" || die "Error !";
while (<IN1>)
{
 print;
}

##########################
# configuration
$tempdir = "/srv/www/lighttpd/captcha/temp";

##########################
# parse the input data
&form_parse;

# lets block direct access that is not via the form post
if ($ENV{"REQUEST_METHOD"} ne "POST"){&nopost;}

# use this program to remove all old temp files
# this keeps the director clean without setting up a cron job
opendir TMPDIR, "$tempdir"; 
@alltmpfiles = readdir TMPDIR;

foreach $oldtemp (@alltmpfiles) {

	$age = 0;
	$age = (stat("$tempdir/$oldtemp"))[9];
	# if age is more than 300 seconds or 5 minutes	
	if ((time - $age) > 300){unlink "$tempdir/$oldtemp";}
	
	}


# open the temp datafile for current user based on ip
$tempfile = "$tempdir/$ENV{'REMOTE_ADDR'}";
open (TMPFILE, "<$tempfile")|| ($nofile = 1);
(@tmpfile) = <TMPFILE>;
close TMPFILE;

# if no matching ip file check for a cookie match
# this will compensate for AOL proxy servers accessing images
if ($nofile == 1){
	
$cookieip = $ENV{HTTP_COOKIE};
$cookieip =~ /checkme=([^;]*)/;
$cookieip = $1;

if ($cookieip ne ""){
	
	$tempfile = "$tempdir/$cookieip";
	open (TMPFILE, "<$tempdir/$cookieip")|| &nofile;
	(@tmpfile) = <TMPFILE>;
	close TMPFILE;
}

}

$imagetext = $tmpfile[0];
chomp $imagetext;

# set the form input to lower case
#$FORM{'captcha'} = lc($FORM{'captcha'});
$query = new CGI;
$captcha=$query->param("captcha");
$captcha=lc($captcha);

#print "CAPTCHA=$captcha waiting for $imagetext";

# compare the form input with the file text
#if ($FORM{'captcha'} ne "$imagetext"){&error;}
if ($captcha ne "$imagetext"){&error;}

# now delete the temp file so it cannot be used again by the same user
unlink "$tempfile";

# if no error continue with the program
#print "Content-type: text/html\n\n";
#print "sucessful verification";
#print "$FORM{'name'} $FORM{'email'} $FORM{'message_subject'} $FORM{'message_body'}";
$sender = new Mail::Sender
{smtp => '10.10.10.104', from => 'webmail@radarix.org'};
#$sender->MailFile({to => 'peter@radarix.org',
#subject => $FORM{'message_subject'},
#msg => FORM{'message_body'}});
$filename=$query->param("filename");
$subject=$query->param("message_subject");
Encode::from_to($subject, 'utf-8', 'windows-1251');
$name=$query->param("name");
$email=$query->param("email");
$IP=$ENV{REMOTE_ADDR};

$msg="Name: $name\nFrom: $email\nIP=$IP\n\n\n";
$msg.=$query->param("message_body");
Encode::from_to($msg, 'utf-8', 'windows-1251');

if ($filename)
   {
#    print "Filename = $filename<br>";
    $upload_filehandle = $query->upload("filename");
    open ( UPLOADFILE, ">$upload_dir/$filename" ) or die "$!"; 
    binmode UPLOADFILE; 
    while ( <$upload_filehandle> ) 
       {
        print UPLOADFILE;
       }
    close UPLOADFILE;
    if (ref ($sender->MailFile({to =>'support@radarix.org', subject => $subject, msg => $msg, file => "$upload_dir/$filename"})))
       {
       $str1="Письмо отправлено.";
       Encode::from_to($str1, 'windows-1251', 'utf-8');
       print $str1;
       } else {
              die "$Mail::Sender::Error\n";
              }
    unlink("$upload_dir/$filename");
   }
else
{   
if (ref ($sender->MailMsg({to =>'support@radarix.org', subject => $subject, msg => $msg}))) 
   {
    $str1="Письмо отправлено.";
    Encode::from_to($str1, 'windows-1251', 'utf-8');
    print $str1;
   } else {
           die "$Mail::Sender::Error\n";
          }
}
&myexit;
exit;



sub error {
	
#print "Content-type: text/html\n\n";
$str1="Кодовая фраза введена неверно.";
Encode::from_to($str1, 'windows-1251', 'utf-8');
print $str1;
# now delete the temp file so it cannot be used again by the same user
unlink "$tempdir/$ENV{'REMOTE_ADDR'}";
&myexit;
exit;	
}

sub nofile {
	
#print "Content-type: text/html\n\n";
$str1="Ошибка при проверке кодового слова. Пожалуйчта повторите";
Encode::from_to($str1, 'windows-1251', 'utf-8');
print $str1;
&myexit;
exit;	
}


sub nopost {
	
#print "Content-type: text/html\n\n";
$str1="Ошибка вызова. Требуется POST запрос!";
Encode::from_to($str1, 'windows-1251', 'utf-8');
print $str1;	
&myexit;
exit;	
}



sub form_parse  {
return;
	read (STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
	@pairs = split(/&/, $buffer);

	foreach $pair (@pairs)
	{
    	($name, $value) = split(/=/, $pair);
    	$value =~ tr/+/ /;
    	$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
    	$FORM{$name} = $value;
}}

sub myexit
   {
    open IN2, "sendmail2.html.txt" || die "Error !";
    while (<IN2>)
       {
        print;
       }
   }
/cdbs/web/signup/registration.cgi~

Код:
#!/usr/bin/perl
##############################################################################
# By BumbleBeeWare.com 2006
# Simple CAPTCHA using static premade images
# check-captcha.cgi
##############################################################################

use Mail::Sender;
use CGI;
use CGI::Carp qw ( fatalsToBrowser ); 
use File::Basename;
use Encode;

$CGI::POST_MAX = 1024 * 2000;
$upload_dir = "/tmp/upload";


print "Content-type: text/html\n\n";
open IN1, "sendmail1.html.txt" || die "Error !";
while (<IN1>)
{
 print;
}


##########################
# configuration
$tempdir = "/srv/www/lighttpd/captcha/temp";

##########################

# parse the input data
&form_parse;

# lets block direct access that is not via the form post
if ($ENV{"REQUEST_METHOD"} ne "POST"){&nopost;}

# use this program to remove all old temp files
# this keeps the director clean without setting up a cron job
opendir TMPDIR, "$tempdir"; 
@alltmpfiles = readdir TMPDIR;

foreach $oldtemp (@alltmpfiles) {

	$age = 0;
	$age = (stat("$tempdir/$oldtemp"))[9];
	# if age is more than 300 seconds or 5 minutes	
	if ((time - $age) > 300){unlink "$tempdir/$oldtemp";}
	
	}


# open the temp datafile for current user based on ip
$tempfile = "$tempdir/$ENV{'REMOTE_ADDR'}";
open (TMPFILE, "<$tempfile")|| ($nofile = 1);
(@tmpfile) = <TMPFILE>;
close TMPFILE;

# if no matching ip file check for a cookie match
# this will compensate for AOL proxy servers accessing images
if ($nofile == 1){
	
$cookieip = $ENV{HTTP_COOKIE};
$cookieip =~ /checkme=([^;]*)/;
$cookieip = $1;

if ($cookieip ne ""){
	
	$tempfile = "$tempdir/$cookieip";
	open (TMPFILE, "<$tempdir/$cookieip")|| &nofile;
	(@tmpfile) = <TMPFILE>;
	close TMPFILE;
}

}

$imagetext = $tmpfile[0];
chomp $imagetext;

# set the form input to lower case
#$FORM{'captcha'} = lc($FORM{'captcha'});
$query = new CGI;
$captcha=$query->param("captcha");
$captcha=lc($captcha);

#print "CAPTCHA=$captcha waiting for $imagetext";

# compare the form input with the file text
#if ($FORM{'captcha'} ne "$imagetext"){&error;}
if ($captcha ne "$imagetext"){&error;}

# now delete the temp file so it cannot be used again by the same user
unlink "$tempfile";

# if no error continue with the program
#print "Content-type: text/html\n\n";
#print "sucessful verification";
#print "$FORM{'name'} $FORM{'email'} $FORM{'message_subject'} $FORM{'message_body'}";
$sender = new Mail::Sender
{smtp => '10.10.10.104', from => 'webmail@radarix.org'};
#$sender->MailFile({to => 'peter@radarix.org',
#subject => $FORM{'message_subject'},
#msg => FORM{'message_body'}});
$filename=$query->param("filename");
$subject=$query->param("message_subject");
Encode::from_to($subject, 'utf-8', 'windows-1251');
$name=$query->param("name");
$email=$query->param("email");
$IP=$ENV{REMOTE_ADDR};
$adv_type=$query->param("adv_type");

$msg="Name: $name\nFrom: $email\n$adv_type\nIP: $IP\n\n\n";
$msg2="$name|\\|$email|\\|$adv_type|\\|$IP\n";
#$msg.=$query->param("message_body");
Encode::from_to($msg, 'utf-8', 'windows-1251');
Encode::from_to($msg2, 'utf-8', 'windows-1251');

open MYFILE, ">>./e/em.file";
flock(MYFILE,2);
print MYFILE $msg2;
close (MYFILE);

if ($filename)
   {
#    print "Filename = $filename<br>";
    $upload_filehandle = $query->upload("filename");
    open ( UPLOADFILE, ">$upload_dir/$filename" ) or die "$!"; 
    binmode UPLOADFILE; 
    while ( <$upload_filehandle> ) 
       {
        print UPLOADFILE;
       }
    close UPLOADFILE;
    if (ref ($sender->MailFile({to =>'support@radarix.org', subject => $subject, msg => $msg, file => "$upload_dir/$filename"})))
       {
       $str1="Письмо отправлено.";
       Encode::from_to($str1, 'windows-1251', 'utf-8');
       print $str1;
       } else {
              die "$Mail::Sender::Error\n";
              }
    unlink("$upload_dir/$filename");
   }
else
{   
if (ref ($sender->MailMsg({to =>'support@radarix.org', subject => "registration", msg => $msg}))) 
   {
    $str1="Спасибо за регистрацию. <br>Логин и пароль будут Вам высланы через несколько дней<br> по мере снижения нагрузки на систему.";
    Encode::from_to($str1, 'windows-1251', 'utf-8');
    print $str1;
   } else {
           die "$Mail::Sender::Error\n";
          }
}
&myexit;
exit;



sub error {
	
#print "Content-type: text/html\n\n";
$str1="Кодовая фраза введена неверно.";
Encode::from_to($str1, 'windows-1251', 'utf-8');
print $str1;
# now delete the temp file so it cannot be used again by the same user
unlink "$tempdir/$ENV{'REMOTE_ADDR'}";
&myexit;
exit;	
}

sub nofile {
	
#print "Content-type: text/html\n\n";
$str1="Ошибка при проверке кодового слова. Пожалуйчта повторите";
Encode::from_to($str1, 'windows-1251', 'utf-8');
print $str1;
&myexit;
exit;	
}


sub nopost {
	
#print "Content-type: text/html\n\n";
$str1="Ошибка вызова. Требуется POST запрос!";
Encode::from_to($str1, 'windows-1251', 'utf-8');
print $str1;	
&myexit;
exit;	
}



sub form_parse  {
return;
	read (STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
	@pairs = split(/&/, $buffer);

	foreach $pair (@pairs)
	{
    	($name, $value) = split(/=/, $pair);
    	$value =~ tr/+/ /;
    	$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
    	$FORM{$name} = $value;
}}

sub myexit
   {
    open IN2, "sendmail2.html.txt" || die "Error !";
    while (<IN2>)
       {
        print;
       }
   }
 

  #119  
Старый 24.03.2008, 14:50
humansapiens
Участник форума
Регистрация: 11.01.2008
Сообщений: 200
Провел на форуме:
1502875

Репутация: 78
Отправить сообщение для humansapiens с помощью ICQ
По умолчанию
Я сомневаюсь. если это правда, если там действительно база, то..
Чего греха таить? ведь, есть же базы, тут их в паблик выложили, что в этом плохого, что плохого в том, что доступ к ней имеют не только "избранные"?
Но с другой стороны, что бы там ни говорили, я против таких засранцев, он нарушает мое право, данное мне конституцией Российской Федерации, и ложил я на то, что кому-то это нравиться или нет...снесьти её надо нахрен...и всё тут
 

  #120  
Старый 24.03.2008, 15:52
kendybober
Новичок
Регистрация: 27.09.2007
Сообщений: 11
Провел на форуме:
13642

Репутация: 1
По умолчанию
Может кто скинуть акк в ПМ? 2 дня назад зарегался до сих пор ничего
 
Закрытая тема
Страница 12 из 14 « Первая < 2 8 9 10 11 12 13 14 >



« Предыдущая тема | Следующая тема »
Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Взлом беспроводных сетей halkfild Беспроводные технологии/WPAN/WLAN 28 28.03.2010 22:35
Завершено строительство самого мощного в России и СНГ суперкомпьютера SQL~In[J]ecTi0n Мировые новости 5 20.03.2008 14:46
Руководство Microsoft предупреждает: В сети выложили фальшивый Windows XP SP3 DRON-ANARCHY Мировые новости 13 12.11.2005 07:45



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ