Add gfortran 14.2 for R 4.5.z (#24)

* Add gfortran 14.2 for R 4.5.z

* Update version

Author: coatless

DESCRIPTION

@@ -1,6 +1,6 @@
 Package: macrtools
 Title: macOS Rtools package
-Version: 0.0.4.1
+Version: 0.0.6
 Authors@R: c(
     person(given = "James Joseph", 
            family = "Balamuta", 

NEWS.md

@@ -1,3 +1,10 @@
+# macrtools 0.0.6
+
+## Features
+
+- Updated to support R 4.5.0 on macOS.
+  - Downloads and sets up the latest version of gfortran 14.2
+
 # macrtools 0.0.5
 
 ## Features

R/assertions.R

@@ -80,11 +80,11 @@ assert_x86_64 <- function(call = caller_env()) {
 #' @export
 assert_r_version_supported <- function(call = caller_env()) {
     if (!(is_r_version("4.0") || is_r_version("4.1") || is_r_version("4.2") ||
-          is_r_version("4.3") || is_r_version("4.4"))) {
+          is_r_version("4.3") || is_r_version("4.4") || is_r_version("4.5"))) {
         version_number <- base::paste(base::R.version$major, base::R.version$minor, sep = ".")
         cli::cli_abort(c(
             "{.pkg macrtools}: The installed R version {.val {version_number}} is not supported.",
-            "{.pkg macrtools}: Supported versions: R 4.0.x through R 4.4.x."
+            "{.pkg macrtools}: Supported versions: R 4.0.x through R 4.5.x."
         ),
         call = call,
         advice = "Please upgrade or downgrade your R installation to a supported version.")

R/gfortran.R

@@ -52,9 +52,34 @@ gfortran_version <- function() {
 #' appropriate location for **Intel** (`x86_64`) or **M-series** (`arm64`/`aarch64`)
 #' depending on the R version used.
 #'
-#' ### gfortran Installation for R 4.3
+#' ### gfortran Installation for R 4.5
 #'
-#' The `gfortran` installer for R 4.3 is a universal installer that places
+#' The `gfortran` installer for R 4.5 is a universal installer that places
+#' `gfortran` into the `/opt/gfortran` for both **Intel** (`x86_64`) and
+#' **M-series** (`arm64`/`aarch64`) macs.
+#'
+#' ```sh
+#' # Install the downloaded package into root
+#' sudo installer \
+#'   -pkg /path/to/gfortran-14.2-universal.pkg \
+#'   -target /
+#' ```
+#'
+#' Once installed, we modify the `PATH` environment variable to recognize the newly
+#' installed software by adding into the `~/.Renviron` file the following:
+#'
+#' ```sh
+#' touch ~/.Renviron
+#' cat << "EOF" > ~./Renviron
+#' ## macrtools - gfortran: start
+#' PATH=${PATH}:/opt/gfortran/bin
+#' ## macrtools - gfortran: end
+#' EOF
+#' ```
+#'
+#' ### gfortran Installation for R 4.3-4.4
+#'
+#' The `gfortran` installer for R 4.3-4.4 is a universal installer that places
 #' `gfortran` into the `/opt/gfortran` for both **Intel** (`x86_64`) and
 #' **M-series** (`arm64`/`aarch64`) macs.
 #'
@@ -205,7 +230,11 @@ gfortran_install <- function(password = base::getOption("macrtools.password"), v
 
     gfortran_status <- FALSE
 
-    if(is_r_version("4.3") || is_r_version("4.4")) {
+    if(is_r_version("4.5")) {
+        gfortran_status <- install_gfortran_14_2_universal(
+            password = entered_password_gfortran,
+            verbose = verbose)
+    } else if(is_r_version("4.3") || is_r_version("4.4")) {
         gfortran_status <- install_gfortran_12_2_universal(
             password = entered_password_gfortran,
             verbose = verbose)
@@ -390,7 +419,7 @@ gfortran_update <- function(password = base::getOption("macrtools.password"), ve
     assert_mac()
     assert_aarch64()
     assert(is_gfortran_installed(), "gfortran must be installed")
-    assert(is_r_version("4.2") || is_r_version("4.3") || is_r_version("4.4"),
+    assert(is_r_version("4.2") || is_r_version("4.3") || is_r_version("4.4") || is_r_version("4.5"),
            "R 4.2 or above is required for gfortran update")
 
     # Figure out installation directory
@@ -541,10 +570,35 @@ install_gfortran_11_arm <- function(password = base::getOption("macrtools.passwo
 }
 
 
+#' Install gfortran v14.2 universal binaries
+#'
+#' @details
+#' Installs the `gfortran` v14.2 binaries for R version 4.5 for both
+#' Intel and ARM-based macs.
+#'
+#' @noRd
+install_gfortran_14_2_universal <- function(
+        password = base::getOption("macrtools.password"),
+        verbose = TRUE) {
+
+    # URL for gfortran 14.2 universal installer for R 4.5
+    gfortran_14_universal <- "https://github.com/R-macos/gcc-14-branch/releases/download/gcc-14.2-darwin-r2.1/gfortran-14.2-universal.pkg"
+
+    # Download pkg
+    path_to_pkg <- binary_download(gfortran_14_universal, verbose = verbose)
+
+    # Install pkg into the appropriate location
+    pkg_install(path_to_pkg,
+                "/",
+                password = password,
+                verbose = verbose)
+}
+
+
 #' Install gfortran v12.2 universal binaries
 #'
 #' @details
-#' Installs the `gfortran` v12.2 binaries for R version 4.3 for both
+#' Installs the `gfortran` v12.2 binaries for R version 4.3-4.4 for both
 #' Intel and ARM-based macs.
 #'
 #' @noRd

R/installers.R

@@ -11,7 +11,7 @@ install_strip_level <- function(arch = system_arch()) {
 }
 
 recipe_binary_install_strip_level <- function(arch = system_arch()) {
-    if (is_r_version("4.3") || is_r_version("4.4")) {
+    if (is_r_version("4.3") || is_r_version("4.4") || is_r_version("4.5")) {
         base::switch(
             arch,
             "arm64" = 3,
@@ -22,7 +22,7 @@ recipe_binary_install_strip_level <- function(arch = system_arch()) {
     } else if (is_r_version("4.0") || is_r_version("4.1") || is_r_version("4.2")) {
         install_strip_level()
     } else {
-        cli::cli_abort("{.pkg macrtools}: Unsupported R version. We only support recipe binary installation for R 4.0.x through 4.4.x.")
+        cli::cli_abort("{.pkg macrtools}: Unsupported R version. We only support recipe binary installation for R 4.0.x through 4.5.x.")
     }
 }
 
@@ -37,7 +37,7 @@ install_location <- function(arch = system_arch()) {
 }
 
 recipe_binary_install_location <- function(arch = system_arch()) {
-    if (is_r_version("4.3") || is_r_version("4.4")) {
+    if (is_r_version("4.3") || is_r_version("4.4") || is_r_version("4.5")) {
         base::switch(
             arch,
             "arm64" = install_directory_arm64(),
@@ -48,17 +48,17 @@ recipe_binary_install_location <- function(arch = system_arch()) {
     } else if (is_r_version("4.0") || is_r_version("4.1") || is_r_version("4.2")) {
         install_location()
     } else {
-        cli::cli_abort("{.pkg macrtools}: Unsupported R version. We only support recipe binary installation for R 4.0.x through 4.4.x.")
+        cli::cli_abort("{.pkg macrtools}: Unsupported R version. We only support recipe binary installation for R 4.0.x through 4.5.x.")
     }
 }
 
 gfortran_install_location <- function(arch = system_arch()) {
-    if (is_r_version("4.3") || is_r_version("4.4")) {
+    if (is_r_version("4.3") || is_r_version("4.4") || is_r_version("4.5")) {
         "/opt"
     } else if (is_r_version("4.0") || is_r_version("4.1") || is_r_version("4.2")) {
         install_location()
     } else {
-        cli::cli_abort("{.pkg macrtools}: Unsupported R version. We only support gfortran installation for R 4.0.x through 4.4.x.")
+        cli::cli_abort("{.pkg macrtools}: Unsupported R version. We only support gfortran installation for R 4.0.x through 4.5.x.")
     }
 }