А. Григорьев - О чём не пишут в книгах по Delphi

Если при вызове функции WSARecvExфлаг MSG_PARTIALустановлен программой, но дейтаграмма поместилась в буфер целиком, функция сбрасывает этот флаг.

В описании функции WSARecvExв MSDN можно прочитать, что если дейтаграмма прочитана частично, то следующий вызов функции позволит прочитать оставшуюся часть дейтаграммы. Это не относится к протоколу UDP и справедливо только по отношению к протоколам типа SPX, в которых одна дейтаграмма может разбиваться на несколько сетевых пакетов и потому возможна ситуация, когда в буфере сокета окажется только часть дейтаграммы. В UDP, напомним, дейтаграмма всегда посылается одним IP-пакетом и помещается в буфер сразу целиком.

Функция WSARecvExне позволяет программе определить, с какого адреса прислана дейтаграмма, а аналога функции recvfromс такими же возможностями в WinSock нет.

Мы уже упоминали о том, что в WinSock 1 существует перекрытый ввод-вывод, но только для систем линии NT. Также в WinSock 1 определена функция AcceptEx, которая является более мощным эквивалентом функции accept, и позволяет принимать входящие соединения в режиме перекрытого ввода-вывода. В WinSock 1 эта функция не поддерживается в Windows 95, в WinSock 2 она доступна во всех системах. Листинг 2.81 содержит ее прототип.

function AcceptEx(sListenSocket, sAcceptSocket: TSocket; lpOutputBuffer: Pointer; dwReceiveDataLength: DWORD; dwLocalAddressLength: DWORD; dwRemoteAddressLength: DWORD; var lpdwBytesReceived: DWORD; lpOverlapped: POverlapped): BOOL;

Функция AcceptExпозволяет принять новое подключение со стороны клиента и сразу же получить от него первую порцию данных. Функция работает только в режиме перекрытого ввода-вывода.

Параметр sListenSocketопределяет сокет, который должен находиться в режиме ожидания подключения. Параметр sAcceptSocket— сокет, через который будет осуществляться связь с подключившимся клиентом. Напомним, что функции acceptи WSAAcceptсами создают новый сокет. При использовании же AcceptExпрограмма должна заранее создать сокет и, не привязывая его к адресу, передать в качестве параметра sAcceptSocket. Параметр lpOutputBuferзадает указатель на буфер, в который будут помещены, во-первых, данные, присланные клиентом, а во-вторых, адреса подключившегося клиента и адрес, к которому привязывается сокет sAcceptSocket. Параметр dwReceiveDataLengthзадает число байтов в буфере, зарезервированных для данных, присланных клиентом, dwLocalAddressLength— для адреса привязки сокета sAcceptSocket, dwRemoteAddressLength— адреса подключившегося клиента. Если параметр dwReceiveDataLengthравен нулю, функция не ждет, пока клиент пришлет данные, и считает операцию завершившейся сразу после подключения клиента, как функция accept. Для адресов нужно резервировать как минимум на 16 байтов больше места, чем реально требуется. Так как размер структуры TSockAddrсоставляет 16 байтов, на каждый из адресов требуется зарезервировать как минимум 32 байта. Параметр lpdwBytesReceivedиспользуется функцией, чтобы вернуть количество байтов, присланных клиентом.

Параметр lpOverlappedуказывает на запись TOverlapped, определенную в модуле Windows следующим образом (листинг 2.82).

POverlapped = TOverlapped;

_OVERLAPPED = record

Internal: DWORD;

InternalHigh: DWORD;

Offset: DWORD;

OffsetHigh: DWORD;

hEvent: THandle;

end;

TOverlapped = _OVERLAPPED;

Структура TOverlappedиспользуется, в основном, для перекрытого ввода-вывода в файловых операциях. Видно, что она отличается от уже знакомой нам структуры TWSAOverlapped(см. листинг 2.69) только типом параметра hEvent— THandleвместо TWSAEvent. Впрочем, ранее мы уже обсуждали, что TWSAEvent— это синоним THandle, так что можно сказать, что эти структуры идентичны (но компилятор подходит к этому вопросу формально и считает их разными).

Параметр lpOverlappedфункции AcceptExне может быть равным -1, а его поле hEventдолжно указывать на корректное событие. Процедуры завершения не предусмотрены. Если на момент вызова функции клиент уже подключился и прислал первую порцию данных (или место для данных в буфере не зарезервировано), AcceptExвозвращает True. Если же клиент еще не подключился, или подключился, но не прислал данные, функция AcceptExвозвращает False, а WSAGetLastError— ERROR_IO_PENDING. Параметр lpBytesReceivedв этом случае остается без изменений.

Проконтролировать состояние операции можно с помощью функции GetOverlappedResult, которая является аналогом известной нам функции WSAGetOverlappedResult, за исключением того, что использует запись TOverlappedвместо TWSAOverlappedи не предусматривает передачу флагов. С ее помощью можно узнать, завершилась ли операция, а также дождаться ее завершения и узнать, сколько байтов прислано клиентом (функция AcceptExне ждет, пока клиент заполнит весь буфер, предназначенный для него — для завершения операции подключения достаточно первого пакета).