Merge pull request #289 from rstudio/imagemagick-pdf

Enable image magick ghostscript features

CONTRIBUTING.md

@@ -52,5 +52,5 @@ touch packages/[r_package_name]/test.R
 
 ```bash
 make test-xenial-[r_package_name]
-make test-bionic-[r_package_name]
+make test-focal-[r_package_name]
 ```

packages/magick/install

@@ -16,3 +16,12 @@ if [ ${OS_CODENAME} == "xenial" ]; then
 fi
 
 apt-get install -y libmagick++-dev
+
+
+if [ ${OS_CODENAME} == "focal" ]; then
+  # Enable imagemagick ghostscript features
+  # See https://www.kb.cert.org/vuls/id/332928/
+  # focal has a new enough version of ghostscript
+  sed -i "\$i \ \ <policy domain=\"coder\" rights=\"read | write\" pattern=\"{PS,PS2,PS3,EPS,PDF,XPS}\" />" /etc/ImageMagick-6/policy.xml
+fi
+

packages/magick/test.R

@@ -5,3 +5,11 @@ install.packages("magick", repos = "https://cran.rstudio.com")
 library(magick)
 docdir <- Sys.getenv("R_DOC_DIR", R.home("doc"))
 img <- magick::image_read(file.path(docdir, "html", "logo.jpg"))
+
+# Create a pdf
+image_write(wizard,
+            tempfile(pattern = "pdftemp", fileext = '.pdf'),
+            density = 55,
+            format = 'pdf',
+            comment = "Edit PDFs and Images"
+)