Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |
Нужна прога для выдерания из списка (базы) Md5 |

16.11.2006, 23:37
|
|
Познающий
Регистрация: 02.04.2006
Сообщений: 69
Провел на форуме: 780414
Репутация:
284
|
|
Нужна прога для выдерания из списка (базы) Md5
Нужна прога для выдерания из списка (базы) Md5
хешей. Типа хеш-граббер какойнить.
|
|
|

16.11.2006, 23:43
|
|
Постоянный
Регистрация: 25.07.2005
Сообщений: 471
Провел на форуме: 3465924
Репутация:
931
|
|
Зачем спрашивается?
Нельзя ли например каким-нибудь запросом ее вытащить?
Например у ипб 1.3 -
SELECT concat(name,":",password) FROM ibf_members
В ипб 2.* с солью -
SELECT concat(converge_id,":",converge_pass_hash,":",conv erge_pass_salt) FROM ibf_members_converge
В phpbb тоже можно как-нибудь...я на 99% уверен в этом...не изучал просто...
P.s. Спасибо Тохе 
|
|
|

16.11.2006, 23:47
|
|
Постоянный
Регистрация: 03.11.2005
Сообщений: 591
Провел на форуме: 5605982
Репутация:
523
|
|
SELECT `колонка_с_хэшами` FROM `таблица_где_они_лежат` INTO OUTFILE 'полный_путь_до_файла_куда_с охранить.txt'
|
|
|

16.11.2006, 23:54
|
|
HARDstasy
Регистрация: 26.11.2004
Сообщений: 1,367
Провел на форуме: 4226592
Репутация:
2175
|
|
здается мне, 4ел просил "выдирание" хешей из уже сдампленной базы ака с текста.
можно сделать поиск сабжа по маске: 32 символа, A-F, a-f, 0-9
|
|
|

17.11.2006, 00:05
|
|
Banned
Регистрация: 11.09.2005
Сообщений: 254
Провел на форуме: 1002567
Репутация:
-12
|
|
могу предложить скрипт на асп выдерает юзер;хеш;соль;мыло
|
|
|

17.11.2006, 23:17
|
|
Познающий
Регистрация: 02.04.2006
Сообщений: 69
Провел на форуме: 780414
Репутация:
284
|
|
Сообщение от ProTeuS
здается мне, 4ел просил "выдирание" хешей из уже сдампленной базы ака с текста.
можно сделать поиск сабжа по маске: 32 символа, A-F, a-f, 0-9
Да, ты прав. Спасибо, разобрался.
|
|
|

18.11.2006, 17:11
|
|
Постоянный
Регистрация: 09.12.2005
Сообщений: 377
Провел на форуме: 2046072
Репутация:
362
|
|
Не потеме но всё таки...
А как таким же макарам выдрать мыло? А желательно сразу все мыла... очунь надо
|
|
|

18.11.2006, 17:29
|
|
Участник форума
Регистрация: 30.08.2006
Сообщений: 181
Провел на форуме: 1058786
Репутация:
45
|
|
Я например все время использую Денвер в нем есть phpMyAdmin имортируешь туда базу потом
SELECT `email` FROM `таблица_где_они_лежат` INTO OUTFILE 'полный_путь_до_файла_куда_с охранить.txt'
|
|
|

18.11.2006, 17:47
|
|
Постоянный
Регистрация: 09.07.2006
Сообщений: 937
Провел на форуме: 1948091
Репутация:
1686
|
|
вот скриптик на perl -- писал когдато --- запихиваешь все свои дампы в одну папку и запуускаешь с скрипт с параметром *.pl /имя_папки/
(ps если подправить регулярное выражение то будет выдирать и хэши)
#!/usr/bin/perl
if (@ARGV==0) { print "\n###########Genom Spam List Bilder v1.3##################\n\nUse: perl spam-bilder.pl /start_folder/\n"; exit;};
$asd=@ARGV[0];
$i=0;
$a=1;
@dir[0]=@ARGV[0];
opendir FF, $asd;
while ($zz=readdir FF) {
$aa=$zz=~m/\./;
if ($aa==0) {if ($asd=="/") {@dir[$i]="$asd$zz";$i++;}else{@dir[$i]="$asd/$zz";$i++;} }
closedir dir;}
papki(@dir[$a]);
for $qq (@dir){print "$qq\n"}; # убери в начале решетку если хочешь чтобы выводились найденные папки
##################рекурсивная функция которая забивает пути к папкам в массив @dir ##################
sub papki {
opendir FF,@dir[$a];
while ($zz=readdir FF) {
$aa=$zz=~m/\./;
if ($aa==0) {@dir[$i]="@dir[$a]/$zz";$i++;} };
closedir dir;$a=$a+1;
if ($a<$i) {papki(@dir[$a]);}
};@dir[$a];
###########################функция поиска файлов################
# получаем имена всех файлов в обнаруженных папках и заносим их в массив @file
# под категорию файлов подпадают объекты в именах которых есть точка--- так что некоторые папки может
# не обработать(то есть признает их файлами)- это связано с тем что пишу под виндой и параметры
# распознования файлов линукса -e и -f у меня почемуто не работают =( ---
$xy=0;
for $qqq (@dir){
opendir FF, $qqq;
while ($zz=readdir FF) {
if (length($zz)>2) {
$aa=$zz=~m/\./;
if ($aa==1) {@file[$xy]="$qqq/$zz";$xy++;} }
closedir dir;}
};
for $wer (@file){print "$wer\n"};# убери в начале решетку если хочешь чтобы выводились найденные
# файлы
######## функция выдирания из найденных фалов e-mail адресов
open mail,">new-mail.txt";
for $syka (@file){
open piska, "<$syka";
while ($zzaa=<piska>)
{if ($zzaa =~m/\b([\w\d]+\@[\w\d]+\.[\w\d\.]+)\b/g) { $list{"$1"}="";}}}
$,="\n";
print mail keys %list;
close mail;
|
|
|
|
 |
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|