2 * Copyright (c) 2004-2015 Apple Inc. All rights reserved.
4 * @APPLE_LICENSE_HEADER_START@
6 * This file contains Original Code and/or Modifications of Original Code
7 * as defined in and that are subject to the Apple Public Source License
8 * Version 2.0 (the 'License'). You may not use this file except in
9 * compliance with the License. Please obtain a copy of the License at
10 * http://www.opensource.apple.com/apsl/ and read it before using this
13 * The Original Code and all software distributed under the License are
14 * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
15 * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
16 * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
17 * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
18 * Please see the License for the specific language governing rights and
19 * limitations under the License.
21 * @APPLE_LICENSE_HEADER_END@
26 #include <sys/param.h>
27 #include <sys/types.h>
28 #include <sys/socket.h>
31 #include <net/if_dl.h>
32 #include <netinet/in.h>
33 #include <arpa/inet.h>
34 #include <netdb_async.h>
36 #include <CoreFoundation/CoreFoundation.h>
37 #include <SystemConfiguration/SystemConfiguration.h>
38 #include <SystemConfiguration/SCDynamicStoreCopyDHCPInfo.h>
39 #include <SystemConfiguration/SCValidation.h>
40 #include <SystemConfiguration/SCPrivate.h>
45 #define my_log(__level, fmt, ...) SCPrint(TRUE, stdout, CFSTR(fmt "\n"), ## __VA_ARGS__)
47 #include "ip_plugin.h"
50 static SCDynamicStoreRef store
= NULL
;
51 static CFRunLoopRef rl
= NULL
;
52 static CFRunLoopSourceRef rls
= NULL
;
53 static dispatch_queue_t queue
= NULL
;
55 static int notify_token
= -1;
57 static struct timeval ptrQueryStart
;
58 static SCNetworkReachabilityRef ptrTarget
= NULL
;
61 #define HOSTNAME_NOTIFY_KEY "com.apple.system.hostname"
62 #define SET_HOSTNAME_QUEUE "com.apple.config.set-hostname"
64 CFStringRef
copy_dhcp_hostname(CFStringRef serviceID
);
67 set_hostname(CFStringRef hostname
)
69 if (hostname
!= NULL
) {
70 char old_name
[MAXHOSTNAMELEN
];
71 char new_name
[MAXHOSTNAMELEN
];
73 if (gethostname(old_name
, sizeof(old_name
)) == -1) {
74 my_log(LOG_ERR
, "gethostname() failed: %s", strerror(errno
));
78 if (_SC_cfstring_to_cstring(hostname
,
81 kCFStringEncodingUTF8
) == NULL
) {
82 my_log(LOG_NOTICE
, "could not convert [new] hostname");
86 old_name
[sizeof(old_name
)-1] = '\0';
87 new_name
[sizeof(new_name
)-1] = '\0';
88 if (strcmp(old_name
, new_name
) != 0) {
89 if (sethostname(new_name
, (int)strlen(new_name
)) == 0) {
93 "setting hostname to \"%s\"",
96 status
= notify_post(HOSTNAME_NOTIFY_KEY
);
97 if (status
!= NOTIFY_STATUS_OK
) {
99 "notify_post(" HOSTNAME_NOTIFY_KEY
") failed: error=%u",
104 "sethostname(%s, %ld) failed: %s",
117 copy_prefs_hostname(SCDynamicStoreRef store
)
119 CFDictionaryRef dict
;
121 CFStringRef name
= NULL
;
123 key
= SCDynamicStoreKeyCreateComputerName(NULL
);
124 dict
= SCDynamicStoreCopyValue(store
, key
);
129 if (!isA_CFDictionary(dict
)) {
133 name
= isA_CFString(CFDictionaryGetValue(dict
, kSCPropSystemHostName
));
141 if (dict
!= NULL
) CFRelease(dict
);
148 copy_primary_service(SCDynamicStoreRef store
)
150 CFDictionaryRef dict
;
152 CFStringRef serviceID
= NULL
;
154 key
= SCDynamicStoreKeyCreateNetworkGlobalEntity(NULL
,
155 kSCDynamicStoreDomainState
,
157 dict
= SCDynamicStoreCopyValue(store
, key
);
161 if (isA_CFDictionary(dict
)) {
162 serviceID
= CFDictionaryGetValue(dict
, kSCDynamicStorePropNetPrimaryService
);
163 if (isA_CFString(serviceID
)) {
177 copy_primary_ip(SCDynamicStoreRef store
, CFStringRef serviceID
)
179 CFDictionaryRef dict
;
181 CFStringRef address
= NULL
;
183 key
= SCDynamicStoreKeyCreateNetworkServiceEntity(NULL
,
184 kSCDynamicStoreDomainState
,
187 dict
= SCDynamicStoreCopyValue(store
, key
);
191 if (isA_CFDictionary(dict
)) {
192 CFArrayRef addresses
;
194 addresses
= CFDictionaryGetValue(dict
, kSCPropNetIPv4Addresses
);
195 if (isA_CFArray(addresses
) && (CFArrayGetCount(addresses
) > 0)) {
196 address
= CFArrayGetValueAtIndex(addresses
, 0);
197 if (isA_CFString(address
)) {
214 if (ptrTarget
== NULL
) {
218 my_log(LOG_INFO
, "hostname: ptr query stop");
220 SCNetworkReachabilitySetCallback(ptrTarget
, NULL
, NULL
);
221 SCNetworkReachabilityUnscheduleFromRunLoop(ptrTarget
, rl
, kCFRunLoopDefaultMode
);
222 CFRelease(ptrTarget
);
229 /* Return a ptr record if the sharing pref name is a matching FQDN */
231 hostname_match_full(CFArrayRef hosts
, CFIndex count
, CFStringRef nameToMatch
)
234 CFStringRef matchedHostName
= NULL
;
236 for (i
= 0; i
< count
; i
++) {
237 CFStringRef tempHostName
;
239 tempHostName
= CFArrayGetValueAtIndex(hosts
, i
);
240 if (CFStringCompare(tempHostName
, nameToMatch
, kCFCompareCaseInsensitive
) == 0) {
241 matchedHostName
= tempHostName
;
245 return matchedHostName
;
249 /* Return a ptr record if the sharing pref name matches DNS record's first label */
251 hostname_match_first_label(CFArrayRef hosts
, CFIndex count
, CFStringRef nameToMatch
)
254 CFStringRef matchedHostName
= NULL
;
256 for (i
= 0; i
< count
; i
++) {
257 CFArrayRef fqdnSeparated
;
258 CFStringRef tempHostName
;
260 tempHostName
= CFArrayGetValueAtIndex(hosts
, i
);
261 fqdnSeparated
= CFStringCreateArrayBySeparatingStrings(NULL
, tempHostName
, CFSTR("."));
262 if (fqdnSeparated
!= NULL
) {
263 CFStringRef firstLabel
;
266 firstLabel
= CFArrayGetValueAtIndex(fqdnSeparated
, 0);
267 matchFound
= (CFStringCompare(firstLabel
, nameToMatch
, kCFCompareCaseInsensitive
) == 0);
268 CFRelease(fqdnSeparated
);
270 matchedHostName
= tempHostName
;
275 return matchedHostName
;
280 ptr_query_callback(SCNetworkReachabilityRef target
, SCNetworkReachabilityFlags flags
, void *info
)
282 CFStringRef hostname
= NULL
;
283 struct timeval ptrQueryComplete
;
284 struct timeval ptrQueryElapsed
;
286 (void) gettimeofday(&ptrQueryComplete
, NULL
);
287 timersub(&ptrQueryComplete
, &ptrQueryStart
, &ptrQueryElapsed
);
289 // use reverse DNS name, if available
291 if (flags
& kSCNetworkReachabilityFlagsReachable
) {
296 * if [reverse] DNS query was successful
298 hosts
= SCNetworkReachabilityCopyResolvedAddress(target
, &error_num
);
300 CFIndex count
= CFArrayGetCount(hosts
);
302 CFStringRef computerName
;
303 CFStringRef localHostName
;
305 my_log(LOG_INFO
, "hostname: ptr query complete (query time = %ld.%3.3d)",
306 ptrQueryElapsed
.tv_sec
,
307 ptrQueryElapsed
.tv_usec
/ 1000);
309 // first, check if ComputerName is dns-clean
310 computerName
= _SCPreferencesCopyComputerName(NULL
, NULL
);
311 if (computerName
!= NULL
) {
312 if (_SC_CFStringIsValidDNSName(computerName
)) {
315 dotsCheck
= CFStringFind(computerName
, CFSTR("."), 0);
316 if (dotsCheck
.length
== 0) {
317 hostname
= hostname_match_first_label(hosts
, count
, computerName
);
319 hostname
= hostname_match_full(hosts
, count
, computerName
);
322 CFRelease(computerName
);
325 // if no match, check LocalHostName against the first label of FQDN
326 localHostName
= (hostname
== NULL
) ? SCDynamicStoreCopyLocalHostName(store
) : NULL
;
327 if (localHostName
!= NULL
) {
328 hostname
= hostname_match_first_label(hosts
, count
, localHostName
);
329 CFRelease(localHostName
);
332 // if no match, use the first of the returned names
333 if (hostname
== NULL
) {
334 hostname
= CFArrayGetValueAtIndex(hosts
, 0);
337 my_log(LOG_INFO
, "hostname (reverse DNS query) = %@", hostname
);
338 set_hostname(hostname
);
340 my_log(LOG_INFO
, "hostname: ptr query complete w/no hosts (query time = %ld.%3.3d)",
341 ptrQueryElapsed
.tv_sec
,
342 ptrQueryElapsed
.tv_usec
/ 1000);
346 if (hostname
!= NULL
) {
350 // if kSCNetworkReachabilityFlagsReachable and hosts == NULL
351 // it means the PTR request has not come back yet
352 // we must wait for this callback to be called again
353 my_log(LOG_INFO
, "hostname: ptr query reply w/no hosts (query time = %ld.%3.3d)",
354 ptrQueryElapsed
.tv_sec
,
355 ptrQueryElapsed
.tv_usec
/ 1000);
359 my_log(LOG_INFO
, "hostname: ptr query complete, host not found (query time = %ld.%3.3d)",
360 ptrQueryElapsed
.tv_sec
,
361 ptrQueryElapsed
.tv_usec
/ 1000);
364 // get local (multicast DNS) name, if available
366 hostname
= SCDynamicStoreCopyLocalHostName(store
);
367 if (hostname
!= NULL
) {
368 CFMutableStringRef localHostName
;
370 my_log(LOG_INFO
, "hostname (multicast DNS) = %@", hostname
);
371 localHostName
= CFStringCreateMutableCopy(NULL
, 0, hostname
);
372 assert(localHostName
!= NULL
);
373 CFStringAppend(localHostName
, CFSTR(".local"));
374 set_hostname(localHostName
);
375 CFRelease(localHostName
);
380 // use "localhost" if not other name is available
382 my_log(LOG_INFO
, "hostname (localhost)");
383 set_hostname(CFSTR("localhost"));
398 ptr_query_start(CFStringRef address
)
402 struct sockaddr_in sin
;
403 struct sockaddr_in6 sin6
;
407 CFMutableDictionaryRef options
;
409 if (_SC_cfstring_to_cstring(address
, buf
, sizeof(buf
), kCFStringEncodingASCII
) == NULL
) {
410 my_log(LOG_ERR
, "could not convert [primary] address string");
414 if (_SC_string_to_sockaddr(buf
, AF_UNSPEC
, (void *)&addr
, sizeof(addr
)) == NULL
) {
415 my_log(LOG_ERR
, "could not convert [primary] address");
419 options
= CFDictionaryCreateMutable(NULL
,
421 &kCFTypeDictionaryKeyCallBacks
,
422 &kCFTypeDictionaryValueCallBacks
);
423 data
= CFDataCreate(NULL
, (const UInt8
*)&addr
.sa
, addr
.sa
.sa_len
);
424 CFDictionarySetValue(options
, kSCNetworkReachabilityOptionPTRAddress
, data
);
426 ptrTarget
= SCNetworkReachabilityCreateWithOptions(NULL
, options
);
428 if (ptrTarget
== NULL
) {
429 my_log(LOG_ERR
, "could not resolve [primary] address");
433 my_log(LOG_INFO
, "hostname: ptr query start");
435 (void) SCNetworkReachabilitySetCallback(ptrTarget
, ptr_query_callback
, NULL
);
436 (void) SCNetworkReachabilityScheduleWithRunLoop(ptrTarget
, rl
, kCFRunLoopDefaultMode
);
443 update_hostname(SCDynamicStoreRef store
, CFArrayRef changedKeys
, void *info
)
445 CFStringRef address
= NULL
;
446 CFStringRef hostname
= NULL
;
447 CFStringRef serviceID
= NULL
;
449 // if active, cancel any in-progress attempt to resolve the primary IP address
451 if (ptrTarget
!= NULL
) {
455 // get [prefs] hostname, if available
457 hostname
= copy_prefs_hostname(store
);
458 if (hostname
!= NULL
) {
459 my_log(LOG_INFO
, "hostname (prefs) = %@", hostname
);
460 set_hostname(hostname
);
464 // get primary service ID
466 serviceID
= copy_primary_service(store
);
467 if (serviceID
== NULL
) {
471 // get DHCP provided name, if available
473 hostname
= copy_dhcp_hostname(serviceID
);
474 if (hostname
!= NULL
) {
475 my_log(LOG_INFO
, "hostname (DHCP) = %@", hostname
);
476 set_hostname(hostname
);
480 // get DNS name associated with primary IP, if available
482 address
= copy_primary_ip(store
, serviceID
);
483 if (address
!= NULL
) {
485 boolean_t isExpensive
= FALSE
;
487 // start reverse DNS query using primary IP address
488 // if primary service is not expensive
489 isExpensive
= check_if_service_expensive(serviceID
);
491 if (isExpensive
== FALSE
) {
492 ok
= ptr_query_start(address
);
502 // get local (multicast DNS) name, if available
504 hostname
= SCDynamicStoreCopyLocalHostName(store
);
505 if (hostname
!= NULL
) {
506 CFMutableStringRef localHostName
;
508 my_log(LOG_INFO
, "hostname (multicast DNS) = %@", hostname
);
509 localHostName
= CFStringCreateMutableCopy(NULL
, 0, hostname
);
510 assert(localHostName
!= NULL
);
511 CFStringAppend(localHostName
, CFSTR(".local"));
512 set_hostname(localHostName
);
513 CFRelease(localHostName
);
517 // use "localhost" if not other name is available
519 set_hostname(CFSTR("localhost"));
523 if (address
) CFRelease(address
);
524 if (hostname
) CFRelease(hostname
);
525 if (serviceID
) CFRelease(serviceID
);
533 load_hostname(Boolean verbose
)
536 CFMutableArrayRef keys
= NULL
;
537 dispatch_block_t notify_block
;
539 CFMutableArrayRef patterns
= NULL
;
542 /* initialize a few globals */
544 store
= SCDynamicStoreCreate(NULL
, CFSTR("set-hostname"), update_hostname
, NULL
);
547 "SCDynamicStoreCreate() failed: %s",
548 SCErrorString(SCError()));
552 queue
= dispatch_queue_create(SET_HOSTNAME_QUEUE
, NULL
);
555 "dispatch_queue_create() failed");
559 /* establish notification keys and patterns */
561 keys
= CFArrayCreateMutable(NULL
, 0, &kCFTypeArrayCallBacks
);
562 patterns
= CFArrayCreateMutable(NULL
, 0, &kCFTypeArrayCallBacks
);
564 /* ...watch for (per-service) DHCP option changes */
565 key
= SCDynamicStoreKeyCreateNetworkServiceEntity(NULL
,
566 kSCDynamicStoreDomainState
,
569 CFArrayAppendValue(patterns
, key
);
572 /* ...watch for (BSD) hostname changes */
573 key
= SCDynamicStoreKeyCreateComputerName(NULL
);
574 CFArrayAppendValue(keys
, key
);
577 /* ...watch for local (multicast DNS) hostname changes */
578 key
= SCDynamicStoreKeyCreateHostNames(NULL
);
579 CFArrayAppendValue(keys
, key
);
582 /* register the keys/patterns */
583 ok
= SCDynamicStoreSetNotificationKeys(store
, keys
, patterns
);
588 "SCDynamicStoreSetNotificationKeys() failed: %s",
589 SCErrorString(SCError()));
593 rl
= CFRunLoopGetCurrent();
594 rls
= SCDynamicStoreCreateRunLoopSource(NULL
, store
, 0);
597 "SCDynamicStoreCreateRunLoopSource() failed: %s",
598 SCErrorString(SCError()));
601 CFRunLoopAddSource(rl
, rls
, kCFRunLoopDefaultMode
);
603 /* ...watch for primary service/interface and DNS configuration changes */
608 key
= SCDynamicStoreKeyCreateNetworkGlobalEntity(NULL
,
609 kSCDynamicStoreDomainState
,
611 changes
= CFArrayCreate(NULL
, (const void **)&key
, 1, &kCFTypeArrayCallBacks
);
612 (*update_hostname
)(store
, changes
, NULL
);
618 status
= notify_register_dispatch(_SC_NOTIFY_NETWORK_CHANGE
,
622 CFRunLoopPerformBlock(rl
,
623 kCFRunLoopDefaultMode
,
627 if (status
!= NOTIFY_STATUS_OK
) {
628 my_log(LOG_ERR
, "notify_register_dispatch() failed: %u", status
);
637 CFRunLoopRemoveSource(rl
, rls
, kCFRunLoopDefaultMode
);
646 dispatch_release(queue
);
656 main(int argc
, char **argv
)
662 if ((argc
> 1) && (strcmp(argv
[1], "-d") == 0)) {
669 CFStringRef hostname
;
670 CFStringRef serviceID
;
671 SCDynamicStoreRef store
;
673 store
= SCDynamicStoreCreate(NULL
, CFSTR("set-hostname"), NULL
, NULL
);
675 SCPrint(TRUE
, stdout
,
676 CFSTR("SCDynamicStoreCreate() failed: %s\n"),
677 SCErrorString(SCError()));
681 // get [prefs] hostname, if available
682 hostname
= copy_prefs_hostname(store
);
683 if (hostname
!= NULL
) {
684 SCPrint(TRUE
, stdout
, CFSTR("hostname (prefs) = %@\n"), hostname
);
688 // get local (multicast DNS) name, if available
690 hostname
= SCDynamicStoreCopyLocalHostName(store
);
691 if (hostname
!= NULL
) {
692 SCPrint(TRUE
, stdout
, CFSTR("hostname (multicast DNS) = %@\n"), hostname
);
696 // get primary service
697 serviceID
= copy_primary_service(store
);
698 if (serviceID
!= NULL
) {
699 SCPrint(TRUE
, stdout
, CFSTR("primary service ID = %@\n"), serviceID
);
701 SCPrint(TRUE
, stdout
, CFSTR("No primary service\n"));
704 if ((argc
== (2+1)) && (argv
[1][0] == 's')) {
705 if (serviceID
!= NULL
) CFRelease(serviceID
);
706 serviceID
= CFStringCreateWithCString(NULL
, argv
[2], kCFStringEncodingUTF8
);
707 SCPrint(TRUE
, stdout
, CFSTR("alternate service ID = %@\n"), serviceID
);
710 if (serviceID
!= NULL
) {
711 // get DHCP provided name
712 hostname
= copy_dhcp_hostname(serviceID
);
713 if (hostname
!= NULL
) {
714 SCPrint(TRUE
, stdout
, CFSTR("hostname (DHCP) = %@\n"), hostname
);
718 // get primary IP address
719 address
= copy_primary_ip(store
, serviceID
);
720 if (address
!= NULL
) {
721 SCPrint(TRUE
, stdout
, CFSTR("primary address = %@\n"), address
);
723 if ((argc
== (2+1)) && (argv
[1][0] == 'a')) {
724 if (address
!= NULL
) CFRelease(address
);
725 address
= CFStringCreateWithCString(NULL
, argv
[2], kCFStringEncodingUTF8
);
726 SCPrint(TRUE
, stdout
, CFSTR("alternate primary address = %@\n"), address
);
729 // start reverse DNS query using primary IP address
730 (void) ptr_query_start(address
);
734 CFRelease(serviceID
);
744 _sc_verbose
= (argc
> 1) ? TRUE
: FALSE
;
746 load_hostname((argc
> 1) ? TRUE
: FALSE
);