]> git.saurik.com Git - apple/mdnsresponder.git/blob - mDNSWindows/mDNSWin32.c
projects / apple / mdnsresponder.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
mDNSResponder-522.92.1.tar.gz
[apple/mdnsresponder.git] / mDNSWindows / mDNSWin32.c
1 /* -*- Mode: C; tab-width: 4 -*-
2 *
3 * Copyright (c) 2002-2013 Apple Computer, Inc. All rights reserved.
4 *
5 * Licensed under the Apache License, Version 2.0 (the "License");
6 * you may not use this file except in compliance with the License.
7 * You may obtain a copy of the License at
8 *
9 * http://www.apache.org/licenses/LICENSE-2.0
10 *
11 * Unless required by applicable law or agreed to in writing, software
12 * distributed under the License is distributed on an "AS IS" BASIS,
13 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
14 * See the License for the specific language governing permissions and
15 * limitations under the License.
16
17 To Do:
18
19 - Get unicode name of machine for nice name instead of just the host name.
20 - Use the IPv6 Internet Connection Firewall API to allow IPv6 mDNS without manually changing the firewall.
21 - Get DNS server address(es) from Windows and provide them to the uDNS layer.
22 - Implement TCP support for truncated packets (only stubs now).
23
24 */
25
26 #define _CRT_RAND_S
27
28 #include <stdarg.h>
29 #include <stddef.h>
30 #include <stdio.h>
31 #include <stdlib.h>
32 #include <crtdbg.h>
33 #include <string.h>
34
35 #include "Poll.h"
36 #include "CommonServices.h"
37 #include "DebugServices.h"
38 #include "Firewall.h"
39 #include "RegNames.h"
40 #include "Secret.h"
41 #include <dns_sd.h>
42
43 #include <Iphlpapi.h>
44 #include <mswsock.h>
45 #include <process.h>
46 #include <ntsecapi.h>
47 #include <lm.h>
48 #include <winioctl.h>
49 #include <ntddndis.h> // This defines the IOCTL constants.
50
51 #include "mDNSEmbeddedAPI.h"
52 #include "GenLinkedList.h"
53 #include "DNSCommon.h"
54 #include "mDNSWin32.h"
55 #include "dnssec.h"
56 #include "nsec.h"
57
58 #if 0
59 #pragma mark == Constants ==
60 #endif
61
62 //===========================================================================================================================
63 // Constants
64 //===========================================================================================================================
65
66 #define DEBUG_NAME "[mDNSWin32] "
67
68 #define MDNS_WINDOWS_USE_IPV6_IF_ADDRS 1
69 #define MDNS_WINDOWS_ENABLE_IPV4 1
70 #define MDNS_WINDOWS_ENABLE_IPV6 1
71 #define MDNS_FIX_IPHLPAPI_PREFIX_BUG 1
72 #define MDNS_SET_HINFO_STRINGS 0
73
74 #define kMDNSDefaultName "My Computer"
75
76 #define kWinSockMajorMin 2
77 #define kWinSockMinorMin 2
78
79 #define kRegistryMaxKeyLength 255
80 #define kRegistryMaxValueName 16383
81
82 static GUID kWSARecvMsgGUID = WSAID_WSARECVMSG;
83
84 #define kIPv6IfIndexBase (10000000L)
85 #define SMBPortAsNumber 445
86 #define DEVICE_PREFIX "\\\\.\\"
87
88 #if 0
89 #pragma mark == Prototypes ==
90 #endif
91
92 //===========================================================================================================================
93 // Prototypes
94 //===========================================================================================================================
95
96 mDNSlocal mStatus SetupNiceName( mDNS * const inMDNS );
97 mDNSlocal mStatus SetupHostName( mDNS * const inMDNS );
98 mDNSlocal mStatus SetupName( mDNS * const inMDNS );
99 mDNSlocal mStatus SetupInterface( mDNS * const inMDNS, const struct ifaddrs *inIFA, mDNSInterfaceData **outIFD );
100 mDNSlocal mStatus TearDownInterface( mDNS * const inMDNS, mDNSInterfaceData *inIFD );
101 mDNSlocal void CALLBACK FreeInterface( mDNSInterfaceData *inIFD );
102 mDNSlocal mStatus SetupSocket( mDNS * const inMDNS, const struct sockaddr *inAddr, mDNSIPPort port, SocketRef *outSocketRef );
103 mDNSlocal mStatus SockAddrToMDNSAddr( const struct sockaddr * const inSA, mDNSAddr *outIP, mDNSIPPort *outPort );
104 mDNSlocal OSStatus GetWindowsVersionString( char *inBuffer, size_t inBufferSize );
105 mDNSlocal int getifaddrs( struct ifaddrs **outAddrs );
106 mDNSlocal void freeifaddrs( struct ifaddrs *inAddrs );
107
108
109
110 // Platform Accessors
111
112 #ifdef __cplusplus
113 extern "C" {
114 #endif
115
116 typedef struct mDNSPlatformInterfaceInfo mDNSPlatformInterfaceInfo;
117 struct mDNSPlatformInterfaceInfo
118 {
119 const char * name;
120 mDNSAddr ip;
121 };
122
123
124 mDNSexport mStatus mDNSPlatformInterfaceNameToID( mDNS * const inMDNS, const char *inName, mDNSInterfaceID *outID );
125 mDNSexport mStatus mDNSPlatformInterfaceIDToInfo( mDNS * const inMDNS, mDNSInterfaceID inID, mDNSPlatformInterfaceInfo *outInfo );
126
127
128 // Wakeup Structs
129
130 #define kUnicastWakeupNumTries ( 1 )
131 #define kUnicastWakeupSleepBetweenTries ( 0 )
132 #define kMulticastWakeupNumTries ( 18 )
133 #define kMulticastWakeupSleepBetweenTries ( 100 )
134
135 typedef struct MulticastWakeupStruct
136 {
137 mDNS *inMDNS;
138 struct sockaddr_in addr;
139 INT addrLen;
140 unsigned char data[ 102 ];
141 INT dataLen;
142 INT numTries;
143 INT msecSleep;
144 } MulticastWakeupStruct;
145
146
147 // Utilities
148
149 #if( MDNS_WINDOWS_USE_IPV6_IF_ADDRS )
150 mDNSlocal int getifaddrs_ipv6( struct ifaddrs **outAddrs );
151 #endif
152
153 mDNSlocal int getifaddrs_ipv4( struct ifaddrs **outAddrs );
154
155
156 mDNSlocal DWORD GetPrimaryInterface();
157 mDNSlocal mStatus AddressToIndexAndMask( struct sockaddr * address, uint32_t * index, struct sockaddr * mask );
158 mDNSlocal mDNSBool CanReceiveUnicast( void );
159 mDNSlocal mDNSBool IsPointToPoint( IP_ADAPTER_UNICAST_ADDRESS * addr );
160
161 mDNSlocal mStatus StringToAddress( mDNSAddr * ip, LPSTR string );
162 mDNSlocal mStatus RegQueryString( HKEY key, LPCSTR param, LPSTR * string, DWORD * stringLen, DWORD * enabled );
163 mDNSlocal struct ifaddrs* myGetIfAddrs(int refresh);
164 mDNSlocal OSStatus TCHARtoUTF8( const TCHAR *inString, char *inBuffer, size_t inBufferSize );
165 mDNSlocal OSStatus WindowsLatin1toUTF8( const char *inString, char *inBuffer, size_t inBufferSize );
166 mDNSlocal void CALLBACK TCPSocketNotification( SOCKET sock, LPWSANETWORKEVENTS event, void *context );
167 mDNSlocal void TCPCloseSocket( TCPSocket * socket );
168 mDNSlocal void CALLBACK UDPSocketNotification( SOCKET sock, LPWSANETWORKEVENTS event, void *context );
169 mDNSlocal void UDPCloseSocket( UDPSocket * sock );
170 mDNSlocal mStatus SetupAddr(mDNSAddr *ip, const struct sockaddr *const sa);
171 mDNSlocal void GetDDNSFQDN( domainname *const fqdn );
172 #ifdef UNICODE
173 mDNSlocal void GetDDNSDomains( DNameListElem ** domains, LPCWSTR lpSubKey );
174 #else
175 mDNSlocal void GetDDNSDomains( DNameListElem ** domains, LPCSTR lpSubKey );
176 #endif
177 mDNSlocal void SetDomainSecrets( mDNS * const inMDNS );
178 mDNSlocal void SetDomainSecret( mDNS * const m, const domainname * inDomain );
179 mDNSlocal VOID CALLBACK CheckFileSharesProc( LPVOID arg, DWORD dwTimerLowValue, DWORD dwTimerHighValue );
180 mDNSlocal void CheckFileShares( mDNS * const inMDNS );
181 mDNSlocal void SMBCallback(mDNS *const m, ServiceRecordSet *const srs, mStatus result);
182 mDNSlocal mDNSu8 IsWOMPEnabledForAdapter( const char * adapterName );
183 mDNSlocal void SendWakeupPacket( mDNS * const inMDNS, LPSOCKADDR addr, INT addrlen, const char * buf, INT buflen, INT numTries, INT msecSleep );
184 mDNSlocal void _cdecl SendMulticastWakeupPacket( void *arg );
185
186 #ifdef __cplusplus
187 }
188 #endif
189
190 #if 0
191 #pragma mark == Globals ==
192 #endif
193
194 //===========================================================================================================================
195 // Globals
196 //===========================================================================================================================
197
198 mDNSlocal mDNS_PlatformSupport gMDNSPlatformSupport;
199 mDNSs32 mDNSPlatformOneSecond = 0;
200 mDNSlocal UDPSocket * gUDPSockets = NULL;
201 mDNSlocal int gUDPNumSockets = 0;
202 mDNSlocal BOOL gEnableIPv6 = TRUE;
203
204 #if( MDNS_WINDOWS_USE_IPV6_IF_ADDRS )
205
206 typedef DWORD
207 ( WINAPI * GetAdaptersAddressesFunctionPtr )(
208 ULONG inFamily,
209 DWORD inFlags,
210 PVOID inReserved,
211 PIP_ADAPTER_ADDRESSES inAdapter,
212 PULONG outBufferSize );
213
214 mDNSlocal HMODULE gIPHelperLibraryInstance = NULL;
215 mDNSlocal GetAdaptersAddressesFunctionPtr gGetAdaptersAddressesFunctionPtr = NULL;
216
217 #endif
218
219
220 #ifndef HCRYPTPROV
221 typedef ULONG_PTR HCRYPTPROV; // WinCrypt.h, line 249
222 #endif
223
224
225 #ifndef CRYPT_MACHINE_KEYSET
226 # define CRYPT_MACHINE_KEYSET 0x00000020
227 #endif
228
229 #ifndef CRYPT_NEWKEYSET
230 # define CRYPT_NEWKEYSET 0x00000008
231 #endif
232
233 #ifndef PROV_RSA_FULL
234 # define PROV_RSA_FULL 1
235 #endif
236
237 typedef BOOL (__stdcall *fnCryptGenRandom)( HCRYPTPROV, DWORD, BYTE* );
238 typedef BOOL (__stdcall *fnCryptAcquireContext)( HCRYPTPROV*, LPCTSTR, LPCTSTR, DWORD, DWORD);
239 typedef BOOL (__stdcall *fnCryptReleaseContext)(HCRYPTPROV, DWORD);
240
241 static fnCryptAcquireContext g_lpCryptAcquireContext = NULL;
242 static fnCryptReleaseContext g_lpCryptReleaseContext = NULL;
243 static fnCryptGenRandom g_lpCryptGenRandom = NULL;
244 static HINSTANCE g_hAAPI32 = NULL;
245 static HCRYPTPROV g_hProvider = ( ULONG_PTR ) NULL;
246
247
248 typedef DNSServiceErrorType ( DNSSD_API *DNSServiceRegisterFunc )
249 (
250 DNSServiceRef *sdRef,
251 DNSServiceFlags flags,
252 uint32_t interfaceIndex,
253 const char *name, /* may be NULL */
254 const char *regtype,
255 const char *domain, /* may be NULL */
256 const char *host, /* may be NULL */
257 uint16_t port,
258 uint16_t txtLen,
259 const void *txtRecord, /* may be NULL */
260 DNSServiceRegisterReply callBack, /* may be NULL */
261 void *context /* may be NULL */
262 );
263
264
265 typedef void ( DNSSD_API *DNSServiceRefDeallocateFunc )( DNSServiceRef sdRef );
266
267 mDNSlocal HMODULE gDNSSDLibrary = NULL;
268 mDNSlocal DNSServiceRegisterFunc gDNSServiceRegister = NULL;
269 mDNSlocal DNSServiceRefDeallocateFunc gDNSServiceRefDeallocate = NULL;
270 mDNSlocal HANDLE gSMBThread = NULL;
271 mDNSlocal HANDLE gSMBThreadRegisterEvent = NULL;
272 mDNSlocal HANDLE gSMBThreadDeregisterEvent = NULL;
273 mDNSlocal HANDLE gSMBThreadStopEvent = NULL;
274 mDNSlocal HANDLE gSMBThreadQuitEvent = NULL;
275
276 #define kSMBStopEvent ( WAIT_OBJECT_0 + 0 )
277 #define kSMBRegisterEvent ( WAIT_OBJECT_0 + 1 )
278 #define kSMBDeregisterEvent ( WAIT_OBJECT_0 + 2 )
279
280
281 #if 0
282 #pragma mark -
283 #pragma mark == Platform Support ==
284 #endif
285
286 //===========================================================================================================================
287 // mDNSPlatformInit
288 //===========================================================================================================================
289
290 mDNSexport mStatus mDNSPlatformInit( mDNS * const inMDNS )
291 {
292 mStatus err;
293 OSVERSIONINFO osInfo;
294 BOOL ok;
295 WSADATA wsaData;
296 int supported;
297 struct sockaddr_in sa4;
298 struct sockaddr_in6 sa6;
299 int sa4len;
300 int sa6len;
301 DWORD size;
302
303 dlog( kDebugLevelTrace, DEBUG_NAME "platform init\n" );
304
305 // Initialize variables. If the PlatformSupport pointer is not null then just assume that a non-Apple client is
306 // calling mDNS_Init and wants to provide its own storage for the platform-specific data so do not overwrite it.
307
308 mDNSPlatformMemZero( &gMDNSPlatformSupport, sizeof( gMDNSPlatformSupport ) );
309 if( !inMDNS->p ) inMDNS->p = &gMDNSPlatformSupport;
310 inMDNS->p->mainThread = OpenThread( THREAD_ALL_ACCESS, FALSE, GetCurrentThreadId() );
311 require_action( inMDNS->p->mainThread, exit, err = mStatus_UnknownErr );
312 inMDNS->p->checkFileSharesTimer = CreateWaitableTimer( NULL, FALSE, NULL );
313 require_action( inMDNS->p->checkFileSharesTimer, exit, err = mStatus_UnknownErr );
314 inMDNS->p->checkFileSharesTimeout = 10; // Retry time for CheckFileShares() in seconds
315 mDNSPlatformOneSecond = 1000; // Use milliseconds as the quantum of time
316
317 // Get OS version info
318
319 osInfo.dwOSVersionInfoSize = sizeof( OSVERSIONINFO );
320 ok = GetVersionEx( &osInfo );
321 err = translate_errno( ok, (OSStatus) GetLastError(), kUnknownErr );
322 require_noerr( err, exit );
323 inMDNS->p->osMajorVersion = osInfo.dwMajorVersion;
324 inMDNS->p->osMinorVersion = osInfo.dwMinorVersion;
325
326 // Don't enable IPv6 on anything less recent than Windows Vista
327
328 if ( inMDNS->p->osMajorVersion < 6 )
329 {
330 gEnableIPv6 = FALSE;
331 }
332
333 // Startup WinSock 2.2 or later.
334
335 err = WSAStartup( MAKEWORD( kWinSockMajorMin, kWinSockMinorMin ), &wsaData );
336 require_noerr( err, exit );
337
338 supported = ( ( LOBYTE( wsaData.wVersion ) == kWinSockMajorMin ) && ( HIBYTE( wsaData.wVersion ) == kWinSockMinorMin ) );
339 require_action( supported, exit, err = mStatus_UnsupportedErr );
340
341 inMDNS->CanReceiveUnicastOn5353 = CanReceiveUnicast();
342
343 // Setup the HINFO HW strings.
344 //<rdar://problem/7245119> device-info should have model=Windows
345
346 strcpy_s( ( char* ) &inMDNS->HIHardware.c[ 1 ], sizeof( inMDNS->HIHardware.c ) - 2, "Windows" );
347 inMDNS->HIHardware.c[ 0 ] = ( mDNSu8 ) mDNSPlatformStrLen( &inMDNS->HIHardware.c[ 1 ] );
348 dlog( kDebugLevelInfo, DEBUG_NAME "HIHardware: %#s\n", inMDNS->HIHardware.c );
349
350 // Setup the HINFO SW strings.
351 #if ( MDNS_SET_HINFO_STRINGS )
352 mDNS_snprintf( (char *) &inMDNS->HISoftware.c[ 1 ], sizeof( inMDNS->HISoftware.c ) - 2,
353 "mDNSResponder (%s %s)", __DATE__, __TIME__ );
354 inMDNS->HISoftware.c[ 0 ] = (mDNSu8) mDNSPlatformStrLen( &inMDNS->HISoftware.c[ 1 ] );
355 dlog( kDebugLevelInfo, DEBUG_NAME "HISoftware: %#s\n", inMDNS->HISoftware.c );
356 #endif
357
358 // Set up the IPv4 unicast socket
359
360 inMDNS->p->unicastSock4.fd = INVALID_SOCKET;
361 inMDNS->p->unicastSock4.recvMsgPtr = NULL;
362 inMDNS->p->unicastSock4.ifd = NULL;
363 inMDNS->p->unicastSock4.next = NULL;
364 inMDNS->p->unicastSock4.m = inMDNS;
365
366 #if ( MDNS_WINDOWS_ENABLE_IPV4 )
367
368 sa4.sin_family = AF_INET;
369 sa4.sin_addr.s_addr = INADDR_ANY;
370 err = SetupSocket( inMDNS, (const struct sockaddr*) &sa4, zeroIPPort, &inMDNS->p->unicastSock4.fd );
371 check_noerr( err );
372 sa4len = sizeof( sa4 );
373 err = getsockname( inMDNS->p->unicastSock4.fd, (struct sockaddr*) &sa4, &sa4len );
374 require_noerr( err, exit );
375 inMDNS->p->unicastSock4.port.NotAnInteger = sa4.sin_port;
376 inMDNS->UnicastPort4 = inMDNS->p->unicastSock4.port;
377 err = WSAIoctl( inMDNS->p->unicastSock4.fd, SIO_GET_EXTENSION_FUNCTION_POINTER, &kWSARecvMsgGUID, sizeof( kWSARecvMsgGUID ), &inMDNS->p->unicastSock4.recvMsgPtr, sizeof( inMDNS->p->unicastSock4.recvMsgPtr ), &size, NULL, NULL );
378
379 if ( err )
380 {
381 inMDNS->p->unicastSock4.recvMsgPtr = NULL;
382 }
383
384 err = mDNSPollRegisterSocket( inMDNS->p->unicastSock4.fd, FD_READ, UDPSocketNotification, &inMDNS->p->unicastSock4 );
385 require_noerr( err, exit );
386
387 #endif
388
389 // Set up the IPv6 unicast socket
390
391 inMDNS->p->unicastSock6.fd = INVALID_SOCKET;
392 inMDNS->p->unicastSock6.recvMsgPtr = NULL;
393 inMDNS->p->unicastSock6.ifd = NULL;
394 inMDNS->p->unicastSock6.next = NULL;
395 inMDNS->p->unicastSock6.m = inMDNS;
396
397 #if ( MDNS_WINDOWS_ENABLE_IPV6 )
398
399 if ( gEnableIPv6 )
400 {
401 sa6.sin6_family = AF_INET6;
402 sa6.sin6_addr = in6addr_any;
403 sa6.sin6_scope_id = 0;
404
405 // This call will fail if the machine hasn't installed IPv6. In that case,
406 // the error will be WSAEAFNOSUPPORT.
407
408 err = SetupSocket( inMDNS, (const struct sockaddr*) &sa6, zeroIPPort, &inMDNS->p->unicastSock6.fd );
409 require_action( !err || ( err == WSAEAFNOSUPPORT ), exit, err = (mStatus) WSAGetLastError() );
410 err = kNoErr;
411
412 // If we weren't able to create the socket (because IPv6 hasn't been installed) don't do this
413
414 if ( inMDNS->p->unicastSock6.fd != INVALID_SOCKET )
415 {
416 sa6len = sizeof( sa6 );
417 err = getsockname( inMDNS->p->unicastSock6.fd, (struct sockaddr*) &sa6, &sa6len );
418 require_noerr( err, exit );
419 inMDNS->p->unicastSock6.port.NotAnInteger = sa6.sin6_port;
420 inMDNS->UnicastPort6 = inMDNS->p->unicastSock6.port;
421
422 err = WSAIoctl( inMDNS->p->unicastSock6.fd, SIO_GET_EXTENSION_FUNCTION_POINTER, &kWSARecvMsgGUID, sizeof( kWSARecvMsgGUID ), &inMDNS->p->unicastSock6.recvMsgPtr, sizeof( inMDNS->p->unicastSock6.recvMsgPtr ), &size, NULL, NULL );
423
424 if ( err != 0 )
425 {
426 inMDNS->p->unicastSock6.recvMsgPtr = NULL;
427 }
428
429 err = mDNSPollRegisterSocket( inMDNS->p->unicastSock6.fd, FD_READ, UDPSocketNotification, &inMDNS->p->unicastSock6 );
430 require_noerr( err, exit );
431 }
432 }
433
434 #endif
435
436 // Notify core of domain secret keys
437
438 SetDomainSecrets( inMDNS );
439
440 // Success!
441
442 mDNSCoreInitComplete( inMDNS, err );
443
444
445 exit:
446
447 if ( err )
448 {
449 mDNSPlatformClose( inMDNS );
450 }
451
452 dlog( kDebugLevelTrace, DEBUG_NAME "platform init done (err=%d %m)\n", err, err );
453 return( err );
454 }
455
456 //===========================================================================================================================
457 // mDNSPlatformClose
458 //===========================================================================================================================
459
460 mDNSexport void mDNSPlatformClose( mDNS * const inMDNS )
461 {
462 mStatus err;
463
464 dlog( kDebugLevelTrace, DEBUG_NAME "platform close\n" );
465 check( inMDNS );
466
467 if ( gSMBThread != NULL )
468 {
469 dlog( kDebugLevelTrace, DEBUG_NAME "tearing down smb registration thread\n" );
470 SetEvent( gSMBThreadStopEvent );
471
472 if ( WaitForSingleObject( gSMBThreadQuitEvent, 5 * 1000 ) == WAIT_OBJECT_0 )
473 {
474 if ( gSMBThreadQuitEvent )
475 {
476 CloseHandle( gSMBThreadQuitEvent );
477 gSMBThreadQuitEvent = NULL;
478 }
479
480 if ( gSMBThreadStopEvent )
481 {
482 CloseHandle( gSMBThreadStopEvent );
483 gSMBThreadStopEvent = NULL;
484 }
485
486 if ( gSMBThreadDeregisterEvent )
487 {
488 CloseHandle( gSMBThreadDeregisterEvent );
489 gSMBThreadDeregisterEvent = NULL;
490 }
491
492 if ( gSMBThreadRegisterEvent )
493 {
494 CloseHandle( gSMBThreadRegisterEvent );
495 gSMBThreadRegisterEvent = NULL;
496 }
497
498 if ( gDNSSDLibrary )
499 {
500 FreeLibrary( gDNSSDLibrary );
501 gDNSSDLibrary = NULL;
502 }
503 }
504 else
505 {
506 LogMsg( "Unable to stop SMBThread" );
507 }
508
509 inMDNS->p->smbFileSharing = mDNSfalse;
510 inMDNS->p->smbPrintSharing = mDNSfalse;
511 }
512
513 // Tear everything down in reverse order to how it was set up.
514
515 err = TearDownInterfaceList( inMDNS );
516 check_noerr( err );
517 check( !inMDNS->p->inactiveInterfaceList );
518
519 #if ( MDNS_WINDOWS_ENABLE_IPV4 )
520
521 UDPCloseSocket( &inMDNS->p->unicastSock4 );
522
523 #endif
524
525 #if ( MDNS_WINDOWS_ENABLE_IPV6 )
526
527 if ( gEnableIPv6 )
528 {
529 UDPCloseSocket( &inMDNS->p->unicastSock6 );
530 }
531
532 #endif
533
534 // Free the DLL needed for IPv6 support.
535
536 #if( MDNS_WINDOWS_USE_IPV6_IF_ADDRS )
537 if( gIPHelperLibraryInstance )
538 {
539 gGetAdaptersAddressesFunctionPtr = NULL;
540
541 FreeLibrary( gIPHelperLibraryInstance );
542 gIPHelperLibraryInstance = NULL;
543 }
544 #endif
545
546 if ( g_hAAPI32 )
547 {
548 // Release any resources
549
550 if ( g_hProvider && g_lpCryptReleaseContext )
551 {
552 ( g_lpCryptReleaseContext )( g_hProvider, 0 );
553 }
554
555 // Free the AdvApi32.dll
556
557 FreeLibrary( g_hAAPI32 );
558
559 // And reset all the data
560
561 g_lpCryptAcquireContext = NULL;
562 g_lpCryptReleaseContext = NULL;
563 g_lpCryptGenRandom = NULL;
564 g_hProvider = ( ULONG_PTR ) NULL;
565 g_hAAPI32 = NULL;
566 }
567
568 WSACleanup();
569
570 dlog( kDebugLevelTrace, DEBUG_NAME "platform close done\n" );
571 }
572
573
574 //===========================================================================================================================
575 // mDNSPlatformLock
576 //===========================================================================================================================
577
578 mDNSexport void mDNSPlatformLock( const mDNS * const inMDNS )
579 {
580 ( void ) inMDNS;
581 }
582
583 //===========================================================================================================================
584 // mDNSPlatformUnlock
585 //===========================================================================================================================
586
587 mDNSexport void mDNSPlatformUnlock( const mDNS * const inMDNS )
588 {
589 ( void ) inMDNS;
590 }
591
592 //===========================================================================================================================
593 // mDNSPlatformStrCopy
594 //===========================================================================================================================
595
596 mDNSexport void mDNSPlatformStrCopy( void *inDst, const void *inSrc )
597 {
598 check( inSrc );
599 check( inDst );
600
601 strcpy( (char *) inDst, (const char*) inSrc );
602 }
603
604 //===========================================================================================================================
605 // mDNSPlatformStrLen
606 //===========================================================================================================================
607
608 mDNSexport mDNSu32 mDNSPlatformStrLen( const void *inSrc )
609 {
610 check( inSrc );
611
612 return( (mDNSu32) strlen( (const char *) inSrc ) );
613 }
614
615 //===========================================================================================================================
616 // mDNSPlatformMemCopy
617 //===========================================================================================================================
618
619 mDNSexport void mDNSPlatformMemCopy( void *inDst, const void *inSrc, mDNSu32 inSize )
620 {
621 check( inSrc );
622 check( inDst );
623
624 memcpy( inDst, inSrc, inSize );
625 }
626
627 //===========================================================================================================================
628 // mDNSPlatformMemSame
629 //===========================================================================================================================
630
631 mDNSexport mDNSBool mDNSPlatformMemSame( const void *inDst, const void *inSrc, mDNSu32 inSize )
632 {
633 check( inSrc );
634 check( inDst );
635
636 return( (mDNSBool)( memcmp( inSrc, inDst, inSize ) == 0 ) );
637 }
638
639 //===========================================================================================================================
640 // mDNSPlatformMemCmp
641 //===========================================================================================================================
642
643 mDNSexport int mDNSPlatformMemCmp( const void *inDst, const void *inSrc, mDNSu32 inSize )
644 {
645 check( inSrc );
646 check( inDst );
647
648 return( memcmp( inSrc, inDst, inSize ) );
649 }
650
651 mDNSexport void mDNSPlatformQsort(void *base, int nel, int width, int (*compar)(const void *, const void *))
652 {
653 (void)base;
654 (void)nel;
655 (void)width;
656 (void)compar;
657 }
658
659 // DNSSEC stub functions
660 mDNSexport void VerifySignature(mDNS *const m, DNSSECVerifier *dv, DNSQuestion *q)
661 {
662 (void)m;
663 (void)dv;
664 (void)q;
665 }
666
667 mDNSexport mDNSBool AddNSECSForCacheRecord(mDNS *const m, CacheRecord *crlist, CacheRecord *negcr, mDNSu8 rcode)
668 {
669 (void)m;
670 (void)crlist;
671 (void)negcr;
672 (void)rcode;
673 return mDNSfalse;
674 }
675
676 mDNSexport void BumpDNSSECStats(mDNS *const m, DNSSECStatsAction action, DNSSECStatsType type, mDNSu32 value)
677 {
678 (void)m;
679 (void)action;
680 (void)type;
681 (void)value;
682 }
683
684 // Proxy stub functions
685 mDNSexport mDNSu8 *DNSProxySetAttributes(DNSQuestion *q, DNSMessageHeader *h, DNSMessage *msg, mDNSu8 *ptr, mDNSu8 *limit)
686 {
687 (void) q;
688 (void) h;
689 (void) msg;
690 (void) ptr;
691 (void) limit;
692
693 return ptr;
694 }
695
696 mDNSexport void DNSProxyInit(mDNS *const m, mDNSu32 IpIfArr[], mDNSu32 OpIf)
697 {
698 (void) m;
699 (void) IpIfArr;
700 (void) OpIf;
701 }
702
703 mDNSexport void DNSProxyTerminate(mDNS *const m)
704 {
705 (void) m;
706 }
707
708 //===========================================================================================================================
709 // mDNSPlatformMemZero
710 //===========================================================================================================================
711
712 mDNSexport void mDNSPlatformMemZero( void *inDst, mDNSu32 inSize )
713 {
714 check( inDst );
715
716 memset( inDst, 0, inSize );
717 }
718
719 //===========================================================================================================================
720 // mDNSPlatformMemAllocate
721 //===========================================================================================================================
722
723 mDNSexport void * mDNSPlatformMemAllocate( mDNSu32 inSize )
724 {
725 void * mem;
726
727 check( inSize > 0 );
728
729 mem = malloc( inSize );
730 check( mem );
731
732 return( mem );
733 }
734
735 //===========================================================================================================================
736 // mDNSPlatformMemFree
737 //===========================================================================================================================
738
739 mDNSexport void mDNSPlatformMemFree( void *inMem )
740 {
741 check( inMem );
742
743 free( inMem );
744 }
745
746 //===========================================================================================================================
747 // mDNSPlatformRandomNumber
748 //===========================================================================================================================
749
750 mDNSexport mDNSu32 mDNSPlatformRandomNumber(void)
751 {
752 unsigned int randomNumber;
753 errno_t err;
754
755 err = rand_s( &randomNumber );
756 require_noerr( err, exit );
757
758 exit:
759
760 if ( err )
761 {
762 randomNumber = rand();
763 }
764
765 return ( mDNSu32 ) randomNumber;
766 }
767
768 //===========================================================================================================================
769 // mDNSPlatformTimeInit
770 //===========================================================================================================================
771
772 mDNSexport mStatus mDNSPlatformTimeInit( void )
773 {
774 // No special setup is required on Windows -- we just use GetTickCount().
775 return( mStatus_NoError );
776 }
777
778 //===========================================================================================================================
779 // mDNSPlatformRawTime
780 //===========================================================================================================================
781
782 mDNSexport mDNSs32 mDNSPlatformRawTime( void )
783 {
784 return( (mDNSs32) GetTickCount() );
785 }
786
787 //===========================================================================================================================
788 // mDNSPlatformUTC
789 //===========================================================================================================================
790
791 mDNSexport mDNSs32 mDNSPlatformUTC( void )
792 {
793 return ( mDNSs32 ) time( NULL );
794 }
795
796 //===========================================================================================================================
797 // mDNSPlatformInterfaceNameToID
798 //===========================================================================================================================
799
800 mDNSexport mStatus mDNSPlatformInterfaceNameToID( mDNS * const inMDNS, const char *inName, mDNSInterfaceID *outID )
801 {
802 mStatus err;
803 mDNSInterfaceData * ifd;
804
805 check( inMDNS );
806 check( inMDNS->p );
807 check( inName );
808
809 // Search for an interface with the specified name,
810
811 for( ifd = inMDNS->p->interfaceList; ifd; ifd = ifd->next )
812 {
813 if( strcmp( ifd->name, inName ) == 0 )
814 {
815 break;
816 }
817 }
818 require_action_quiet( ifd, exit, err = mStatus_NoSuchNameErr );
819
820 // Success!
821
822 if( outID )
823 {
824 *outID = (mDNSInterfaceID) ifd;
825 }
826 err = mStatus_NoError;
827
828 exit:
829 return( err );
830 }
831
832 //===========================================================================================================================
833 // mDNSPlatformInterfaceIDToInfo
834 //===========================================================================================================================
835
836 mDNSexport mStatus mDNSPlatformInterfaceIDToInfo( mDNS * const inMDNS, mDNSInterfaceID inID, mDNSPlatformInterfaceInfo *outInfo )
837 {
838 mStatus err;
839 mDNSInterfaceData * ifd;
840
841 check( inMDNS );
842 check( inID );
843 check( outInfo );
844
845 // Search for an interface with the specified ID,
846
847 for( ifd = inMDNS->p->interfaceList; ifd; ifd = ifd->next )
848 {
849 if( ifd == (mDNSInterfaceData *) inID )
850 {
851 break;
852 }
853 }
854 require_action_quiet( ifd, exit, err = mStatus_NoSuchNameErr );
855
856 // Success!
857
858 outInfo->name = ifd->name;
859 outInfo->ip = ifd->interfaceInfo.ip;
860 err = mStatus_NoError;
861
862 exit:
863 return( err );
864 }
865
866 //===========================================================================================================================
867 // mDNSPlatformInterfaceIDfromInterfaceIndex
868 //===========================================================================================================================
869
870 mDNSexport mDNSInterfaceID mDNSPlatformInterfaceIDfromInterfaceIndex( mDNS * const inMDNS, mDNSu32 inIndex )
871 {
872 mDNSInterfaceID id;
873
874 id = mDNSNULL;
875 if( inIndex == kDNSServiceInterfaceIndexLocalOnly )
876 {
877 id = mDNSInterface_LocalOnly;
878 }
879 else if( inIndex != 0 )
880 {
881 mDNSInterfaceData * ifd;
882
883 for( ifd = inMDNS->p->interfaceList; ifd; ifd = ifd->next )
884 {
885 if( ( ifd->scopeID == inIndex ) && ifd->interfaceInfo.InterfaceActive )
886 {
887 id = ifd->interfaceInfo.InterfaceID;
888 break;
889 }
890 }
891 check( ifd );
892 }
893 return( id );
894 }
895
896 //===========================================================================================================================
897 // mDNSPlatformInterfaceIndexfromInterfaceID
898 //===========================================================================================================================
899
900 mDNSexport mDNSu32 mDNSPlatformInterfaceIndexfromInterfaceID( mDNS * const inMDNS, mDNSInterfaceID inID, mDNSBool suppressNetworkChange )
901 {
902 mDNSu32 index;
903
904 (void) suppressNetworkChange;
905
906 index = 0;
907 if( inID == mDNSInterface_LocalOnly )
908 {
909 index = (mDNSu32) kDNSServiceInterfaceIndexLocalOnly;
910 }
911 else if( inID )
912 {
913 mDNSInterfaceData * ifd;
914
915 // Search active interfaces.
916 for( ifd = inMDNS->p->interfaceList; ifd; ifd = ifd->next )
917 {
918 if( (mDNSInterfaceID) ifd == inID )
919 {
920 index = ifd->scopeID;
921 break;
922 }
923 }
924
925 // Search inactive interfaces too so remove events for inactive interfaces report the old interface index.
926
927 if( !ifd )
928 {
929 for( ifd = inMDNS->p->inactiveInterfaceList; ifd; ifd = ifd->next )
930 {
931 if( (mDNSInterfaceID) ifd == inID )
932 {
933 index = ifd->scopeID;
934 break;
935 }
936 }
937 }
938 check( ifd );
939 }
940 return( index );
941 }
942
943
944 //===========================================================================================================================
945 // mDNSPlatformTCPSocket
946 //===========================================================================================================================
947
948 TCPSocket *
949 mDNSPlatformTCPSocket
950 (
951 mDNS * const m,
952 TCPSocketFlags flags,
953 mDNSIPPort * port,
954 mDNSBool useBackgroundTrafficClass
955 )
956 {
957 TCPSocket * sock = NULL;
958 u_long on = 1; // "on" for setsockopt
959 struct sockaddr_in saddr;
960 int len;
961 mStatus err = mStatus_NoError;
962
963 DEBUG_UNUSED( m );
964 DEBUG_UNUSED( useBackgroundTrafficClass );
965
966 require_action( flags == 0, exit, err = mStatus_UnsupportedErr );
967
968 // Setup connection data object
969
970 sock = (TCPSocket *) malloc( sizeof( TCPSocket ) );
971 require_action( sock, exit, err = mStatus_NoMemoryErr );
972 mDNSPlatformMemZero( sock, sizeof( TCPSocket ) );
973 sock->fd = INVALID_SOCKET;
974 sock->flags = flags;
975 sock->m = m;
976
977 mDNSPlatformMemZero(&saddr, sizeof(saddr));
978 saddr.sin_family = AF_INET;
979 saddr.sin_addr.s_addr = htonl( INADDR_ANY );
980 saddr.sin_port = port->NotAnInteger;
981
982 // Create the socket
983
984 sock->fd = socket(AF_INET, SOCK_STREAM, 0);
985 err = translate_errno( sock->fd != INVALID_SOCKET, WSAGetLastError(), mStatus_UnknownErr );
986 require_noerr( err, exit );
987
988 // bind
989
990 err = bind( sock->fd, ( struct sockaddr* ) &saddr, sizeof( saddr ) );
991 err = translate_errno( err == 0, WSAGetLastError(), mStatus_UnknownErr );
992 require_noerr( err, exit );
993
994 // Set it to be non-blocking
995
996 err = ioctlsocket( sock->fd, FIONBIO, &on );
997 err = translate_errno( err == 0, WSAGetLastError(), mStatus_UnknownErr );
998 require_noerr( err, exit );
999
1000 // Get port number
1001
1002 mDNSPlatformMemZero( &saddr, sizeof( saddr ) );
1003 len = sizeof( saddr );
1004
1005 err = getsockname( sock->fd, ( struct sockaddr* ) &saddr, &len );
1006 err = translate_errno( err == 0, WSAGetLastError(), mStatus_UnknownErr );
1007 require_noerr( err, exit );
1008
1009 port->NotAnInteger = saddr.sin_port;
1010
1011 exit:
1012
1013 if ( err && sock )
1014 {
1015 TCPCloseSocket( sock );
1016 free( sock );
1017 sock = mDNSNULL;
1018 }
1019
1020 return sock;
1021 }
1022
1023 //===========================================================================================================================
1024 // mDNSPlatformTCPConnect
1025 //===========================================================================================================================
1026
1027 mStatus
1028 mDNSPlatformTCPConnect
1029 (
1030 TCPSocket * sock,
1031 const mDNSAddr * inDstIP,
1032 mDNSOpaque16 inDstPort,
1033 domainname * hostname,
1034 mDNSInterfaceID inInterfaceID,
1035 TCPConnectionCallback inCallback,
1036 void * inContext
1037 )
1038 {
1039 struct sockaddr_in saddr;
1040 mStatus err = mStatus_NoError;
1041
1042 DEBUG_UNUSED( hostname );
1043 DEBUG_UNUSED( inInterfaceID );
1044
1045 if ( inDstIP->type != mDNSAddrType_IPv4 )
1046 {
1047 LogMsg("ERROR: mDNSPlatformTCPConnect - attempt to connect to an IPv6 address: operation not supported");
1048 return mStatus_UnknownErr;
1049 }
1050
1051 // Setup connection data object
1052
1053 sock->userCallback = inCallback;
1054 sock->userContext = inContext;
1055
1056 mDNSPlatformMemZero(&saddr, sizeof(saddr));
1057 saddr.sin_family = AF_INET;
1058 saddr.sin_port = inDstPort.NotAnInteger;
1059 memcpy(&saddr.sin_addr, &inDstIP->ip.v4.NotAnInteger, sizeof(saddr.sin_addr));
1060
1061 // Try and do connect
1062
1063 err = connect( sock->fd, ( struct sockaddr* ) &saddr, sizeof( saddr ) );
1064 require_action( !err || ( WSAGetLastError() == WSAEWOULDBLOCK ), exit, err = mStatus_ConnFailed );
1065 sock->connected = !err ? TRUE : FALSE;
1066
1067 err = mDNSPollRegisterSocket( sock->fd, FD_CONNECT | FD_READ | FD_CLOSE, TCPSocketNotification, sock );
1068 require_noerr( err, exit );
1069
1070 exit:
1071
1072 if ( !err )
1073 {
1074 err = sock->connected ? mStatus_ConnEstablished : mStatus_ConnPending;
1075 }
1076
1077 return err;
1078 }
1079
1080
1081 //===========================================================================================================================
1082 // mDNSPlatformTCPAccept
1083 //===========================================================================================================================
1084
1085 mDNSexport
1086 mDNSexport TCPSocket *mDNSPlatformTCPAccept( TCPSocketFlags flags, int fd )
1087 {
1088 TCPSocket * sock = NULL;
1089 mStatus err = mStatus_NoError;
1090
1091 require_action( !flags, exit, err = mStatus_UnsupportedErr );
1092
1093 sock = malloc( sizeof( TCPSocket ) );
1094 require_action( sock, exit, err = mStatus_NoMemoryErr );
1095
1096 mDNSPlatformMemZero( sock, sizeof( *sock ) );
1097
1098 sock->fd = fd;
1099 sock->flags = flags;
1100
1101 exit:
1102
1103 if ( err && sock )
1104 {
1105 free( sock );
1106 sock = NULL;
1107 }
1108
1109 return sock;
1110 }
1111
1112
1113 //===========================================================================================================================
1114 // mDNSPlatformTCPCloseConnection
1115 //===========================================================================================================================
1116
1117 mDNSexport void mDNSPlatformTCPCloseConnection( TCPSocket *sock )
1118 {
1119 check( sock );
1120
1121 if ( sock )
1122 {
1123 dlog( kDebugLevelChatty, DEBUG_NAME "mDNSPlatformTCPCloseConnection 0x%x:%d\n", sock, sock->fd );
1124
1125 if ( sock->fd != INVALID_SOCKET )
1126 {
1127 mDNSPollUnregisterSocket( sock->fd );
1128 closesocket( sock->fd );
1129 sock->fd = INVALID_SOCKET;
1130 }
1131
1132 free( sock );
1133 }
1134 }
1135
1136
1137 //===========================================================================================================================
1138 // mDNSPlatformReadTCP
1139 //===========================================================================================================================
1140
1141 mDNSexport long mDNSPlatformReadTCP( TCPSocket *sock, void *inBuffer, unsigned long inBufferSize, mDNSBool * closed )
1142 {
1143 int nread;
1144 OSStatus err;
1145
1146 *closed = mDNSfalse;
1147 nread = recv( sock->fd, inBuffer, inBufferSize, 0 );
1148 err = translate_errno( ( nread >= 0 ), WSAGetLastError(), mStatus_UnknownErr );
1149
1150 if ( nread > 0 )
1151 {
1152 dlog( kDebugLevelChatty, DEBUG_NAME "mDNSPlatformReadTCP: 0x%x:%d read %d bytes\n", sock, sock->fd, nread );
1153 }
1154 else if ( !nread )
1155 {
1156 *closed = mDNStrue;
1157 }
1158 else if ( err == WSAECONNRESET )
1159 {
1160 *closed = mDNStrue;
1161 nread = 0;
1162 }
1163 else if ( err == WSAEWOULDBLOCK )
1164 {
1165 nread = 0;
1166 }
1167 else
1168 {
1169 LogMsg( "ERROR: mDNSPlatformReadTCP - recv: %d\n", err );
1170 nread = -1;
1171 }
1172
1173 return nread;
1174 }
1175
1176
1177 //===========================================================================================================================
1178 // mDNSPlatformWriteTCP
1179 //===========================================================================================================================
1180
1181 mDNSexport long mDNSPlatformWriteTCP( TCPSocket *sock, const char *inMsg, unsigned long inMsgSize )
1182 {
1183 int nsent;
1184 OSStatus err;
1185
1186 nsent = send( sock->fd, inMsg, inMsgSize, 0 );
1187
1188 err = translate_errno( ( nsent >= 0 ) || ( WSAGetLastError() == WSAEWOULDBLOCK ), WSAGetLastError(), mStatus_UnknownErr );
1189 require_noerr( err, exit );
1190
1191 if ( nsent < 0)
1192 {
1193 nsent = 0;
1194 }
1195
1196 exit:
1197
1198 return nsent;
1199 }
1200
1201 //===========================================================================================================================
1202 // mDNSPlatformTCPGetFD
1203 //===========================================================================================================================
1204
1205 mDNSexport int mDNSPlatformTCPGetFD(TCPSocket *sock )
1206 {
1207 return ( int ) sock->fd;
1208 }
1209
1210
1211
1212 //===========================================================================================================================
1213 // TCPSocketNotification
1214 //===========================================================================================================================
1215
1216 mDNSlocal void CALLBACK
1217 TCPSocketNotification( SOCKET sock, LPWSANETWORKEVENTS event, void *context )
1218 {
1219 TCPSocket *tcpSock = ( TCPSocket* ) context;
1220 TCPConnectionCallback callback;
1221 int err;
1222
1223 DEBUG_UNUSED( sock );
1224
1225 require_action( tcpSock, exit, err = mStatus_BadParamErr );
1226 callback = ( TCPConnectionCallback ) tcpSock->userCallback;
1227 require_action( callback, exit, err = mStatus_BadParamErr );
1228
1229 if ( event && ( event->lNetworkEvents & FD_CONNECT ) )
1230 {
1231 if ( event->iErrorCode[ FD_CONNECT_BIT ] == 0 )
1232 {
1233 callback( tcpSock, tcpSock->userContext, mDNStrue, 0 );
1234 tcpSock->connected = mDNStrue;
1235 }
1236 else
1237 {
1238 callback( tcpSock, tcpSock->userContext, mDNSfalse, event->iErrorCode[ FD_CONNECT_BIT ] );
1239 }
1240 }
1241 else
1242 {
1243 callback( tcpSock, tcpSock->userContext, mDNSfalse, 0 );
1244 }
1245
1246 exit:
1247
1248 return;
1249 }
1250
1251
1252
1253 //===========================================================================================================================
1254 // mDNSPlatformUDPSocket
1255 //===========================================================================================================================
1256
1257 mDNSexport UDPSocket* mDNSPlatformUDPSocket(mDNS *const m, const mDNSIPPort requestedport)
1258 {
1259 UDPSocket* sock = NULL;
1260 mDNSIPPort port = requestedport;
1261 mStatus err = mStatus_NoError;
1262 unsigned i;
1263
1264 // Setup connection data object
1265
1266 sock = ( UDPSocket* ) malloc(sizeof( UDPSocket ) );
1267 require_action( sock, exit, err = mStatus_NoMemoryErr );
1268 memset( sock, 0, sizeof( UDPSocket ) );
1269
1270 // Create the socket
1271
1272 sock->fd = INVALID_SOCKET;
1273 sock->recvMsgPtr = m->p->unicastSock4.recvMsgPtr;
1274 sock->addr = m->p->unicastSock4.addr;
1275 sock->ifd = NULL;
1276 sock->m = m;
1277
1278 // Try at most 10000 times to get a unique random port
1279
1280 for (i=0; i<10000; i++)
1281 {
1282 struct sockaddr_in saddr;
1283
1284 saddr.sin_family = AF_INET;
1285 saddr.sin_addr.s_addr = 0;
1286
1287 // The kernel doesn't do cryptographically strong random port
1288 // allocation, so we do it ourselves here
1289
1290 if (mDNSIPPortIsZero(requestedport))
1291 {
1292 port = mDNSOpaque16fromIntVal( ( mDNSu16 ) ( 0xC000 + mDNSRandom(0x3FFF) ) );
1293 }
1294
1295 saddr.sin_port = port.NotAnInteger;
1296
1297 err = SetupSocket(m, ( struct sockaddr* ) &saddr, port, &sock->fd );
1298 if (!err) break;
1299 }
1300
1301 require_noerr( err, exit );
1302
1303 // Set the port
1304
1305 sock->port = port;
1306
1307 // Arm the completion routine
1308
1309 err = mDNSPollRegisterSocket( sock->fd, FD_READ, UDPSocketNotification, sock );
1310 require_noerr( err, exit );
1311
1312 // Bookkeeping
1313
1314 sock->next = gUDPSockets;
1315 gUDPSockets = sock;
1316 gUDPNumSockets++;
1317
1318 exit:
1319
1320 if ( err && sock )
1321 {
1322 UDPCloseSocket( sock );
1323 free( sock );
1324 sock = NULL;
1325 }
1326
1327 return sock;
1328 }
1329
1330 //===========================================================================================================================
1331 // mDNSPlatformUDPClose
1332 //===========================================================================================================================
1333
1334 mDNSexport void mDNSPlatformUDPClose( UDPSocket *sock )
1335 {
1336 UDPSocket * current = gUDPSockets;
1337 UDPSocket * last = NULL;
1338
1339 while ( current )
1340 {
1341 if ( current == sock )
1342 {
1343 if ( last == NULL )
1344 {
1345 gUDPSockets = sock->next;
1346 }
1347 else
1348 {
1349 last->next = sock->next;
1350 }
1351
1352 UDPCloseSocket( sock );
1353 free( sock );
1354
1355 gUDPNumSockets--;
1356
1357 break;
1358 }
1359
1360 last = current;
1361 current = current->next;
1362 }
1363 }
1364
1365
1366 //===========================================================================================================================
1367 // mDNSPlatformSendUDP
1368 //===========================================================================================================================
1369
1370 mDNSexport mStatus
1371 mDNSPlatformSendUDP(
1372 const mDNS * const inMDNS,
1373 const void * const inMsg,
1374 const mDNSu8 * const inMsgEnd,
1375 mDNSInterfaceID inInterfaceID,
1376 UDPSocket * inSrcSocket,
1377 const mDNSAddr * inDstIP,
1378 mDNSIPPort inDstPort,
1379 mDNSBool useBackgroundTrafficClass )
1380 {
1381 SOCKET sendingsocket = INVALID_SOCKET;
1382 mStatus err = mStatus_NoError;
1383 mDNSInterfaceData * ifd = (mDNSInterfaceData*) inInterfaceID;
1384 struct sockaddr_storage addr;
1385 int n;
1386
1387 DEBUG_USE_ONLY( inMDNS );
1388 DEBUG_USE_ONLY( useBackgroundTrafficClass );
1389
1390 n = (int)( inMsgEnd - ( (const mDNSu8 * const) inMsg ) );
1391 check( inMDNS );
1392 check( inMsg );
1393 check( inMsgEnd );
1394 check( inDstIP );
1395
1396 dlog( kDebugLevelChatty, DEBUG_NAME "platform send %d bytes to %#a:%u\n", n, inDstIP, ntohs( inDstPort.NotAnInteger ) );
1397
1398 if( inDstIP->type == mDNSAddrType_IPv4 )
1399 {
1400 struct sockaddr_in * sa4;
1401
1402 sa4 = (struct sockaddr_in *) &addr;
1403 sa4->sin_family = AF_INET;
1404 sa4->sin_port = inDstPort.NotAnInteger;
1405 sa4->sin_addr.s_addr = inDstIP->ip.v4.NotAnInteger;
1406 sendingsocket = ifd ? ifd->sock.fd : inMDNS->p->unicastSock4.fd;
1407
1408 if (inSrcSocket) { sendingsocket = inSrcSocket->fd; debugf("mDNSPlatformSendUDP using port %d, static port %d, sock %d", mDNSVal16(inSrcSocket->port), inMDNS->p->unicastSock4.fd, sendingsocket); }
1409 }
1410 else if( inDstIP->type == mDNSAddrType_IPv6 )
1411 {
1412 struct sockaddr_in6 * sa6;
1413
1414 sa6 = (struct sockaddr_in6 *) &addr;
1415 sa6->sin6_family = AF_INET6;
1416 sa6->sin6_port = inDstPort.NotAnInteger;
1417 sa6->sin6_flowinfo = 0;
1418 sa6->sin6_addr = *( (struct in6_addr *) &inDstIP->ip.v6 );
1419 sa6->sin6_scope_id = 0; // Windows requires the scope ID to be zero. IPV6_MULTICAST_IF specifies interface.
1420 sendingsocket = ifd ? ifd->sock.fd : inMDNS->p->unicastSock6.fd;
1421 }
1422 else
1423 {
1424 dlog( kDebugLevelError, DEBUG_NAME "%s: dst is not an IPv4 or IPv6 address (type=%d)\n", __ROUTINE__, inDstIP->type );
1425 err = mStatus_BadParamErr;
1426 goto exit;
1427 }
1428
1429 if (IsValidSocket(sendingsocket))
1430 {
1431 n = sendto( sendingsocket, (char *) inMsg, n, 0, (struct sockaddr *) &addr, sizeof( addr ) );
1432 err = translate_errno( n > 0, errno_compat(), kWriteErr );
1433
1434 if ( err )
1435 {
1436 // Don't report EHOSTDOWN (i.e. ARP failure), ENETDOWN, or no route to host for unicast destinations
1437
1438 if ( !mDNSAddressIsAllDNSLinkGroup( inDstIP ) && ( WSAGetLastError() == WSAEHOSTDOWN || WSAGetLastError() == WSAENETDOWN || WSAGetLastError() == WSAEHOSTUNREACH || WSAGetLastError() == WSAENETUNREACH ) )
1439 {
1440 err = mStatus_TransientErr;
1441 }
1442 else
1443 {
1444 require_noerr( err, exit );
1445 }
1446 }
1447 }
1448
1449 exit:
1450 return( err );
1451 }
1452
1453
1454 mDNSexport mDNSBool mDNSPlatformPeekUDP(mDNS *const m, UDPSocket *src)
1455 {
1456 DEBUG_UNUSED( m );
1457 DEBUG_UNUSED( src );
1458 return mDNSfalse;
1459 }
1460
1461 mDNSexport void mDNSPlatformUpdateProxyList(mDNS *const m, const mDNSInterfaceID InterfaceID)
1462 {
1463 DEBUG_UNUSED( m );
1464 DEBUG_UNUSED( InterfaceID );
1465 }
1466
1467
1468 mDNSexport void mDNSPlatformSetAllowSleep(mDNS *const m, mDNSBool allowSleep, const char *reason)
1469 {
1470 DEBUG_UNUSED( m );
1471 DEBUG_UNUSED( allowSleep );
1472 DEBUG_UNUSED( reason );
1473 }
1474
1475 //===========================================================================================================================
1476 // mDNSPlatformSendRawPacket
1477 //===========================================================================================================================
1478
1479 mDNSexport void mDNSPlatformSendWakeupPacket(mDNS *const m, mDNSInterfaceID InterfaceID, char *ethaddr, char *ipaddr, int iteration)
1480 {
1481 unsigned char mac[ 6 ];
1482 unsigned char buf[ 102 ];
1483 char hex[ 3 ] = { 0 };
1484 unsigned char *bufPtr = buf;
1485 struct sockaddr_storage saddr;
1486 INT len = sizeof( saddr );
1487 mDNSBool unicast = mDNSfalse;
1488 MulticastWakeupStruct *info;
1489 int i;
1490 mStatus err;
1491
1492 (void) InterfaceID;
1493
1494 require_action( ethaddr, exit, err = mStatus_BadParamErr );
1495
1496 for ( i = 0; i < 6; i++ )
1497 {
1498 memcpy( hex, ethaddr + ( i * 3 ), 2 );
1499 mac[ i ] = ( unsigned char ) strtoul( hex, NULL, 16 );
1500 }
1501
1502 memset( buf, 0, sizeof( buf ) );
1503
1504 for ( i = 0; i < 6; i++ )
1505 {
1506 *bufPtr++ = 0xff;
1507 }
1508
1509 for ( i = 0; i < 16; i++ )
1510 {
1511 memcpy( bufPtr, mac, sizeof( mac ) );
1512 bufPtr += sizeof( mac );
1513 }
1514
1515 if ( ipaddr )
1516 {
1517 if ( WSAStringToAddressA( ipaddr, AF_INET, NULL, ( LPSOCKADDR ) &saddr, &len ) == 0 )
1518 {
1519 struct sockaddr_in * saddr4 = ( struct sockaddr_in* ) &saddr;
1520 saddr4->sin_port = htons( 9 );
1521 len = sizeof( *saddr4 );
1522
1523 if ( saddr4->sin_addr.s_addr != htonl( INADDR_ANY ) )
1524 {
1525 unicast = mDNStrue;
1526 }
1527 }
1528 else if ( WSAStringToAddressA( ipaddr, AF_INET6, NULL, ( LPSOCKADDR ) &saddr, &len ) == 0 )
1529 {
1530 mDNSInterfaceData *ifd = ( mDNSInterfaceData* ) InterfaceID;
1531 struct sockaddr_in6 * saddr6 = ( struct sockaddr_in6* ) &saddr;
1532 saddr6->sin6_port = htons( 9 );
1533
1534 if ( ifd != NULL )
1535 {
1536 saddr6->sin6_scope_id = ifd->scopeID;
1537 }
1538
1539 len = sizeof( *saddr6 );
1540
1541 if ( memcmp( &saddr6->sin6_addr, &in6addr_any, sizeof( IN6_ADDR ) ) != 0 )
1542 {
1543 unicast = mDNStrue;
1544 }
1545 }
1546 }
1547
1548 if ( ( iteration < 2 ) && ( unicast ) )
1549 {
1550 SendWakeupPacket( m, ( LPSOCKADDR ) &saddr, len, ( const char* ) buf, sizeof( buf ), kUnicastWakeupNumTries, kUnicastWakeupSleepBetweenTries );
1551 }
1552
1553 info = ( MulticastWakeupStruct* ) malloc( sizeof( MulticastWakeupStruct ) );
1554 require_action( info, exit, err = mStatus_NoMemoryErr );
1555 info->inMDNS = m;
1556 memset( &info->addr, 0, sizeof( info->addr ) );
1557 info->addr.sin_family = AF_INET;
1558 info->addr.sin_addr.s_addr = AllDNSLinkGroup_v4.ip.v4.NotAnInteger;
1559 info->addr.sin_port = htons( 9 );
1560 info->addrLen = sizeof( info->addr );
1561 memcpy( info->data, buf, sizeof( buf ) );
1562 info->dataLen = sizeof( buf );
1563 info->numTries = kMulticastWakeupNumTries;
1564 info->msecSleep = kMulticastWakeupSleepBetweenTries;
1565
1566 _beginthread( SendMulticastWakeupPacket, 0, ( void* ) info );
1567
1568 exit:
1569
1570 return;
1571 }
1572
1573
1574 mDNSexport mDNSBool mDNSPlatformValidRecordForInterface(AuthRecord *rr, const NetworkInterfaceInfo *intf)
1575 {
1576 DEBUG_UNUSED( rr );
1577 DEBUG_UNUSED( intf );
1578
1579 return mDNStrue;
1580 }
1581
1582 mDNSexport mDNSBool mDNSPlatformValidQuestionForInterface(DNSQuestion *q, const NetworkInterfaceInfo *intf)
1583 {
1584 DEBUG_UNUSED( q );
1585 DEBUG_UNUSED( intf );
1586
1587 return mDNStrue;
1588 }
1589
1590 mDNSexport void mDNSPlatformSendRawPacket(const void *const msg, const mDNSu8 *const end, mDNSInterfaceID InterfaceID)
1591 {
1592 DEBUG_UNUSED( msg );
1593 DEBUG_UNUSED( end );
1594 DEBUG_UNUSED( InterfaceID );
1595 }
1596
1597 // Used for debugging purposes. For now, just set the buffer to zero
1598 mDNSexport void mDNSPlatformFormatTime(unsigned long te, mDNSu8 *buf, int bufsize)
1599 {
1600 DEBUG_UNUSED( te );
1601 if (bufsize) buf[0] = 0;
1602 }
1603
1604
1605 mDNSexport void mDNSPlatformSetLocalAddressCacheEntry(mDNS *const m, const mDNSAddr *const tpa, const mDNSEthAddr *const tha, mDNSInterfaceID InterfaceID)
1606 {
1607 DEBUG_UNUSED( m );
1608 DEBUG_UNUSED( tpa );
1609 DEBUG_UNUSED( tha );
1610 DEBUG_UNUSED( InterfaceID );
1611 }
1612
1613
1614 mDNSexport void mDNSPlatformReceiveRawPacket(const void *const msg, const mDNSu8 *const end, mDNSInterfaceID InterfaceID)
1615 {
1616 DEBUG_UNUSED( msg );
1617 DEBUG_UNUSED( end );
1618 DEBUG_UNUSED( InterfaceID );
1619 }
1620
1621 mDNSexport void mDNSPlatformSetLocalARP( const mDNSv4Addr * const tpa, const mDNSEthAddr * const tha, mDNSInterfaceID InterfaceID )
1622 {
1623 DEBUG_UNUSED( tpa );
1624 DEBUG_UNUSED( tha );
1625 DEBUG_UNUSED( InterfaceID );
1626 }
1627
1628 mDNSexport void mDNSPlatformWriteDebugMsg(const char *msg)
1629 {
1630 dlog( kDebugLevelInfo, "%s\n", msg );
1631 }
1632
1633 mDNSexport void mDNSPlatformWriteLogMsg( const char * ident, const char * msg, mDNSLogLevel_t loglevel )
1634 {
1635 extern mDNS mDNSStorage;
1636 int type;
1637
1638 DEBUG_UNUSED( ident );
1639
1640 type = EVENTLOG_ERROR_TYPE;
1641
1642 switch (loglevel)
1643 {
1644 case MDNS_LOG_MSG: type = EVENTLOG_ERROR_TYPE; break;
1645 case MDNS_LOG_OPERATION: type = EVENTLOG_WARNING_TYPE; break;
1646 case MDNS_LOG_SPS: type = EVENTLOG_INFORMATION_TYPE; break;
1647 case MDNS_LOG_INFO: type = EVENTLOG_INFORMATION_TYPE; break;
1648 case MDNS_LOG_DEBUG: type = EVENTLOG_INFORMATION_TYPE; break;
1649 default:
1650 fprintf(stderr, "Unknown loglevel %d, assuming LOG_ERR\n", loglevel);
1651 fflush(stderr);
1652 }
1653
1654 mDNSStorage.p->reportStatusFunc( type, msg );
1655 dlog( kDebugLevelInfo, "%s\n", msg );
1656 }
1657
1658 mDNSexport void mDNSPlatformSourceAddrForDest( mDNSAddr * const src, const mDNSAddr * const dst )
1659 {
1660 DEBUG_UNUSED( src );
1661 DEBUG_UNUSED( dst );
1662 }
1663
1664 //===========================================================================================================================
1665 // mDNSPlatformTLSSetupCerts
1666 //===========================================================================================================================
1667
1668 mDNSexport mStatus
1669 mDNSPlatformTLSSetupCerts(void)
1670 {
1671 return mStatus_UnsupportedErr;
1672 }
1673
1674 //===========================================================================================================================
1675 // mDNSPlatformTLSTearDownCerts
1676 //===========================================================================================================================
1677
1678 mDNSexport void
1679 mDNSPlatformTLSTearDownCerts(void)
1680 {
1681 }
1682
1683 //===========================================================================================================================
1684 // mDNSPlatformSetDNSConfig
1685 //===========================================================================================================================
1686
1687 mDNSlocal void SetDNSServers( mDNS *const m );
1688 mDNSlocal void SetSearchDomainList( void );
1689
1690 mDNSexport mDNSBool mDNSPlatformSetDNSConfig(mDNS *const m, mDNSBool setservers, mDNSBool setsearch, domainname *const fqdn, DNameListElem **regDomains, DNameListElem **browseDomains, mDNSBool ackConfig)
1691 {
1692 (void) ackConfig;
1693
1694 if (setservers) SetDNSServers(m);
1695 if (setsearch) SetSearchDomainList();
1696
1697 if ( fqdn )
1698 {
1699 GetDDNSFQDN( fqdn );
1700 }
1701
1702 if ( browseDomains )
1703 {
1704 GetDDNSDomains( browseDomains, kServiceParametersNode TEXT("\\DynDNS\\Setup\\") kServiceDynDNSBrowseDomains );
1705 }
1706
1707 if ( regDomains )
1708 {
1709 GetDDNSDomains( regDomains, kServiceParametersNode TEXT("\\DynDNS\\Setup\\") kServiceDynDNSRegistrationDomains );
1710 }
1711 return mDNStrue;
1712 }
1713
1714
1715 //===========================================================================================================================
1716 // mDNSPlatformDynDNSHostNameStatusChanged
1717 //===========================================================================================================================
1718
1719 mDNSexport void
1720 mDNSPlatformDynDNSHostNameStatusChanged(const domainname *const dname, const mStatus status)
1721 {
1722 char uname[MAX_ESCAPED_DOMAIN_NAME];
1723 BYTE bStatus;
1724 LPCTSTR name;
1725 HKEY key = NULL;
1726 mStatus err;
1727 char * p;
1728
1729 ConvertDomainNameToCString(dname, uname);
1730
1731 p = uname;
1732
1733 while (*p)
1734 {
1735 *p = (char) tolower(*p);
1736 if (!(*(p+1)) && *p == '.') *p = 0; // if last character, strip trailing dot
1737 p++;
1738 }
1739
1740 check( strlen( p ) <= MAX_ESCAPED_DOMAIN_NAME );
1741 name = kServiceParametersNode TEXT("\\DynDNS\\State\\HostNames");
1742 err = RegCreateKey( HKEY_LOCAL_MACHINE, name, &key );
1743 require_noerr( err, exit );
1744
1745 bStatus = ( status ) ? 0 : 1;
1746 err = RegSetValueEx( key, kServiceDynDNSStatus, 0, REG_DWORD, (const LPBYTE) &bStatus, sizeof(DWORD) );
1747 require_noerr( err, exit );
1748
1749 exit:
1750
1751 if ( key )
1752 {
1753 RegCloseKey( key );
1754 }
1755
1756 return;
1757 }
1758
1759
1760 //===========================================================================================================================
1761 // SetDomainSecrets
1762 //===========================================================================================================================
1763
1764 // This routine needs to be called whenever the system secrets database changes.
1765 // We call it from DynDNSConfigDidChange and mDNSPlatformInit
1766
1767 void
1768 SetDomainSecrets( mDNS * const m )
1769 {
1770 DomainAuthInfo *ptr;
1771 domainname fqdn;
1772 DNameListElem * regDomains = NULL;
1773
1774 // Rather than immediately deleting all keys now, we mark them for deletion in ten seconds.
1775 // In the case where the user simultaneously removes their DDNS host name and the key
1776 // for it, this gives mDNSResponder ten seconds to gracefully delete the name from the
1777 // server before it loses access to the necessary key. Otherwise, we'd leave orphaned
1778 // address records behind that we no longer have permission to delete.
1779
1780 for (ptr = m->AuthInfoList; ptr; ptr = ptr->next)
1781 ptr->deltime = NonZeroTime(m->timenow + mDNSPlatformOneSecond*10);
1782
1783 GetDDNSFQDN( &fqdn );
1784
1785 if ( fqdn.c[ 0 ] )
1786 {
1787 SetDomainSecret( m, &fqdn );
1788 }
1789
1790 GetDDNSDomains( &regDomains, kServiceParametersNode TEXT("\\DynDNS\\Setup\\") kServiceDynDNSRegistrationDomains );
1791
1792 while ( regDomains )
1793 {
1794 DNameListElem * current = regDomains;
1795 SetDomainSecret( m, &current->name );
1796 regDomains = regDomains->next;
1797 free( current );
1798 }
1799 }
1800
1801
1802 //===========================================================================================================================
1803 // SetSearchDomainList
1804 //===========================================================================================================================
1805
1806 mDNSlocal void SetDomainFromDHCP( void );
1807 mDNSlocal void SetReverseMapSearchDomainList( void );
1808
1809 mDNSlocal void
1810 SetSearchDomainList( void )
1811 {
1812 char * searchList = NULL;
1813 DWORD searchListLen;
1814 //DNameListElem * head = NULL;
1815 //DNameListElem * current = NULL;
1816 char * tok;
1817 HKEY key;
1818 mStatus err;
1819
1820 err = RegCreateKey( HKEY_LOCAL_MACHINE, TEXT("SYSTEM\\CurrentControlSet\\Services\\Tcpip\\Parameters"), &key );
1821 require_noerr( err, exit );
1822
1823 err = RegQueryString( key, "SearchList", &searchList, &searchListLen, NULL );
1824 require_noerr( err, exit );
1825
1826 // Windows separates the search domains with ','
1827
1828 tok = strtok( searchList, "," );
1829 while ( tok )
1830 {
1831 if ( ( strcmp( tok, "" ) != 0 ) && ( strcmp( tok, "." ) != 0 ) )
1832 mDNS_AddSearchDomain_CString(tok, mDNSNULL);
1833 tok = strtok( NULL, "," );
1834 }
1835
1836 exit:
1837
1838 if ( searchList )
1839 {
1840 free( searchList );
1841 }
1842
1843 if ( key )
1844 {
1845 RegCloseKey( key );
1846 }
1847
1848 SetDomainFromDHCP();
1849 SetReverseMapSearchDomainList();
1850 }
1851
1852
1853 //===========================================================================================================================
1854 // SetReverseMapSearchDomainList
1855 //===========================================================================================================================
1856
1857 mDNSlocal void
1858 SetReverseMapSearchDomainList( void )
1859 {
1860 struct ifaddrs * ifa;
1861
1862 ifa = myGetIfAddrs( 1 );
1863 while (ifa)
1864 {
1865 mDNSAddr addr;
1866
1867 if (ifa->ifa_addr->sa_family == AF_INET && !SetupAddr(&addr, ifa->ifa_addr) && !(ifa->ifa_flags & IFF_LOOPBACK) && ifa->ifa_netmask)
1868 {
1869 mDNSAddr netmask;
1870 char buffer[256];
1871
1872 if (!SetupAddr(&netmask, ifa->ifa_netmask))
1873 {
1874 sprintf(buffer, "%d.%d.%d.%d.in-addr.arpa.", addr.ip.v4.b[3] & netmask.ip.v4.b[3],
1875 addr.ip.v4.b[2] & netmask.ip.v4.b[2],
1876 addr.ip.v4.b[1] & netmask.ip.v4.b[1],
1877 addr.ip.v4.b[0] & netmask.ip.v4.b[0]);
1878 mDNS_AddSearchDomain_CString(buffer, mDNSNULL);
1879 }
1880 }
1881
1882 ifa = ifa->ifa_next;
1883 }
1884
1885 return;
1886 }
1887
1888
1889 //===========================================================================================================================
1890 // SetDNSServers
1891 //===========================================================================================================================
1892
1893 mDNSlocal void
1894 SetDNSServers( mDNS *const m )
1895 {
1896 PIP_PER_ADAPTER_INFO pAdapterInfo = NULL;
1897 FIXED_INFO * fixedInfo = NULL;
1898 ULONG bufLen = 0;
1899 IP_ADDR_STRING * dnsServerList;
1900 IP_ADDR_STRING * ipAddr;
1901 DWORD index;
1902 int i = 0;
1903 mStatus err = kUnknownErr;
1904
1905 // Get the primary interface.
1906
1907 index = GetPrimaryInterface();
1908
1909 // This should have the interface index of the primary index. Fall back in cases where
1910 // it can't be determined.
1911
1912 if ( index )
1913 {
1914 bufLen = 0;
1915
1916 for ( i = 0; i < 100; i++ )
1917 {
1918 err = GetPerAdapterInfo( index, pAdapterInfo, &bufLen );
1919
1920 if ( err != ERROR_BUFFER_OVERFLOW )
1921 {
1922 break;
1923 }
1924
1925 pAdapterInfo = (PIP_PER_ADAPTER_INFO) realloc( pAdapterInfo, bufLen );
1926 require_action( pAdapterInfo, exit, err = mStatus_NoMemoryErr );
1927 }
1928
1929 require_noerr( err, exit );
1930
1931 dnsServerList = &pAdapterInfo->DnsServerList;
1932 }
1933 else
1934 {
1935 bufLen = sizeof( FIXED_INFO );
1936
1937 for ( i = 0; i < 100; i++ )
1938 {
1939 if ( fixedInfo )
1940 {
1941 GlobalFree( fixedInfo );
1942 fixedInfo = NULL;
1943 }
1944
1945 fixedInfo = (FIXED_INFO*) GlobalAlloc( GPTR, bufLen );
1946 require_action( fixedInfo, exit, err = mStatus_NoMemoryErr );
1947
1948 err = GetNetworkParams( fixedInfo, &bufLen );
1949
1950 if ( err != ERROR_BUFFER_OVERFLOW )
1951 {
1952 break;
1953 }
1954 }
1955
1956 require_noerr( err, exit );
1957
1958 dnsServerList = &fixedInfo->DnsServerList;
1959 }
1960
1961 for ( ipAddr = dnsServerList; ipAddr; ipAddr = ipAddr->Next )
1962 {
1963 mDNSAddr addr;
1964 err = StringToAddress( &addr, ipAddr->IpAddress.String );
1965 if ( !err ) mDNS_AddDNSServer(m, mDNSNULL, mDNSInterface_Any, 0, &addr, UnicastDNSPort, kScopeNone, DEFAULT_UDNS_TIMEOUT, mDNSfalse, 0, mDNStrue, mDNStrue, mDNSfalse);
1966 }
1967
1968 exit:
1969
1970 if ( pAdapterInfo )
1971 {
1972 free( pAdapterInfo );
1973 }
1974
1975 if ( fixedInfo )
1976 {
1977 GlobalFree( fixedInfo );
1978 }
1979 }
1980
1981
1982 //===========================================================================================================================
1983 // SetDomainFromDHCP
1984 //===========================================================================================================================
1985
1986 mDNSlocal void
1987 SetDomainFromDHCP( void )
1988 {
1989 int i = 0;
1990 IP_ADAPTER_INFO * pAdapterInfo;
1991 IP_ADAPTER_INFO * pAdapter;
1992 DWORD bufLen;
1993 DWORD index;
1994 HKEY key = NULL;
1995 LPSTR domain = NULL;
1996 DWORD dwSize;
1997 mStatus err = mStatus_NoError;
1998
1999 pAdapterInfo = NULL;
2000
2001 for ( i = 0; i < 100; i++ )
2002 {
2003 err = GetAdaptersInfo( pAdapterInfo, &bufLen);
2004
2005 if ( err != ERROR_BUFFER_OVERFLOW )
2006 {
2007 break;
2008 }
2009
2010 pAdapterInfo = (IP_ADAPTER_INFO*) realloc( pAdapterInfo, bufLen );
2011 require_action( pAdapterInfo, exit, err = kNoMemoryErr );
2012 }
2013
2014 require_noerr( err, exit );
2015
2016 index = GetPrimaryInterface();
2017
2018 for ( pAdapter = pAdapterInfo; pAdapter; pAdapter = pAdapter->Next )
2019 {
2020 if ( pAdapter->IpAddressList.IpAddress.String &&
2021 pAdapter->IpAddressList.IpAddress.String[0] &&
2022 pAdapter->GatewayList.IpAddress.String &&
2023 pAdapter->GatewayList.IpAddress.String[0] &&
2024 ( !index || ( pAdapter->Index == index ) ) )
2025 {
2026 // Found one that will work
2027
2028 char keyName[1024];
2029
2030 _snprintf( keyName, 1024, "%s%s", "SYSTEM\\CurrentControlSet\\Services\\Tcpip\\Parameters\\Interfaces\\", pAdapter->AdapterName );
2031
2032 err = RegCreateKeyA( HKEY_LOCAL_MACHINE, keyName, &key );
2033 require_noerr( err, exit );
2034
2035 err = RegQueryString( key, "Domain", &domain, &dwSize, NULL );
2036 check_noerr( err );
2037
2038 if ( !domain || !domain[0] )
2039 {
2040 if ( domain )
2041 {
2042 free( domain );
2043 domain = NULL;
2044 }
2045
2046 err = RegQueryString( key, "DhcpDomain", &domain, &dwSize, NULL );
2047 check_noerr( err );
2048 }
2049
2050 if ( domain && domain[0] ) mDNS_AddSearchDomain_CString(domain, mDNSNULL);
2051
2052 break;
2053 }
2054 }
2055
2056 exit:
2057
2058 if ( pAdapterInfo )
2059 {
2060 free( pAdapterInfo );
2061 }
2062
2063 if ( domain )
2064 {
2065 free( domain );
2066 }
2067
2068 if ( key )
2069 {
2070 RegCloseKey( key );
2071 }
2072 }
2073
2074
2075 //===========================================================================================================================
2076 // mDNSPlatformGetPrimaryInterface
2077 //===========================================================================================================================
2078
2079 mDNSexport mStatus
2080 mDNSPlatformGetPrimaryInterface( mDNS * const m, mDNSAddr * v4, mDNSAddr * v6, mDNSAddr * router )
2081 {
2082 IP_ADAPTER_INFO * pAdapterInfo;
2083 IP_ADAPTER_INFO * pAdapter;
2084 DWORD bufLen;
2085 int i;
2086 BOOL found;
2087 DWORD index;
2088 mStatus err = mStatus_NoError;
2089
2090 DEBUG_UNUSED( m );
2091
2092 *v6 = zeroAddr;
2093
2094 pAdapterInfo = NULL;
2095 bufLen = 0;
2096 found = FALSE;
2097
2098 for ( i = 0; i < 100; i++ )
2099 {
2100 err = GetAdaptersInfo( pAdapterInfo, &bufLen);
2101
2102 if ( err != ERROR_BUFFER_OVERFLOW )
2103 {
2104 break;
2105 }
2106
2107 pAdapterInfo = (IP_ADAPTER_INFO*) realloc( pAdapterInfo, bufLen );
2108 require_action( pAdapterInfo, exit, err = kNoMemoryErr );
2109 }
2110
2111 require_noerr( err, exit );
2112
2113 index = GetPrimaryInterface();
2114
2115 for ( pAdapter = pAdapterInfo; pAdapter; pAdapter = pAdapter->Next )
2116 {
2117 if ( pAdapter->IpAddressList.IpAddress.String &&
2118 pAdapter->IpAddressList.IpAddress.String[0] &&
2119 pAdapter->GatewayList.IpAddress.String &&
2120 pAdapter->GatewayList.IpAddress.String[0] &&
2121 ( StringToAddress( v4, pAdapter->IpAddressList.IpAddress.String ) == mStatus_NoError ) &&
2122 ( StringToAddress( router, pAdapter->GatewayList.IpAddress.String ) == mStatus_NoError ) &&
2123 ( !index || ( pAdapter->Index == index ) ) )
2124 {
2125 // Found one that will work
2126
2127 if ( pAdapter->AddressLength == sizeof( m->PrimaryMAC ) )
2128 {
2129 memcpy( &m->PrimaryMAC, pAdapter->Address, pAdapter->AddressLength );
2130 }
2131
2132 found = TRUE;
2133 break;
2134 }
2135 }
2136
2137 exit:
2138
2139 if ( pAdapterInfo )
2140 {
2141 free( pAdapterInfo );
2142 }
2143
2144 return err;
2145 }
2146
2147 mDNSexport void mDNSPlatformSendKeepalive(mDNSAddr *sadd, mDNSAddr *dadd, mDNSIPPort *lport, mDNSIPPort *rport, mDNSu32 seq, mDNSu32 ack, mDNSu16 win)
2148 {
2149 (void) sadd; // Unused
2150 (void) dadd; // Unused
2151 (void) lport; // Unused
2152 (void) rport; // Unused
2153 (void) seq; // Unused
2154 (void) ack; // Unused
2155 (void) win; // Unused
2156 }
2157
2158 mDNSexport mStatus mDNSPlatformGetRemoteMacAddr(mDNSAddr *raddr, char *eth)
2159 {
2160 (void) raddr; // Unused
2161 (void) eth; // Unused
2162 }
2163
2164 mDNSexport mStatus mDNSPlatformStoreSPSMACAddr(mDNSAddr *spsaddr, char *ifname)
2165 {
2166 (void) spsaddr; // Unused
2167 (void) ifname; // Unused
2168 }
2169
2170 mDNSexport mStatus mDNSPlatformRetrieveTCPInfo(mDNS *const m, mDNSAddr *laddr, mDNSIPPort *lport, mDNSAddr *raddr, mDNSIPPort *rport, mDNSTCPInfo *mti)
2171 {
2172 (void) m; // Unused
2173 (void) laddr; // Unused
2174 (void) raddr; // Unused
2175 (void) lport; // Unused
2176 (void) rport; // Unused
2177 (void) mti; // Unused
2178 }
2179
2180 mDNSexport mDNSBool mDNSPlatformAllowPID(mDNS *const m, DNSQuestion *q)
2181 {
2182 (void) m;
2183 (void) q;
2184 return mDNStrue;
2185 }
2186
2187 mDNSexport mDNSs32 mDNSPlatformGetServiceID(mDNS *const m, DNSQuestion *q)
2188 {
2189 (void) m;
2190 (void) q;
2191 return 0;
2192 }
2193
2194 mDNSexport void mDNSPlatformSetDelegatePID(UDPSocket *src, const mDNSAddr *dst, DNSQuestion *q)
2195 {
2196 (void) src;
2197 (void) dst;
2198 (void) q;
2199 }
2200
2201 mDNSexport mDNSs32 mDNSPlatformGetPID()
2202 {
2203 return 0;
2204 }
2205
2206 mDNSexport mDNSu16 mDNSPlatformGetUDPPort(UDPSocket *sock)
2207 {
2208 DEBUG_UNUSED( sock );
2209
2210 return (mDNSu16)-1;
2211 }
2212
2213 mDNSexport mDNSBool mDNSPlatformInterfaceIsD2D(mDNSInterfaceID InterfaceID)
2214 {
2215 DEBUG_UNUSED( InterfaceID );
2216
2217 return mDNSfalse;
2218 }
2219
2220 #if 0
2221 #pragma mark -
2222 #endif
2223
2224 //===========================================================================================================================
2225 // debugf_
2226 //===========================================================================================================================
2227 #if( MDNS_DEBUGMSGS )
2228 mDNSexport void debugf_( const char *inFormat, ... )
2229 {
2230 char buffer[ 512 ];
2231 va_list args;
2232 mDNSu32 length;
2233
2234 va_start( args, inFormat );
2235 length = mDNS_vsnprintf( buffer, sizeof( buffer ), inFormat, args );
2236 va_end( args );
2237
2238 dlog( kDebugLevelInfo, "%s\n", buffer );
2239 }
2240 #endif
2241
2242 //===========================================================================================================================
2243 // verbosedebugf_
2244 //===========================================================================================================================
2245
2246 #if( MDNS_DEBUGMSGS > 1 )
2247 mDNSexport void verbosedebugf_( const char *inFormat, ... )
2248 {
2249 char buffer[ 512 ];
2250 va_list args;
2251 mDNSu32 length;
2252
2253 va_start( args, inFormat );
2254 length = mDNS_vsnprintf( buffer, sizeof( buffer ), inFormat, args );
2255 va_end( args );
2256
2257 dlog( kDebugLevelVerbose, "%s\n", buffer );
2258 }
2259 #endif
2260
2261
2262 #if 0
2263 #pragma mark -
2264 #pragma mark == Platform Internals ==
2265 #endif
2266
2267
2268 //===========================================================================================================================
2269 // SetupNiceName
2270 //===========================================================================================================================
2271
2272 mStatus SetupNiceName( mDNS * const inMDNS )
2273 {
2274 HKEY descKey = NULL;
2275 char utf8[ 256 ];
2276 LPCTSTR s;
2277 LPWSTR joinName;
2278 NETSETUP_JOIN_STATUS joinStatus;
2279 mStatus err = 0;
2280 DWORD namelen;
2281 BOOL ok;
2282
2283 check( inMDNS );
2284
2285 // Set up the nice name.
2286 utf8[0] = '\0';
2287
2288 // First try and open the registry key that contains the computer description value
2289 s = TEXT("SYSTEM\\CurrentControlSet\\Services\\lanmanserver\\parameters");
2290 err = RegOpenKeyEx( HKEY_LOCAL_MACHINE, s, 0, KEY_READ, &descKey);
2291 check_translated_errno( err == 0, errno_compat(), kNameErr );
2292
2293 if ( !err )
2294 {
2295 TCHAR desc[256];
2296 DWORD descSize = sizeof( desc );
2297
2298 // look for the computer description
2299 err = RegQueryValueEx( descKey, TEXT("srvcomment"), 0, NULL, (LPBYTE) &desc, &descSize);
2300
2301 if ( !err )
2302 {
2303 err = TCHARtoUTF8( desc, utf8, sizeof( utf8 ) );
2304 }
2305
2306 if ( err )
2307 {
2308 utf8[ 0 ] = '\0';
2309 }
2310 }
2311
2312 // if we can't find it in the registry, then use the hostname of the machine
2313 if ( err || ( utf8[ 0 ] == '\0' ) )
2314 {
2315 TCHAR hostname[256];
2316
2317 namelen = sizeof( hostname ) / sizeof( TCHAR );
2318
2319 ok = GetComputerNameExW( ComputerNamePhysicalDnsHostname, hostname, &namelen );
2320 err = translate_errno( ok, (mStatus) GetLastError(), kNameErr );
2321 check_noerr( err );
2322
2323 if( !err )
2324 {
2325 err = TCHARtoUTF8( hostname, utf8, sizeof( utf8 ) );
2326 }
2327
2328 if ( err )
2329 {
2330 utf8[ 0 ] = '\0';
2331 }
2332 }
2333
2334 // if we can't get the hostname
2335 if ( err || ( utf8[ 0 ] == '\0' ) )
2336 {
2337 // Invalidate name so fall back to a default name.
2338
2339 strcpy( utf8, kMDNSDefaultName );
2340 }
2341
2342 utf8[ sizeof( utf8 ) - 1 ] = '\0';
2343 inMDNS->nicelabel.c[ 0 ] = (mDNSu8) (strlen( utf8 ) < MAX_DOMAIN_LABEL ? strlen( utf8 ) : MAX_DOMAIN_LABEL);
2344 memcpy( &inMDNS->nicelabel.c[ 1 ], utf8, inMDNS->nicelabel.c[ 0 ] );
2345
2346 dlog( kDebugLevelInfo, DEBUG_NAME "nice name \"%.*s\"\n", inMDNS->nicelabel.c[ 0 ], &inMDNS->nicelabel.c[ 1 ] );
2347
2348 if ( descKey )
2349 {
2350 RegCloseKey( descKey );
2351 }
2352
2353 ZeroMemory( inMDNS->p->nbname, sizeof( inMDNS->p->nbname ) );
2354 ZeroMemory( inMDNS->p->nbdomain, sizeof( inMDNS->p->nbdomain ) );
2355
2356 namelen = sizeof( inMDNS->p->nbname );
2357 ok = GetComputerNameExA( ComputerNamePhysicalNetBIOS, inMDNS->p->nbname, &namelen );
2358 check( ok );
2359 if ( ok ) dlog( kDebugLevelInfo, DEBUG_NAME "netbios name \"%s\"\n", inMDNS->p->nbname );
2360
2361 err = NetGetJoinInformation( NULL, &joinName, &joinStatus );
2362 check ( err == NERR_Success );
2363 if ( err == NERR_Success )
2364 {
2365 if ( ( joinStatus == NetSetupWorkgroupName ) || ( joinStatus == NetSetupDomainName ) )
2366 {
2367 err = TCHARtoUTF8( joinName, inMDNS->p->nbdomain, sizeof( inMDNS->p->nbdomain ) );
2368 check( !err );
2369 if ( !err ) dlog( kDebugLevelInfo, DEBUG_NAME "netbios domain/workgroup \"%s\"\n", inMDNS->p->nbdomain );
2370 }
2371
2372 NetApiBufferFree( joinName );
2373 joinName = NULL;
2374 }
2375
2376 err = 0;
2377
2378 return( err );
2379 }
2380
2381 //===========================================================================================================================
2382 // SetupHostName
2383 //===========================================================================================================================
2384
2385 mDNSlocal mStatus SetupHostName( mDNS * const inMDNS )
2386 {
2387 mStatus err = 0;
2388 char tempString[ 256 ];
2389 DWORD tempStringLen;
2390 domainlabel tempLabel;
2391 BOOL ok;
2392
2393 check( inMDNS );
2394
2395 // Set up the nice name.
2396 tempString[ 0 ] = '\0';
2397
2398 // use the hostname of the machine
2399 tempStringLen = sizeof( tempString );
2400 ok = GetComputerNameExA( ComputerNamePhysicalDnsHostname, tempString, &tempStringLen );
2401 err = translate_errno( ok, (mStatus) GetLastError(), kNameErr );
2402 check_noerr( err );
2403
2404 // if we can't get the hostname
2405 if( err || ( tempString[ 0 ] == '\0' ) )
2406 {
2407 // Invalidate name so fall back to a default name.
2408
2409 strcpy( tempString, kMDNSDefaultName );
2410 }
2411
2412 tempString[ sizeof( tempString ) - 1 ] = '\0';
2413 tempLabel.c[ 0 ] = (mDNSu8) (strlen( tempString ) < MAX_DOMAIN_LABEL ? strlen( tempString ) : MAX_DOMAIN_LABEL );
2414 memcpy( &tempLabel.c[ 1 ], tempString, tempLabel.c[ 0 ] );
2415
2416 // Set up the host name.
2417
2418 ConvertUTF8PstringToRFC1034HostLabel( tempLabel.c, &inMDNS->hostlabel );
2419 if( inMDNS->hostlabel.c[ 0 ] == 0 )
2420 {
2421 // Nice name has no characters that are representable as an RFC1034 name (e.g. Japanese) so use the default.
2422
2423 MakeDomainLabelFromLiteralString( &inMDNS->hostlabel, kMDNSDefaultName );
2424 }
2425
2426 check( inMDNS->hostlabel.c[ 0 ] != 0 );
2427
2428 mDNS_SetFQDN( inMDNS );
2429
2430 dlog( kDebugLevelInfo, DEBUG_NAME "host name \"%.*s\"\n", inMDNS->hostlabel.c[ 0 ], &inMDNS->hostlabel.c[ 1 ] );
2431
2432 return( err );
2433 }
2434
2435 //===========================================================================================================================
2436 // SetupName
2437 //===========================================================================================================================
2438
2439 mDNSlocal mStatus SetupName( mDNS * const inMDNS )
2440 {
2441 mStatus err = 0;
2442
2443 check( inMDNS );
2444
2445 err = SetupNiceName( inMDNS );
2446 check_noerr( err );
2447
2448 err = SetupHostName( inMDNS );
2449 check_noerr( err );
2450
2451 return err;
2452 }
2453
2454
2455 //===========================================================================================================================
2456 // SetupInterfaceList
2457 //===========================================================================================================================
2458
2459 mStatus SetupInterfaceList( mDNS * const inMDNS )
2460 {
2461 mStatus err;
2462 mDNSInterfaceData ** next;
2463 mDNSInterfaceData * ifd;
2464 struct ifaddrs * addrs;
2465 struct ifaddrs * p;
2466 struct ifaddrs * loopbackv4;
2467 struct ifaddrs * loopbackv6;
2468 u_int flagMask;
2469 u_int flagTest;
2470 mDNSBool foundv4;
2471 mDNSBool foundv6;
2472 mDNSBool foundUnicastSock4DestAddr;
2473 mDNSBool foundUnicastSock6DestAddr;
2474
2475 dlog( kDebugLevelTrace, DEBUG_NAME "setting up interface list\n" );
2476 check( inMDNS );
2477 check( inMDNS->p );
2478
2479 inMDNS->p->registeredLoopback4 = mDNSfalse;
2480 inMDNS->p->nextDHCPLeaseExpires = 0x7FFFFFFF;
2481 addrs = NULL;
2482 foundv4 = mDNSfalse;
2483 foundv6 = mDNSfalse;
2484 foundUnicastSock4DestAddr = mDNSfalse;
2485 foundUnicastSock6DestAddr = mDNSfalse;
2486
2487 // Tear down any existing interfaces that may be set up.
2488
2489 TearDownInterfaceList( inMDNS );
2490
2491 // Set up the name of this machine.
2492
2493 err = SetupName( inMDNS );
2494 check_noerr( err );
2495
2496 // Set up IPv4 interface(s). We have to set up IPv4 first so any IPv6 interface with an IPv4-routable address
2497 // can refer to the IPv4 interface when it registers to allow DNS AAAA records over the IPv4 interface.
2498
2499 err = getifaddrs( &addrs );
2500 require_noerr( err, exit );
2501
2502 loopbackv4 = NULL;
2503 loopbackv6 = NULL;
2504 next = &inMDNS->p->interfaceList;
2505
2506 flagMask = IFF_UP | IFF_MULTICAST;
2507 flagTest = IFF_UP | IFF_MULTICAST;
2508
2509 #if( MDNS_WINDOWS_ENABLE_IPV4 )
2510 for( p = addrs; p; p = p->ifa_next )
2511 {
2512 if( !p->ifa_addr || ( p->ifa_addr->sa_family != AF_INET ) || ( ( p->ifa_flags & flagMask ) != flagTest ) )
2513 {
2514 continue;
2515 }
2516 if( p->ifa_flags & IFF_LOOPBACK )
2517 {
2518 if( !loopbackv4 )
2519 {
2520 loopbackv4 = p;
2521 }
2522 continue;
2523 }
2524 dlog( kDebugLevelVerbose, DEBUG_NAME "Interface %40s (0x%08X) %##a\n",
2525 p->ifa_name ? p->ifa_name : "<null>", p->ifa_extra.index, p->ifa_addr );
2526
2527 err = SetupInterface( inMDNS, p, &ifd );
2528 require_noerr( err, exit );
2529
2530 // If this guy is point-to-point (ifd->interfaceInfo.McastTxRx == 0 ) we still want to
2531 // register him, but we also want to note that we haven't found a v4 interface
2532 // so that we register loopback so same host operations work
2533
2534 if ( ifd->interfaceInfo.McastTxRx == mDNStrue )
2535 {
2536 foundv4 = mDNStrue;
2537 }
2538
2539 if ( p->ifa_dhcpEnabled && ( p->ifa_dhcpLeaseExpires < inMDNS->p->nextDHCPLeaseExpires ) )
2540 {
2541 inMDNS->p->nextDHCPLeaseExpires = p->ifa_dhcpLeaseExpires;
2542 }
2543
2544 // If we're on a platform that doesn't have WSARecvMsg(), there's no way
2545 // of determing the destination address of a packet that is sent to us.
2546 // For multicast packets, that's easy to determine. But for the unicast
2547 // sockets, we'll fake it by taking the address of the first interface
2548 // that is successfully setup.
2549
2550 if ( !foundUnicastSock4DestAddr )
2551 {
2552 inMDNS->p->unicastSock4.addr = ifd->interfaceInfo.ip;
2553 foundUnicastSock4DestAddr = TRUE;
2554 }
2555
2556 *next = ifd;
2557 next = &ifd->next;
2558 ++inMDNS->p->interfaceCount;
2559 }
2560 #endif
2561
2562 // Set up IPv6 interface(s) after IPv4 is set up (see IPv4 notes above for reasoning).
2563
2564 #if( MDNS_WINDOWS_ENABLE_IPV6 )
2565
2566 if ( gEnableIPv6 )
2567 {
2568 for( p = addrs; p; p = p->ifa_next )
2569 {
2570 if( !p->ifa_addr || ( p->ifa_addr->sa_family != AF_INET6 ) || ( ( p->ifa_flags & flagMask ) != flagTest ) )
2571 {
2572 continue;
2573 }
2574 if( p->ifa_flags & IFF_LOOPBACK )
2575 {
2576 if( !loopbackv6 )
2577 {
2578 loopbackv6 = p;
2579 }
2580 continue;
2581 }
2582 dlog( kDebugLevelVerbose, DEBUG_NAME "Interface %40s (0x%08X) %##a\n",
2583 p->ifa_name ? p->ifa_name : "<null>", p->ifa_extra.index, p->ifa_addr );
2584
2585 err = SetupInterface( inMDNS, p, &ifd );
2586 require_noerr( err, exit );
2587
2588 // If this guy is point-to-point (ifd->interfaceInfo.McastTxRx == 0 ) we still want to
2589 // register him, but we also want to note that we haven't found a v4 interface
2590 // so that we register loopback so same host operations work
2591
2592 if ( ifd->interfaceInfo.McastTxRx == mDNStrue )
2593 {
2594 foundv6 = mDNStrue;
2595 }
2596
2597 // If we're on a platform that doesn't have WSARecvMsg(), there's no way
2598 // of determing the destination address of a packet that is sent to us.
2599 // For multicast packets, that's easy to determine. But for the unicast
2600 // sockets, we'll fake it by taking the address of the first interface
2601 // that is successfully setup.
2602
2603 if ( !foundUnicastSock6DestAddr )
2604 {
2605 inMDNS->p->unicastSock6.addr = ifd->interfaceInfo.ip;
2606 foundUnicastSock6DestAddr = TRUE;
2607 }
2608
2609 *next = ifd;
2610 next = &ifd->next;
2611 ++inMDNS->p->interfaceCount;
2612 }
2613 }
2614
2615 #endif
2616
2617 // If there are no real interfaces, but there is a loopback interface, use that so same-machine operations work.
2618
2619 #if( !MDNS_WINDOWS_ENABLE_IPV4 && !MDNS_WINDOWS_ENABLE_IPV6 )
2620
2621 flagMask |= IFF_LOOPBACK;
2622 flagTest |= IFF_LOOPBACK;
2623
2624 for( p = addrs; p; p = p->ifa_next )
2625 {
2626 if( !p->ifa_addr || ( ( p->ifa_flags & flagMask ) != flagTest ) )
2627 {
2628 continue;
2629 }
2630 if( ( p->ifa_addr->sa_family != AF_INET ) && ( p->ifa_addr->sa_family != AF_INET6 ) )
2631 {
2632 continue;
2633 }
2634
2635 v4loopback = p;
2636 break;
2637 }
2638
2639 #endif
2640
2641 if ( !foundv4 && loopbackv4 )
2642 {
2643 dlog( kDebugLevelInfo, DEBUG_NAME "Interface %40s (0x%08X) %##a\n",
2644 loopbackv4->ifa_name ? loopbackv4->ifa_name : "<null>", loopbackv4->ifa_extra.index, loopbackv4->ifa_addr );
2645
2646 err = SetupInterface( inMDNS, loopbackv4, &ifd );
2647 require_noerr( err, exit );
2648
2649 inMDNS->p->registeredLoopback4 = mDNStrue;
2650
2651 #if( MDNS_WINDOWS_ENABLE_IPV4 )
2652
2653 // If we're on a platform that doesn't have WSARecvMsg(), there's no way
2654 // of determing the destination address of a packet that is sent to us.
2655 // For multicast packets, that's easy to determine. But for the unicast
2656 // sockets, we'll fake it by taking the address of the first interface
2657 // that is successfully setup.
2658
2659 if ( !foundUnicastSock4DestAddr )
2660 {
2661 inMDNS->p->unicastSock4.addr = ifd->sock.addr;
2662 foundUnicastSock4DestAddr = TRUE;
2663 }
2664 #endif
2665
2666 *next = ifd;
2667 next = &ifd->next;
2668 ++inMDNS->p->interfaceCount;
2669 }
2670
2671 if ( !foundv6 && loopbackv6 )
2672 {
2673 dlog( kDebugLevelInfo, DEBUG_NAME "Interface %40s (0x%08X) %##a\n",
2674 loopbackv6->ifa_name ? loopbackv6->ifa_name : "<null>", loopbackv6->ifa_extra.index, loopbackv6->ifa_addr );
2675
2676 err = SetupInterface( inMDNS, loopbackv6, &ifd );
2677 require_noerr( err, exit );
2678
2679 #if( MDNS_WINDOWS_ENABLE_IPV6 )
2680
2681 if ( gEnableIPv6 )
2682 {
2683 // If we're on a platform that doesn't have WSARecvMsg(), there's no way
2684 // of determing the destination address of a packet that is sent to us.
2685 // For multicast packets, that's easy to determine. But for the unicast
2686 // sockets, we'll fake it by taking the address of the first interface
2687 // that is successfully setup.
2688
2689 if ( !foundUnicastSock6DestAddr )
2690 {
2691 inMDNS->p->unicastSock6.addr = ifd->sock.addr;
2692 foundUnicastSock6DestAddr = TRUE;
2693 }
2694 }
2695
2696 #endif
2697
2698 *next = ifd;
2699 next = &ifd->next;
2700 ++inMDNS->p->interfaceCount;
2701 }
2702
2703 CheckFileShares( inMDNS );
2704
2705 exit:
2706 if( err )
2707 {
2708 TearDownInterfaceList( inMDNS );
2709 }
2710 if( addrs )
2711 {
2712 freeifaddrs( addrs );
2713 }
2714 dlog( kDebugLevelTrace, DEBUG_NAME "setting up interface list done (err=%d %m)\n", err, err );
2715 return( err );
2716 }
2717
2718 //===========================================================================================================================
2719 // TearDownInterfaceList
2720 //===========================================================================================================================
2721
2722 mStatus TearDownInterfaceList( mDNS * const inMDNS )
2723 {
2724 mDNSInterfaceData ** p;
2725 mDNSInterfaceData * ifd;
2726
2727 dlog( kDebugLevelTrace, DEBUG_NAME "tearing down interface list\n" );
2728 check( inMDNS );
2729 check( inMDNS->p );
2730
2731 // Free any interfaces that were previously marked inactive and are no longer referenced by the mDNS cache.
2732 // Interfaces are marked inactive, but not deleted immediately if they were still referenced by the mDNS cache
2733 // so that remove events that occur after an interface goes away can still report the correct interface.
2734
2735 p = &inMDNS->p->inactiveInterfaceList;
2736 while( *p )
2737 {
2738 ifd = *p;
2739 if( NumCacheRecordsForInterfaceID( inMDNS, (mDNSInterfaceID) ifd ) > 0 )
2740 {
2741 p = &ifd->next;
2742 continue;
2743 }
2744
2745 dlog( kDebugLevelInfo, DEBUG_NAME "freeing unreferenced, inactive interface %#p %#a\n", ifd, &ifd->interfaceInfo.ip );
2746 *p = ifd->next;
2747
2748 QueueUserAPC( ( PAPCFUNC ) FreeInterface, inMDNS->p->mainThread, ( ULONG_PTR ) ifd );
2749 }
2750
2751 // Tear down all the interfaces.
2752
2753 while( inMDNS->p->interfaceList )
2754 {
2755 ifd = inMDNS->p->interfaceList;
2756 inMDNS->p->interfaceList = ifd->next;
2757
2758 TearDownInterface( inMDNS, ifd );
2759 }
2760 inMDNS->p->interfaceCount = 0;
2761
2762 dlog( kDebugLevelTrace, DEBUG_NAME "tearing down interface list done\n" );
2763 return( mStatus_NoError );
2764 }
2765
2766 //===========================================================================================================================
2767 // SetupInterface
2768 //===========================================================================================================================
2769
2770 mDNSlocal mStatus SetupInterface( mDNS * const inMDNS, const struct ifaddrs *inIFA, mDNSInterfaceData **outIFD )
2771 {
2772 mDNSInterfaceData * ifd;
2773 mDNSInterfaceData * p;
2774 mStatus err;
2775
2776 ifd = NULL;
2777 dlog( kDebugLevelTrace, DEBUG_NAME "setting up interface\n" );
2778 check( inMDNS );
2779 check( inMDNS->p );
2780 check( inIFA );
2781 check( inIFA->ifa_addr );
2782 check( outIFD );
2783
2784 // Allocate memory for the interface and initialize it.
2785
2786 ifd = (mDNSInterfaceData *) calloc( 1, sizeof( *ifd ) );
2787 require_action( ifd, exit, err = mStatus_NoMemoryErr );
2788 ifd->sock.fd = kInvalidSocketRef;
2789 ifd->sock.ifd = ifd;
2790 ifd->sock.next = NULL;
2791 ifd->sock.m = inMDNS;
2792 ifd->index = inIFA->ifa_extra.index;
2793 ifd->scopeID = inIFA->ifa_extra.index;
2794 check( strlen( inIFA->ifa_name ) < sizeof( ifd->name ) );
2795 strncpy( ifd->name, inIFA->ifa_name, sizeof( ifd->name ) - 1 );
2796 ifd->name[ sizeof( ifd->name ) - 1 ] = '\0';
2797
2798 strncpy(ifd->interfaceInfo.ifname, inIFA->ifa_name, sizeof(ifd->interfaceInfo.ifname));
2799 ifd->interfaceInfo.ifname[sizeof(ifd->interfaceInfo.ifname)-1] = 0;
2800
2801 // We always send and receive using IPv4, but to reduce traffic, we send and receive using IPv6 only on interfaces
2802 // that have no routable IPv4 address. Having a routable IPv4 address assigned is a reasonable indicator of being
2803 // on a large configured network, which means there's a good chance that most or all the other devices on that
2804 // network should also have v4. By doing this we lose the ability to talk to true v6-only devices on that link,
2805 // but we cut the packet rate in half. At this time, reducing the packet rate is more important than v6-only
2806 // devices on a large configured network, so we are willing to make that sacrifice.
2807
2808 ifd->interfaceInfo.McastTxRx = ( ( inIFA->ifa_flags & IFF_MULTICAST ) && !( inIFA->ifa_flags & IFF_POINTTOPOINT ) ) ? mDNStrue : mDNSfalse;
2809 ifd->interfaceInfo.InterfaceID = NULL;
2810
2811 for( p = inMDNS->p->interfaceList; p; p = p->next )
2812 {
2813 if ( strcmp( p->name, ifd->name ) == 0 )
2814 {
2815 if (!ifd->interfaceInfo.InterfaceID)
2816 {
2817 ifd->interfaceInfo.InterfaceID = (mDNSInterfaceID) p;
2818 }
2819
2820 if ( ( inIFA->ifa_addr->sa_family != AF_INET ) &&
2821 ( p->interfaceInfo.ip.type == mDNSAddrType_IPv4 ) &&
2822 ( p->interfaceInfo.ip.ip.v4.b[ 0 ] != 169 || p->interfaceInfo.ip.ip.v4.b[ 1 ] != 254 ) )
2823 {
2824 ifd->interfaceInfo.McastTxRx = mDNSfalse;
2825 }
2826
2827 break;
2828 }
2829 }
2830
2831 if ( !ifd->interfaceInfo.InterfaceID )
2832 {
2833 ifd->interfaceInfo.InterfaceID = (mDNSInterfaceID) ifd;
2834 }
2835
2836 // Set up a socket for this interface (if needed).
2837
2838 if( ifd->interfaceInfo.McastTxRx )
2839 {
2840 DWORD size;
2841
2842 err = SetupSocket( inMDNS, inIFA->ifa_addr, MulticastDNSPort, &ifd->sock.fd );
2843 require_noerr( err, exit );
2844 ifd->sock.addr = ( inIFA->ifa_addr->sa_family == AF_INET6 ) ? AllDNSLinkGroup_v6 : AllDNSLinkGroup_v4;
2845 ifd->sock.port = MulticastDNSPort;
2846
2847 // Get a ptr to the WSARecvMsg function, if supported. Otherwise, we'll fallback to recvfrom.
2848
2849 err = WSAIoctl( ifd->sock.fd, SIO_GET_EXTENSION_FUNCTION_POINTER, &kWSARecvMsgGUID, sizeof( kWSARecvMsgGUID ), &ifd->sock.recvMsgPtr, sizeof( ifd->sock.recvMsgPtr ), &size, NULL, NULL );
2850
2851 if ( err )
2852 {
2853 ifd->sock.recvMsgPtr = NULL;
2854 }
2855 }
2856
2857 if ( inIFA->ifa_dhcpEnabled && ( inIFA->ifa_dhcpLeaseExpires < inMDNS->p->nextDHCPLeaseExpires ) )
2858 {
2859 inMDNS->p->nextDHCPLeaseExpires = inIFA->ifa_dhcpLeaseExpires;
2860 }
2861
2862 ifd->interfaceInfo.NetWake = inIFA->ifa_womp;
2863
2864 // Register this interface with mDNS.
2865
2866 err = SockAddrToMDNSAddr( inIFA->ifa_addr, &ifd->interfaceInfo.ip, NULL );
2867 require_noerr( err, exit );
2868
2869 err = SockAddrToMDNSAddr( inIFA->ifa_netmask, &ifd->interfaceInfo.mask, NULL );
2870 require_noerr( err, exit );
2871
2872 memcpy( ifd->interfaceInfo.MAC.b, inIFA->ifa_physaddr, sizeof( ifd->interfaceInfo.MAC.b ) );
2873
2874 ifd->interfaceInfo.Advertise = ( mDNSu8 ) inMDNS->AdvertiseLocalAddresses;
2875
2876 if ( ifd->sock.fd != kInvalidSocketRef )
2877 {
2878 err = mDNSPollRegisterSocket( ifd->sock.fd, FD_READ, UDPSocketNotification, &ifd->sock );
2879 require_noerr( err, exit );
2880 }
2881
2882 err = mDNS_RegisterInterface( inMDNS, &ifd->interfaceInfo, mDNSfalse );
2883 require_noerr( err, exit );
2884 ifd->hostRegistered = mDNStrue;
2885
2886 dlog( kDebugLevelInfo, DEBUG_NAME "Registered interface %##a with mDNS\n", inIFA->ifa_addr );
2887
2888 // Success!
2889
2890 *outIFD = ifd;
2891 ifd = NULL;
2892
2893 exit:
2894
2895 if( ifd )
2896 {
2897 TearDownInterface( inMDNS, ifd );
2898 }
2899 dlog( kDebugLevelTrace, DEBUG_NAME "setting up interface done (err=%d %m)\n", err, err );
2900 return( err );
2901 }
2902
2903 //===========================================================================================================================
2904 // TearDownInterface
2905 //===========================================================================================================================
2906
2907 mDNSlocal mStatus TearDownInterface( mDNS * const inMDNS, mDNSInterfaceData *inIFD )
2908 {
2909 check( inMDNS );
2910 check( inIFD );
2911
2912 // Deregister this interface with mDNS.
2913
2914 dlog( kDebugLevelInfo, DEBUG_NAME "Deregistering interface %#a with mDNS\n", &inIFD->interfaceInfo.ip );
2915
2916 if( inIFD->hostRegistered )
2917 {
2918 inIFD->hostRegistered = mDNSfalse;
2919 mDNS_DeregisterInterface( inMDNS, &inIFD->interfaceInfo, mDNSfalse );
2920 }
2921
2922 // Tear down the multicast socket.
2923
2924 UDPCloseSocket( &inIFD->sock );
2925
2926 // If the interface is still referenced by items in the mDNS cache then put it on the inactive list. This keeps
2927 // the InterfaceID valid so remove events report the correct interface. If it is no longer referenced, free it.
2928
2929 if( NumCacheRecordsForInterfaceID( inMDNS, (mDNSInterfaceID) inIFD ) > 0 )
2930 {
2931 inIFD->next = inMDNS->p->inactiveInterfaceList;
2932 inMDNS->p->inactiveInterfaceList = inIFD;
2933 dlog( kDebugLevelInfo, DEBUG_NAME "deferring free of interface %#p %#a\n", inIFD, &inIFD->interfaceInfo.ip );
2934 }
2935 else
2936 {
2937 dlog( kDebugLevelInfo, DEBUG_NAME "freeing interface %#p %#a immediately\n", inIFD, &inIFD->interfaceInfo.ip );
2938 QueueUserAPC( ( PAPCFUNC ) FreeInterface, inMDNS->p->mainThread, ( ULONG_PTR ) inIFD );
2939 }
2940
2941 return( mStatus_NoError );
2942 }
2943
2944 mDNSlocal void CALLBACK FreeInterface( mDNSInterfaceData *inIFD )
2945 {
2946 free( inIFD );
2947 }
2948
2949 //===========================================================================================================================
2950 // SetupSocket
2951 //===========================================================================================================================
2952
2953 mDNSlocal mStatus SetupSocket( mDNS * const inMDNS, const struct sockaddr *inAddr, mDNSIPPort port, SocketRef *outSocketRef )
2954 {
2955 mStatus err;
2956 SocketRef sock;
2957 int option;
2958 DWORD bytesReturned = 0;
2959 BOOL behavior = FALSE;
2960
2961 DEBUG_UNUSED( inMDNS );
2962
2963 dlog( kDebugLevelTrace, DEBUG_NAME "setting up socket %##a\n", inAddr );
2964 check( inMDNS );
2965 check( outSocketRef );
2966
2967 // Set up an IPv4 or IPv6 UDP socket.
2968
2969 sock = socket( inAddr->sa_family, SOCK_DGRAM, IPPROTO_UDP );
2970 err = translate_errno( IsValidSocket( sock ), errno_compat(), kUnknownErr );
2971 require_noerr( err, exit );
2972
2973 // Turn on reuse address option so multiple servers can listen for Multicast DNS packets,
2974 // if we're creating a multicast socket
2975
2976 if ( !mDNSIPPortIsZero( port ) )
2977 {
2978 option = 1;
2979 err = setsockopt( sock, SOL_SOCKET, SO_REUSEADDR, (char *) &option, sizeof( option ) );
2980 check_translated_errno( err == 0, errno_compat(), kOptionErr );
2981 }
2982
2983 // <rdar://problem/7894393> Bonjour for Windows broken on Windows XP
2984 //
2985 // Not sure why, but the default behavior for sockets is to behave incorrectly
2986 // when using them in Overlapped I/O mode on XP. According to MSDN:
2987 //
2988 // SIO_UDP_CONNRESET (opcode setting: I, T==3)
2989 // Windows XP: Controls whether UDP PORT_UNREACHABLE messages are reported. Set to TRUE to enable reporting.
2990 // Set to FALSE to disable reporting.
2991 //
2992 // Packet traces from misbehaving Bonjour installations showed that ICMP port unreachable
2993 // messages were being sent to us after we sent out packets to a multicast address. This is clearly
2994 // incorrect behavior, but should be harmless. However, after receiving a port unreachable error, WinSock
2995 // will no longer receive any packets from that socket, which is not harmless. This behavior is only
2996 // seen on XP.
2997 //
2998 // So we turn off port unreachable reporting to make sure our sockets that are reading
2999 // multicast packets function correctly under all circumstances.
3000
3001 err = WSAIoctl( sock, SIO_UDP_CONNRESET, &behavior, sizeof(behavior), NULL, 0, &bytesReturned, NULL, NULL );
3002 check_translated_errno( err == 0, errno_compat(), kOptionErr );
3003
3004 if( inAddr->sa_family == AF_INET )
3005 {
3006 mDNSv4Addr ipv4;
3007 struct sockaddr_in sa4;
3008 struct ip_mreq mreqv4;
3009
3010 // Bind the socket to the desired port
3011
3012 ipv4.NotAnInteger = ( (const struct sockaddr_in *) inAddr )->sin_addr.s_addr;
3013 mDNSPlatformMemZero( &sa4, sizeof( sa4 ) );
3014 sa4.sin_family = AF_INET;
3015 sa4.sin_port = port.NotAnInteger;
3016 sa4.sin_addr.s_addr = ipv4.NotAnInteger;
3017
3018 err = bind( sock, (struct sockaddr *) &sa4, sizeof( sa4 ) );
3019 check_translated_errno( err == 0, errno_compat(), kUnknownErr );
3020
3021 // Turn on option to receive destination addresses and receiving interface.
3022
3023 option = 1;
3024 err = setsockopt( sock, IPPROTO_IP, IP_PKTINFO, (char *) &option, sizeof( option ) );
3025 check_translated_errno( err == 0, errno_compat(), kOptionErr );
3026
3027 if ( !mDNSIPPortIsZero( port ) )
3028 {
3029 // Join the all-DNS multicast group so we receive Multicast DNS packets
3030
3031 mreqv4.imr_multiaddr.s_addr = AllDNSLinkGroup_v4.ip.v4.NotAnInteger;
3032 mreqv4.imr_interface.s_addr = ipv4.NotAnInteger;
3033 err = setsockopt( sock, IPPROTO_IP, IP_ADD_MEMBERSHIP, (char *) &mreqv4, sizeof( mreqv4 ) );
3034 check_translated_errno( err == 0, errno_compat(), kOptionErr );
3035
3036 // Specify the interface to send multicast packets on this socket.
3037
3038 sa4.sin_addr.s_addr = ipv4.NotAnInteger;
3039 err = setsockopt( sock, IPPROTO_IP, IP_MULTICAST_IF, (char *) &sa4.sin_addr, sizeof( sa4.sin_addr ) );
3040 check_translated_errno( err == 0, errno_compat(), kOptionErr );
3041
3042 // Enable multicast loopback so we receive multicast packets we send (for same-machine operations).
3043
3044 option = 1;
3045 err = setsockopt( sock, IPPROTO_IP, IP_MULTICAST_LOOP, (char *) &option, sizeof( option ) );
3046 check_translated_errno( err == 0, errno_compat(), kOptionErr );
3047 }
3048
3049 // Send unicast packets with TTL 255 (helps against spoofing).
3050
3051 option = 255;
3052 err = setsockopt( sock, IPPROTO_IP, IP_TTL, (char *) &option, sizeof( option ) );
3053 check_translated_errno( err == 0, errno_compat(), kOptionErr );
3054
3055 // Send multicast packets with TTL 255 (helps against spoofing).
3056
3057 option = 255;
3058 err = setsockopt( sock, IPPROTO_IP, IP_MULTICAST_TTL, (char *) &option, sizeof( option ) );
3059 check_translated_errno( err == 0, errno_compat(), kOptionErr );
3060
3061 }
3062 else if( inAddr->sa_family == AF_INET6 )
3063 {
3064 struct sockaddr_in6 * sa6p;
3065 struct sockaddr_in6 sa6;
3066 struct ipv6_mreq mreqv6;
3067
3068 sa6p = (struct sockaddr_in6 *) inAddr;
3069
3070 // Bind the socket to the desired port
3071
3072 mDNSPlatformMemZero( &sa6, sizeof( sa6 ) );
3073 sa6.sin6_family = AF_INET6;
3074 sa6.sin6_port = port.NotAnInteger;
3075 sa6.sin6_flowinfo = 0;
3076 sa6.sin6_addr = sa6p->sin6_addr;
3077 sa6.sin6_scope_id = sa6p->sin6_scope_id;
3078
3079 err = bind( sock, (struct sockaddr *) &sa6, sizeof( sa6 ) );
3080 check_translated_errno( err == 0, errno_compat(), kUnknownErr );
3081
3082 // Turn on option to receive destination addresses and receiving interface.
3083
3084 option = 1;
3085 err = setsockopt( sock, IPPROTO_IPV6, IPV6_PKTINFO, (char *) &option, sizeof( option ) );
3086 check_translated_errno( err == 0, errno_compat(), kOptionErr );
3087
3088 // We only want to receive IPv6 packets (not IPv4-mapped IPv6 addresses) because we have a separate socket
3089 // for IPv4, but the IPv6 stack in Windows currently doesn't support IPv4-mapped IPv6 addresses and doesn't
3090 // support the IPV6_V6ONLY socket option so the following code would typically not be executed (or needed).
3091
3092 #if( defined( IPV6_V6ONLY ) )
3093 option = 1;
3094 err = setsockopt( sock, IPPROTO_IPV6, IPV6_V6ONLY, (char *) &option, sizeof( option ) );
3095 check_translated_errno( err == 0, errno_compat(), kOptionErr );
3096 #endif
3097
3098 if ( !mDNSIPPortIsZero( port ) )
3099 {
3100 // Join the all-DNS multicast group so we receive Multicast DNS packets.
3101
3102 mreqv6.ipv6mr_multiaddr = *( (struct in6_addr *) &AllDNSLinkGroup_v6.ip.v6 );
3103 mreqv6.ipv6mr_interface = sa6p->sin6_scope_id;
3104 err = setsockopt( sock, IPPROTO_IPV6, IPV6_JOIN_GROUP, (char *) &mreqv6, sizeof( mreqv6 ) );
3105 check_translated_errno( err == 0, errno_compat(), kOptionErr );
3106
3107 // Specify the interface to send multicast packets on this socket.
3108
3109 option = (int) sa6p->sin6_scope_id;
3110 err = setsockopt( sock, IPPROTO_IPV6, IPV6_MULTICAST_IF, (char *) &option, sizeof( option ) );
3111 check_translated_errno( err == 0, errno_compat(), kOptionErr );
3112
3113 // Enable multicast loopback so we receive multicast packets we send (for same-machine operations).
3114
3115 option = 1;
3116 err = setsockopt( sock, IPPROTO_IPV6, IPV6_MULTICAST_LOOP, (char *) &option, sizeof( option ) );
3117 check_translated_errno( err == 0, errno_compat(), kOptionErr );
3118 }
3119
3120 // Send unicast packets with TTL 255 (helps against spoofing).
3121
3122 option = 255;
3123 err = setsockopt( sock, IPPROTO_IPV6, IPV6_UNICAST_HOPS, (char *) &option, sizeof( option ) );
3124 check_translated_errno( err == 0, errno_compat(), kOptionErr );
3125
3126 // Send multicast packets with TTL 255 (helps against spoofing).
3127
3128 option = 255;
3129 err = setsockopt( sock, IPPROTO_IPV6, IPV6_MULTICAST_HOPS, (char *) &option, sizeof( option ) );
3130 check_translated_errno( err == 0, errno_compat(), kOptionErr );
3131 }
3132 else
3133 {
3134 dlog( kDebugLevelError, DEBUG_NAME "%s: unsupport socket family (%d)\n", __ROUTINE__, inAddr->sa_family );
3135 err = kUnsupportedErr;
3136 goto exit;
3137 }
3138
3139 // Success!
3140
3141 *outSocketRef = sock;
3142 sock = kInvalidSocketRef;
3143 err = mStatus_NoError;
3144
3145 exit:
3146 if( IsValidSocket( sock ) )
3147 {
3148 close_compat( sock );
3149 }
3150 return( err );
3151 }
3152
3153 //===========================================================================================================================
3154 // SetupSocket
3155 //===========================================================================================================================
3156
3157 mDNSlocal mStatus SockAddrToMDNSAddr( const struct sockaddr * const inSA, mDNSAddr *outIP, mDNSIPPort *outPort )
3158 {
3159 mStatus err;
3160
3161 check( inSA );
3162 check( outIP );
3163
3164 if( inSA->sa_family == AF_INET )
3165 {
3166 struct sockaddr_in * sa4;
3167
3168 sa4 = (struct sockaddr_in *) inSA;
3169 outIP->type = mDNSAddrType_IPv4;
3170 outIP->ip.v4.NotAnInteger = sa4->sin_addr.s_addr;
3171 if( outPort )
3172 {
3173 outPort->NotAnInteger = sa4->sin_port;
3174 }
3175 err = mStatus_NoError;
3176 }
3177 else if( inSA->sa_family == AF_INET6 )
3178 {
3179 struct sockaddr_in6 * sa6;
3180
3181 sa6 = (struct sockaddr_in6 *) inSA;
3182 outIP->type = mDNSAddrType_IPv6;
3183 outIP->ip.v6 = *( (mDNSv6Addr *) &sa6->sin6_addr );
3184 if( IN6_IS_ADDR_LINKLOCAL( &sa6->sin6_addr ) )
3185 {
3186 outIP->ip.v6.w[ 1 ] = 0;
3187 }
3188 if( outPort )
3189 {
3190 outPort->NotAnInteger = sa6->sin6_port;
3191 }
3192 err = mStatus_NoError;
3193 }
3194 else
3195 {
3196 dlog( kDebugLevelError, DEBUG_NAME "%s: invalid sa_family %d", __ROUTINE__, inSA->sa_family );
3197 err = mStatus_BadParamErr;
3198 }
3199 return( err );
3200 }
3201
3202
3203 #if 0
3204 #pragma mark -
3205 #endif
3206
3207 //===========================================================================================================================
3208 // UDPSocketNotification
3209 //===========================================================================================================================
3210
3211 mDNSlocal void CALLBACK
3212 UDPSocketNotification( SOCKET sock, LPWSANETWORKEVENTS event, void *context )
3213 {
3214 UDPSocket *udpSock = ( UDPSocket* ) context;
3215 WSAMSG wmsg;
3216 WSABUF wbuf;
3217 struct sockaddr_storage sockSrcAddr; // This is filled in by the WSARecv* function
3218 INT sockSrcAddrLen; // See above
3219 mDNSAddr srcAddr;
3220 mDNSInterfaceID iid;
3221 mDNSIPPort srcPort;
3222 mDNSAddr dstAddr;
3223 mDNSIPPort dstPort;
3224 uint8_t controlBuffer[ 128 ];
3225 mDNSu8 * end;
3226 int num;
3227 DWORD numTries;
3228 mStatus err;
3229
3230 DEBUG_UNUSED( sock );
3231 DEBUG_UNUSED( event );
3232
3233 require_action( udpSock != NULL, exit, err = mStatus_BadStateErr );
3234
3235 dlog( kDebugLevelChatty, DEBUG_NAME "%s: sock = %d\n", __ROUTINE__, udpSock->fd );
3236
3237 // Initialize the buffer structure
3238
3239 wbuf.buf = (char *) &udpSock->packet;
3240 wbuf.len = (u_long) sizeof( udpSock->packet );
3241 sockSrcAddrLen = sizeof( sockSrcAddr );
3242
3243 numTries = 0;
3244
3245 do
3246 {
3247 if ( udpSock->recvMsgPtr )
3248 {
3249 DWORD size;
3250
3251 wmsg.name = ( LPSOCKADDR ) &sockSrcAddr;
3252 wmsg.namelen = sockSrcAddrLen;
3253 wmsg.lpBuffers = &wbuf;
3254 wmsg.dwBufferCount = 1;
3255 wmsg.Control.buf = ( CHAR* ) controlBuffer;
3256 wmsg.Control.len = sizeof( controlBuffer );
3257 wmsg.dwFlags = 0;
3258
3259 err = udpSock->recvMsgPtr( udpSock->fd, &wmsg, &size, NULL, NULL );
3260 err = translate_errno( ( err == 0 ), (OSStatus) WSAGetLastError(), kUnknownErr );
3261 num = ( int ) size;
3262
3263 // <rdar://problem/7824093> iTunes 9.1 fails to install with Bonjour service on Windows 7 Ultimate
3264 //
3265 // There seems to be a bug in some network device drivers that involves calling WSARecvMsg().
3266 // Although all the parameters to WSARecvMsg() are correct, it returns a
3267 // WSAEFAULT error code when there is no actual error. We have found experientially that falling
3268 // back to using WSARecvFrom() when this happens will work correctly.
3269
3270 if ( err == WSAEFAULT ) udpSock->recvMsgPtr = NULL;
3271 }
3272 else
3273 {
3274 DWORD flags = 0;
3275
3276 num = WSARecvFrom( udpSock->fd, &wbuf, 1, NULL, &flags, ( LPSOCKADDR ) &sockSrcAddr, &sockSrcAddrLen, NULL, NULL );
3277 err = translate_errno( ( num >= 0 ), ( OSStatus ) WSAGetLastError(), kUnknownErr );
3278 }
3279
3280 // According to MSDN <http://msdn.microsoft.com/en-us/library/ms741687(VS.85).aspx>:
3281 //
3282 // "WSAECONNRESET: For a UDP datagram socket, this error would indicate that a previous
3283 // send operation resulted in an ICMP "Port Unreachable" message."
3284 //
3285 // Because this is the case, we want to ignore this error and try again. Just in case
3286 // this is some kind of pathological condition, we'll break out of the retry loop
3287 // after 100 iterations
3288
3289 require_action( !err || ( err == WSAECONNRESET ) || ( err == WSAEFAULT ), exit, err = WSAGetLastError() );
3290 }
3291 while ( ( ( err == WSAECONNRESET ) || ( err == WSAEFAULT ) ) && ( numTries++ < 100 ) );
3292
3293 require_noerr( err, exit );
3294
3295 // Translate the source of this packet into mDNS data types
3296
3297 SockAddrToMDNSAddr( (struct sockaddr* ) &sockSrcAddr, &srcAddr, &srcPort );
3298
3299 // Initialize the destination of this packet. Just in case
3300 // we can't determine this info because we couldn't call
3301 // WSARecvMsg (recvMsgPtr)
3302
3303 dstAddr = udpSock->addr;
3304 dstPort = udpSock->port;
3305
3306 if ( udpSock->recvMsgPtr )
3307 {
3308 LPWSACMSGHDR header;
3309 LPWSACMSGHDR last = NULL;
3310 int count = 0;
3311
3312 // Parse the control information. Reject packets received on the wrong interface.
3313
3314 // <rdar://problem/7832196> INSTALL: Bonjour 2.0 on Windows can not start / stop
3315 //
3316 // There seems to be an interaction between Bullguard and this next bit of code.
3317 // When a user's machine is running Bullguard, the control information that is
3318 // returned is corrupted, and the code would go into an infinite loop. We'll add
3319 // two bits of defensive coding here. The first will check that each pointer to
3320 // the LPWSACMSGHDR that is returned in the for loop is different than the last.
3321 // This fixes the problem with Bullguard. The second will break out of this loop
3322 // after 100 iterations, just in case the corruption isn't caught by the first
3323 // check.
3324
3325 for ( header = WSA_CMSG_FIRSTHDR( &wmsg ); header; header = WSA_CMSG_NXTHDR( &wmsg, header ) )
3326 {
3327 if ( ( header != last ) && ( ++count < 100 ) )
3328 {
3329 last = header;
3330
3331 if ( ( header->cmsg_level == IPPROTO_IP ) && ( header->cmsg_type == IP_PKTINFO ) )
3332 {
3333 IN_PKTINFO * ipv4PacketInfo;
3334
3335 ipv4PacketInfo = (IN_PKTINFO *) WSA_CMSG_DATA( header );
3336
3337 if ( udpSock->ifd != NULL )
3338 {
3339 require_action( ipv4PacketInfo->ipi_ifindex == udpSock->ifd->index, exit, err = ( DWORD ) kMismatchErr );
3340 }
3341
3342 dstAddr.type = mDNSAddrType_IPv4;
3343 dstAddr.ip.v4.NotAnInteger = ipv4PacketInfo->ipi_addr.s_addr;
3344 }
3345 else if( ( header->cmsg_level == IPPROTO_IPV6 ) && ( header->cmsg_type == IPV6_PKTINFO ) )
3346 {
3347 IN6_PKTINFO * ipv6PacketInfo;
3348
3349 ipv6PacketInfo = (IN6_PKTINFO *) WSA_CMSG_DATA( header );
3350
3351 if ( udpSock->ifd != NULL )
3352 {
3353 require_action( ipv6PacketInfo->ipi6_ifindex == ( udpSock->ifd->index - kIPv6IfIndexBase ), exit, err = ( DWORD ) kMismatchErr );
3354 }
3355
3356 dstAddr.type = mDNSAddrType_IPv6;
3357 dstAddr.ip.v6 = *( (mDNSv6Addr *) &ipv6PacketInfo->ipi6_addr );
3358 }
3359 }
3360 else
3361 {
3362 static BOOL loggedMessage = FALSE;
3363
3364 if ( !loggedMessage )
3365 {
3366 LogMsg( "UDPEndRecv: WSARecvMsg control information error." );
3367 loggedMessage = TRUE;
3368 }
3369
3370 break;
3371 }
3372 }
3373 }
3374
3375 dlog( kDebugLevelChatty, DEBUG_NAME "packet received\n" );
3376 dlog( kDebugLevelChatty, DEBUG_NAME " size = %d\n", num );
3377 dlog( kDebugLevelChatty, DEBUG_NAME " src = %#a:%u\n", &srcAddr, ntohs( srcPort.NotAnInteger ) );
3378 dlog( kDebugLevelChatty, DEBUG_NAME " dst = %#a:%u\n", &dstAddr, ntohs( dstPort.NotAnInteger ) );
3379
3380 if ( udpSock->ifd != NULL )
3381 {
3382 dlog( kDebugLevelChatty, DEBUG_NAME " interface = %#a (index=0x%08X)\n", &udpSock->ifd->interfaceInfo.ip, udpSock->ifd->index );
3383 }
3384
3385 dlog( kDebugLevelChatty, DEBUG_NAME "\n" );
3386
3387 iid = udpSock->ifd ? udpSock->ifd->interfaceInfo.InterfaceID : NULL;
3388 end = ( (mDNSu8 *) &udpSock->packet ) + num;
3389
3390 mDNSCoreReceive( udpSock->m, &udpSock->packet, end, &srcAddr, srcPort, &dstAddr, dstPort, iid );
3391
3392 exit:
3393
3394 return;
3395 }
3396
3397
3398 //===========================================================================================================================
3399 // InterfaceListDidChange
3400 //===========================================================================================================================
3401 void InterfaceListDidChange( mDNS * const inMDNS )
3402 {
3403 mStatus err;
3404
3405 dlog( kDebugLevelInfo, DEBUG_NAME "interface list changed\n" );
3406 check( inMDNS );
3407
3408 // Tear down the existing interfaces and set up new ones using the new IP info.
3409
3410 err = TearDownInterfaceList( inMDNS );
3411 check_noerr( err );
3412
3413 err = SetupInterfaceList( inMDNS );
3414 check_noerr( err );
3415
3416 err = uDNS_SetupDNSConfig( inMDNS );
3417 check_noerr( err );
3418
3419 // Inform clients of the change.
3420
3421 mDNS_ConfigChanged(inMDNS);
3422
3423 // Force mDNS to update.
3424
3425 mDNSCoreMachineSleep( inMDNS, mDNSfalse ); // What is this for? Mac OS X does not do this
3426 }
3427
3428
3429 //===========================================================================================================================
3430 // ComputerDescriptionDidChange
3431 //===========================================================================================================================
3432 void ComputerDescriptionDidChange( mDNS * const inMDNS )
3433 {
3434 dlog( kDebugLevelInfo, DEBUG_NAME "computer description has changed\n" );
3435 check( inMDNS );
3436
3437 // redo the names
3438 SetupNiceName( inMDNS );
3439 }
3440
3441
3442 //===========================================================================================================================
3443 // TCPIPConfigDidChange
3444 //===========================================================================================================================
3445 void TCPIPConfigDidChange( mDNS * const inMDNS )
3446 {
3447 mStatus err;
3448
3449 dlog( kDebugLevelInfo, DEBUG_NAME "TCP/IP config has changed\n" );
3450 check( inMDNS );
3451
3452 err = uDNS_SetupDNSConfig( inMDNS );
3453 check_noerr( err );
3454 }
3455
3456
3457 //===========================================================================================================================
3458 // DynDNSConfigDidChange
3459 //===========================================================================================================================
3460 void DynDNSConfigDidChange( mDNS * const inMDNS )
3461 {
3462 mStatus err;
3463
3464 dlog( kDebugLevelInfo, DEBUG_NAME "DynDNS config has changed\n" );
3465 check( inMDNS );
3466
3467 SetDomainSecrets( inMDNS );
3468
3469 err = uDNS_SetupDNSConfig( inMDNS );
3470 check_noerr( err );
3471 }
3472
3473
3474 //===========================================================================================================================
3475 // FileSharingDidChange
3476 //===========================================================================================================================
3477 void FileSharingDidChange( mDNS * const inMDNS )
3478 {
3479 dlog( kDebugLevelInfo, DEBUG_NAME "File shares has changed\n" );
3480 check( inMDNS );
3481
3482 CheckFileShares( inMDNS );
3483 }
3484
3485
3486 //===========================================================================================================================
3487 // FilewallDidChange
3488 //===========================================================================================================================
3489 void FirewallDidChange( mDNS * const inMDNS )
3490 {
3491 dlog( kDebugLevelInfo, DEBUG_NAME "Firewall has changed\n" );
3492 check( inMDNS );
3493
3494 CheckFileShares( inMDNS );
3495 }
3496
3497
3498 #if 0
3499 #pragma mark -
3500 #pragma mark == Utilities ==
3501 #endif
3502
3503 //===========================================================================================================================
3504 // getifaddrs
3505 //===========================================================================================================================
3506
3507 mDNSlocal int getifaddrs( struct ifaddrs **outAddrs )
3508 {
3509 int err;
3510
3511 #if( MDNS_WINDOWS_USE_IPV6_IF_ADDRS )
3512
3513 // Try to the load the GetAdaptersAddresses function from the IP Helpers DLL. This API is only available on Windows
3514 // XP or later. Looking up the symbol at runtime allows the code to still work on older systems without that API.
3515
3516 if( !gIPHelperLibraryInstance )
3517 {
3518 gIPHelperLibraryInstance = LoadLibrary( TEXT( "Iphlpapi" ) );
3519 if( gIPHelperLibraryInstance )
3520 {
3521 gGetAdaptersAddressesFunctionPtr =
3522 (GetAdaptersAddressesFunctionPtr) GetProcAddress( gIPHelperLibraryInstance, "GetAdaptersAddresses" );
3523 if( !gGetAdaptersAddressesFunctionPtr )
3524 {
3525 BOOL ok;
3526
3527 ok = FreeLibrary( gIPHelperLibraryInstance );
3528 check_translated_errno( ok, GetLastError(), kUnknownErr );
3529 gIPHelperLibraryInstance = NULL;
3530 }
3531 }
3532 }
3533
3534 // Use the new IPv6-capable routine if supported. Otherwise, fall back to the old and compatible IPv4-only code.
3535 // <rdar://problem/4278934> Fall back to using getifaddrs_ipv4 if getifaddrs_ipv6 fails
3536 // <rdar://problem/6145913> Fall back to using getifaddrs_ipv4 if getifaddrs_ipv6 returns no addrs
3537
3538 if( !gGetAdaptersAddressesFunctionPtr || ( ( ( err = getifaddrs_ipv6( outAddrs ) ) != mStatus_NoError ) || ( ( outAddrs != NULL ) && ( *outAddrs == NULL ) ) ) )
3539 {
3540 err = getifaddrs_ipv4( outAddrs );
3541 require_noerr( err, exit );
3542 }
3543
3544 #else
3545
3546 err = getifaddrs_ipv4( outAddrs );
3547 require_noerr( err, exit );
3548
3549 #endif
3550
3551 exit:
3552 return( err );
3553 }
3554
3555 #if( MDNS_WINDOWS_USE_IPV6_IF_ADDRS )
3556 //===========================================================================================================================
3557 // getifaddrs_ipv6
3558 //===========================================================================================================================
3559
3560 mDNSlocal int getifaddrs_ipv6( struct ifaddrs **outAddrs )
3561 {
3562 DWORD err;
3563 int i;
3564 DWORD flags;
3565 struct ifaddrs * head;
3566 struct ifaddrs ** next;
3567 IP_ADAPTER_ADDRESSES * iaaList;
3568 ULONG iaaListSize;
3569 IP_ADAPTER_ADDRESSES * iaa;
3570 size_t size;
3571 struct ifaddrs * ifa;
3572
3573 check( gGetAdaptersAddressesFunctionPtr );
3574
3575 head = NULL;
3576 next = &head;
3577 iaaList = NULL;
3578
3579 // Get the list of interfaces. The first call gets the size and the second call gets the actual data.
3580 // This loops to handle the case where the interface changes in the window after getting the size, but before the
3581 // second call completes. A limit of 100 retries is enforced to prevent infinite loops if something else is wrong.
3582
3583 flags = GAA_FLAG_INCLUDE_PREFIX | GAA_FLAG_SKIP_ANYCAST | GAA_FLAG_SKIP_MULTICAST | GAA_FLAG_SKIP_DNS_SERVER | GAA_FLAG_SKIP_FRIENDLY_NAME;
3584 i = 0;
3585 for( ;; )
3586 {
3587 iaaListSize = 0;
3588 err = gGetAdaptersAddressesFunctionPtr( AF_UNSPEC, flags, NULL, NULL, &iaaListSize );
3589 check( err == ERROR_BUFFER_OVERFLOW );
3590 check( iaaListSize >= sizeof( IP_ADAPTER_ADDRESSES ) );
3591
3592 iaaList = (IP_ADAPTER_ADDRESSES *) malloc( iaaListSize );
3593 require_action( iaaList, exit, err = ERROR_NOT_ENOUGH_MEMORY );
3594
3595 err = gGetAdaptersAddressesFunctionPtr( AF_UNSPEC, flags, NULL, iaaList, &iaaListSize );
3596 if( err == ERROR_SUCCESS ) break;
3597
3598 free( iaaList );
3599 iaaList = NULL;
3600 ++i;
3601 require( i < 100, exit );
3602 dlog( kDebugLevelWarning, "%s: retrying GetAdaptersAddresses after %d failure(s) (%d %m)\n", __ROUTINE__, i, err, err );
3603 }
3604
3605 for( iaa = iaaList; iaa; iaa = iaa->Next )
3606 {
3607 int addrIndex;
3608 IP_ADAPTER_UNICAST_ADDRESS * addr;
3609 DWORD ipv6IfIndex;
3610 IP_ADAPTER_PREFIX * firstPrefix;
3611
3612 if( iaa->IfIndex > 0xFFFFFF )
3613 {
3614 dlog( kDebugLevelAlert, DEBUG_NAME "%s: IPv4 ifindex out-of-range (0x%08X)\n", __ROUTINE__, iaa->IfIndex );
3615 }
3616 if( iaa->Ipv6IfIndex > 0xFF )
3617 {
3618 dlog( kDebugLevelAlert, DEBUG_NAME "%s: IPv6 ifindex out-of-range (0x%08X)\n", __ROUTINE__, iaa->Ipv6IfIndex );
3619 }
3620
3621 // For IPv4 interfaces, there seems to be a bug in iphlpapi.dll that causes the
3622 // following code to crash when iterating through the prefix list. This seems
3623 // to occur when iaa->Ipv6IfIndex != 0 when IPv6 is not installed on the host.
3624 // This shouldn't happen according to Microsoft docs which states:
3625 //
3626 // "Ipv6IfIndex contains 0 if IPv6 is not available on the interface."
3627 //
3628 // So the data structure seems to be corrupted when we return from
3629 // GetAdaptersAddresses(). The bug seems to occur when iaa->Length <
3630 // sizeof(IP_ADAPTER_ADDRESSES), so when that happens, we'll manually
3631 // modify iaa to have the correct values.
3632
3633 if ( iaa->Length >= sizeof( IP_ADAPTER_ADDRESSES ) )
3634 {
3635 ipv6IfIndex = iaa->Ipv6IfIndex;
3636 firstPrefix = iaa->FirstPrefix;
3637 }
3638 else
3639 {
3640 ipv6IfIndex = 0;
3641 firstPrefix = NULL;
3642 }
3643
3644 // Skip pseudo and tunnel interfaces.
3645
3646 if( ( ( ipv6IfIndex == 1 ) && ( iaa->IfType != IF_TYPE_SOFTWARE_LOOPBACK ) ) || ( iaa->IfType == IF_TYPE_TUNNEL ) )
3647 {
3648 continue;
3649 }
3650
3651 // Add each address as a separate interface to emulate the way getifaddrs works.
3652
3653 for( addrIndex = 0, addr = iaa->FirstUnicastAddress; addr; ++addrIndex, addr = addr->Next )
3654 {
3655 int family;
3656 IP_ADAPTER_PREFIX * prefix;
3657 uint32_t ipv4Index;
3658 struct sockaddr_in ipv4Netmask;
3659
3660 family = addr->Address.lpSockaddr->sa_family;
3661 if( ( family != AF_INET ) && ( family != AF_INET6 ) ) continue;
3662
3663 // <rdar://problem/6220642> iTunes 8: Bonjour doesn't work after upgrading iTunes 8
3664 // Seems as if the problem here is a buggy implementation of some network interface
3665 // driver. It is reporting that is has a link-local address when it is actually
3666 // disconnected. This was causing a problem in AddressToIndexAndMask.
3667 // The solution is to call AddressToIndexAndMask first, and if unable to lookup
3668 // the address, to ignore that address.
3669
3670 ipv4Index = 0;
3671 memset( &ipv4Netmask, 0, sizeof( ipv4Netmask ) );
3672
3673 if ( family == AF_INET )
3674 {
3675 err = AddressToIndexAndMask( addr->Address.lpSockaddr, &ipv4Index, ( struct sockaddr* ) &ipv4Netmask );
3676
3677 if ( err )
3678 {
3679 err = 0;
3680 continue;
3681 }
3682 }
3683
3684 ifa = (struct ifaddrs *) calloc( 1, sizeof( struct ifaddrs ) );
3685 require_action( ifa, exit, err = WSAENOBUFS );
3686
3687 *next = ifa;
3688 next = &ifa->ifa_next;
3689
3690 // Get the name.
3691
3692 size = strlen( iaa->AdapterName ) + 1;
3693 ifa->ifa_name = (char *) malloc( size );
3694 require_action( ifa->ifa_name, exit, err = WSAENOBUFS );
3695 memcpy( ifa->ifa_name, iaa->AdapterName, size );
3696
3697 // Get interface flags.
3698
3699 ifa->ifa_flags = 0;
3700 if( iaa->OperStatus == IfOperStatusUp ) ifa->ifa_flags |= IFF_UP;
3701 if( iaa->IfType == IF_TYPE_SOFTWARE_LOOPBACK ) ifa->ifa_flags |= IFF_LOOPBACK;
3702 else if ( IsPointToPoint( addr ) ) ifa->ifa_flags |= IFF_POINTTOPOINT;
3703 if( !( iaa->Flags & IP_ADAPTER_NO_MULTICAST ) ) ifa->ifa_flags |= IFF_MULTICAST;
3704
3705
3706 // <rdar://problem/4045657> Interface index being returned is 512
3707 //
3708 // Windows does not have a uniform scheme for IPv4 and IPv6 interface indexes.
3709 // This code used to shift the IPv4 index up to ensure uniqueness between
3710 // it and IPv6 indexes. Although this worked, it was somewhat confusing to developers, who
3711 // then see interface indexes passed back that don't correspond to anything
3712 // that is seen in Win32 APIs or command line tools like "route". As a relatively
3713 // small percentage of developers are actively using IPv6, it seems to
3714 // make sense to make our use of IPv4 as confusion free as possible.
3715 // So now, IPv6 interface indexes will be shifted up by a
3716 // constant value which will serve to uniquely identify them, and we will
3717 // leave IPv4 interface indexes unmodified.
3718
3719 switch( family )
3720 {
3721 case AF_INET: ifa->ifa_extra.index = iaa->IfIndex; break;
3722 case AF_INET6: ifa->ifa_extra.index = ipv6IfIndex + kIPv6IfIndexBase; break;
3723 default: break;
3724 }
3725
3726 // Get lease lifetime
3727
3728 if ( ( iaa->IfType != IF_TYPE_SOFTWARE_LOOPBACK ) && ( addr->LeaseLifetime != 0 ) && ( addr->ValidLifetime != 0xFFFFFFFF ) )
3729 {
3730 ifa->ifa_dhcpEnabled = TRUE;
3731 ifa->ifa_dhcpLeaseExpires = time( NULL ) + addr->ValidLifetime;
3732 }
3733 else
3734 {
3735 ifa->ifa_dhcpEnabled = FALSE;
3736 ifa->ifa_dhcpLeaseExpires = 0;
3737 }
3738
3739 if ( iaa->PhysicalAddressLength == sizeof( ifa->ifa_physaddr ) )
3740 {
3741 memcpy( ifa->ifa_physaddr, iaa->PhysicalAddress, iaa->PhysicalAddressLength );
3742 }
3743
3744 // Because we don't get notified of womp changes, we're going to just assume
3745 // that all wired interfaces have it enabled. Before we go to sleep, we'll check
3746 // if the interface actually supports it, and update mDNS->SystemWakeOnLANEnabled
3747 // accordingly
3748
3749 ifa->ifa_womp = ( iaa->IfType == IF_TYPE_ETHERNET_CSMACD ) ? mDNStrue : mDNSfalse;
3750
3751 // Get address.
3752
3753 switch( family )
3754 {
3755 case AF_INET:
3756 case AF_INET6:
3757 ifa->ifa_addr = (struct sockaddr *) calloc( 1, (size_t) addr->Address.iSockaddrLength );
3758 require_action( ifa->ifa_addr, exit, err = WSAENOBUFS );
3759 memcpy( ifa->ifa_addr, addr->Address.lpSockaddr, (size_t) addr->Address.iSockaddrLength );
3760 break;
3761
3762 default:
3763 break;
3764 }
3765 check( ifa->ifa_addr );
3766
3767 // Get subnet mask (IPv4)/link prefix (IPv6). It is specified as a bit length (e.g. 24 for 255.255.255.0).
3768
3769 switch ( family )
3770 {
3771 case AF_INET:
3772 {
3773 struct sockaddr_in * sa4;
3774
3775 sa4 = (struct sockaddr_in *) calloc( 1, sizeof( *sa4 ) );
3776 require_action( sa4, exit, err = WSAENOBUFS );
3777 sa4->sin_family = AF_INET;
3778 sa4->sin_addr.s_addr = ipv4Netmask.sin_addr.s_addr;
3779
3780 dlog( kDebugLevelInfo, DEBUG_NAME "%s: IPv4 mask = %s\n", __ROUTINE__, inet_ntoa( sa4->sin_addr ) );
3781 ifa->ifa_netmask = (struct sockaddr *) sa4;
3782 break;
3783 }
3784
3785 case AF_INET6:
3786 {
3787 struct sockaddr_in6 *sa6;
3788 char buf[ 256 ] = { 0 };
3789 DWORD buflen = sizeof( buf );
3790
3791 sa6 = (struct sockaddr_in6 *) calloc( 1, sizeof( *sa6 ) );
3792 require_action( sa6, exit, err = WSAENOBUFS );
3793 sa6->sin6_family = AF_INET6;
3794 memset( sa6->sin6_addr.s6_addr, 0xFF, sizeof( sa6->sin6_addr.s6_addr ) );
3795 ifa->ifa_netmask = (struct sockaddr *) sa6;
3796
3797 for ( prefix = firstPrefix; prefix; prefix = prefix->Next )
3798 {
3799 IN6_ADDR mask;
3800 IN6_ADDR maskedAddr;
3801 int maskIndex;
3802 DWORD len;
3803
3804 // According to MSDN:
3805 // "On Windows Vista and later, the linked IP_ADAPTER_PREFIX structures pointed to by the FirstPrefix member
3806 // include three IP adapter prefixes for each IP address assigned to the adapter. These include the host IP address prefix,
3807 // the subnet IP address prefix, and the subnet broadcast IP address prefix.
3808 // In addition, for each adapter there is a multicast address prefix and a broadcast address prefix.
3809 // On Windows XP with SP1 and later prior to Windows Vista, the linked IP_ADAPTER_PREFIX structures pointed to by the FirstPrefix member
3810 // include only a single IP adapter prefix for each IP address assigned to the adapter."
3811
3812 // We're only interested in the subnet IP address prefix. We'll determine if the prefix is the
3813 // subnet prefix by masking our address with a mask (computed from the prefix length) and see if that is the same
3814 // as the prefix address.
3815
3816 if ( ( prefix->PrefixLength == 0 ) ||
3817 ( prefix->PrefixLength > 128 ) ||
3818 ( addr->Address.iSockaddrLength != prefix->Address.iSockaddrLength ) ||
3819 ( memcmp( addr->Address.lpSockaddr, prefix->Address.lpSockaddr, addr->Address.iSockaddrLength ) == 0 ) )
3820 {
3821 continue;
3822 }
3823
3824 // Compute the mask
3825
3826 memset( mask.s6_addr, 0, sizeof( mask.s6_addr ) );
3827
3828 for ( len = (int) prefix->PrefixLength, maskIndex = 0; len > 0; len -= 8 )
3829 {
3830 uint8_t maskByte = ( len >= 8 ) ? 0xFF : (uint8_t)( ( 0xFFU << ( 8 - len ) ) & 0xFFU );
3831 mask.s6_addr[ maskIndex++ ] = maskByte;
3832 }
3833
3834 // Apply the mask
3835
3836 for ( i = 0; i < 16; i++ )
3837 {
3838 maskedAddr.s6_addr[ i ] = ( ( struct sockaddr_in6* ) addr->Address.lpSockaddr )->sin6_addr.s6_addr[ i ] & mask.s6_addr[ i ];
3839 }
3840
3841 // Compare
3842
3843 if ( memcmp( ( ( struct sockaddr_in6* ) prefix->Address.lpSockaddr )->sin6_addr.s6_addr, maskedAddr.s6_addr, sizeof( maskedAddr.s6_addr ) ) == 0 )
3844 {
3845 memcpy( sa6->sin6_addr.s6_addr, mask.s6_addr, sizeof( mask.s6_addr ) );
3846 break;
3847 }
3848 }
3849
3850 WSAAddressToStringA( ( LPSOCKADDR ) sa6, sizeof( struct sockaddr_in6 ), NULL, buf, &buflen );
3851 dlog( kDebugLevelInfo, DEBUG_NAME "%s: IPv6 mask = %s\n", __ROUTINE__, buf );
3852
3853 break;
3854 }
3855
3856 default:
3857 break;
3858 }
3859 }
3860 }
3861
3862 // Success!
3863
3864 if( outAddrs )
3865 {
3866 *outAddrs = head;
3867 head = NULL;
3868 }
3869 err = ERROR_SUCCESS;
3870
3871 exit:
3872 if( head )
3873 {
3874 freeifaddrs( head );
3875 }
3876 if( iaaList )
3877 {
3878 free( iaaList );
3879 }
3880 return( (int) err );
3881 }
3882
3883 #endif // MDNS_WINDOWS_USE_IPV6_IF_ADDRS
3884
3885 //===========================================================================================================================
3886 // getifaddrs_ipv4
3887 //===========================================================================================================================
3888
3889 mDNSlocal int getifaddrs_ipv4( struct ifaddrs **outAddrs )
3890 {
3891 int err;
3892 SOCKET sock;
3893 DWORD size;
3894 DWORD actualSize;
3895 INTERFACE_INFO * buffer;
3896 INTERFACE_INFO * tempBuffer;
3897 INTERFACE_INFO * ifInfo;
3898 int n;
3899 int i;
3900 struct ifaddrs * head;
3901 struct ifaddrs ** next;
3902 struct ifaddrs * ifa;
3903
3904 sock = INVALID_SOCKET;
3905 buffer = NULL;
3906 head = NULL;
3907 next = &head;
3908
3909 // Get the interface list. WSAIoctl is called with SIO_GET_INTERFACE_LIST, but since this does not provide a
3910 // way to determine the size of the interface list beforehand, we have to start with an initial size guess and
3911 // call WSAIoctl repeatedly with increasing buffer sizes until it succeeds. Limit this to 100 tries for safety.
3912
3913 sock = socket( AF_INET, SOCK_DGRAM, IPPROTO_UDP );
3914 err = translate_errno( IsValidSocket( sock ), errno_compat(), kUnknownErr );
3915 require_noerr( err, exit );
3916
3917 n = 0;
3918 size = 16 * sizeof( INTERFACE_INFO );
3919 for( ;; )
3920 {
3921 tempBuffer = (INTERFACE_INFO *) realloc( buffer, size );
3922 require_action( tempBuffer, exit, err = WSAENOBUFS );
3923 buffer = tempBuffer;
3924
3925 err = WSAIoctl( sock, SIO_GET_INTERFACE_LIST, NULL, 0, buffer, size, &actualSize, NULL, NULL );
3926 if( err == 0 )
3927 {
3928 break;
3929 }
3930
3931 ++n;
3932 require_action( n < 100, exit, err = WSAEADDRNOTAVAIL );
3933
3934 size += ( 16 * sizeof( INTERFACE_INFO ) );
3935 }
3936 check( actualSize <= size );
3937 check( ( actualSize % sizeof( INTERFACE_INFO ) ) == 0 );
3938 n = (int)( actualSize / sizeof( INTERFACE_INFO ) );
3939
3940 // Process the raw interface list and build a linked list of IPv4 interfaces.
3941
3942 for( i = 0; i < n; ++i )
3943 {
3944 uint32_t ifIndex;
3945 struct sockaddr_in netmask;
3946
3947 ifInfo = &buffer[ i ];
3948 if( ifInfo->iiAddress.Address.sa_family != AF_INET )
3949 {
3950 continue;
3951 }
3952
3953 // <rdar://problem/6220642> iTunes 8: Bonjour doesn't work after upgrading iTunes 8
3954 // See comment in getifaddrs_ipv6
3955
3956 ifIndex = 0;
3957 memset( &netmask, 0, sizeof( netmask ) );
3958 err = AddressToIndexAndMask( ( struct sockaddr* ) &ifInfo->iiAddress.AddressIn, &ifIndex, ( struct sockaddr* ) &netmask );
3959
3960 if ( err )
3961 {
3962 continue;
3963 }
3964
3965 ifa = (struct ifaddrs *) calloc( 1, sizeof( struct ifaddrs ) );
3966 require_action( ifa, exit, err = WSAENOBUFS );
3967
3968 *next = ifa;
3969 next = &ifa->ifa_next;
3970
3971 // Get the name.
3972
3973 ifa->ifa_name = (char *) malloc( 16 );
3974 require_action( ifa->ifa_name, exit, err = WSAENOBUFS );
3975 sprintf( ifa->ifa_name, "%d", i + 1 );
3976
3977 // Get interface flags.
3978
3979 ifa->ifa_flags = (u_int) ifInfo->iiFlags;
3980
3981 // Get addresses.
3982
3983 if ( ifInfo->iiAddress.Address.sa_family == AF_INET )
3984 {
3985 struct sockaddr_in * sa4;
3986
3987 sa4 = &ifInfo->iiAddress.AddressIn;
3988 ifa->ifa_addr = (struct sockaddr *) calloc( 1, sizeof( *sa4 ) );
3989 require_action( ifa->ifa_addr, exit, err = WSAENOBUFS );
3990 memcpy( ifa->ifa_addr, sa4, sizeof( *sa4 ) );
3991
3992 ifa->ifa_netmask = (struct sockaddr*) calloc(1, sizeof( *sa4 ) );
3993 require_action( ifa->ifa_netmask, exit, err = WSAENOBUFS );
3994
3995 // <rdar://problem/4076478> Service won't start on Win2K. The address
3996 // family field was not being initialized.
3997
3998 ifa->ifa_netmask->sa_family = AF_INET;
3999 ( ( struct sockaddr_in* ) ifa->ifa_netmask )->sin_addr = netmask.sin_addr;
4000 ifa->ifa_extra.index = ifIndex;
4001 }
4002 else
4003 {
4004 // Emulate an interface index.
4005
4006 ifa->ifa_extra.index = (uint32_t)( i + 1 );
4007 }
4008 }
4009
4010 // Success!
4011
4012 if( outAddrs )
4013 {
4014 *outAddrs = head;
4015 head = NULL;
4016 }
4017 err = 0;
4018
4019 exit:
4020
4021 if( head )
4022 {
4023 freeifaddrs( head );
4024 }
4025 if( buffer )
4026 {
4027 free( buffer );
4028 }
4029 if( sock != INVALID_SOCKET )
4030 {
4031 closesocket( sock );
4032 }
4033 return( err );
4034 }
4035
4036 //===========================================================================================================================
4037 // freeifaddrs
4038 //===========================================================================================================================
4039
4040 mDNSlocal void freeifaddrs( struct ifaddrs *inIFAs )
4041 {
4042 struct ifaddrs * p;
4043 struct ifaddrs * q;
4044
4045 // Free each piece of the structure. Set to null after freeing to handle macro-aliased fields.
4046
4047 for( p = inIFAs; p; p = q )
4048 {
4049 q = p->ifa_next;
4050
4051 if( p->ifa_name )
4052 {
4053 free( p->ifa_name );
4054 p->ifa_name = NULL;
4055 }
4056 if( p->ifa_addr )
4057 {
4058 free( p->ifa_addr );
4059 p->ifa_addr = NULL;
4060 }
4061 if( p->ifa_netmask )
4062 {
4063 free( p->ifa_netmask );
4064 p->ifa_netmask = NULL;
4065 }
4066 if( p->ifa_broadaddr )
4067 {
4068 free( p->ifa_broadaddr );
4069 p->ifa_broadaddr = NULL;
4070 }
4071 if( p->ifa_dstaddr )
4072 {
4073 free( p->ifa_dstaddr );
4074 p->ifa_dstaddr = NULL;
4075 }
4076 if( p->ifa_data )
4077 {
4078 free( p->ifa_data );
4079 p->ifa_data = NULL;
4080 }
4081 free( p );
4082 }
4083 }
4084
4085
4086 //===========================================================================================================================
4087 // GetPrimaryInterface
4088 //===========================================================================================================================
4089
4090 mDNSlocal DWORD
4091 GetPrimaryInterface()
4092 {
4093 PMIB_IPFORWARDTABLE pIpForwardTable = NULL;
4094 DWORD dwSize = 0;
4095 BOOL bOrder = FALSE;
4096 OSStatus err;
4097 DWORD index = 0;
4098 DWORD metric = 0;
4099 unsigned long int i;
4100
4101 // Find out how big our buffer needs to be.
4102
4103 err = GetIpForwardTable(NULL, &dwSize, bOrder);
4104 require_action( err == ERROR_INSUFFICIENT_BUFFER, exit, err = kUnknownErr );
4105
4106 // Allocate the memory for the table
4107
4108 pIpForwardTable = (PMIB_IPFORWARDTABLE) malloc( dwSize );
4109 require_action( pIpForwardTable, exit, err = kNoMemoryErr );
4110
4111 // Now get the table.
4112
4113 err = GetIpForwardTable(pIpForwardTable, &dwSize, bOrder);
4114 require_noerr( err, exit );
4115
4116
4117 // Search for the row in the table we want.
4118
4119 for ( i = 0; i < pIpForwardTable->dwNumEntries; i++)
4120 {
4121 // Look for a default route
4122
4123 if ( pIpForwardTable->table[i].dwForwardDest == 0 )
4124 {
4125 if ( index && ( pIpForwardTable->table[i].dwForwardMetric1 >= metric ) )
4126 {
4127 continue;
4128 }
4129
4130 index = pIpForwardTable->table[i].dwForwardIfIndex;
4131 metric = pIpForwardTable->table[i].dwForwardMetric1;
4132 }
4133 }
4134
4135 exit:
4136
4137 if ( pIpForwardTable != NULL )
4138 {
4139 free( pIpForwardTable );
4140 }
4141
4142 return index;
4143 }
4144
4145
4146 //===========================================================================================================================
4147 // AddressToIndexAndMask
4148 //===========================================================================================================================
4149
4150 mDNSlocal mStatus
4151 AddressToIndexAndMask( struct sockaddr * addr, uint32_t * ifIndex, struct sockaddr * mask )
4152 {
4153 // Before calling AddIPAddress we use GetIpAddrTable to get
4154 // an adapter to which we can add the IP.
4155
4156 PMIB_IPADDRTABLE pIPAddrTable = NULL;
4157 DWORD dwSize = 0;
4158 mStatus err = mStatus_UnknownErr;
4159 DWORD i;
4160
4161 // For now, this is only for IPv4 addresses. That is why we can safely cast
4162 // addr's to sockaddr_in.
4163
4164 require_action( addr->sa_family == AF_INET, exit, err = mStatus_UnknownErr );
4165
4166 // Make an initial call to GetIpAddrTable to get the
4167 // necessary size into the dwSize variable
4168
4169 for ( i = 0; i < 100; i++ )
4170 {
4171 err = GetIpAddrTable( pIPAddrTable, &dwSize, 0 );
4172
4173 if ( err != ERROR_INSUFFICIENT_BUFFER )
4174 {
4175 break;
4176 }
4177
4178 pIPAddrTable = (MIB_IPADDRTABLE *) realloc( pIPAddrTable, dwSize );
4179 require_action( pIPAddrTable, exit, err = WSAENOBUFS );
4180 }
4181
4182 require_noerr( err, exit );
4183 err = mStatus_UnknownErr;
4184
4185 for ( i = 0; i < pIPAddrTable->dwNumEntries; i++ )
4186 {
4187 if ( ( ( struct sockaddr_in* ) addr )->sin_addr.s_addr == pIPAddrTable->table[i].dwAddr )
4188 {
4189 *ifIndex = pIPAddrTable->table[i].dwIndex;
4190 ( ( struct sockaddr_in*) mask )->sin_addr.s_addr = pIPAddrTable->table[i].dwMask;
4191 err = mStatus_NoError;
4192 break;
4193 }
4194 }
4195
4196 exit:
4197
4198 if ( pIPAddrTable )
4199 {
4200 free( pIPAddrTable );
4201 }
4202
4203 return err;
4204 }
4205
4206
4207 //===========================================================================================================================
4208 // CanReceiveUnicast
4209 //===========================================================================================================================
4210
4211 mDNSlocal mDNSBool CanReceiveUnicast( void )
4212 {
4213 mDNSBool ok;
4214 SocketRef sock;
4215 struct sockaddr_in addr;
4216
4217 // Try to bind to the port without the SO_REUSEADDR option to test if someone else has already bound to it.
4218
4219 sock = socket( AF_INET, SOCK_DGRAM, IPPROTO_UDP );
4220 check_translated_errno( IsValidSocket( sock ), errno_compat(), kUnknownErr );
4221 ok = IsValidSocket( sock );
4222 if( ok )
4223 {
4224 mDNSPlatformMemZero( &addr, sizeof( addr ) );
4225 addr.sin_family = AF_INET;
4226 addr.sin_port = MulticastDNSPort.NotAnInteger;
4227 addr.sin_addr.s_addr = htonl( INADDR_ANY );
4228
4229 ok = ( bind( sock, (struct sockaddr *) &addr, sizeof( addr ) ) == 0 );
4230 close_compat( sock );
4231 }
4232
4233 dlog( kDebugLevelInfo, DEBUG_NAME "Unicast UDP responses %s\n", ok ? "okay" : "*not allowed*" );
4234 return( ok );
4235 }
4236
4237
4238 //===========================================================================================================================
4239 // IsPointToPoint
4240 //===========================================================================================================================
4241
4242 mDNSlocal mDNSBool IsPointToPoint( IP_ADAPTER_UNICAST_ADDRESS * addr )
4243 {
4244 struct ifaddrs * addrs = NULL;
4245 struct ifaddrs * p = NULL;
4246 OSStatus err;
4247 mDNSBool ret = mDNSfalse;
4248
4249 // For now, only works for IPv4 interfaces
4250
4251 if ( addr->Address.lpSockaddr->sa_family == AF_INET )
4252 {
4253 // The getifaddrs_ipv4 call will give us correct information regarding IFF_POINTTOPOINT flags.
4254
4255 err = getifaddrs_ipv4( &addrs );
4256 require_noerr( err, exit );
4257
4258 for ( p = addrs; p; p = p->ifa_next )
4259 {
4260 if ( ( addr->Address.lpSockaddr->sa_family == p->ifa_addr->sa_family ) &&
4261 ( ( ( struct sockaddr_in* ) addr->Address.lpSockaddr )->sin_addr.s_addr == ( ( struct sockaddr_in* ) p->ifa_addr )->sin_addr.s_addr ) )
4262 {
4263 ret = ( p->ifa_flags & IFF_POINTTOPOINT ) ? mDNStrue : mDNSfalse;
4264 break;
4265 }
4266 }
4267 }
4268
4269 exit:
4270
4271 if ( addrs )
4272 {
4273 freeifaddrs( addrs );
4274 }
4275
4276 return ret;
4277 }
4278
4279
4280 //===========================================================================================================================
4281 // GetWindowsVersionString
4282 //===========================================================================================================================
4283
4284 mDNSlocal OSStatus GetWindowsVersionString( char *inBuffer, size_t inBufferSize )
4285 {
4286 #if( !defined( VER_PLATFORM_WIN32_CE ) )
4287 #define VER_PLATFORM_WIN32_CE 3
4288 #endif
4289
4290 OSStatus err;
4291 OSVERSIONINFO osInfo;
4292 BOOL ok;
4293 const char * versionString;
4294 DWORD platformID;
4295 DWORD majorVersion;
4296 DWORD minorVersion;
4297 DWORD buildNumber;
4298
4299 versionString = "unknown Windows version";
4300
4301 osInfo.dwOSVersionInfoSize = sizeof( OSVERSIONINFO );
4302 ok = GetVersionEx( &osInfo );
4303 err = translate_errno( ok, (OSStatus) GetLastError(), kUnknownErr );
4304 require_noerr( err, exit );
4305
4306 platformID = osInfo.dwPlatformId;
4307 majorVersion = osInfo.dwMajorVersion;
4308 minorVersion = osInfo.dwMinorVersion;
4309 buildNumber = osInfo.dwBuildNumber & 0xFFFF;
4310
4311 if( ( platformID == VER_PLATFORM_WIN32_WINDOWS ) && ( majorVersion == 4 ) )
4312 {
4313 if( ( minorVersion < 10 ) && ( buildNumber == 950 ) )
4314 {
4315 versionString = "Windows 95";
4316 }
4317 else if( ( minorVersion < 10 ) && ( ( buildNumber > 950 ) && ( buildNumber <= 1080 ) ) )
4318 {
4319 versionString = "Windows 95 SP1";
4320 }
4321 else if( ( minorVersion < 10 ) && ( buildNumber > 1080 ) )
4322 {
4323 versionString = "Windows 95 OSR2";
4324 }
4325 else if( ( minorVersion == 10 ) && ( buildNumber == 1998 ) )
4326 {
4327 versionString = "Windows 98";
4328 }
4329 else if( ( minorVersion == 10 ) && ( ( buildNumber > 1998 ) && ( buildNumber < 2183 ) ) )
4330 {
4331 versionString = "Windows 98 SP1";
4332 }
4333 else if( ( minorVersion == 10 ) && ( buildNumber >= 2183 ) )
4334 {
4335 versionString = "Windows 98 SE";
4336 }
4337 else if( minorVersion == 90 )
4338 {
4339 versionString = "Windows ME";
4340 }
4341 }
4342 else if( platformID == VER_PLATFORM_WIN32_NT )
4343 {
4344 if( ( majorVersion == 3 ) && ( minorVersion == 51 ) )
4345 {
4346 versionString = "Windows NT 3.51";
4347 }
4348 else if( ( majorVersion == 4 ) && ( minorVersion == 0 ) )
4349 {
4350 versionString = "Windows NT 4";
4351 }
4352 else if( ( majorVersion == 5 ) && ( minorVersion == 0 ) )
4353 {
4354 versionString = "Windows 2000";
4355 }
4356 else if( ( majorVersion == 5 ) && ( minorVersion == 1 ) )
4357 {
4358 versionString = "Windows XP";
4359 }
4360 else if( ( majorVersion == 5 ) && ( minorVersion == 2 ) )
4361 {
4362 versionString = "Windows Server 2003";
4363 }
4364 }
4365 else if( platformID == VER_PLATFORM_WIN32_CE )
4366 {
4367 versionString = "Windows CE";
4368 }
4369
4370 exit:
4371 if( inBuffer && ( inBufferSize > 0 ) )
4372 {
4373 inBufferSize -= 1;
4374 strncpy( inBuffer, versionString, inBufferSize );
4375 inBuffer[ inBufferSize ] = '\0';
4376 }
4377 return( err );
4378 }
4379
4380
4381 //===========================================================================================================================
4382 // RegQueryString
4383 //===========================================================================================================================
4384
4385 mDNSlocal mStatus
4386 RegQueryString( HKEY key, LPCSTR valueName, LPSTR * string, DWORD * stringLen, DWORD * enabled )
4387 {
4388 DWORD type;
4389 int i;
4390 mStatus err;
4391
4392 *stringLen = MAX_ESCAPED_DOMAIN_NAME;
4393 *string = NULL;
4394 i = 0;
4395
4396 do
4397 {
4398 if ( *string )
4399 {
4400 free( *string );
4401 }
4402
4403 *string = (char*) malloc( *stringLen );
4404 require_action( *string, exit, err = mStatus_NoMemoryErr );
4405
4406 err = RegQueryValueExA( key, valueName, 0, &type, (LPBYTE) *string, stringLen );
4407
4408 i++;
4409 }
4410 while ( ( err == ERROR_MORE_DATA ) && ( i < 100 ) );
4411
4412 require_noerr_quiet( err, exit );
4413
4414 if ( enabled )
4415 {
4416 DWORD dwSize = sizeof( DWORD );
4417
4418 err = RegQueryValueEx( key, TEXT("Enabled"), NULL, NULL, (LPBYTE) enabled, &dwSize );
4419 check_noerr( err );
4420
4421 err = kNoErr;
4422 }
4423
4424 exit:
4425
4426 return err;
4427 }
4428
4429
4430 //===========================================================================================================================
4431 // StringToAddress
4432 //===========================================================================================================================
4433
4434 mDNSlocal mStatus StringToAddress( mDNSAddr * ip, LPSTR string )
4435 {
4436 struct sockaddr_in6 sa6;
4437 struct sockaddr_in sa4;
4438 INT dwSize;
4439 mStatus err;
4440
4441 sa6.sin6_family = AF_INET6;
4442 dwSize = sizeof( sa6 );
4443
4444 err = WSAStringToAddressA( string, AF_INET6, NULL, (struct sockaddr*) &sa6, &dwSize );
4445
4446 if ( err == mStatus_NoError )
4447 {
4448 err = SetupAddr( ip, (struct sockaddr*) &sa6 );
4449 require_noerr( err, exit );
4450 }
4451 else
4452 {
4453 sa4.sin_family = AF_INET;
4454 dwSize = sizeof( sa4 );
4455
4456 err = WSAStringToAddressA( string, AF_INET, NULL, (struct sockaddr*) &sa4, &dwSize );
4457 err = translate_errno( err == 0, WSAGetLastError(), kUnknownErr );
4458 require_noerr( err, exit );
4459
4460 err = SetupAddr( ip, (struct sockaddr*) &sa4 );
4461 require_noerr( err, exit );
4462 }
4463
4464 exit:
4465
4466 return err;
4467 }
4468
4469
4470 //===========================================================================================================================
4471 // myGetIfAddrs
4472 //===========================================================================================================================
4473
4474 mDNSlocal struct ifaddrs*
4475 myGetIfAddrs(int refresh)
4476 {
4477 static struct ifaddrs *ifa = NULL;
4478
4479 if (refresh && ifa)
4480 {
4481 freeifaddrs(ifa);
4482 ifa = NULL;
4483 }
4484
4485 if (ifa == NULL)
4486 {
4487 getifaddrs(&ifa);
4488 }
4489
4490 return ifa;
4491 }
4492
4493
4494 //===========================================================================================================================
4495 // TCHARtoUTF8
4496 //===========================================================================================================================
4497
4498 mDNSlocal OSStatus
4499 TCHARtoUTF8( const TCHAR *inString, char *inBuffer, size_t inBufferSize )
4500 {
4501 #if( defined( UNICODE ) || defined( _UNICODE ) )
4502 OSStatus err;
4503 int len;
4504
4505 len = WideCharToMultiByte( CP_UTF8, 0, inString, -1, inBuffer, (int) inBufferSize, NULL, NULL );
4506 err = translate_errno( len > 0, errno_compat(), kUnknownErr );
4507 require_noerr( err, exit );
4508
4509 exit:
4510 return( err );
4511 #else
4512 return( WindowsLatin1toUTF8( inString, inBuffer, inBufferSize ) );
4513 #endif
4514 }
4515
4516
4517 //===========================================================================================================================
4518 // WindowsLatin1toUTF8
4519 //===========================================================================================================================
4520
4521 mDNSlocal OSStatus
4522 WindowsLatin1toUTF8( const char *inString, char *inBuffer, size_t inBufferSize )
4523 {
4524 OSStatus err;
4525 WCHAR * utf16;
4526 int len;
4527
4528 utf16 = NULL;
4529
4530 // Windows doesn't support going directly from Latin-1 to UTF-8 so we have to go from Latin-1 to UTF-16 first.
4531
4532 len = MultiByteToWideChar( CP_ACP, 0, inString, -1, NULL, 0 );
4533 err = translate_errno( len > 0, errno_compat(), kUnknownErr );
4534 require_noerr( err, exit );
4535
4536 utf16 = (WCHAR *) malloc( len * sizeof( *utf16 ) );
4537 require_action( utf16, exit, err = kNoMemoryErr );
4538
4539 len = MultiByteToWideChar( CP_ACP, 0, inString, -1, utf16, len );
4540 err = translate_errno( len > 0, errno_compat(), kUnknownErr );
4541 require_noerr( err, exit );
4542
4543 // Now convert the temporary UTF-16 to UTF-8.
4544
4545 len = WideCharToMultiByte( CP_UTF8, 0, utf16, -1, inBuffer, (int) inBufferSize, NULL, NULL );
4546 err = translate_errno( len > 0, errno_compat(), kUnknownErr );
4547 require_noerr( err, exit );
4548
4549 exit:
4550 if( utf16 ) free( utf16 );
4551 return( err );
4552 }
4553
4554
4555 //===========================================================================================================================
4556 // TCPCloseSocket
4557 //===========================================================================================================================
4558
4559 mDNSlocal void
4560 TCPCloseSocket( TCPSocket * sock )
4561 {
4562 dlog( kDebugLevelChatty, DEBUG_NAME "closing TCPSocket 0x%x:%d\n", sock, sock->fd );
4563
4564 if ( sock->fd != INVALID_SOCKET )
4565 {
4566 closesocket( sock->fd );
4567 sock->fd = INVALID_SOCKET;
4568 }
4569 }
4570
4571
4572 //===========================================================================================================================
4573 // UDPCloseSocket
4574 //===========================================================================================================================
4575
4576 mDNSlocal void
4577 UDPCloseSocket( UDPSocket * sock )
4578 {
4579 dlog( kDebugLevelChatty, DEBUG_NAME "closing UDPSocket %d\n", sock->fd );
4580
4581 if ( sock->fd != INVALID_SOCKET )
4582 {
4583 mDNSPollUnregisterSocket( sock->fd );
4584 closesocket( sock->fd );
4585 sock->fd = INVALID_SOCKET;
4586 }
4587 }
4588
4589
4590 //===========================================================================================================================
4591 // SetupAddr
4592 //===========================================================================================================================
4593
4594 mDNSlocal mStatus SetupAddr(mDNSAddr *ip, const struct sockaddr *const sa)
4595 {
4596 if (!sa) { LogMsg("SetupAddr ERROR: NULL sockaddr"); return(mStatus_Invalid); }
4597
4598 if (sa->sa_family == AF_INET)
4599 {
4600 struct sockaddr_in *ifa_addr = (struct sockaddr_in *)sa;
4601 ip->type = mDNSAddrType_IPv4;
4602 ip->ip.v4.NotAnInteger = ifa_addr->sin_addr.s_addr;
4603 return(mStatus_NoError);
4604 }
4605
4606 if (sa->sa_family == AF_INET6)
4607 {
4608 struct sockaddr_in6 *ifa_addr = (struct sockaddr_in6 *)sa;
4609 ip->type = mDNSAddrType_IPv6;
4610 if (IN6_IS_ADDR_LINKLOCAL(&ifa_addr->sin6_addr)) ifa_addr->sin6_addr.u.Word[1] = 0;
4611 ip->ip.v6 = *(mDNSv6Addr*)&ifa_addr->sin6_addr;
4612 return(mStatus_NoError);
4613 }
4614
4615 LogMsg("SetupAddr invalid sa_family %d", sa->sa_family);
4616 return(mStatus_Invalid);
4617 }
4618
4619
4620 mDNSlocal void GetDDNSFQDN( domainname *const fqdn )
4621 {
4622 LPSTR name = NULL;
4623 DWORD dwSize;
4624 DWORD enabled;
4625 HKEY key = NULL;
4626 OSStatus err;
4627
4628 check( fqdn );
4629
4630 // Initialize
4631
4632 fqdn->c[0] = '\0';
4633
4634 // Get info from Bonjour registry key
4635
4636 err = RegCreateKey( HKEY_LOCAL_MACHINE, kServiceParametersNode TEXT("\\DynDNS\\Setup\\") kServiceDynDNSHostNames, &key );
4637 require_noerr( err, exit );
4638
4639 err = RegQueryString( key, "", &name, &dwSize, &enabled );
4640 if ( !err && ( name[0] != '\0' ) && enabled )
4641 {
4642 if ( !MakeDomainNameFromDNSNameString( fqdn, name ) || !fqdn->c[0] )
4643 {
4644 dlog( kDebugLevelError, "bad DDNS host name in registry: %s", name[0] ? name : "(unknown)");
4645 }
4646 }
4647
4648 exit:
4649
4650 if ( key )
4651 {
4652 RegCloseKey( key );
4653 key = NULL;
4654 }
4655
4656 if ( name )
4657 {
4658 free( name );
4659 name = NULL;
4660 }
4661 }
4662
4663
4664 #ifdef UNICODE
4665 mDNSlocal void GetDDNSDomains( DNameListElem ** domains, LPCWSTR lpSubKey )
4666 #else
4667 mDNSlocal void GetDDNSConfig( DNameListElem ** domains, LPCSTR lpSubKey )
4668 #endif
4669 {
4670 char subKeyName[kRegistryMaxKeyLength + 1];
4671 DWORD cSubKeys = 0;
4672 DWORD cbMaxSubKey;
4673 DWORD cchMaxClass;
4674 DWORD dwSize;
4675 HKEY key = NULL;
4676 HKEY subKey = NULL;
4677 domainname dname;
4678 DWORD i;
4679 OSStatus err;
4680
4681 check( domains );
4682
4683 // Initialize
4684
4685 *domains = NULL;
4686
4687 err = RegCreateKey( HKEY_LOCAL_MACHINE, lpSubKey, &key );
4688 require_noerr( err, exit );
4689
4690 // Get information about this node
4691
4692 err = RegQueryInfoKey( key, NULL, NULL, NULL, &cSubKeys, &cbMaxSubKey, &cchMaxClass, NULL, NULL, NULL, NULL, NULL );
4693 require_noerr( err, exit );
4694
4695 for ( i = 0; i < cSubKeys; i++)
4696 {
4697 DWORD enabled;
4698
4699 dwSize = kRegistryMaxKeyLength;
4700
4701 err = RegEnumKeyExA( key, i, subKeyName, &dwSize, NULL, NULL, NULL, NULL );
4702
4703 if ( !err )
4704 {
4705 err = RegOpenKeyExA( key, subKeyName, 0, KEY_READ, &subKey );
4706 require_noerr( err, exit );
4707
4708 dwSize = sizeof( DWORD );
4709 err = RegQueryValueExA( subKey, "Enabled", NULL, NULL, (LPBYTE) &enabled, &dwSize );
4710
4711 if ( !err && ( subKeyName[0] != '\0' ) && enabled )
4712 {
4713 if ( !MakeDomainNameFromDNSNameString( &dname, subKeyName ) || !dname.c[0] )
4714 {
4715 dlog( kDebugLevelError, "bad DDNS domain in registry: %s", subKeyName[0] ? subKeyName : "(unknown)");
4716 }
4717 else
4718 {
4719 DNameListElem * domain = (DNameListElem*) malloc( sizeof( DNameListElem ) );
4720 require_action( domain, exit, err = mStatus_NoMemoryErr );
4721
4722 AssignDomainName(&domain->name, &dname);
4723 domain->next = *domains;
4724
4725 *domains = domain;
4726 }
4727 }
4728
4729 RegCloseKey( subKey );
4730 subKey = NULL;
4731 }
4732 }
4733
4734 exit:
4735
4736 if ( subKey )
4737 {
4738 RegCloseKey( subKey );
4739 }
4740
4741 if ( key )
4742 {
4743 RegCloseKey( key );
4744 }
4745 }
4746
4747
4748 mDNSlocal void SetDomainSecret( mDNS * const m, const domainname * inDomain )
4749 {
4750 char domainUTF8[ 256 ];
4751 DomainAuthInfo *foundInList;
4752 DomainAuthInfo *ptr;
4753 char outDomain[ 256 ];
4754 char outKey[ 256 ];
4755 char outSecret[ 256 ];
4756 OSStatus err;
4757
4758 ConvertDomainNameToCString( inDomain, domainUTF8 );
4759
4760 // If we're able to find a secret for this domain
4761
4762 if ( LsaGetSecret( domainUTF8, outDomain, sizeof( outDomain ), outKey, sizeof( outKey ), outSecret, sizeof( outSecret ) ) )
4763 {
4764 domainname domain;
4765 domainname key;
4766
4767 // Tell the core about this secret
4768
4769 MakeDomainNameFromDNSNameString( &domain, outDomain );
4770 MakeDomainNameFromDNSNameString( &key, outKey );
4771
4772 for (foundInList = m->AuthInfoList; foundInList; foundInList = foundInList->next)
4773 if (SameDomainName(&foundInList->domain, &domain ) ) break;
4774
4775 ptr = foundInList;
4776
4777 if (!ptr)
4778 {
4779 ptr = (DomainAuthInfo*)malloc(sizeof(DomainAuthInfo));
4780 require_action( ptr, exit, err = mStatus_NoMemoryErr );
4781 }
4782
4783 err = mDNS_SetSecretForDomain(m, ptr, &domain, &key, outSecret, NULL, NULL, FALSE );
4784 require_action( err != mStatus_BadParamErr, exit, if (!foundInList ) mDNSPlatformMemFree( ptr ) );
4785
4786 debugf("Setting shared secret for zone %s with key %##s", outDomain, key.c);
4787 }
4788
4789 exit:
4790
4791 return;
4792 }
4793
4794
4795 mDNSlocal VOID CALLBACK
4796 CheckFileSharesProc( LPVOID arg, DWORD dwTimerLowValue, DWORD dwTimerHighValue )
4797 {
4798 mDNS * const m = ( mDNS * const ) arg;
4799
4800 ( void ) dwTimerLowValue;
4801 ( void ) dwTimerHighValue;
4802
4803 CheckFileShares( m );
4804 }
4805
4806
4807 mDNSlocal unsigned __stdcall
4808 SMBRegistrationThread( void * arg )
4809 {
4810 mDNS * const m = ( mDNS * const ) arg;
4811 DNSServiceRef sref = NULL;
4812 HANDLE handles[ 3 ];
4813 mDNSu8 txtBuf[ 256 ];
4814 mDNSu8 * txtPtr;
4815 size_t keyLen;
4816 size_t valLen;
4817 mDNSIPPort port = { { SMBPortAsNumber >> 8, SMBPortAsNumber & 0xFF } };
4818 DNSServiceErrorType err;
4819
4820 DEBUG_UNUSED( arg );
4821
4822 handles[ 0 ] = gSMBThreadStopEvent;
4823 handles[ 1 ] = gSMBThreadRegisterEvent;
4824 handles[ 2 ] = gSMBThreadDeregisterEvent;
4825
4826 memset( txtBuf, 0, sizeof( txtBuf ) );
4827 txtPtr = txtBuf;
4828 keyLen = strlen( "netbios=" );
4829 valLen = strlen( m->p->nbname );
4830 require_action( valLen < 32, exit, err = kUnknownErr ); // This should never happen, but check to avoid further memory corruption
4831 *txtPtr++ = ( mDNSu8 ) ( keyLen + valLen );
4832 memcpy( txtPtr, "netbios=", keyLen );
4833 txtPtr += keyLen;
4834 if ( valLen ) { memcpy( txtPtr, m->p->nbname, valLen ); txtPtr += ( mDNSu8 ) valLen; }
4835 keyLen = strlen( "domain=" );
4836 valLen = strlen( m->p->nbdomain );
4837 require_action( valLen < 32, exit, err = kUnknownErr ); // This should never happen, but check to avoid further memory corruption
4838 *txtPtr++ = ( mDNSu8 )( keyLen + valLen );
4839 memcpy( txtPtr, "domain=", keyLen );
4840 txtPtr += keyLen;
4841 if ( valLen ) { memcpy( txtPtr, m->p->nbdomain, valLen ); txtPtr += valLen; }
4842
4843 for ( ;; )
4844 {
4845 DWORD ret;
4846
4847 ret = WaitForMultipleObjects( 3, handles, FALSE, INFINITE );
4848
4849 if ( ret != WAIT_FAILED )
4850 {
4851 if ( ret == kSMBStopEvent )
4852 {
4853 break;
4854 }
4855 else if ( ret == kSMBRegisterEvent )
4856 {
4857 err = gDNSServiceRegister( &sref, 0, 0, NULL, "_smb._tcp,_file", NULL, NULL, ( uint16_t ) port.NotAnInteger, ( mDNSu16 )( txtPtr - txtBuf ), txtBuf, NULL, NULL );
4858
4859 if ( err )
4860 {
4861 LogMsg( "SMBRegistrationThread: DNSServiceRegister returned %d\n", err );
4862 sref = NULL;
4863 break;
4864 }
4865 }
4866 else if ( ret == kSMBDeregisterEvent )
4867 {
4868 if ( sref )
4869 {
4870 gDNSServiceRefDeallocate( sref );
4871 sref = NULL;
4872 }
4873 }
4874 }
4875 else
4876 {
4877 LogMsg( "SMBRegistrationThread: WaitForMultipleObjects returned %d\n", GetLastError() );
4878 break;
4879 }
4880 }
4881
4882 exit:
4883
4884 if ( sref != NULL )
4885 {
4886 gDNSServiceRefDeallocate( sref );
4887 sref = NULL;
4888 }
4889
4890 SetEvent( gSMBThreadQuitEvent );
4891 _endthreadex( 0 );
4892 return 0;
4893 }
4894
4895
4896 mDNSlocal void
4897 CheckFileShares( mDNS * const m )
4898 {
4899 PSHARE_INFO_1 bufPtr = ( PSHARE_INFO_1 ) NULL;
4900 DWORD entriesRead = 0;
4901 DWORD totalEntries = 0;
4902 DWORD resume = 0;
4903 mDNSBool advertise = mDNSfalse;
4904 mDNSBool fileSharing = mDNSfalse;
4905 mDNSBool printSharing = mDNSfalse;
4906 HKEY key = NULL;
4907 BOOL retry = FALSE;
4908 NET_API_STATUS res;
4909 mStatus err;
4910
4911 check( m );
4912
4913 // Only do this if we're not shutting down
4914
4915 require_action_quiet( m->AdvertiseLocalAddresses && !m->ShutdownTime, exit, err = kNoErr );
4916
4917 err = RegCreateKey( HKEY_LOCAL_MACHINE, kServiceParametersNode L"\\Services\\SMB", &key );
4918
4919 if ( !err )
4920 {
4921 DWORD dwSize = sizeof( DWORD );
4922 RegQueryValueEx( key, L"Advertise", NULL, NULL, (LPBYTE) &advertise, &dwSize );
4923 }
4924
4925 if ( advertise && mDNSIsFileAndPrintSharingEnabled( &retry ) )
4926 {
4927 dlog( kDebugLevelTrace, DEBUG_NAME "Sharing is enabled\n" );
4928
4929 res = NetShareEnum( NULL, 1, ( LPBYTE* )&bufPtr, MAX_PREFERRED_LENGTH, &entriesRead, &totalEntries, &resume );
4930
4931 if ( ( res == ERROR_SUCCESS ) || ( res == ERROR_MORE_DATA ) )
4932 {
4933 PSHARE_INFO_1 p = bufPtr;
4934 DWORD i;
4935
4936 for( i = 0; i < entriesRead; i++ )
4937 {
4938 // We are only interested if the user is sharing anything other
4939 // than the built-in "print$" source
4940
4941 if ( ( p->shi1_type == STYPE_DISKTREE ) && ( wcscmp( p->shi1_netname, TEXT( "print$" ) ) != 0 ) )
4942 {
4943 fileSharing = mDNStrue;
4944 }
4945 else if ( p->shi1_type == STYPE_PRINTQ )
4946 {
4947 printSharing = mDNStrue;
4948 }
4949
4950 p++;
4951 }
4952
4953 NetApiBufferFree( bufPtr );
4954 bufPtr = NULL;
4955 retry = FALSE;
4956 }
4957 else if ( res == NERR_ServerNotStarted )
4958 {
4959 retry = TRUE;
4960 }
4961 }
4962
4963 if ( retry )
4964 {
4965 __int64 qwTimeout;
4966 LARGE_INTEGER liTimeout;
4967
4968 qwTimeout = -m->p->checkFileSharesTimeout * 10000000;
4969 liTimeout.LowPart = ( DWORD )( qwTimeout & 0xFFFFFFFF );
4970 liTimeout.HighPart = ( LONG )( qwTimeout >> 32 );
4971
4972 SetWaitableTimer( m->p->checkFileSharesTimer, &liTimeout, 0, CheckFileSharesProc, m, FALSE );
4973 }
4974
4975 if ( !m->p->smbFileSharing && fileSharing )
4976 {
4977 if ( !gSMBThread )
4978 {
4979 if ( !gDNSSDLibrary )
4980 {
4981 gDNSSDLibrary = LoadLibrary( TEXT( "dnssd.dll" ) );
4982 require_action( gDNSSDLibrary, exit, err = GetLastError() );
4983 }
4984
4985 if ( !gDNSServiceRegister )
4986 {
4987 gDNSServiceRegister = ( DNSServiceRegisterFunc ) GetProcAddress( gDNSSDLibrary, "DNSServiceRegister" );
4988 require_action( gDNSServiceRegister, exit, err = GetLastError() );
4989 }
4990
4991 if ( !gDNSServiceRefDeallocate )
4992 {
4993 gDNSServiceRefDeallocate = ( DNSServiceRefDeallocateFunc ) GetProcAddress( gDNSSDLibrary, "DNSServiceRefDeallocate" );
4994 require_action( gDNSServiceRefDeallocate, exit, err = GetLastError() );
4995 }
4996
4997 if ( !gSMBThreadRegisterEvent )
4998 {
4999 gSMBThreadRegisterEvent = CreateEvent( NULL, FALSE, FALSE, NULL );
5000 require_action( gSMBThreadRegisterEvent != NULL, exit, err = GetLastError() );
5001 }
5002
5003 if ( !gSMBThreadDeregisterEvent )
5004 {
5005 gSMBThreadDeregisterEvent = CreateEvent( NULL, FALSE, FALSE, NULL );
5006 require_action( gSMBThreadDeregisterEvent != NULL, exit, err = GetLastError() );
5007 }
5008
5009 if ( !gSMBThreadStopEvent )
5010 {
5011 gSMBThreadStopEvent = CreateEvent( NULL, FALSE, FALSE, NULL );
5012 require_action( gSMBThreadStopEvent != NULL, exit, err = GetLastError() );
5013 }
5014
5015 if ( !gSMBThreadQuitEvent )
5016 {
5017 gSMBThreadQuitEvent = CreateEvent( NULL, FALSE, FALSE, NULL );
5018 require_action( gSMBThreadQuitEvent != NULL, exit, err = GetLastError() );
5019 }
5020
5021 gSMBThread = ( HANDLE ) _beginthreadex( NULL, 0, SMBRegistrationThread, m, 0, NULL );
5022 require_action( gSMBThread != NULL, exit, err = GetLastError() );
5023 }
5024
5025 SetEvent( gSMBThreadRegisterEvent );
5026
5027 m->p->smbFileSharing = mDNStrue;
5028 }
5029 else if ( m->p->smbFileSharing && !fileSharing )
5030 {
5031 dlog( kDebugLevelTrace, DEBUG_NAME "deregistering smb type\n" );
5032
5033 if ( gSMBThreadDeregisterEvent != NULL )
5034 {
5035 SetEvent( gSMBThreadDeregisterEvent );
5036 }
5037
5038 m->p->smbFileSharing = mDNSfalse;
5039 }
5040
5041 exit:
5042
5043 if ( key )
5044 {
5045 RegCloseKey( key );
5046 }
5047 }
5048
5049
5050 BOOL
5051 IsWOMPEnabled( mDNS * const m )
5052 {
5053 BOOL enabled;
5054
5055 mDNSInterfaceData * ifd;
5056
5057 enabled = FALSE;
5058
5059 for( ifd = m->p->interfaceList; ifd; ifd = ifd->next )
5060 {
5061 if ( IsWOMPEnabledForAdapter( ifd->name ) )
5062 {
5063 enabled = TRUE;
5064 break;
5065 }
5066 }
5067
5068 return enabled;
5069 }
5070
5071
5072 mDNSlocal mDNSu8
5073 IsWOMPEnabledForAdapter( const char * adapterName )
5074 {
5075 char fileName[80];
5076 NDIS_OID oid;
5077 DWORD count;
5078 HANDLE handle = INVALID_HANDLE_VALUE;
5079 NDIS_PNP_CAPABILITIES * pNPC = NULL;
5080 int err;
5081 mDNSu8 ok = TRUE;
5082
5083 require_action( adapterName != NULL, exit, ok = FALSE );
5084
5085 dlog( kDebugLevelTrace, DEBUG_NAME "IsWOMPEnabledForAdapter: %s\n", adapterName );
5086
5087 // Construct a device name to pass to CreateFile
5088
5089 strncpy_s( fileName, sizeof( fileName ), DEVICE_PREFIX, strlen( DEVICE_PREFIX ) );
5090 strcat_s( fileName, sizeof( fileName ), adapterName );
5091 handle = CreateFileA( fileName, GENERIC_READ, FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, OPEN_EXISTING, 0, INVALID_HANDLE_VALUE );
5092 require_action ( handle != INVALID_HANDLE_VALUE, exit, ok = FALSE );
5093
5094 // We successfully opened the driver, format the IOCTL to pass the driver.
5095
5096 oid = OID_PNP_CAPABILITIES;
5097 pNPC = ( NDIS_PNP_CAPABILITIES * ) malloc( sizeof( NDIS_PNP_CAPABILITIES ) );
5098 require_action( pNPC != NULL, exit, ok = FALSE );
5099 ok = ( mDNSu8 ) DeviceIoControl( handle, IOCTL_NDIS_QUERY_GLOBAL_STATS, &oid, sizeof( oid ), pNPC, sizeof( NDIS_PNP_CAPABILITIES ), &count, NULL );
5100 err = translate_errno( ok, GetLastError(), kUnknownErr );
5101 require_action( !err, exit, ok = FALSE );
5102 ok = ( mDNSu8 ) ( ( count == sizeof( NDIS_PNP_CAPABILITIES ) ) && ( pNPC->Flags & NDIS_DEVICE_WAKE_ON_MAGIC_PACKET_ENABLE ) );
5103
5104 exit:
5105
5106 if ( pNPC != NULL )
5107 {
5108 free( pNPC );
5109 }
5110
5111 if ( handle != INVALID_HANDLE_VALUE )
5112 {
5113 CloseHandle( handle );
5114 }
5115
5116 dlog( kDebugLevelTrace, DEBUG_NAME "IsWOMPEnabledForAdapter returns %s\n", ok ? "true" : "false" );
5117
5118 return ( mDNSu8 ) ok;
5119 }
5120
5121
5122 mDNSlocal void
5123 SendWakeupPacket( mDNS * const inMDNS, LPSOCKADDR addr, INT addrlen, const char * buf, INT buflen, INT numTries, INT msecSleep )
5124 {
5125 mDNSBool repeat = ( numTries == 1 ) ? mDNStrue : mDNSfalse;
5126 SOCKET sock;
5127 int num;
5128 mStatus err;
5129
5130 ( void ) inMDNS;
5131
5132 sock = socket( addr->sa_family, SOCK_DGRAM, IPPROTO_UDP );
5133 require_action( sock != INVALID_SOCKET, exit, err = mStatus_UnknownErr );
5134
5135 while ( numTries-- )
5136 {
5137 num = sendto( sock, ( const char* ) buf, buflen, 0, addr, addrlen );
5138
5139 if ( num != buflen )
5140 {
5141 LogMsg( "SendWakeupPacket error: sent %d bytes: %d\n", num, WSAGetLastError() );
5142 }
5143
5144 if ( repeat )
5145 {
5146 num = sendto( sock, buf, buflen, 0, addr, addrlen );
5147
5148 if ( num != buflen )
5149 {
5150 LogMsg( "SendWakeupPacket error: sent %d bytes: %d\n", num, WSAGetLastError() );
5151 }
5152 }
5153
5154 if ( msecSleep )
5155 {
5156 Sleep( msecSleep );
5157 }
5158 }
5159
5160 exit:
5161
5162 if ( sock != INVALID_SOCKET )
5163 {
5164 closesocket( sock );
5165 }
5166 }
5167
5168
5169 mDNSlocal void _cdecl
5170 SendMulticastWakeupPacket( void *arg )
5171 {
5172 MulticastWakeupStruct *info = ( MulticastWakeupStruct* ) arg;
5173
5174 if ( info )
5175 {
5176 SendWakeupPacket( info->inMDNS, ( LPSOCKADDR ) &info->addr, sizeof( info->addr ), ( const char* ) info->data, sizeof( info->data ), info->numTries, info->msecSleep );
5177 free( info );
5178 }
5179
5180 _endthread();
5181 }
5182
5183
5184 mDNSexport void FreeEtcHosts(mDNS *const m, AuthRecord *const rr, mStatus result)
5185 {
5186 DEBUG_UNUSED( m );
5187 DEBUG_UNUSED( rr );
5188 DEBUG_UNUSED( result );
5189 }
mirror of mDNSResponder