support for downloading and installing .pkg on macOS

Author: yihui

DESCRIPTION

@@ -1,7 +1,7 @@
 Type: Package
 Package: blogdown
 Title: Create Blogs and Websites with R Markdown
-Version: 1.22.1
+Version: 1.22.2
 Authors@R: c(
     person("Yihui", "Xie", role = c("aut", "cre"), email = "xie@yihui.name", comment = c(ORCID = "0000-0003-0645-5666")),
     person("Christophe", "Dervieux", role = "aut", email = "cderv@posit.co", comment = c(ORCID = "0000-0003-4474-2498")),

NEWS.md

@@ -1,5 +1,7 @@
 # CHANGES IN blogdown VERSION 1.23
 
+- Added support for installing Hugo's `*.pkg` installers on macOS. Hugo has changed the installer from a tarball (containing the `hugo` binary) to `.pkg` since v0.153.0. Please note that installing `.pkg` requires password input, so this cannot be automated on macOS that requires password for `sudo` commands.
+
 - `hugo_installers()` can deal with Hugo installers containing the `withdeploy` feature for Hugo >= v0.137.0 now.
 
 # CHANGES IN blogdown VERSION 1.22

R/install.R

@@ -64,7 +64,7 @@ install_hugo = function(
     message('The latest Hugo version is ', version)
   } else {
     if (!is.null(local_file)) version = gsub(
-      '^hugo(_extended)?_([0-9.]+)_.*', '\\2', basename(local_file)
+      '^hugo(_extended)(_withdeploy)?_([0-9.]+)_.*', '\\2', basename(local_file)
     )
   }
 
@@ -138,6 +138,14 @@ install_hugo = function(
       files = utils::untar(zipfile, list = TRUE)
       utils::untar(zipfile)
       files
+    }, pkg = {
+      if (interactive()) system2('open', shQuote(zipfile)) else {
+        if (system2('sudo', c('installer', '-pkg', zipfile, '-target', '/')) != 0) stop(
+          'The *.pkg installer requires password input. Please run this function ',
+          'in the terminal or in an interactive R session and input password.'
+        )
+      }
+      NULL
     })
   }
 
@@ -146,11 +154,13 @@ install_hugo = function(
   } else if (is_macos()) {
     download_zip(
       if (v103) 'darwin' else if (version2 >= '0.18') 'macOS' else 'MacOS',
-      if (version2 >= '0.20.3') 'tar.gz' else 'zip'
+      if (version2 >= '0.153.0') 'pkg' else if (version2 >= '0.20.3') 'tar.gz' else 'zip'
     )
   } else {
     download_zip('Linux', 'tar.gz')  # _might_ be Linux; good luck
   }
+  # can't tell if .pkg was successfully installed at this point
+  if (is.null(files)) return(invisible(NULL))
   # from a certain version of Hugo, the executable is no longer named
   # hugo_x.y.z, so exec could be NA here, but file.rename(NA_character) is fine
   exec = files[grep(sprintf('^hugo_%s.+', version), basename(files))][1]