fspath-mac 1.0.0 → 2.0.0

data/.gitignore

@@ -1,4 +1,5 @@
 /pkg/
+/*.gem
 
 /doc/
 /rdoc/

data/ext/fspath/mac/extconf.rb

@@ -0,0 +1,5 @@
+require 'mkmf'
+
+with_ldflags($LDFLAGS + ' -framework Foundation'){ true }
+
+create_makefile('fspath/mac/finder_label_number')

data/ext/fspath/mac/finder_label_number.c

@@ -0,0 +1,87 @@
+#include "ruby.h"
+#include <CoreServices/CoreServices.h>
+
+CFURLRef url_for_path(VALUE fsPath){
+	VALUE path = rb_iv_get(fsPath, "@path");
+	char *pathStr = StringValueCStr(path);
+
+	CFStringRef pathRef = CFStringCreateWithCString(NULL, pathStr, kCFStringEncodingUTF8);
+	if (!pathRef) {
+		rb_raise(rb_eRuntimeError, "Can't convert path");
+	}
+
+	CFURLRef urlRef = CFURLCreateWithFileSystemPath(NULL, pathRef, kCFURLPOSIXPathStyle, false);
+	CFRelease(pathRef);
+	if (!urlRef) {
+		rb_raise(rb_eRuntimeError, "Can't initialize url for path");
+	}
+
+	return urlRef;
+}
+
+void raise_cf_error(CFErrorRef errorRef){
+	CFStringRef errorDescriptionRef = CFErrorCopyDescription(errorRef);
+
+	const char *errorDescriptionC = CFStringGetCStringPtr(errorDescriptionRef, kCFStringEncodingUTF8);
+	if (errorDescriptionC) {
+		rb_raise(rb_eRuntimeError, errorDescriptionC);
+	} else {
+		CFIndex length = CFStringGetLength(errorDescriptionRef);
+		CFIndex maxSize = CFStringGetMaximumSizeForEncoding(length, kCFStringEncodingUTF8);
+		char *errorDescription = (char *) malloc(maxSize);
+		CFStringGetCString(errorDescriptionRef, errorDescription, maxSize, kCFStringEncodingUTF8);
+		rb_raise(rb_eRuntimeError, errorDescription);
+	}
+}
+
+static VALUE finder_label_number_get(VALUE self){
+	CFURLRef urlRef = url_for_path(self);
+
+	CFErrorRef errorRef;
+	CFNumberRef labelNumberRef;
+	bool ok = CFURLCopyResourcePropertyForKey(urlRef, kCFURLLabelNumberKey, &labelNumberRef, &errorRef);
+	CFRelease(urlRef);
+
+	if (!ok) {
+		raise_cf_error(errorRef);
+	}
+
+	SInt32 labelNumberValue;
+	CFNumberGetValue(labelNumberRef, kCFNumberSInt32Type, &labelNumberValue);
+	CFRelease(labelNumberRef);
+
+	return INT2NUM(labelNumberValue);
+}
+
+static VALUE finder_label_number_set(VALUE self, VALUE labelNumber){
+	if (TYPE(labelNumber) != T_FIXNUM) {
+		rb_raise(rb_eTypeError, "invalid type for labelNumber");
+	}
+
+	SInt32 labelNumberValue = NUM2INT(labelNumber);
+	if (labelNumberValue < 0 || labelNumberValue > 7) {
+		rb_raise(rb_eArgError, "label number can be in range 0..7");
+	}
+
+	CFURLRef urlRef = url_for_path(self);
+
+	CFNumberRef labelNumberRef = CFNumberCreate(NULL, kCFNumberSInt32Type, &labelNumberValue);
+
+	CFErrorRef errorRef;
+	bool ok = CFURLSetResourcePropertyForKey(urlRef, kCFURLLabelNumberKey, labelNumberRef, &errorRef);
+	CFRelease(labelNumberRef);
+	CFRelease(urlRef);
+
+	if (!ok) {
+		raise_cf_error(errorRef);
+	}
+
+	return Qnil;
+}
+
+void Init_finder_label_number() {
+	VALUE cFSPath = rb_const_get(rb_cObject, rb_intern("FSPath"));
+	VALUE mMac = rb_const_get(cFSPath, rb_intern("Mac"));
+	rb_define_private_method(mMac, "finder_label_number", finder_label_number_get, 0);
+	rb_define_private_method(mMac, "finder_label_number=", finder_label_number_set, 1);
+}

data/fspath-mac.gemspec

@@ -2,7 +2,7 @@
 
 Gem::Specification.new do |s|
   s.name        = 'fspath-mac'
-  s.version     = '1.0.0'
+  s.version     = '2.0.0'
   s.summary     = %q{FSPath methods for mac (move_to_trash, color labeling, spotlight comments, …)}
   s.homepage    = "http://github.com/toy/#{s.name}"
   s.authors     = ['Ivan Kuchin']
@@ -13,6 +13,7 @@ Gem::Specification.new do |s|
   s.files         = `git ls-files`.split("\n")
   s.test_files    = `git ls-files -- {test,spec,features}/*`.split("\n")
   s.executables   = `git ls-files -- bin/*`.split("\n").map{ |f| File.basename(f) }
+  s.extensions    = `git ls-files -- ext/**/extconf.rb`.split("\n")
   s.require_paths = %w[lib]
 
   s.add_dependency 'fspath', '~> 2.0.0'

data/lib/fspath/mac.rb

@@ -8,18 +8,18 @@ class FSPath
       mac_finder_alias.delete
     end
 
-    FINDER_LABEL_COLORS = [:none, :orange, :red, :yellow, :blue, :purple, :green, :gray].freeze
-    FINDER_LABEL_COLOR_ALIASES = {:grey => :gray}.freeze
-    # Get finder label (one of :none, :orange, :red, :yellow, :blue, :purple, :green and :gray)
+    FINDER_LABEL_COLORS = [nil, :grey, :green, :purple, :blue, :yellow, :red, :orange].freeze
+    FINDER_LABEL_COLOR_ALIASES = {:gray => :grey}.freeze
+    # Get finder label (one of nil, :orange, :red, :yellow, :blue, :purple, :green and :grey)
     def finder_label
-      FINDER_LABEL_COLORS[mac_finder_alias.label_index.get]
+      FINDER_LABEL_COLORS[finder_label_number]
     end
     # Set finder label (:grey is same as :gray, nil or false as :none)
     def finder_label=(color)
-      color = FINDER_LABEL_COLOR_ALIASES[color] || color || :none
+      color = FINDER_LABEL_COLOR_ALIASES[color] || color
       index = FINDER_LABEL_COLORS.index(color)
       raise "Unknown label #{color.inspect}" unless index
-      mac_finder_alias.label_index.set(index)
+      self.finder_label_number = index
     end
 
     # Get spotlight comment
@@ -55,3 +55,5 @@ class FSPath
 
   include Mac
 end
+
+require 'fspath/mac/finder_label_number'

data/spec/fspath/mac_spec.rb

@@ -17,42 +17,29 @@ describe FSPath::Mac do
 
     describe "finder labels" do
       describe "getting" do
-        it "should call label_index.get on mac_finder_alias" do
+        it "should call finder_label_number" do
           @path = FSPath('to_label')
-          @finder_alias = mock(:finder_alias)
-          @label_index = mock(:label_index)
 
-          @path.should_receive(:mac_finder_alias).and_return(@finder_alias)
-          @finder_alias.should_receive(:label_index).and_return(@label_index)
-          @label_index.should_receive(:get).and_return(0)
+          @path.should_receive(:finder_label_number).and_return(0)
 
           @path.finder_label
         end
 
         it "should return apporitate label" do
           @path = FSPath('to_label')
-          @finder_alias = mock(:finder_alias)
-          @label_index = mock(:label_index)
-
-          @path.stub!(:mac_finder_alias).and_return(@finder_alias)
-          @finder_alias.stub!(:label_index).and_return(@label_index)
 
           FSPath::FINDER_LABEL_COLORS.each_with_index do |label, index|
-            @label_index.stub!(:get).and_return(index)
+            @path.stub!(:finder_label_number).and_return(index)
             @path.finder_label.should == label
           end
         end
       end
 
       describe "setting" do
-        it "should call label_index.set on mac_finder_alias" do
+        it "should call finder_label_number=" do
           @path = FSPath('to_label')
-          @finder_alias = mock(:finder_alias)
-          @label_index = mock(:label_index)
 
-          @path.should_receive(:mac_finder_alias).and_return(@finder_alias)
-          @finder_alias.should_receive(:label_index).and_return(@label_index)
-          @label_index.should_receive(:set)
+          @path.should_receive(:finder_label_number=)
 
           @path.finder_label = nil
         end
@@ -60,16 +47,11 @@ describe FSPath::Mac do
         describe "index" do
           before do
             @path = FSPath('to_label')
-            @finder_alias = mock(:finder_alias)
-            @label_index = mock(:label_index)
-
-            @path.stub!(:mac_finder_alias).and_return(@finder_alias)
-            @finder_alias.stub!(:label_index).and_return(@label_index)
           end
 
           it "should call label_index.set with apporitate index" do
             FSPath::FINDER_LABEL_COLORS.each_with_index do |label, index|
-              @label_index.should_receive(:set).with(index).ordered
+              @path.should_receive(:finder_label_number=).with(index).ordered
               @path.finder_label = label
             end
           end
@@ -77,16 +59,14 @@ describe FSPath::Mac do
           it "should accept aliases" do
             FSPath::FINDER_LABEL_COLOR_ALIASES.each do |label_alias, label|
               index = FSPath::FINDER_LABEL_COLORS.index(label)
-              @label_index.should_receive(:set).with(index).ordered
+              @path.should_receive(:finder_label_number=).with(index).ordered
               @path.finder_label = label_alias
             end
           end
 
           it "should set to none when called with nil or false" do
-            [nil, false].each do |label|
-              @label_index.should_receive(:set).with(0).ordered
-              @path.finder_label = label
-            end
+            @path.should_receive(:finder_label_number=).with(0).ordered
+            @path.finder_label = nil
           end
 
           it "should raise when called with something else" do
@@ -98,6 +78,20 @@ describe FSPath::Mac do
           end
         end
       end
+
+      describe "number" do
+        it "should set label" do
+          @path = FSPath.temp_file_path
+
+          mac_finder_alias_colors = [nil, :orange, :red, :yellow, :blue, :purple, :green, :grey]
+          8.times do |label_number|
+            @path.send(:finder_label_number=, label_number)
+            @path.send(:finder_label_number).should == label_number
+            color = mac_finder_alias_colors[@path.mac_finder_alias.label_index.get]
+            FSPath::Mac::FINDER_LABEL_COLORS.index(color).should == label_number
+          end
+        end
+      end
     end
 
     describe "spotlight comments" do

data/spec/spec_helper.rb

@@ -1,2 +1,11 @@
+Dir.chdir File.join(File.dirname(__FILE__), '..') do
+  Dir['ext/**/extconf.rb'].each do |extconf|
+    Dir.chdir(File.dirname(extconf)) do
+      system('ruby extconf.rb') && system('make') or abort "failed compiling #{extconf}"
+    end
+  end
+end
+
 $:.unshift File.join(File.dirname(__FILE__), '..', 'lib')
+$:.unshift File.join(File.dirname(__FILE__), '..', 'ext')
 require 'rspec'

metadata

@@ -1,13 +1,13 @@
 --- !ruby/object:Gem::Specification 
 name: fspath-mac
 version: !ruby/object:Gem::Version 
-  hash: 23
+  hash: 15
   prerelease: 
   segments: 
-  - 1
+  - 2
   - 0
   - 0
-  version: 1.0.0
+  version: 2.0.0
 platform: ruby
 authors: 
 - Ivan Kuchin
@@ -15,7 +15,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2011-11-20 00:00:00 Z
+date: 2012-11-03 00:00:00 Z
 dependencies: 
 - !ruby/object:Gem::Dependency 
   name: fspath
@@ -65,14 +65,16 @@ description:
 email: 
 executables: []
 
-extensions: []
-
+extensions: 
+- ext/fspath/mac/extconf.rb
 extra_rdoc_files: []
 
 files: 
 - .gitignore
 - LICENSE.txt
 - README.markdown
+- ext/fspath/mac/extconf.rb
+- ext/fspath/mac/finder_label_number.c
 - fspath-mac.gemspec
 - lib/fspath/mac.rb
 - spec/fspath/mac_spec.rb
@@ -106,7 +108,7 @@ required_rubygems_version: !ruby/object:Gem::Requirement
 requirements: []
 
 rubyforge_project: fspath-mac
-rubygems_version: 1.8.11
+rubygems_version: 1.8.24
 signing_key: 
 specification_version: 3
 summary: "FSPath methods for mac (move_to_trash, color labeling, spotlight comments, \xE2\x80\xA6)"