- Remove some debug info that I forgot about
[reactos.git] / reactos / drivers / network / tcpip / datalink / lan.c
1 /*
2 * COPYRIGHT: See COPYING in the top level directory
3 * PROJECT: ReactOS TCP/IP protocol driver
4 * FILE: datalink/lan.c
5 * PURPOSE: Local Area Network media routines
6 * PROGRAMMERS: Casper S. Hornstrup (chorns@users.sourceforge.net)
7 * REVISIONS:
8 * CSH 01/08-2000 Created
9 */
10
11 #include "precomp.h"
12
13 UINT TransferDataCalled = 0;
14 UINT TransferDataCompleteCalled = 0;
15 UINT LanReceiveWorkerCalled = 0;
16 BOOLEAN LanReceiveWorkerBusy = FALSE;
17
18 #define CCS_ROOT L"\\Registry\\Machine\\SYSTEM\\CurrentControlSet"
19 #define TCPIP_GUID L"{4D36E972-E325-11CE-BFC1-08002BE10318}"
20
21 #define NGFP(_Packet) \
22 { \
23 PVOID _Header; \
24 ULONG _ContigSize, _TotalSize; \
25 PNDIS_BUFFER _NdisBuffer; \
26 \
27 TI_DbgPrint(MID_TRACE,("Checking Packet %x\n", _Packet)); \
28 NdisGetFirstBufferFromPacket(_Packet, \
29 &_NdisBuffer, \
30 &_Header, \
31 &_ContigSize, \
32 &_TotalSize); \
33 TI_DbgPrint(MID_TRACE,("NdisBuffer: %x\n", _NdisBuffer)); \
34 TI_DbgPrint(MID_TRACE,("Header : %x\n", _Header)); \
35 TI_DbgPrint(MID_TRACE,("ContigSize: %x\n", _ContigSize)); \
36 TI_DbgPrint(MID_TRACE,("TotalSize : %x\n", _TotalSize)); \
37 }
38
39 typedef struct _LAN_WQ_ITEM {
40 LIST_ENTRY ListEntry;
41 PNDIS_PACKET Packet;
42 PLAN_ADAPTER Adapter;
43 UINT BytesTransferred;
44 } LAN_WQ_ITEM, *PLAN_WQ_ITEM;
45
46 NDIS_HANDLE NdisProtocolHandle = (NDIS_HANDLE)NULL;
47 BOOLEAN ProtocolRegistered = FALSE;
48 LIST_ENTRY AdapterListHead;
49 KSPIN_LOCK AdapterListLock;
50
51 NDIS_STATUS NDISCall(
52 PLAN_ADAPTER Adapter,
53 NDIS_REQUEST_TYPE Type,
54 NDIS_OID OID,
55 PVOID Buffer,
56 UINT Length)
57 /*
58 * FUNCTION: Send a request to NDIS
59 * ARGUMENTS:
60 * Adapter = Pointer to a LAN_ADAPTER structure
61 * Type = Type of request (Set or Query)
62 * OID = Value to be set/queried for
63 * Buffer = Pointer to a buffer to use
64 * Length = Number of bytes in Buffer
65 * RETURNS:
66 * Status of operation
67 */
68 {
69 NDIS_REQUEST Request;
70 NDIS_STATUS NdisStatus;
71
72 Request.RequestType = Type;
73 if (Type == NdisRequestSetInformation) {
74 Request.DATA.SET_INFORMATION.Oid = OID;
75 Request.DATA.SET_INFORMATION.InformationBuffer = Buffer;
76 Request.DATA.SET_INFORMATION.InformationBufferLength = Length;
77 } else {
78 Request.DATA.QUERY_INFORMATION.Oid = OID;
79 Request.DATA.QUERY_INFORMATION.InformationBuffer = Buffer;
80 Request.DATA.QUERY_INFORMATION.InformationBufferLength = Length;
81 }
82
83 if (Adapter->State != LAN_STATE_RESETTING) {
84 NdisRequest(&NdisStatus, Adapter->NdisHandle, &Request);
85 } else {
86 NdisStatus = NDIS_STATUS_NOT_ACCEPTED;
87 }
88
89 /* Wait for NDIS to complete the request */
90 if (NdisStatus == NDIS_STATUS_PENDING) {
91 KeWaitForSingleObject(&Adapter->Event,
92 UserRequest,
93 KernelMode,
94 FALSE,
95 NULL);
96 NdisStatus = Adapter->NdisStatus;
97 }
98
99 return NdisStatus;
100 }
101
102
103 VOID FreeAdapter(
104 PLAN_ADAPTER Adapter)
105 /*
106 * FUNCTION: Frees memory for a LAN_ADAPTER structure
107 * ARGUMENTS:
108 * Adapter = Pointer to LAN_ADAPTER structure to free
109 */
110 {
111 ExFreePoolWithTag(Adapter, LAN_ADAPTER_TAG);
112 }
113
114
115 NTSTATUS TcpipLanGetDwordOid
116 ( PIP_INTERFACE Interface,
117 NDIS_OID Oid,
118 PULONG Result ) {
119 /* Get maximum frame size */
120 if( Interface->Context ) {
121 return NDISCall((PLAN_ADAPTER)Interface->Context,
122 NdisRequestQueryInformation,
123 Oid,
124 Result,
125 sizeof(ULONG));
126 } else switch( Oid ) { /* Loopback Case */
127 case OID_GEN_HARDWARE_STATUS:
128 *Result = NdisHardwareStatusReady;
129 return STATUS_SUCCESS;
130
131 default:
132 return STATUS_INVALID_PARAMETER;
133 }
134 }
135
136
137 VOID NTAPI ProtocolOpenAdapterComplete(
138 NDIS_HANDLE BindingContext,
139 NDIS_STATUS Status,
140 NDIS_STATUS OpenErrorStatus)
141 /*
142 * FUNCTION: Called by NDIS to complete opening of an adapter
143 * ARGUMENTS:
144 * BindingContext = Pointer to a device context (LAN_ADAPTER)
145 * Status = Status of the operation
146 * OpenErrorStatus = Additional status information
147 */
148 {
149 PLAN_ADAPTER Adapter = (PLAN_ADAPTER)BindingContext;
150
151 TI_DbgPrint(DEBUG_DATALINK, ("Called.\n"));
152
153 Adapter->NdisStatus = Status;
154
155 KeSetEvent(&Adapter->Event, 0, FALSE);
156 }
157
158
159 VOID NTAPI ProtocolCloseAdapterComplete(
160 NDIS_HANDLE BindingContext,
161 NDIS_STATUS Status)
162 /*
163 * FUNCTION: Called by NDIS to complete closing an adapter
164 * ARGUMENTS:
165 * BindingContext = Pointer to a device context (LAN_ADAPTER)
166 * Status = Status of the operation
167 */
168 {
169 PLAN_ADAPTER Adapter = (PLAN_ADAPTER)BindingContext;
170
171 TI_DbgPrint(DEBUG_DATALINK, ("Called.\n"));
172
173 Adapter->NdisStatus = Status;
174
175 KeSetEvent(&Adapter->Event, 0, FALSE);
176 }
177
178
179 VOID NTAPI ProtocolResetComplete(
180 NDIS_HANDLE BindingContext,
181 NDIS_STATUS Status)
182 /*
183 * FUNCTION: Called by NDIS to complete resetting an adapter
184 * ARGUMENTS:
185 * BindingContext = Pointer to a device context (LAN_ADAPTER)
186 * Status = Status of the operation
187 */
188 {
189 PLAN_ADAPTER Adapter = (PLAN_ADAPTER)BindingContext;
190
191 TI_DbgPrint(DEBUG_DATALINK, ("Called.\n"));
192
193 Adapter->NdisStatus = Status;
194
195 KeSetEvent(&Adapter->Event, 0, FALSE);
196 }
197
198
199 VOID NTAPI ProtocolRequestComplete(
200 NDIS_HANDLE BindingContext,
201 PNDIS_REQUEST NdisRequest,
202 NDIS_STATUS Status)
203 /*
204 * FUNCTION: Called by NDIS to complete a request
205 * ARGUMENTS:
206 * BindingContext = Pointer to a device context (LAN_ADAPTER)
207 * NdisRequest = Pointer to an object describing the request
208 * Status = Status of the operation
209 */
210 {
211 PLAN_ADAPTER Adapter = (PLAN_ADAPTER)BindingContext;
212
213 TI_DbgPrint(DEBUG_DATALINK, ("Called.\n"));
214
215 /* Save status of request and signal an event */
216 Adapter->NdisStatus = Status;
217
218 KeSetEvent(&Adapter->Event, 0, FALSE);
219 }
220
221
222 VOID NTAPI ProtocolSendComplete(
223 NDIS_HANDLE BindingContext,
224 PNDIS_PACKET Packet,
225 NDIS_STATUS Status)
226 /*
227 * FUNCTION: Called by NDIS to complete sending process
228 * ARGUMENTS:
229 * BindingContext = Pointer to a device context (LAN_ADAPTER)
230 * Packet = Pointer to a packet descriptor
231 * Status = Status of the operation
232 */
233 {
234 FreeNdisPacket(Packet);
235 }
236
237 VOID LanReceiveWorker( PVOID Context ) {
238 UINT PacketType;
239 PLAN_WQ_ITEM WorkItem = (PLAN_WQ_ITEM)Context;
240 PNDIS_PACKET Packet;
241 PLAN_ADAPTER Adapter;
242 UINT BytesTransferred;
243 PNDIS_BUFFER NdisBuffer;
244 IP_PACKET IPPacket;
245
246 TI_DbgPrint(DEBUG_DATALINK, ("Called.\n"));
247
248 Packet = WorkItem->Packet;
249 Adapter = WorkItem->Adapter;
250 BytesTransferred = WorkItem->BytesTransferred;
251
252 ExFreePoolWithTag(WorkItem, WQ_CONTEXT_TAG);
253
254 IPInitializePacket(&IPPacket, 0);
255
256 IPPacket.NdisPacket = Packet;
257
258 NdisGetFirstBufferFromPacket(Packet,
259 &NdisBuffer,
260 &IPPacket.Header,
261 &IPPacket.ContigSize,
262 &IPPacket.TotalSize);
263
264 IPPacket.ContigSize = IPPacket.TotalSize = BytesTransferred;
265 /* Determine which upper layer protocol that should receive
266 this packet and pass it to the correct receive handler */
267
268 TI_DbgPrint(MID_TRACE,
269 ("ContigSize: %d, TotalSize: %d, BytesTransferred: %d\n",
270 IPPacket.ContigSize, IPPacket.TotalSize,
271 BytesTransferred));
272
273 PacketType = PC(IPPacket.NdisPacket)->PacketType;
274 IPPacket.Position = 0;
275
276 TI_DbgPrint
277 (DEBUG_DATALINK,
278 ("Ether Type = %x ContigSize = %d Total = %d\n",
279 PacketType, IPPacket.ContigSize, IPPacket.TotalSize));
280
281 switch (PacketType) {
282 case ETYPE_IPv4:
283 case ETYPE_IPv6:
284 TI_DbgPrint(MID_TRACE,("Received IP Packet\n"));
285 IPReceive(Adapter->Context, &IPPacket);
286 break;
287 case ETYPE_ARP:
288 TI_DbgPrint(MID_TRACE,("Received ARP Packet\n"));
289 ARPReceive(Adapter->Context, &IPPacket);
290 default:
291 IPPacket.Free(&IPPacket);
292 break;
293 }
294
295 FreeNdisPacket( Packet );
296 }
297
298 VOID LanSubmitReceiveWork(
299 NDIS_HANDLE BindingContext,
300 PNDIS_PACKET Packet,
301 NDIS_STATUS Status,
302 UINT BytesTransferred) {
303 PLAN_WQ_ITEM WQItem = ExAllocatePoolWithTag(NonPagedPool, sizeof(LAN_WQ_ITEM),
304 WQ_CONTEXT_TAG);
305 PLAN_ADAPTER Adapter = (PLAN_ADAPTER)BindingContext;
306
307 TI_DbgPrint(DEBUG_DATALINK,("called\n"));
308
309 if (!WQItem) return;
310
311 WQItem->Packet = Packet;
312 WQItem->Adapter = Adapter;
313 WQItem->BytesTransferred = BytesTransferred;
314
315 if (!ChewCreate( LanReceiveWorker, WQItem ))
316 ExFreePoolWithTag(WQItem, WQ_CONTEXT_TAG);
317 }
318
319 VOID NTAPI ProtocolTransferDataComplete(
320 NDIS_HANDLE BindingContext,
321 PNDIS_PACKET Packet,
322 NDIS_STATUS Status,
323 UINT BytesTransferred)
324 /*
325 * FUNCTION: Called by NDIS to complete reception of data
326 * ARGUMENTS:
327 * BindingContext = Pointer to a device context (LAN_ADAPTER)
328 * Packet = Pointer to a packet descriptor
329 * Status = Status of the operation
330 * BytesTransferred = Number of bytes transferred
331 * NOTES:
332 * If the packet was successfully received, determine the protocol
333 * type and pass it to the correct receive handler
334 */
335 {
336 ASSERT(KeGetCurrentIrql() == DISPATCH_LEVEL);
337
338 TI_DbgPrint(DEBUG_DATALINK,("called\n"));
339
340 TransferDataCompleteCalled++;
341 ASSERT(TransferDataCompleteCalled <= TransferDataCalled);
342
343 if( Status != NDIS_STATUS_SUCCESS ) return;
344
345 LanSubmitReceiveWork( BindingContext, Packet, Status, BytesTransferred );
346 }
347
348 NDIS_STATUS NTAPI ProtocolReceive(
349 NDIS_HANDLE BindingContext,
350 NDIS_HANDLE MacReceiveContext,
351 PVOID HeaderBuffer,
352 UINT HeaderBufferSize,
353 PVOID LookaheadBuffer,
354 UINT LookaheadBufferSize,
355 UINT PacketSize)
356 /*
357 * FUNCTION: Called by NDIS when a packet has been received on the physical link
358 * ARGUMENTS:
359 * BindingContext = Pointer to a device context (LAN_ADAPTER)
360 * MacReceiveContext = Handle used by underlying NIC driver
361 * HeaderBuffer = Pointer to a buffer containing the packet header
362 * HeaderBufferSize = Number of bytes in HeaderBuffer
363 * LookaheadBuffer = Pointer to a buffer containing buffered packet data
364 * LookaheadBufferSize = Size of LookaheadBuffer. May be less than asked for
365 * PacketSize = Overall size of the packet (not including header)
366 * RETURNS:
367 * Status of operation
368 */
369 {
370 USHORT EType;
371 UINT PacketType, BytesTransferred;
372 UINT temp;
373 IP_PACKET IPPacket;
374 PCHAR BufferData;
375 NDIS_STATUS NdisStatus;
376 PNDIS_PACKET NdisPacket;
377 PLAN_ADAPTER Adapter = (PLAN_ADAPTER)BindingContext;
378 PETH_HEADER EHeader = (PETH_HEADER)HeaderBuffer;
379
380 TI_DbgPrint(DEBUG_DATALINK, ("Called. (packetsize %d)\n",PacketSize));
381
382 if (Adapter->State != LAN_STATE_STARTED) {
383 TI_DbgPrint(DEBUG_DATALINK, ("Adapter is stopped.\n"));
384 return NDIS_STATUS_NOT_ACCEPTED;
385 }
386
387 if (HeaderBufferSize < Adapter->HeaderSize) {
388 TI_DbgPrint(DEBUG_DATALINK, ("Runt frame received.\n"));
389 return NDIS_STATUS_NOT_ACCEPTED;
390 }
391
392 if (Adapter->Media == NdisMedium802_3) {
393 /* Ethernet and IEEE 802.3 frames can be destinguished by
394 looking at the IEEE 802.3 length field. This field is
395 less than or equal to 1500 for a valid IEEE 802.3 frame
396 and larger than 1500 is it's a valid EtherType value.
397 See RFC 1122, section 2.3.3 for more information */
398 /* FIXME: Test for Ethernet and IEEE 802.3 frame */
399 if (((EType = EHeader->EType) != ETYPE_IPv4) && (EType != ETYPE_ARP)) {
400 TI_DbgPrint(DEBUG_DATALINK, ("Not IP or ARP frame. EtherType (0x%X).\n", EType));
401 return NDIS_STATUS_NOT_ACCEPTED;
402 }
403 /* We use EtherType constants to destinguish packet types */
404 PacketType = EType;
405 } else {
406 TI_DbgPrint(MIN_TRACE, ("Unsupported media.\n"));
407 /* FIXME: Support other medias */
408 return NDIS_STATUS_NOT_ACCEPTED;
409 }
410
411 /* Get a transfer data packet */
412
413 TI_DbgPrint(DEBUG_DATALINK, ("Adapter: %x (MTU %d)\n",
414 Adapter, Adapter->MTU));
415
416 NdisStatus = AllocatePacketWithBuffer( &NdisPacket, NULL,
417 PacketSize );
418 if( NdisStatus != NDIS_STATUS_SUCCESS ) {
419 return NDIS_STATUS_NOT_ACCEPTED;
420 }
421
422 PC(NdisPacket)->PacketType = PacketType;
423
424 TI_DbgPrint(DEBUG_DATALINK, ("pretransfer LookaheadBufferSize %d packsize %d\n",LookaheadBufferSize,PacketSize));
425
426 GetDataPtr( NdisPacket, 0, &BufferData, &temp );
427
428 IPPacket.NdisPacket = NdisPacket;
429 IPPacket.Position = 0;
430
431 TransferDataCalled++;
432
433 if (LookaheadBufferSize == PacketSize)
434 {
435 /* Optimized code path for packets that are fully contained in
436 * the lookahead buffer. */
437 NdisCopyLookaheadData(BufferData,
438 LookaheadBuffer,
439 LookaheadBufferSize,
440 Adapter->MacOptions);
441 }
442 else
443 {
444 NdisTransferData(&NdisStatus, Adapter->NdisHandle,
445 MacReceiveContext, 0, PacketSize,
446 NdisPacket, &BytesTransferred);
447 }
448 TI_DbgPrint(DEBUG_DATALINK, ("Calling complete\n"));
449
450 if (NdisStatus != NDIS_STATUS_PENDING)
451 ProtocolTransferDataComplete(BindingContext,
452 NdisPacket,
453 NdisStatus,
454 PacketSize);
455
456 TI_DbgPrint(DEBUG_DATALINK, ("leaving\n"));
457
458 return NDIS_STATUS_SUCCESS;
459 }
460
461
462 VOID NTAPI ProtocolReceiveComplete(
463 NDIS_HANDLE BindingContext)
464 /*
465 * FUNCTION: Called by NDIS when we're done receiving data
466 * ARGUMENTS:
467 * BindingContext = Pointer to a device context (LAN_ADAPTER)
468 */
469 {
470 TI_DbgPrint(DEBUG_DATALINK, ("Called.\n"));
471 }
472
473
474 VOID NTAPI ProtocolStatus(
475 NDIS_HANDLE BindingContext,
476 NDIS_STATUS GeneralStatus,
477 PVOID StatusBuffer,
478 UINT StatusBufferSize)
479 /*
480 * FUNCTION: Called by NDIS when the underlying driver has changed state
481 * ARGUMENTS:
482 * BindingContext = Pointer to a device context (LAN_ADAPTER)
483 * GeneralStatus = A general status code
484 * StatusBuffer = Pointer to a buffer with medium-specific data
485 * StatusBufferSize = Number of bytes in StatusBuffer
486 */
487 {
488 PLAN_ADAPTER Adapter = BindingContext;
489
490 TI_DbgPrint(DEBUG_DATALINK, ("Called.\n"));
491
492 switch(GeneralStatus)
493 {
494 case NDIS_STATUS_MEDIA_CONNECT:
495 DbgPrint("NDIS_STATUS_MEDIA_CONNECT\n");
496 break;
497
498 case NDIS_STATUS_MEDIA_DISCONNECT:
499 DbgPrint("NDIS_STATUS_MEDIA_DISCONNECT\n");
500 break;
501
502 case NDIS_STATUS_RESET_START:
503 Adapter->State = LAN_STATE_RESETTING;
504 break;
505
506 case NDIS_STATUS_RESET_END:
507 Adapter->State = LAN_STATE_STARTED;
508 break;
509
510 default:
511 DbgPrint("Unhandled status: %x", GeneralStatus);
512 break;
513 }
514 }
515
516 NDIS_STATUS NTAPI
517 ProtocolPnPEvent(
518 NDIS_HANDLE NdisBindingContext,
519 PNET_PNP_EVENT PnPEvent)
520 {
521 switch(PnPEvent->NetEvent)
522 {
523 case NetEventSetPower:
524 DbgPrint("Device transitioned to power state %ld\n", PnPEvent->Buffer);
525 return NDIS_STATUS_SUCCESS;
526
527 case NetEventQueryPower:
528 DbgPrint("Device wants to go into power state %ld\n", PnPEvent->Buffer);
529 return NDIS_STATUS_SUCCESS;
530
531 case NetEventQueryRemoveDevice:
532 DbgPrint("Device is about to be removed\n");
533 return NDIS_STATUS_SUCCESS;
534
535 case NetEventCancelRemoveDevice:
536 DbgPrint("Device removal cancelled\n");
537 return NDIS_STATUS_SUCCESS;
538
539 default:
540 DbgPrint("Unhandled event type: %ld\n", PnPEvent->NetEvent);
541 return NDIS_STATUS_SUCCESS;
542 }
543 }
544
545 VOID NTAPI ProtocolStatusComplete(
546 NDIS_HANDLE NdisBindingContext)
547 /*
548 * FUNCTION: Called by NDIS when a status-change has occurred
549 * ARGUMENTS:
550 * BindingContext = Pointer to a device context (LAN_ADAPTER)
551 */
552 {
553 TI_DbgPrint(DEBUG_DATALINK, ("Called.\n"));
554 }
555
556 VOID NTAPI ProtocolBindAdapter(
557 OUT PNDIS_STATUS Status,
558 IN NDIS_HANDLE BindContext,
559 IN PNDIS_STRING DeviceName,
560 IN PVOID SystemSpecific1,
561 IN PVOID SystemSpecific2)
562 /*
563 * FUNCTION: Called by NDIS during NdisRegisterProtocol to set up initial
564 * bindings, and periodically thereafer as new adapters come online
565 * ARGUMENTS:
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
571 */
572 {
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);
577 }
578
579
580 VOID LANTransmit(
581 PVOID Context,
582 PNDIS_PACKET NdisPacket,
583 UINT Offset,
584 PVOID LinkAddress,
585 USHORT Type)
586 /*
587 * FUNCTION: Transmits a packet
588 * ARGUMENTS:
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_*)
594 */
595 {
596 NDIS_STATUS NdisStatus;
597 PETH_HEADER EHeader;
598 PCHAR Data, OldData;
599 UINT Size, OldSize;
600 PLAN_ADAPTER Adapter = (PLAN_ADAPTER)Context;
601 KIRQL OldIrql;
602 PNDIS_PACKET XmitPacket;
603
604 TI_DbgPrint(DEBUG_DATALINK,
605 ("Called( NdisPacket %x, Offset %d, Adapter %x )\n",
606 NdisPacket, Offset, Adapter));
607
608 if (Adapter->State != LAN_STATE_STARTED) {
609 (*PC(NdisPacket)->DLComplete)(PC(NdisPacket)->Context, NdisPacket, NDIS_STATUS_NOT_ACCEPTED);
610 return;
611 }
612
613 TI_DbgPrint(DEBUG_DATALINK,
614 ("Adapter Address [%02x %02x %02x %02x %02x %02x]\n",
615 Adapter->HWAddress[0] & 0xff,
616 Adapter->HWAddress[1] & 0xff,
617 Adapter->HWAddress[2] & 0xff,
618 Adapter->HWAddress[3] & 0xff,
619 Adapter->HWAddress[4] & 0xff,
620 Adapter->HWAddress[5] & 0xff));
621
622 GetDataPtr( NdisPacket, 0, &OldData, &OldSize );
623
624 NdisStatus = AllocatePacketWithBuffer(&XmitPacket, NULL, OldSize + Adapter->HeaderSize);
625 if (NdisStatus != NDIS_STATUS_SUCCESS) {
626 (*PC(NdisPacket)->DLComplete)(PC(NdisPacket)->Context, NdisPacket, NDIS_STATUS_RESOURCES);
627 return;
628 }
629
630 GetDataPtr(XmitPacket, 0, &Data, &Size);
631
632 RtlCopyMemory(Data + Adapter->HeaderSize, OldData, OldSize);
633
634 (*PC(NdisPacket)->DLComplete)(PC(NdisPacket)->Context, NdisPacket, NDIS_STATUS_SUCCESS);
635
636 switch (Adapter->Media) {
637 case NdisMedium802_3:
638 EHeader = (PETH_HEADER)Data;
639
640 if (LinkAddress) {
641 /* Unicast address */
642 RtlCopyMemory(EHeader->DstAddr, LinkAddress, IEEE_802_ADDR_LENGTH);
643 } else {
644 /* Broadcast address */
645 RtlFillMemory(EHeader->DstAddr, IEEE_802_ADDR_LENGTH, 0xFF);
646 }
647
648 RtlCopyMemory(EHeader->SrcAddr, Adapter->HWAddress, IEEE_802_ADDR_LENGTH);
649
650 switch (Type) {
651 case LAN_PROTO_IPv4:
652 EHeader->EType = ETYPE_IPv4;
653 break;
654 case LAN_PROTO_ARP:
655 EHeader->EType = ETYPE_ARP;
656 break;
657 case LAN_PROTO_IPv6:
658 EHeader->EType = ETYPE_IPv6;
659 break;
660 default:
661 ASSERT(FALSE);
662 return;
663 }
664 break;
665
666 default:
667 /* FIXME: Support other medias */
668 break;
669 }
670
671 TI_DbgPrint( MID_TRACE, ("LinkAddress: %x\n", LinkAddress));
672 if( LinkAddress ) {
673 TI_DbgPrint
674 ( MID_TRACE,
675 ("Link Address [%02x %02x %02x %02x %02x %02x]\n",
676 ((PCHAR)LinkAddress)[0] & 0xff,
677 ((PCHAR)LinkAddress)[1] & 0xff,
678 ((PCHAR)LinkAddress)[2] & 0xff,
679 ((PCHAR)LinkAddress)[3] & 0xff,
680 ((PCHAR)LinkAddress)[4] & 0xff,
681 ((PCHAR)LinkAddress)[5] & 0xff));
682 }
683
684 if (Adapter->MTU < Size) {
685 /* This is NOT a pointer. MSDN explicitly says so. */
686 NDIS_PER_PACKET_INFO_FROM_PACKET(NdisPacket,
687 TcpLargeSendPacketInfo) = (PVOID)((ULONG_PTR)Adapter->MTU);
688 }
689
690 TcpipAcquireSpinLock( &Adapter->Lock, &OldIrql );
691 TI_DbgPrint(MID_TRACE, ("NdisSend\n"));
692 NdisSend(&NdisStatus, Adapter->NdisHandle, XmitPacket);
693 TI_DbgPrint(MID_TRACE, ("NdisSend %s\n",
694 NdisStatus == NDIS_STATUS_PENDING ?
695 "Pending" : "Complete"));
696 TcpipReleaseSpinLock( &Adapter->Lock, OldIrql );
697
698 /* I had a talk with vizzini: these really ought to be here.
699 * we're supposed to see these completed by ndis *only* when
700 * status_pending is returned. Note that this is different from
701 * the situation with IRPs. */
702 if (NdisStatus != NDIS_STATUS_PENDING)
703 ProtocolSendComplete((NDIS_HANDLE)Context, XmitPacket, NdisStatus);
704 }
705
706 static NTSTATUS
707 OpenRegistryKey( PNDIS_STRING RegistryPath, PHANDLE RegHandle ) {
708 OBJECT_ATTRIBUTES Attributes;
709 NTSTATUS Status;
710
711 InitializeObjectAttributes(&Attributes, RegistryPath, OBJ_CASE_INSENSITIVE, 0, 0);
712 Status = ZwOpenKey(RegHandle, KEY_ALL_ACCESS, &Attributes);
713 return Status;
714 }
715
716 static NTSTATUS ReadStringFromRegistry( HANDLE RegHandle,
717 PWCHAR RegistryValue,
718 PUNICODE_STRING String ) {
719 UNICODE_STRING ValueName;
720 UNICODE_STRING UnicodeString;
721 NTSTATUS Status;
722 ULONG ResultLength;
723 UCHAR buf[1024];
724 PKEY_VALUE_PARTIAL_INFORMATION Information = (PKEY_VALUE_PARTIAL_INFORMATION)buf;
725
726 RtlInitUnicodeString(&ValueName, RegistryValue);
727 Status =
728 ZwQueryValueKey(RegHandle,
729 &ValueName,
730 KeyValuePartialInformation,
731 Information,
732 sizeof(buf),
733 &ResultLength);
734
735 if (!NT_SUCCESS(Status))
736 return Status;
737 /* IP address is stored as a REG_MULTI_SZ - we only pay attention to the first one though */
738 TI_DbgPrint(MIN_TRACE, ("Information DataLength: 0x%x\n", Information->DataLength));
739
740 UnicodeString.Buffer = (PWCHAR)&Information->Data;
741 UnicodeString.Length = Information->DataLength - sizeof(WCHAR);
742 UnicodeString.MaximumLength = Information->DataLength;
743
744 String->Buffer =
745 (PWCHAR)ExAllocatePool( NonPagedPool,
746 UnicodeString.MaximumLength + sizeof(WCHAR) );
747
748 if( !String->Buffer ) return STATUS_NO_MEMORY;
749
750 String->MaximumLength = UnicodeString.MaximumLength;
751 RtlCopyUnicodeString( String, &UnicodeString );
752
753 return STATUS_SUCCESS;
754 }
755
756 /*
757 * Utility to copy and append two unicode strings.
758 *
759 * IN OUT PUNICODE_STRING ResultFirst -> First string and result
760 * IN PUNICODE_STRING Second -> Second string to append
761 * IN BOOL Deallocate -> TRUE: Deallocate First string before
762 * overwriting.
763 *
764 * Returns NTSTATUS.
765 */
766
767 NTSTATUS NTAPI AppendUnicodeString(PUNICODE_STRING ResultFirst,
768 PUNICODE_STRING Second,
769 BOOLEAN Deallocate) {
770 NTSTATUS Status;
771 UNICODE_STRING Ustr = *ResultFirst;
772 PWSTR new_string = ExAllocatePool
773 (PagedPool,
774 (ResultFirst->Length + Second->Length + sizeof(WCHAR)));
775 if( !new_string ) {
776 return STATUS_NO_MEMORY;
777 }
778 memcpy( new_string, ResultFirst->Buffer, ResultFirst->Length );
779 memcpy( new_string + ResultFirst->Length / sizeof(WCHAR),
780 Second->Buffer, Second->Length );
781 if( Deallocate ) RtlFreeUnicodeString(ResultFirst);
782 ResultFirst->Length = Ustr.Length + Second->Length;
783 ResultFirst->MaximumLength = ResultFirst->Length;
784 new_string[ResultFirst->Length / sizeof(WCHAR)] = 0;
785 Status = RtlCreateUnicodeString(ResultFirst,new_string) ?
786 STATUS_SUCCESS : STATUS_NO_MEMORY;
787 ExFreePool(new_string);
788 return Status;
789 }
790
791 static NTSTATUS CheckForDeviceDesc( PUNICODE_STRING EnumKeyName,
792 PUNICODE_STRING TargetKeyName,
793 PUNICODE_STRING Name,
794 PUNICODE_STRING DeviceDesc ) {
795 UNICODE_STRING RootDevice = { 0, 0, NULL }, LinkageKeyName = { 0, 0, NULL };
796 UNICODE_STRING DescKeyName = { 0, 0, NULL }, Linkage = { 0, 0, NULL };
797 UNICODE_STRING BackSlash = { 0, 0, NULL };
798 HANDLE DescKey = NULL, LinkageKey = NULL;
799 NTSTATUS Status;
800
801 TI_DbgPrint(DEBUG_DATALINK,("EnumKeyName %wZ\n", EnumKeyName));
802
803 RtlInitUnicodeString(&BackSlash, L"\\");
804 RtlInitUnicodeString(&Linkage, L"\\Linkage");
805
806 RtlInitUnicodeString(&DescKeyName, L"");
807 AppendUnicodeString( &DescKeyName, EnumKeyName, FALSE );
808 AppendUnicodeString( &DescKeyName, &BackSlash, TRUE );
809 AppendUnicodeString( &DescKeyName, TargetKeyName, TRUE );
810
811 RtlInitUnicodeString(&LinkageKeyName, L"");
812 AppendUnicodeString( &LinkageKeyName, &DescKeyName, FALSE );
813 AppendUnicodeString( &LinkageKeyName, &Linkage, TRUE );
814
815 Status = OpenRegistryKey( &LinkageKeyName, &LinkageKey );
816 if( !NT_SUCCESS(Status) ) goto cleanup;
817
818 Status = ReadStringFromRegistry( LinkageKey, L"RootDevice", &RootDevice );
819 if( !NT_SUCCESS(Status) ) goto cleanup;
820
821 if( RtlCompareUnicodeString( &RootDevice, Name, TRUE ) == 0 ) {
822 Status = OpenRegistryKey( &DescKeyName, &DescKey );
823 if( !NT_SUCCESS(Status) ) goto cleanup;
824
825 Status = ReadStringFromRegistry( DescKey, L"DriverDesc", DeviceDesc );
826 if( !NT_SUCCESS(Status) ) goto cleanup;
827
828 TI_DbgPrint(DEBUG_DATALINK,("ADAPTER DESC: %wZ\n", DeviceDesc));
829 } else Status = STATUS_UNSUCCESSFUL;
830
831 cleanup:
832 RtlFreeUnicodeString( &RootDevice );
833 RtlFreeUnicodeString( &LinkageKeyName );
834 RtlFreeUnicodeString( &DescKeyName );
835 if( LinkageKey ) NtClose( LinkageKey );
836 if( DescKey ) NtClose( DescKey );
837
838 TI_DbgPrint(DEBUG_DATALINK,("Returning %x\n", Status));
839
840 return Status;
841 }
842
843 static NTSTATUS FindDeviceDescForAdapter( PUNICODE_STRING Name,
844 PUNICODE_STRING DeviceDesc ) {
845 UNICODE_STRING EnumKeyName, TargetKeyName;
846 HANDLE EnumKey;
847 NTSTATUS Status;
848 ULONG i;
849 KEY_BASIC_INFORMATION *Kbio =
850 ExAllocatePool(NonPagedPool, sizeof(KEY_BASIC_INFORMATION));
851 ULONG KbioLength = sizeof(KEY_BASIC_INFORMATION), ResultLength;
852
853 RtlInitUnicodeString( DeviceDesc, NULL );
854
855 if( !Kbio ) return STATUS_INSUFFICIENT_RESOURCES;
856
857 RtlInitUnicodeString
858 (&EnumKeyName, CCS_ROOT L"\\Control\\Class\\" TCPIP_GUID);
859
860 Status = OpenRegistryKey( &EnumKeyName, &EnumKey );
861
862 if( !NT_SUCCESS(Status) ) {
863 TI_DbgPrint(DEBUG_DATALINK,("Couldn't open Enum key %wZ: %x\n",
864 &EnumKeyName, Status));
865 ExFreePool( Kbio );
866 return Status;
867 }
868
869 for( i = 0; NT_SUCCESS(Status); i++ ) {
870 Status = ZwEnumerateKey( EnumKey, i, KeyBasicInformation,
871 Kbio, KbioLength, &ResultLength );
872
873 if( Status == STATUS_BUFFER_TOO_SMALL || Status == STATUS_BUFFER_OVERFLOW ) {
874 ExFreePool( Kbio );
875 KbioLength = ResultLength;
876 Kbio = ExAllocatePool( NonPagedPool, KbioLength );
877 if( !Kbio ) {
878 TI_DbgPrint(DEBUG_DATALINK,("Failed to allocate memory\n"));
879 NtClose( EnumKey );
880 return STATUS_NO_MEMORY;
881 }
882
883 Status = ZwEnumerateKey( EnumKey, i, KeyBasicInformation,
884 Kbio, KbioLength, &ResultLength );
885
886 if( !NT_SUCCESS(Status) ) {
887 TI_DbgPrint(DEBUG_DATALINK,("Couldn't enum key child %d\n", i));
888 NtClose( EnumKey );
889 ExFreePool( Kbio );
890 return Status;
891 }
892 }
893
894 if( NT_SUCCESS(Status) ) {
895 TargetKeyName.Length = TargetKeyName.MaximumLength =
896 Kbio->NameLength;
897 TargetKeyName.Buffer = Kbio->Name;
898
899 Status = CheckForDeviceDesc
900 ( &EnumKeyName, &TargetKeyName, Name, DeviceDesc );
901 if( NT_SUCCESS(Status) ) {
902 NtClose( EnumKey );
903 ExFreePool( Kbio );
904 return Status;
905 } else Status = STATUS_SUCCESS;
906 }
907 }
908
909 NtClose( EnumKey );
910 ExFreePool( Kbio );
911 return STATUS_UNSUCCESSFUL;
912 }
913
914 VOID GetName( PUNICODE_STRING RegistryKey,
915 PUNICODE_STRING OutName ) {
916 PWCHAR Ptr;
917 UNICODE_STRING PartialRegistryKey;
918
919 PartialRegistryKey.Buffer =
920 RegistryKey->Buffer + wcslen(CCS_ROOT L"\\Services\\");
921 Ptr = PartialRegistryKey.Buffer;
922
923 while( *Ptr != L'\\' &&
924 ((PCHAR)Ptr) < ((PCHAR)RegistryKey->Buffer) + RegistryKey->Length )
925 Ptr++;
926
927 PartialRegistryKey.Length = PartialRegistryKey.MaximumLength =
928 (Ptr - PartialRegistryKey.Buffer) * sizeof(WCHAR);
929
930 RtlInitUnicodeString( OutName, L"" );
931 AppendUnicodeString( OutName, &PartialRegistryKey, FALSE );
932 }
933
934 BOOLEAN BindAdapter(
935 PLAN_ADAPTER Adapter,
936 PNDIS_STRING RegistryPath)
937 /*
938 * FUNCTION: Binds a LAN adapter to IP layer
939 * ARGUMENTS:
940 * Adapter = Pointer to LAN_ADAPTER structure
941 * NOTES:
942 * We set the lookahead buffer size, set the packet filter and
943 * bind the adapter to IP layer
944 */
945 {
946 PIP_INTERFACE IF;
947 NDIS_STATUS NdisStatus;
948 LLIP_BIND_INFO BindInfo;
949 IP_ADDRESS DefaultMask, Router;
950 ULONG Lookahead = LOOKAHEAD_SIZE, Unused;
951 NTSTATUS Status;
952 OBJECT_ATTRIBUTES ObjectAttributes;
953 HANDLE ParameterHandle;
954 PKEY_VALUE_PARTIAL_INFORMATION KeyValueInfo;
955 UNICODE_STRING IPAddress = RTL_CONSTANT_STRING(L"IPAddress");
956 UNICODE_STRING Netmask = RTL_CONSTANT_STRING(L"SubnetMask");
957 UNICODE_STRING Gateway = RTL_CONSTANT_STRING(L"DefaultGateway");
958 UNICODE_STRING RegistryDataU;
959 ANSI_STRING RegistryDataA;
960
961 TI_DbgPrint(DEBUG_DATALINK, ("Called.\n"));
962
963 Adapter->State = LAN_STATE_OPENING;
964
965 NdisStatus = NDISCall(Adapter,
966 NdisRequestSetInformation,
967 OID_GEN_CURRENT_LOOKAHEAD,
968 &Lookahead,
969 sizeof(ULONG));
970 if (NdisStatus != NDIS_STATUS_SUCCESS) {
971 TI_DbgPrint(DEBUG_DATALINK, ("Could not set lookahead buffer size (0x%X).\n", NdisStatus));
972 return FALSE;
973 }
974
975 /* Bind the adapter to IP layer */
976 BindInfo.Context = Adapter;
977 BindInfo.HeaderSize = Adapter->HeaderSize;
978 BindInfo.MinFrameSize = Adapter->MinFrameSize;
979 BindInfo.MTU = Adapter->MTU;
980 BindInfo.Address = (PUCHAR)&Adapter->HWAddress;
981 BindInfo.AddressLength = Adapter->HWAddressLength;
982 BindInfo.Transmit = LANTransmit;
983
984 IF = IPCreateInterface(&BindInfo);
985
986 if (!IF) {
987 TI_DbgPrint(MIN_TRACE, ("Insufficient resources.\n"));
988 return FALSE;
989 }
990
991 /*
992 * Query per-adapter configuration from the registry
993 * In case anyone is curious: there *is* an Ndis configuration api
994 * for this sort of thing, but it doesn't really support things like
995 * REG_MULTI_SZ very well, and there is a note in the DDK that says that
996 * protocol drivers developed for win2k and above just use the native
997 * services (ZwOpenKey, etc).
998 */
999
1000 GetName( RegistryPath, &IF->Name );
1001
1002 Status = FindDeviceDescForAdapter( &IF->Name, &IF->Description );
1003 if (!NT_SUCCESS(Status)) {
1004 TI_DbgPrint(MIN_TRACE, ("Failed to get device description.\n"));
1005 IPDestroyInterface(IF);
1006 return FALSE;
1007 }
1008
1009 TI_DbgPrint(DEBUG_DATALINK,("Adapter Description: %wZ\n",
1010 &IF->Description));
1011
1012 InitializeObjectAttributes(&ObjectAttributes,
1013 RegistryPath,
1014 OBJ_CASE_INSENSITIVE,
1015 0,
1016 NULL);
1017
1018 AddrInitIPv4(&DefaultMask, 0);
1019
1020 Status = ZwOpenKey(&ParameterHandle, KEY_READ, &ObjectAttributes);
1021 if (!NT_SUCCESS(Status))
1022 {
1023 IF->Unicast = DefaultMask;
1024 IF->Netmask = DefaultMask;
1025 }
1026 else
1027 {
1028 KeyValueInfo = ExAllocatePool(PagedPool, sizeof(KEY_VALUE_PARTIAL_INFORMATION) + 16 * sizeof(WCHAR));
1029 if (!KeyValueInfo)
1030 {
1031 ZwClose(ParameterHandle);
1032 IPDestroyInterface(IF);
1033 return FALSE;
1034 }
1035
1036 RegistryDataU.MaximumLength = 16 + sizeof(WCHAR);
1037 RegistryDataU.Buffer = (PWCHAR)KeyValueInfo->Data;
1038
1039 Status = ZwQueryValueKey(ParameterHandle,
1040 &IPAddress,
1041 KeyValuePartialInformation,
1042 KeyValueInfo,
1043 sizeof(KEY_VALUE_PARTIAL_INFORMATION) + 16 * sizeof(WCHAR),
1044 &Unused);
1045 if (NT_SUCCESS(Status))
1046 {
1047 RegistryDataU.Length = KeyValueInfo->DataLength;
1048
1049 RtlUnicodeStringToAnsiString(&RegistryDataA,
1050 &RegistryDataU,
1051 TRUE);
1052
1053 AddrInitIPv4(&IF->Unicast, inet_addr(RegistryDataA.Buffer));
1054
1055 RtlFreeAnsiString(&RegistryDataA);
1056
1057 }
1058 else
1059 {
1060 IF->Unicast = DefaultMask;
1061 }
1062
1063 Status = ZwQueryValueKey(ParameterHandle,
1064 &Netmask,
1065 KeyValuePartialInformation,
1066 KeyValueInfo,
1067 sizeof(KEY_VALUE_PARTIAL_INFORMATION) + 16 * sizeof(WCHAR),
1068 &Unused);
1069 if (NT_SUCCESS(Status))
1070 {
1071 RegistryDataU.Length = KeyValueInfo->DataLength;
1072
1073 RtlUnicodeStringToAnsiString(&RegistryDataA,
1074 &RegistryDataU,
1075 TRUE);
1076
1077 AddrInitIPv4(&IF->Netmask, inet_addr(RegistryDataA.Buffer));
1078
1079 RtlFreeAnsiString(&RegistryDataA);
1080 }
1081 else
1082 {
1083 IF->Netmask = DefaultMask;
1084 }
1085
1086 Status = ZwQueryValueKey(ParameterHandle,
1087 &Gateway,
1088 KeyValuePartialInformation,
1089 KeyValueInfo,
1090 sizeof(KEY_VALUE_PARTIAL_INFORMATION) + 16 * sizeof(WCHAR),
1091 &Unused);
1092 if (NT_SUCCESS(Status))
1093 {
1094 RegistryDataU.Length = KeyValueInfo->DataLength;
1095
1096 RtlUnicodeStringToAnsiString(&RegistryDataA,
1097 &RegistryDataU,
1098 TRUE);
1099
1100 AddrInitIPv4(&Router, inet_addr(RegistryDataA.Buffer));
1101
1102 RtlFreeAnsiString(&RegistryDataA);
1103
1104 if (!AddrIsUnspecified(&Router)) RouterCreateRoute(&DefaultMask, &DefaultMask, &Router, IF, 1);
1105 }
1106
1107 ZwClose(ParameterHandle);
1108 }
1109
1110 IF->Broadcast.Type = IP_ADDRESS_V4;
1111 IF->Broadcast.Address.IPv4Address =
1112 IF->Unicast.Address.IPv4Address |
1113 ~IF->Netmask.Address.IPv4Address;
1114
1115 TI_DbgPrint(DEBUG_DATALINK,("BCAST(IF) %s\n", A2S(&IF->Broadcast)));
1116
1117 /* Get maximum link speed */
1118 NdisStatus = NDISCall(Adapter,
1119 NdisRequestQueryInformation,
1120 OID_GEN_LINK_SPEED,
1121 &IF->Speed,
1122 sizeof(UINT));
1123
1124 if( !NT_SUCCESS(NdisStatus) )
1125 IF->Speed = IP_DEFAULT_LINK_SPEED;
1126
1127 /* Register interface with IP layer */
1128 IPRegisterInterface(IF);
1129
1130 /* Set packet filter so we can send and receive packets */
1131 NdisStatus = NDISCall(Adapter,
1132 NdisRequestSetInformation,
1133 OID_GEN_CURRENT_PACKET_FILTER,
1134 &Adapter->PacketFilter,
1135 sizeof(UINT));
1136
1137 if (NdisStatus != NDIS_STATUS_SUCCESS) {
1138 TI_DbgPrint(DEBUG_DATALINK, ("Could not set packet filter (0x%X).\n", NdisStatus));
1139 IPUnregisterInterface(IF);
1140 IPDestroyInterface(IF);
1141 return FALSE;
1142 }
1143
1144 Adapter->Context = IF;
1145 Adapter->State = LAN_STATE_STARTED;
1146 return TRUE;
1147 }
1148
1149
1150 VOID UnbindAdapter(
1151 PLAN_ADAPTER Adapter)
1152 /*
1153 * FUNCTION: Unbinds a LAN adapter from IP layer
1154 * ARGUMENTS:
1155 * Adapter = Pointer to LAN_ADAPTER structure
1156 */
1157 {
1158 TI_DbgPrint(DEBUG_DATALINK, ("Called.\n"));
1159
1160 if (Adapter->State == LAN_STATE_STARTED) {
1161 PIP_INTERFACE IF = Adapter->Context;
1162
1163 IPUnregisterInterface(IF);
1164
1165 IPDestroyInterface(IF);
1166 }
1167 }
1168
1169
1170 NDIS_STATUS LANRegisterAdapter(
1171 PNDIS_STRING AdapterName,
1172 PNDIS_STRING RegistryPath)
1173 /*
1174 * FUNCTION: Registers protocol with an NDIS adapter
1175 * ARGUMENTS:
1176 * AdapterName = Pointer to string with name of adapter to register
1177 * Adapter = Address of pointer to a LAN_ADAPTER structure
1178 * RETURNS:
1179 * Status of operation
1180 */
1181 {
1182 PLAN_ADAPTER IF;
1183 NDIS_STATUS NdisStatus;
1184 NDIS_STATUS OpenStatus;
1185 UINT MediaIndex;
1186 NDIS_MEDIUM MediaArray[MAX_MEDIA];
1187 UINT AddressOID;
1188 UINT Speed;
1189
1190 TI_DbgPrint(DEBUG_DATALINK, ("Called.\n"));
1191
1192 IF = ExAllocatePoolWithTag(NonPagedPool, sizeof(LAN_ADAPTER), LAN_ADAPTER_TAG);
1193 if (!IF) {
1194 TI_DbgPrint(MIN_TRACE, ("Insufficient resources.\n"));
1195 return NDIS_STATUS_RESOURCES;
1196 }
1197
1198 RtlZeroMemory(IF, sizeof(LAN_ADAPTER));
1199
1200 /* Put adapter in stopped state */
1201 IF->State = LAN_STATE_STOPPED;
1202
1203 /* Initialize protecting spin lock */
1204 KeInitializeSpinLock(&IF->Lock);
1205
1206 KeInitializeEvent(&IF->Event, SynchronizationEvent, FALSE);
1207
1208 /* Initialize array with media IDs we support */
1209 MediaArray[MEDIA_ETH] = NdisMedium802_3;
1210
1211 TI_DbgPrint(DEBUG_DATALINK,("opening adapter %wZ\n", AdapterName));
1212 /* Open the adapter. */
1213 NdisOpenAdapter(&NdisStatus,
1214 &OpenStatus,
1215 &IF->NdisHandle,
1216 &MediaIndex,
1217 MediaArray,
1218 MAX_MEDIA,
1219 NdisProtocolHandle,
1220 IF,
1221 AdapterName,
1222 0,
1223 NULL);
1224
1225 /* Wait until the adapter is opened */
1226 if (NdisStatus == NDIS_STATUS_PENDING)
1227 KeWaitForSingleObject(&IF->Event, UserRequest, KernelMode, FALSE, NULL);
1228 else if (NdisStatus != NDIS_STATUS_SUCCESS) {
1229 TI_DbgPrint(DEBUG_DATALINK,("denying adapter %wZ\n", AdapterName));
1230 ExFreePoolWithTag(IF, LAN_ADAPTER_TAG);
1231 return NdisStatus;
1232 }
1233
1234 IF->Media = MediaArray[MediaIndex];
1235
1236 /* Fill LAN_ADAPTER structure with some adapter specific information */
1237 switch (IF->Media) {
1238 case NdisMedium802_3:
1239 IF->HWAddressLength = IEEE_802_ADDR_LENGTH;
1240 IF->BCastMask = BCAST_ETH_MASK;
1241 IF->BCastCheck = BCAST_ETH_CHECK;
1242 IF->BCastOffset = BCAST_ETH_OFFSET;
1243 IF->HeaderSize = sizeof(ETH_HEADER);
1244 IF->MinFrameSize = 60;
1245 AddressOID = OID_802_3_CURRENT_ADDRESS;
1246 IF->PacketFilter =
1247 NDIS_PACKET_TYPE_BROADCAST |
1248 NDIS_PACKET_TYPE_DIRECTED |
1249 NDIS_PACKET_TYPE_MULTICAST;
1250 break;
1251
1252 default:
1253 /* Unsupported media */
1254 TI_DbgPrint(MIN_TRACE, ("Unsupported media.\n"));
1255 ExFreePoolWithTag(IF, LAN_ADAPTER_TAG);
1256 return NDIS_STATUS_NOT_SUPPORTED;
1257 }
1258
1259 /* Get maximum frame size */
1260 NdisStatus = NDISCall(IF,
1261 NdisRequestQueryInformation,
1262 OID_GEN_MAXIMUM_FRAME_SIZE,
1263 &IF->MTU,
1264 sizeof(UINT));
1265 if (NdisStatus != NDIS_STATUS_SUCCESS) {
1266 TI_DbgPrint(DEBUG_DATALINK,("denying adapter %wZ (NDISCall)\n", AdapterName));
1267 ExFreePoolWithTag(IF, LAN_ADAPTER_TAG);
1268 return NdisStatus;
1269 }
1270
1271 /* Get maximum packet size */
1272 NdisStatus = NDISCall(IF,
1273 NdisRequestQueryInformation,
1274 OID_GEN_MAXIMUM_TOTAL_SIZE,
1275 &IF->MaxPacketSize,
1276 sizeof(UINT));
1277 if (NdisStatus != NDIS_STATUS_SUCCESS) {
1278 TI_DbgPrint(MIN_TRACE, ("Query for maximum packet size failed.\n"));
1279 ExFreePoolWithTag(IF, LAN_ADAPTER_TAG);
1280 return NdisStatus;
1281 }
1282
1283 /* Get maximum number of packets we can pass to NdisSend(Packets) at one time */
1284 NdisStatus = NDISCall(IF,
1285 NdisRequestQueryInformation,
1286 OID_GEN_MAXIMUM_SEND_PACKETS,
1287 &IF->MaxSendPackets,
1288 sizeof(UINT));
1289 if (NdisStatus != NDIS_STATUS_SUCCESS)
1290 /* Legacy NIC drivers may not support this query, if it fails we
1291 assume it can send at least one packet per call to NdisSend(Packets) */
1292 IF->MaxSendPackets = 1;
1293
1294 /* Get current hardware address */
1295 NdisStatus = NDISCall(IF,
1296 NdisRequestQueryInformation,
1297 AddressOID,
1298 &IF->HWAddress,
1299 IF->HWAddressLength);
1300 if (NdisStatus != NDIS_STATUS_SUCCESS) {
1301 TI_DbgPrint(MIN_TRACE, ("Query for current hardware address failed.\n"));
1302 ExFreePoolWithTag(IF, LAN_ADAPTER_TAG);
1303 return NdisStatus;
1304 }
1305
1306 /* Get maximum link speed */
1307 NdisStatus = NDISCall(IF,
1308 NdisRequestQueryInformation,
1309 OID_GEN_LINK_SPEED,
1310 &Speed,
1311 sizeof(UINT));
1312 if (NdisStatus != NDIS_STATUS_SUCCESS) {
1313 TI_DbgPrint(MIN_TRACE, ("Query for maximum link speed failed.\n"));
1314 ExFreePoolWithTag(IF, LAN_ADAPTER_TAG);
1315 return NdisStatus;
1316 }
1317
1318 /* Convert returned link speed to bps (it is in 100bps increments) */
1319 IF->Speed = Speed * 100L;
1320
1321 /* Bind adapter to IP layer */
1322 if( !BindAdapter(IF, RegistryPath) ) {
1323 TI_DbgPrint(DEBUG_DATALINK,("denying adapter %wZ (BindAdapter)\n", AdapterName));
1324 ExFreePoolWithTag(IF, LAN_ADAPTER_TAG);
1325 return NDIS_STATUS_NOT_ACCEPTED;
1326 }
1327
1328 /* Add adapter to the adapter list */
1329 ExInterlockedInsertTailList(&AdapterListHead,
1330 &IF->ListEntry,
1331 &AdapterListLock);
1332
1333 TI_DbgPrint(DEBUG_DATALINK, ("Leaving.\n"));
1334
1335 return NDIS_STATUS_SUCCESS;
1336 }
1337
1338
1339 NDIS_STATUS LANUnregisterAdapter(
1340 PLAN_ADAPTER Adapter)
1341 /*
1342 * FUNCTION: Unregisters protocol with NDIS adapter
1343 * ARGUMENTS:
1344 * Adapter = Pointer to a LAN_ADAPTER structure
1345 * RETURNS:
1346 * Status of operation
1347 */
1348 {
1349 KIRQL OldIrql;
1350 NDIS_HANDLE NdisHandle;
1351 NDIS_STATUS NdisStatus = NDIS_STATUS_SUCCESS;
1352
1353 TI_DbgPrint(DEBUG_DATALINK, ("Called.\n"));
1354
1355 /* Unlink the adapter from the list */
1356 RemoveEntryList(&Adapter->ListEntry);
1357
1358 /* Unbind adapter from IP layer */
1359 UnbindAdapter(Adapter);
1360
1361 TcpipAcquireSpinLock(&Adapter->Lock, &OldIrql);
1362 NdisHandle = Adapter->NdisHandle;
1363 if (NdisHandle) {
1364 Adapter->NdisHandle = NULL;
1365 TcpipReleaseSpinLock(&Adapter->Lock, OldIrql);
1366
1367 NdisCloseAdapter(&NdisStatus, NdisHandle);
1368 if (NdisStatus == NDIS_STATUS_PENDING) {
1369 TcpipWaitForSingleObject(&Adapter->Event,
1370 UserRequest,
1371 KernelMode,
1372 FALSE,
1373 NULL);
1374 NdisStatus = Adapter->NdisStatus;
1375 }
1376 } else
1377 TcpipReleaseSpinLock(&Adapter->Lock, OldIrql);
1378
1379 FreeAdapter(Adapter);
1380
1381 return NdisStatus;
1382 }
1383
1384 VOID
1385 NTAPI
1386 LANUnregisterProtocol(VOID)
1387 /*
1388 * FUNCTION: Unregisters this protocol driver with NDIS
1389 * NOTES: Does not care wether we are already registered
1390 */
1391 {
1392 TI_DbgPrint(DEBUG_DATALINK, ("Called.\n"));
1393
1394 if (ProtocolRegistered) {
1395 NDIS_STATUS NdisStatus;
1396 PLIST_ENTRY CurrentEntry;
1397 PLIST_ENTRY NextEntry;
1398 PLAN_ADAPTER Current;
1399 KIRQL OldIrql;
1400
1401 TcpipAcquireSpinLock(&AdapterListLock, &OldIrql);
1402
1403 /* Search the list and remove every adapter we find */
1404 CurrentEntry = AdapterListHead.Flink;
1405 while (CurrentEntry != &AdapterListHead) {
1406 NextEntry = CurrentEntry->Flink;
1407 Current = CONTAINING_RECORD(CurrentEntry, LAN_ADAPTER, ListEntry);
1408 /* Unregister it */
1409 LANUnregisterAdapter(Current);
1410 CurrentEntry = NextEntry;
1411 }
1412
1413 TcpipReleaseSpinLock(&AdapterListLock, OldIrql);
1414
1415 NdisDeregisterProtocol(&NdisStatus, NdisProtocolHandle);
1416 ProtocolRegistered = FALSE;
1417 }
1418 }
1419
1420 VOID
1421 NTAPI
1422 ProtocolUnbindAdapter(
1423 PNDIS_STATUS Status,
1424 NDIS_HANDLE ProtocolBindingContext,
1425 NDIS_HANDLE UnbindContext)
1426 {
1427 /* We don't pend any unbinding so we can just ignore UnbindContext */
1428 *Status = LANUnregisterAdapter((PLAN_ADAPTER)ProtocolBindingContext);
1429 }
1430
1431 NTSTATUS LANRegisterProtocol(
1432 PNDIS_STRING Name)
1433 /*
1434 * FUNCTION: Registers this protocol driver with NDIS
1435 * ARGUMENTS:
1436 * Name = Name of this protocol driver
1437 * RETURNS:
1438 * Status of operation
1439 */
1440 {
1441 NDIS_STATUS NdisStatus;
1442 NDIS_PROTOCOL_CHARACTERISTICS ProtChars;
1443
1444 TI_DbgPrint(DEBUG_DATALINK, ("Called.\n"));
1445
1446 InitializeListHead(&AdapterListHead);
1447 KeInitializeSpinLock(&AdapterListLock);
1448
1449 /* Set up protocol characteristics */
1450 RtlZeroMemory(&ProtChars, sizeof(NDIS_PROTOCOL_CHARACTERISTICS));
1451 ProtChars.MajorNdisVersion = NDIS_VERSION_MAJOR;
1452 ProtChars.MinorNdisVersion = NDIS_VERSION_MINOR;
1453 ProtChars.Name.Length = Name->Length;
1454 ProtChars.Name.Buffer = Name->Buffer;
1455 ProtChars.Name.MaximumLength = Name->MaximumLength;
1456 ProtChars.OpenAdapterCompleteHandler = ProtocolOpenAdapterComplete;
1457 ProtChars.CloseAdapterCompleteHandler = ProtocolCloseAdapterComplete;
1458 ProtChars.ResetCompleteHandler = ProtocolResetComplete;
1459 ProtChars.RequestCompleteHandler = ProtocolRequestComplete;
1460 ProtChars.SendCompleteHandler = ProtocolSendComplete;
1461 ProtChars.TransferDataCompleteHandler = ProtocolTransferDataComplete;
1462 ProtChars.ReceiveHandler = ProtocolReceive;
1463 ProtChars.ReceiveCompleteHandler = ProtocolReceiveComplete;
1464 ProtChars.StatusHandler = ProtocolStatus;
1465 ProtChars.StatusCompleteHandler = ProtocolStatusComplete;
1466 ProtChars.BindAdapterHandler = ProtocolBindAdapter;
1467 ProtChars.PnPEventHandler = ProtocolPnPEvent;
1468 ProtChars.UnbindAdapterHandler = ProtocolUnbindAdapter;
1469 ProtChars.UnloadHandler = LANUnregisterProtocol;
1470
1471 /* Try to register protocol */
1472 NdisRegisterProtocol(&NdisStatus,
1473 &NdisProtocolHandle,
1474 &ProtChars,
1475 sizeof(NDIS_PROTOCOL_CHARACTERISTICS));
1476 if (NdisStatus != NDIS_STATUS_SUCCESS)
1477 {
1478 TI_DbgPrint(DEBUG_DATALINK, ("NdisRegisterProtocol failed, status 0x%x\n", NdisStatus));
1479 return (NTSTATUS)NdisStatus;
1480 }
1481
1482 ProtocolRegistered = TRUE;
1483
1484 return STATUS_SUCCESS;
1485 }
1486
1487 /* EOF */