2 * COPYRIGHT: See COPYING in the top level directory
3 * PROJECT: ReactOS Ancillary Function Driver DLL
5 * PURPOSE: DLL entry point
6 * PROGRAMMERS: Casper S. Hornstrup (chorns@users.sourceforge.net)
7 * Alex Ionescu (alex@relsoft.net)
9 * CSH 01/09-2000 Created
10 * Alex 16/07/2004 - Complete Rewrite
18 //DWORD DebugTraceLevel = DEBUG_ULTRA;
19 DWORD DebugTraceLevel
= 0;
23 WSPUPCALLTABLE Upcalls
;
24 LPWPUCOMPLETEOVERLAPPEDREQUEST lpWPUCompleteOverlappedRequest
;
25 ULONG SocketCount
= 0;
26 PSOCKET_INFORMATION
*Sockets
= NULL
;
27 LIST_ENTRY SockHelpersListHead
= { NULL
, NULL
};
28 ULONG SockAsyncThreadRefCount
;
29 HANDLE SockAsyncHelperAfdHandle
;
30 HANDLE SockAsyncCompletionPort
;
31 BOOLEAN SockAsyncSelectCalled
;
36 * FUNCTION: Creates a new socket
40 * protocol = Protocol type
41 * lpProtocolInfo = Pointer to protocol information
43 * dwFlags = Socket flags
44 * lpErrno = Address of buffer for error information
46 * Created socket, or INVALID_SOCKET if it could not be created
50 WSPSocket(int AddressFamily
,
53 LPWSAPROTOCOL_INFOW lpProtocolInfo
,
58 OBJECT_ATTRIBUTES Object
;
62 PAFD_CREATE_PACKET AfdPacket
;
64 PSOCKET_INFORMATION Socket
= NULL
, PrevSocket
= NULL
;
65 PFILE_FULL_EA_INFORMATION EABuffer
= NULL
;
66 PHELPER_DATA HelperData
;
67 PVOID HelperDLLContext
;
69 UNICODE_STRING TransportName
;
70 UNICODE_STRING DevName
;
71 LARGE_INTEGER GroupData
;
74 AFD_DbgPrint(MAX_TRACE
, ("Creating Socket, getting TDI Name\n"));
75 AFD_DbgPrint(MAX_TRACE
, ("AddressFamily (%d) SocketType (%d) Protocol (%d).\n",
76 AddressFamily
, SocketType
, Protocol
));
78 /* Get Helper Data and Transport */
79 Status
= SockGetTdiName (&AddressFamily
,
90 if (Status
!= NO_ERROR
)
92 AFD_DbgPrint(MID_TRACE
,("SockGetTdiName: Status %x\n", Status
));
97 RtlInitUnicodeString(&DevName
, L
"\\Device\\Afd\\Endpoint");
100 Socket
= HeapAlloc(GlobalHeap
, 0, sizeof(*Socket
));
101 RtlZeroMemory(Socket
, sizeof(*Socket
));
102 Socket
->RefCount
= 2;
104 Socket
->SharedData
.State
= SocketOpen
;
105 Socket
->SharedData
.AddressFamily
= AddressFamily
;
106 Socket
->SharedData
.SocketType
= SocketType
;
107 Socket
->SharedData
.Protocol
= Protocol
;
108 Socket
->HelperContext
= HelperDLLContext
;
109 Socket
->HelperData
= HelperData
;
110 Socket
->HelperEvents
= HelperEvents
;
111 Socket
->LocalAddress
= &Socket
->WSLocalAddress
;
112 Socket
->SharedData
.SizeOfLocalAddress
= HelperData
->MaxWSAddressLength
;
113 Socket
->RemoteAddress
= &Socket
->WSRemoteAddress
;
114 Socket
->SharedData
.SizeOfRemoteAddress
= HelperData
->MaxWSAddressLength
;
115 Socket
->SharedData
.UseDelayedAcceptance
= HelperData
->UseDelayedAcceptance
;
116 Socket
->SharedData
.CreateFlags
= dwFlags
;
117 Socket
->SharedData
.CatalogEntryId
= lpProtocolInfo
->dwCatalogEntryId
;
118 Socket
->SharedData
.ServiceFlags1
= lpProtocolInfo
->dwServiceFlags1
;
119 Socket
->SharedData
.ProviderFlags
= lpProtocolInfo
->dwProviderFlags
;
120 Socket
->SharedData
.GroupID
= g
;
121 Socket
->SharedData
.GroupType
= 0;
122 Socket
->SharedData
.UseSAN
= FALSE
;
123 Socket
->SharedData
.NonBlocking
= FALSE
; /* Sockets start blocking */
124 Socket
->SanData
= NULL
;
126 /* Ask alex about this */
127 if( Socket
->SharedData
.SocketType
== SOCK_DGRAM
||
128 Socket
->SharedData
.SocketType
== SOCK_RAW
)
130 AFD_DbgPrint(MID_TRACE
,("Connectionless socket\n"));
131 Socket
->SharedData
.ServiceFlags1
|= XP1_CONNECTIONLESS
;
135 SizeOfPacket
= TransportName
.Length
+ sizeof(AFD_CREATE_PACKET
) + sizeof(WCHAR
);
138 SizeOfEA
= SizeOfPacket
+ sizeof(FILE_FULL_EA_INFORMATION
) + AFD_PACKET_COMMAND_LENGTH
;
140 /* Set up EA Buffer */
141 EABuffer
= HeapAlloc(GlobalHeap
, 0, SizeOfEA
);
142 RtlZeroMemory(EABuffer
, SizeOfEA
);
143 EABuffer
->NextEntryOffset
= 0;
145 EABuffer
->EaNameLength
= AFD_PACKET_COMMAND_LENGTH
;
146 RtlCopyMemory (EABuffer
->EaName
,
148 AFD_PACKET_COMMAND_LENGTH
+ 1);
149 EABuffer
->EaValueLength
= SizeOfPacket
;
151 /* Set up AFD Packet */
152 AfdPacket
= (PAFD_CREATE_PACKET
)(EABuffer
->EaName
+ EABuffer
->EaNameLength
+ 1);
153 AfdPacket
->SizeOfTransportName
= TransportName
.Length
;
154 RtlCopyMemory (AfdPacket
->TransportName
,
155 TransportName
.Buffer
,
156 TransportName
.Length
+ sizeof(WCHAR
));
157 AfdPacket
->GroupID
= g
;
159 /* Set up Endpoint Flags */
160 if ((Socket
->SharedData
.ServiceFlags1
& XP1_CONNECTIONLESS
) != 0)
162 if ((SocketType
!= SOCK_DGRAM
) && (SocketType
!= SOCK_RAW
))
164 /* Only RAW or UDP can be Connectionless */
167 AfdPacket
->EndpointFlags
|= AFD_ENDPOINT_CONNECTIONLESS
;
170 if ((Socket
->SharedData
.ServiceFlags1
& XP1_MESSAGE_ORIENTED
) != 0)
172 if (SocketType
== SOCK_STREAM
)
174 if ((Socket
->SharedData
.ServiceFlags1
& XP1_PSEUDO_STREAM
) == 0)
176 /* The Provider doesn't actually support Message Oriented Streams */
180 AfdPacket
->EndpointFlags
|= AFD_ENDPOINT_MESSAGE_ORIENTED
;
183 if (SocketType
== SOCK_RAW
) AfdPacket
->EndpointFlags
|= AFD_ENDPOINT_RAW
;
185 if (dwFlags
& (WSA_FLAG_MULTIPOINT_C_ROOT
|
186 WSA_FLAG_MULTIPOINT_C_LEAF
|
187 WSA_FLAG_MULTIPOINT_D_ROOT
|
188 WSA_FLAG_MULTIPOINT_D_LEAF
))
190 if ((Socket
->SharedData
.ServiceFlags1
& XP1_SUPPORT_MULTIPOINT
) == 0)
192 /* The Provider doesn't actually support Multipoint */
195 AfdPacket
->EndpointFlags
|= AFD_ENDPOINT_MULTIPOINT
;
197 if (dwFlags
& WSA_FLAG_MULTIPOINT_C_ROOT
)
199 if (((Socket
->SharedData
.ServiceFlags1
& XP1_MULTIPOINT_CONTROL_PLANE
) == 0)
200 || ((dwFlags
& WSA_FLAG_MULTIPOINT_C_LEAF
) != 0))
202 /* The Provider doesn't support Control Planes, or you already gave a leaf */
205 AfdPacket
->EndpointFlags
|= AFD_ENDPOINT_C_ROOT
;
208 if (dwFlags
& WSA_FLAG_MULTIPOINT_D_ROOT
)
210 if (((Socket
->SharedData
.ServiceFlags1
& XP1_MULTIPOINT_DATA_PLANE
) == 0)
211 || ((dwFlags
& WSA_FLAG_MULTIPOINT_D_LEAF
) != 0))
213 /* The Provider doesn't support Data Planes, or you already gave a leaf */
216 AfdPacket
->EndpointFlags
|= AFD_ENDPOINT_D_ROOT
;
220 /* Set up Object Attributes */
221 InitializeObjectAttributes (&Object
,
223 OBJ_CASE_INSENSITIVE
| OBJ_INHERIT
,
227 /* Create the Socket as asynchronous. That means we have to block
228 ourselves after every call to NtDeviceIoControlFile. This is
229 because the kernel doesn't support overlapping synchronous I/O
230 requests (made from multiple threads) at this time (Sep 2005) */
232 GENERIC_READ
| GENERIC_WRITE
| SYNCHRONIZE
,
237 FILE_SHARE_READ
| FILE_SHARE_WRITE
, FILE_OPEN_IF
,
243 Socket
->Handle
= (SOCKET
)Sock
;
245 /* XXX See if there's a structure we can reuse -- We need to do this
247 PrevSocket
= GetSocketStructure( (SOCKET
)Sock
);
251 RtlCopyMemory( PrevSocket
, Socket
, sizeof(*Socket
) );
252 RtlFreeHeap( GlobalHeap
, 0, Socket
);
256 /* Save Group Info */
259 GetSocketInformation(Socket
, AFD_INFO_GROUP_ID_TYPE
, 0, &GroupData
);
260 Socket
->SharedData
.GroupID
= GroupData
.u
.LowPart
;
261 Socket
->SharedData
.GroupType
= GroupData
.u
.HighPart
;
264 /* Get Window Sizes and Save them */
265 GetSocketInformation (Socket
,
266 AFD_INFO_SEND_WINDOW_SIZE
,
267 &Socket
->SharedData
.SizeOfSendBuffer
,
270 GetSocketInformation (Socket
,
271 AFD_INFO_RECEIVE_WINDOW_SIZE
,
272 &Socket
->SharedData
.SizeOfRecvBuffer
,
275 /* Save in Process Sockets List */
276 Sockets
[SocketCount
] = Socket
;
279 /* Create the Socket Context */
280 CreateContext(Socket
);
283 Upcalls
.lpWPUModifyIFSHandle(1, (SOCKET
)Sock
, lpErrno
);
285 /* Return Socket Handle */
286 AFD_DbgPrint(MID_TRACE
,("Success %x\n", Sock
));
291 AFD_DbgPrint(MID_TRACE
,("Ending %x\n", Status
));
296 return INVALID_SOCKET
;
300 DWORD
MsafdReturnWithErrno(NTSTATUS Status
,
303 LPDWORD ReturnedBytes
)
311 case STATUS_CANT_WAIT
:
312 *Errno
= WSAEWOULDBLOCK
;
315 *Errno
= WSAETIMEDOUT
;
318 /* Return Number of bytes Read */
320 *ReturnedBytes
= Received
;
322 case STATUS_END_OF_FILE
:
323 *Errno
= WSAESHUTDOWN
;
326 *Errno
= WSA_IO_PENDING
;
328 case STATUS_BUFFER_OVERFLOW
:
329 DbgPrint("MSAFD: STATUS_BUFFER_TOO_SMALL/STATUS_BUFFER_OVERFLOW\n");
330 *Errno
= WSAEMSGSIZE
;
332 case STATUS_NO_MEMORY
: /* Fall through to STATUS_INSUFFICIENT_RESOURCES */
333 case STATUS_INSUFFICIENT_RESOURCES
:
334 DbgPrint("MSAFD: STATUS_NO_MEMORY/STATUS_INSUFFICIENT_RESOURCES\n");
335 *Errno
= WSA_NOT_ENOUGH_MEMORY
;
337 case STATUS_INVALID_CONNECTION
:
338 DbgPrint("MSAFD: STATUS_INVALID_CONNECTION\n");
339 *Errno
= WSAEAFNOSUPPORT
;
341 case STATUS_REMOTE_NOT_LISTENING
:
342 DbgPrint("MSAFD: STATUS_REMOTE_NOT_LISTENING\n");
343 *Errno
= WSAECONNRESET
;
345 case STATUS_FILE_CLOSED
:
346 DbgPrint("MSAFD: STATUS_FILE_CLOSED\n");
347 *Errno
= WSAENOTSOCK
;
349 case STATUS_INVALID_PARAMETER
:
350 DbgPrint("MSAFD: STATUS_INVALID_PARAMETER\n");
354 DbgPrint("MSAFD: Error %x is unknown\n", Status
);
361 return Status
== STATUS_SUCCESS
? 0 : SOCKET_ERROR
;
365 * FUNCTION: Closes an open socket
367 * s = Socket descriptor
368 * lpErrno = Address of buffer for error information
370 * NO_ERROR, or SOCKET_ERROR if the socket could not be closed
374 WSPCloseSocket(IN SOCKET Handle
,
377 IO_STATUS_BLOCK IoStatusBlock
;
378 PSOCKET_INFORMATION Socket
= NULL
;
381 AFD_DISCONNECT_INFO DisconnectInfo
;
382 SOCKET_STATE OldState
;
384 /* Create the Wait Event */
385 Status
= NtCreateEvent(&SockEvent
,
386 GENERIC_READ
| GENERIC_WRITE
,
391 if(!NT_SUCCESS(Status
))
394 /* Get the Socket Structure associate to this Socket*/
395 Socket
= GetSocketStructure(Handle
);
397 /* If a Close is already in Process, give up */
398 if (Socket
->SharedData
.State
== SocketClosed
)
400 *lpErrno
= WSAENOTSOCK
;
404 /* Set the state to close */
405 OldState
= Socket
->SharedData
.State
;
406 Socket
->SharedData
.State
= SocketClosed
;
408 /* If SO_LINGER is ON and the Socket is connected, we need to disconnect */
409 /* FIXME: Should we do this on Datagram Sockets too? */
410 if ((OldState
== SocketConnected
) && (Socket
->SharedData
.LingerData
.l_onoff
))
413 ULONG SendsInProgress
;
416 /* We need to respect the timeout */
418 LingerWait
= Socket
->SharedData
.LingerData
.l_linger
* 1000;
420 /* Loop until no more sends are pending, within the timeout */
423 /* Find out how many Sends are in Progress */
424 if (GetSocketInformation(Socket
,
425 AFD_INFO_SENDS_IN_PROGRESS
,
429 /* Bail out if anything but NO_ERROR */
434 /* Bail out if no more sends are pending */
435 if (!SendsInProgress
)
438 * We have to execute a sleep, so it's kind of like
439 * a block. If the socket is Nonblock, we cannot
440 * go on since asyncronous operation is expected
441 * and we cannot offer it
443 if (Socket
->SharedData
.NonBlocking
)
445 Socket
->SharedData
.State
= OldState
;
446 *lpErrno
= WSAEWOULDBLOCK
;
450 /* Now we can sleep, and decrement the linger wait */
452 * FIXME: It seems Windows does some funky acceleration
453 * since the waiting seems to be longer and longer. I
454 * don't think this improves performance so much, so we
455 * wait a fixed time instead.
458 LingerWait
-= SleepWait
;
462 * We have reached the timeout or sends are over.
463 * Disconnect if the timeout has been reached.
467 DisconnectInfo
.Timeout
= RtlConvertLongToLargeInteger(0);
468 DisconnectInfo
.DisconnectType
= AFD_DISCONNECT_ABORT
;
471 Status
= NtDeviceIoControlFile((HANDLE
)Handle
,
476 IOCTL_AFD_DISCONNECT
,
478 sizeof(DisconnectInfo
),
482 /* Wait for return */
483 if (Status
== STATUS_PENDING
)
485 WaitForSingleObject(SockEvent
, INFINITE
);
490 /* FIXME: We should notify the Helper DLL of WSH_NOTIFY_CLOSE */
493 Socket
->HelperContext
= NULL
;
494 Socket
->SharedData
.AsyncDisabledEvents
= -1;
495 NtClose(Socket
->TdiAddressHandle
);
496 Socket
->TdiAddressHandle
= NULL
;
497 NtClose(Socket
->TdiConnectionHandle
);
498 Socket
->TdiConnectionHandle
= NULL
;
500 /* Close the handle */
501 NtClose((HANDLE
)Handle
);
508 * FUNCTION: Associates a local address with a socket
510 * s = Socket descriptor
511 * name = Pointer to local address
512 * namelen = Length of name
513 * lpErrno = Address of buffer for error information
515 * 0, or SOCKET_ERROR if the socket could not be bound
519 WSPBind(SOCKET Handle
,
520 const struct sockaddr
*SocketAddress
,
521 int SocketAddressLength
,
524 IO_STATUS_BLOCK IOSB
;
525 PAFD_BIND_DATA BindData
;
526 PSOCKET_INFORMATION Socket
= NULL
;
528 UCHAR BindBuffer
[0x1A];
529 SOCKADDR_INFO SocketInfo
;
532 Status
= NtCreateEvent(&SockEvent
,
533 GENERIC_READ
| GENERIC_WRITE
,
538 if( !NT_SUCCESS(Status
) )
541 /* Get the Socket Structure associate to this Socket*/
542 Socket
= GetSocketStructure(Handle
);
544 /* Dynamic Structure...ugh */
545 BindData
= (PAFD_BIND_DATA
)BindBuffer
;
547 /* Set up Address in TDI Format */
548 BindData
->Address
.TAAddressCount
= 1;
549 BindData
->Address
.Address
[0].AddressLength
= SocketAddressLength
- sizeof(SocketAddress
->sa_family
);
550 BindData
->Address
.Address
[0].AddressType
= SocketAddress
->sa_family
;
551 RtlCopyMemory (BindData
->Address
.Address
[0].Address
,
552 SocketAddress
->sa_data
,
553 SocketAddressLength
- sizeof(SocketAddress
->sa_family
));
555 /* Get Address Information */
556 Socket
->HelperData
->WSHGetSockaddrType ((PSOCKADDR
)SocketAddress
,
560 /* Set the Share Type */
561 if (Socket
->SharedData
.ExclusiveAddressUse
)
563 BindData
->ShareType
= AFD_SHARE_EXCLUSIVE
;
565 else if (SocketInfo
.EndpointInfo
== SockaddrEndpointInfoWildcard
)
567 BindData
->ShareType
= AFD_SHARE_WILDCARD
;
569 else if (Socket
->SharedData
.ReuseAddresses
)
571 BindData
->ShareType
= AFD_SHARE_REUSE
;
575 BindData
->ShareType
= AFD_SHARE_UNIQUE
;
579 Status
= NtDeviceIoControlFile((HANDLE
)Socket
->Handle
,
586 0xA + Socket
->SharedData
.SizeOfLocalAddress
, /* Can't figure out a way to calculate this in C*/
588 0xA + Socket
->SharedData
.SizeOfLocalAddress
); /* Can't figure out a way to calculate this C */
590 /* Wait for return */
591 if (Status
== STATUS_PENDING
)
593 WaitForSingleObject(SockEvent
, INFINITE
);
594 Status
= IOSB
.Status
;
597 /* Set up Socket Data */
598 Socket
->SharedData
.State
= SocketBound
;
599 Socket
->TdiAddressHandle
= (HANDLE
)IOSB
.Information
;
601 NtClose( SockEvent
);
603 return MsafdReturnWithErrno ( Status
, lpErrno
, 0, NULL
);
608 WSPListen(SOCKET Handle
,
612 IO_STATUS_BLOCK IOSB
;
613 AFD_LISTEN_DATA ListenData
;
614 PSOCKET_INFORMATION Socket
= NULL
;
618 Status
= NtCreateEvent(&SockEvent
,
619 GENERIC_READ
| GENERIC_WRITE
,
624 if( !NT_SUCCESS(Status
) )
627 /* Get the Socket Structure associate to this Socket*/
628 Socket
= GetSocketStructure(Handle
);
630 /* Set Up Listen Structure */
631 ListenData
.UseSAN
= FALSE
;
632 ListenData
.UseDelayedAcceptance
= Socket
->SharedData
.UseDelayedAcceptance
;
633 ListenData
.Backlog
= Backlog
;
636 Status
= NtDeviceIoControlFile((HANDLE
)Socket
->Handle
,
641 IOCTL_AFD_START_LISTEN
,
647 /* Wait for return */
648 if (Status
== STATUS_PENDING
)
650 WaitForSingleObject(SockEvent
, INFINITE
);
651 Status
= IOSB
.Status
;
654 /* Set to Listening */
655 Socket
->SharedData
.Listening
= TRUE
;
657 NtClose( SockEvent
);
659 return MsafdReturnWithErrno ( Status
, lpErrno
, 0, NULL
);
669 struct timeval
*timeout
,
672 IO_STATUS_BLOCK IOSB
;
673 PAFD_POLL_INFO PollInfo
;
675 LONG HandleCount
, OutCount
= 0;
676 ULONG PollBufferSize
;
681 LARGE_INTEGER Timeout
;
683 /* Find out how many sockets we have, and how large the buffer needs
686 HandleCount
= ( readfds
? readfds
->fd_count
: 0 ) +
687 ( writefds
? writefds
->fd_count
: 0 ) +
688 ( exceptfds
? exceptfds
->fd_count
: 0 );
690 if( HandleCount
< 0 || nfds
!= 0 )
691 HandleCount
= nfds
* 3;
693 PollBufferSize
= sizeof(*PollInfo
) + (HandleCount
* sizeof(AFD_HANDLE
));
695 AFD_DbgPrint(MID_TRACE
,("HandleCount: %d BufferSize: %d\n",
696 HandleCount
, PollBufferSize
));
698 /* Convert Timeout to NT Format */
701 Timeout
.u
.LowPart
= -1;
702 Timeout
.u
.HighPart
= 0x7FFFFFFF;
703 AFD_DbgPrint(MAX_TRACE
,("Infinite timeout\n"));
707 Timeout
= RtlEnlargedIntegerMultiply
708 ((timeout
->tv_sec
* 1000) + (timeout
->tv_usec
/ 1000), -10000);
709 /* Negative timeouts are illegal. Since the kernel represents an
710 * incremental timeout as a negative number, we check for a positive
713 if (Timeout
.QuadPart
> 0)
715 if (lpErrno
) *lpErrno
= WSAEINVAL
;
718 AFD_DbgPrint(MAX_TRACE
,("Timeout: Orig %d.%06d kernel %d\n",
719 timeout
->tv_sec
, timeout
->tv_usec
,
723 Status
= NtCreateEvent(&SockEvent
,
724 GENERIC_READ
| GENERIC_WRITE
,
729 if( !NT_SUCCESS(Status
) )
733 PollBuffer
= HeapAlloc(GlobalHeap
, 0, PollBufferSize
);
738 *lpErrno
= WSAEFAULT
;
743 PollInfo
= (PAFD_POLL_INFO
)PollBuffer
;
745 RtlZeroMemory( PollInfo
, PollBufferSize
);
747 /* Number of handles for AFD to Check */
748 PollInfo
->Exclusive
= FALSE
;
749 PollInfo
->Timeout
= Timeout
;
751 if (readfds
!= NULL
) {
752 for (i
= 0; i
< readfds
->fd_count
; i
++, j
++)
754 PollInfo
->Handles
[j
].Handle
= readfds
->fd_array
[i
];
755 PollInfo
->Handles
[j
].Events
= AFD_EVENT_RECEIVE
|
756 AFD_EVENT_DISCONNECT
|
761 if (writefds
!= NULL
)
763 for (i
= 0; i
< writefds
->fd_count
; i
++, j
++)
765 PollInfo
->Handles
[j
].Handle
= writefds
->fd_array
[i
];
766 PollInfo
->Handles
[j
].Events
= AFD_EVENT_SEND
| AFD_EVENT_CONNECT
;
769 if (exceptfds
!= NULL
)
771 for (i
= 0; i
< exceptfds
->fd_count
; i
++, j
++)
773 PollInfo
->Handles
[j
].Handle
= exceptfds
->fd_array
[i
];
774 PollInfo
->Handles
[j
].Events
= AFD_EVENT_OOB_RECEIVE
| AFD_EVENT_CONNECT_FAIL
;
778 PollInfo
->HandleCount
= j
;
779 PollBufferSize
= ((PCHAR
)&PollInfo
->Handles
[j
+1]) - ((PCHAR
)PollInfo
);
782 Status
= NtDeviceIoControlFile((HANDLE
)PollInfo
->Handles
[0].Handle
,
793 AFD_DbgPrint(MID_TRACE
,("DeviceIoControlFile => %x\n", Status
));
795 /* Wait for Completition */
796 if (Status
== STATUS_PENDING
)
798 WaitForSingleObject(SockEvent
, INFINITE
);
801 /* Clear the Structures */
809 /* Loop through return structure */
810 HandleCount
= PollInfo
->HandleCount
;
812 /* Return in FDSET Format */
813 for (i
= 0; i
< HandleCount
; i
++)
815 HandleCounted
= FALSE
;
818 switch (PollInfo
->Handles
[i
].Events
& x
)
820 case AFD_EVENT_RECEIVE
:
821 case AFD_EVENT_DISCONNECT
:
822 case AFD_EVENT_ABORT
:
823 case AFD_EVENT_ACCEPT
:
824 case AFD_EVENT_CLOSE
:
825 AFD_DbgPrint(MID_TRACE
,("Event %x on handle %x\n",
826 PollInfo
->Handles
[i
].Events
,
827 PollInfo
->Handles
[i
].Handle
));
831 HandleCounted
= TRUE
;
834 FD_SET(PollInfo
->Handles
[i
].Handle
, readfds
);
837 case AFD_EVENT_CONNECT
:
838 AFD_DbgPrint(MID_TRACE
,("Event %x on handle %x\n",
839 PollInfo
->Handles
[i
].Events
,
840 PollInfo
->Handles
[i
].Handle
));
844 HandleCounted
= TRUE
;
847 FD_SET(PollInfo
->Handles
[i
].Handle
, writefds
);
849 case AFD_EVENT_OOB_RECEIVE
:
850 case AFD_EVENT_CONNECT_FAIL
:
851 AFD_DbgPrint(MID_TRACE
,("Event %x on handle %x\n",
852 PollInfo
->Handles
[i
].Events
,
853 PollInfo
->Handles
[i
].Handle
));
857 HandleCounted
= TRUE
;
860 FD_SET(PollInfo
->Handles
[i
].Handle
, exceptfds
);
866 HeapFree( GlobalHeap
, 0, PollBuffer
);
867 NtClose( SockEvent
);
871 switch( IOSB
.Status
)
878 *lpErrno
= WSAEINVAL
;
881 AFD_DbgPrint(MID_TRACE
,("*lpErrno = %x\n", *lpErrno
));
884 AFD_DbgPrint(MID_TRACE
,("%d events\n", OutCount
));
891 WSPAccept(SOCKET Handle
,
892 struct sockaddr
*SocketAddress
,
893 int *SocketAddressLength
,
894 LPCONDITIONPROC lpfnCondition
,
895 DWORD_PTR dwCallbackData
,
898 IO_STATUS_BLOCK IOSB
;
899 PAFD_RECEIVED_ACCEPT_DATA ListenReceiveData
;
900 AFD_ACCEPT_DATA AcceptData
;
901 AFD_DEFER_ACCEPT_DATA DeferData
;
902 AFD_PENDING_ACCEPT_DATA PendingAcceptData
;
903 PSOCKET_INFORMATION Socket
= NULL
;
905 struct fd_set ReadSet
;
906 struct timeval Timeout
;
907 PVOID PendingData
= NULL
;
908 ULONG PendingDataLength
= 0;
909 PVOID CalleeDataBuffer
;
910 WSABUF CallerData
, CalleeID
, CallerID
, CalleeData
;
911 PSOCKADDR RemoteAddress
= NULL
;
914 WSAPROTOCOL_INFOW ProtocolInfo
;
916 UCHAR ReceiveBuffer
[0x1A];
919 Status
= NtCreateEvent(&SockEvent
,
920 GENERIC_READ
| GENERIC_WRITE
,
925 if( !NT_SUCCESS(Status
) )
927 MsafdReturnWithErrno( Status
, lpErrno
, 0, NULL
);
928 return INVALID_SOCKET
;
931 /* Dynamic Structure...ugh */
932 ListenReceiveData
= (PAFD_RECEIVED_ACCEPT_DATA
)ReceiveBuffer
;
934 /* Get the Socket Structure associate to this Socket*/
935 Socket
= GetSocketStructure(Handle
);
937 /* If this is non-blocking, make sure there's something for us to accept */
939 FD_SET(Socket
->Handle
, &ReadSet
);
943 WSPSelect(0, &ReadSet
, NULL
, NULL
, &Timeout
, NULL
);
945 if (ReadSet
.fd_array
[0] != Socket
->Handle
)
949 Status
= NtDeviceIoControlFile((HANDLE
)Socket
->Handle
,
954 IOCTL_AFD_WAIT_FOR_LISTEN
,
958 0xA + sizeof(*ListenReceiveData
));
960 /* Wait for return */
961 if (Status
== STATUS_PENDING
)
963 WaitForSingleObject(SockEvent
, INFINITE
);
964 Status
= IOSB
.Status
;
967 if (!NT_SUCCESS(Status
))
969 NtClose( SockEvent
);
970 MsafdReturnWithErrno( Status
, lpErrno
, 0, NULL
);
971 return INVALID_SOCKET
;
974 if (lpfnCondition
!= NULL
)
976 if ((Socket
->SharedData
.ServiceFlags1
& XP1_CONNECT_DATA
) != 0)
978 /* Find out how much data is pending */
979 PendingAcceptData
.SequenceNumber
= ListenReceiveData
->SequenceNumber
;
980 PendingAcceptData
.ReturnSize
= TRUE
;
983 Status
= NtDeviceIoControlFile((HANDLE
)Socket
->Handle
,
988 IOCTL_AFD_GET_PENDING_CONNECT_DATA
,
990 sizeof(PendingAcceptData
),
992 sizeof(PendingAcceptData
));
994 /* Wait for return */
995 if (Status
== STATUS_PENDING
)
997 WaitForSingleObject(SockEvent
, INFINITE
);
998 Status
= IOSB
.Status
;
1001 if (!NT_SUCCESS(Status
))
1003 NtClose( SockEvent
);
1004 MsafdReturnWithErrno( Status
, lpErrno
, 0, NULL
);
1005 return INVALID_SOCKET
;
1008 /* How much data to allocate */
1009 PendingDataLength
= IOSB
.Information
;
1011 if (PendingDataLength
)
1013 /* Allocate needed space */
1014 PendingData
= HeapAlloc(GlobalHeap
, 0, PendingDataLength
);
1016 /* We want the data now */
1017 PendingAcceptData
.ReturnSize
= FALSE
;
1020 Status
= NtDeviceIoControlFile((HANDLE
)Socket
->Handle
,
1025 IOCTL_AFD_GET_PENDING_CONNECT_DATA
,
1027 sizeof(PendingAcceptData
),
1031 /* Wait for return */
1032 if (Status
== STATUS_PENDING
)
1034 WaitForSingleObject(SockEvent
, INFINITE
);
1035 Status
= IOSB
.Status
;
1038 if (!NT_SUCCESS(Status
))
1040 NtClose( SockEvent
);
1041 MsafdReturnWithErrno( Status
, lpErrno
, 0, NULL
);
1042 return INVALID_SOCKET
;
1047 if ((Socket
->SharedData
.ServiceFlags1
& XP1_QOS_SUPPORTED
) != 0)
1049 /* I don't support this yet */
1052 /* Build Callee ID */
1053 CalleeID
.buf
= (PVOID
)Socket
->LocalAddress
;
1054 CalleeID
.len
= Socket
->SharedData
.SizeOfLocalAddress
;
1056 /* Set up Address in SOCKADDR Format */
1057 RtlCopyMemory (RemoteAddress
,
1058 &ListenReceiveData
->Address
.Address
[0].AddressType
,
1059 sizeof(*RemoteAddress
));
1061 /* Build Caller ID */
1062 CallerID
.buf
= (PVOID
)RemoteAddress
;
1063 CallerID
.len
= sizeof(*RemoteAddress
);
1065 /* Build Caller Data */
1066 CallerData
.buf
= PendingData
;
1067 CallerData
.len
= PendingDataLength
;
1069 /* Check if socket supports Conditional Accept */
1070 if (Socket
->SharedData
.UseDelayedAcceptance
!= 0)
1072 /* Allocate Buffer for Callee Data */
1073 CalleeDataBuffer
= HeapAlloc(GlobalHeap
, 0, 4096);
1074 CalleeData
.buf
= CalleeDataBuffer
;
1075 CalleeData
.len
= 4096;
1084 /* Call the Condition Function */
1085 CallBack
= (lpfnCondition
)(&CallerID
,
1086 CallerData
.buf
== NULL
? NULL
: &CallerData
,
1090 CalleeData
.buf
== NULL
? NULL
: &CalleeData
,
1094 if (((CallBack
== CF_ACCEPT
) && GroupID
) != 0)
1096 /* TBD: Check for Validity */
1099 if (CallBack
== CF_ACCEPT
)
1101 if ((Socket
->SharedData
.ServiceFlags1
& XP1_QOS_SUPPORTED
) != 0)
1103 /* I don't support this yet */
1107 // SockSetConnectData Sockets(SocketID), IOCTL_AFD_SET_CONNECT_DATA, CalleeData.Buffer, CalleeData.BuffSize, 0
1112 /* Callback rejected. Build Defer Structure */
1113 DeferData
.SequenceNumber
= ListenReceiveData
->SequenceNumber
;
1114 DeferData
.RejectConnection
= (CallBack
== CF_REJECT
);
1117 Status
= NtDeviceIoControlFile((HANDLE
)Socket
->Handle
,
1122 IOCTL_AFD_DEFER_ACCEPT
,
1128 /* Wait for return */
1129 if (Status
== STATUS_PENDING
)
1131 WaitForSingleObject(SockEvent
, INFINITE
);
1132 Status
= IOSB
.Status
;
1135 NtClose( SockEvent
);
1137 if (!NT_SUCCESS(Status
))
1139 MsafdReturnWithErrno( Status
, lpErrno
, 0, NULL
);
1140 return INVALID_SOCKET
;
1143 if (CallBack
== CF_REJECT
)
1145 *lpErrno
= WSAECONNREFUSED
;
1146 return INVALID_SOCKET
;
1150 *lpErrno
= WSAECONNREFUSED
;
1151 return INVALID_SOCKET
;
1156 /* Create a new Socket */
1157 ProtocolInfo
.dwCatalogEntryId
= Socket
->SharedData
.CatalogEntryId
;
1158 ProtocolInfo
.dwServiceFlags1
= Socket
->SharedData
.ServiceFlags1
;
1159 ProtocolInfo
.dwProviderFlags
= Socket
->SharedData
.ProviderFlags
;
1161 AcceptSocket
= WSPSocket (Socket
->SharedData
.AddressFamily
,
1162 Socket
->SharedData
.SocketType
,
1163 Socket
->SharedData
.Protocol
,
1166 Socket
->SharedData
.CreateFlags
,
1169 /* Set up the Accept Structure */
1170 AcceptData
.ListenHandle
= AcceptSocket
;
1171 AcceptData
.SequenceNumber
= ListenReceiveData
->SequenceNumber
;
1173 /* Send IOCTL to Accept */
1174 Status
= NtDeviceIoControlFile((HANDLE
)Socket
->Handle
,
1185 /* Wait for return */
1186 if (Status
== STATUS_PENDING
)
1188 WaitForSingleObject(SockEvent
, INFINITE
);
1189 Status
= IOSB
.Status
;
1192 if (!NT_SUCCESS(Status
))
1194 WSPCloseSocket( AcceptSocket
, lpErrno
);
1195 MsafdReturnWithErrno( Status
, lpErrno
, 0, NULL
);
1196 return INVALID_SOCKET
;
1199 /* Return Address in SOCKADDR FORMAT */
1202 RtlCopyMemory (SocketAddress
,
1203 &ListenReceiveData
->Address
.Address
[0].AddressType
,
1204 sizeof(*RemoteAddress
));
1205 if( SocketAddressLength
)
1206 *SocketAddressLength
= ListenReceiveData
->Address
.Address
[0].AddressLength
;
1209 NtClose( SockEvent
);
1211 /* Re-enable Async Event */
1212 SockReenableAsyncSelectEvent(Socket
, FD_ACCEPT
);
1214 AFD_DbgPrint(MID_TRACE
,("Socket %x\n", AcceptSocket
));
1219 return AcceptSocket
;
1224 WSPConnect(SOCKET Handle
,
1225 const struct sockaddr
* SocketAddress
,
1226 int SocketAddressLength
,
1227 LPWSABUF lpCallerData
,
1228 LPWSABUF lpCalleeData
,
1233 IO_STATUS_BLOCK IOSB
;
1234 PAFD_CONNECT_INFO ConnectInfo
;
1235 PSOCKET_INFORMATION Socket
= NULL
;
1237 UCHAR ConnectBuffer
[0x22];
1238 ULONG ConnectDataLength
;
1239 ULONG InConnectDataLength
;
1240 INT BindAddressLength
;
1241 PSOCKADDR BindAddress
;
1244 Status
= NtCreateEvent(&SockEvent
,
1245 GENERIC_READ
| GENERIC_WRITE
,
1250 if( !NT_SUCCESS(Status
) )
1253 AFD_DbgPrint(MID_TRACE
,("Called\n"));
1255 /* Get the Socket Structure associate to this Socket*/
1256 Socket
= GetSocketStructure(Handle
);
1259 if (Socket
->SharedData
.State
== SocketOpen
)
1261 /* Get the Wildcard Address */
1262 BindAddressLength
= Socket
->HelperData
->MaxWSAddressLength
;
1263 BindAddress
= HeapAlloc(GetProcessHeap(), 0, BindAddressLength
);
1264 Socket
->HelperData
->WSHGetWildcardSockaddr (Socket
->HelperContext
,
1266 &BindAddressLength
);
1268 WSPBind(Handle
, BindAddress
, BindAddressLength
, NULL
);
1271 /* Set the Connect Data */
1272 if (lpCallerData
!= NULL
)
1274 ConnectDataLength
= lpCallerData
->len
;
1275 Status
= NtDeviceIoControlFile((HANDLE
)Handle
,
1280 IOCTL_AFD_SET_CONNECT_DATA
,
1285 /* Wait for return */
1286 if (Status
== STATUS_PENDING
)
1288 WaitForSingleObject(SockEvent
, INFINITE
);
1289 Status
= IOSB
.Status
;
1293 /* Dynamic Structure...ugh */
1294 ConnectInfo
= (PAFD_CONNECT_INFO
)ConnectBuffer
;
1296 /* Set up Address in TDI Format */
1297 ConnectInfo
->RemoteAddress
.TAAddressCount
= 1;
1298 ConnectInfo
->RemoteAddress
.Address
[0].AddressLength
= SocketAddressLength
- sizeof(SocketAddress
->sa_family
);
1299 ConnectInfo
->RemoteAddress
.Address
[0].AddressType
= SocketAddress
->sa_family
;
1300 RtlCopyMemory (ConnectInfo
->RemoteAddress
.Address
[0].Address
,
1301 SocketAddress
->sa_data
,
1302 SocketAddressLength
- sizeof(SocketAddress
->sa_family
));
1305 * Disable FD_WRITE and FD_CONNECT
1306 * The latter fixes a race condition where the FD_CONNECT is re-enabled
1307 * at the end of this function right after the Async Thread disables it.
1308 * This should only happen at the *next* WSPConnect
1310 if (Socket
->SharedData
.AsyncEvents
& FD_CONNECT
)
1312 Socket
->SharedData
.AsyncDisabledEvents
|= FD_CONNECT
| FD_WRITE
;
1315 /* Tell AFD that we want Connection Data back, have it allocate a buffer */
1316 if (lpCalleeData
!= NULL
)
1318 InConnectDataLength
= lpCalleeData
->len
;
1319 Status
= NtDeviceIoControlFile((HANDLE
)Handle
,
1324 IOCTL_AFD_SET_CONNECT_DATA_SIZE
,
1325 &InConnectDataLength
,
1326 sizeof(InConnectDataLength
),
1330 /* Wait for return */
1331 if (Status
== STATUS_PENDING
)
1333 WaitForSingleObject(SockEvent
, INFINITE
);
1334 Status
= IOSB
.Status
;
1338 /* AFD doesn't seem to care if these are invalid, but let's 0 them anyways */
1339 ConnectInfo
->Root
= 0;
1340 ConnectInfo
->UseSAN
= FALSE
;
1341 ConnectInfo
->Unknown
= 0;
1343 /* FIXME: Handle Async Connect */
1344 if (Socket
->SharedData
.NonBlocking
)
1346 AFD_DbgPrint(MIN_TRACE
, ("Async Connect UNIMPLEMENTED!\n"));
1350 Status
= NtDeviceIoControlFile((HANDLE
)Handle
,
1360 /* Wait for return */
1361 if (Status
== STATUS_PENDING
)
1363 WaitForSingleObject(SockEvent
, INFINITE
);
1364 Status
= IOSB
.Status
;
1367 /* Get any pending connect data */
1368 if (lpCalleeData
!= NULL
)
1370 Status
= NtDeviceIoControlFile((HANDLE
)Handle
,
1375 IOCTL_AFD_GET_CONNECT_DATA
,
1380 /* Wait for return */
1381 if (Status
== STATUS_PENDING
)
1383 WaitForSingleObject(SockEvent
, INFINITE
);
1384 Status
= IOSB
.Status
;
1388 /* Re-enable Async Event */
1389 SockReenableAsyncSelectEvent(Socket
, FD_WRITE
);
1391 /* FIXME: THIS IS NOT RIGHT!!! HACK HACK HACK! */
1392 SockReenableAsyncSelectEvent(Socket
, FD_CONNECT
);
1394 AFD_DbgPrint(MID_TRACE
,("Ending\n"));
1396 NtClose( SockEvent
);
1398 return MsafdReturnWithErrno( Status
, lpErrno
, 0, NULL
);
1402 WSPShutdown(SOCKET Handle
,
1407 IO_STATUS_BLOCK IOSB
;
1408 AFD_DISCONNECT_INFO DisconnectInfo
;
1409 PSOCKET_INFORMATION Socket
= NULL
;
1413 Status
= NtCreateEvent(&SockEvent
,
1414 GENERIC_READ
| GENERIC_WRITE
,
1419 if( !NT_SUCCESS(Status
) )
1422 AFD_DbgPrint(MID_TRACE
,("Called\n"));
1424 /* Get the Socket Structure associate to this Socket*/
1425 Socket
= GetSocketStructure(Handle
);
1427 /* Set AFD Disconnect Type */
1431 DisconnectInfo
.DisconnectType
= AFD_DISCONNECT_RECV
;
1432 Socket
->SharedData
.ReceiveShutdown
= TRUE
;
1435 DisconnectInfo
.DisconnectType
= AFD_DISCONNECT_SEND
;
1436 Socket
->SharedData
.SendShutdown
= TRUE
;
1439 DisconnectInfo
.DisconnectType
= AFD_DISCONNECT_RECV
| AFD_DISCONNECT_SEND
;
1440 Socket
->SharedData
.ReceiveShutdown
= TRUE
;
1441 Socket
->SharedData
.SendShutdown
= TRUE
;
1445 DisconnectInfo
.Timeout
= RtlConvertLongToLargeInteger(-1);
1448 Status
= NtDeviceIoControlFile((HANDLE
)Handle
,
1453 IOCTL_AFD_DISCONNECT
,
1455 sizeof(DisconnectInfo
),
1459 /* Wait for return */
1460 if (Status
== STATUS_PENDING
)
1462 WaitForSingleObject(SockEvent
, INFINITE
);
1463 Status
= IOSB
.Status
;
1466 AFD_DbgPrint(MID_TRACE
,("Ending\n"));
1468 NtClose( SockEvent
);
1470 return MsafdReturnWithErrno( Status
, lpErrno
, 0, NULL
);
1476 WSPGetSockName(IN SOCKET Handle
,
1477 OUT LPSOCKADDR Name
,
1478 IN OUT LPINT NameLength
,
1481 IO_STATUS_BLOCK IOSB
;
1482 ULONG TdiAddressSize
;
1483 PTDI_ADDRESS_INFO TdiAddress
;
1484 PTRANSPORT_ADDRESS SocketAddress
;
1485 PSOCKET_INFORMATION Socket
= NULL
;
1489 Status
= NtCreateEvent(&SockEvent
,
1490 GENERIC_READ
| GENERIC_WRITE
,
1495 if( !NT_SUCCESS(Status
) )
1496 return SOCKET_ERROR
;
1498 /* Get the Socket Structure associate to this Socket*/
1499 Socket
= GetSocketStructure(Handle
);
1501 /* Allocate a buffer for the address */
1502 TdiAddressSize
= FIELD_OFFSET(TDI_ADDRESS_INFO
, Address
.Address
[0].Address
) +
1503 Socket
->SharedData
.SizeOfLocalAddress
;
1505 TdiAddress
= HeapAlloc(GlobalHeap
, 0, TdiAddressSize
);
1507 if ( TdiAddress
== NULL
)
1509 NtClose( SockEvent
);
1510 *lpErrno
= WSAENOBUFS
;
1511 return SOCKET_ERROR
;
1514 SocketAddress
= &TdiAddress
->Address
;
1517 Status
= NtDeviceIoControlFile((HANDLE
)Socket
->Handle
,
1522 IOCTL_AFD_GET_SOCK_NAME
,
1528 /* Wait for return */
1529 if (Status
== STATUS_PENDING
)
1531 WaitForSingleObject(SockEvent
, INFINITE
);
1532 Status
= IOSB
.Status
;
1535 NtClose( SockEvent
);
1537 if (NT_SUCCESS(Status
))
1539 if (*NameLength
>= SocketAddress
->Address
[0].AddressLength
)
1541 Name
->sa_family
= SocketAddress
->Address
[0].AddressType
;
1542 RtlCopyMemory (Name
->sa_data
,
1543 SocketAddress
->Address
[0].Address
,
1544 SocketAddress
->Address
[0].AddressLength
);
1545 *NameLength
= 2 + SocketAddress
->Address
[0].AddressLength
;
1546 AFD_DbgPrint (MID_TRACE
, ("NameLength %d Address: %x Port %x\n",
1547 *NameLength
, ((struct sockaddr_in
*)Name
)->sin_addr
.s_addr
,
1548 ((struct sockaddr_in
*)Name
)->sin_port
));
1549 HeapFree(GlobalHeap
, 0, TdiAddress
);
1554 HeapFree(GlobalHeap
, 0, TdiAddress
);
1555 *lpErrno
= WSAEFAULT
;
1556 return SOCKET_ERROR
;
1560 return MsafdReturnWithErrno ( Status
, lpErrno
, 0, NULL
);
1566 WSPGetPeerName(IN SOCKET s
,
1567 OUT LPSOCKADDR Name
,
1568 IN OUT LPINT NameLength
,
1571 IO_STATUS_BLOCK IOSB
;
1572 ULONG TdiAddressSize
;
1573 PTDI_ADDRESS_INFO TdiAddress
;
1574 PTRANSPORT_ADDRESS SocketAddress
;
1575 PSOCKET_INFORMATION Socket
= NULL
;
1579 Status
= NtCreateEvent(&SockEvent
,
1580 GENERIC_READ
| GENERIC_WRITE
,
1585 if( !NT_SUCCESS(Status
) )
1586 return SOCKET_ERROR
;
1588 /* Get the Socket Structure associate to this Socket*/
1589 Socket
= GetSocketStructure(s
);
1591 /* Allocate a buffer for the address */
1592 TdiAddressSize
= FIELD_OFFSET(TDI_ADDRESS_INFO
, Address
.Address
[0].Address
) +
1593 Socket
->SharedData
.SizeOfLocalAddress
;
1594 TdiAddress
= HeapAlloc(GlobalHeap
, 0, TdiAddressSize
);
1596 if ( TdiAddress
== NULL
)
1598 NtClose( SockEvent
);
1599 *lpErrno
= WSAENOBUFS
;
1600 return SOCKET_ERROR
;
1603 SocketAddress
= &TdiAddress
->Address
;
1606 Status
= NtDeviceIoControlFile((HANDLE
)Socket
->Handle
,
1611 IOCTL_AFD_GET_PEER_NAME
,
1617 /* Wait for return */
1618 if (Status
== STATUS_PENDING
)
1620 WaitForSingleObject(SockEvent
, INFINITE
);
1621 Status
= IOSB
.Status
;
1624 NtClose( SockEvent
);
1626 if (NT_SUCCESS(Status
))
1628 if (*NameLength
>= SocketAddress
->Address
[0].AddressLength
)
1630 Name
->sa_family
= SocketAddress
->Address
[0].AddressType
;
1631 RtlCopyMemory (Name
->sa_data
,
1632 SocketAddress
->Address
[0].Address
,
1633 SocketAddress
->Address
[0].AddressLength
);
1634 *NameLength
= 2 + SocketAddress
->Address
[0].AddressLength
;
1635 AFD_DbgPrint (MID_TRACE
, ("NameLength %d Address: %s Port %x\n",
1636 *NameLength
, ((struct sockaddr_in
*)Name
)->sin_addr
.s_addr
,
1637 ((struct sockaddr_in
*)Name
)->sin_port
));
1638 HeapFree(GlobalHeap
, 0, TdiAddress
);
1643 HeapFree(GlobalHeap
, 0, TdiAddress
);
1644 *lpErrno
= WSAEFAULT
;
1645 return SOCKET_ERROR
;
1649 return MsafdReturnWithErrno ( Status
, lpErrno
, 0, NULL
);
1654 WSPIoctl(IN SOCKET Handle
,
1655 IN DWORD dwIoControlCode
,
1656 IN LPVOID lpvInBuffer
,
1657 IN DWORD cbInBuffer
,
1658 OUT LPVOID lpvOutBuffer
,
1659 IN DWORD cbOutBuffer
,
1660 OUT LPDWORD lpcbBytesReturned
,
1661 IN LPWSAOVERLAPPED lpOverlapped
,
1662 IN LPWSAOVERLAPPED_COMPLETION_ROUTINE lpCompletionRoutine
,
1663 IN LPWSATHREADID lpThreadId
,
1666 PSOCKET_INFORMATION Socket
= NULL
;
1668 /* Get the Socket Structure associate to this Socket*/
1669 Socket
= GetSocketStructure(Handle
);
1671 switch( dwIoControlCode
)
1674 if( cbInBuffer
< sizeof(INT
) )
1675 return SOCKET_ERROR
;
1676 Socket
->SharedData
.NonBlocking
= *((PINT
)lpvInBuffer
) ? 1 : 0;
1677 AFD_DbgPrint(MID_TRACE
,("[%x] Set nonblocking %d\n", Handle
, Socket
->SharedData
.NonBlocking
));
1680 return GetSocketInformation(Socket
, AFD_INFO_RECEIVE_CONTENT_SIZE
, (PULONG
)lpvOutBuffer
, NULL
);
1682 *lpErrno
= WSAEINVAL
;
1683 return SOCKET_ERROR
;
1690 WSPGetSockOpt(IN SOCKET Handle
,
1693 OUT CHAR FAR
* OptionValue
,
1694 IN OUT LPINT OptionLength
,
1697 PSOCKET_INFORMATION Socket
= NULL
;
1702 /* Get the Socket Structure associate to this Socket*/
1703 Socket
= GetSocketStructure(Handle
);
1706 *lpErrno
= WSAENOTSOCK
;
1707 return SOCKET_ERROR
;
1710 AFD_DbgPrint(MID_TRACE
, ("Called\n"));
1718 Buffer
= &Socket
->SharedData
.SocketType
;
1719 BufferSize
= sizeof(INT
);
1723 Buffer
= &Socket
->SharedData
.SizeOfRecvBuffer
;
1724 BufferSize
= sizeof(INT
);
1728 Buffer
= &Socket
->SharedData
.SizeOfSendBuffer
;
1729 BufferSize
= sizeof(INT
);
1733 BoolBuffer
= Socket
->SharedData
.Listening
;
1734 Buffer
= &BoolBuffer
;
1735 BufferSize
= sizeof(BOOLEAN
);
1739 BoolBuffer
= Socket
->SharedData
.Broadcast
;
1740 Buffer
= &BoolBuffer
;
1741 BufferSize
= sizeof(BOOLEAN
);
1745 BoolBuffer
= Socket
->SharedData
.Debug
;
1746 Buffer
= &BoolBuffer
;
1747 BufferSize
= sizeof(BOOLEAN
);
1750 /* case SO_CONDITIONAL_ACCEPT: */
1755 case SO_GROUP_PRIORITY
:
1758 case SO_MAX_MSG_SIZE
:
1760 case SO_PROTOCOL_INFO
:
1762 AFD_DbgPrint(MID_TRACE
, ("Unimplemented option (%x)\n",
1766 *lpErrno
= WSAEINVAL
;
1767 return SOCKET_ERROR
;
1770 if (*OptionLength
< BufferSize
)
1772 *lpErrno
= WSAEFAULT
;
1773 *OptionLength
= BufferSize
;
1774 return SOCKET_ERROR
;
1776 RtlCopyMemory(OptionValue
, Buffer
, BufferSize
);
1780 case IPPROTO_TCP
: /* FIXME */
1782 *lpErrno
= WSAEINVAL
;
1783 return SOCKET_ERROR
;
1789 * FUNCTION: Initialize service provider for a client
1791 * wVersionRequested = Highest WinSock SPI version that the caller can use
1792 * lpWSPData = Address of WSPDATA structure to initialize
1793 * lpProtocolInfo = Pointer to structure that defines the desired protocol
1794 * UpcallTable = Pointer to upcall table of the WinSock DLL
1795 * lpProcTable = Address of procedure table to initialize
1797 * Status of operation
1801 WSPStartup(IN WORD wVersionRequested
,
1802 OUT LPWSPDATA lpWSPData
,
1803 IN LPWSAPROTOCOL_INFOW lpProtocolInfo
,
1804 IN WSPUPCALLTABLE UpcallTable
,
1805 OUT LPWSPPROC_TABLE lpProcTable
)
1810 AFD_DbgPrint(MAX_TRACE
, ("wVersionRequested (0x%X) \n", wVersionRequested
));
1812 Upcalls
= UpcallTable
;
1814 if (Status
== NO_ERROR
)
1816 lpProcTable
->lpWSPAccept
= WSPAccept
;
1817 lpProcTable
->lpWSPAddressToString
= WSPAddressToString
;
1818 lpProcTable
->lpWSPAsyncSelect
= WSPAsyncSelect
;
1819 lpProcTable
->lpWSPBind
= WSPBind
;
1820 lpProcTable
->lpWSPCancelBlockingCall
= WSPCancelBlockingCall
;
1821 lpProcTable
->lpWSPCleanup
= WSPCleanup
;
1822 lpProcTable
->lpWSPCloseSocket
= WSPCloseSocket
;
1823 lpProcTable
->lpWSPConnect
= WSPConnect
;
1824 lpProcTable
->lpWSPDuplicateSocket
= WSPDuplicateSocket
;
1825 lpProcTable
->lpWSPEnumNetworkEvents
= WSPEnumNetworkEvents
;
1826 lpProcTable
->lpWSPEventSelect
= WSPEventSelect
;
1827 lpProcTable
->lpWSPGetOverlappedResult
= WSPGetOverlappedResult
;
1828 lpProcTable
->lpWSPGetPeerName
= WSPGetPeerName
;
1829 lpProcTable
->lpWSPGetSockName
= WSPGetSockName
;
1830 lpProcTable
->lpWSPGetSockOpt
= WSPGetSockOpt
;
1831 lpProcTable
->lpWSPGetQOSByName
= WSPGetQOSByName
;
1832 lpProcTable
->lpWSPIoctl
= WSPIoctl
;
1833 lpProcTable
->lpWSPJoinLeaf
= WSPJoinLeaf
;
1834 lpProcTable
->lpWSPListen
= WSPListen
;
1835 lpProcTable
->lpWSPRecv
= WSPRecv
;
1836 lpProcTable
->lpWSPRecvDisconnect
= WSPRecvDisconnect
;
1837 lpProcTable
->lpWSPRecvFrom
= WSPRecvFrom
;
1838 lpProcTable
->lpWSPSelect
= WSPSelect
;
1839 lpProcTable
->lpWSPSend
= WSPSend
;
1840 lpProcTable
->lpWSPSendDisconnect
= WSPSendDisconnect
;
1841 lpProcTable
->lpWSPSendTo
= WSPSendTo
;
1842 lpProcTable
->lpWSPSetSockOpt
= WSPSetSockOpt
;
1843 lpProcTable
->lpWSPShutdown
= WSPShutdown
;
1844 lpProcTable
->lpWSPSocket
= WSPSocket
;
1845 lpProcTable
->lpWSPStringToAddress
= WSPStringToAddress
;
1846 lpWSPData
->wVersion
= MAKEWORD(2, 2);
1847 lpWSPData
->wHighVersion
= MAKEWORD(2, 2);
1850 AFD_DbgPrint(MAX_TRACE
, ("Status (%d).\n", Status
));
1857 * FUNCTION: Cleans up service provider for a client
1859 * lpErrno = Address of buffer for error information
1861 * 0 if successful, or SOCKET_ERROR if not
1865 WSPCleanup(OUT LPINT lpErrno
)
1868 AFD_DbgPrint(MAX_TRACE
, ("\n"));
1869 AFD_DbgPrint(MAX_TRACE
, ("Leaving.\n"));
1870 *lpErrno
= NO_ERROR
;
1878 GetSocketInformation(PSOCKET_INFORMATION Socket
,
1879 ULONG AfdInformationClass
,
1880 PULONG Ulong OPTIONAL
,
1881 PLARGE_INTEGER LargeInteger OPTIONAL
)
1883 IO_STATUS_BLOCK IOSB
;
1888 Status
= NtCreateEvent(&SockEvent
,
1889 GENERIC_READ
| GENERIC_WRITE
,
1894 if( !NT_SUCCESS(Status
) )
1897 /* Set Info Class */
1898 InfoData
.InformationClass
= AfdInformationClass
;
1901 Status
= NtDeviceIoControlFile((HANDLE
)Socket
->Handle
,
1912 /* Wait for return */
1913 if (Status
== STATUS_PENDING
)
1915 WaitForSingleObject(SockEvent
, INFINITE
);
1918 /* Return Information */
1919 *Ulong
= InfoData
.Information
.Ulong
;
1920 if (LargeInteger
!= NULL
)
1922 *LargeInteger
= InfoData
.Information
.LargeInteger
;
1925 NtClose( SockEvent
);
1933 SetSocketInformation(PSOCKET_INFORMATION Socket
,
1934 ULONG AfdInformationClass
,
1935 PULONG Ulong OPTIONAL
,
1936 PLARGE_INTEGER LargeInteger OPTIONAL
)
1938 IO_STATUS_BLOCK IOSB
;
1943 Status
= NtCreateEvent(&SockEvent
,
1944 GENERIC_READ
| GENERIC_WRITE
,
1949 if( !NT_SUCCESS(Status
) )
1952 /* Set Info Class */
1953 InfoData
.InformationClass
= AfdInformationClass
;
1955 /* Set Information */
1956 InfoData
.Information
.Ulong
= *Ulong
;
1957 if (LargeInteger
!= NULL
)
1959 InfoData
.Information
.LargeInteger
= *LargeInteger
;
1962 AFD_DbgPrint(MID_TRACE
,("XXX Info %x (Data %x)\n",
1963 AfdInformationClass
, *Ulong
));
1966 Status
= NtDeviceIoControlFile((HANDLE
)Socket
->Handle
,
1977 /* Wait for return */
1978 if (Status
== STATUS_PENDING
)
1980 WaitForSingleObject(SockEvent
, INFINITE
);
1983 NtClose( SockEvent
);
1990 GetSocketStructure(SOCKET Handle
)
1994 for (i
=0; i
<SocketCount
; i
++)
1996 if (Sockets
[i
]->Handle
== Handle
)
2004 int CreateContext(PSOCKET_INFORMATION Socket
)
2006 IO_STATUS_BLOCK IOSB
;
2007 SOCKET_CONTEXT ContextData
;
2011 Status
= NtCreateEvent(&SockEvent
,
2012 GENERIC_READ
| GENERIC_WRITE
,
2017 if( !NT_SUCCESS(Status
) )
2020 /* Create Context */
2021 ContextData
.SharedData
= Socket
->SharedData
;
2022 ContextData
.SizeOfHelperData
= 0;
2023 RtlCopyMemory (&ContextData
.LocalAddress
,
2024 Socket
->LocalAddress
,
2025 Socket
->SharedData
.SizeOfLocalAddress
);
2026 RtlCopyMemory (&ContextData
.RemoteAddress
,
2027 Socket
->RemoteAddress
,
2028 Socket
->SharedData
.SizeOfRemoteAddress
);
2031 Status
= NtDeviceIoControlFile((HANDLE
)Socket
->Handle
,
2036 IOCTL_AFD_SET_CONTEXT
,
2038 sizeof(ContextData
),
2042 /* Wait for Completition */
2043 if (Status
== STATUS_PENDING
)
2045 WaitForSingleObject(SockEvent
, INFINITE
);
2048 NtClose( SockEvent
);
2053 BOOLEAN
SockCreateOrReferenceAsyncThread(VOID
)
2055 HANDLE hAsyncThread
;
2056 DWORD AsyncThreadId
;
2058 OBJECT_HANDLE_ATTRIBUTE_INFORMATION HandleFlags
;
2061 /* Check if the Thread Already Exists */
2062 if (SockAsyncThreadRefCount
)
2067 /* Create the Completion Port */
2068 if (!SockAsyncCompletionPort
)
2070 Status
= NtCreateIoCompletion(&SockAsyncCompletionPort
,
2071 IO_COMPLETION_ALL_ACCESS
,
2073 2); // Allow 2 threads only
2075 /* Protect Handle */
2076 HandleFlags
.ProtectFromClose
= TRUE
;
2077 HandleFlags
.Inherit
= FALSE
;
2078 Status
= NtSetInformationObject(SockAsyncCompletionPort
,
2079 ObjectHandleFlagInformation
,
2081 sizeof(HandleFlags
));
2084 /* Create the Async Event */
2085 Status
= NtCreateEvent(&AsyncEvent
,
2091 /* Create the Async Thread */
2092 hAsyncThread
= CreateThread(NULL
,
2094 (LPTHREAD_START_ROUTINE
)SockAsyncThread
,
2099 /* Close the Handle */
2100 NtClose(hAsyncThread
);
2102 /* Increase the Reference Count */
2103 SockAsyncThreadRefCount
++;
2107 int SockAsyncThread(PVOID ThreadParam
)
2110 PASYNC_COMPLETION_ROUTINE AsyncCompletionRoutine
;
2111 IO_STATUS_BLOCK IOSB
;
2114 /* Make the Thread Higher Priority */
2115 SetThreadPriority(GetCurrentThread(), THREAD_PRIORITY_ABOVE_NORMAL
);
2117 /* Do a KQUEUE/WorkItem Style Loop, thanks to IoCompletion Ports */
2120 Status
= NtRemoveIoCompletion (SockAsyncCompletionPort
,
2121 (PVOID
*)&AsyncCompletionRoutine
,
2125 /* Call the Async Function */
2126 if (NT_SUCCESS(Status
))
2128 (*AsyncCompletionRoutine
)(AsyncContext
, &IOSB
);
2132 /* It Failed, sleep for a second */
2135 } while ((Status
!= STATUS_TIMEOUT
));
2137 /* The Thread has Ended */
2141 BOOLEAN
SockGetAsyncSelectHelperAfdHandle(VOID
)
2143 UNICODE_STRING AfdHelper
;
2144 OBJECT_ATTRIBUTES ObjectAttributes
;
2145 IO_STATUS_BLOCK IoSb
;
2147 FILE_COMPLETION_INFORMATION CompletionInfo
;
2148 OBJECT_HANDLE_ATTRIBUTE_INFORMATION HandleFlags
;
2150 /* First, make sure we're not already intialized */
2151 if (SockAsyncHelperAfdHandle
)
2156 /* Set up Handle Name and Object */
2157 RtlInitUnicodeString(&AfdHelper
, L
"\\Device\\Afd\\AsyncSelectHlp" );
2158 InitializeObjectAttributes(&ObjectAttributes
,
2160 OBJ_INHERIT
| OBJ_CASE_INSENSITIVE
,
2164 /* Open the Handle to AFD */
2165 Status
= NtCreateFile(&SockAsyncHelperAfdHandle
,
2166 GENERIC_READ
| GENERIC_WRITE
| SYNCHRONIZE
,
2171 FILE_SHARE_READ
| FILE_SHARE_WRITE
,
2178 * Now Set up the Completion Port Information
2179 * This means that whenever a Poll is finished, the routine will be executed
2181 CompletionInfo
.Port
= SockAsyncCompletionPort
;
2182 CompletionInfo
.Key
= SockAsyncSelectCompletionRoutine
;
2183 Status
= NtSetInformationFile(SockAsyncHelperAfdHandle
,
2186 sizeof(CompletionInfo
),
2187 FileCompletionInformation
);
2190 /* Protect the Handle */
2191 HandleFlags
.ProtectFromClose
= TRUE
;
2192 HandleFlags
.Inherit
= FALSE
;
2193 Status
= NtSetInformationObject(SockAsyncCompletionPort
,
2194 ObjectHandleFlagInformation
,
2196 sizeof(HandleFlags
));
2199 /* Set this variable to true so that Send/Recv/Accept will know wether to renable disabled events */
2200 SockAsyncSelectCalled
= TRUE
;
2204 VOID
SockAsyncSelectCompletionRoutine(PVOID Context
, PIO_STATUS_BLOCK IoStatusBlock
)
2207 PASYNC_DATA AsyncData
= Context
;
2208 PSOCKET_INFORMATION Socket
;
2211 /* Get the Socket */
2212 Socket
= AsyncData
->ParentSocket
;
2214 /* Check if the Sequence Number Changed behind our back */
2215 if (AsyncData
->SequenceNumber
!= Socket
->SharedData
.SequenceNumber
)
2220 /* Check we were manually called b/c of a failure */
2221 if (!NT_SUCCESS(IoStatusBlock
->Status
))
2223 /* FIXME: Perform Upcall */
2227 for (x
= 1; x
; x
<<=1)
2229 switch (AsyncData
->AsyncSelectInfo
.Handles
[0].Events
& x
)
2231 case AFD_EVENT_RECEIVE
:
2232 if (0 != (Socket
->SharedData
.AsyncEvents
& FD_READ
) &&
2233 0 == (Socket
->SharedData
.AsyncDisabledEvents
& FD_READ
))
2235 /* Make the Notifcation */
2236 (Upcalls
.lpWPUPostMessage
)(Socket
->SharedData
.hWnd
,
2237 Socket
->SharedData
.wMsg
,
2239 WSAMAKESELECTREPLY(FD_READ
, 0));
2240 /* Disable this event until the next read(); */
2241 Socket
->SharedData
.AsyncDisabledEvents
|= FD_READ
;
2245 case AFD_EVENT_OOB_RECEIVE
:
2246 if (0 != (Socket
->SharedData
.AsyncEvents
& FD_OOB
) &&
2247 0 == (Socket
->SharedData
.AsyncDisabledEvents
& FD_OOB
))
2249 /* Make the Notifcation */
2250 (Upcalls
.lpWPUPostMessage
)(Socket
->SharedData
.hWnd
,
2251 Socket
->SharedData
.wMsg
,
2253 WSAMAKESELECTREPLY(FD_OOB
, 0));
2254 /* Disable this event until the next read(); */
2255 Socket
->SharedData
.AsyncDisabledEvents
|= FD_OOB
;
2259 case AFD_EVENT_SEND
:
2260 if (0 != (Socket
->SharedData
.AsyncEvents
& FD_WRITE
) &&
2261 0 == (Socket
->SharedData
.AsyncDisabledEvents
& FD_WRITE
))
2263 /* Make the Notifcation */
2264 (Upcalls
.lpWPUPostMessage
)(Socket
->SharedData
.hWnd
,
2265 Socket
->SharedData
.wMsg
,
2267 WSAMAKESELECTREPLY(FD_WRITE
, 0));
2268 /* Disable this event until the next write(); */
2269 Socket
->SharedData
.AsyncDisabledEvents
|= FD_WRITE
;
2273 /* FIXME: THIS IS NOT RIGHT!!! HACK HACK HACK! */
2274 case AFD_EVENT_CONNECT
:
2275 if (0 != (Socket
->SharedData
.AsyncEvents
& FD_CONNECT
) &&
2276 0 == (Socket
->SharedData
.AsyncDisabledEvents
& FD_CONNECT
))
2278 /* Make the Notifcation */
2279 (Upcalls
.lpWPUPostMessage
)(Socket
->SharedData
.hWnd
,
2280 Socket
->SharedData
.wMsg
,
2282 WSAMAKESELECTREPLY(FD_CONNECT
, 0));
2283 /* Disable this event forever; */
2284 Socket
->SharedData
.AsyncDisabledEvents
|= FD_CONNECT
;
2288 case AFD_EVENT_ACCEPT
:
2289 if (0 != (Socket
->SharedData
.AsyncEvents
& FD_ACCEPT
) &&
2290 0 == (Socket
->SharedData
.AsyncDisabledEvents
& FD_ACCEPT
))
2292 /* Make the Notifcation */
2293 (Upcalls
.lpWPUPostMessage
)(Socket
->SharedData
.hWnd
,
2294 Socket
->SharedData
.wMsg
,
2296 WSAMAKESELECTREPLY(FD_ACCEPT
, 0));
2297 /* Disable this event until the next accept(); */
2298 Socket
->SharedData
.AsyncDisabledEvents
|= FD_ACCEPT
;
2302 case AFD_EVENT_DISCONNECT
:
2303 case AFD_EVENT_ABORT
:
2304 case AFD_EVENT_CLOSE
:
2305 if (0 != (Socket
->SharedData
.AsyncEvents
& FD_CLOSE
) &&
2306 0 == (Socket
->SharedData
.AsyncDisabledEvents
& FD_CLOSE
))
2308 /* Make the Notifcation */
2309 (Upcalls
.lpWPUPostMessage
)(Socket
->SharedData
.hWnd
,
2310 Socket
->SharedData
.wMsg
,
2312 WSAMAKESELECTREPLY(FD_CLOSE
, 0));
2313 /* Disable this event forever; */
2314 Socket
->SharedData
.AsyncDisabledEvents
|= FD_CLOSE
;
2317 /* FIXME: Support QOS */
2321 /* Check if there are any events left for us to check */
2322 if ((Socket
->SharedData
.AsyncEvents
& (~Socket
->SharedData
.AsyncDisabledEvents
)) == 0 )
2328 SockProcessAsyncSelect(Socket
, AsyncData
);
2332 VOID
SockProcessAsyncSelect(PSOCKET_INFORMATION Socket
, PASYNC_DATA AsyncData
)
2335 ULONG lNetworkEvents
;
2338 /* Set up the Async Data Event Info */
2339 AsyncData
->AsyncSelectInfo
.Timeout
.HighPart
= 0x7FFFFFFF;
2340 AsyncData
->AsyncSelectInfo
.Timeout
.LowPart
= 0xFFFFFFFF;
2341 AsyncData
->AsyncSelectInfo
.HandleCount
= 1;
2342 AsyncData
->AsyncSelectInfo
.Exclusive
= TRUE
;
2343 AsyncData
->AsyncSelectInfo
.Handles
[0].Handle
= Socket
->Handle
;
2344 AsyncData
->AsyncSelectInfo
.Handles
[0].Events
= 0;
2346 /* Remove unwanted events */
2347 lNetworkEvents
= Socket
->SharedData
.AsyncEvents
& (~Socket
->SharedData
.AsyncDisabledEvents
);
2349 /* Set Events to wait for */
2350 if (lNetworkEvents
& FD_READ
)
2352 AsyncData
->AsyncSelectInfo
.Handles
[0].Events
|= AFD_EVENT_RECEIVE
;
2355 if (lNetworkEvents
& FD_WRITE
)
2357 AsyncData
->AsyncSelectInfo
.Handles
[0].Events
|= AFD_EVENT_SEND
;
2360 if (lNetworkEvents
& FD_OOB
)
2362 AsyncData
->AsyncSelectInfo
.Handles
[0].Events
|= AFD_EVENT_OOB_RECEIVE
;
2365 if (lNetworkEvents
& FD_ACCEPT
)
2367 AsyncData
->AsyncSelectInfo
.Handles
[0].Events
|= AFD_EVENT_ACCEPT
;
2370 /* FIXME: THIS IS NOT RIGHT!!! HACK HACK HACK! */
2371 if (lNetworkEvents
& FD_CONNECT
)
2373 AsyncData
->AsyncSelectInfo
.Handles
[0].Events
|= AFD_EVENT_CONNECT
| AFD_EVENT_CONNECT_FAIL
;
2376 if (lNetworkEvents
& FD_CLOSE
)
2378 AsyncData
->AsyncSelectInfo
.Handles
[0].Events
|= AFD_EVENT_DISCONNECT
| AFD_EVENT_ABORT
;
2381 if (lNetworkEvents
& FD_QOS
)
2383 AsyncData
->AsyncSelectInfo
.Handles
[0].Events
|= AFD_EVENT_QOS
;
2386 if (lNetworkEvents
& FD_GROUP_QOS
)
2388 AsyncData
->AsyncSelectInfo
.Handles
[0].Events
|= AFD_EVENT_GROUP_QOS
;
2392 Status
= NtDeviceIoControlFile (SockAsyncHelperAfdHandle
,
2396 &AsyncData
->IoStatusBlock
,
2398 &AsyncData
->AsyncSelectInfo
,
2399 sizeof(AsyncData
->AsyncSelectInfo
),
2400 &AsyncData
->AsyncSelectInfo
,
2401 sizeof(AsyncData
->AsyncSelectInfo
));
2403 /* I/O Manager Won't call the completion routine, let's do it manually */
2404 if (NT_SUCCESS(Status
))
2410 AsyncData
->IoStatusBlock
.Status
= Status
;
2411 SockAsyncSelectCompletionRoutine(AsyncData
, &AsyncData
->IoStatusBlock
);
2415 VOID
SockProcessQueuedAsyncSelect(PVOID Context
, PIO_STATUS_BLOCK IoStatusBlock
)
2417 PASYNC_DATA AsyncData
= Context
;
2418 BOOL FreeContext
= TRUE
;
2419 PSOCKET_INFORMATION Socket
;
2421 /* Get the Socket */
2422 Socket
= AsyncData
->ParentSocket
;
2424 /* If someone closed it, stop the function */
2425 if (Socket
->SharedData
.State
!= SocketClosed
)
2427 /* Check if the Sequence Number changed by now, in which case quit */
2428 if (AsyncData
->SequenceNumber
== Socket
->SharedData
.SequenceNumber
)
2430 /* Do the actuall select, if needed */
2431 if ((Socket
->SharedData
.AsyncEvents
& (~Socket
->SharedData
.AsyncDisabledEvents
)))
2433 SockProcessAsyncSelect(Socket
, AsyncData
);
2434 FreeContext
= FALSE
;
2439 /* Free the Context */
2442 HeapFree(GetProcessHeap(), 0, AsyncData
);
2449 SockReenableAsyncSelectEvent (IN PSOCKET_INFORMATION Socket
,
2452 PASYNC_DATA AsyncData
;
2454 /* Make sure the event is actually disabled */
2455 if (!(Socket
->SharedData
.AsyncDisabledEvents
& Event
))
2461 Socket
->SharedData
.AsyncDisabledEvents
&= ~Event
;
2463 /* Return if no more events are being polled */
2464 if ((Socket
->SharedData
.AsyncEvents
& (~Socket
->SharedData
.AsyncDisabledEvents
)) == 0 )
2469 /* Wait on new events */
2470 AsyncData
= HeapAlloc(GetProcessHeap(), 0, sizeof(ASYNC_DATA
));
2472 /* Create the Asynch Thread if Needed */
2473 SockCreateOrReferenceAsyncThread();
2475 /* Increase the sequence number to stop anything else */
2476 Socket
->SharedData
.SequenceNumber
++;
2478 /* Set up the Async Data */
2479 AsyncData
->ParentSocket
= Socket
;
2480 AsyncData
->SequenceNumber
= Socket
->SharedData
.SequenceNumber
;
2482 /* Begin Async Select by using I/O Completion */
2483 NtSetIoCompletion(SockAsyncCompletionPort
,
2484 (PVOID
)&SockProcessQueuedAsyncSelect
,
2495 DllMain(HANDLE hInstDll
,
2502 case DLL_PROCESS_ATTACH
:
2504 AFD_DbgPrint(MAX_TRACE
, ("Loading MSAFD.DLL \n"));
2506 /* Don't need thread attach notifications
2507 so disable them to improve performance */
2508 DisableThreadLibraryCalls(hInstDll
);
2510 /* List of DLL Helpers */
2511 InitializeListHead(&SockHelpersListHead
);
2513 /* Heap to use when allocating */
2514 GlobalHeap
= GetProcessHeap();
2516 /* Allocate Heap for 1024 Sockets, can be expanded later */
2517 Sockets
= HeapAlloc(GetProcessHeap(), 0, sizeof(PSOCKET_INFORMATION
) * 1024);
2519 AFD_DbgPrint(MAX_TRACE
, ("MSAFD.DLL has been loaded\n"));
2523 case DLL_THREAD_ATTACH
:
2526 case DLL_THREAD_DETACH
:
2529 case DLL_PROCESS_DETACH
:
2533 AFD_DbgPrint(MAX_TRACE
, ("DllMain of msafd.dll (leaving)\n"));