/* 

 * 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