socket как узнать что пришёл ответ?

[Biohazard]

есть функция
function send(s: integer; var Buf; len, flags: Integer): Integer; stdcall; stdcall; external 'wsock32.dll';

ну вы её знаете и знаете то она делает (отправляет сообщение на сервер, после чего сервер отправляет какой то ответ)

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

вопрос: какую функцию использовать, чтобы узнать, что сервер прислал ответ?

[Пепел Феникса]

select вам нужна

[Biohazard]

ммм погуглил про неё сейчас, не очень понятно как её юзать

FD_ZERO(rdfs);
FD_SET(hSocket, rdfs);
tmout.tv_sec := 0;
tmout.tv_usec := 500000;
ievnt := select(0, @rdfs, nil, nil, @tmout);
if (ievnt <= 0) then break;

что то типо того? без таймаута никак не реализовать?

через селект не работает! или я что то не правильно делаю, вот моя функция, только толку нету, меньше ждёт чем надо, сервер ещё не послал ответ а она уже выполнилась и рунтайм получается

function wait(Socket:integer):integer;
type
  TFDSet = record
    fd_count: Integer;
    fd_array: array[0..63] of Integer;
  end;
  timeval = record
    tv_sec: Longint;
    tv_usec: Longint;
  end;
var
 rdfs:TFDSet;
 tmout: timeval;
begin
  rdfs.fd_array[0] := Socket;
  rdfs.fd_count:=1;
  tmout.tv_sec := 0;
  tmout.tv_usec := 500000;
  result := select(0, @rdfs, nil, nil, @tmout);
end;

[Пепел Феникса]

а что вы хотите ждать вечно?
таймаут позволяет подождать опред время, потом или ошибка таймаута или чтото еще сделать можно.

а вы ответ от read проверяете?
у меня подозрение что вы слепо верите в то сколько байт вы прочли.

select дает положительный ответ если можно прочесть с сокета хоть один байт, не гарантируется что вы прочтете сразу все что послано.

[Biohazard]

Сообщение от Пепел Феникса

а что вы хотите ждать вечно?
таймаут позволяет подождать опред время, потом или ошибка таймаута или чтото еще сделать можно.

если просто слип стоит даже 1000 то всё работает, а эта функция просто возвращает число, ничего не ожидая, не знаю где глюк, ну и без ожидания соответственно, ошибка вылазит

Сообщение от Пепел Феникса

select дает положительный ответ если можно прочесть с сокета хоть один байт, не гарантируется что вы прочтете сразу все что послано.

и чтож там делать? она уже считывает что - ли: как ресв?

[waleri]

Сообщение от Biohazard

через селект не работает! или я что то не правильно делаю, вот моя функция,

Читайте *внимательно* что именно делает select - вам еще надо проверить fd_set на предмет ответа. Я уж молчу, что надо проверять на предмет ошибок...