FTP через HTTP proxy

@Dmitry Andreev · Регистрация: 12.11.2011

Студворк — интернет-сервис помощи студентам

Здравствуйте, уважаемые форумчане. Пишу FTP клиент подключающийся к FTP серверу через HTTP Proxy (UserGate5). Проблемма в следующем:

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var fSession, hConnect: Pointer;
..
fSession := InternetOpen('',INTERNET_OPEN_TYPE_PROXY, 
PChar( 'http=http://169.254.126.20:8080 https=http://169.254.126.20:8080 
ftp=http://169.254.126.20:8080'), nil, 0);
if Assigned(fSession) then 
  begin
  hConnect := InternetConnect(fSession,PChar('91.149.157.143'),21,PChar('ncpi'),
PChar  ('etalon'),INTERNET_SERVICE_FTP,0,0);
  if not Assigned(hConnect) then begin
    ShowMessage('InternetConnect error');
  end;
end else
ShowMessage('InternetOpen error');

InternetOpen проходит нормально, а вот на InternetConnect подключение к серверу не происходит. Без прокси все работает. Заранее спасибо!

@mss · 27.08.2012, 12:11

http://msdn.microsoft.com/en-u... 85%29.aspx

Читать внимательно про параметр lpszProxyName [in] !

@Dmitry Andreev · 27.08.2012, 12:16 **[ТС]**

Я так понял все дело тут "FTP requests can be made through a CERN type proxy either by changing them to an HTTP request or by using InternetOpenUrl." Действительно с OpenUrl все работает отлично. Если можно подскажите, пожалуйста, как поменять FTP request на HTTP?

@mss · 27.08.2012, 12:31

Ну написано же там черным по белому:

FTP requests can be made through a CERN type proxy either by changing them to an HTTP request or by using InternetOpenUrl

@Dmitry Andreev · 27.08.2012, 12:54 **[ТС]**

Спасибо, mss. Сделал так:

Delphi
1
2
hConnect := InternetConnect(fSession,PChar('91.149.157.143'),21,PChar('ncpi'),
PChar  ('etalon'),INTERNET_SERVICE_HTTP,0,0);

Теперь нужно установить директорию и скачать файл:

Delphi
1
FtpSetCurrentDirectory(hConnect, PChar(ftpDir));

Не получается. Или как можно еще скачать файл с FTP?

@mss · 27.08.2012, 13:20

что значит "Не получается" ?
что говорит Win32Check(FtpSetCurrentDirectory(...)) ?
ftpDir - это ANSI- или Unicode-строка ?

@Dmitry Andreev · 27.08.2012, 13:56 **[ТС]**

SystemError. Code 12018. В описании ошибок WinInet говорится: ERROR_INTERNET_INCORRECT_HANDLE_TYPE Неверный тип обработчика для данного действия.

@mss · 27.08.2012, 14:35

Для CERN-прокси поднабор Ftp-функций в составе WinInet использован быть не может.

@Dmitry Andreev · 27.08.2012, 14:40 **[ТС]**

Как-же тогда можно получить список файлов и скачать нужный? Подскажите пожалуйста.

@mss · 27.08.2012, 14:47

Через SOCKS-прокси

@Dmitry Andreev · 27.08.2012, 15:40 **[ТС]**

Нет ли пример кода?

@mss · 27.08.2012, 16:01

А ты уже убедился что UserGate предоставляет функциональность SOCKS-прокси ?

@Dmitry Andreev · 27.08.2012, 19:29 **[ТС]**

Должен поддерживать.

@mss · 27.08.2012, 20:40

fSession := InternetOpen('',INTERNET_OPEN_TYPE_PROXY ,
'socks=socks://xx.xx.xx.xx:xx .......

Новые блоги и статьи Все статьи Все блоги /
Как украсить новогоднюю елку с Q# и Qiskit EggHead 24.06.2025 Что может быть необычнее, чем применить законы квантовой механики для украшения новогодней елки? Пока другие развешивают обычные гирлянды, я решил объединить свою страсть к квантовым вычислениям с. . .	Системы нулевого доверия на C# UnmanagedCoder 24.06.2025 Традиционная архитектура безопасности работает по принципу средневекового замка: создаём высокие стены вокруг корпоративной сети, укрепляем ворота межсетевыми экранами и системами обнаружения. . .	Снова не мой путь. Циклическое среднее, я обеими руками за проверку условия, в ракурсе данной задачи - циклическое среднее в топку. Hrethgir 24.06.2025 Привет. Такой вопрос - нужно выводить среднее математическое между двумя направлениями, интервал значений которых может лежать в диапазоне одного оборота по кругу. Проблема заключается в том, что. . .	Деплой Flask приложения py-thonny 23.06.2025 За годы работы с Flask я натыкался на одни и те же грабли достаточно часто, чтобы наконец научится их обходить. И сегодня хочу поделится опытом, который сбережет вам немало нервных клеток. Начнем с. . .	WebAssembly и контейнеры в .NET Aspire для оркестрации распределенных архитектур ArchitectMsa 23.06.2025 Я наблюдаю, как WebAssembly (или просто WASM) постепенно выходит за рамки своего первоначального предназначения — исполнения кода на стороне браузера. Теперь эта технология проникает в серверную. . .
Непрерывная интеграция для пакета Python Mr. Docker 22.06.2025 Было 4 часа утра пятницы, когда я выпустил новую версию нашей внутренней библиотеки для обработки данных. Релиз 0. 5. 2 содержал небольшой фикс для обработки дат в ISO формате, что может пойти не так?. . .	Продвинутый ETL на C# из OLTP БД в хранилище stackOverflow 22.06.2025 Работая в сфере корпоративной аналитики, я постоянно сталкиваюсь с одним и тем же - нужны чистые, структурированные и, главное, свежие данные. Без них современные аналитические системы, машинное. . .	Мастер-класс по микросервисам на Node.js Reangularity 21.06.2025 Node. js стал одной из самых популярных платформ для микросервисной архитектуры не случайно. Его неблокирующая однопоточная модель и событийно-ориентированный подход делают его идеальным для. . .	Управление Arduino из WPF приложения Wired 21.06.2025 Зачем вообще связывать Arduino с WPF-приложением? Казалось бы, у Arduino есть собственная среда разработки, своя экосистема, свои способы управления. Однако при создании серьезных проектов. . .	Звёздная пыль kumehtar 20.06.2025 Я просто это себе представляю: как создавался этот мир. Как энергия слипалась в маленькие частички. Как они собирались в первые звёзды, как во вселенной впервые появился Свет. Как эти звёзды. . .

@mss 3530 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	27.08.2012, 12:11
	http://msdn.microsoft.com/en-u... 85%29.aspx Читать внимательно про параметр lpszProxyName [in] ! 0

@Dmitry Andreev 5 / 5 / 2 Регистрация: 12.11.2011 Сообщений: 70
	27.08.2012, 12:16 [ТС]
	Я так понял все дело тут "FTP requests can be made through a CERN type proxy either by changing them to an HTTP request or by using InternetOpenUrl." Действительно с OpenUrl все работает отлично. Если можно подскажите, пожалуйста, как поменять FTP request на HTTP? 0

@mss 3530 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	27.08.2012, 13:20
	что значит "Не получается" ? что говорит Win32Check(FtpSetCurrentDirectory(...)) ? ftpDir - это ANSI- или Unicode-строка ? 0

@Dmitry Andreev 5 / 5 / 2 Регистрация: 12.11.2011 Сообщений: 70
	27.08.2012, 13:56 [ТС]
	SystemError. Code 12018. В описании ошибок WinInet говорится: ERROR_INTERNET_INCORRECT_HANDLE_TYPE Неверный тип обработчика для данного действия. 0

@mss 3530 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	27.08.2012, 14:35
	Для CERN-прокси поднабор Ftp-функций в составе WinInet использован быть не может. 0

@Dmitry Andreev 5 / 5 / 2 Регистрация: 12.11.2011 Сообщений: 70
	27.08.2012, 14:40 [ТС]
	Как-же тогда можно получить список файлов и скачать нужный? Подскажите пожалуйста. 0

@mss 3530 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	27.08.2012, 14:47
	Через SOCKS-прокси 0

@Dmitry Andreev 5 / 5 / 2 Регистрация: 12.11.2011 Сообщений: 70
	27.08.2012, 15:40 [ТС]
	Нет ли пример кода? 0

@mss 3530 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	27.08.2012, 16:01
	А ты уже убедился что UserGate предоставляет функциональность SOCKS-прокси ? 0

@Dmitry Andreev 5 / 5 / 2 Регистрация: 12.11.2011 Сообщений: 70
	27.08.2012, 19:29 [ТС]
	Должен поддерживать. 0

Опции темы

@mss 3530 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	27.08.2012, 20:40
	fSession := InternetOpen('',INTERNET_OPEN_TYPE_PROXY , 'socks=socks://xx.xx.xx.xx:xx ....... 0