Add needs_compilation

DESCRIPTION

@@ -25,7 +25,7 @@ Imports:
     rmarkdown,
     yaml,
     xml2
-RoxygenNote: 7.2.1
+RoxygenNote: 7.2.3
 Remotes: 
     ropensci/postdoc,
     r-lib/remotes

NAMESPACE

@@ -14,6 +14,7 @@ export(get_package_datasets)
 export(install_dependencies)
 export(install_sysdeps)
 export(maintainer_info_base64)
+export(needs_compilation)
 export(read_description_field)
 export(render_article)
 export(render_html_manual)

R/buildtools.R

@@ -699,6 +699,13 @@ generate_metadata_files <- function(package, repo, subdir, outdir, pkgdir, git_u
   jsonlite::write_json(Filter(function(x){!is.null(x)}, contents), path = file.path(extra_dir, 'contents.json'))
 }
 
+#' @export
+#' @rdname buildtools
+needs_compilation <- function(package){
+  desc <- as.data.frame(read.dcf(system.file('DESCRIPTION', package = package)))
+  desc$NeedsCompilation
+}
+
 #' @export
 #' @rdname buildtools
 maintainer_info_base64 <- function(path = '.'){

action.yml

@@ -37,6 +37,9 @@ outputs:
     description: 'Base64 encoded JSON list with commit data'
   GITSTATS:
     description: 'Base64 encoded JSON list with git stats'
+  NEEDS_COMPILATION:
+    description: 'If the source package has a src dir'
+
 runs:
   using: 'docker'
   image: 'docker://ghcr.io/r-universe-org/build-source'

entrypoint.sh

@@ -194,6 +194,12 @@ if [ "$MANUAL_FAILURE" ]; then
 cat stderr_manual.txt
 fi
 
+# Test if package needs compilation (R simply checks if there is a 'src' dir)
+NEEDS_COMPILATION=$(Rscript -e "cat(buildtools::needs_compilation('${PACKAGE}'))")
+if [ "$NEEDS_COMPILATION" == "yes" ]; then
+echo "NEEDS_COMPILATION=yes" >> $GITHUB_OUTPUT
+fi
+
 # Find readme URL
 export README_URL=$(Rscript -e "cat(buildtools::find_readme_url('$URL', '$SUBDIR'))")
 if [ "$README_URL" ]; then