/*
*
* isEntryValidAndFuturistic
* Returns true if the CFDictionary is validly formed
* AND if the date is in the future
* Returns false if anything about the dictionary is invalid
* OR if the CFDate is prior to the current time
*
*/
static bool
isEntryValidAndFuturistic(CFDictionaryRef wakeup_dict, CFDateRef date_now)
{
CFDateRef wakeup_date;
bool ret = true;
wakeup_dict = isA_CFDictionary(wakeup_dict);
if(!wakeup_dict)
{
// bogus entry!
ret = false;
} else
{
// valid entry
wakeup_date = isA_CFDate(CFDictionaryGetValue(wakeup_dict,
CFSTR(kIOPMPowerEventTimeKey)));
if( !wakeup_date
|| (kCFCompareLessThan == CFDateCompare(wakeup_date, date_now, 0)))
{
// date is too early
ret = false;
}
// otherwise date is after now, and ret = true
}
return ret;
}
STATIC bool
linklocal_modifier_has_expired(CFDictionaryRef dict, CFDateRef now)
{
bool has_expired = TRUE;
CFDataRef modifier;
uint8_t security_level;
modifier = CGAModifierDictGetModifier(dict, &security_level);
if (modifier != NULL) {
CFDateRef creation_date;
creation_date = CFDictionaryGetValue(dict, kCreationDate);
if (isA_CFDate(creation_date) != NULL
&& (CFDateGetTimeIntervalSinceDate(now, creation_date)
< LINKLOCAL_MODIFIER_EXPIRATION_SECONDS)) {
has_expired = FALSE;
}
}
return (has_expired);
}
CFStringRef
_SCCopyDescription(CFTypeRef cf, CFDictionaryRef formatOptions)
{
#ifdef ENABLE_SC_FORMATTING
CFMutableDictionaryRef nFormatOptions;
CFStringRef prefix1;
CFStringRef prefix2;
CFTypeID type = CFGetTypeID(cf);
if (!formatOptions ||
!CFDictionaryGetValueIfPresent(formatOptions, CFSTR("PREFIX1"), (const void **)&prefix1)) {
prefix1 = CFSTR("");
}
if (type == CFStringGetTypeID()) {
return CFStringCreateWithFormat(NULL,
formatOptions,
CFSTR("%@%@"),
prefix1,
cf);
}
if (type == CFBooleanGetTypeID()) {
return CFStringCreateWithFormat(NULL,
formatOptions,
CFSTR("%@%s"),
prefix1,
CFBooleanGetValue(cf) ? "TRUE" : "FALSE");
}
if (type == CFDataGetTypeID()) {
const uint8_t *data;
CFIndex dataLen;
CFIndex i;
CFMutableStringRef str;
str = CFStringCreateMutable(NULL, 0);
CFStringAppendFormat(str, formatOptions, CFSTR("%@<data> 0x"), prefix1);
data = CFDataGetBytePtr(cf);
dataLen = CFDataGetLength(cf);
for (i = 0; i < dataLen; i++) {
CFStringAppendFormat(str, NULL, CFSTR("%02x"), data[i]);
}
return str;
}
if (type == CFNumberGetTypeID()) {
return CFStringCreateWithFormat(NULL,
formatOptions,
CFSTR("%@%@"),
prefix1,
cf);
}
if (type == CFDateGetTypeID()) {
CFCalendarRef calendar;
CFStringRef str;
CFTimeZoneRef tz;
int MM, DD, YYYY, hh, mm, ss;
calendar = CFCalendarCreateWithIdentifier(NULL, kCFGregorianCalendar);
tz = CFTimeZoneCopySystem();
CFCalendarSetTimeZone(calendar, tz);
CFRelease(tz);
CFCalendarDecomposeAbsoluteTime(calendar,
CFDateGetAbsoluteTime(cf),
"MdyHms",
&MM, &DD, &YYYY, &hh, &mm, &ss);
CFRelease(calendar);
str = CFStringCreateWithFormat(NULL,
formatOptions,
CFSTR("%@%02d/%02d/%04d %02d:%02d:%02d"),
prefix1,
MM, DD, YYYY, hh, mm, ss);
return str;
}
if ((formatOptions == NULL) ||
!CFDictionaryGetValueIfPresent(formatOptions, CFSTR("PREFIX2"), (const void **)&prefix2)) {
prefix2 = prefix1;
}
if (formatOptions != NULL) {
nFormatOptions = CFDictionaryCreateMutableCopy(NULL, 0, formatOptions);
} else {
nFormatOptions = CFDictionaryCreateMutable(NULL,
0,
&kCFTypeDictionaryKeyCallBacks,
&kCFTypeDictionaryValueCallBacks);
}
assert(nFormatOptions != NULL);
#define N_QUICK 32
if (type == CFArrayGetTypeID()) {
const void * elements_q[N_QUICK];
const void ** elements = elements_q;
CFIndex i;
CFIndex nElements;
CFMutableStringRef str;
str = CFStringCreateMutable(NULL, 0);
CFStringAppendFormat(str, formatOptions, CFSTR("%@<array> {"), prefix1);
nElements = CFArrayGetCount(cf);
if (nElements > 0) {
if (nElements > (CFIndex)(sizeof(elements_q)/sizeof(CFTypeRef)))
elements = CFAllocatorAllocate(NULL, nElements * sizeof(CFTypeRef), 0);
CFArrayGetValues(cf, CFRangeMake(0, nElements), elements);
for (i = 0; i < nElements; i++) {
CFMutableStringRef nPrefix1;
CFMutableStringRef nPrefix2;
CFStringRef nStr;
CFStringRef vStr;
nStr = CFStringCreateWithFormat(NULL, NULL, CFSTR("%ld"), i);
nPrefix1 = CFStringCreateMutable(NULL, 0);
CFStringAppendFormat(nPrefix1,
formatOptions,
CFSTR("%@ %@ : "),
prefix2,
nStr);
nPrefix2 = CFStringCreateMutable(NULL, 0);
CFStringAppendFormat(nPrefix2,
formatOptions,
CFSTR("%@ "),
prefix2);
CFDictionarySetValue(nFormatOptions, CFSTR("PREFIX1"), nPrefix1);
CFDictionarySetValue(nFormatOptions, CFSTR("PREFIX2"), nPrefix2);
CFRelease(nPrefix1);
CFRelease(nPrefix2);
CFRelease(nStr);
vStr = _SCCopyDescription((CFTypeRef)elements[i], nFormatOptions);
CFStringAppendFormat(str,
formatOptions,
CFSTR("\n%@"),
vStr);
CFRelease(vStr);
}
if (elements != elements_q) CFAllocatorDeallocate(NULL, elements);
}
CFStringAppendFormat(str, formatOptions, CFSTR("\n%@}"), prefix2);
CFRelease(nFormatOptions);
return str;
}
if (type == CFDictionaryGetTypeID()) {
const void * keys_q[N_QUICK];
const void ** keys = keys_q;
CFIndex i;
CFIndex nElements;
CFMutableStringRef nPrefix1;
CFMutableStringRef nPrefix2;
CFMutableStringRef str;
str = CFStringCreateMutable(NULL, 0);
CFStringAppendFormat(str, formatOptions, CFSTR("%@<dictionary> {"), prefix1);
nElements = CFDictionaryGetCount(cf);
if (nElements > 0) {
CFComparatorFunction compFunc = NULL;
CFMutableArrayRef sortedKeys;
if (nElements > (CFIndex)(sizeof(keys_q) / sizeof(CFTypeRef))) {
keys = CFAllocatorAllocate(NULL, nElements * sizeof(CFTypeRef), 0);
}
CFDictionaryGetKeysAndValues(cf, keys, NULL);
sortedKeys = CFArrayCreateMutable(NULL, 0, &kCFTypeArrayCallBacks);
for (i = 0; i < nElements; i++) {
CFArrayAppendValue(sortedKeys, (CFStringRef)keys[i]);
}
if (isA_CFString(keys[0])) {
compFunc = (CFComparatorFunction)CFStringCompare;
}
else if (isA_CFNumber(keys[0])) {
compFunc = (CFComparatorFunction)CFNumberCompare;
}
else if (isA_CFDate(keys[0])) {
compFunc = (CFComparatorFunction)CFDateCompare;
}
if (compFunc != NULL) {
CFArraySortValues(sortedKeys,
CFRangeMake(0, nElements),
compFunc,
NULL);
}
for (i = 0; i < nElements; i++) {
CFStringRef key;
CFStringRef kStr;
CFTypeRef val;
CFStringRef vStr;
key = CFArrayGetValueAtIndex(sortedKeys, i);
kStr = _SCCopyDescription((CFTypeRef)key, NULL);
nPrefix1 = CFStringCreateMutable(NULL, 0);
CFStringAppendFormat(nPrefix1,
formatOptions,
CFSTR("%@ %@ : "),
prefix2,
kStr);
nPrefix2 = CFStringCreateMutable(NULL, 0);
CFStringAppendFormat(nPrefix2,
formatOptions,
CFSTR("%@ "),
prefix2);
CFDictionarySetValue(nFormatOptions, CFSTR("PREFIX1"), nPrefix1);
CFDictionarySetValue(nFormatOptions, CFSTR("PREFIX2"), nPrefix2);
CFRelease(nPrefix1);
CFRelease(nPrefix2);
CFRelease(kStr);
val = CFDictionaryGetValue(cf, key);
vStr = _SCCopyDescription((CFTypeRef)val, nFormatOptions);
CFStringAppendFormat(str,
formatOptions,
CFSTR("\n%@"),
vStr);
CFRelease(vStr);
}
CFRelease(sortedKeys);
if (keys != keys_q) {
CFAllocatorDeallocate(NULL, keys);
}
}
CFStringAppendFormat(str, formatOptions, CFSTR("\n%@}"), prefix2);
CFRelease(nFormatOptions);
return str;
}
CFRelease(nFormatOptions);
#endif /* ENABLE_SC_FORMATTING */
return CFStringCreateWithFormat(NULL,
formatOptions,
CFSTR("%@%@"),
prefix1,
cf);
}
/*
* Function: DHCPLeaseCreateWithDictionary
* Purpose:
* Instantiate a new DHCPLease structure corresponding to the given
* dictionary. Validates that required properties are present,
* returns NULL if those checks fail.
*/
static DHCPLeaseRef
DHCPLeaseCreateWithDictionary(CFDictionaryRef dict, bool is_wifi)
{
CFDataRef hwaddr_data;
dhcp_lease_time_t lease_time;
DHCPLeaseRef lease_p;
CFDataRef pkt_data;
CFRange pkt_data_range;
struct in_addr * router_p;
CFStringRef ssid = NULL;
CFDateRef start_date;
dhcp_lease_time_t t1_time;
dhcp_lease_time_t t2_time;
/* get the lease start time */
start_date = CFDictionaryGetValue(dict, kLeaseStartDate);
if (isA_CFDate(start_date) == NULL) {
goto failed;
}
/* get the packet data */
pkt_data = CFDictionaryGetValue(dict, kPacketData);
if (isA_CFData(pkt_data) == NULL) {
goto failed;
}
/* if Wi-Fi, get the SSID */
if (is_wifi) {
ssid = CFDictionaryGetValue(dict, kSSID);
if (isA_CFString(ssid) == NULL) {
goto failed;
}
}
pkt_data_range.location = 0;
pkt_data_range.length = CFDataGetLength(pkt_data);
if (pkt_data_range.length < sizeof(struct dhcp)) {
goto failed;
}
lease_p = (DHCPLeaseRef)
malloc(offsetof(DHCPLease, pkt) + pkt_data_range.length);
bzero(lease_p, offsetof(DHCPLease, pkt));
/* copy the packet data */
CFDataGetBytes(pkt_data, pkt_data_range, lease_p->pkt);
lease_p->pkt_length = (int)pkt_data_range.length;
/* get the lease information and router IP address */
lease_p->lease_start = (absolute_time_t)CFDateGetAbsoluteTime(start_date);
{ /* parse/retrieve options */
dhcpol_t options;
(void)dhcpol_parse_packet(&options, (void *)lease_p->pkt,
(int)pkt_data_range.length, NULL);
dhcp_get_lease_from_options(&options, &lease_time, &t1_time, &t2_time);
router_p = dhcp_get_router_from_options(&options, lease_p->our_ip);
dhcpol_free(&options);
}
lease_p->lease_length = lease_time;
/* get the IP address */
/* ALIGN: lease_p->pkt is aligned, cast ok. */
lease_p->our_ip = ((struct dhcp *)(void *)lease_p->pkt)->dp_yiaddr;
/* get the router information */
if (router_p != NULL) {
CFRange hwaddr_range;
lease_p->router_ip = *router_p;
/* get the router hardware address */
hwaddr_data = CFDictionaryGetValue(dict, kRouterHardwareAddress);
hwaddr_range.length = 0;
if (isA_CFData(hwaddr_data) != NULL) {
hwaddr_range.length = CFDataGetLength(hwaddr_data);
}
if (hwaddr_range.length > 0) {
hwaddr_range.location = 0;
if (hwaddr_range.length > sizeof(lease_p->router_hwaddr)) {
hwaddr_range.length = sizeof(lease_p->router_hwaddr);
}
lease_p->router_hwaddr_length = (int)hwaddr_range.length;
CFDataGetBytes(hwaddr_data, hwaddr_range, lease_p->router_hwaddr);
}
}
if (ssid != NULL) {
CFRetain(ssid);
lease_p->ssid = ssid;
}
return (lease_p);
failed:
return (NULL);
}