Allow selection of SSH client binary in prefs

Hey, I was against this, but if you want it... - just don't blame me for what might happen 

Frameworks/SPMySQLFramework/Source/SPMySQLConnectionProxy.h

@@ -33,11 +33,12 @@
 * Connection proxy state constants.
 */
typedef enum {
	SPMySQLProxyIdle				= 0,
	SPMySQLProxyConnecting			= 1,
	SPMySQLProxyWaitingForAuth		= 2,
	SPMySQLProxyConnected			= 3,
	SPMySQLProxyForwardingFailed	= 4
	SPMySQLProxyIdle             = 0,
	SPMySQLProxyConnecting       = 1,
	SPMySQLProxyWaitingForAuth   = 2,
	SPMySQLProxyConnected        = 3,
	SPMySQLProxyForwardingFailed = 4,
	SPMySQLProxyLaunchFailed     = 5
} SPMySQLConnectionProxyState;

Source/SPConstants.h

@@ -428,6 +428,7 @@ extern NSString *SPHiddenKeyFileVisibilityKey;
extern NSString *SPSelectionDetailTypeIndexed;
extern NSString *SPSelectionDetailTypePrimaryKeyed;
extern NSString *SPSSHEnableMuxingPreference;
extern NSString *SPSSHClientPath;

// URLs
extern NSString *SPDonationsURL;

Source/SPConstants.m

@@ -229,6 +229,7 @@
NSString *SPSelectionDetailTypeIndexed           = @"SelectionDetailTypeNSIndexSet";
NSString *SPSelectionDetailTypePrimaryKeyed      = @"SelectionDetailTypePrimaryKeyedDetails";
NSString *SPSSHEnableMuxingPreference            = @"SSHMultiplexingEnabled";
NSString *SPSSHClientPath                        = @"SSHClientPath";

// URLs
NSString *SPDonationsURL                         = @"http://www.sequelpro.com/donate/";

Source/SPNetworkPreferencePane.h

@@ -37,6 +37,16 @@
 *
 * Network preference pane controller.
 */
@interface SPNetworkPreferencePane : SPPreferencePane <SPPreferencePaneProtocol> 

@interface SPNetworkPreferencePane : SPPreferencePane <SPPreferencePaneProtocol>
{
	IBOutlet NSView *sshClientPickerView;
	IBOutlet NSTextField *sshClientPath;
	IBOutlet NSView *hiddenFileView;
	
@private
	NSAlert *_currentAlert;
	NSOpenPanel *_currentFilePanel;
}
- (IBAction)pickSSHClientViaFileBrowser:(id)sender;
- (IBAction)pickSSHClient:(id)sender;
@end

Source/SPNetworkPreferencePane.m

@@ -30,6 +30,10 @@

#import "SPNetworkPreferencePane.h"

@interface SPNetworkPreferencePane (Private)
- (void)updateHiddenFiles;
@end

@implementation SPNetworkPreferencePane

#pragma mark -
@@ -65,4 +69,66 @@ - (BOOL)preferencePaneAllowsResizing
	return NO;
}

- (void)observeValueForKeyPath:(NSString *)keyPath ofObject:(id)object change:(NSDictionary *)change context:(void *)context
{
	if([SPHiddenKeyFileVisibilityKey isEqualTo:keyPath]) {
		[self updateHiddenFiles];
	}
}

- (void)updateHiddenFiles
{
	[_currentFilePanel setShowsHiddenFiles:[prefs boolForKey:SPHiddenKeyFileVisibilityKey]];
}

- (IBAction)pickSSHClientViaFileBrowser:(id)sender
{
	_currentFilePanel = [NSOpenPanel openPanel];
	[_currentFilePanel setCanChooseFiles:YES];
	[_currentFilePanel setCanChooseDirectories:NO];
	[_currentFilePanel setAllowsMultipleSelection:NO];
	[_currentFilePanel setAccessoryView:hiddenFileView];
	[self updateHiddenFiles];
	
	[prefs addObserver:self
			forKeyPath:SPHiddenKeyFileVisibilityKey
	           options:NSKeyValueObservingOptionNew
			   context:NULL];
	
	[_currentFilePanel beginSheetModalForWindow:[_currentAlert window] completionHandler:^(NSInteger result) {
		if(result == NSFileHandlingPanelOKButton) [sshClientPath setStringValue:[[_currentFilePanel URL] path]];
		
		[prefs removeObserver:self forKeyPath:SPHiddenKeyFileVisibilityKey];
		
		_currentFilePanel = nil;
	}];
}

- (IBAction)pickSSHClient:(id)sender
{
	//take value from user defaults
	NSString *oldPath = [prefs stringForKey:SPSSHClientPath];
	if([oldPath length]) [sshClientPath setStringValue:oldPath];
	
	// set up dialog
	_currentAlert = [[NSAlert alloc] init]; //needs to be ivar so we can attach the OpenPanel later
	[_currentAlert setAccessoryView:sshClientPickerView];
	[_currentAlert setAlertStyle:NSWarningAlertStyle];
	[_currentAlert setMessageText:NSLocalizedString(@"Unsupported configuration!",@"Preferences : Network : Custom SSH client : warning dialog title")];
	[_currentAlert setInformativeText:NSLocalizedString(@"Sequel Pro only supports and is tested with the default OpenSSH client versions included with Mac OS X. Using different clients might cause connection issues, security risks or not work at all.\n\nPlease be aware, that we cannot provide support for such configurations.",@"Preferences : Network : Custom SSH client : warning dialog message")];
	[_currentAlert addButtonWithTitle:NSLocalizedString(@"OK",@"Preferences : Network : Custom SSH client : warning dialog : accept button")];
	[_currentAlert addButtonWithTitle:NSLocalizedString(@"Cancel",@"Preferences : Network : Custom SSH client : warning dialog : cancel button")];
	
	if([_currentAlert runModal] == NSAlertFirstButtonReturn) {
		//store new value to user defaults
		NSString *newPath = [sshClientPath stringValue];
		if(![newPath length])
			[prefs removeObjectForKey:SPSSHClientPath];
		else
			[prefs setObject:newPath forKey:SPSSHClientPath];
	}
	
	SPClear(_currentAlert);
}

@end

Source/SPSSHTunnel.m

@@ -309,7 +309,20 @@ - (void)launchTask:(id) dummy

	// Set up the NSTask
	task = [[NSTask alloc] init];
	[task setLaunchPath: @"/usr/bin/ssh"];
	NSString *launchPath = @"/usr/bin/ssh";
	NSString *userSSHPath = [[NSUserDefaults standardUserDefaults] stringForKey:SPSSHClientPath];

	if([userSSHPath length]) {
		launchPath = userSSHPath;
		// And I'm sure we will get issue reports about it anyway!
		[debugMessagesLock lock];
		[debugMessages addObject:@"################################################################"];
		[debugMessages addObject:[NSString stringWithFormat:@"# %@",NSLocalizedString(@"Custom SSH binary enabled. Disable in Preferences to rule out incompatibilities!", @"SSH connection : debug header with user-defined ssh binary")]];
		[debugMessages addObject:@"################################################################"];
		[debugMessagesLock unlock];
	}
	
	[task setLaunchPath:launchPath];

	// Prepare to set up the arguments for the task
	taskArguments = [[NSMutableArray alloc] init];
@@ -413,11 +426,20 @@ - (void)launchTask:(id) dummy
												object:[standardError fileHandleForReading]];
	[[standardError fileHandleForReading] waitForDataInBackgroundAndNotify];

	// Launch and run the tunnel
	[task launch];

	// Listen for output
	[task waitUntilExit];
	@try {
		// Launch and run the tunnel
		[task launch]; //throws for invalid paths, missing +x permission
		
		// Listen for output
		[task waitUntilExit];
	}
	@catch (NSException *e) {
		connectionState = SPMySQLProxyLaunchFailed;
		// Log the exception. Could be improved by showing a dedicated alert instead
		[debugMessagesLock lock];
		[debugMessages addObject:[NSString stringWithFormat:@"%@: %@\n", [e name], [e reason]]];
		[debugMessagesLock unlock];
	}

	// On tunnel close, clean up, ready for re-use if the delegate reconnects.
	SPClear(task);