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
16 #include <rosrtl/string.h>
19 //DWORD DebugTraceLevel = DEBUG_ULTRA;
20 DWORD DebugTraceLevel
= 0;
24 WSPUPCALLTABLE Upcalls
;
25 LPWPUCOMPLETEOVERLAPPEDREQUEST lpWPUCompleteOverlappedRequest
;
27 PSOCKET_INFORMATION
*Sockets
= NULL
;
28 LIST_ENTRY SockHelpersListHead
= {NULL
};
36 LPWSAPROTOCOL_INFOW lpProtocolInfo
,
41 * FUNCTION: Creates a new socket
45 * protocol = Protocol type
46 * lpProtocolInfo = Pointer to protocol information
48 * dwFlags = Socket flags
49 * lpErrno = Address of buffer for error information
51 * Created socket, or INVALID_SOCKET if it could not be created
54 OBJECT_ATTRIBUTES Object
;
58 PAFD_CREATE_PACKET AfdPacket
;
60 PSOCKET_INFORMATION Socket
= NULL
;
61 PFILE_FULL_EA_INFORMATION EABuffer
= NULL
;
62 PHELPER_DATA HelperData
;
63 PVOID HelperDLLContext
;
66 UNICODE_STRING TransportName
;
67 UNICODE_STRING DevName
;
68 LARGE_INTEGER GroupData
;
71 AFD_DbgPrint(MAX_TRACE
, ("Creating Socket, getting TDI Name\n"));
72 AFD_DbgPrint(MAX_TRACE
, ("AddressFamily (%d) SocketType (%d) Protocol (%d).\n",
73 AddressFamily
, SocketType
, Protocol
));
75 /* Get Helper Data and Transport */
76 Status
= SockGetTdiName (&AddressFamily
,
87 if (Status
!= NO_ERROR
) {
88 AFD_DbgPrint(MID_TRACE
,("SockGetTdiName: Status %x\n", Status
));
93 RtlInitUnicodeString(&DevName
, L
"\\Device\\Afd\\Endpoint");
96 Socket
= HeapAlloc(GlobalHeap
, 0, sizeof(*Socket
));
97 RtlZeroMemory(Socket
, sizeof(*Socket
));
100 Socket
->SharedData
.State
= SocketOpen
;
101 Socket
->SharedData
.AddressFamily
= AddressFamily
;
102 Socket
->SharedData
.SocketType
= SocketType
;
103 Socket
->SharedData
.Protocol
= Protocol
;
104 Socket
->HelperContext
= HelperDLLContext
;
105 Socket
->HelperData
= HelperData
;
106 Socket
->HelperEvents
= HelperEvents
;
107 Socket
->LocalAddress
= &Socket
->WSLocalAddress
;
108 Socket
->SharedData
.SizeOfLocalAddress
= HelperData
->MaxWSAddressLength
;
109 Socket
->RemoteAddress
= &Socket
->WSRemoteAddress
;
110 Socket
->SharedData
.SizeOfRemoteAddress
= HelperData
->MaxWSAddressLength
;
111 Socket
->SharedData
.UseDelayedAcceptance
= HelperData
->UseDelayedAcceptance
;
112 Socket
->SharedData
.CreateFlags
= dwFlags
;
113 Socket
->SharedData
.CatalogEntryId
= lpProtocolInfo
->dwCatalogEntryId
;
114 Socket
->SharedData
.ServiceFlags1
= lpProtocolInfo
->dwServiceFlags1
;
115 Socket
->SharedData
.ProviderFlags
= lpProtocolInfo
->dwProviderFlags
;
116 Socket
->SharedData
.GroupID
= g
;
117 Socket
->SharedData
.GroupType
= 0;
118 Socket
->SharedData
.UseSAN
= FALSE
;
119 Socket
->SanData
= NULL
;
121 /* Ask alex about this */
122 if( Socket
->SharedData
.SocketType
== SOCK_DGRAM
)
123 Socket
->SharedData
.ServiceFlags1
|= XP1_CONNECTIONLESS
;
126 SizeOfPacket
= TransportName
.Length
+ sizeof(AFD_CREATE_PACKET
) + sizeof(WCHAR
);
129 SizeOfEA
= SizeOfPacket
+ sizeof(FILE_FULL_EA_INFORMATION
) + AFD_PACKET_COMMAND_LENGTH
;
131 /* Set up EA Buffer */
132 EABuffer
= HeapAlloc(GlobalHeap
, 0, (SIZE_T
)&SizeOfEA
);
133 EABuffer
->NextEntryOffset
= 0;
135 EABuffer
->EaNameLength
= AFD_PACKET_COMMAND_LENGTH
;
136 RtlCopyMemory (EABuffer
->EaName
,
138 AFD_PACKET_COMMAND_LENGTH
+ 1);
139 EABuffer
->EaValueLength
= SizeOfPacket
;
141 /* Set up AFD Packet */
142 AfdPacket
= (PAFD_CREATE_PACKET
)(EABuffer
->EaName
+ EABuffer
->EaNameLength
+ 1);
143 AfdPacket
->SizeOfTransportName
= TransportName
.Length
;
144 RtlCopyMemory (AfdPacket
->TransportName
,
145 TransportName
.Buffer
,
146 TransportName
.Length
+ sizeof(WCHAR
));
147 AfdPacket
->GroupID
= g
;
149 /* Set up Endpoint Flags */
150 if ((Socket
->SharedData
.ServiceFlags1
& XP1_CONNECTIONLESS
) != 0) {
151 if ((SocketType
!= SOCK_DGRAM
) && (SocketType
!= SOCK_RAW
)) {
152 goto error
; /* Only RAW or UDP can be Connectionless */
154 AfdPacket
->EndpointFlags
|= AFD_ENDPOINT_CONNECTIONLESS
;
157 if ((Socket
->SharedData
.ServiceFlags1
& XP1_MESSAGE_ORIENTED
) != 0) {
158 if (SocketType
== SOCK_STREAM
) {
159 if ((Socket
->SharedData
.ServiceFlags1
& XP1_PSEUDO_STREAM
) == 0) {
160 goto error
; /* The Provider doesn't actually support Message Oriented Streams */
163 AfdPacket
->EndpointFlags
|= AFD_ENDPOINT_MESSAGE_ORIENTED
;
166 if (SocketType
== SOCK_RAW
) AfdPacket
->EndpointFlags
|= AFD_ENDPOINT_RAW
;
168 if (dwFlags
& (WSA_FLAG_MULTIPOINT_C_ROOT
|
169 WSA_FLAG_MULTIPOINT_C_LEAF
|
170 WSA_FLAG_MULTIPOINT_D_ROOT
|
171 WSA_FLAG_MULTIPOINT_D_LEAF
)) {
172 if ((Socket
->SharedData
.ServiceFlags1
& XP1_SUPPORT_MULTIPOINT
) == 0) {
173 goto error
; /* The Provider doesn't actually support Multipoint */
175 AfdPacket
->EndpointFlags
|= AFD_ENDPOINT_MULTIPOINT
;
176 if (dwFlags
& WSA_FLAG_MULTIPOINT_C_ROOT
) {
177 if (((Socket
->SharedData
.ServiceFlags1
& XP1_MULTIPOINT_CONTROL_PLANE
) == 0)
178 || ((dwFlags
& WSA_FLAG_MULTIPOINT_C_LEAF
) != 0)) {
179 goto error
; /* The Provider doesn't support Control Planes, or you already gave a leaf */
181 AfdPacket
->EndpointFlags
|= AFD_ENDPOINT_C_ROOT
;
183 if (dwFlags
& WSA_FLAG_MULTIPOINT_D_ROOT
) {
184 if (((Socket
->SharedData
.ServiceFlags1
& XP1_MULTIPOINT_DATA_PLANE
) == 0)
185 || ((dwFlags
& WSA_FLAG_MULTIPOINT_D_LEAF
) != 0)) {
186 goto error
; /* The Provider doesn't support Data Planes, or you already gave a leaf */
188 AfdPacket
->EndpointFlags
|= AFD_ENDPOINT_D_ROOT
;
192 /* Set up Object Attributes */
193 InitializeObjectAttributes (&Object
,
195 OBJ_CASE_INSENSITIVE
| OBJ_INHERIT
,
200 if ((dwFlags
& WSA_FLAG_OVERLAPPED
) == 0) IOOptions
= FILE_SYNCHRONOUS_IO_NONALERT
;
202 /* Create the Socket */
204 GENERIC_READ
| GENERIC_WRITE
| SYNCHRONIZE
,
209 FILE_SHARE_READ
| FILE_SHARE_WRITE
,
216 Socket
->Handle
= (SOCKET
)Sock
;
218 /* Save Group Info */
220 GetSocketInformation(Socket
, AFD_INFO_GROUP_ID_TYPE
, 0, &GroupData
);
222 Socket
->SharedData
.GroupID
= GroupData
.u
.LowPart
;
223 Socket
->SharedData
.GroupType
= GroupData
.u
.HighPart
;
226 /* Get Window Sizes and Save them */
227 GetSocketInformation (Socket
,
228 AFD_INFO_SEND_WINDOW_SIZE
,
229 &Socket
->SharedData
.SizeOfSendBuffer
,
231 GetSocketInformation (Socket
,
232 AFD_INFO_RECEIVE_WINDOW_SIZE
,
233 &Socket
->SharedData
.SizeOfRecvBuffer
,
236 /* Save in Process Sockets List */
237 Sockets
[SocketCount
] = Socket
;
240 /* Create the Socket Context */
241 CreateContext(Socket
);
244 Upcalls
.lpWPUModifyIFSHandle(1, (SOCKET
)Sock
, lpErrno
);
246 /* Return Socket Handle */
250 AFD_DbgPrint(MID_TRACE
,("Ending\n"));
254 return INVALID_SOCKET
;
264 * FUNCTION: Closes an open socket
266 * s = Socket descriptor
267 * lpErrno = Address of buffer for error information
269 * NO_ERROR, or SOCKET_ERROR if the socket could not be closed
280 struct sockaddr
*SocketAddress
,
281 int SocketAddressLength
,
284 * FUNCTION: Associates a local address with a socket
286 * s = Socket descriptor
287 * name = Pointer to local address
288 * namelen = Length of name
289 * lpErrno = Address of buffer for error information
291 * 0, or SOCKET_ERROR if the socket could not be bound
294 IO_STATUS_BLOCK IOSB
;
295 PAFD_BIND_DATA BindData
;
296 PSOCKET_INFORMATION Socket
= NULL
;
298 UCHAR BindBuffer
[0x1A];
299 SOCKADDR_INFO SocketInfo
;
302 Status
= NtCreateEvent( &SockEvent
, GENERIC_READ
| GENERIC_WRITE
,
305 if( !NT_SUCCESS(Status
) ) return -1;
307 /* Get the Socket Structure associate to this Socket*/
308 Socket
= GetSocketStructure(Handle
);
310 /* Dynamic Structure...ugh */
311 BindData
= (PAFD_BIND_DATA
)BindBuffer
;
313 /* Set up Address in TDI Format */
314 BindData
->Address
.TAAddressCount
= 1;
315 BindData
->Address
.Address
[0].AddressLength
= SocketAddressLength
- sizeof(SocketAddress
->sa_family
);
316 RtlCopyMemory (&BindData
->Address
.Address
[0].AddressType
,
318 SocketAddressLength
);
320 /* Get Address Information */
321 Socket
->HelperData
->WSHGetSockaddrType ((PSOCKADDR
)SocketAddress
,
325 /* Set the Share Type */
326 if (Socket
->SharedData
.ExclusiveAddressUse
) {
327 BindData
->ShareType
= AFD_SHARE_EXCLUSIVE
;
329 else if (SocketInfo
.EndpointInfo
== SockaddrEndpointInfoWildcard
) {
330 BindData
->ShareType
= AFD_SHARE_WILDCARD
;
332 else if (Socket
->SharedData
.ReuseAddresses
) {
333 BindData
->ShareType
= AFD_SHARE_REUSE
;
335 BindData
->ShareType
= AFD_SHARE_UNIQUE
;
339 Status
= NtDeviceIoControlFile( (HANDLE
)Socket
->Handle
,
346 0xA + Socket
->SharedData
.SizeOfLocalAddress
, /* Can't figure out a way to calculate this in C*/
348 0xA + Socket
->SharedData
.SizeOfLocalAddress
); /* Can't figure out a way to calculate this C */
350 /* Set up Socket Data */
351 Socket
->SharedData
.State
= SocketBound
;
352 Socket
->TdiAddressHandle
= (HANDLE
)IOSB
.Information
;
354 NtClose( SockEvent
);
366 IO_STATUS_BLOCK IOSB
;
367 AFD_LISTEN_DATA ListenData
;
368 PSOCKET_INFORMATION Socket
= NULL
;
372 Status
= NtCreateEvent( &SockEvent
, GENERIC_READ
| GENERIC_WRITE
,
375 if( !NT_SUCCESS(Status
) ) return -1;
377 /* Get the Socket Structure associate to this Socket*/
378 Socket
= GetSocketStructure(Handle
);
380 /* Set Up Listen Structure */
381 ListenData
.UseSAN
= FALSE
;
382 ListenData
.UseDelayedAcceptance
= Socket
->SharedData
.UseDelayedAcceptance
;
383 ListenData
.Backlog
= Backlog
;
386 Status
= NtDeviceIoControlFile( (HANDLE
)Socket
->Handle
,
391 IOCTL_AFD_START_LISTEN
,
397 /* Set to Listening */
398 Socket
->SharedData
.Listening
= TRUE
;
400 NtClose( SockEvent
);
413 struct timeval
*timeout
,
416 IO_STATUS_BLOCK IOSB
;
417 PAFD_POLL_INFO PollInfo
;
419 ULONG HandleCount
, OutCount
= 0;
420 ULONG PollBufferSize
;
426 Status
= NtCreateEvent( &SockEvent
, GENERIC_READ
| GENERIC_WRITE
,
429 if( !NT_SUCCESS(Status
) ) return -1;
431 /* Find out how many sockets we have, and how large the buffer needs
435 ( readfds
? readfds
->fd_count
: 0 ) +
436 ( writefds
? writefds
->fd_count
: 0 ) +
437 ( exceptfds
? exceptfds
->fd_count
: 0 );
438 PollBufferSize
= sizeof(*PollInfo
) +
439 (HandleCount
* sizeof(AFD_HANDLE
));
442 PollBuffer
= HeapAlloc(GlobalHeap
, 0, PollBufferSize
);
443 PollInfo
= (PAFD_POLL_INFO
)PollBuffer
;
445 RtlZeroMemory( PollInfo
, PollBufferSize
);
447 /* Convert Timeout to NT Format */
448 if (timeout
== NULL
) {
449 PollInfo
->Timeout
.u
.LowPart
= -1;
450 PollInfo
->Timeout
.u
.HighPart
= 0x7FFFFFFF;
452 PollInfo
->Timeout
= RtlEnlargedIntegerMultiply
453 ((timeout
->tv_sec
* 1000) + timeout
->tv_usec
, -10000);
454 PollInfo
->Timeout
.QuadPart
+= uSec
.QuadPart
;
457 /* Number of handles for AFD to Check */
458 PollInfo
->HandleCount
= HandleCount
;
459 PollInfo
->InternalUse
= 0;
461 if (readfds
!= NULL
) {
462 for (i
= 0; i
< readfds
->fd_count
; i
++, j
++) {
463 PollInfo
->Handles
[j
].Handle
= readfds
->fd_array
[i
];
464 PollInfo
->Handles
[j
].Events
= AFD_EVENT_RECEIVE
| AFD_EVENT_DISCONNECT
| AFD_EVENT_ABORT
;
467 if (writefds
!= NULL
) {
468 for (i
= 0; i
< writefds
->fd_count
; i
++, j
++) {
469 PollInfo
->Handles
[j
].Handle
= writefds
->fd_array
[i
];
470 PollInfo
->Handles
[j
].Events
|= AFD_EVENT_SEND
;
474 if (exceptfds
!= NULL
) {
475 for (i
= 0; i
< exceptfds
->fd_count
; i
++, j
++) {
476 PollInfo
->Handles
[j
].Handle
= exceptfds
->fd_array
[i
];
477 PollInfo
->Handles
[j
].Events
|=
478 AFD_EVENT_OOB_RECEIVE
| AFD_EVENT_CONNECT_FAIL
;
483 Status
= NtDeviceIoControlFile( (HANDLE
)Sockets
[0]->Handle
,
494 AFD_DbgPrint(MID_TRACE
,("DeviceIoControlFile => %x\n", Status
));
496 /* Wait for Completition */
497 if (Status
== STATUS_PENDING
) {
498 WaitForSingleObject(SockEvent
, 0);
501 /* Clear the Structures */
502 if( readfds
) FD_ZERO(readfds
);
503 if( writefds
) FD_ZERO(writefds
);
504 if( exceptfds
) FD_ZERO(exceptfds
);
506 /* Loop through return structure */
507 HandleCount
= PollInfo
->HandleCount
;
509 /* Return in FDSET Format */
510 for (i
= 0; i
< HandleCount
; i
++) {
511 for(x
= 1; x
; x
<<=1) {
512 switch (PollInfo
->Handles
[i
].Events
& x
) {
513 case AFD_EVENT_RECEIVE
:
514 case AFD_EVENT_DISCONNECT
:
515 case AFD_EVENT_ABORT
:
516 case AFD_EVENT_ACCEPT
:
517 case AFD_EVENT_CLOSE
:
518 AFD_DbgPrint(MID_TRACE
,("Event %x on handle %x\n",
519 PollInfo
->Handles
[i
].Events
,
520 PollInfo
->Handles
[i
].Handle
));
522 if( readfds
) FD_SET(PollInfo
->Handles
[i
].Handle
, readfds
);
523 case AFD_EVENT_SEND
: case AFD_EVENT_CONNECT
:
524 AFD_DbgPrint(MID_TRACE
,("Event %x on handle %x\n",
525 PollInfo
->Handles
[i
].Events
,
526 PollInfo
->Handles
[i
].Handle
));
528 if( writefds
) FD_SET(PollInfo
->Handles
[i
].Handle
, writefds
);
531 case AFD_EVENT_OOB_RECEIVE
: case AFD_EVENT_CONNECT_FAIL
:
532 AFD_DbgPrint(MID_TRACE
,("Event %x on handle %x\n",
533 PollInfo
->Handles
[i
].Events
,
534 PollInfo
->Handles
[i
].Handle
));
536 if( exceptfds
) FD_SET(PollInfo
->Handles
[i
].Handle
, exceptfds
);
542 NtClose( SockEvent
);
543 switch( IOSB
.Status
) {
545 case STATUS_TIMEOUT
: *lpErrno
= 0; break;
546 default: *lpErrno
= WSAEINVAL
;
549 AFD_DbgPrint(MID_TRACE
,("%d events\n", OutCount
));
558 struct sockaddr
*SocketAddress
,
559 int *SocketAddressLength
,
560 LPCONDITIONPROC lpfnCondition
,
561 DWORD_PTR dwCallbackData
,
564 IO_STATUS_BLOCK IOSB
;
565 PAFD_RECEIVED_ACCEPT_DATA ListenReceiveData
;
566 AFD_ACCEPT_DATA AcceptData
;
567 AFD_DEFER_ACCEPT_DATA DeferData
;
568 AFD_PENDING_ACCEPT_DATA PendingAcceptData
;
569 PSOCKET_INFORMATION Socket
= NULL
;
571 struct fd_set ReadSet
;
572 struct timeval Timeout
;
574 ULONG PendingDataLength
;
575 PVOID CalleeDataBuffer
;
576 WSABUF CallerData
, CalleeID
, CallerID
, CalleeData
;
577 PSOCKADDR RemoteAddress
= NULL
;
580 WSAPROTOCOL_INFOW ProtocolInfo
;
582 UCHAR ReceiveBuffer
[0x1A];
585 Status
= NtCreateEvent( &SockEvent
, GENERIC_READ
| GENERIC_WRITE
,
588 if( !NT_SUCCESS(Status
) ) return -1;
590 /* Dynamic Structure...ugh */
591 ListenReceiveData
= (PAFD_RECEIVED_ACCEPT_DATA
)ReceiveBuffer
;
593 /* Get the Socket Structure associate to this Socket*/
594 Socket
= GetSocketStructure(Handle
);
596 /* If this is non-blocking, make sure there's something for us to accept */
598 FD_SET(Socket
->Handle
, &ReadSet
);
601 WSPSelect(0, &ReadSet
, NULL
, NULL
, &Timeout
, NULL
);
602 if (ReadSet
.fd_array
[0] != Socket
->Handle
) return 0;
605 Status
= NtDeviceIoControlFile( (HANDLE
)Socket
->Handle
,
610 IOCTL_AFD_WAIT_FOR_LISTEN
,
614 0xA + sizeof(*ListenReceiveData
));
616 if (lpfnCondition
!= NULL
) {
617 if ((Socket
->SharedData
.ServiceFlags1
& XP1_CONNECT_DATA
) != 0) {
619 /* Find out how much data is pending */
620 PendingAcceptData
.SequenceNumber
= ListenReceiveData
->SequenceNumber
;
621 PendingAcceptData
.ReturnSize
= TRUE
;
624 Status
= NtDeviceIoControlFile( (HANDLE
)Socket
->Handle
,
629 IOCTL_AFD_GET_PENDING_CONNECT_DATA
,
631 sizeof(PendingAcceptData
),
633 sizeof(PendingAcceptData
));
635 /* How much data to allocate */
636 PendingDataLength
= IOSB
.Information
;
638 if (PendingDataLength
) {
640 /* Allocate needed space */
641 PendingData
= HeapAlloc(GlobalHeap
, 0, PendingDataLength
);
643 /* We want the data now */
644 PendingAcceptData
.ReturnSize
= FALSE
;
647 Status
= NtDeviceIoControlFile( (HANDLE
)Socket
->Handle
,
652 IOCTL_AFD_GET_PENDING_CONNECT_DATA
,
654 sizeof(PendingAcceptData
),
661 if ((Socket
->SharedData
.ServiceFlags1
& XP1_QOS_SUPPORTED
) != 0) {
662 /* I don't support this yet */
665 /* Build Callee ID */
666 CalleeID
.buf
= (PVOID
)Socket
->LocalAddress
;
667 CalleeID
.len
= Socket
->SharedData
.SizeOfLocalAddress
;
669 /* Set up Address in SOCKADDR Format */
670 RtlCopyMemory (RemoteAddress
,
671 &ListenReceiveData
->Address
.Address
[0].AddressType
,
672 sizeof(RemoteAddress
));
674 /* Build Caller ID */
675 CallerID
.buf
= (PVOID
)RemoteAddress
;
676 CallerID
.len
= sizeof(RemoteAddress
);
678 /* Build Caller Data */
679 CallerData
.buf
= PendingData
;
680 CallerData
.len
= PendingDataLength
;
682 /* Check if socket supports Conditional Accept */
683 if (Socket
->SharedData
.UseDelayedAcceptance
!= 0) {
685 /* Allocate Buffer for Callee Data */
686 CalleeDataBuffer
= HeapAlloc(GlobalHeap
, 0, 4096);
687 CalleeData
.buf
= CalleeDataBuffer
;
688 CalleeData
.len
= 4096;
697 /* Call the Condition Function */
698 CallBack
= (lpfnCondition
)( &CallerID
,
699 CallerData
.buf
== NULL
705 CalleeData
.buf
== NULL
711 if (((CallBack
== CF_ACCEPT
) && GroupID
) != 0) {
712 /* TBD: Check for Validity */
715 if (CallBack
== CF_ACCEPT
) {
717 if ((Socket
->SharedData
.ServiceFlags1
& XP1_QOS_SUPPORTED
) != 0) {
718 /* I don't support this yet */
721 if (CalleeData
.buf
) {
722 // SockSetConnectData Sockets(SocketID), IOCTL_AFD_SET_CONNECT_DATA, CalleeData.Buffer, CalleeData.BuffSize, 0
726 /* Callback rejected. Build Defer Structure */
727 DeferData
.SequenceNumber
= ListenReceiveData
->SequenceNumber
;
728 DeferData
.RejectConnection
= (CallBack
== CF_REJECT
);
731 Status
= NtDeviceIoControlFile( (HANDLE
)Socket
->Handle
,
736 IOCTL_AFD_DEFER_ACCEPT
,
742 NtClose( SockEvent
);
744 if (CallBack
== CF_REJECT
) {
745 return WSAECONNREFUSED
;
752 /* Create a new Socket */
753 ProtocolInfo
.dwCatalogEntryId
= Socket
->SharedData
.CatalogEntryId
;
754 ProtocolInfo
.dwServiceFlags1
= Socket
->SharedData
.ServiceFlags1
;
755 ProtocolInfo
.dwProviderFlags
= Socket
->SharedData
.ProviderFlags
;
756 AcceptSocket
= WSPSocket (Socket
->SharedData
.AddressFamily
,
757 Socket
->SharedData
.SocketType
,
758 Socket
->SharedData
.Protocol
,
761 Socket
->SharedData
.CreateFlags
,
764 /* Set up the Accept Structure */
765 AcceptData
.ListenHandle
= AcceptSocket
;
766 AcceptData
.SequenceNumber
= ListenReceiveData
->SequenceNumber
;
768 /* Send IOCTL to Accept */
769 Status
= NtDeviceIoControlFile( (HANDLE
)Socket
->Handle
,
780 /* Return Address in SOCKADDR FORMAT */
781 RtlCopyMemory (SocketAddress
,
782 &ListenReceiveData
->Address
.Address
[0].AddressType
,
783 sizeof(RemoteAddress
));
785 NtClose( SockEvent
);
795 struct sockaddr
* SocketAddress
,
796 int SocketAddressLength
,
797 LPWSABUF lpCallerData
,
798 LPWSABUF lpCalleeData
,
803 IO_STATUS_BLOCK IOSB
;
804 PAFD_CONNECT_INFO ConnectInfo
;
805 PSOCKET_INFORMATION Socket
= NULL
;
807 UCHAR ConnectBuffer
[0x22];
808 ULONG ConnectDataLength
;
809 ULONG InConnectDataLength
;
810 UINT BindAddressLength
;
811 PSOCKADDR BindAddress
;
814 Status
= NtCreateEvent( &SockEvent
, GENERIC_READ
| GENERIC_WRITE
,
817 if( !NT_SUCCESS(Status
) ) return -1;
819 AFD_DbgPrint(MID_TRACE
,("Called\n"));
821 /* Get the Socket Structure associate to this Socket*/
822 Socket
= GetSocketStructure(Handle
);
825 if (Socket
->SharedData
.State
== SocketOpen
) {
827 /* Get the Wildcard Address */
828 BindAddressLength
= Socket
->HelperData
->MaxWSAddressLength
;
829 BindAddress
= HeapAlloc(GetProcessHeap(), 0, BindAddressLength
);
830 Socket
->HelperData
->WSHGetWildcardSockaddr (Socket
->HelperContext
,
835 WSPBind(Handle
, BindAddress
, BindAddressLength
, NULL
);
838 /* Set the Connect Data */
839 if (lpCallerData
!= NULL
) {
840 ConnectDataLength
= lpCallerData
->len
;
841 Status
= NtDeviceIoControlFile((HANDLE
)Handle
,
846 IOCTL_AFD_SET_CONNECT_DATA
,
853 /* Dynamic Structure...ugh */
854 ConnectInfo
= (PAFD_CONNECT_INFO
)ConnectBuffer
;
856 /* Set up Address in TDI Format */
857 ConnectInfo
->RemoteAddress
.TAAddressCount
= 1;
858 ConnectInfo
->RemoteAddress
.Address
[0].AddressLength
= SocketAddressLength
- sizeof(SocketAddress
->sa_family
);
859 RtlCopyMemory (&ConnectInfo
->RemoteAddress
.Address
[0].AddressType
,
861 SocketAddressLength
);
863 /* Tell AFD that we want Connection Data back, have it allocate a buffer */
864 if (lpCalleeData
!= NULL
) {
865 InConnectDataLength
= lpCalleeData
->len
;
866 Status
= NtDeviceIoControlFile((HANDLE
)Handle
,
871 IOCTL_AFD_SET_CONNECT_DATA_SIZE
,
872 &InConnectDataLength
,
873 sizeof(InConnectDataLength
),
878 /* AFD doesn't seem to care if these are invalid, but let's 0 them anyways */
879 ConnectInfo
->Root
= 0;
880 ConnectInfo
->UseSAN
= FALSE
;
881 ConnectInfo
->Unknown
= 0;
884 Status
= NtDeviceIoControlFile((HANDLE
)Handle
,
895 /* Get any pending connect data */
896 if (lpCalleeData
!= NULL
) {
897 Status
= NtDeviceIoControlFile((HANDLE
)Handle
,
902 IOCTL_AFD_GET_CONNECT_DATA
,
909 AFD_DbgPrint(MID_TRACE
,("Ending\n"));
911 NtClose( SockEvent
);
923 IO_STATUS_BLOCK IOSB
;
924 AFD_DISCONNECT_INFO DisconnectInfo
;
925 PSOCKET_INFORMATION Socket
= NULL
;
929 Status
= NtCreateEvent( &SockEvent
, GENERIC_READ
| GENERIC_WRITE
,
932 if( !NT_SUCCESS(Status
) ) return -1;
934 AFD_DbgPrint(MID_TRACE
,("Called\n"));
936 /* Get the Socket Structure associate to this Socket*/
937 Socket
= GetSocketStructure(Handle
);
939 /* Set AFD Disconnect Type */
943 DisconnectInfo
.DisconnectType
= AFD_DISCONNECT_RECV
;
944 Socket
->SharedData
.ReceiveShutdown
= TRUE
;
948 DisconnectInfo
.DisconnectType
= AFD_DISCONNECT_SEND
;
949 Socket
->SharedData
.SendShutdown
= TRUE
;
953 DisconnectInfo
.DisconnectType
= AFD_DISCONNECT_RECV
| AFD_DISCONNECT_SEND
;
954 Socket
->SharedData
.ReceiveShutdown
= TRUE
;
955 Socket
->SharedData
.SendShutdown
= TRUE
;
959 DisconnectInfo
.Timeout
= RtlConvertLongToLargeInteger(-1);
962 Status
= NtDeviceIoControlFile((HANDLE
)Handle
,
967 IOCTL_AFD_DISCONNECT
,
969 sizeof(DisconnectInfo
),
973 /* Wait for return */
974 if (Status
== STATUS_PENDING
) {
975 WaitForSingleObject(SockEvent
, 0);
978 AFD_DbgPrint(MID_TRACE
,("Ending\n"));
980 NtClose( SockEvent
);
991 IN OUT LPINT namelen
,
1002 OUT LPSOCKADDR name
,
1003 IN OUT LPINT namelen
,
1014 IN DWORD dwIoControlCode
,
1015 IN LPVOID lpvInBuffer
,
1016 IN DWORD cbInBuffer
,
1017 OUT LPVOID lpvOutBuffer
,
1018 IN DWORD cbOutBuffer
,
1019 OUT LPDWORD lpcbBytesReturned
,
1020 IN LPWSAOVERLAPPED lpOverlapped
,
1021 IN LPWSAOVERLAPPED_COMPLETION_ROUTINE lpCompletionRoutine
,
1022 IN LPWSATHREADID lpThreadId
,
1025 PSOCKET_INFORMATION Socket
= NULL
;
1027 /* Get the Socket Structure associate to this Socket*/
1028 Socket
= GetSocketStructure(Handle
);
1030 switch( dwIoControlCode
) {
1032 if( cbInBuffer
< sizeof(INT
) ) return -1;
1033 Socket
->SharedData
.NonBlocking
= *((PINT
)lpvInBuffer
) ? 1 : 0;
1034 AFD_DbgPrint(MID_TRACE
,("[%x] Set nonblocking %d\n",
1035 Handle
, Socket
->SharedData
.NonBlocking
));
1046 IN WORD wVersionRequested
,
1047 OUT LPWSPDATA lpWSPData
,
1048 IN LPWSAPROTOCOL_INFOW lpProtocolInfo
,
1049 IN WSPUPCALLTABLE UpcallTable
,
1050 OUT LPWSPPROC_TABLE lpProcTable
)
1052 * FUNCTION: Initialize service provider for a client
1054 * wVersionRequested = Highest WinSock SPI version that the caller can use
1055 * lpWSPData = Address of WSPDATA structure to initialize
1056 * lpProtocolInfo = Pointer to structure that defines the desired protocol
1057 * UpcallTable = Pointer to upcall table of the WinSock DLL
1058 * lpProcTable = Address of procedure table to initialize
1060 * Status of operation
1065 AFD_DbgPrint(MAX_TRACE
, ("wVersionRequested (0x%X) \n", wVersionRequested
));
1069 Upcalls
= UpcallTable
;
1071 if (Status
== NO_ERROR
) {
1072 lpProcTable
->lpWSPAccept
= WSPAccept
;
1073 lpProcTable
->lpWSPAddressToString
= WSPAddressToString
;
1074 lpProcTable
->lpWSPAsyncSelect
= WSPAsyncSelect
;
1075 lpProcTable
->lpWSPBind
= (LPWSPBIND
)WSPBind
;
1076 lpProcTable
->lpWSPCancelBlockingCall
= WSPCancelBlockingCall
;
1077 lpProcTable
->lpWSPCleanup
= WSPCleanup
;
1078 lpProcTable
->lpWSPCloseSocket
= WSPCloseSocket
;
1079 lpProcTable
->lpWSPConnect
= (LPWSPCONNECT
)WSPConnect
;
1080 lpProcTable
->lpWSPDuplicateSocket
= WSPDuplicateSocket
;
1081 lpProcTable
->lpWSPEnumNetworkEvents
= WSPEnumNetworkEvents
;
1082 lpProcTable
->lpWSPEventSelect
= WSPEventSelect
;
1083 lpProcTable
->lpWSPGetOverlappedResult
= WSPGetOverlappedResult
;
1084 lpProcTable
->lpWSPGetPeerName
= WSPGetPeerName
;
1085 lpProcTable
->lpWSPGetSockName
= WSPGetSockName
;
1086 lpProcTable
->lpWSPGetSockOpt
= WSPGetSockOpt
;
1087 lpProcTable
->lpWSPGetQOSByName
= WSPGetQOSByName
;
1088 lpProcTable
->lpWSPIoctl
= WSPIoctl
;
1089 lpProcTable
->lpWSPJoinLeaf
= (LPWSPJOINLEAF
)WSPJoinLeaf
;
1090 lpProcTable
->lpWSPListen
= WSPListen
;
1091 lpProcTable
->lpWSPRecv
= WSPRecv
;
1092 lpProcTable
->lpWSPRecvDisconnect
= WSPRecvDisconnect
;
1093 lpProcTable
->lpWSPRecvFrom
= WSPRecvFrom
;
1094 lpProcTable
->lpWSPSelect
= WSPSelect
;
1095 lpProcTable
->lpWSPSend
= WSPSend
;
1096 lpProcTable
->lpWSPSendDisconnect
= WSPSendDisconnect
;
1097 lpProcTable
->lpWSPSendTo
= (LPWSPSENDTO
)WSPSendTo
;
1098 lpProcTable
->lpWSPSetSockOpt
= WSPSetSockOpt
;
1099 lpProcTable
->lpWSPShutdown
= WSPShutdown
;
1100 lpProcTable
->lpWSPSocket
= WSPSocket
;
1101 lpProcTable
->lpWSPStringToAddress
= WSPStringToAddress
;
1103 lpWSPData
->wVersion
= MAKEWORD(2, 2);
1104 lpWSPData
->wHighVersion
= MAKEWORD(2, 2);
1107 AFD_DbgPrint(MAX_TRACE
, ("Status (%d).\n", Status
));
1118 * FUNCTION: Cleans up service provider for a client
1120 * lpErrno = Address of buffer for error information
1122 * 0 if successful, or SOCKET_ERROR if not
1125 AFD_DbgPrint(MAX_TRACE
, ("\n"));
1128 AFD_DbgPrint(MAX_TRACE
, ("Leaving.\n"));
1130 *lpErrno
= NO_ERROR
;
1138 GetSocketInformation(
1139 PSOCKET_INFORMATION Socket
,
1140 ULONG AfdInformationClass
,
1141 PULONG Ulong OPTIONAL
,
1142 PLARGE_INTEGER LargeInteger OPTIONAL
)
1144 IO_STATUS_BLOCK IOSB
;
1149 Status
= NtCreateEvent( &SockEvent
, GENERIC_READ
| GENERIC_WRITE
,
1152 if( !NT_SUCCESS(Status
) ) return -1;
1154 /* Set Info Class */
1155 InfoData
.InformationClass
= AfdInformationClass
;
1158 Status
= NtDeviceIoControlFile( (HANDLE
)Socket
->Handle
,
1169 /* Wait for return */
1170 if (Status
== STATUS_PENDING
) {
1171 WaitForSingleObject(SockEvent
, 0);
1174 /* Return Information */
1175 *Ulong
= InfoData
.Information
.Ulong
;
1176 if (LargeInteger
!= NULL
) {
1177 *LargeInteger
= InfoData
.Information
.LargeInteger
;
1180 NtClose( SockEvent
);
1188 SetSocketInformation(
1189 PSOCKET_INFORMATION Socket
,
1190 ULONG AfdInformationClass
,
1191 PULONG Ulong OPTIONAL
,
1192 PLARGE_INTEGER LargeInteger OPTIONAL
)
1194 IO_STATUS_BLOCK IOSB
;
1199 Status
= NtCreateEvent( &SockEvent
, GENERIC_READ
| GENERIC_WRITE
,
1202 if( !NT_SUCCESS(Status
) ) return -1;
1204 /* Set Info Class */
1205 InfoData
.InformationClass
= AfdInformationClass
;
1207 /* Set Information */
1208 InfoData
.Information
.Ulong
= *Ulong
;
1209 if (LargeInteger
!= NULL
) {
1210 InfoData
.Information
.LargeInteger
= *LargeInteger
;
1214 Status
= NtDeviceIoControlFile( (HANDLE
)Socket
->Handle
,
1225 /* Wait for return */
1226 if (Status
== STATUS_PENDING
) {
1227 WaitForSingleObject(SockEvent
, 0);
1230 NtClose( SockEvent
);
1242 for (i
=0; i
<SocketCount
; i
++) {
1243 if (Sockets
[i
]->Handle
== Handle
) {
1250 int CreateContext(PSOCKET_INFORMATION Socket
)
1252 IO_STATUS_BLOCK IOSB
;
1253 SOCKET_CONTEXT ContextData
;
1257 Status
= NtCreateEvent( &SockEvent
, GENERIC_READ
| GENERIC_WRITE
,
1260 if( !NT_SUCCESS(Status
) ) return -1;
1262 /* Create Context */
1263 ContextData
.SharedData
= Socket
->SharedData
;
1264 ContextData
.SizeOfHelperData
= 0;
1265 RtlCopyMemory (&ContextData
.LocalAddress
,
1266 Socket
->LocalAddress
,
1267 Socket
->SharedData
.SizeOfLocalAddress
);
1268 RtlCopyMemory (&ContextData
.RemoteAddress
,
1269 Socket
->RemoteAddress
,
1270 Socket
->SharedData
.SizeOfRemoteAddress
);
1273 Status
= NtDeviceIoControlFile( (HANDLE
)Socket
->Handle
,
1278 IOCTL_AFD_SET_CONTEXT
,
1280 sizeof(ContextData
),
1284 /* Wait for Completition */
1285 if (Status
== STATUS_PENDING
) {
1286 WaitForSingleObject(SockEvent
, 0);
1289 NtClose( SockEvent
);
1296 DllMain(HANDLE hInstDll
,
1302 case DLL_PROCESS_ATTACH
:
1304 AFD_DbgPrint(MAX_TRACE
, ("Loading MSAFD.DLL \n"));
1306 /* Don't need thread attach notifications
1307 so disable them to improve performance */
1308 DisableThreadLibraryCalls(hInstDll
);
1310 /* List of DLL Helpers */
1311 InitializeListHead(&SockHelpersListHead
);
1313 /* Heap to use when allocating */
1314 GlobalHeap
= GetProcessHeap();
1316 /* Allocate Heap for 1024 Sockets, can be expanded later */
1317 Sockets
= HeapAlloc(GetProcessHeap(), 0, sizeof(PSOCKET_INFORMATION
) * 1024);
1319 AFD_DbgPrint(MAX_TRACE
, ("MSAFD.DLL has been loaded\n"));
1323 case DLL_THREAD_ATTACH
:
1326 case DLL_THREAD_DETACH
:
1329 case DLL_PROCESS_DETACH
:
1333 AFD_DbgPrint(MAX_TRACE
, ("DllMain of msafd.dll (leaving)\n"));