Показать сообщение отдельно

  #82  
Старый 20.07.2008, 20:12
DeepXhadow
Познающий
Регистрация: 19.04.2008
Сообщений: 67
Провел на форуме:
596695

Репутация: 19
По умолчанию

хочу написать брутфорсер к одной проге.Поснифал пакеты передаваемые с клента этой проги на сервер...Получилось вот что:
64 00 F0 B5 01 00 [xx xx xx xx xx xx xx] => login 00 00 00
00 00 00 00 00 00 00 00 00 00 00 00 00 00 [xx xx
xx xx xx ] => pass 00 00 00 00 00 00 00 00 00 00 00 00 00
00 00 00 00 00 00 19
Далее в зависимости от того,принял ли сервер авторизацию или нет генерируются
2 типа пакетов(условно да\нет).Так вот мысль моя была в том,чтобы мой брут брал списки логинов\паролей,переводил их в Hex и отправлял эти пакеты серверу...
Мои вопросы терь...
На каком языке это лучше реализовать? Я достаточно хорошо знаю лишь Perl и php, Паскаль ниже среднего...
Сейчас пытался реализовать все это в VB через соксы...но похоже ВБ не умеет(или скорей всего я не знаю как это сделать ) отсылать пакеты так как они есть(в hex)...на сниффере вижно что прога отвравляет не то что мне нужно,а какую-то полную чушь...
Вот кусок кода..ногами сильно не бейте только

Private Sub Form_Load()
tcpClient.RemoteHost = "81.х.х.х"
tcpClient.RemotePort = 6900
End Sub

Private Sub Command1_Click()
tcpClient.Connect
tcpClient.SendData "64 00 F0 B5 01 00 66 72 61 70 73 39 30 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 66 72 61 70 73 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 19"
Label1.Caption = tcpClient.GetData
End Sub
Заранее спасибо!
 
Ответить с цитированием