Add sysreqs_fix_installed()

DESCRIPTION

@@ -38,7 +38,7 @@ Suggests:
     jsonlite (>= 1.8.0),
     pkgbuild (>= 1.4.1.9000),
     pkgcache (>= 2.0.4),
-    pkgdepends (>= 0.4.0),
+    pkgdepends (>= 0.5.0.9001),
     pkgsearch (>= 3.1.0),
     prettyunits,
     processx (>= 3.8.1),

NAMESPACE

@@ -63,6 +63,7 @@ export(sysreqs_check_installed)
 export(sysreqs_db_list)
 export(sysreqs_db_match)
 export(sysreqs_db_update)
+export(sysreqs_fix_installed)
 export(sysreqs_is_supported)
 export(sysreqs_list_system_packages)
 export(sysreqs_platforms)

R/sysreqs.R

@@ -53,6 +53,18 @@ sysreqs_check_installed <- function(packages = NULL,
   )
 }
 
+sysreqs_fix_installed <- function(packages = NULL,
+                                    library = .libPaths()[1]) {
+  load_extra("pillar")
+  remote(
+    function(...) {
+      ret <- pkgdepends::sysreqs_fix_installed(...)
+      asNamespace("pak")$pak_preformat(ret)
+    },
+    list(packages = packages, library = library)
+  )
+}
+
 #' Calculate system requirements of one of more packages
 #'
 #' @inheritParams pkg_install

R/sysreqsdocs.R

@@ -131,9 +131,16 @@ sysreqs_db_update
 #'
 #' @usage
 #' sysreqs_check_installed(packages = NULL, library = .libPaths()[1])
+#' sysreqs_fix_installed(packages = NULL, library = .libPaths()[1])
+#'
+#' @description
+#' `sysreqs_check_installed()` checks if the system requirements of all
+#' packages (or a subset of packages) are installed.
+#'
+#' `sysreqs_fix_installed()` installs the missing system packages.
 #'
 #' @details
-#' This function uses the `sysreqs_platform` configuration option,
+#' These functions use the `sysreqs_platform` configuration option,
 #' see \eval{man_config_link("Configuration")}. Set this if
 #' `r pak_or_pkgdepends()` does not detect your platform correctly.
 #'
@@ -148,8 +155,19 @@ sysreqs_db_update
 #'      installed.
 #'    * `packages`: list column of character vectors. The names of the
 #'      installed R packages that need this system package.
+#'    * `pre_install`: list column of character vectors. Commands to run
+#'      before the installation of the the system package.
+#'    * `post_install`: list column of character vectors. Commands to run
+#'      after the installation of the system package.
+#'
+#' The data frame also have two attributes with additional data:
+#' * `sysreqs_records`: the raw system requirements records, and
+#' * `system_packages`: the list of the installed system packages.
+#'
+#' `sysreqs_fix_packages()` returns the same value, but invisibly.
 #'
 #' @name sysreqs_check_installed
+#' @aliases sysreqs_fix_installed
 #' @export
 #' @family system requirements functions
 #' @examplesIf Sys.getenv("IN_PKGDOWN") == "true" && Sys.info()[["sysname"]] == "Linux"
@@ -158,6 +176,10 @@ sysreqs_db_update
 
 sysreqs_check_installed
 
+#' @export
+
+sysreqs_fix_installed <- sysreqs_fix_installed
+
 #' List installed system packages
 #'
 #' @usage

_pkgdown.yml

@@ -75,6 +75,7 @@ reference:
   contents:
   - pkg_sysreqs
   - sysreqs_check_installed
+  - sysreqs_fix_installed
   - sysreqs_db_list
   - sysreqs_db_match
   - sysreqs_db_update

man/chunks/sysreqs.Rmd

@@ -1,7 +1,7 @@
 ---
 output:
   github_document:
-always_allow_html: yes
+    always_allow_html: yes
 ---
 
 ```{r, setup, include = FALSE, cache = FALSE}
@@ -172,7 +172,7 @@ installed system packages and capabilities:
 pak::sysreqs_list_system_packages()
 ```
 
-Finally, `sysreqs_check_installed()` is a handy function that checks if all
+`sysreqs_check_installed()` is a handy function that checks if all
 system requirements are installed for some or all R packages that are
 installed in your library:
 ```{asciicast check-installed-setup, include = FALSE}
@@ -183,6 +183,9 @@ installed in your library:
 pak::sysreqs_check_installed()
 ```
 
+`sysreqs_fix_installed()` goes one step further and also tries to install
+the missing system requirements.
+
 # Build-time and run-time dependencies
 
 The system requirements database that pak uses does not currently

man/chunks/sysreqs.md

@@ -425,7 +425,7 @@ pak::sysreqs_list_system_packages()
 
 </div>
 
-Finally, `sysreqs_check_installed()` is a handy function that checks if
+`sysreqs_check_installed()` is a handy function that checks if
 all system requirements are installed for some or all R packages that
 are installed in your library:
 
@@ -463,6 +463,9 @@ pak::sysreqs_check_installed()
 
 </div>
 
+`sysreqs_fix_installed()` goes one step further and also tries to install
+the missing system requirements.
+
 # Build-time and run-time dependencies
 
 The system requirements database that pak uses does not currently