cairo 1.6.1-x86-mswin32

data/samples/pac2.rb

@@ -0,0 +1,171 @@
+=begin
+  pac2.rb - rcairo sample script with #scale and #translate.
+
+  Original: pac.rb in http://www.artima.com/rubycs/articles/pdf_writer3.html
+=end
+
+top = File.expand_path(File.join(File.dirname(__FILE__), ".."))
+src = File.join(top, "src")
+$LOAD_PATH.unshift src
+$LOAD_PATH.unshift File.join(src, "lib")
+
+require "cairo"
+
+def pac(surface, width, height)
+  cr = Cairo::Context.new(surface)
+
+  # NOTE: You may need to set line width when use Cairo::Context#scale
+  cr.set_line_width(cr.line_width / [width, height].max)
+
+  cr.scale(width, height)
+
+  cr.save do
+    cr.set_source_color(:black)
+    cr.rectangle(0, 0, 1, 1)
+    cr.fill
+  end
+
+  # Wall
+  wall_width = 0.89
+  wall_height = 0.03
+  wall_space = 0.5
+  wall_x = 0.02
+  wall1_y = 1 - 0.86
+  wall2_y = wall1_y + wall_space
+  wall_radius = 0.01
+
+  cr.set_source_color(:magenta)
+  cr.rounded_rectangle(wall_x, wall1_y, wall_width, wall_height, wall_radius)
+  cr.fill
+  cr.set_source_color(:cyan)
+  cr.rounded_rectangle(wall_x, wall1_y, wall_width, wall_height, wall_radius)
+  cr.stroke
+
+  cr.set_source_color(:magenta)
+  cr.rounded_rectangle(wall_x, wall2_y, wall_width, wall_height, wall_radius)
+  cr.fill
+  cr.set_source_color(:cyan)
+  cr.rounded_rectangle(wall_x, wall2_y, wall_width, wall_height, wall_radius)
+  cr.stroke
+
+  # Body
+  body_x = 0.17
+  body_y = 1 - 0.58
+  body_width = 0.23
+  body_height = 0.33
+
+  cr.save do
+    cr.translate(body_x, body_y)
+    cr.set_source_color(:yellow)
+    cr.scale(body_width, body_height)
+    cr.arc(0, 0, 0.5, 30 * (Math::PI / 180), 330 * (Math::PI / 180))
+    cr.line_to(0, 0)
+    cr.close_path
+    cr.fill
+  end
+
+  # Dot
+  dot_width = 0.02
+  dot_height = 0.03
+  small_dot_width = 0.01
+  small_dot_height = 0.015
+  dot_x = 0.29
+  dot_y = 1 - 0.58
+  dot_step = 0.05
+
+  cr.save do
+    cr.set_source_color(:yellow)
+    cr.save do
+      cr.translate(dot_x, dot_y)
+      cr.scale(dot_width, dot_height)
+      cr.circle(0, 0, 1).fill
+    end
+
+    4.times do |i|
+      cr.save do
+        cr.translate(dot_x + dot_step * (i + 1), dot_y)
+        cr.scale(small_dot_width, small_dot_height)
+        cr.circle(0, 0, 1).fill
+      end
+    end
+   end
+
+  # Ghost
+  ghost_x = 0.59
+  ghost_x_step = 0.03
+  ghost_y = 1 - 0.42
+  ghost_y_step = 0.04
+  ghost_width = 0.18
+  ghost_height = 0.29
+  ghost_radius= 0.08
+  cr.move_to(ghost_x, ghost_y)
+  cr.line_to(ghost_x, ghost_y - ghost_height)
+  cr.curve_to(ghost_x + ghost_width / 3.0,
+              ghost_y - ghost_height - ghost_radius,
+              ghost_x + ghost_width * (2.0 / 3.0),
+              ghost_y - ghost_height - ghost_radius,
+              ghost_x + ghost_width,
+              ghost_y - ghost_height)
+  cr.line_to(ghost_x + ghost_width, ghost_y)
+  i = 0
+  (ghost_x + ghost_width).step(ghost_x, -ghost_x_step) do |x|
+    cr.line_to(x, ghost_y + -ghost_y_step * (i % 2))
+    i += 1
+  end
+  cr.close_path
+
+  cr.set_source_color(:blue)
+  cr.fill_preserve
+  cr.set_source_color(:cyan)
+  cr.stroke
+
+  # Ghost Eyes
+  eye_x = 0.62
+  eye_y = 1 - 0.63
+  eye_space = 0.06
+  white_eye_width = 0.03
+  white_eye_height = 0.04
+  black_eye_width = 0.01
+  black_eye_height = 0.02
+
+  cr.set_source_color(:white)
+  cr.rectangle(eye_x, eye_y - white_eye_height,
+               white_eye_width, white_eye_height)
+  cr.fill
+  cr.rectangle(eye_x + eye_space, eye_y - white_eye_height,
+               white_eye_width, white_eye_height)
+  cr.fill
+
+  cr.set_source_color(:black)
+  cr.rectangle(eye_x, eye_y - black_eye_height,
+               black_eye_width, black_eye_height)
+  cr.fill
+  cr.rectangle(eye_x + eye_space, eye_y - black_eye_height,
+               black_eye_width, black_eye_height)
+  cr.fill
+
+  cr.show_page
+end
+
+paper = Cairo::Paper.parse(:a4_landscape)
+
+size_in_points = paper.size("pt")
+Cairo::ImageSurface.new(*size_in_points) do |surface|
+  cr = pac(surface, *size_in_points)
+  cr.target.write_to_png("pac2.png")
+end
+
+scalable_surface_output = Proc.new do |surface_class_name, suffix|
+  if Cairo.const_defined?(surface_class_name)
+    surface_class = Cairo.const_get(surface_class_name)
+    surface_class.new("pac2.#{suffix}", paper) do |surface|
+      pac(surface, *size_in_points)
+    end
+  else
+    puts("#{surface_class_name} isn't supported.")
+  end
+end
+
+scalable_surface_output.call("PSSurface", "ps")
+scalable_surface_output.call("PDFSurface", "pdf")
+scalable_surface_output.call("SVGSurface", "svg")

data/samples/png.rb

@@ -0,0 +1,45 @@
+#!/usr/bin/env ruby
+
+top = File.expand_path(File.join(File.dirname(__FILE__), ".."))
+src = File.join(top, "src")
+$LOAD_PATH.unshift src
+$LOAD_PATH.unshift File.join(src, "lib")
+
+require 'cairo'
+
+width = 200
+height = 200
+
+data = nil
+stride = nil
+
+Cairo::ImageSurface.new(width, height) do |surface|
+  cr = Cairo::Context.new(surface)
+
+  # fill background with white
+  cr.set_source_color("#fffc")
+  cr.paint
+
+  # create shape
+  cr.move_to(50, 50)
+  cr.curve_to(100, 25, 100, 75, 150, 50)
+  cr.line_to(150, 150)
+  cr.line_to(50, 150)
+  cr.close_path
+
+  cr.set_source_color(:black)
+  cr.fill_preserve
+  cr.set_source_color(:red)
+  cr.set_line_join(Cairo::LINE_JOIN_MITER)
+  cr.set_line_width(4)
+  cr.stroke
+
+  cr.target.write_to_png("test.png")
+
+  data = cr.target.data
+  stride = cr.target.stride
+end
+
+Cairo::ImageSurface.new(data, :argb32, width, height, stride) do |surface|
+  surface.write_to_png("test-renew.png")
+end

data/samples/scalable.rb

@@ -0,0 +1,56 @@
+#!/usr/bin/env ruby
+
+top = File.expand_path(File.join(File.dirname(__FILE__), ".."))
+src = File.join(top, "src")
+$LOAD_PATH.unshift src
+$LOAD_PATH.unshift File.join(src, "lib")
+
+require 'cairo'
+require 'stringio'
+
+def render(output, surface_class)
+  surface_class.new(output, 200, 200) do |surface|
+    cr = Cairo::Context.new(surface)
+
+    # fill background with white
+    cr.set_source_color("#fffc")
+    cr.paint
+
+    # create shape
+    cr.move_to(50, 50)
+    cr.curve_to(100, 25, 100, 75, 150, 50)
+    cr.line_to(150, 150)
+    cr.line_to(50, 150)
+    cr.close_path
+
+    cr.set_source_color(:black)
+    cr.fill_preserve
+    cr.set_source_color(:red)
+    cr.set_line_join(Cairo::LINE_JOIN_MITER)
+    cr.set_line_width(4)
+    cr.stroke
+
+    cr.show_page
+    surface.finish
+  end
+end
+
+def output(surface_class_name, suffix)
+  if Cairo.const_defined?(surface_class_name)
+    surface_class = Cairo.const_get(surface_class_name)
+    render("test.#{suffix}", surface_class)
+
+    output = StringIO.new
+    render(output, surface_class)
+    output.rewind
+    File.open("test2.#{suffix}", "wb") do |f|
+      f.print(output.read)
+    end
+  else
+    puts("#{surface_class_name} isn't supported.")
+  end
+end
+
+output("PSSurface", "ps")
+output("PDFSurface", "pdf")
+output("SVGSurface", "svg")

data/samples/text-on-path.rb

@@ -0,0 +1,60 @@
+#!/usr/bin/env ruby
+
+top = File.expand_path(File.join(File.dirname(__FILE__), ".."))
+src = File.join(top, "src")
+$LOAD_PATH.unshift src
+$LOAD_PATH.unshift File.join(src, "lib")
+
+require 'cairo'
+require 'pango'
+
+def render_background(cr)
+  cr.set_source_color(:white)
+  cr.paint
+end
+
+def make_layout(cr, text)
+  layout = cr.create_pango_layout
+  layout.text = text
+  layout.font_description = Pango::FontDescription.new("Serif 36")
+  cr.update_pango_layout(layout)
+  layout
+end
+
+def render(surface)
+  text = "It was a dream... Oh Just a dream..."
+
+  cr = Cairo::Context.new(surface)
+
+  render_background(cr)
+
+  cr.set_source_color(:red)
+  cr.move_to(25, 350)
+  cr.line_to(150, 375)
+  cr.curve_to(275, 400, 450, 350, 450, 200)
+  cr.curve_to(450, 0, 300, 150, 50, 50)
+  cr.stroke_preserve
+  path = cr.copy_path_flat
+
+  cr.line_width = 1
+  cr.new_path
+  layout = make_layout(cr, text)
+  cr.pango_layout_line_path(layout.get_line(0))
+  cr.map_path_onto(path)
+
+  cr.set_source_rgba(0.3, 0.3, 1.0, 0.3)
+  cr.fill_preserve
+  cr.set_source_rgba(0.1, 0.1, 0.1)
+  cr.stroke
+
+  cr.show_page
+end
+
+def output
+  Cairo::ImageSurface.new(500, 500) do |surface|
+    render(surface)
+    surface.write_to_png("text-on-path.png")
+  end
+end
+
+output

data/samples/text2.rb

@@ -0,0 +1,131 @@
+#!/usr/bin/env ruby
+
+top = File.expand_path(File.join(File.dirname(__FILE__), ".."))
+src = File.join(top, "src")
+$LOAD_PATH.unshift src
+$LOAD_PATH.unshift File.join(src, "lib")
+
+require 'optparse'
+require 'ostruct'
+
+require 'cairo'
+require 'pango'
+
+def parse(args=ARGV)
+  options = OpenStruct.new
+  options.width = 595.275590551181.round
+  options.height = 841.889763779528.round
+  options.font_description = "Monospace 12"
+  options.fade_out = false
+
+  opts = OptionParser.new do |opts|
+    opts.on("--width=WIDTH", Integer, "paper width") do |width|
+      options.width = width
+    end
+    opts.on("--height=HEIGHT", Integer, "paper height") do |height|
+      options.height = height
+    end
+    opts.on("--font-description=DESCRIPTION",
+            "font description (e.g. 'Monospace 14')") do |desc|
+      options.font_description = desc
+    end
+    opts.on("--[no-]fade-out",
+            "fade-out one-third of page") do |fade_out|
+      options.fade_out = fade_out
+    end
+  end
+
+  opts.parse!(args)
+
+  options
+end
+
+def render_background(cr)
+  cr.set_source_color(:white)
+  cr.paint
+end
+
+def make_layout(cr, text, width, font_description)
+  layout = cr.create_pango_layout
+  layout.text = text
+  layout.width = width * Pango::SCALE
+  layout.font_description = Pango::FontDescription.new(font_description)
+  cr.update_pango_layout(layout)
+  layout
+end
+
+def setup_fade_out(cr, width)
+  fade_out = Cairo::LinearPattern.new(0, 0, width, 0)
+  fade_out.add_color_stop(0, "#000f")
+  fade_out.add_color_stop(0.66, "#000f")
+  fade_out.add_color_stop(1, "#0000")
+
+  cr.set_source(fade_out)
+end
+
+def render_layout(cr, layout, margin_left, margin_top, body_height)
+  x = margin_left
+  y = margin_top
+  limit_y = margin_top + body_height
+
+  iter = layout.iter
+  prev_baseline = iter.baseline / Pango::SCALE
+  begin
+    line = iter.line
+    ink_rect, logical_rect = iter.line_extents
+    y_begin, y_end = iter.line_yrange
+    if limit_y < (y + y_end / Pango::SCALE)
+      cr.show_page
+      y = margin_top - prev_baseline
+    end
+    baseline = iter.baseline / Pango::SCALE
+    cr.move_to(x + logical_rect.x / Pango::SCALE, y + baseline)
+    cr.show_pango_layout_line(line)
+    prev_baseline = baseline
+  end while iter.next_line!
+end
+
+def render(options, output, surface_class)
+  text = options.text
+  width = options.width
+  height = options.height
+  font_description = options.font_description
+  fade_out = options.fade_out
+
+  margin_left = (width * 0.05).ceil
+  margin_right = (width * 0.05).ceil
+  margin_top = (height * 0.05).ceil
+  margin_bottom = (height * 0.05).ceil
+  body_width = width - margin_left - margin_right
+  body_height = height - margin_top - margin_bottom
+
+  surface_class.new(output, width, height) do |surface|
+    cr = Cairo::Context.new(surface)
+
+    render_background(cr)
+    layout = make_layout(cr, text, body_width, font_description)
+    if fade_out
+      setup_fade_out(cr, body_width)
+    else
+      cr.set_source_color(:black)
+    end
+    render_layout(cr, layout, margin_left, margin_top, body_height)
+
+    cr.show_page
+  end
+end
+
+def output(options, surface_class_name, suffix)
+  if Cairo.const_defined?(surface_class_name)
+    surface_class = Cairo.const_get(surface_class_name)
+    render(options, "text2.#{suffix}", surface_class)
+  else
+    puts("#{surface_class_name} isn't supported.")
+  end
+end
+
+options = parse
+options.text = ARGF.read
+output(options, "PSSurface", "ps")
+output(options, "PDFSurface", "pdf")
+output(options, "SVGSurface", "svg")