WIP: use_gitpod() and use_cmakelists() drafts

DESCRIPTION

@@ -15,6 +15,7 @@ Imports:
     callr,
     checkmate,
     cli,
+    fs,
     gh,
     glue,
     jsonlite,

NAMESPACE

@@ -10,8 +10,11 @@ export(init_tic)
 export(renv_downgrade)
 export(renv_install_local)
 export(renv_switch_r_version)
+export(use_cmakelists)
+export(use_gitpod)
 importFrom(checkmate,assert_character)
 importFrom(cli,cli_alert)
+importFrom(fs,dir_create)
 importFrom(gh,gh)
 importFrom(jsonlite,read_json)
 importFrom(lifecycle,deprecated)

R/use_cmakelists.R

@@ -0,0 +1,34 @@
+#'
+#' @importFrom fs dir_create
+#' @export
+use_cmakelists <- function(project = "NewProject") {
+  new_cmakelist <- usethis::use_template(
+    "CMakeLists.txt",
+    "CMakeLists.txt",
+    package = "cynkrathis",
+    data = list(project = project),
+    ignore = TRUE
+  )
+  if (!new_cmakelist) {
+    return(invisible(FALSE))
+  }
+
+  invisible(TRUE)
+
+  fs::dir_create("src")
+
+  ext_files <- list.files(path = ".", pattern = ".*\\.(c|h|cpp)$")
+
+  new_cmakelist_src <- usethis::use_template(
+    "CMakeLists-src.txt",
+    "src/CMakeLists.txt",
+    package = "cynkrathis",
+    data = list(project = project, ext_files = ext_files),
+    ignore = TRUE
+  )
+  if (!new_cmakelist_src) {
+    return(invisible(FALSE))
+  }
+
+  invisible(TRUE)
+}

R/use_gitpod.R

@@ -0,0 +1,27 @@
+#'
+#' @export
+use_gitpod <- function() {
+  new_gitpod_dockerfile <- usethis::use_template(
+    "gitpod.Dockerfile",
+    ".gitpod.Dockerfile",
+    package = "cynkrathis",
+    ignore = TRUE
+  )
+  if (!new_gitpod_dockerfile) {
+    return(invisible(FALSE))
+  }
+
+  invisible(TRUE)
+
+  new_gitpod_yml <- usethis::use_template(
+    "gitpod.yml",
+    ".gitpod.yml",
+    package = "cynkrathis",
+    ignore = TRUE
+  )
+  if (!new_gitpod_yml) {
+    return(invisible(FALSE))
+  }
+
+  invisible(TRUE)
+}

inst/templates/CMakeLists-src.txt

@@ -0,0 +1,18 @@
+add_library({{{project}}}
+ {{{ext_files}}}
+
+)
+
+target_include_directories({{{project}}} PUBLIC
+    "/usr/share/R/include"
+    "/home/gitpod/R/x86_64-pc-linux-gnu-library/3.6/Rcpp/include/"
+    "/home/gitpod/R/x86_64-pc-linux-gnu-library/3.6/plogr/include/"
+    "/usr/include/postgresql"
+    "vendor"
+)
+
+target_compile_definitions({{{project}}} PUBLIC
+    "RCPP_DEFAULT_INCLUDE_CALL=false"
+    "RCPP_USING_UTF8_ERROR_STRING"
+    "BOOST_NO_AUTO_PTR"
+)

inst/templates/CMakeLists.txt

@@ -0,0 +1,13 @@
+cmake_minimum_required(VERSION 3.0.0)
+project({{{project}}} VERSION 0.1.0)
+
+set(CMAKE_EXPORT_COMPILE_COMMANDS ON)
+
+include(CTest)
+enable_testing()
+
+add_subdirectory(src)
+
+set(CPACK_PROJECT_NAME ${PROJECT_NAME})
+set(CPACK_PROJECT_VERSION ${PROJECT_VERSION})
+include(CPack)

inst/templates/gitpod.Dockerfile

@@ -0,0 +1,11 @@
+# You can find the new timestamped tags here: https://hub.docker.com/r/gitpod/workspace-base/tags
+FROM gitpod/workspace-base:2022-05-08-14-31-53
+
+# Install R and ccache
+RUN sudo apt update
+RUN sudo apt install -y \
+  r-base \
+  ccache \
+  cmake \
+  # Install dependencies for rlang packet
+  libharfbuzz-dev libfribidi-dev

inst/templates/gitpod.yml

@@ -0,0 +1,28 @@
+image:
+  file: .gitpod.Dockerfile
+tasks:
+  - name: dependencies
+    init: |
+      # Scriptlets, with custom Git config
+      mv ~/.gitconfig ~/.gitconfig.gitpod
+      curl -s https://raw.githubusercontent.com/krlmlr/scriptlets/master/bootstrap | sh
+      echo -e "[credential]\n\thelper = /usr/bin/gp credential-helper" >> ~/.gitconfig
+      # .editorconfig
+      ln -s ~/.editorconfig ..
+      # Set up ccache
+      ln -s /usr/lib/ccache/* ~/bin/
+      # Set up Makevars
+      mkdir -p ~/.R
+      echo -e "MAKEFLAGS = -j8\nCXXFLAGS = -O0 -g" > ~/.R/Makevars
+      # Install R packages
+      echo 'options(repos = "https://packagemanager.rstudio.com/all/__linux__/'$(cat /etc/lsb-release | sed  -n '/DISTRIB_CODENAME=/ {s///;p}')'/latest")' > ~/.Rprofile
+      mkdir -p ~/R/x86_64-pc-linux-gnu-library/$(Rscript -e 'writeLines(gsub("[.][^.]+$", "", as.character(getRversion())))')
+      ## Install pak in R
+      R -q -e 'install.packages("pak", repos = sprintf("https://r-lib.github.io/p/pak/stable/%s/%s/%s", .Platform$pkgType, R.Version()$os, R.Version()$arch))'
+      ## Install devtools and R dependencies
+      R -q -e 'pak::pak(c("devtools", "deps::."))'
+vscode:
+  extensions:
+    - ms-vscode.cpptools-extension-pack
+    - go2sh.cmake-integration-vscode
+    - EditorConfig.EditorConfig