Compare commits
10 Commits
| Author | SHA1 | Date |
|---|---|---|
 boB Rudis
|
41e68c4b3f | 4 years ago |
|
boB Rudis
|
1deb3339f7 | 4 years ago |
|
boB Rudis
|
e5fd9a5dd4 | 4 years ago |
|
boB Rudis
|
b89c16dfb0 | 4 years ago |
|
boB Rudis
|
bb9e9d1d0c | 4 years ago |
|
boB Rudis
|
9d457eef71 | 4 years ago |
|
boB Rudis
|
a24acd1c0c | 4 years ago |
|
boB Rudis
|
60e9c18b7b | 4 years ago |
|
boB Rudis
|
6ba016004a | 4 years ago |
|
boB Rudis
|
a29dcb8304 | 5 years ago |
46 changed files with 1131 additions and 112 deletions
@ -0,0 +1,11 @@ |
|||||
|
CODE_SIGN_IDENTITY = |
||||
|
CONFIGURATION_BUILD_DIR = ${PODS_CONFIGURATION_BUILD_DIR}/Just |
||||
|
GCC_PREPROCESSOR_DEFINITIONS = $(inherited) COCOAPODS=1 |
||||
|
OTHER_SWIFT_FLAGS = $(inherited) -D COCOAPODS |
||||
|
PODS_BUILD_DIR = ${BUILD_DIR} |
||||
|
PODS_CONFIGURATION_BUILD_DIR = ${PODS_BUILD_DIR}/$(CONFIGURATION)$(EFFECTIVE_PLATFORM_NAME) |
||||
|
PODS_ROOT = ${SRCROOT} |
||||
|
PODS_TARGET_SRCROOT = ${PODS_ROOT}/Just |
||||
|
PRODUCT_BUNDLE_IDENTIFIER = org.cocoapods.${PRODUCT_NAME:rfc1034identifier} |
||||
|
SKIP_INSTALL = YES |
||||
|
USE_RECURSIVE_SCRIPT_INPUTS_IN_SCRIPT_PHASES = YES |
||||
@ -0,0 +1,11 @@ |
|||||
|
CODE_SIGN_IDENTITY = |
||||
|
CONFIGURATION_BUILD_DIR = ${PODS_CONFIGURATION_BUILD_DIR}/Just |
||||
|
GCC_PREPROCESSOR_DEFINITIONS = $(inherited) COCOAPODS=1 |
||||
|
OTHER_SWIFT_FLAGS = $(inherited) -D COCOAPODS |
||||
|
PODS_BUILD_DIR = ${BUILD_DIR} |
||||
|
PODS_CONFIGURATION_BUILD_DIR = ${PODS_BUILD_DIR}/$(CONFIGURATION)$(EFFECTIVE_PLATFORM_NAME) |
||||
|
PODS_ROOT = ${SRCROOT} |
||||
|
PODS_TARGET_SRCROOT = ${PODS_ROOT}/Just |
||||
|
PRODUCT_BUNDLE_IDENTIFIER = org.cocoapods.${PRODUCT_NAME:rfc1034identifier} |
||||
|
SKIP_INSTALL = YES |
||||
|
USE_RECURSIVE_SCRIPT_INPUTS_IN_SCRIPT_PHASES = YES |
||||
@ -0,0 +1,78 @@ |
|||||
|
<?xml version="1.0" encoding="UTF-8"?> |
||||
|
<Scheme |
||||
|
LastUpgradeVersion = "1150" |
||||
|
version = "1.3"> |
||||
|
<BuildAction |
||||
|
parallelizeBuildables = "YES" |
||||
|
buildImplicitDependencies = "YES"> |
||||
|
<BuildActionEntries> |
||||
|
<BuildActionEntry |
||||
|
buildForTesting = "YES" |
||||
|
buildForRunning = "YES" |
||||
|
buildForProfiling = "YES" |
||||
|
buildForArchiving = "YES" |
||||
|
buildForAnalyzing = "YES"> |
||||
|
<BuildableReference |
||||
|
BuildableIdentifier = "primary" |
||||
|
BlueprintIdentifier = "01F3EF07230E635300DF5DF9" |
||||
|
BuildableName = "RSwitch.app" |
||||
|
BlueprintName = "RSwitch" |
||||
|
ReferencedContainer = "container:RSwitch.xcodeproj"> |
||||
|
</BuildableReference> |
||||
|
</BuildActionEntry> |
||||
|
</BuildActionEntries> |
||||
|
</BuildAction> |
||||
|
<TestAction |
||||
|
buildConfiguration = "Debug" |
||||
|
selectedDebuggerIdentifier = "Xcode.DebuggerFoundation.Debugger.LLDB" |
||||
|
selectedLauncherIdentifier = "Xcode.DebuggerFoundation.Launcher.LLDB" |
||||
|
shouldUseLaunchSchemeArgsEnv = "YES"> |
||||
|
<Testables> |
||||
|
</Testables> |
||||
|
</TestAction> |
||||
|
<LaunchAction |
||||
|
buildConfiguration = "Debug" |
||||
|
selectedDebuggerIdentifier = "Xcode.DebuggerFoundation.Debugger.LLDB" |
||||
|
selectedLauncherIdentifier = "Xcode.DebuggerFoundation.Launcher.LLDB" |
||||
|
launchStyle = "0" |
||||
|
useCustomWorkingDirectory = "NO" |
||||
|
ignoresPersistentStateOnLaunch = "NO" |
||||
|
debugDocumentVersioning = "YES" |
||||
|
debugServiceExtension = "internal" |
||||
|
allowLocationSimulation = "YES"> |
||||
|
<BuildableProductRunnable |
||||
|
runnableDebuggingMode = "0"> |
||||
|
<BuildableReference |
||||
|
BuildableIdentifier = "primary" |
||||
|
BlueprintIdentifier = "01F3EF07230E635300DF5DF9" |
||||
|
BuildableName = "RSwitch.app" |
||||
|
BlueprintName = "RSwitch" |
||||
|
ReferencedContainer = "container:RSwitch.xcodeproj"> |
||||
|
</BuildableReference> |
||||
|
</BuildableProductRunnable> |
||||
|
</LaunchAction> |
||||
|
<ProfileAction |
||||
|
buildConfiguration = "Release" |
||||
|
shouldUseLaunchSchemeArgsEnv = "YES" |
||||
|
savedToolIdentifier = "" |
||||
|
useCustomWorkingDirectory = "NO" |
||||
|
debugDocumentVersioning = "YES"> |
||||
|
<BuildableProductRunnable |
||||
|
runnableDebuggingMode = "0"> |
||||
|
<BuildableReference |
||||
|
BuildableIdentifier = "primary" |
||||
|
BlueprintIdentifier = "01F3EF07230E635300DF5DF9" |
||||
|
BuildableName = "RSwitch.app" |
||||
|
BlueprintName = "RSwitch" |
||||
|
ReferencedContainer = "container:RSwitch.xcodeproj"> |
||||
|
</BuildableReference> |
||||
|
</BuildableProductRunnable> |
||||
|
</ProfileAction> |
||||
|
<AnalyzeAction |
||||
|
buildConfiguration = "Debug"> |
||||
|
</AnalyzeAction> |
||||
|
<ArchiveAction |
||||
|
buildConfiguration = "Release" |
||||
|
revealArchiveInOrganizer = "YES"> |
||||
|
</ArchiveAction> |
||||
|
</Scheme> |
||||
@ -0,0 +1,16 @@ |
|||||
|
{ |
||||
|
"object": { |
||||
|
"pins": [ |
||||
|
{ |
||||
|
"package": "swift-argument-parser", |
||||
|
"repositoryURL": "git@github.com:apple/swift-argument-parser.git", |
||||
|
"state": { |
||||
|
"branch": "master", |
||||
|
"revision": "1081d08b1d716e6a68a9cbc258bb309359fbae1e", |
||||
|
"version": null |
||||
|
} |
||||
|
} |
||||
|
] |
||||
|
}, |
||||
|
"version": 1 |
||||
|
} |
||||
Binary file not shown.
@ -0,0 +1,57 @@ |
|||||
|
// |
||||
|
// DownloadFromRStudioServer.swift |
||||
|
// RSwitch |
||||
|
// |
||||
|
// Created by hrbrmstr on 8/24/19. |
||||
|
// Copyright © 2019 Bob Rudis. All rights reserved. |
||||
|
// |
||||
|
|
||||
|
import Foundation |
||||
|
import Cocoa |
||||
|
|
||||
|
func download_from_studio_server(fromRS : String, toFS : String) { |
||||
|
|
||||
|
let rsURL = URL(string: fromRS)! |
||||
|
let fsURL = URL(string: toFS)! |
||||
|
|
||||
|
URLSession.shared.configuration.timeoutIntervalForRequest = 300.0 |
||||
|
|
||||
|
|
||||
|
let task = URLSession.shared.downloadTask(with: rsURL) { |
||||
|
localURL, urlResponse, error in |
||||
|
|
||||
|
if (error != nil) { |
||||
|
|
||||
|
NSLog("Error exporting from RStudio Server; \(String(describing: error))") |
||||
|
|
||||
|
} else { |
||||
|
|
||||
|
if let localURL = localURL { |
||||
|
|
||||
|
if (FileManager.default.fileExists(atPath: fsURL.path)) { |
||||
|
|
||||
|
do { |
||||
|
try FileManager.default.removeItem(at: fsURL) |
||||
|
} catch { |
||||
|
NSLog("Error removing file during RStudio Server export; \(error)") |
||||
|
} |
||||
|
|
||||
|
} |
||||
|
|
||||
|
do { |
||||
|
try FileManager.default.moveItem(at: localURL, to: fsURL) |
||||
|
NSWorkspace.shared.openFile(fsURL.deletingLastPathComponent().absoluteString, withApplication: "Finder") |
||||
|
NSWorkspace.shared.activateFileViewerSelecting([fsURL]) |
||||
|
} catch { |
||||
|
NSLog("Error moving RStudio Server export file; \(error)") |
||||
|
} |
||||
|
|
||||
|
} |
||||
|
|
||||
|
} |
||||
|
|
||||
|
} |
||||
|
|
||||
|
task.resume() |
||||
|
} |
||||
|
|
||||
@ -0,0 +1,22 @@ |
|||||
|
// |
||||
|
// ExportWebViewController.swift |
||||
|
// RSwitch |
||||
|
// |
||||
|
// Created by hrbrmstr on 5/24/20. |
||||
|
// Copyright © 2020 Bob Rudis. All rights reserved. |
||||
|
// |
||||
|
|
||||
|
import Cocoa |
||||
|
|
||||
|
class ExportWebViewController: NSWindowController { |
||||
|
|
||||
|
override func windowDidLoad() { |
||||
|
|
||||
|
shouldCascadeWindows = false |
||||
|
window?.setFrameAutosaveName(window!.title) |
||||
|
|
||||
|
super.windowDidLoad() |
||||
|
|
||||
|
} |
||||
|
|
||||
|
} |
||||
@ -0,0 +1,41 @@ |
|||||
|
// |
||||
|
// Associations.swift |
||||
|
// RSwitch |
||||
|
// |
||||
|
// Created by hrbrmstr on 2/11/20. |
||||
|
// Copyright © 2020 Bob Rudis. All rights reserved. |
||||
|
// |
||||
|
|
||||
|
import Foundation |
||||
|
import AppKit |
||||
|
import ApplicationServices |
||||
|
|
||||
|
class FileAssociationUtils { |
||||
|
|
||||
|
// public static func getHandlers() { |
||||
|
// |
||||
|
// let workspace = NSWorkspace.shared; |
||||
|
// |
||||
|
// let setResR : String = UTTypeCreatePreferredIdentifierForTag(kUTTagClassFilenameExtension, "R" as CFString, nil)?.takeRetainedValue() as String? ?? ""; |
||||
|
// let handlerR : String = LSCopyDefaultRoleHandlerForContentType(setResR as CFString, LSRolesMask.all)?.takeRetainedValue() as String? ?? ""; |
||||
|
// let rAppUrl : URL = (workspace.urlForApplication(withBundleIdentifier: handlerR))!.appendingPathComponent("Contents/Info.plist"); |
||||
|
// let rAppDict : NSDictionary = NSDictionary(contentsOf: rAppUrl)!; |
||||
|
// let setResRmd : String = UTTypeCreatePreferredIdentifierForTag(kUTTagClassFilenameExtension, "Rmd" as CFString, nil)?.takeRetainedValue() as String? ?? ""; |
||||
|
// let handlerRmd : String = LSCopyDefaultRoleHandlerForContentType(setResRmd as CFString, LSRolesMask.all)?.takeRetainedValue() as String? ?? ""; |
||||
|
// let rmdAppUrl : URL = (workspace.urlForApplication(withBundleIdentifier: handlerRmd))!.appendingPathComponent("Contents/Info.plist"); |
||||
|
// let rmdAppDict : NSDictionary = NSDictionary(contentsOf: rmdAppUrl)!; |
||||
|
// } |
||||
|
|
||||
|
public static func setHandlers() { |
||||
|
|
||||
|
let setResR : String = UTTypeCreatePreferredIdentifierForTag(kUTTagClassFilenameExtension, "R" as CFString, nil)?.takeRetainedValue() as String? ?? ""; |
||||
|
|
||||
|
LSSetDefaultRoleHandlerForContentType(setResR as CFString, LSRolesMask.all, "org.rstudio.RStudio" as CFString); |
||||
|
|
||||
|
let setResRmd : String = UTTypeCreatePreferredIdentifierForTag(kUTTagClassFilenameExtension, "Rmd" as CFString, nil)?.takeRetainedValue() as String? ?? ""; |
||||
|
|
||||
|
LSSetDefaultRoleHandlerForContentType(setResRmd as CFString, LSRolesMask.all, "org.rstudio.RStudio" as CFString); |
||||
|
|
||||
|
} |
||||
|
|
||||
|
} |
||||
@ -0,0 +1,51 @@ |
|||||
|
// |
||||
|
// Reachable.swift |
||||
|
// RSwitch |
||||
|
// |
||||
|
// Created by hrbrmstr on 2/11/20. |
||||
|
// Copyright © 2020 Bob Rudis. All rights reserved. |
||||
|
// |
||||
|
|
||||
|
import Foundation |
||||
|
import SystemConfiguration |
||||
|
|
||||
|
protocol Utilities {} |
||||
|
extension NSObject: Utilities { |
||||
|
enum ReachabilityStatus { |
||||
|
case notReachable |
||||
|
case reachableViaWWAN |
||||
|
case reachableViaWiFi |
||||
|
} |
||||
|
|
||||
|
var currentReachabilityStatus: ReachabilityStatus { |
||||
|
|
||||
|
var zeroAddress = sockaddr_in() |
||||
|
zeroAddress.sin_len = UInt8(MemoryLayout<sockaddr_in>.size) |
||||
|
zeroAddress.sin_family = sa_family_t(AF_INET) |
||||
|
guard let defaultRouteReachability = withUnsafePointer(to: &zeroAddress, { |
||||
|
$0.withMemoryRebound(to: sockaddr.self, capacity: 1) { |
||||
|
SCNetworkReachabilityCreateWithAddress(nil, $0) |
||||
|
} |
||||
|
}) else { |
||||
|
return .notReachable |
||||
|
} |
||||
|
|
||||
|
var flags: SCNetworkReachabilityFlags = [] |
||||
|
if !SCNetworkReachabilityGetFlags(defaultRouteReachability, &flags) { |
||||
|
return .notReachable |
||||
|
} |
||||
|
|
||||
|
if flags.contains(.reachable) == false { |
||||
|
// The target host is not reachable. |
||||
|
return .notReachable |
||||
|
} else if flags.contains(.connectionRequired) == false { |
||||
|
// If the target host is reachable and no connection is required then we'll assume that you're on Wi-Fi... |
||||
|
return .reachableViaWiFi |
||||
|
} else if (flags.contains(.connectionOnDemand) == true || flags.contains(.connectionOnTraffic) == true) && flags.contains(.interventionRequired) == false { |
||||
|
// The connection is on-demand (or on-traffic) if the calling application is using the CFSocketStream or higher APIs and no [user] intervention is needed |
||||
|
return .reachableViaWiFi |
||||
|
} else { |
||||
|
return .notReachable |
||||
|
} |
||||
|
} |
||||
|
} |
||||
@ -0,0 +1,25 @@ |
|||||
|
// |
||||
|
// urls.swift |
||||
|
// RSwitch |
||||
|
// |
||||
|
// Created by hrbrmstr on 5/24/20. |
||||
|
// Copyright © 2020 Bob Rudis. All rights reserved. |
||||
|
// |
||||
|
|
||||
|
import Foundation |
||||
|
import Cocoa |
||||
|
import WebKit |
||||
|
|
||||
|
extension URL { |
||||
|
var queryParameters: QueryParameters { return QueryParameters(url: self) } |
||||
|
} |
||||
|
|
||||
|
class QueryParameters { |
||||
|
let queryItems: [URLQueryItem] |
||||
|
init(url: URL?) { |
||||
|
queryItems = URLComponents(string: url?.absoluteString ?? "")?.queryItems ?? [] |
||||
|
} |
||||
|
subscript(name: String) -> String? { |
||||
|
return queryItems.first(where: { $0.name == name })?.value |
||||
|
} |
||||
|
} |
||||
@ -0,0 +1,84 @@ |
|||||
|
// |
||||
|
// exportPopupViewController.swift |
||||
|
// RSwitch |
||||
|
// |
||||
|
// Created by hrbrmstr on 5/24/20. |
||||
|
// Copyright © 2020 Bob Rudis. All rights reserved. |
||||
|
// |
||||
|
|
||||
|
import Cocoa |
||||
|
import WebKit |
||||
|
|
||||
|
// EXPORT |
||||
|
|
||||
|
class exportPopupViewController: NSViewController { |
||||
|
|
||||
|
var webView: WKWebView! |
||||
|
var urlPath: String = "" |
||||
|
|
||||
|
open override func viewDidLoad() { |
||||
|
super.viewDidLoad() |
||||
|
} |
||||
|
|
||||
|
func setupWebView(configuration: WKWebViewConfiguration) { |
||||
|
|
||||
|
webView = WKWebView(frame: view.bounds, configuration: configuration) |
||||
|
webView.autoresizingMask = [.width, .height] |
||||
|
webView.uiDelegate = self |
||||
|
webView.navigationDelegate = self |
||||
|
|
||||
|
view.addSubview(webView) |
||||
|
|
||||
|
} |
||||
|
|
||||
|
func loadWebView(urlIn: String) { |
||||
|
|
||||
|
// urlPath = urlIn |
||||
|
// |
||||
|
// // Check for "/export/" |
||||
|
// // If export, then get bring up a Save Panel and then download the file to that location |
||||
|
// |
||||
|
// if let url = URL(string: urlPath) { |
||||
|
// |
||||
|
// if (url.path.starts(with: "/export")) { |
||||
|
// |
||||
|
// let savePanel = NSSavePanel() |
||||
|
// |
||||
|
// savePanel.canCreateDirectories = true |
||||
|
// savePanel.nameFieldStringValue = url.queryParameters["name"]! |
||||
|
// savePanel.beginSheetModal(for:self.view.window!) { (response) in |
||||
|
// if (response == NSApplication.ModalResponse.OK) { |
||||
|
// download_from_studio_server(fromRS: url.absoluteString, toFS: savePanel.url!.absoluteString) |
||||
|
// } |
||||
|
// savePanel.close() |
||||
|
// } |
||||
|
// |
||||
|
// } |
||||
|
// |
||||
|
// } |
||||
|
|
||||
|
} |
||||
|
|
||||
|
override func viewDidAppear() { |
||||
|
super.viewDidAppear() |
||||
|
} |
||||
|
|
||||
|
} |
||||
|
|
||||
|
extension exportPopupViewController: WKUIDelegate { |
||||
|
|
||||
|
func webViewDidClose(_ webView: WKWebView) { |
||||
|
self.view.window?.close() |
||||
|
} |
||||
|
|
||||
|
|
||||
|
} |
||||
|
|
||||
|
extension exportPopupViewController: WKNavigationDelegate { |
||||
|
|
||||
|
open func webView(_ webView: WKWebView, didStartProvisionalNavigation navigation: WKNavigation!) { } |
||||
|
|
||||
|
func webView(_ webView: WKWebView, didFinish navigation: WKNavigation!) { } |
||||
|
|
||||
|
} |
||||
|
|
||||
|
Before Width: | Height: | Size: 204 KiB After Width: | Height: | Size: 346 KiB |
|
After Width: | Height: | Size: 354 KiB |
@ -0,0 +1,12 @@ |
|||||
|
// Pandoc 2.9 adds attributes on both header and div. We remove the former (to
|
||||
|
// be compatible with the behavior of Pandoc < 2.8).
|
||||
|
document.addEventListener('DOMContentLoaded', function(e) { |
||||
|
var hs = document.querySelectorAll("div.section[class*='level'] > :first-child"); |
||||
|
var i, h, a; |
||||
|
for (i = 0; i < hs.length; i++) { |
||||
|
h = hs[i]; |
||||
|
if (!/^h[1-6]$/i.test(h.tagName)) continue; // it should be a header h1-h6
|
||||
|
a = h.attributes; |
||||
|
while (a.length > 0) h.removeAttribute(a[0].name); |
||||
|
} |
||||
|
}); |
||||
|
After Width: | Height: | Size: 693 KiB |
|
Before Width: | Height: | Size: 204 KiB After Width: | Height: | Size: 346 KiB |
|
Before Width: | Height: | Size: 355 KiB |
|
Before Width: | Height: | Size: 690 KiB |
|
After Width: | Height: | Size: 354 KiB |
|
After Width: | Height: | Size: 693 KiB |
Binary file not shown.
Binary file not shown.
@ -0,0 +1,22 @@ |
|||||
|
<?xml version="1.0" encoding="UTF-8"?> |
||||
|
<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd"> |
||||
|
<plist version="1.0"> |
||||
|
<dict> |
||||
|
<key>CFBundleDevelopmentRegion</key> |
||||
|
<string>English</string> |
||||
|
<key>CFBundleExecutable</key> |
||||
|
<string></string> |
||||
|
<key>CFBundleIdentifier</key> |
||||
|
<string>is.rud.rswitch-cmd</string> |
||||
|
<key>CFBundleInfoDictionaryVersion</key> |
||||
|
<string>6.0</string> |
||||
|
<key>CFBundleName</key> |
||||
|
<string>rswitch-cmd</string> |
||||
|
<key>CFBundleShortVersionString</key> |
||||
|
<string>$(MARKETING_VERSION)</string> |
||||
|
<key>CFBundleVersion</key> |
||||
|
<string>$(CURRENT_PROJECT_VERSION)</string> |
||||
|
<key>NSHumanReadableCopyright</key> |
||||
|
<string>Copyright © 2020 Bob Rudis. All rights reserved. MIT Licensed</string> |
||||
|
</dict> |
||||
|
</plist> |
||||
@ -0,0 +1,91 @@ |
|||||
|
// |
||||
|
// main.swift |
||||
|
// rswitch-cmd |
||||
|
// |
||||
|
// Created by boB Rudis on 4/25/20. |
||||
|
// Copyright © 2020 Bob Rudis. All rights reserved. |
||||
|
// |
||||
|
|
||||
|
import Foundation |
||||
|
import ArgumentParser |
||||
|
|
||||
|
final class StandardErrorOutputStream: TextOutputStream { |
||||
|
func write(_ string: String) { |
||||
|
FileHandle.standardError.write(Data(string.utf8)) |
||||
|
} |
||||
|
} |
||||
|
|
||||
|
struct RSwitch: ParsableCommand { |
||||
|
|
||||
|
static var configuration = CommandConfiguration( |
||||
|
abstract: "Switch R versions.", |
||||
|
version: "1.0.0" |
||||
|
) |
||||
|
|
||||
|
@Flag(name: .shortAndLong, help: "List R versions.") |
||||
|
var list: Bool |
||||
|
|
||||
|
@Argument(help: "The R version to switch to.") |
||||
|
var rversion: String? |
||||
|
|
||||
|
func run() throws { |
||||
|
|
||||
|
var outputStream = StandardErrorOutputStream() |
||||
|
|
||||
|
let targetPath = RVersions.currentVersionTarget() |
||||
|
let versions = try RVersions.reloadVersions() |
||||
|
|
||||
|
if (list || (rversion == nil)) { |
||||
|
|
||||
|
for version in versions { |
||||
|
let complete = RVersions.hasRBinary(versionPath: version) |
||||
|
var v = version |
||||
|
if (version == targetPath) { v = v + " *" } |
||||
|
if (!complete) { v = version + " (incomplete)" } |
||||
|
print(v) |
||||
|
} |
||||
|
|
||||
|
} else { |
||||
|
|
||||
|
if (!versions.contains(rversion!)) { |
||||
|
print("R version " + rversion! + " not found.", to: &outputStream) |
||||
|
Darwin.exit(3) |
||||
|
} else { |
||||
|
if (rversion! == targetPath) { |
||||
|
print("Current R version already points to " + targetPath) |
||||
|
} else { |
||||
|
|
||||
|
let fm = FileManager.default |
||||
|
let rm_link = (RVersions.macos_r_framework as NSString).appendingPathComponent("Current") |
||||
|
let new_link = (RVersions.macos_r_framework as NSString).appendingPathComponent(rversion!) |
||||
|
|
||||
|
do { |
||||
|
try fm.removeItem(atPath: rm_link) |
||||
|
} catch { |
||||
|
print("Failed to remove existing R version symlink. Check file/directory permissions.", to: &outputStream) |
||||
|
Darwin.exit(1) |
||||
|
} |
||||
|
|
||||
|
do { |
||||
|
try fm.createSymbolicLink( |
||||
|
at: NSURL(fileURLWithPath: rm_link) as URL, |
||||
|
withDestinationURL: NSURL(fileURLWithPath: new_link) as URL |
||||
|
) |
||||
|
} catch { |
||||
|
print("Failed to create a symlink to the chosen R version. Check file/directory permissions.", to: &outputStream) |
||||
|
Darwin.exit(2) |
||||
|
} |
||||
|
|
||||
|
Darwin.exit(0) |
||||
|
|
||||
|
} |
||||
|
} |
||||
|
|
||||
|
} |
||||
|
|
||||
|
} |
||||
|
|
||||
|
} |
||||
|
|
||||
|
RSwitch.main() |
||||
|
|
||||
Loading…
Reference in new issue