/* 

  * Adium is the legal property of its developers, whose names are listed in the copyright file included

  * with this source distribution.

  * 

  * This program is free software; you can redistribute it and/or modify it under the terms of the GNU

  * General Public License as published by the Free Software Foundation; either version 2 of the License,

  * or (at your option) any later version.

  * 

  * This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even

  * the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General

  * Public License for more details.

  * 

  * You should have received a copy of the GNU General Public License along with this program; if not,

  * write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

  */

 #import "ESPurpleJabberAccountViewController.h"

 #import <Adium/AIAccount.h>

 #import <Adium/AIContactControllerProtocol.h>

 #import <Adium/AIService.h>

 #import <Adium/AIContactList.h>

 #import <SystemConfiguration/SystemConfiguration.h>

 #include <tgmath.h>

 #define SERVERFEEDRSSURL @"http://xmpp.org/services/services-full.xml"

 @implementation ESPurpleJabberAccountViewController

 - (NSString *)nibName{

     return @"ESPurpleJabberAccountView";

 }

 - (void)awakeFromNib

 {

 	[super awakeFromNib];

 	[checkBox_checkMail setEnabled:NO];

 	[[NSNotificationCenter defaultCenter] addObserver:self

 								   selector:@selector(contactListChanged:)

 									   name:Contact_ListChanged

 									 object:nil];

 }

 //Configure our controls

 - (void)configureForAccount:(AIAccount *)inAccount

 {

     [super configureForAccount:inAccount];

 	//Connection security

 	[checkBox_forceOldSSL setState:[[account preferenceForKey:KEY_JABBER_FORCE_OLD_SSL group:GROUP_ACCOUNT_STATUS] boolValue]];

 	[checkBox_requireTLS setState:[[account preferenceForKey:KEY_JABBER_REQUIRE_TLS group:GROUP_ACCOUNT_STATUS] boolValue]];

 	[checkBox_checkCertificates setState:[account preferenceForKey:KEY_JABBER_VERIFY_CERTS group:GROUP_ACCOUNT_STATUS]?[[account preferenceForKey:KEY_JABBER_VERIFY_CERTS group:GROUP_ACCOUNT_STATUS] boolValue]:YES];

 	[checkBox_allowPlaintext setState:[[account preferenceForKey:KEY_JABBER_ALLOW_PLAINTEXT group:GROUP_ACCOUNT_STATUS] boolValue]];

 	//Resource

 	NSString *resource = [account preferenceForKey:KEY_JABBER_RESOURCE group:GROUP_ACCOUNT_STATUS];

 	if (!resource)

 		resource = [(NSString*)SCDynamicStoreCopyLocalHostName(NULL) autorelease];

 	if (!resource)

 		resource = @"";	

 	[textField_resource setStringValue:resource];

 	//Connect server

 	NSString *connectServer = [account preferenceForKey:KEY_JABBER_CONNECT_SERVER group:GROUP_ACCOUNT_STATUS];

 	[textField_connectServer setStringValue:(connectServer ? connectServer : @"")];

 	// BOSH server

 	NSString *boshServer = [account preferenceForKey:KEY_JABBER_BOSH_SERVER group:GROUP_ACCOUNT_STATUS];

 	[textField_BOSHserver setStringValue:(boshServer ?: @"")];	

 	//Priority

 	NSNumber *priority = [account preferenceForKey:KEY_JABBER_PRIORITY_AVAILABLE group:GROUP_ACCOUNT_STATUS];

 	[textField_priorityAvailable setStringValue:(priority ? [priority stringValue] : @"")];

 	priority = [account preferenceForKey:KEY_JABBER_PRIORITY_AWAY group:GROUP_ACCOUNT_STATUS];

 	[textField_priorityAway setStringValue:(priority ? [priority stringValue] : @"")];

 	//File transfer proxies

 	NSString *ftProxies = [account preferenceForKey:KEY_JABBER_FT_PROXIES group:GROUP_ACCOUNT_STATUS];

 	[textField_ftProxies setStringValue:ftProxies ?: @""];

 	//Subscription behavior

 	NSInteger subbeh = [[account preferenceForKey:KEY_JABBER_SUBSCRIPTION_BEHAVIOR group:GROUP_ACCOUNT_STATUS] integerValue];

 	[popup_subscriptionBehavior selectItemWithTag:subbeh];

 	NSString *defaultGroup = [account preferenceForKey:KEY_JABBER_SUBSCRIPTION_GROUP group:GROUP_ACCOUNT_STATUS];

 	[comboBox_subscriptionGroup setStringValue:(defaultGroup ? defaultGroup : @"")];

 	//Hide the register button if the account can't register new accounts

 	[button_register setHidden:![account.service canRegisterNewAccounts]];

 	//Set hidden flag of the default group combobox

 	[self subscriptionModeDidChange:nil];

 }

 //Save controls

 - (void)saveConfiguration

 {

     [super saveConfiguration];

 	//Connection security

 	[account setPreference:[NSNumber numberWithBool:[checkBox_forceOldSSL state]]

 					forKey:KEY_JABBER_FORCE_OLD_SSL group:GROUP_ACCOUNT_STATUS];

 	[account setPreference:[NSNumber numberWithBool:[checkBox_requireTLS state]]

 								   forKey:KEY_JABBER_REQUIRE_TLS group:GROUP_ACCOUNT_STATUS];

 	[account setPreference:[NSNumber numberWithBool:[checkBox_checkCertificates state]]

 					forKey:KEY_JABBER_VERIFY_CERTS group:GROUP_ACCOUNT_STATUS];

 	[account setPreference:[NSNumber numberWithBool:[checkBox_allowPlaintext state]]

 					forKey:KEY_JABBER_ALLOW_PLAINTEXT group:GROUP_ACCOUNT_STATUS];

 	//Resource

 	[account setPreference:([[textField_resource stringValue] length] ? [textField_resource stringValue] : nil)

 					forKey:KEY_JABBER_RESOURCE group:GROUP_ACCOUNT_STATUS];

 	//Connect server

 	[account setPreference:([[textField_connectServer stringValue] length] ? [textField_connectServer stringValue] : nil)

 					forKey:KEY_JABBER_CONNECT_SERVER group:GROUP_ACCOUNT_STATUS];

 	//BOSH server

 	[account setPreference:([[textField_BOSHserver stringValue] length] ? [textField_BOSHserver stringValue] : nil)

 					forKey:KEY_JABBER_BOSH_SERVER group:GROUP_ACCOUNT_STATUS];	

 	//FT proxies

 	[account setPreference:[textField_ftProxies stringValue]

 					forKey:KEY_JABBER_FT_PROXIES group:GROUP_ACCOUNT_STATUS];

 	//Priority

 	[account setPreference:([textField_priorityAvailable integerValue] ? [NSNumber numberWithInteger:[textField_priorityAvailable integerValue]] : nil)

 					forKey:KEY_JABBER_PRIORITY_AVAILABLE

 					 group:GROUP_ACCOUNT_STATUS];

 	[account setPreference:([textField_priorityAway integerValue] ? [NSNumber numberWithInteger:[textField_priorityAway integerValue]] : nil)

 					forKey:KEY_JABBER_PRIORITY_AWAY

 					 group:GROUP_ACCOUNT_STATUS];

 	//Subscription Behavior

 	[account setPreference:([[popup_subscriptionBehavior selectedItem] tag] ? [NSNumber numberWithInteger:[[popup_subscriptionBehavior selectedItem] tag]] : nil)

 					forKey:KEY_JABBER_SUBSCRIPTION_BEHAVIOR

 					 group:GROUP_ACCOUNT_STATUS];

 	[account setPreference:([[comboBox_subscriptionGroup stringValue] length] ? [comboBox_subscriptionGroup stringValue] : nil)

 					forKey:KEY_JABBER_SUBSCRIPTION_GROUP group:GROUP_ACCOUNT_STATUS];

 }

 - (IBAction)subscriptionModeDidChange:(id)sender {

 	// only show these two when "accept and add to contact list" is selected

 	NSInteger tag = [[popup_subscriptionBehavior selectedItem] tag];

 	[textField_subscriptionModeLabel setHidden:tag != 2];

 	[comboBox_subscriptionGroup setHidden:tag != 2];

 }

 - (void)dealloc {

 	[[NSNotificationCenter defaultCenter] removeObserver:self];

 	[window_registerServer release];

 	[servers release];

 	[super dealloc];

 }

 #pragma mark group combobox datasource

 - (void)contactListChanged:(NSNotification*)n {

 	[comboBox_subscriptionGroup reloadData];

 }

 - (NSInteger)numberOfItemsInComboBox:(NSComboBox *)aComboBox {

 	return [adium.contactController.contactList countOfContainedObjects];

 }

 - (id)comboBox:(NSComboBox *)aComboBox objectValueForItemAtIndex:(NSInteger)index {

 	return [[adium.contactController.contactList.containedObjects objectAtIndex:index] formattedUID];

 }

 - (NSUInteger)comboBox:(NSComboBox *)aComboBox indexOfItemWithStringValue:(NSString *)string {

 	NSArray *groups = adium.contactController.contactList.containedObjects;

 	NSUInteger i;

 	for(i = 0;i < [groups count];++i) {

 		AIListGroup *group = [groups objectAtIndex:i];

 		if([group.formattedUID isEqualToString:string])

 			return i;

 	}

 	return NSNotFound;

 }

 - (NSString *)comboBox:(NSComboBox *)aComboBox completedString:(NSString *)string {

 	for(AIListObject *obj in adium.contactController.contactList) {

 		if([obj isKindOfClass:[AIListGroup class]] && [obj.formattedUID hasPrefix:string])

 			return obj.formattedUID;

 	}

 	return string;

 }

 #pragma mark account creation

 static NSComparisonResult compareByDistance(id one, id two, void*context) {

 	NSNumber *dist1obj = [one objectForKey:@"distance"];

 	NSNumber *dist2obj = [two objectForKey:@"distance"];

 	if((id)dist2obj == [NSNull null]) {

 		if((id)dist1obj == [NSNull null])

 			return NSOrderedSame;

 		return NSOrderedAscending;

 	}

 	if((id)dist1obj == [NSNull null])

 		return NSOrderedDescending;

 	CGFloat dist1 = [dist1obj doubleValue];

 	CGFloat dist2 = [dist2obj doubleValue];

 	if(fabs(dist1 - dist2) < 0.000001)

 		return NSOrderedSame;

 	if(dist1 > dist2)

 		return NSOrderedDescending;

 	return NSOrderedAscending;

 }

 - (IBAction)registerNewAccount:(id)sender {

 	if(!servers) {

 		NSError *err = NULL;

 		NSXMLDocument *serverfeed = [[[NSXMLDocument alloc] initWithContentsOfURL:[NSURL URLWithString:SERVERFEEDRSSURL]

 																		 options:0

 																		   error:&err] autorelease];

 		if(err) {

 			[[NSAlert alertWithError:err] runModal];

 		} else {

 			NSXMLElement *root = [serverfeed rootElement];

 			NSArray *items = [root elementsForName:@"item"];

 			if(!root || !items || ![[root name] isEqualToString:@"query"]) {

 				[[NSAlert alertWithMessageText:AILocalizedString(@"Parse Error.",nil)

 								 defaultButton:AILocalizedString(@"OK",nil)

 							   alternateButton:nil

 								   otherButton:nil

 					 informativeTextWithFormat:[NSString stringWithFormat:

 												AILocalizedString(@"Unable to parse the server list at %@. Please try again later.",nil), SERVERFEEDRSSURL]] runModal];

 			} else {				

 				MachineLocation loc;

 				ReadLocation(&loc);

 				CGFloat latitude = FractToFloat(loc.latitude)*(M_PI/2.0f);

 				CGFloat longitude = FractToFloat(loc.longitude)*(M_PI/2.0f);

 				servers = [[NSMutableArray alloc] init];

 				for (NSXMLElement *item in items) {

 					NSXMLElement *title = [[item elementsForName:@"domain"] lastObject];

 					if(!title)

 						continue;

 					NSXMLElement *description = [[item elementsForName:@"description"] lastObject];

 					NSXMLElement *latitudeNode  = [[item elementsForName:@"latitude"] lastObject];

 					NSXMLElement *longitudeNode = [[item elementsForName:@"longitude"] lastObject];

 					NSString *domain = [[item attributeForName:@"jid"] stringValue];

 					NSString *homepageStr = [[[item elementsForName:@"homepage"] lastObject] stringValue];

 					NSURL *homepage = homepageStr?[NSURL URLWithString:homepageStr]:nil;

 					id distance = [NSNull null];

 					if (latitudeNode && longitudeNode) {

 						/* Calculate the distance between the computer and the xmpp server in km

 						 * Note that this assumes that the earth is a perfect sphere

 						 * If it turns out to be flat or doughnut-shaped, this will not work!

 						 */

 						CGFloat latitude2 = [[latitudeNode stringValue] doubleValue] * (M_PI/180.0f);

 						CGFloat longitude2 = [[longitudeNode stringValue] doubleValue] * (M_PI/180.0f);

 						CGFloat d_lat = sinf((latitude2 - latitude)/2.0);

 						CGFloat d_long = sinf((longitude2 - longitude)/2.0);

 						CGFloat a = d_lat*d_lat + cosf(latitude)*cosf(latitude2)*d_long*d_long;

 						CGFloat c = 2*atan2f(sqrt(a),sqrt(1.0-a));

 						CGFloat d = 6372.797*c; // mean earth radius

 						distance = [NSNumber numberWithDouble:d];

 					}

 					[(NSMutableArray*)servers addObject:[NSDictionary dictionaryWithObjectsAndKeys:

 						[title stringValue], @"servername",

 						(description ? (id)[description stringValue] : (id)[NSNull null]), @"description",

 						distance, @"distance",

 						domain, @"domain",

 						homepage, @"homepage", // might be nil

 						nil]];

 				}

 				[(NSMutableArray*)servers sortUsingFunction:compareByDistance context:nil];

 				[tableview_servers reloadData];

 			}

 		}

 	}

 	[NSApp beginSheet:window_registerServer

 	   modalForWindow:[sender window]

 		modalDelegate:self

 	   didEndSelector:@selector(registrationSheetDidEnd:returnCode:contextInfo:)

 		  contextInfo:NULL];

 }

 - (void)registrationSheetDidEnd:(NSWindow *)sheet returnCode:(NSInteger)returnCode contextInfo:(void *)contextInfo

 {

 }

 - (NSInteger)numberOfRowsInTableView:(NSTableView *)tableView {

 	return [servers count];

 }

 - (id)tableView:(NSTableView *)tableView objectValueForTableColumn:(NSTableColumn *)tableColumn row:(NSInteger)row {

 	id objectValue = [[servers objectAtIndex:row] objectForKey:[tableColumn identifier]];

 	return ((objectValue && ![objectValue isKindOfClass:[NSNull class]]) ? objectValue : @"");

 }

 - (void)tableViewSelectionDidChange:(NSNotification *)notification {

 	NSDictionary *serverInfo = [servers objectAtIndex:[tableview_servers selectedRow]];

 	NSString *servername = [serverInfo objectForKey:@"domain"];

 	[textField_registerServerName setStringValue:servername];

 	[textField_registerServerPort setStringValue:@""];

 	[textView_serverDescription setString:[serverInfo objectForKey:@"description"]];

 	[button_serverHomepage setEnabled:[serverInfo objectForKey:@"homepage"] != nil];

 }

 - (IBAction)visitServerHomepage:(id)sender {

 	NSDictionary *serverInfo = [servers objectAtIndex:[tableview_servers selectedRow]];

 	[[NSWorkspace sharedWorkspace] openURL:[serverInfo objectForKey:@"homepage"]];

 }

 - (IBAction)registerCancel:(id)sender {

 	[window_registerServer orderOut:nil];

 	[NSApp endSheet:window_registerServer];

 }

 - (IBAction)registerRequestAccount:(id)sender {

 	[[sender window] makeFirstResponder:nil]; // apply all changes

 	if([[textField_registerServerName stringValue] length] == 0) {

 		NSBeep();

 		return;

 	}

 	[account setPreference:[NSNumber numberWithInteger:[textField_registerServerPort integerValue]]

 					forKey:KEY_CONNECT_PORT group:GROUP_ACCOUNT_STATUS];

 	NSString *newUID;

 	if ([[textField_accountUID stringValue] length]) {

 		NSRange atLocation = [[textField_accountUID stringValue] rangeOfString:@"@" options:NSLiteralSearch];

 		if (atLocation.location == NSNotFound)

 			newUID = [NSString stringWithFormat:@"%@@%@",[textField_accountUID stringValue], [textField_registerServerName stringValue]];

 		else

 			newUID = [NSString stringWithFormat:@"%@@%@",[[textField_accountUID stringValue] substringToIndex:atLocation.location], [textField_registerServerName stringValue]];

 	} else {

 		newUID = [NSString stringWithFormat:@"nobody@%@",[textField_registerServerName stringValue]];

 	}

 	[account filterAndSetUID:newUID];

 	[window_registerServer orderOut:nil];

 	[NSApp endSheet:window_registerServer];

 	[account performRegisterWithPassword:[textField_password stringValue]];

 	[self didBeginRegistration];

 }

 @end