2 * COPYRIGHT: See COPYING in the top level directory
3 * PROJECT: ReactOS TCP/IP protocol driver
5 * PURPOSE: Local Area Network media routines
6 * PROGRAMMERS: Casper S. Hornstrup (chorns@users.sourceforge.net)
8 * CSH 01/08-2000 Created
13 /* Define this to bugcheck on double complete */
14 /* #define BREAK_ON_DOUBLE_COMPLETE */
16 UINT TransferDataCalled
= 0;
17 UINT TransferDataCompleteCalled
= 0;
18 UINT LanReceiveWorkerCalled
= 0;
19 BOOLEAN LanReceiveWorkerBusy
= FALSE
;
21 #define CCS_ROOT L"\\Registry\\Machine\\SYSTEM\\CurrentControlSet"
22 #define TCPIP_GUID L"{4D36E972-E325-11CE-BFC1-08002BE10318}"
24 #define NGFP(_Packet) \
27 ULONG _ContigSize, _TotalSize; \
28 PNDIS_BUFFER _NdisBuffer; \
30 TI_DbgPrint(MID_TRACE,("Checking Packet %x\n", _Packet)); \
31 NdisGetFirstBufferFromPacket(_Packet, \
36 TI_DbgPrint(MID_TRACE,("NdisBuffer: %x\n", _NdisBuffer)); \
37 TI_DbgPrint(MID_TRACE,("Header : %x\n", _Header)); \
38 TI_DbgPrint(MID_TRACE,("ContigSize: %x\n", _ContigSize)); \
39 TI_DbgPrint(MID_TRACE,("TotalSize : %x\n", _TotalSize)); \
42 typedef struct _LAN_WQ_ITEM
{
46 UINT BytesTransferred
;
47 } LAN_WQ_ITEM
, *PLAN_WQ_ITEM
;
49 NDIS_HANDLE NdisProtocolHandle
= (NDIS_HANDLE
)NULL
;
50 BOOLEAN ProtocolRegistered
= FALSE
;
51 LIST_ENTRY AdapterListHead
;
52 KSPIN_LOCK AdapterListLock
;
54 /* Double complete protection */
55 KSPIN_LOCK LanSendCompleteLock
;
56 LIST_ENTRY LanSendCompleteList
;
58 VOID
LanChainCompletion( PLAN_ADAPTER Adapter
, PNDIS_PACKET NdisPacket
) {
59 PLAN_WQ_ITEM PendingCompletion
=
60 ExAllocatePool( NonPagedPool
, sizeof(LAN_WQ_ITEM
) );
62 if( !PendingCompletion
) return;
64 PendingCompletion
->Packet
= NdisPacket
;
65 PendingCompletion
->Adapter
= Adapter
;
67 ExInterlockedInsertTailList( &LanSendCompleteList
,
68 &PendingCompletion
->ListEntry
,
69 &LanSendCompleteLock
);
72 BOOLEAN
LanShouldComplete( PLAN_ADAPTER Adapter
, PNDIS_PACKET NdisPacket
) {
73 PLIST_ENTRY ListEntry
;
74 PLAN_WQ_ITEM CompleteEntry
;
77 KeAcquireSpinLock( &LanSendCompleteLock
, &OldIrql
);
78 for( ListEntry
= LanSendCompleteList
.Flink
;
79 ListEntry
!= &LanSendCompleteList
;
80 ListEntry
= ListEntry
->Flink
) {
81 CompleteEntry
= CONTAINING_RECORD(ListEntry
, LAN_WQ_ITEM
, ListEntry
);
83 if( CompleteEntry
->Adapter
== Adapter
&&
84 CompleteEntry
->Packet
== NdisPacket
) {
85 RemoveEntryList( ListEntry
);
86 KeReleaseSpinLock( &LanSendCompleteLock
, OldIrql
);
87 ExFreePool( CompleteEntry
);
91 KeReleaseSpinLock( &LanSendCompleteLock
, OldIrql
);
93 DbgPrint("NDIS completed the same send packet twice "
94 "(Adapter %x Packet %x)!!\n", Adapter
, NdisPacket
);
95 #ifdef BREAK_ON_DOUBLE_COMPLETE
102 NDIS_STATUS
NDISCall(
103 PLAN_ADAPTER Adapter
,
104 NDIS_REQUEST_TYPE Type
,
109 * FUNCTION: Send a request to NDIS
111 * Adapter = Pointer to a LAN_ADAPTER structure
112 * Type = Type of request (Set or Query)
113 * OID = Value to be set/queried for
114 * Buffer = Pointer to a buffer to use
115 * Length = Number of bytes in Buffer
117 * Status of operation
120 NDIS_REQUEST Request
;
121 NDIS_STATUS NdisStatus
;
123 Request
.RequestType
= Type
;
124 if (Type
== NdisRequestSetInformation
) {
125 Request
.DATA
.SET_INFORMATION
.Oid
= OID
;
126 Request
.DATA
.SET_INFORMATION
.InformationBuffer
= Buffer
;
127 Request
.DATA
.SET_INFORMATION
.InformationBufferLength
= Length
;
129 Request
.DATA
.QUERY_INFORMATION
.Oid
= OID
;
130 Request
.DATA
.QUERY_INFORMATION
.InformationBuffer
= Buffer
;
131 Request
.DATA
.QUERY_INFORMATION
.InformationBufferLength
= Length
;
134 if (Adapter
->State
!= LAN_STATE_RESETTING
) {
135 NdisRequest(&NdisStatus
, Adapter
->NdisHandle
, &Request
);
137 NdisStatus
= NDIS_STATUS_NOT_ACCEPTED
;
140 /* Wait for NDIS to complete the request */
141 if (NdisStatus
== NDIS_STATUS_PENDING
) {
142 KeWaitForSingleObject(&Adapter
->Event
,
147 NdisStatus
= Adapter
->NdisStatus
;
155 PLAN_ADAPTER Adapter
)
157 * FUNCTION: Frees memory for a LAN_ADAPTER structure
159 * Adapter = Pointer to LAN_ADAPTER structure to free
166 NTSTATUS TcpipLanGetDwordOid
167 ( PIP_INTERFACE Interface
,
170 /* Get maximum frame size */
171 if( Interface
->Context
) {
172 return NDISCall((PLAN_ADAPTER
)Interface
->Context
,
173 NdisRequestQueryInformation
,
177 } else switch( Oid
) { /* Loopback Case */
178 case OID_GEN_HARDWARE_STATUS
:
179 *Result
= NdisHardwareStatusReady
;
180 return STATUS_SUCCESS
;
183 return STATUS_INVALID_PARAMETER
;
188 VOID STDCALL
ProtocolOpenAdapterComplete(
189 NDIS_HANDLE BindingContext
,
191 NDIS_STATUS OpenErrorStatus
)
193 * FUNCTION: Called by NDIS to complete opening of an adapter
195 * BindingContext = Pointer to a device context (LAN_ADAPTER)
196 * Status = Status of the operation
197 * OpenErrorStatus = Additional status information
200 PLAN_ADAPTER Adapter
= (PLAN_ADAPTER
)BindingContext
;
202 TI_DbgPrint(DEBUG_DATALINK
, ("Called.\n"));
204 KeSetEvent(&Adapter
->Event
, 0, FALSE
);
208 VOID STDCALL
ProtocolCloseAdapterComplete(
209 NDIS_HANDLE BindingContext
,
212 * FUNCTION: Called by NDIS to complete closing an adapter
214 * BindingContext = Pointer to a device context (LAN_ADAPTER)
215 * Status = Status of the operation
218 PLAN_ADAPTER Adapter
= (PLAN_ADAPTER
)BindingContext
;
220 TI_DbgPrint(DEBUG_DATALINK
, ("Called.\n"));
222 Adapter
->NdisStatus
= Status
;
224 KeSetEvent(&Adapter
->Event
, 0, FALSE
);
228 VOID STDCALL
ProtocolResetComplete(
229 NDIS_HANDLE BindingContext
,
232 * FUNCTION: Called by NDIS to complete resetting an adapter
234 * BindingContext = Pointer to a device context (LAN_ADAPTER)
235 * Status = Status of the operation
238 TI_DbgPrint(MID_TRACE
, ("Called.\n"));
242 VOID STDCALL
ProtocolRequestComplete(
243 NDIS_HANDLE BindingContext
,
244 PNDIS_REQUEST NdisRequest
,
247 * FUNCTION: Called by NDIS to complete a request
249 * BindingContext = Pointer to a device context (LAN_ADAPTER)
250 * NdisRequest = Pointer to an object describing the request
251 * Status = Status of the operation
254 PLAN_ADAPTER Adapter
= (PLAN_ADAPTER
)BindingContext
;
256 TI_DbgPrint(DEBUG_DATALINK
, ("Called.\n"));
258 /* Save status of request and signal an event */
259 Adapter
->NdisStatus
= Status
;
261 KeSetEvent(&Adapter
->Event
, 0, FALSE
);
265 VOID STDCALL
ProtocolSendComplete(
266 NDIS_HANDLE BindingContext
,
270 * FUNCTION: Called by NDIS to complete sending process
272 * BindingContext = Pointer to a device context (LAN_ADAPTER)
273 * Packet = Pointer to a packet descriptor
274 * Status = Status of the operation
277 TI_DbgPrint(DEBUG_DATALINK
, ("Calling completion routine\n"));
278 if( LanShouldComplete( (PLAN_ADAPTER
)BindingContext
, Packet
) ) {
279 ASSERT_KM_POINTER(Packet
);
280 ASSERT_KM_POINTER(PC(Packet
));
281 ASSERT_KM_POINTER(PC(Packet
)->DLComplete
);
282 (*PC(Packet
)->DLComplete
)( PC(Packet
)->Context
, Packet
, Status
);
283 TI_DbgPrint(DEBUG_DATALINK
, ("Finished\n"));
287 VOID
LanReceiveWorker( PVOID Context
) {
289 PLAN_WQ_ITEM WorkItem
= (PLAN_WQ_ITEM
)Context
;
291 PLAN_ADAPTER Adapter
;
292 UINT BytesTransferred
;
293 PNDIS_BUFFER NdisBuffer
;
296 TI_DbgPrint(DEBUG_DATALINK
, ("Called.\n"));
298 Packet
= WorkItem
->Packet
;
299 Adapter
= WorkItem
->Adapter
;
300 BytesTransferred
= WorkItem
->BytesTransferred
;
302 IPPacket
.NdisPacket
= Packet
;
304 NdisGetFirstBufferFromPacket(Packet
,
307 &IPPacket
.ContigSize
,
308 &IPPacket
.TotalSize
);
310 IPPacket
.ContigSize
= IPPacket
.TotalSize
= BytesTransferred
;
311 /* Determine which upper layer protocol that should receive
312 this packet and pass it to the correct receive handler */
314 TI_DbgPrint(MID_TRACE
,
315 ("ContigSize: %d, TotalSize: %d, BytesTransferred: %d\n",
316 IPPacket
.ContigSize
, IPPacket
.TotalSize
,
319 PacketType
= PC(IPPacket
.NdisPacket
)->PacketType
;
320 IPPacket
.Position
= 0;
324 ("Ether Type = %x ContigSize = %d Total = %d\n",
325 PacketType
, IPPacket
.ContigSize
, IPPacket
.TotalSize
));
327 switch (PacketType
) {
330 TI_DbgPrint(MID_TRACE
,("Received IP Packet\n"));
331 IPReceive(Adapter
->Context
, &IPPacket
);
334 TI_DbgPrint(MID_TRACE
,("Received ARP Packet\n"));
335 ARPReceive(Adapter
->Context
, &IPPacket
);
340 FreeNdisPacket( Packet
);
343 VOID
LanSubmitReceiveWork(
344 NDIS_HANDLE BindingContext
,
347 UINT BytesTransferred
) {
349 PLAN_ADAPTER Adapter
= (PLAN_ADAPTER
)BindingContext
;
352 TI_DbgPrint(DEBUG_DATALINK
,("called\n"));
354 WQItem
.Packet
= Packet
;
355 WQItem
.Adapter
= Adapter
;
356 WQItem
.BytesTransferred
= BytesTransferred
;
359 ( &LanWorkItem
, sizeof(LAN_WQ_ITEM
), LanReceiveWorker
, &WQItem
) )
363 VOID STDCALL
ProtocolTransferDataComplete(
364 NDIS_HANDLE BindingContext
,
367 UINT BytesTransferred
)
369 * FUNCTION: Called by NDIS to complete reception of data
371 * BindingContext = Pointer to a device context (LAN_ADAPTER)
372 * Packet = Pointer to a packet descriptor
373 * Status = Status of the operation
374 * BytesTransferred = Number of bytes transferred
376 * If the packet was successfully received, determine the protocol
377 * type and pass it to the correct receive handler
380 ASSERT(KeGetCurrentIrql() == DISPATCH_LEVEL
);
382 TI_DbgPrint(DEBUG_DATALINK
,("called\n"));
384 TransferDataCompleteCalled
++;
385 ASSERT(TransferDataCompleteCalled
<= TransferDataCalled
);
387 if( Status
!= NDIS_STATUS_SUCCESS
) return;
389 LanSubmitReceiveWork( BindingContext
, Packet
, Status
, BytesTransferred
);
392 NDIS_STATUS STDCALL
ProtocolReceive(
393 NDIS_HANDLE BindingContext
,
394 NDIS_HANDLE MacReceiveContext
,
396 UINT HeaderBufferSize
,
397 PVOID LookaheadBuffer
,
398 UINT LookaheadBufferSize
,
401 * FUNCTION: Called by NDIS when a packet has been received on the physical link
403 * BindingContext = Pointer to a device context (LAN_ADAPTER)
404 * MacReceiveContext = Handle used by underlying NIC driver
405 * HeaderBuffer = Pointer to a buffer containing the packet header
406 * HeaderBufferSize = Number of bytes in HeaderBuffer
407 * LookaheadBuffer = Pointer to a buffer containing buffered packet data
408 * LookaheadBufferSize = Size of LookaheadBuffer. May be less than asked for
409 * PacketSize = Overall size of the packet (not including header)
411 * Status of operation
415 UINT PacketType
, BytesTransferred
;
419 NDIS_STATUS NdisStatus
;
420 PNDIS_PACKET NdisPacket
;
421 PLAN_ADAPTER Adapter
= (PLAN_ADAPTER
)BindingContext
;
422 PETH_HEADER EHeader
= (PETH_HEADER
)HeaderBuffer
;
424 TI_DbgPrint(DEBUG_DATALINK
, ("Called. (packetsize %d)\n",PacketSize
));
426 if (Adapter
->State
!= LAN_STATE_STARTED
) {
427 TI_DbgPrint(DEBUG_DATALINK
, ("Adapter is stopped.\n"));
428 return NDIS_STATUS_NOT_ACCEPTED
;
431 if (HeaderBufferSize
< Adapter
->HeaderSize
) {
432 TI_DbgPrint(DEBUG_DATALINK
, ("Runt frame received.\n"));
433 return NDIS_STATUS_NOT_ACCEPTED
;
436 if (Adapter
->Media
== NdisMedium802_3
) {
437 /* Ethernet and IEEE 802.3 frames can be destinguished by
438 looking at the IEEE 802.3 length field. This field is
439 less than or equal to 1500 for a valid IEEE 802.3 frame
440 and larger than 1500 is it's a valid EtherType value.
441 See RFC 1122, section 2.3.3 for more information */
442 /* FIXME: Test for Ethernet and IEEE 802.3 frame */
443 if (((EType
= EHeader
->EType
) != ETYPE_IPv4
) && (EType
!= ETYPE_ARP
)) {
444 TI_DbgPrint(DEBUG_DATALINK
, ("Not IP or ARP frame. EtherType (0x%X).\n", EType
));
445 return NDIS_STATUS_NOT_ACCEPTED
;
447 /* We use EtherType constants to destinguish packet types */
450 TI_DbgPrint(MIN_TRACE
, ("Unsupported media.\n"));
451 /* FIXME: Support other medias */
452 return NDIS_STATUS_NOT_ACCEPTED
;
455 /* Get a transfer data packet */
457 TI_DbgPrint(DEBUG_DATALINK
, ("Adapter: %x (MTU %d)\n",
458 Adapter
, Adapter
->MTU
));
460 NdisStatus
= AllocatePacketWithBuffer( &NdisPacket
, NULL
,
461 PacketSize
+ HeaderBufferSize
);
462 if( NdisStatus
!= NDIS_STATUS_SUCCESS
) {
463 return NDIS_STATUS_NOT_ACCEPTED
;
466 PC(NdisPacket
)->PacketType
= PacketType
;
468 TI_DbgPrint(DEBUG_DATALINK
, ("pretransfer LookaheadBufferSize %d packsize %d\n",LookaheadBufferSize
,PacketSize
));
470 GetDataPtr( NdisPacket
, 0, &BufferData
, &temp
);
472 IPPacket
.NdisPacket
= NdisPacket
;
473 IPPacket
.Position
= 0;
475 TransferDataCalled
++;
477 if (LookaheadBufferSize
== PacketSize
)
479 /* Optimized code path for packets that are fully contained in
480 * the lookahead buffer. */
481 NdisCopyLookaheadData(BufferData
,
484 Adapter
->MacOptions
);
488 if (NdisStatus
== NDIS_STATUS_SUCCESS
)
490 ASSERT(PacketSize
<= Adapter
->MTU
);
492 NdisTransferData(&NdisStatus
, Adapter
->NdisHandle
,
493 MacReceiveContext
, 0, PacketSize
,
494 NdisPacket
, &BytesTransferred
);
498 BytesTransferred
= 0;
501 TI_DbgPrint(DEBUG_DATALINK
, ("Calling complete\n"));
503 if (NdisStatus
!= NDIS_STATUS_PENDING
)
504 ProtocolTransferDataComplete(BindingContext
,
509 TI_DbgPrint(DEBUG_DATALINK
, ("leaving\n"));
511 return NDIS_STATUS_SUCCESS
;
515 VOID STDCALL
ProtocolReceiveComplete(
516 NDIS_HANDLE BindingContext
)
518 * FUNCTION: Called by NDIS when we're done receiving data
520 * BindingContext = Pointer to a device context (LAN_ADAPTER)
523 TI_DbgPrint(DEBUG_DATALINK
, ("Called.\n"));
527 VOID STDCALL
ProtocolStatus(
528 NDIS_HANDLE BindingContext
,
529 NDIS_STATUS GenerelStatus
,
531 UINT StatusBufferSize
)
533 * FUNCTION: Called by NDIS when the underlying driver has changed state
535 * BindingContext = Pointer to a device context (LAN_ADAPTER)
536 * GenerelStatus = A generel status code
537 * StatusBuffer = Pointer to a buffer with medium-specific data
538 * StatusBufferSize = Number of bytes in StatusBuffer
541 TI_DbgPrint(DEBUG_DATALINK
, ("Called.\n"));
545 VOID STDCALL
ProtocolStatusComplete(
546 NDIS_HANDLE NdisBindingContext
)
548 * FUNCTION: Called by NDIS when a status-change has occurred
550 * BindingContext = Pointer to a device context (LAN_ADAPTER)
553 TI_DbgPrint(DEBUG_DATALINK
, ("Called.\n"));
556 VOID STDCALL
ProtocolBindAdapter(
557 OUT PNDIS_STATUS Status
,
558 IN NDIS_HANDLE BindContext
,
559 IN PNDIS_STRING DeviceName
,
560 IN PVOID SystemSpecific1
,
561 IN PVOID SystemSpecific2
)
563 * FUNCTION: Called by NDIS during NdisRegisterProtocol to set up initial
564 * bindings, and periodically thereafer as new adapters come online
566 * Status: Return value to NDIS
567 * BindContext: Handle provided by NDIS to track pending binding operations
568 * DeviceName: Name of the miniport device to bind to
569 * SystemSpecific1: Pointer to a registry path with protocol-specific configuration information
570 * SystemSpecific2: Unused & must not be touched
573 /* XXX confirm that this is still true, or re-word the following comment */
574 /* we get to ignore BindContext because we will never pend an operation with NDIS */
575 TI_DbgPrint(DEBUG_DATALINK
, ("Called with registry path %wZ for %wZ\n", SystemSpecific1
, DeviceName
));
576 *Status
= LANRegisterAdapter(DeviceName
, SystemSpecific1
);
582 PNDIS_PACKET NdisPacket
,
587 * FUNCTION: Transmits a packet
589 * Context = Pointer to context information (LAN_ADAPTER)
590 * NdisPacket = Pointer to NDIS packet to send
591 * Offset = Offset in packet where data starts
592 * LinkAddress = Pointer to link address of destination (NULL = broadcast)
593 * Type = LAN protocol type (LAN_PROTO_*)
596 NDIS_STATUS NdisStatus
;
601 PLAN_ADAPTER Adapter
= (PLAN_ADAPTER
)Context
;
603 TI_DbgPrint(DEBUG_DATALINK
,
604 ("Called( NdisPacket %x, Offset %d, Adapter %x )\n",
605 NdisPacket
, Offset
, Adapter
));
607 TI_DbgPrint(DEBUG_DATALINK
,
608 ("Adapter Address [%02x %02x %02x %02x %02x %02x]\n",
609 Adapter
->HWAddress
[0] & 0xff,
610 Adapter
->HWAddress
[1] & 0xff,
611 Adapter
->HWAddress
[2] & 0xff,
612 Adapter
->HWAddress
[3] & 0xff,
613 Adapter
->HWAddress
[4] & 0xff,
614 Adapter
->HWAddress
[5] & 0xff));
616 /* XXX arty -- Handled adjustment in a saner way than before ...
617 * not needed immediately */
618 GetDataPtr( NdisPacket
, 0, &Data
, &Size
);
620 LanChainCompletion( Adapter
, NdisPacket
);
622 if (Adapter
->State
== LAN_STATE_STARTED
) {
623 switch (Adapter
->Media
) {
624 case NdisMedium802_3
:
625 EHeader
= (PETH_HEADER
)Data
;
628 /* Unicast address */
629 RtlCopyMemory(EHeader
->DstAddr
, LinkAddress
, IEEE_802_ADDR_LENGTH
);
631 /* Broadcast address */
632 RtlFillMemory(EHeader
->DstAddr
, IEEE_802_ADDR_LENGTH
, 0xFF);
635 RtlCopyMemory(EHeader
->SrcAddr
, Adapter
->HWAddress
, IEEE_802_ADDR_LENGTH
);
639 EHeader
->EType
= ETYPE_IPv4
;
642 EHeader
->EType
= ETYPE_ARP
;
645 EHeader
->EType
= ETYPE_IPv6
;
649 /* Should not happen */
650 TI_DbgPrint(MIN_TRACE
, ("Unknown LAN protocol.\n"));
652 ProtocolSendComplete((NDIS_HANDLE
)Context
,
654 NDIS_STATUS_FAILURE
);
661 /* FIXME: Support other medias */
665 TI_DbgPrint( MID_TRACE
, ("LinkAddress: %x\n", LinkAddress
));
669 ("Link Address [%02x %02x %02x %02x %02x %02x]\n",
670 ((PCHAR
)LinkAddress
)[0] & 0xff,
671 ((PCHAR
)LinkAddress
)[1] & 0xff,
672 ((PCHAR
)LinkAddress
)[2] & 0xff,
673 ((PCHAR
)LinkAddress
)[3] & 0xff,
674 ((PCHAR
)LinkAddress
)[4] & 0xff,
675 ((PCHAR
)LinkAddress
)[5] & 0xff));
678 TcpipAcquireSpinLock( &Adapter
->Lock
, &OldIrql
);
679 TI_DbgPrint(MID_TRACE
, ("NdisSend\n"));
680 NdisSend(&NdisStatus
, Adapter
->NdisHandle
, NdisPacket
);
681 TI_DbgPrint(MID_TRACE
, ("NdisSend %s\n",
682 NdisStatus
== NDIS_STATUS_PENDING
?
683 "Pending" : "Complete"));
684 TcpipReleaseSpinLock( &Adapter
->Lock
, OldIrql
);
686 /* I had a talk with vizzini: these really ought to be here.
687 * we're supposed to see these completed by ndis *only* when
688 * status_pending is returned. Note that this is different from
689 * the situation with IRPs. */
690 if (NdisStatus
!= NDIS_STATUS_PENDING
)
691 ProtocolSendComplete((NDIS_HANDLE
)Context
, NdisPacket
, NdisStatus
);
693 ProtocolSendComplete((NDIS_HANDLE
)Context
, NdisPacket
, NDIS_STATUS_CLOSED
);
698 OpenRegistryKey( PNDIS_STRING RegistryPath
, PHANDLE RegHandle
) {
699 OBJECT_ATTRIBUTES Attributes
;
702 InitializeObjectAttributes(&Attributes
, RegistryPath
, OBJ_CASE_INSENSITIVE
, 0, 0);
703 Status
= ZwOpenKey(RegHandle
, KEY_ALL_ACCESS
, &Attributes
);
707 static NTSTATUS
ReadStringFromRegistry( HANDLE RegHandle
,
708 PWCHAR RegistryValue
,
709 PUNICODE_STRING String
) {
710 UNICODE_STRING ValueName
;
711 UNICODE_STRING UnicodeString
;
715 PKEY_VALUE_PARTIAL_INFORMATION Information
= (PKEY_VALUE_PARTIAL_INFORMATION
)buf
;
717 RtlInitUnicodeString(&ValueName
, RegistryValue
);
719 ZwQueryValueKey(RegHandle
,
721 KeyValuePartialInformation
,
726 if (!NT_SUCCESS(Status
))
728 /* IP address is stored as a REG_MULTI_SZ - we only pay attention to the first one though */
729 TI_DbgPrint(MIN_TRACE
, ("Information DataLength: 0x%x\n", Information
->DataLength
));
731 UnicodeString
.Buffer
= (PWCHAR
)&Information
->Data
;
732 UnicodeString
.Length
= Information
->DataLength
- sizeof(WCHAR
);
733 UnicodeString
.MaximumLength
= Information
->DataLength
;
736 (PWCHAR
)exAllocatePool( NonPagedPool
,
737 UnicodeString
.MaximumLength
+ sizeof(WCHAR
) );
739 if( !String
->Buffer
) return STATUS_NO_MEMORY
;
741 String
->MaximumLength
= UnicodeString
.MaximumLength
;
742 RtlCopyUnicodeString( String
, &UnicodeString
);
744 return STATUS_SUCCESS
;
748 * Utility to copy and append two unicode strings.
750 * IN OUT PUNICODE_STRING ResultFirst -> First string and result
751 * IN PUNICODE_STRING Second -> Second string to append
752 * IN BOOL Deallocate -> TRUE: Deallocate First string before
758 NTSTATUS NTAPI
AppendUnicodeString(PUNICODE_STRING ResultFirst
,
759 PUNICODE_STRING Second
,
762 UNICODE_STRING Ustr
= *ResultFirst
;
763 PWSTR new_string
= ExAllocatePoolWithTag
765 (ResultFirst
->Length
+ Second
->Length
+ sizeof(WCHAR
)), TAG_STRING
);
767 return STATUS_NO_MEMORY
;
769 memcpy( new_string
, ResultFirst
->Buffer
, ResultFirst
->Length
);
770 memcpy( new_string
+ ResultFirst
->Length
/ sizeof(WCHAR
),
771 Second
->Buffer
, Second
->Length
);
772 if( Deallocate
) RtlFreeUnicodeString(ResultFirst
);
773 ResultFirst
->Length
= Ustr
.Length
+ Second
->Length
;
774 ResultFirst
->MaximumLength
= ResultFirst
->Length
;
775 new_string
[ResultFirst
->Length
/ sizeof(WCHAR
)] = 0;
776 Status
= RtlCreateUnicodeString(ResultFirst
,new_string
) ?
777 STATUS_SUCCESS
: STATUS_NO_MEMORY
;
778 ExFreePool(new_string
);
782 static NTSTATUS
CheckForDeviceDesc( PUNICODE_STRING EnumKeyName
,
783 PUNICODE_STRING TargetKeyName
,
784 PUNICODE_STRING ShortName
,
785 PUNICODE_STRING OutName
) {
786 UNICODE_STRING RootDevice
= { 0 }, LinkageKeyName
= { 0 };
787 UNICODE_STRING DescKeyName
= { 0 }, Linkage
= { 0 };
788 UNICODE_STRING BackSlash
= { 0 };
789 HANDLE DescKey
= NULL
, LinkageKey
= NULL
;
792 TI_DbgPrint(DEBUG_DATALINK
,("EnumKeyName %wZ\n", EnumKeyName
));
794 RtlInitUnicodeString(&BackSlash
, L
"\\");
795 RtlInitUnicodeString(&Linkage
, L
"\\Linkage");
797 RtlInitUnicodeString(&DescKeyName
, L
"");
798 AppendUnicodeString( &DescKeyName
, EnumKeyName
, FALSE
);
799 AppendUnicodeString( &DescKeyName
, &BackSlash
, TRUE
);
800 AppendUnicodeString( &DescKeyName
, TargetKeyName
, TRUE
);
802 RtlInitUnicodeString(&LinkageKeyName
, L
"");
803 AppendUnicodeString( &LinkageKeyName
, &DescKeyName
, FALSE
);
804 AppendUnicodeString( &LinkageKeyName
, &Linkage
, TRUE
);
806 Status
= OpenRegistryKey( &LinkageKeyName
, &LinkageKey
);
807 if( !NT_SUCCESS(Status
) ) goto cleanup
;
809 Status
= ReadStringFromRegistry( LinkageKey
, L
"RootDevice", &RootDevice
);
810 if( !NT_SUCCESS(Status
) ) goto cleanup
;
812 if( RtlCompareUnicodeString( &RootDevice
, ShortName
, TRUE
) == 0 ) {
813 Status
= OpenRegistryKey( &DescKeyName
, &DescKey
);
814 if( !NT_SUCCESS(Status
) ) goto cleanup
;
816 Status
= ReadStringFromRegistry( DescKey
, L
"DriverDesc", OutName
);
817 if( !NT_SUCCESS(Status
) ) goto cleanup
;
819 TI_DbgPrint(DEBUG_DATALINK
,("ADAPTER NAME: %wZ\n", OutName
));
820 } else Status
= STATUS_UNSUCCESSFUL
;
823 RtlFreeUnicodeString( &RootDevice
);
824 RtlFreeUnicodeString( &LinkageKeyName
);
825 RtlFreeUnicodeString( &DescKeyName
);
826 if( LinkageKey
) NtClose( LinkageKey
);
827 if( DescKey
) NtClose( DescKey
);
829 TI_DbgPrint(DEBUG_DATALINK
,("Returning %x\n", Status
));
834 static NTSTATUS
FindDeviceNameForAdapter( PUNICODE_STRING ShortName
,
835 PUNICODE_STRING OutName
) {
836 UNICODE_STRING EnumKeyName
, TargetKeyName
;
840 KEY_BASIC_INFORMATION
*Kbio
=
841 ExAllocatePool(NonPagedPool
, sizeof(KEY_BASIC_INFORMATION
));
842 ULONG KbioLength
= sizeof(KEY_BASIC_INFORMATION
), ResultLength
;
845 (&EnumKeyName
, CCS_ROOT L
"\\Control\\Class\\" TCPIP_GUID
);
847 Status
= OpenRegistryKey( &EnumKeyName
, &EnumKey
);
849 if( !NT_SUCCESS(Status
) )
850 TI_DbgPrint(DEBUG_DATALINK
,("Couldn't open Enum key %wZ: %x\n",
851 &EnumKeyName
, Status
));
853 for( i
= 0; NT_SUCCESS(Status
); i
++ ) {
854 Status
= ZwEnumerateKey( EnumKey
, i
, KeyBasicInformation
,
855 Kbio
, KbioLength
, &ResultLength
);
857 if( Status
== STATUS_BUFFER_TOO_SMALL
) {
859 KbioLength
= ResultLength
;
860 Kbio
= ExAllocatePool( NonPagedPool
, KbioLength
);
862 Status
= ZwEnumerateKey( EnumKey
, i
, KeyBasicInformation
,
863 Kbio
, KbioLength
, &ResultLength
);
865 TI_DbgPrint(DEBUG_DATALINK
,("Couldn't enum key child %d\n", i
));
869 if( NT_SUCCESS(Status
) ) {
870 TargetKeyName
.Length
= TargetKeyName
.MaximumLength
=
872 TargetKeyName
.Buffer
= Kbio
->Name
;
874 Status
= CheckForDeviceDesc
875 ( &EnumKeyName
, &TargetKeyName
, ShortName
, OutName
);
876 if( NT_SUCCESS(Status
) ) {
879 } else Status
= STATUS_SUCCESS
;
883 RtlInitUnicodeString( OutName
, L
"" );
884 AppendUnicodeString( OutName
, &TargetKeyName
, FALSE
);
886 return STATUS_UNSUCCESSFUL
;
889 VOID
GetShortName( PUNICODE_STRING RegistryKey
,
890 PUNICODE_STRING ShortNameOut
) {
892 ShortNameOut
->Buffer
=
893 RegistryKey
->Buffer
+ wcslen(CCS_ROOT L
"\\Services\\");
894 Ptr
= ShortNameOut
->Buffer
;
896 while( *Ptr
!= L
'\\' &&
897 ((PCHAR
)Ptr
) < ((PCHAR
)RegistryKey
->Buffer
) + RegistryKey
->Length
)
900 ShortNameOut
->Length
= ShortNameOut
->MaximumLength
=
901 (Ptr
- ShortNameOut
->Buffer
) * sizeof(WCHAR
);
905 PLAN_ADAPTER Adapter
,
906 PNDIS_STRING RegistryPath
)
908 * FUNCTION: Binds a LAN adapter to IP layer
910 * Adapter = Pointer to LAN_ADAPTER structure
912 * We set the lookahead buffer size, set the packet filter and
913 * bind the adapter to IP layer
917 NDIS_STATUS NdisStatus
;
918 LLIP_BIND_INFO BindInfo
;
919 IP_ADDRESS DefaultMask
= { 0 };
920 ULONG Lookahead
= LOOKAHEAD_SIZE
;
922 HANDLE RegHandle
= 0;
923 UNICODE_STRING ShortName
;
925 TI_DbgPrint(DEBUG_DATALINK
, ("Called.\n"));
927 Adapter
->State
= LAN_STATE_OPENING
;
929 GetShortName( RegistryPath
, &ShortName
);
931 NdisStatus
= NDISCall(Adapter
,
932 NdisRequestSetInformation
,
933 OID_GEN_CURRENT_LOOKAHEAD
,
936 if (NdisStatus
!= NDIS_STATUS_SUCCESS
) {
937 TI_DbgPrint(DEBUG_DATALINK
, ("Could not set lookahead buffer size (0x%X).\n", NdisStatus
));
941 /* Bind the adapter to IP layer */
942 BindInfo
.Context
= Adapter
;
943 BindInfo
.HeaderSize
= Adapter
->HeaderSize
;
944 BindInfo
.MinFrameSize
= Adapter
->MinFrameSize
;
945 BindInfo
.MTU
= Adapter
->MTU
;
946 BindInfo
.Address
= (PUCHAR
)&Adapter
->HWAddress
;
947 BindInfo
.AddressLength
= Adapter
->HWAddressLength
;
948 BindInfo
.Transmit
= LANTransmit
;
950 IF
= IPCreateInterface(&BindInfo
);
953 TI_DbgPrint(MIN_TRACE
, ("Insufficient resources.\n"));
958 * Query per-adapter configuration from the registry
959 * In case anyone is curious: there *is* an Ndis configuration api
960 * for this sort of thing, but it doesn't really support things like
961 * REG_MULTI_SZ very well, and there is a note in the DDK that says that
962 * protocol drivers developed for win2k and above just use the native
963 * services (ZwOpenKey, etc).
966 Status
= OpenRegistryKey( RegistryPath
, &RegHandle
);
968 if(NT_SUCCESS(Status
)) {
969 Status
= FindDeviceNameForAdapter( &ShortName
, &IF
->Name
);
970 TI_DbgPrint(DEBUG_DATALINK
,("Adapter Name: %wZ\n", &IF
->Name
));
973 DefaultMask
.Type
= IP_ADDRESS_V4
;
975 IF
->Unicast
= DefaultMask
;
976 IF
->Netmask
= DefaultMask
;
978 IF
->Broadcast
.Type
= IP_ADDRESS_V4
;
979 IF
->Broadcast
.Address
.IPv4Address
=
980 IF
->Unicast
.Address
.IPv4Address
|
981 ~IF
->Netmask
.Address
.IPv4Address
;
983 TI_DbgPrint(DEBUG_DATALINK
,("BCAST(IF) %s\n", A2S(&IF
->Broadcast
)));
985 /* Get maximum link speed */
986 NdisStatus
= NDISCall(Adapter
,
987 NdisRequestQueryInformation
,
992 if( !NT_SUCCESS(NdisStatus
) )
993 IF
->Speed
= IP_DEFAULT_LINK_SPEED
;
995 /* Register interface with IP layer */
996 IPRegisterInterface(IF
);
998 /* Set packet filter so we can send and receive packets */
999 NdisStatus
= NDISCall(Adapter
,
1000 NdisRequestSetInformation
,
1001 OID_GEN_CURRENT_PACKET_FILTER
,
1002 &Adapter
->PacketFilter
,
1005 if (NdisStatus
!= NDIS_STATUS_SUCCESS
) {
1006 TI_DbgPrint(DEBUG_DATALINK
, ("Could not set packet filter (0x%X).\n", NdisStatus
));
1007 IPDestroyInterface(IF
);
1011 Adapter
->Context
= IF
;
1012 Adapter
->State
= LAN_STATE_STARTED
;
1017 PLAN_ADAPTER Adapter
)
1019 * FUNCTION: Unbinds a LAN adapter from IP layer
1021 * Adapter = Pointer to LAN_ADAPTER structure
1024 TI_DbgPrint(DEBUG_DATALINK
, ("Called.\n"));
1026 if (Adapter
->State
== LAN_STATE_STARTED
) {
1027 PIP_INTERFACE IF
= Adapter
->Context
;
1029 IPUnregisterInterface(IF
);
1031 IPDestroyInterface(IF
);
1036 NDIS_STATUS
LANRegisterAdapter(
1037 PNDIS_STRING AdapterName
,
1038 PNDIS_STRING RegistryPath
)
1040 * FUNCTION: Registers protocol with an NDIS adapter
1042 * AdapterName = Pointer to string with name of adapter to register
1043 * Adapter = Address of pointer to a LAN_ADAPTER structure
1045 * Status of operation
1049 NDIS_STATUS NdisStatus
;
1050 NDIS_STATUS OpenStatus
;
1052 NDIS_MEDIUM MediaArray
[MAX_MEDIA
];
1056 TI_DbgPrint(DEBUG_DATALINK
, ("Called.\n"));
1058 IF
= exAllocatePool(NonPagedPool
, sizeof(LAN_ADAPTER
));
1060 TI_DbgPrint(MIN_TRACE
, ("Insufficient resources.\n"));
1061 return NDIS_STATUS_RESOURCES
;
1064 RtlZeroMemory(IF
, sizeof(LAN_ADAPTER
));
1066 /* Put adapter in stopped state */
1067 IF
->State
= LAN_STATE_STOPPED
;
1069 /* Initialize protecting spin lock */
1070 KeInitializeSpinLock(&IF
->Lock
);
1072 KeInitializeEvent(&IF
->Event
, SynchronizationEvent
, FALSE
);
1074 /* Initialize array with media IDs we support */
1075 MediaArray
[MEDIA_ETH
] = NdisMedium802_3
;
1077 TI_DbgPrint(DEBUG_DATALINK
,("opening adapter %wZ\n", AdapterName
));
1078 /* Open the adapter. */
1079 NdisOpenAdapter(&NdisStatus
,
1091 /* Wait until the adapter is opened */
1092 if (NdisStatus
== NDIS_STATUS_PENDING
)
1093 KeWaitForSingleObject(&IF
->Event
, UserRequest
, KernelMode
, FALSE
, NULL
);
1094 else if (NdisStatus
!= NDIS_STATUS_SUCCESS
) {
1099 IF
->Media
= MediaArray
[MediaIndex
];
1101 /* Fill LAN_ADAPTER structure with some adapter specific information */
1102 switch (IF
->Media
) {
1103 case NdisMedium802_3
:
1104 IF
->HWAddressLength
= IEEE_802_ADDR_LENGTH
;
1105 IF
->BCastMask
= BCAST_ETH_MASK
;
1106 IF
->BCastCheck
= BCAST_ETH_CHECK
;
1107 IF
->BCastOffset
= BCAST_ETH_OFFSET
;
1108 IF
->HeaderSize
= sizeof(ETH_HEADER
);
1109 IF
->MinFrameSize
= 60;
1110 AddressOID
= OID_802_3_CURRENT_ADDRESS
;
1112 NDIS_PACKET_TYPE_BROADCAST
|
1113 NDIS_PACKET_TYPE_DIRECTED
|
1114 NDIS_PACKET_TYPE_MULTICAST
;
1118 /* Unsupported media */
1119 TI_DbgPrint(MIN_TRACE
, ("Unsupported media.\n"));
1121 return NDIS_STATUS_NOT_SUPPORTED
;
1124 /* Get maximum frame size */
1125 NdisStatus
= NDISCall(IF
,
1126 NdisRequestQueryInformation
,
1127 OID_GEN_MAXIMUM_FRAME_SIZE
,
1130 if (NdisStatus
!= NDIS_STATUS_SUCCESS
) {
1135 /* Get maximum packet size */
1136 NdisStatus
= NDISCall(IF
,
1137 NdisRequestQueryInformation
,
1138 OID_GEN_MAXIMUM_TOTAL_SIZE
,
1141 if (NdisStatus
!= NDIS_STATUS_SUCCESS
) {
1142 TI_DbgPrint(MIN_TRACE
, ("Query for maximum packet size failed.\n"));
1147 /* Get maximum number of packets we can pass to NdisSend(Packets) at one time */
1148 NdisStatus
= NDISCall(IF
,
1149 NdisRequestQueryInformation
,
1150 OID_GEN_MAXIMUM_SEND_PACKETS
,
1151 &IF
->MaxSendPackets
,
1153 if (NdisStatus
!= NDIS_STATUS_SUCCESS
)
1154 /* Legacy NIC drivers may not support this query, if it fails we
1155 assume it can send at least one packet per call to NdisSend(Packets) */
1156 IF
->MaxSendPackets
= 1;
1158 /* Get current hardware address */
1159 NdisStatus
= NDISCall(IF
,
1160 NdisRequestQueryInformation
,
1163 IF
->HWAddressLength
);
1164 if (NdisStatus
!= NDIS_STATUS_SUCCESS
) {
1165 TI_DbgPrint(MIN_TRACE
, ("Query for current hardware address failed.\n"));
1170 /* Get maximum link speed */
1171 NdisStatus
= NDISCall(IF
,
1172 NdisRequestQueryInformation
,
1176 if (NdisStatus
!= NDIS_STATUS_SUCCESS
) {
1177 TI_DbgPrint(MIN_TRACE
, ("Query for maximum link speed failed.\n"));
1182 /* Convert returned link speed to bps (it is in 100bps increments) */
1183 IF
->Speed
= Speed
* 100L;
1185 /* Add adapter to the adapter list */
1186 ExInterlockedInsertTailList(&AdapterListHead
,
1190 /* Bind adapter to IP layer */
1191 BindAdapter(IF
, RegistryPath
);
1193 TI_DbgPrint(DEBUG_DATALINK
, ("Leaving.\n"));
1195 return NDIS_STATUS_SUCCESS
;
1199 NDIS_STATUS
LANUnregisterAdapter(
1200 PLAN_ADAPTER Adapter
)
1202 * FUNCTION: Unregisters protocol with NDIS adapter
1204 * Adapter = Pointer to a LAN_ADAPTER structure
1206 * Status of operation
1210 NDIS_HANDLE NdisHandle
;
1211 NDIS_STATUS NdisStatus
= NDIS_STATUS_SUCCESS
;
1213 TI_DbgPrint(DEBUG_DATALINK
, ("Called.\n"));
1215 /* Unlink the adapter from the list */
1216 RemoveEntryList(&Adapter
->ListEntry
);
1218 /* Unbind adapter from IP layer */
1219 UnbindAdapter(Adapter
);
1221 TcpipAcquireSpinLock(&Adapter
->Lock
, &OldIrql
);
1222 NdisHandle
= Adapter
->NdisHandle
;
1224 Adapter
->NdisHandle
= NULL
;
1225 TcpipReleaseSpinLock(&Adapter
->Lock
, OldIrql
);
1227 NdisCloseAdapter(&NdisStatus
, NdisHandle
);
1228 if (NdisStatus
== NDIS_STATUS_PENDING
) {
1229 TcpipWaitForSingleObject(&Adapter
->Event
,
1234 NdisStatus
= Adapter
->NdisStatus
;
1237 TcpipReleaseSpinLock(&Adapter
->Lock
, OldIrql
);
1239 FreeAdapter(Adapter
);
1241 return NDIS_STATUS_SUCCESS
;
1245 NTSTATUS
LANRegisterProtocol(
1248 * FUNCTION: Registers this protocol driver with NDIS
1250 * Name = Name of this protocol driver
1252 * Status of operation
1255 NDIS_STATUS NdisStatus
;
1256 NDIS_PROTOCOL_CHARACTERISTICS ProtChars
;
1258 TI_DbgPrint(DEBUG_DATALINK
, ("Called.\n"));
1260 InitializeListHead(&AdapterListHead
);
1261 KeInitializeSpinLock(&AdapterListLock
);
1263 /* Set up protocol characteristics */
1264 RtlZeroMemory(&ProtChars
, sizeof(NDIS_PROTOCOL_CHARACTERISTICS
));
1265 ProtChars
.MajorNdisVersion
= NDIS_VERSION_MAJOR
;
1266 ProtChars
.MinorNdisVersion
= NDIS_VERSION_MINOR
;
1267 ProtChars
.Name
.Length
= Name
->Length
;
1268 ProtChars
.Name
.Buffer
= Name
->Buffer
;
1269 ProtChars
.Name
.MaximumLength
= Name
->MaximumLength
;
1270 ProtChars
.OpenAdapterCompleteHandler
= ProtocolOpenAdapterComplete
;
1271 ProtChars
.CloseAdapterCompleteHandler
= ProtocolCloseAdapterComplete
;
1272 ProtChars
.ResetCompleteHandler
= ProtocolResetComplete
;
1273 ProtChars
.RequestCompleteHandler
= ProtocolRequestComplete
;
1274 ProtChars
.SendCompleteHandler
= ProtocolSendComplete
;
1275 ProtChars
.TransferDataCompleteHandler
= ProtocolTransferDataComplete
;
1276 ProtChars
.ReceiveHandler
= ProtocolReceive
;
1277 ProtChars
.ReceiveCompleteHandler
= ProtocolReceiveComplete
;
1278 ProtChars
.StatusHandler
= ProtocolStatus
;
1279 ProtChars
.StatusCompleteHandler
= ProtocolStatusComplete
;
1280 ProtChars
.BindAdapterHandler
= ProtocolBindAdapter
;
1282 /* Try to register protocol */
1283 NdisRegisterProtocol(&NdisStatus
,
1284 &NdisProtocolHandle
,
1286 sizeof(NDIS_PROTOCOL_CHARACTERISTICS
));
1287 if (NdisStatus
!= NDIS_STATUS_SUCCESS
)
1289 TI_DbgPrint(DEBUG_DATALINK
, ("NdisRegisterProtocol failed, status 0x%x\n", NdisStatus
));
1290 return (NTSTATUS
)NdisStatus
;
1293 ProtocolRegistered
= TRUE
;
1295 return STATUS_SUCCESS
;
1299 VOID
LANUnregisterProtocol(
1302 * FUNCTION: Unregisters this protocol driver with NDIS
1303 * NOTES: Does not care wether we are already registered
1306 TI_DbgPrint(DEBUG_DATALINK
, ("Called.\n"));
1308 if (ProtocolRegistered
) {
1309 NDIS_STATUS NdisStatus
;
1310 PLIST_ENTRY CurrentEntry
;
1311 PLIST_ENTRY NextEntry
;
1312 PLAN_ADAPTER Current
;
1315 TcpipAcquireSpinLock(&AdapterListLock
, &OldIrql
);
1317 /* Search the list and remove every adapter we find */
1318 CurrentEntry
= AdapterListHead
.Flink
;
1319 while (CurrentEntry
!= &AdapterListHead
) {
1320 NextEntry
= CurrentEntry
->Flink
;
1321 Current
= CONTAINING_RECORD(CurrentEntry
, LAN_ADAPTER
, ListEntry
);
1323 LANUnregisterAdapter(Current
);
1324 CurrentEntry
= NextEntry
;
1327 TcpipReleaseSpinLock(&AdapterListLock
, OldIrql
);
1329 NdisDeregisterProtocol(&NdisStatus
, NdisProtocolHandle
);
1330 ProtocolRegistered
= FALSE
;
1335 InitializeListHead( &LanSendCompleteList
);
1336 KeInitializeSpinLock( &LanSendCompleteLock
);
1339 VOID
LANShutdown() {
1341 PLAN_WQ_ITEM WorkItem
;
1342 PLIST_ENTRY ListEntry
;
1344 KeAcquireSpinLock( &LanSendCompleteLock
, &OldIrql
);
1345 while( !IsListEmpty( &LanSendCompleteList
) ) {
1346 ListEntry
= RemoveHeadList( &LanSendCompleteList
);
1347 WorkItem
= CONTAINING_RECORD(ListEntry
, LAN_WQ_ITEM
, ListEntry
);
1348 FreeNdisPacket( WorkItem
->Packet
);
1349 ExFreePool( WorkItem
);
1351 KeReleaseSpinLock( &LanSendCompleteLock
, OldIrql
);