ContactsImpl.iOS.uno

using Uno;
using Fuse;
using Bolav.ForeignHelpers;
using Uno.Compiler.ExportTargetInterop;
using Uno.Threading;

[Require("Source.Import","AddressBook/AddressBook.h")]
[Require("Source.Include", "@{ForeignDict:Include}")]
[Require("Xcode.Framework", "AddressBook")]
public extern(iOS) class ContactsImpl
{
	public static Future<string> AuthorizeImpl()
	{
		var p = new Promise<string>();
		var status = GetAuthorizationStatus();
		if (status == "AuthorizationNotDetermined") {
			var closure = new AuthorizationClosure(p);
			closure.RequestAuthorization();
			return p;
		}
		p.Resolve(status);
		return p;
	}

	[Foreign(Language.ObjC)]
	public static string GetAuthorizationStatus()
	@{
		ABAuthorizationStatus status = ABAddressBookGetAuthorizationStatus();

		if (status == kABAuthorizationStatusDenied) {
			return @"AuthorizationDenied";
		}
		else if (status == kABAuthorizationStatusRestricted) {
			return @"AuthorizationRestricted";
		}
		else if (status == kABAuthorizationStatusNotDetermined) {
			return @"AuthorizationNotDetermined";
		}
		else if (status == kABAuthorizationStatusAuthorized) {
			return @"AuthorizationAuthorized";
		}
		else {
			return @"Unknown";
		}
	@}

	// http://stackoverflow.com/questions/3747844/get-a-list-of-all-contacts-on-ios
	[Foreign(Language.ObjC)]
	public static void GetAllImpl(ForeignList ret) 
	@{
		CFErrorRef error = NULL;
		ABAddressBookRef addressBook = ABAddressBookCreateWithOptions(NULL, &error);
		CFArrayRef allPeople = ABAddressBookCopyArrayOfAllPeople( addressBook );
		// CFIndex nPeople = ABAddressBookGetPersonCount( addressBook );
		CFIndex nPeople = CFArrayGetCount(allPeople);

		for ( int i = 0; i < nPeople; i++ )
		{
			id<UnoObject> row = @{ForeignList:Of(ret).NewDictRow():Call()};
		    ABRecordRef person = CFArrayGetValueAtIndex( allPeople, i );
		    // https://developer.apple.com/library/ios/documentation/AddressBook/Reference/ABRecordRef_iPhoneOS/
		    @{ForeignDict:Of(row).SetKeyVal(string,string):Call(@"firstName", CFBridgingRelease(ABRecordCopyValue(person, kABPersonFirstNameProperty)))};
		    @{ForeignDict:Of(row).SetKeyVal(string,string):Call(@"lastName", CFBridgingRelease(ABRecordCopyValue(person, kABPersonLastNameProperty)))};
		    @{ForeignDict:Of(row).SetKeyVal(string,string):Call(@"organization", CFBridgingRelease(ABRecordCopyValue(person, kABPersonOrganizationProperty)))};


		    id<UnoObject> emailList = @{ForeignDict:Of(row).AddListForKey(string):Call(@"email")};
		    ABMultiValueRef emails = ABRecordCopyValue(person, kABPersonEmailProperty);
		    for (CFIndex i = 0; i < ABMultiValueGetCount(emails); i++) {
		    	id<UnoObject> emailRow = @{ForeignList:Of(emailList).NewDictRow():Call()};

		        NSString *label = (__bridge NSString *) ABMultiValueCopyLabelAtIndex(emails, i);
		        NSString *email = (__bridge NSString *) ABMultiValueCopyValueAtIndex(emails, i);
		        @{ForeignDict:Of(emailRow).SetKeyVal(string,string):Call(@"email", email)};
		        @{ForeignDict:Of(emailRow).SetKeyVal(string,string):Call(@"label", label)};
		    }
		    CFRelease(emails);

		    id<UnoObject> phoneList = @{ForeignDict:Of(row).AddListForKey(string):Call(@"phone")};
		    ABMultiValueRef phones = (ABMultiValueRef)ABRecordCopyValue(person, kABPersonPhoneProperty);
		    for (int i=0; i < ABMultiValueGetCount(phones); i++) {
		    	id<UnoObject> phoneRow = @{ForeignList:Of(phoneList).NewDictRow():Call()};

		        NSString *label = (__bridge NSString *)ABMultiValueCopyLabelAtIndex(phones, i);
		        NSString *phone = (__bridge NSString *)ABMultiValueCopyValueAtIndex(phones, i);
		        @{ForeignDict:Of(phoneRow).SetKeyVal(string,string):Call(@"phone", phone)};
		        @{ForeignDict:Of(phoneRow).SetKeyVal(string,string):Call(@"label", label)};

		    }
		    CFRelease(phones);

		}
		CFRelease(allPeople);
	@} 

	[Foreign(Language.ObjC)]
	public static void GetPageImpl(ForeignList ret, int numRows, int curPage) 
	@{
		CFErrorRef error = NULL;
		ABAddressBookRef addressBook = ABAddressBookCreateWithOptions(NULL, &error);
		ABRecordRef source = ABAddressBookCopyDefaultSource(addressBook);
		CFArrayRef allPeople = ABAddressBookCopyArrayOfAllPeopleInSourceWithSortOrdering(addressBook, source, kABPersonSortByFirstName);
		CFIndex nPeople = CFArrayGetCount(allPeople);

		int i = curPage * numRows;
		int j = i + numRows;

		while ( i < j )
		{
			i++; 
			if (i >= nPeople) break;
			id<UnoObject> row = @{ForeignList:Of(ret).NewDictRow():Call()};
		    ABRecordRef person = CFArrayGetValueAtIndex( allPeople, i );
		    NSString *firstName = CFBridgingRelease(ABRecordCopyValue(person, kABPersonFirstNameProperty));
		    NSString *lastName = CFBridgingRelease(ABRecordCopyValue(person, kABPersonLastNameProperty));
		    NSString *fullName = @"";
		    if (!firstName && !lastName) {
		    	fullName = @"Unknown Contact";
		    } else if (!lastName) {
		    	fullName = [NSString stringWithFormat:@"%@", firstName];
		    } else if (!firstName) {
		    	fullName = [NSString stringWithFormat:@"%@", lastName];
		    } else {
		    	fullName = [NSString stringWithFormat:@"%@%@%@", firstName, @" ", lastName];
		    }
		    @{ForeignDict:Of(row).SetKeyVal(string,string):Call(@"name", fullName)};


		    id<UnoObject> emailList = @{ForeignDict:Of(row).AddListForKey(string):Call(@"email")};
		    ABMultiValueRef emails = ABRecordCopyValue(person, kABPersonEmailProperty);
		    for (CFIndex i = 0; i < ABMultiValueGetCount(emails); i++) {
		    	id<UnoObject> emailRow = @{ForeignList:Of(emailList).NewDictRow():Call()};

		        NSString *email = (__bridge NSString *) ABMultiValueCopyValueAtIndex(emails, i);
		        @{ForeignDict:Of(emailRow).SetKeyVal(string,string):Call(@"email", email)};
		    }
		    CFRelease(emails);

		    id<UnoObject> phoneList = @{ForeignDict:Of(row).AddListForKey(string):Call(@"phone")};
		    ABMultiValueRef phones = (ABMultiValueRef)ABRecordCopyValue(person, kABPersonPhoneProperty);
		    for (int i=0; i < ABMultiValueGetCount(phones); i++) {
		    	id<UnoObject> phoneRow = @{ForeignList:Of(phoneList).NewDictRow():Call()};

		        NSString *phone = (__bridge NSString *)ABMultiValueCopyValueAtIndex(phones, i);
		        @{ForeignDict:Of(phoneRow).SetKeyVal(string,string):Call(@"phone", phone)};

		    }
		    CFRelease(phones);

		}
		CFRelease(allPeople);
	@} 
}

[Require("Source.Import","AddressBook/AddressBook.h")]
public extern(iOS) class AuthorizationClosure {
	Promise<string> promise;
	public AuthorizationClosure(Promise<string> p) {
		promise = p;
	}

	public void Resolve(string s) {
		promise.Resolve(s);
	}

	[Foreign(Language.ObjC)]
	public void RequestAuthorization() 
	@{
		CFErrorRef error = NULL;
		ABAddressBookRef addressBook = ABAddressBookCreateWithOptions(NULL, &error);
		if (!addressBook) {
		    NSLog(@"ABAddressBookCreateWithOptions error: %@", CFBridgingRelease(error));
			@{AuthorizationClosure:Of(_this).Resolve(string):Call(@"Error getting addressBook")};
		    return;
		}

		ABAddressBookRequestAccessWithCompletion(addressBook, ^(bool granted, CFErrorRef error) {
		    if (error) {
		        NSLog(@"ABAddressBookRequestAccessWithCompletion error: %@", CFBridgingRelease(error));
		        @{AuthorizationClosure:Of(_this).Resolve(string):Call(@"Error getting access")};
		    }

		    if (granted) {
		        @{AuthorizationClosure:Of(_this).Resolve(string):Call(@"AuthorizationAuthorized")};
		    } else {
		    	@{AuthorizationClosure:Of(_this).Resolve(string):Call(@"AuthorizationDenied")};
		    }
		    CFRelease(addressBook);
		});
	@}

}