tdd-attachment_fu 0.9.6

data/test/processors/rmagick_test.rb

@@ -0,0 +1,267 @@
+require File.expand_path(File.join(File.dirname(__FILE__), '..', 'test_helper'))
+
+class RmagickTest < Test::Unit::TestCase
+  attachment_model Attachment
+
+  if Object.const_defined?(:Magick)
+    def test_should_create_image_from_uploaded_file
+      assert_created do
+        attachment = upload_file :filename => '/files/rails.png'
+        assert_valid attachment
+        assert !attachment.db_file.new_record? if attachment.respond_to?(:db_file)
+        assert  attachment.image?
+        assert !attachment.size.zero?
+        #assert_equal 1784, attachment.size
+        assert_equal 50,   attachment.width
+        assert_equal 64,   attachment.height
+        assert_equal '50x64', attachment.image_size
+      end
+    end
+    
+    def test_should_create_image_from_uploaded_file_with_custom_content_type
+      assert_created do
+        attachment = upload_file :content_type => 'foo/bar', :filename => '/files/rails.png'
+        assert_valid attachment
+        assert !attachment.image?
+        assert !attachment.db_file.new_record? if attachment.respond_to?(:db_file)
+        assert !attachment.size.zero?
+        #assert_equal 1784, attachment.size
+        assert_nil attachment.width
+        assert_nil attachment.height
+        assert_equal [], attachment.thumbnails
+      end
+    end
+    
+    def test_should_create_thumbnail
+      attachment = upload_file :filename => '/files/rails.png'
+      
+      assert_created do
+        basename, ext = attachment.filename.split '.'
+        thumbnail = attachment.create_or_update_thumbnail(attachment.create_temp_file, 'thumb', 50, 50)
+        assert_valid thumbnail
+        assert !thumbnail.size.zero?
+        #assert_in_delta 4673, thumbnail.size, 2
+        assert_equal 50,   thumbnail.width
+        assert_equal 50,   thumbnail.height
+        assert_equal [thumbnail.id], attachment.thumbnails.collect(&:id)
+        assert_equal attachment.id,  thumbnail.parent_id if thumbnail.respond_to?(:parent_id)
+        assert_equal "#{basename}_thumb.#{ext}", thumbnail.filename
+      end
+    end
+    
+    def test_should_create_thumbnail_with_geometry_strings
+      attachment = upload_file :filename => '/files/rails.png'
+      
+      assert_created do
+        basename, ext = attachment.filename.split '.'
+        { 'x50' => [39, 50], '25x25!' => [25, 25] }.each do |geo, (w, h)|
+          thumbnail = attachment.create_or_update_thumbnail(attachment.create_temp_file, 'thumb', geo)
+          assert_valid thumbnail
+          assert !thumbnail.size.zero?
+          assert_equal w, thumbnail.width
+          assert_equal h, thumbnail.height
+          assert_equal [thumbnail], attachment.thumbnails
+          assert_equal attachment.id,  thumbnail.parent_id if thumbnail.respond_to?(:parent_id)
+          assert_equal "#{basename}_thumb.#{ext}", thumbnail.filename
+        end
+      end
+    end
+    
+    def test_should_resize_image(klass = ImageAttachment)
+      attachment_model klass
+      assert_equal [50, 50], attachment_model.attachment_options[:resize_to]
+      attachment = upload_file :filename => '/files/rails.png'
+      assert_valid attachment
+      assert !attachment.db_file.new_record? if attachment.respond_to?(:db_file)
+      assert  attachment.image?
+      assert !attachment.size.zero?
+      #assert_in_delta 4673, attachment.size, 2
+      assert_equal 50, attachment.width
+      assert_equal 50, attachment.height
+    end
+    
+    test_against_subclass :test_should_resize_image, ImageAttachment
+    
+    def test_should_resize_image_with_geometry(klass = ImageOrPdfAttachment)
+      attachment_model klass
+      assert_equal 'x50', attachment_model.attachment_options[:resize_to]
+      attachment = upload_file :filename => '/files/rails.png'
+      assert_valid attachment
+      assert !attachment.db_file.new_record? if attachment.respond_to?(:db_file)
+      assert  attachment.image?
+      assert !attachment.size.zero?
+      #assert_equal 3915, attachment.size
+      assert_equal 39,   attachment.width
+      assert_equal 50,   attachment.height
+    end
+    
+    test_against_subclass :test_should_resize_image_with_geometry, ImageOrPdfAttachment
+    
+    def test_should_give_correct_thumbnail_filenames(klass = ImageWithThumbsFileAttachment)
+      attachment_model klass
+      assert_created 3 do
+        attachment = upload_file :filename => '/files/rails.png'
+        thumb      = attachment.thumbnails.detect { |t| t.filename =~ /_thumb/ }
+        geo        = attachment.thumbnails.detect { |t| t.filename =~ /_geometry/ }
+        
+        [attachment, thumb, geo].each { |record| assert_valid record }
+    
+        assert_match /rails\.png$/,          attachment.full_filename
+        assert_match /rails_geometry\.png$/, attachment.full_filename(:geometry)
+        assert_match /rails_thumb\.png$/,    attachment.full_filename(:thumb)
+      end
+    end
+    
+    test_against_subclass :test_should_give_correct_thumbnail_filenames, ImageWithThumbsFileAttachment
+    
+    def test_should_automatically_create_thumbnails(klass = ImageWithThumbsAttachment)
+      attachment_model klass
+      assert_created 3 do
+        attachment = upload_file :filename => '/files/rails.png'
+        assert_valid attachment
+        assert !attachment.size.zero?
+        #assert_equal 1784, attachment.size
+        assert_equal 55,   attachment.width
+        assert_equal 55,   attachment.height
+        assert_equal 2,    attachment.thumbnails.length
+        # assert_equal 1.0,  attachment.aspect_ratio
+        
+        thumb = attachment.thumbnails.detect { |t| t.filename =~ /_thumb/ }
+        assert !thumb.new_record?, thumb.errors.full_messages.join("\n")
+        assert !thumb.size.zero?
+        #assert_in_delta 4673, thumb.size, 2
+        assert_equal 50,   thumb.width
+        assert_equal 50,   thumb.height
+        # assert_equal 1.0,  thumb.aspect_ratio
+        
+        geo   = attachment.thumbnails.detect { |t| t.filename =~ /_geometry/ }
+        assert !geo.new_record?, geo.errors.full_messages.join("\n")
+        assert !geo.size.zero?
+        #assert_equal 3915, geo.size
+        assert_equal 50,   geo.width
+        assert_equal 50,   geo.height
+        # assert_equal 1.0,  geo.aspect_ratio
+      end
+    end
+    
+    test_against_subclass :test_should_automatically_create_thumbnails, ImageWithThumbsAttachment
+    
+    # same as above method, but test it on a file model
+    test_against_class :test_should_automatically_create_thumbnails, ImageWithThumbsFileAttachment
+    test_against_subclass :test_should_automatically_create_thumbnails_on_class, ImageWithThumbsFileAttachment
+    
+    def test_should_use_thumbnail_subclass(klass = ImageWithThumbsClassFileAttachment)
+      attachment_model klass
+      attachment = nil
+      assert_difference ImageThumbnail, :count do
+        attachment = upload_file :filename => '/files/rails.png'
+        assert_valid attachment
+      end
+      assert_kind_of ImageThumbnail,  attachment.thumbnails.first
+      if attachment.thumbnails.first.respond_to?(:parent)
+        assert_equal attachment.id,     attachment.thumbnails.first.parent.id
+        assert_kind_of FileAttachment,  attachment.thumbnails.first.parent
+      end
+      assert_equal 'rails_thumb.png', attachment.thumbnails.first.filename
+      assert_equal attachment.thumbnails.first.full_filename, attachment.full_filename(attachment.thumbnails.first.thumbnail),
+        "#full_filename does not use thumbnail class' path."
+      assert_equal attachment.destroy, attachment
+    end
+    
+    test_against_subclass :test_should_use_thumbnail_subclass, ImageWithThumbsClassFileAttachment
+    
+    def test_should_remove_old_thumbnail_files_when_updating(klass = ImageWithThumbsFileAttachment)
+      attachment_model klass
+      attachment = nil
+      assert_created 3 do
+        attachment = upload_file :filename => '/files/rails.png'
+      end
+    
+      old_filenames = [attachment.full_filename] + attachment.thumbnails.collect(&:full_filename)
+    
+      assert_not_created do
+        use_temp_file "files/rails.png" do |file|
+          attachment.filename        = 'rails2.png'
+          attachment.temp_paths.unshift File.join(fixture_path, file)
+          attachment.save
+          new_filenames = [attachment.reload.full_filename] + attachment.thumbnails.collect { |t| t.reload.full_filename }
+          new_filenames.each { |f| assert  File.exists?(f), "#{f} does not exist" }
+          old_filenames.each { |f| assert !File.exists?(f), "#{f} still exists" }
+        end
+      end
+    end
+    
+    test_against_subclass :test_should_remove_old_thumbnail_files_when_updating, ImageWithThumbsFileAttachment
+    
+    def test_should_delete_file_when_in_file_system_when_attachment_record_destroyed(klass = ImageWithThumbsFileAttachment)
+      attachment_model klass
+      attachment = upload_file :filename => '/files/rails.png'
+      filenames = [attachment.full_filename] + attachment.thumbnails.collect(&:full_filename)
+      filenames.each { |f| assert  File.exists?(f),  "#{f} never existed to delete on destroy" }
+      attachment.destroy
+      filenames.each { |f| assert !File.exists?(f),  "#{f} still exists" }
+    end
+    
+    test_against_subclass :test_should_delete_file_when_in_file_system_when_attachment_record_destroyed, ImageWithThumbsFileAttachment
+    
+    def test_should_have_full_filename_method(klass = FileAttachment)
+      attachment_model klass
+      attachment = upload_file :filename => '/files/rails.png'
+      assert_respond_to attachment, :full_filename
+    end
+    
+    test_against_subclass :test_should_have_full_filename_method, FileAttachment
+    
+    def test_should_overwrite_old_thumbnail_records_when_updating(klass = ImageWithThumbsAttachment)
+      attachment_model klass
+      attachment = nil
+      assert_created 3 do
+        attachment = upload_file :filename => '/files/rails.png'
+      end
+      assert_not_created do # no new db_file records
+        use_temp_file "files/rails.png" do |file|
+          attachment.filename             = 'rails2.png'
+          # The above test (#test_should_have_full_filename_method) to pass before be can set the temp_path below -- 
+          # #temp_path calls #full_filename, which is not getting mixed into the attachment.  Maybe we don't need to
+          # set temp_path at all?
+          #
+          # attachment.temp_paths.unshift File.join(fixture_path, file)
+          attachment.save!
+        end
+      end
+    end
+    
+    test_against_subclass :test_should_overwrite_old_thumbnail_records_when_updating, ImageWithThumbsAttachment
+    
+    def test_should_overwrite_old_thumbnail_records_when_renaming(klass = ImageWithThumbsAttachment)
+      attachment_model klass
+      attachment = nil
+      assert_created 3 do
+        attachment = upload_file :class => klass, :filename => '/files/rails.png'
+      end
+      assert_not_created do # no new db_file records
+        attachment.filename = 'rails2.png'
+        attachment.save
+        assert !attachment.reload.size.zero?
+        assert_equal 'rails2.png', attachment.filename
+      end
+    end
+    
+    test_against_subclass :test_should_overwrite_old_thumbnail_records_when_renaming, ImageWithThumbsAttachment
+
+    def test_should_handle_jpeg_quality
+      attachment_model ImageWithThumbsAttachment
+      attachment = upload_file :filename => '/files/rails.jpg'
+      full_size = attachment.size
+      attachment_model LowerQualityAttachment
+      attachment = upload_file :filename => '/files/rails.jpg'
+      lq_size = attachment.size
+      puts "FULL: #{full_size} - LQ: #{lq_size}"
+      assert lq_size <= full_size * 0.9, 'Lower-quality JPEG filesize should be congruently smaller'
+    end
+  else
+    def test_flunk
+      puts "RMagick not installed, no tests running"
+    end
+  end
+end

data/test/schema.rb

@@ -0,0 +1,134 @@
+ActiveRecord::Schema.define(:version => 0) do
+  create_table :attachments, :force => true do |t|
+    t.column :db_file_id,      :integer
+    t.column :parent_id,       :integer
+    t.column :thumbnail,       :string
+    t.column :filename,        :string, :limit => 255
+    t.column :content_type,    :string, :limit => 255
+    t.column :size,            :integer
+    t.column :width,           :integer
+    t.column :height,          :integer
+    t.column :aspect_ratio,    :float
+  end
+
+  create_table :file_attachments, :force => true do |t|
+    t.column :parent_id,       :integer
+    t.column :thumbnail,       :string 
+    t.column :filename,        :string, :limit => 255
+    t.column :content_type,    :string, :limit => 255
+    t.column :size,            :integer
+    t.column :width,           :integer
+    t.column :height,          :integer
+    t.column :type,            :string
+    t.column :aspect_ratio,    :float
+  end
+  
+  create_table :file_attachments_with_string_id, :id => false, :force => true do |t|
+    t.column :id,              :string
+    t.column :parent_id,       :string
+    t.column :thumbnail,       :string 
+    t.column :filename,        :string, :limit => 255
+    t.column :content_type,    :string, :limit => 255
+    t.column :size,            :integer
+    t.column :width,           :integer
+    t.column :height,          :integer
+    t.column :type,            :string
+    t.column :aspect_ratio,    :float
+  end
+
+  create_table :gd2_attachments, :force => true do |t|
+    t.column :parent_id,       :integer
+    t.column :thumbnail,       :string 
+    t.column :filename,        :string, :limit => 255
+    t.column :content_type,    :string, :limit => 255
+    t.column :size,            :integer
+    t.column :width,           :integer
+    t.column :height,          :integer
+    t.column :type,            :string
+  end
+
+  create_table :image_science_attachments, :force => true do |t|
+    t.column :parent_id,       :integer
+    t.column :thumbnail,       :string 
+    t.column :filename,        :string, :limit => 255
+    t.column :content_type,    :string, :limit => 255
+    t.column :size,            :integer
+    t.column :width,           :integer
+    t.column :height,          :integer
+    t.column :type,            :string
+  end
+
+  create_table :core_image_attachments, :force => true do |t|
+    t.column :parent_id,       :integer
+    t.column :thumbnail,       :string 
+    t.column :filename,        :string, :limit => 255
+    t.column :content_type,    :string, :limit => 255
+    t.column :size,            :integer
+    t.column :width,           :integer
+    t.column :height,          :integer
+    t.column :type,            :string
+  end
+  
+  create_table :mini_magick_attachments, :force => true do |t|
+    t.column :parent_id,       :integer
+    t.column :thumbnail,       :string 
+    t.column :filename,        :string, :limit => 255
+    t.column :content_type,    :string, :limit => 255
+    t.column :size,            :integer
+    t.column :width,           :integer
+    t.column :height,          :integer
+    t.column :type,            :string
+  end
+
+  create_table :mini_magick_attachments, :force => true do |t|
+    t.column :parent_id,       :integer
+    t.column :thumbnail,       :string 
+    t.column :filename,        :string, :limit => 255
+    t.column :content_type,    :string, :limit => 255
+    t.column :size,            :integer
+    t.column :width,           :integer
+    t.column :height,          :integer
+    t.column :type,            :string
+  end
+
+  create_table :orphan_attachments, :force => true do |t|
+    t.column :db_file_id,      :integer
+    t.column :filename,        :string, :limit => 255
+    t.column :content_type,    :string, :limit => 255
+    t.column :size,            :integer
+  end
+  
+  create_table :minimal_attachments, :force => true do |t|
+    t.column :size,            :integer
+    t.column :content_type,    :string, :limit => 255
+  end
+
+  create_table :db_files, :force => true do |t|
+    t.column :data, :binary
+  end
+
+  create_table :s3_attachments, :force => true do |t|
+    t.column :parent_id,       :integer
+    t.column :thumbnail,       :string 
+    t.column :filename,        :string, :limit => 255
+    t.column :content_type,    :string, :limit => 255
+    t.column :size,            :integer
+    t.column :width,           :integer
+    t.column :height,          :integer
+    t.column :type,            :string
+    t.column :aspect_ratio,    :float
+  end
+  
+  create_table :cloud_files_attachments, :force => true do |t|
+    t.column :parent_id,       :integer
+    t.column :thumbnail,       :string 
+    t.column :filename,        :string, :limit => 255
+    t.column :content_type,    :string, :limit => 255
+    t.column :size,            :integer
+    t.column :width,           :integer
+    t.column :height,          :integer
+    t.column :type,            :string
+    t.column :aspect_ratio,    :float
+  end
+  
+end

data/test/test_helper.rb

@@ -0,0 +1,153 @@
+
+$:.unshift(File.dirname(__FILE__) + '/../lib')
+
+ENV['RAILS_ENV'] = 'test'
+ENV['RAILS_ROOT'] ||= File.dirname(__FILE__) + '/../../../..'
+
+require 'test/unit'
+require File.expand_path(File.join(ENV['RAILS_ROOT'], 'config/environment.rb'))
+require 'active_record/fixtures'
+require 'action_controller/test_process'
+
+config = YAML::load(IO.read(File.dirname(__FILE__) + '/database.yml'))
+ActiveRecord::Base.logger = Logger.new(File.dirname(__FILE__) + "/debug.log")
+
+db_adapter = ENV['DB']
+
+# no db passed, try one of these fine config-free DBs before bombing.
+db_adapter ||= 
+  begin
+    require 'rubygems'
+    require 'sqlite'
+    'sqlite'
+  rescue MissingSourceFile
+    begin
+      require 'sqlite3'
+      'sqlite3'
+    rescue MissingSourceFile
+    end
+  end
+
+if db_adapter.nil?
+  raise "No DB Adapter selected.  Pass the DB= option to pick one, or install Sqlite or Sqlite3."
+end
+
+ActiveRecord::Base.establish_connection(config[db_adapter])
+
+load(File.dirname(__FILE__) + "/schema.rb")
+
+Test::Unit::TestCase.fixture_path = File.dirname(__FILE__) + "/fixtures"
+$LOAD_PATH.unshift(Test::Unit::TestCase.fixture_path)
+
+class Test::Unit::TestCase #:nodoc:
+  include ActionController::TestProcess
+  def create_fixtures(*table_names)
+    if block_given?
+      Fixtures.create_fixtures(Test::Unit::TestCase.fixture_path, table_names) { yield }
+    else
+      Fixtures.create_fixtures(Test::Unit::TestCase.fixture_path, table_names)
+    end
+  end
+
+  def setup
+    Attachment.saves = 0
+    DbFile.transaction { [Attachment, FileAttachment, OrphanAttachment, MinimalAttachment, DbFile].each { |klass| klass.delete_all } }
+    attachment_model self.class.attachment_model
+  end
+  
+  def teardown
+    FileUtils.rm_rf File.join(File.dirname(__FILE__), 'files')
+    # Files generated by random_tempfile_filename
+    FileUtils.rm_rf Dir['[0-9]*.{png,jpg}']
+  end
+
+  self.use_transactional_fixtures = true
+  self.use_instantiated_fixtures  = false
+
+  def self.attachment_model(klass = nil)
+    @attachment_model = klass if klass 
+    @attachment_model
+  end
+
+  def self.test_against_class(test_method, klass, subclass = false)
+    define_method("#{test_method}_on_#{:sub if subclass}class") do
+      klass = Class.new(klass) if subclass
+      attachment_model klass
+      send test_method, klass
+    end
+  end
+
+  def self.test_against_subclass(test_method, klass)
+    test_against_class test_method, klass, true
+  end
+
+  protected
+    def upload_file(options = {})
+      use_temp_file options[:filename] do |file|
+        att = attachment_model.create :uploaded_data => fixture_file_upload(file, options[:content_type] || 'image/png')
+        att.reload unless att.new_record?
+        return att
+      end
+    end
+
+    def upload_merb_file(options = {})
+      use_temp_file options[:filename] do |file|
+        att = attachment_model.create :uploaded_data => {"size" => file.size, "content_type" => options[:content_type] || 'image/png', "filename" => file, 'tempfile' => fixture_file_upload(file, options[:content_type] || 'image/png')}
+        att.reload unless att.new_record?
+        return att
+      end
+    end
+    
+    def use_temp_file(fixture_filename)
+      temp_path = File.join('/tmp', File.basename(fixture_filename))
+      FileUtils.mkdir_p File.join(fixture_path, 'tmp')
+      FileUtils.cp File.join(fixture_path, fixture_filename), File.join(fixture_path, temp_path)
+      yield temp_path
+    ensure
+      FileUtils.rm_rf File.join(fixture_path, 'tmp')
+    end
+
+    def assert_created(num = 1)
+      assert_difference attachment_model.base_class, :count, num do
+        if attachment_model.included_modules.include? DbFile
+          assert_difference DbFile, :count, num do
+            yield
+          end
+        else
+          yield
+        end
+      end
+    end
+    
+    def assert_not_created
+      assert_created(0) { yield }
+    end
+    
+    def should_reject_by_size_with(klass)
+      attachment_model klass
+      assert_not_created do
+        attachment = upload_file :filename => '/files/rails.png'
+        assert attachment.new_record?
+        assert attachment.errors.on(:size)
+        assert_nil attachment.db_file if attachment.respond_to?(:db_file)
+      end
+    end
+    
+    def assert_difference(object, method = nil, difference = 1)
+      initial_value = object.send(method)
+      yield
+      assert_equal initial_value + difference, object.send(method)
+    end
+    
+    def assert_no_difference(object, method, &block)
+      assert_difference object, method, 0, &block
+    end
+    
+    def attachment_model(klass = nil)
+      @attachment_model = klass if klass 
+      @attachment_model
+    end
+end
+
+require File.join(File.dirname(__FILE__), 'fixtures/attachment')
+require File.join(File.dirname(__FILE__), 'base_attachment_tests')

data/test/validation_test.rb

@@ -0,0 +1,55 @@
+require File.expand_path(File.join(File.dirname(__FILE__), 'test_helper'))
+
+class ValidationTest < Test::Unit::TestCase
+  def test_should_invalidate_big_files
+    @attachment = SmallAttachment.new
+    assert !@attachment.valid?
+    assert @attachment.errors.on(:size)
+    
+    @attachment.size = 2000
+    assert !@attachment.valid?
+    assert @attachment.errors.on(:size), @attachment.errors.full_messages.to_sentence
+    
+    @attachment.size = 1000
+    assert !@attachment.valid?
+    assert_nil @attachment.errors.on(:size)
+  end
+
+  def test_should_invalidate_small_files
+    @attachment = BigAttachment.new
+    assert !@attachment.valid?
+    assert @attachment.errors.on(:size)
+    
+    @attachment.size = 2000
+    assert !@attachment.valid?
+    assert @attachment.errors.on(:size), @attachment.errors.full_messages.to_sentence
+    
+    @attachment.size = 1.megabyte
+    assert !@attachment.valid?
+    assert_nil @attachment.errors.on(:size)
+  end
+  
+  def test_should_validate_content_type
+    @attachment = PdfAttachment.new
+    assert !@attachment.valid?
+    assert @attachment.errors.on(:content_type)
+
+    @attachment.content_type = 'foo'
+    assert !@attachment.valid?
+    assert @attachment.errors.on(:content_type)
+
+    @attachment.content_type = 'pdf'
+    assert !@attachment.valid?
+    assert_nil @attachment.errors.on(:content_type)
+  end
+
+  def test_should_require_filename
+    @attachment = Attachment.new
+    assert !@attachment.valid?
+    assert @attachment.errors.on(:filename)
+    
+    @attachment.filename = 'foo'
+    assert !@attachment.valid?
+    assert_nil @attachment.errors.on(:filename)
+  end
+end

data/vendor/red_artisan/core_image/filters/color.rb

@@ -0,0 +1,27 @@
+module RedArtisan
+  module CoreImage
+    module Filters
+      module Color
+        
+        def greyscale(color = nil, intensity = 1.00)
+          create_core_image_context(@original.extent.size.width, @original.extent.size.height)
+          
+          color = OSX::CIColor.colorWithString("1.0 1.0 1.0 1.0") unless color
+          
+          @original.color_monochrome :inputColor => color, :inputIntensity => intensity do |greyscale|
+            @target = greyscale
+          end
+        end
+        
+        def sepia(intensity = 1.00)
+          create_core_image_context(@original.extent.size.width, @original.extent.size.height)
+          
+          @original.sepia_tone :inputIntensity => intensity do |sepia|
+            @target = sepia
+          end
+        end
+        
+      end
+    end
+  end
+end

data/vendor/red_artisan/core_image/filters/effects.rb

@@ -0,0 +1,31 @@
+module RedArtisan
+  module CoreImage
+    module Filters
+      module Effects
+        
+        def spotlight(position, points_at, brightness, concentration, color)
+          create_core_image_context(@original.extent.size.width, @original.extent.size.height)
+          
+          @original.spot_light :inputLightPosition => vector3(*position), :inputLightPointsAt => vector3(*points_at), 
+                               :inputBrightness => brightness, :inputConcentration => concentration, :inputColor => color do |spot|
+            @target = spot
+          end
+        end
+        
+        def edges(intensity = 1.00)
+          create_core_image_context(@original.extent.size.width, @original.extent.size.height)
+          
+          @original.edges :inputIntensity => intensity do |edged|
+            @target = edged
+          end
+        end
+        
+        private
+        
+          def vector3(x, y, w)
+            OSX::CIVector.vectorWithX_Y_Z(x, y, w)
+          end
+      end
+    end
+  end
+end

data/vendor/red_artisan/core_image/filters/perspective.rb

@@ -0,0 +1,25 @@
+module RedArtisan
+  module CoreImage
+    module Filters
+      module Perspective
+        
+        def perspective(top_left, top_right, bottom_left, bottom_right)
+          create_core_image_context(@original.extent.size.width, @original.extent.size.height)
+          
+          @original.perspective_transform :inputTopLeft => top_left, :inputTopRight => top_right, :inputBottomLeft => bottom_left, :inputBottomRight => bottom_right do |transformed|
+            @target = transformed
+          end
+        end
+
+        def perspective_tiled(top_left, top_right, bottom_left, bottom_right)
+          create_core_image_context(@original.extent.size.width, @original.extent.size.height)
+          
+          @original.perspective_tile :inputTopLeft => top_left, :inputTopRight => top_right, :inputBottomLeft => bottom_left, :inputBottomRight => bottom_right do |tiled|
+            @target = tiled
+          end
+        end
+        
+      end
+    end
+  end
+end