Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Работа с сетью в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 13.11.2013, 15:01   #1
Askar_g
под кайфом
Пользователь
 
Аватар для Askar_g
 
Регистрация: 21.12.2008
Сообщений: 41
По умолчанию Как сделать брут быстрее? Twebbrowser

Написал прогу, для перебора паролей к сайту.
в TWebBrowser грузится страница авторизации, находим нужные инпуты, вводим логин/пароли , сабмиттим.
Вопрос в следующем, как сделать процесс быстрее, возможно есть какие то методы без загрузки сайта полностью, а лишь передавать значения?
  • Как-то одного программиста спросили, а потом горько пожалели об этом.
Askar_g вне форума Ответить с цитированием
Старый 13.11.2013, 16:46   #2
Mifody
Форумчанин
 
Регистрация: 12.02.2009
Сообщений: 215
По умолчанию

Цитата:
Вопрос в следующем, как сделать процесс быстрее, возможно есть какие то методы без загрузки сайта полностью, а лишь передавать значения?
1. снифером собрать что браузер шлет
2. написать аналогичное, используя компоненты для работы с сетью: Indy, synapse, overbyteICS
Помог с вопросом - тыркаем в весы, Вам не сложно, а мне приятно
Mifody вне форума Ответить с цитированием
Старый 13.11.2013, 17:04   #3
Человек_Борща
Старожил
 
Аватар для Человек_Борща
 
Регистрация: 30.12.2009
Сообщений: 11,426
По умолчанию

Да есть, но:
1. Вас могут забанить, или просто замедлять запросы авторизации с каждым новым с вашего же IP, нун или АД ввиде математ. капчи.
2.как уже сказали - снифферы - наше все, не нужно загружать и рендерить весь сайт.

3. Вы ошиблись форумум, тут не обсужается взлом и все связанное с ним.
Человек_Борща вне форума Ответить с цитированием
Старый 13.11.2013, 17:13   #4
eval
Подтвердите свой е-майл
 
Регистрация: 29.08.2012
Сообщений: 4,011
По умолчанию

Цитата:
Вас могут забанить
а как браузер лечит это?
eval вне форума Ответить с цитированием
Старый 15.11.2013, 09:36   #5
Mifody
Форумчанин
 
Регистрация: 12.02.2009
Сообщений: 215
По умолчанию

Цитата:
Сообщение от eval Посмотреть сообщение
а как браузер лечит это?
никак не лечит .
Просто некоторые сайты отслеживают частотность регистрации с IP. А из-за того, что браузер "долго грузит" получается естественный интервал.

З.Ы. Вообще да, с такими темами лучше кудат типа ачата пойти
Помог с вопросом - тыркаем в весы, Вам не сложно, а мне приятно
Mifody вне форума Ответить с цитированием
Старый 15.11.2013, 10:20   #6
eval
Подтвердите свой е-майл
 
Регистрация: 29.08.2012
Сообщений: 4,011
По умолчанию

ну откройте надцать браузеров, и что?

тут на самом деле все субъективно/интуитивно.. ну конечно лоха проще вычислить
eval вне форума Ответить с цитированием
Старый 18.11.2013, 19:15   #7
Askar_g
под кайфом
Пользователь
 
Аватар для Askar_g
 
Регистрация: 21.12.2008
Сообщений: 41
По умолчанию

Цитата:
Сообщение от Mifody Посмотреть сообщение
11
Цитата:
Сообщение от eval Посмотреть сообщение
11
Цитата:
Сообщение от Человек_Борща Посмотреть сообщение
11
Буквально после написания этой темы, я пошел гуглить методы, и соответственно пытался ПОСТ запросом.
Возникла проблема следующего характера, при нажатии сабмита генерится какой то параметр кроме логина/пароля.
Пост запрос выглядит примерно так:

Parameter Name Value
924021617 0
secfield 0
role employee
login Ñàêñåíáàåâà
password хххх
IDCODE 790108401311
Submit1 Войти

первый параметр 924021617 всегда рандомный. Можно ли как то разгадать эти цыфрки?
Бана по IP нет, колличество попыток неограничено.
  • Как-то одного программиста спросили, а потом горько пожалели об этом.
Askar_g вне форума Ответить с цитированием
Старый 18.11.2013, 20:47   #8
Askar_g
под кайфом
Пользователь
 
Аватар для Askar_g
 
Регистрация: 21.12.2008
Сообщений: 41
По умолчанию

Разобрался с циферками этими, они получаются get запросом.
Находим ее в теле резалтa get запроса.
Но не тут то было, при отправке уже пост запроса с нужными параметрами, те что описал выше, программа тупо виснет и не реагирует.
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
PostData: TStringList;
  html: widestring;
begin
try
 idHTTP1.HandleRedirects:=true;
postdata:= tstringlist.Create;
postdata.Add(s+'=0');
postdata.Add('secfield=0');
postdata.Add('role=employee');
postdata.Add('login=#логин#;');
postdata.Add('password=#пароль#');
postdata.Add('idcode=730923400115');
postdata.Add('Submit1=Войти;');
IdHTTP1.Post('http://site/loginsecure',postdata);
if html<>'' then Memo2.lines.add(html);
finally
end;
postdata.Free;

end;
  • Как-то одного программиста спросили, а потом горько пожалели об этом.

Последний раз редактировалось Askar_g; 18.11.2013 в 20:49.
Askar_g вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как убрать отступы в TWebBrowser? + аналоги TWebBrowser? FleXik Общие вопросы Delphi 4 19.07.2013 21:53
как сделать что бы работала быстрее luffi Помощь студентам 3 10.04.2012 23:53
Как написать брут? dustee Общие вопросы Delphi 0 01.04.2012 18:16
Модернизировать код, сделать его быстрее Rusl92 Общие вопросы Delphi 5 03.11.2008 19:23
TWebBrowser/EmbeddedWB или как сделать игровой клиент! flaxe Работа с сетью в Delphi 1 18.11.2006 19:14