Многопоточность Indy

[AVer]

Кругом только и написано: "Преимуществом Indy является многопоточность при блокирующих сокетах...", а на деле я столкнуся с реальной проблемой:
Мне надо выполнить IdHhtp.Get() в нескольких потоках. Че не находил - нихрена не понял. Народ, помогите конкретным примером...

[Квэнди]

Ты не так понял дивиз Indy под многопоточностью там понимается лишь "каждому коннекту свой поток" не более)
Для реализации "скачивания" конкретного файла в несколько потоков лучше использовать методы, отличные от Indy.

[Viteef]

лучше использовать методы, отличные от Indy.

Тема не раскрыта Какие способы возможны?

http://www.google.com/search?client=...utf-8&oe=utf-8

[Квэнди]

ну чтож, можно реализовать, кпримеру, так: узнаем размер удаленного файла:

function GetUrlInfo(const dwInfoLevel: DWORD; const FileURL: string):
string;
var
  hSession: HINTERNET;
  hService: HINTERNET;
  FileSize: Longint;
  dwSize, Reserved: DWORD;
  buf: String;
begin
  hSession := InternetOpen( 'MyApp', INTERNET_OPEN_TYPE_PRECONFIG, nil, nil, 0 );
  if Assigned( hSession ) then
  begin
    hService := InternetOpenUrl(hSession, PChar(FileURL), nil, 0, 0, 0);
    if Assigned( hService ) then
    begin
      dwSize := sizeof(FileSize); //what does this do? FileSize isn't anything yet is it??
      Reserved := 0;
      HttpQueryInfo(hService, HTTP_QUERY_CONTENT_LENGTH or HTTP_QUERY_FLAG_NUMBER,
                    @FileSize, dwSize, Reserved); //get the size
      result := inttostr(filesize); //convert to a string
    end;
    InternetCloseHandle( hService );
  end;
  InternetCloseHandle( hSession );
end;

соответственно вызов:

GetUrlInfo(HTTP_QUERY_CONTENT_LENGTH,<URL>);

затем генерируем n-е число стандартных потоков, в каждом из которых создаем IdTcpClient, коннектимся к удаленному узлу и читаем из удаленного файла некое число байт, каждый поток, соответственно, начинает чтение файла не сначала. Думаю идея понятна. Способ весьма кривой, на самом делеи достаточно спорный по поводу конфликтов ресурсов между потоками.

[Viteef]

у меня задача 1 файл в 1 поток.

т.е. все сводиться к

генерируем n-е число стандартных потоков, в каждом из которых создаем IdTcpClient, коннектимся к удаленному узлу

Квэнди, спасибо.

[Квэнди]

если один файл в один поток, то лучше не заморачиваться с разделением файла на байтовые последовательности а качать весь. Тогда в каждом потоке создаем Idhttp и GET-м забираем файл

[Viteef]

Сообщение от Квэнди

если один файл в один поток, то лучше не заморачиваться с разделением файла на байтовые последовательности а качать весь. Тогда в каждом потоке создаем Idhttp и GET-м забираем файл

Так и сделал. На некоторых сайтах возникает ошибка connection reset by peer и цикл с GET'ом останавливается. Пример такогих сайтов - offtopa.net, dragonfever.info.

[Квэнди]

Воспользуйся Request.KeepAlive в компоненте IdHttp должно помочь.

[Viteef]

Сообщение от Квэнди

Воспользуйся Request.KeepAlive в компоненте IdHttp должно помочь.

idhttp1.request.ProxyConnection:='Keep-Alive';

не помогло...

[Квэнди]

а, если в цикле, то после каждого GET-а делай idhttp.Disconnect так будет правильней и , по идее, не должно возникать сброса сессии удаленным хостом