CairoMakie: Allow restricting PDF version

CairoMakie/src/cairo-extension.jl

@@ -74,3 +74,23 @@ function get_render_type(surface::Cairo.CairoSurface)
  typ == Cairo.CAIRO_SURFACE_TYPE_IMAGE && return IMAGE
  return IMAGE # By default assume that the render type is IMAGE
 end
+
+const CAIRO_PDF_VERSION_1_4 = 0
+const CAIRO_PDF_VERSION_1_5 = 1
+const CAIRO_PDF_VERSION_1_6 = 2
+const CAIRO_PDF_VERSION_1_7 = 3
+
+function restrict_pdf_version!(surface::Cairo.CairoSurface, pdf_version::String)
+ @assert surface.ptr != C_NULL
+ versions = Dict("1.4" => CAIRO_PDF_VERSION_1_4,
+ "1.5" => CAIRO_PDF_VERSION_1_5,
+ "1.6" => CAIRO_PDF_VERSION_1_6,
+ "1.7" => CAIRO_PDF_VERSION_1_7)
+ if !haskey(versions, pdf_version)
+ versionlist = join(sort(collect(keys(versions))), ", ")
+ throw(ArgumentError("PDF version must be one of $versionlist (received '$pdf_version')"))
+ end
+ cairo_pdf_version = versions[pdf_version]
+ ccall((:cairo_pdf_surface_restrict_to_version, Cairo.libcairo), Nothing,
+ (Ptr{UInt8},Int32), surface.ptr, cairo_pdf_version)
+end

CairoMakie/src/screen.jl

@@ -92,6 +92,7 @@ struct ScreenConfig
  antialias::Symbol
  visible::Bool
  start_renderloop::Bool # Only used to satisfy the interface for record using `Screen(...; start_renderloop=false)` for GLMakie
+ pdf_version::String
 end
 
 function device_scaling_factor(rendertype, sc::ScreenConfig)
@@ -213,6 +214,11 @@ function apply_config!(screen::Screen, config::ScreenConfig)
  aa = to_cairo_antialias(config.antialias)
  Cairo.set_antialias(context, aa)
  set_miter_limit(context, 2.0)
+
+ if get_render_type(surface) === PDF
+ restrict_pdf_version!(surface, config.pdf_version)
+ end
+
  screen.antialias = aa
  screen.device_scaling_factor = dsf
  screen.config = config
@@ -285,6 +291,11 @@ function Screen(scene::Scene, config::ScreenConfig, surface::Cairo.CairoSurface)
  aa = to_cairo_antialias(config.antialias)
  Cairo.set_antialias(ctx, aa)
  set_miter_limit(ctx, 2.0)
+
+ if get_render_type(surface) === PDF
+ restrict_pdf_version!(surface, config.pdf_version)
+ end
+
  return Screen{get_render_type(surface)}(scene, surface, ctx, dsf, aa, config.visible, config)
 end
 

CairoMakie/test/runtests.jl

@@ -198,3 +198,19 @@ functions = [:volume, :volume!, :uv_mesh]
  missing_images, scores = ReferenceTests.record_comparison(recording_dir)
  ReferenceTests.test_comparison(scores; threshold = 0.05)
 end
+
+@testset "restrict PDF version" begin
+ filename = "figure.pdf"
+ for version in ["1.4", "1.5", "1.6", "1.7"]
+ fig = Figure()
+ try
+ save(filename, fig, pdf_version=version)
+ open(filename) do f
+ magic_number = String(read(f, sizeof("%PDF-X.Y")))
+ @test magic_number == "%PDF-$version"
+ end
+ finally
+ rm(filename)
+ end
+ end
+end

src/theming.jl

@@ -89,7 +89,8 @@ const MAKIE_DEFAULT_THEME = Attributes(
  pt_per_unit = 0.75,
  antialias = :best,
  visible = true,
- start_renderloop = false
+ start_renderloop = false,
+ pdf_version = "1.7"
  ),
 
  GLMakie = Attributes(