![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как реализовать "ретранслятор" запросов через сокеты?
Kanaris © (2009-12-04 16:03:00)Задача такова. Хочу написать программу, которая посредством TClientSocket и TServerSocket будет пропускать через себя запрос и ответ таким образом:
1) программа висит на каком-нибудь порту (например 888) в режиме сервера (принимает запросы);
2) пользователь в браузере заходит на адрес http://localhost:888/(т.е. браузер посылает запрос в программу);
3) программа получила запрос от браузера, и отправила его на сайт (например htmlbook.ru), поменяв в запросе строчку "Host: localhost:888" на "Host: htmlbook.ru";
4) дождавшись ответа от htmlbook.ru, программа в точности передает его в браузер.
Т.е. получается, что пишешь в браузере http://localhost:888и тебе открывается сайт htmlbook.ru. Т.е. выполняется "ретрансляция" запроса. Должно поддерживаться несколько соединений (т.к. браузер открывает сразу несколько запросов с сервером). Как это реализовать?
(прокси не предлагайте, это не совсем то)
DVM (2009-12-05 00:18:00) [1]
> Kanaris
Вообще твоя задача довольно легко решается с помощью связки TidHTTPServer и TIdHTTPClient. Многопоточность TidHTTPServer обеспечит сам.
Грубо говоря все выглядит так:
1) TidHTTPServer ждет соединений на нужном порту
2) Клиент подключается к нему с запросом
3) В обработчике сервера OnCommandGet ты получаешь всю информацию о запросе клиента, в том числе заголовок запроса и т.д.
4) Динамически создаешь TIdHTTPClient, передаешь ему все что нужно и получаешь страницу
5) Отдаешь страницу клиенту.
вуаля.
Сергей М. (2009-12-05 00:14:00) [2]
> Попробовал реализовать через TIdMappedPortTCP
Только не говори что это не прокси.
> как подменить адрес в запросе?
зачем ?)
DVM (2009-12-05 00:11:00) [3]
> Kanaris (05.12.09 00:05) [9]
> TIdMappedPortTCP
Это несколько для другого. Для создания HTTP proxy он не годится.
Kanaris (2009-12-05 00:05:00) [4]Попробовал реализовать через TIdMappedPortTCP. Здесь вообще все просто, выполняется тоже самое. Но как подменить адрес в запросе?
Сергей М. (2009-12-04 21:44:00) [5]
> прокси не предлагайте, это не совсем то
Гупости.
Прокси - это как раз то самое и есть.
Сергей М. (2009-12-04 21:42:00) [6]
> Kanaris (04.12.09 16:57) [4]
Ты студень что ли ?)
Та "пара строк" - это для препода ?
DVM (2009-12-04 18:53:00) [7]
> Kanaris (04.12.09 16:57) [4]
вот еще
http://forum.sources.ru/index.php?showtopic=135857&view=showall
DVM (2009-12-04 18:51:00) [8]
> Kanaris (04.12.09 16:57) [4]
может подойдет после небольшой модификации http://www.delphisources.ru/pages/sources/internet/2006_year/tgphttp_proxy.html
а еще есть TIdHTTPProxy
Kanaris (2009-12-04 16:57:00) [9]Если не сложно, пожалуйста наваяйте пару строк, как это сделать, самое главное, чтобы поддерживалось несколько соединений (именно с этим у меня ничего не получается).
Anatoly Podgoretsky (2009-12-04 16:48:00) [10]> Kanaris (04.12.2009 16:03:00) [0]
Да типичное это прокси, только у тебя оно наверняка нелегальное
Медвежонок Пятачок (2009-12-04 16:41:00) [11]Как это реализовать?
ты же сам все рассказал как:
программа получила запрос от браузера, и отправила его на сайт (например htmlbook.ru), поменяв в запросе строчку "Host: localhost:888" на "Host: htmlbook.ru";
4) дождавшись ответа от htmlbook.ru, программа в точности передает его в браузер.
Медвежонок Пятачок (2009-12-04 16:38:00) [12]и в чем смысл?