VPF::Прокси на Delphi - Форум программистов

FAK

Дата 11.5.2006, 23:39 (ссылка)

(нет голосов)

Загрузка ...

Новичок

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

Репутация: нет
Всего: нет

Как сделать так, чтобы можно было подключаться одновременно к нескольким прокси?
Заранее благодарен!

Демо

Дата 12.5.2006, 09:06 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1278
Регистрация: 3.11.2005

Репутация: 3
Всего: 50

Если ты скажешь, что означает "подключиться к нескольким прокси", то возможно тебе и помогут.

--------------------

FAK

Дата 12.5.2006, 20:47 (ссылка)

(нет голосов)

Загрузка ...

Новичок

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

Репутация: нет
Всего: нет

Объясняю.
Это так называемые "цепочка прокси" . Принцип действия таков:
Компьютер подключается к прокси1, который подключается к прокси2, прокси2 подключается к прокси3 и тд. Вот это мне и нужно реализовать в делфи

Rouse_

Дата 12.5.2006, 22:01 (ссылка)

(нет голосов)

Загрузка ...

Опытный

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

Репутация: 5
Всего: 29

Ищи описание механизма Socks в RFC.

--------------------

Vae Victis
(Горе побежденным (лат.))
Демо с открытым кодом: http://rouse.drkb.ru

mai62

Дата 12.5.2006, 23:56 (ссылка)

(нет голосов)

Загрузка ...

Новичок

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

Репутация: 2
Всего: 3

Rouse_

Цитата

Ищи описание механизма Socks в RFC.

Разве нужен обязательно Socks-прокси? Многие (если не все) HTTP-прокси могут передавать HTTP-запросы вышестоящему (parent) прокси. А если HTTP-прокси поддерживает метод connect, то через него можно работать не только с HTTP-протоколом, но и, например, ICQ или FTP.
FAK
Из твоих вопросов не понятно в чем заключается задача, которую ты решаешь? Что именно ты хочешь сделать на Delphi? Смотри сколько людей откликнулось, дай им шанс помочь тебе smile

FAK

Дата 13.5.2006, 06:26 (ссылка)

(нет голосов)

Загрузка ...

Новичок

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

Репутация: нет
Всего: нет

Я пишу свой icq клиент и мне нужно вставить эту цепочку проксей в мой клиент, чтобы подключаться
к icq серверу анонимно.

mai62

Дата 14.5.2006, 10:44 (ссылка)

(нет голосов)

Загрузка ...

Новичок

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

Репутация: 2
Всего: 3

Можно посмотреть исходники программы freecap (_http://www.freecap.ru/)
Еще видел такой диалог (_http://groups.google.ru/group/borland.public.delphi.internet.winsock/browse_thread/thread/cf01f02031d633ca/6da95be9112090b4?hide_quotes=no#msg_6da95be9112090b4)

Цитата

can you please add proxy chain support to that list, because alot
of us want to do a proxy chain and it isnt currently possible using indy.
It will be for extra anonymity(sp?)
eg.
Client -> Socks Proxy -> Socks Proxy -> Socks Proxy -> Mail Server
or
Client -> HTTP Proxy -> HTTP Proxy -> HTTP Proxy -> Web Server
etc.
...
We have added this to Indy, now you wil be able to chain TIdSocksInfo and
TIdConnectThroughHttpProxy.

Насколько я понял, речь идет об Indy 10

FAK

Дата 14.5.2006, 10:58 (ссылка)

(нет голосов)

Загрузка ...

Новичок

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

Репутация: нет
Всего: нет

исходник freeCap я уже скачал )
Но чет я там не разберусь

Дата 14.5.2006, 12:09 (ссылка)

(нет голосов)

Загрузка ...

Брутальный буратина

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

Репутация: 10
Всего: 115

Собсвенноручно выкладывал тут 3 сорса проксей: http-пэшный на ics-се, http-пэшный без компонентов, и Socks4. Один из сорсов в сетевых технологиях.

Такшо в поиск.

Rouse_

Дата 17.5.2006, 19:25 (ссылка)

(нет голосов)

Загрузка ...

Опытный

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

Репутация: 5
Всего: 29

Цитата(mai62 @ 13.5.2006, 00:56

)

Это-то конечно да, только для этого должен быть настроена соответствующая цепочка, ты сможешь сказать верхнему прокси чтобы он работал не напрямую а через еще один прокси?

--------------------

Vae Victis
(Горе побежденным (лат.))
Демо с открытым кодом: http://rouse.drkb.ru

mai62

Дата 17.5.2006, 21:09 (ссылка)

(нет голосов)

Загрузка ...

Новичок

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

Репутация: 2
Всего: 3

Не могу. Я хотел сказать, что можно строить цепочки и Socks-прокси и HTTP-прокси

Цитата

Client -> Socks Proxy -> Socks Proxy -> Socks Proxy -> Mail Server
or
Client -> HTTP Proxy -> HTTP Proxy -> HTTP Proxy -> Web Server

Демо

Дата 17.5.2006, 22:21 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1278
Регистрация: 3.11.2005

Репутация: 3
Всего: 50

Цитата(mai62 @ 17.5.2006, 21:09

)

Client -> HTTP Proxy -> HTTP Proxy -> HTTP Proxy -> Web Server

Вот эта цепочка интересна, учитывая недоступность администрирования промежуточных звеньев...

--------------------

FAK

Дата 18.5.2006, 19:37 (ссылка)

(нет голосов)

Загрузка ...

Новичок

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

Репутация: нет
Всего: нет

Я уже и исходники фрикапа пересмотрел, все равно не понял.
Вот есть код, возможно это путь к разгадке )) но при запуске возникает ряд ошибок.

Код


function GetResponseCode(const Response:string): Integer;
var S: string;
begin
 S := Response;
 Fetch(S);
 S := Trim(S);
 Result := StrToIntDef(Fetch(S, ' ', False), -1);
end;

procedure ConnectThroughProxy(ProxyList:TStrings);
var
 IdTCPClient:TIdTCPClient;
 i:integer;
begin
 IdTCPClient:=TIdTCPClient.Create(nil);
 try
   IdTCPClient.Host:=ProxyList.Names[0];;
   IdTCPClient.Port:=StrToInt(ProxyList.ValueFromIndex[0]);
   IdTCPClient.Connect;
   i:=1;
   while i<ProxyList.Count-1 do
   begin
     IdTCPClient.IOHandler.WriteLn('CONNECT '+ProxyList.Names[i]+':'+ProxyList.ValueFromIndex[i]+' HTTP/1.1'#13#10#13#10);
     inc(i)
   end;

   IdTCPClient.IOHandler.WriteLn('GET somedata'#13#10#13#10);

 finally
   IdTCPClient.Free;
 end;

end;

mai62

Дата 20.5.2006, 01:58 (ссылка)

(нет голосов)

Загрузка ...

Новичок

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

Репутация: 2
Всего: 3

Демо,

Цитата

Вот эта цепочка интересна, учитывая недоступность администрирования промежуточных звеньев...

http proxy chain - это не мое изобретение (к сожалению smile

)
_http://www.freeproxy.ru/en/free_proxy/faq/what_is_http_proxy.htm
_http://packages.debian.org/unstable/net/proxychains.html
К сожалению не нашел нигде простого описания как это делается. Полагаю происходит это так. Допустим мы хотим пробросить канал от клиента к серверу через цепочку из двух прокси (как я уже писал выше, http прокси должны поддерживать метод connect).

Клиент --> Прокси1 --> Прокси2 --> Сервер
Клиент устанавливает соединение с Прокси1 и шлет команду
connect Прокси2 http1.1
D результате получаем такую цепочку:
Клиент --> --------> --> Прокси2 --> Сервер
Потом
connect Сервер http1.1
Получаем
Клиент --> --------> --> --------> --> Сервер

На самом деле похожим образом поступает браузер, когда хочет связаться с https-сервером через http-прокси. Он соединяется с http-прокси и шлет команду
connect https_сервер:443 http1.1
И после этого обменивается с сервером по https-протоколу.

Демо

Дата 20.5.2006, 10:41 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1278
Регистрация: 3.11.2005

Репутация: 3
Всего: 50

Цитата(mai62 @ 20.5.2006, 01:58

)

Клиент --> Прокси1 --> Прокси2 --> Сервер

Вот в таком варианте сделать возможно и очень просто.

Вот в таком -

Цитата(FAK @ 12.5.2006, 20:47

)

Компьютер подключается к прокси1, который подключается к прокси2, прокси2 подключается к прокси3 и тд. Вот это мне и нужно реализовать в делфи

невозможно.

Добавлено @ 10:43
Дело в том, что "Прокси1" как раз и есть наш сервер, которым я могу управлять, на котором могу настроить каскадирование.
А вот "Прокси2" - это уже чужой прокси-сервер, и он будет в цепочке последним.

--------------------

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Сети \| Следующая тема »