Модераторы: Snowy, Poseidon, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> TcpClient and socks 
:(
    Опции темы
COOLHack
Дата 3.6.2009, 00:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 281
Регистрация: 8.2.2008

Репутация: нет
Всего: 0
Как заставить работать TcpClient через Socks4/Socks5?
PM MAIL   Вверх
dvamaster
Дата 3.6.2009, 12:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 559
Регистрация: 30.6.2004
Где: Россия : Курган

Репутация: 2
Всего: 10
Переписать TTcpClient, добавив туда протокол соксов
Socks - это протокол оболочка для трафика

В Indy  есть компонент IdSocksInfo


--------------------
Хорошую информацию трудно добыть. Сделать с ней что-нибудь - еще труднее. /L. Skywalker/

Что же я сделал не так? /Король Лир/

Я делаю это для твоего же блага! /Любой родитель и палач/

PKUNZIP.ZIP /неизвестный/
PM MAIL WWW ICQ   Вверх
COOLHack
Дата 3.6.2009, 14:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 281
Регистрация: 8.2.2008

Репутация: нет
Всего: 0
а подробнее
PM MAIL   Вверх
COOLHack
Дата 4.6.2009, 00:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 281
Регистрация: 8.2.2008

Репутация: нет
Всего: 0
если в idhttp вписать ip и порт в прокси параметры должно работать?  У меня в этом случае просто прога вылает с ошибкой сокета


Код

Переписать TTcpClient, добавив туда протокол соксов
Socks - это протокол оболочка для трафика

В Indy  есть компонент IdSocksInfo 


А подробнее можно? 

Это сообщение отредактировал(а) COOLHack - 4.6.2009, 02:10
PM MAIL   Вверх
dvamaster
Дата 4.6.2009, 06:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 559
Регистрация: 30.6.2004
Где: Россия : Курган

Репутация: 2
Всего: 10
я использую Indy10. для него так:

кидаешь компонент протокола (например TIdHTTP)
затем TIOHandler (например TIdIOHandlerStack)
добавляешь TSocksInfo

Код

procedure TForm1.FormCreate(Sender: TObject);
begin
  IdHTTP1.IOHandler := IdIOHandlerStack1;
  IdIOHandlerStack1.TransparentProxy := IdSocksInfo1
end;


хотя эти свойства можешь и в инспекторе свойств заполнить

Добавлено через 2 минуты и 38 секунд
http://www.indyproject.org/KB/ - инфа по инди


--------------------
Хорошую информацию трудно добыть. Сделать с ней что-нибудь - еще труднее. /L. Skywalker/

Что же я сделал не так? /Король Лир/

Я делаю это для твоего же блага! /Любой родитель и палач/

PKUNZIP.ZIP /неизвестный/
PM MAIL WWW ICQ   Вверх
COOLHack
Дата 4.6.2009, 11:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 281
Регистрация: 8.2.2008

Репутация: нет
Всего: 0
поставил инди 10, сделал как сказано выше, потом делаю так:

Код

Form1.IdSocksInfo1.Host := u;
Form1.IdSocksInfo1.Port := p;
Form1.IdSocksInfo1.Version := svSocks4;



Правильно? или по другому нужно прописывать какой сокс юзать проге?

Это сообщение отредактировал(а) COOLHack - 4.6.2009, 14:02
PM MAIL   Вверх
COOLHack
Дата 4.6.2009, 17:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 281
Регистрация: 8.2.2008

Репутация: нет
Всего: 0
запрос до скрипта не доходит, при этом фаервол пишет "Пакет на закрытый порт"
Прога вылетает с ошибкой "Socks server did not respond" 

Это проблема в соксах, или в криворукости?

Это сообщение отредактировал(а) COOLHack - 4.6.2009, 17:59
PM MAIL   Вверх
Romikgy
Дата 4.6.2009, 22:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Любитель-программер
****


Профиль
Группа: Участник Клуба
Сообщений: 7326
Регистрация: 11.5.2005
Где: Porto Franco Odes sa

Репутация: 3
Всего: 146
Цитата(COOLHack @  4.6.2009,  16:46 Найти цитируемый пост)
, при этом фаервол пишет "Пакет на закрытый порт"

Цитата(COOLHack @  4.6.2009,  16:46 Найти цитируемый пост)
Это проблема в соксах, или в криворукости?

имхо в настройках файрвола




--------------------
Владение русской орфографией это как владение кунг-фу — истинные мастера не применяют его без надобности. 
smile
PM   Вверх
COOLHack
Дата 4.6.2009, 23:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 281
Регистрация: 8.2.2008

Репутация: нет
Всего: 0
когда фаер ставлю в режим "отключить" то есть он просто смотрит что и где, но ничего не лочит, тож самое пи шет.

А вообще люди помогли, сделал уже всё
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Сети"
Snowy
Poseidon
MetalFan

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делится вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Snowy, Poseidon, MetalFan.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Сети | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0529 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.