paulnicholson-acrylic 0.1.0

data/lib/image_generator.rb

@@ -0,0 +1,79 @@
+require 'cairo_tools'
+require 'shape'
+class ImageGenerator
+  include CairoTools
+  
+  def self.colors
+    @@colors ||= {}
+  end
+
+  def self.color(name, color)
+    color = Color::HSL.new(color)
+    colors[name] = color
+    self.class_eval <<-"end;"
+      def #{name}
+        self.class.colors[:#{name}]
+      end
+      def #{name}!(a=nil)
+        set_color(a ? #{name}.a(a) : #{name})
+      end
+    end;
+  end
+  
+  color :black, '000'
+  color :white, 'FFF'
+  
+  def self.shapes
+    @@shapes ||= {}
+  end
+  
+  def self.shape(name, width, height, &block)
+    shapes[name] = shape = Shape.new(name, width, height, block)
+    define_method("draw_#{name}") do |x, y|
+      shape.draw(cr, x, y)
+    end
+  end
+  
+  def self.generate_image(path, *options)
+    new.generate_image(path, options)
+  end
+
+  def self.generate(name, *options)
+    generate_image(File.join(File.dirname(__FILE__), "../public/images", name), *options)
+  end
+
+  def self.preview(*options)
+    return unless $0.match(/#{name.underscore}.rb$/)
+    path = File.join(File.dirname($0), "generated.png")
+    options = Array(yield) if block_given?
+    instance = self.new
+    instance.preview = true
+    instance.generate_image(path, options)
+    `open #{path}`
+    sleep 1
+    File.unlink(path)
+  end
+  
+  def self.image(name, options={:suite => true}, &block)
+    images[name] = block
+    suite_images << name if options[:suite]
+  end
+  
+  def self.suite_images
+    @suite_images ||= []
+  end
+
+  def self.images
+    @images ||= {}
+  end
+
+  def self.suite(prefix, *args)
+    suite_images.each do |name|
+      generate("#{prefix}_#{name}.png", name, *args)
+    end
+  end
+
+  def draw(suffix, *args)
+    instance_eval(*args, &self.class.images[suffix])
+  end
+end

data/lib/image_surface_extensions.rb

@@ -0,0 +1,14 @@
+require 'native_image_surface_extensions'
+require 'color'
+
+class Cairo::ImageSurface
+
+  def get_pixel(x, y)
+    integer = get_values(x, y)
+    a = integer >> 24 & 0xFF
+    r = integer >> 16 & 0xFF
+    g = integer >> 8  & 0xFF
+    b = integer       & 0xFF
+    Color::RGB.new([r, g, b, a].map {|v| v.to_f/255})
+  end
+end

data/lib/pascal.rb

@@ -0,0 +1,32 @@
+# This was used to generate the coefficients for the gaussian blur. It would be better to make it dynamic.
+
+class PascalTriangle
+  def pascal_triangle(levels)
+    values = [[1]]
+    (levels - 1).times do
+      level = [1]
+      values.last[1..-1].each_with_index do |x, i|
+        level << x + values.last[i]
+      end
+      level << 1
+      values << level
+    end
+    values
+  end
+  
+  def sums(max_radius)
+    sums = []
+    (max_radius + 1).times do |i|
+      sums << 2**(i*2)
+    end
+    sums
+  end
+  
+  def generate_c(max_radius=10)
+    values = pascal_triangle(max_radius*2 + 1).reject {|a| a.size % 2 == 0}
+    puts values.inspect.gsub('[', '{').gsub(']', '}')
+    puts sums(max_radius).inspect.gsub('[', '{').gsub(']', '}')
+  end
+end
+
+PascalTriangle.new.generate_c

data/lib/shape.rb

@@ -0,0 +1,14 @@
+class Shape
+  include CairoTools
+  attr_reader :name, :width, :height, :cr, :proc
+  def initialize(name, width, height, proc)
+    @name, @width, @height, @proc = name, width, height, proc
+  end
+  
+  def draw(cr, x, y)
+    @cr = cr
+    transform cr.matrix.translate(x, y) do
+      instance_eval(&proc)
+    end
+  end
+end

data/lib/text_box.rb

@@ -0,0 +1,96 @@
+class TextBox
+  attr_reader :generator, :lines, :x, :y, :valign, :width
+  attr_writer :x, :y, :valign, :width
+  def initialize(generator, x, y, width, height, valign)
+    @generator, @x, @y, @width, @height, @valign = generator, x, y, width, height, valign
+    @lines = []
+  end
+
+  def cr
+    generator.cr
+  end
+
+  def split_lines(text, options)
+    text.split(/\r?\n/).each do |line|
+      line(line, options)
+    end
+  end
+
+  def line(text, options={})
+    return if text.empty?
+    return split_lines(text, options) if text.include?("\n")
+    set_options(options)
+    extents = cr.text_extents(text)
+    options[:line_height] ||= cr.font_extents.height
+    if @width && extents.width > width
+      lines.push(*wrap(text).map {|line| [line, options]})
+    else
+      lines << [text, options]
+    end
+  end
+
+  def set_options(options)
+    cr.select_font_face(options[:face] || "Arial", 
+      options[:italic] ? Cairo::FontSlant::ITALIC : Cairo::FontSlant::NORMAL, 
+      options[:bold] ? Cairo::FontWeight::BOLD : Cairo::FontWeight::NORMAL)
+    cr.set_font_size(options[:size]) if options[:size]
+  end
+
+  def wrap(text)
+    split = text.split(' ')
+    lines = []
+    line = []
+    until split.empty?
+      until cr.text_extents(line.join(' ')).width > width || split.empty?
+        line << split.shift
+      end
+      split.unshift(line.pop) if cr.text_extents(line.join(' ')).width > width && line.size > 1
+      lines << line.join(' ')
+      line = []
+    end
+    lines
+  end
+
+  def draw
+    line_y = valign == :center ? y + (@height - height)/2 : y
+    cr.line_width = 1
+    # cr.rectangle(x, line_y, width, height)
+    # cr.stroke
+    lines.each do |(line, options)|
+      set_options(options)
+      baseline = line_y + cr.font_extents.ascent# - cr.font_extents.descent
+      draw_line(x, baseline, line, options)
+      # cr.move_to(x, baseline); cr.line_to(x+cr.text_extents(line).width, baseline)
+      # cr.stroke
+      line_y += options[:line_height]
+    end
+  end
+
+  def draw_line(x, y, text, options)
+    start = options[:align] == :center ? (x + width/2 - cr.text_extents(text).width/2) : x
+    cr.move_to(start, y)
+    cr.show_text(text)
+    cr.fill
+    if options[:underline]
+      cr.line_width = 1
+      underline = y + 3
+      cr.move_to(start, underline)
+      cr.line_to(start + cr.text_extents(text).width, underline)
+      cr.stroke
+    end
+  end
+
+  def move(x, y)
+    @x, @y = x, y
+  end
+
+  def width
+    @width || lines.map {|(text, options)| set_options(options); cr.text_extents(text).width}.max
+  end
+
+  def height
+    lines.sum do |(line, options)|
+      options[:line_height]
+    end
+  end
+end

data/test/bump_map_test.rb

@@ -0,0 +1,60 @@
+require File.dirname(__FILE__) + '/test_helper'
+
+class BumpMapTest < Nitrous::Test
+  test "bump map" do
+    dimensions 1, 1
+    tb = create_text_box(10, 10)
+    tb.line("Austin & Saki", :size => 160, :face => 'Savoye LET')
+    dimensions tb.width + 40, tb.height
+    black!
+    # cr.paint
+    # cr.operator = Cairo::OPERATOR_CLEAR
+    tb.draw
+    
+    mask = @surface
+    dimensions width, height
+    cr.set_source(Cairo::SurfacePattern.new(mask))
+    cr.paint
+    @surface.blur(2)
+    # 8.times {@surface.blur(10)}
+    
+    height_map = @surface
+    dimensions width, height
+    @surface.bump_map(height_map, width.to_i/2, -80, 800, 100)
+    
+    bump = @surface
+    dimensions width, height
+    # cr.set_source_rgb(0.6, 0.6, 0.6)
+    # cr.mask(Cairo::SurfacePattern.new(mask))
+    cr.set_source(Cairo::SurfacePattern.new(bump))
+    cr.mask(Cairo::SurfacePattern.new(mask))
+    # cr.paint
+    
+    
+    preview
+  end
+  
+  ztest "bump map3" do
+    dimensions 100, 100
+    load_image '../test/surface.png'
+    cr.paint
+    height_map = @surface
+    dimensions 100, 100
+    @surface.bump_map(height_map, -10, -30, 200, 30)
+    preview
+  end
+  
+  ztest "bump map2" do
+    dimensions 5, 5
+    cr.circle(width.to_f/2, height.to_f/2, width/2 - 1)
+    black!
+    cr.fill
+    
+    height_map = @surface
+    
+    dimensions 5, 5
+    @surface.bump_map(height_map, -1, -1, 10, 2)
+    
+    preview
+  end
+end

data/test/cairo_tools_test.rb

@@ -0,0 +1,36 @@
+require File.dirname(__FILE__) + '/test_helper'
+
+class CairoToolsTest < Nitrous::Test
+  test "get_pixel" do
+    dimensions 3, 3
+    assert_equal rgb(0, 0, 0, 0), get_pixel(1, 3)
+
+    cr.set_source_rgb(0, 1, 0)
+    cr.paint
+    assert_equal rgb(0, 1, 0), get_pixel(0, 0)
+    
+    set_color rgb(1, 0, 0)
+    cr.paint
+    assert_equal rgb(1, 0, 0), get_pixel(0, 0)
+
+    set_color rgb(0, 0, 1)
+    cr.paint
+    assert_equal rgb(0, 0, 1), get_pixel(0, 0)
+    
+    dimensions 10, 10
+    cr.rectangle 0.5, 0.5, 9, 9
+    cr.line_width = 1
+    cr.stroke
+    assert_equal black.to_rgb, get_pixel(0, 0)
+    assert_equal black.a(0).to_rgb, get_pixel(1, 1)
+  end
+  
+  test "blur shouldn't wrap around" do
+    dimensions 3, 2
+    cr.rectangle 2, 0, 1, 2
+    black!
+    cr.fill
+    @surface.blur(1)
+    assert_equal rgb(0, 0, 0, 0), @surface.get_pixel(0, 1)
+  end
+end

data/test/color_test.rb

@@ -0,0 +1,71 @@
+require File.dirname(__FILE__) + '/test_helper'
+require 'color'
+
+class ColorTest < Nitrous::Test
+  include Color
+  
+  test "new with three components" do
+    assert_equal 0.5, rgb(0.4, 0.5, 0.6).g
+  end
+  
+  test "new with alpha" do
+    assert_equal 0.5, rgb(0.2, 0.3, 0.4, 0.5).a
+  end
+  
+  test "new with css" do
+    assert_equal rgb(0.25, 0.5, 1.0), rgb("4080FF")
+    assert_equal rgb(1.0, 2.0/3.0, 0.8), rgb("FAC")
+    assert_equal rgb(1.0, 2.0/3.0, 0.8), rgb("#FAC")
+  end
+  
+  test "alpha should default to 1.0" do
+    assert_equal 1.0, rgb(1, 1, 1).a
+    assert_equal 1.0, hsl(1, 1, 1).a
+  end
+  
+  test "to_css" do
+    assert_equal '3F7FFF', rgb(0.25, 0.5, 1.0).to_css
+    assert_equal '010101', rgb(1.0/255.0, 1.0/255.0, 1.0/255.0).to_css
+    assert_equal '000000', rgb(0, 0, 0).to_css
+    assert_equal 'FFAACC', rgb(1.0, 2.0/3.0, 0.8).to_css
+    assert_equal 'FF5BFE', hsl(5.0/6.0, 1.0, 0.68).to_css
+  end
+  
+  test "equals" do
+    assert_equal rgb(0.1, 0.1, 0.1), rgb(0.1, 0.1, 0.1)
+    assert_not_equal rgb(0.1, 0.1, 0.1), rgb(0.1, 0.1, 0.2)
+    assert_not_equal rgb(0.1, 0.1, 0.1), hsl(0.1, 0.1, 0.1)
+  end
+  
+  test "addition and subtraction" do
+    assert_equal rgb(0.5, 0.4, 0.3), rgb(0.3, 0.3, 0.3) + rgb(0.2, 0.1, 0.0)
+    # TODO: is this the right behavior for alpha?
+    assert_equal rgb(0.1, 0.2, 0.3, 0.0), rgb(0.3, 0.3, 0.3) - rgb(0.2, 0.1, 0.0)
+    assert_equal rgb(0.5, 0.4, 0.3), rgb(0.3, 0.3, 0.3) + [0.2, 0.1, 0.0]
+    assert_equal rgb(0.1, 0.2, 0.3), rgb(0.3, 0.3, 0.3) - [0.2, 0.1, 0.0]
+  end
+  
+  test "to_hsl" do
+    assert_equal hsl(0.0, 1.0, 0.5), rgb(1.0, 0.0, 0.0).to_hsl
+    assert_equal hsl(1.0/3.0, 1.0, 0.5), rgb(0.0, 1.0, 0.0).to_hsl
+    assert_equal hsl(2.0/3.0, 1.0, 0.5), rgb(0.0, 0.0, 1.0).to_hsl
+    assert_equal hsl(7.0/12.0, 1.0, 0.25), rgb(0.0, 0.25, 0.5).to_hsl
+    assert_equal hsl(5.0/6.0, 1.0, 0.679), rgb("FF5BFF").to_hsl
+    assert_equal hsl(7.0/12.0, 1.0, 0.25, 0.5), rgb(0.0, 0.25, 0.5, 0.5).to_hsl
+  end
+  
+  test "to_rgb" do
+    assert_equal rgb(1.0, 0.0, 0.0), hsl(0.0, 1.0, 0.5).to_rgb
+    assert_equal rgb(0.0, 1.0, 0.0), hsl(1.0/3.0, 1.0, 0.5).to_rgb
+    assert_equal rgb(0.0, 0.0, 1.0), hsl(2.0/3.0, 1.0, 0.5).to_rgb
+    assert_equal rgb(0.0, 0.25, 0.5), hsl(7.0/12.0, 1.0, 0.25).to_rgb
+    assert_equal rgb(0.0, 0.25, 0.5, 0.5), hsl(7.0/12.0, 1.0, 0.25, 0.5).to_rgb
+    assert_equal rgb(1, 1, 1, 0), hsl(0, 0, 1, 0).to_rgb
+  end
+  
+  test "non-destructive setters" do
+    white = rgb(1, 1, 1)
+    assert_equal rgb(1, 1, 1, 0.5), white.a(0.5)
+    assert_equal rgb(1, 1, 1), white
+  end
+end

data/test/test_helper.rb

@@ -0,0 +1,16 @@
+$: << File.dirname(__FILE__) + "/../../nitrous/plugin/lib/" << File.dirname(__FILE__) + "/../ext/image_surface_extensions/"
+require 'nitrous'
+require 'cairo_tools'
+
+class Nitrous::Test
+  include CairoTools
+  
+  def preview
+    return unless Nitrous::TestContext.textmate?
+    path = File.join(File.dirname($0), "generated.png")
+    cr.target.write_to_png(path)
+    `open #{path}`
+    sleep 1
+    File.unlink(path)
+  end
+end

metadata

@@ -0,0 +1,85 @@
+--- !ruby/object:Gem::Specification 
+name: paulnicholson-acrylic
+version: !ruby/object:Gem::Version 
+  version: 0.1.0
+platform: ruby
+authors: 
+- Austin Taylor
+- Paul Nicholson
+autorequire: acrylic
+bindir: bin
+cert_chain: []
+
+date: 2009-01-27 00:00:00 -08:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: activesupport
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+description: A set of image manipulation tools built on top of Cairo
+email: 
+executables: []
+
+extensions: 
+- ext/image_surface_extensions/extconf.rb
+extra_rdoc_files: []
+
+files: 
+- Rakefile
+- README
+- TODO
+- VERSION.yml
+- lib/acrylic
+- lib/acrylic.rb
+- lib/border_tools.rb
+- lib/cairo_tools.rb
+- lib/color.rb
+- lib/core_ext.rb
+- lib/curve.rb
+- lib/image_generator.rb
+- lib/image_surface_extensions.rb
+- lib/pascal.rb
+- lib/shape.rb
+- lib/text_box.rb
+- test/bump_map_test.rb
+- test/cairo_tools_test.rb
+- test/color_test.rb
+- test/surface.png
+- test/test_helper.rb
+- ext/image_surface_extensions/native_image_surface_extensions.c
+- ext/image_surface_extensions/extconf.rb
+has_rdoc: true
+homepage: http://github.com/dotjerky/acrylic
+post_install_message: 
+rdoc_options: 
+- --inline-source
+- --charset=UTF-8
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.2.0
+signing_key: 
+specification_version: 2
+summary: Photoshop for cool people.
+test_files: []
+