defgen 0.0.1

data/lib/defgen/installer.rb

@@ -0,0 +1,75 @@
+module Defgen
+  class Installer
+    def self.install(path, defaultfile, proj)
+      new(path, defaultfile, proj).install
+    end
+    
+    def initialize path, defaultfile, proj
+      self.path, self.defaultfile, self.proj = path, defaultfile, proj
+    end
+    
+    def install
+      install_files
+      configure_xcode
+      proj.save
+    end
+    
+    private
+    
+    attr_accessor :path, :defaultfile, :proj
+    
+    def install_files
+      FileUtils.mkdir_p properties_path
+      
+      { '.h' => defaultfile.to_iface, '.m' => defaultfile.to_imp }.each do |ext, content|
+        File.open("#{file_path}#{ext}", 'w') do |f| 
+          f.puts content
+        end
+      end
+    end
+    
+    def configure_xcode
+      return if proj.objects.map { |o| o.name if o.respond_to? :name }.include? "#{file_name}.h"
+
+      main_group.new_file "#{file_path}.h", properties_group
+      implementation = main_group.new_file "#{file_path}.m", properties_group
+      main_target.source_build_phase.add_file_reference implementation
+    end
+    
+    def properties_path
+      "#{File.dirname(path)}/#{target_name}/#{prefix}Properties"
+    end
+    
+    def properties_group
+      "#{prefix}Properties"
+    end
+    
+    def properties_group_path
+      "#{main_target_name}/#{properties_group}"
+    end
+    
+    def file_path
+      "#{properties_path}/#{file_name}"
+    end
+    
+    def file_name
+      "NSUserDefaults+#{prefix}Properties"
+    end
+    
+    def prefix
+      proj.prefix.upcase
+    end
+    
+    def main_group
+      proj.main_group
+    end
+    
+    def main_target
+      proj.main_target
+    end
+    
+    def target_name
+      main_target.name
+    end
+  end
+end

data/lib/defgen/property/attributes.rb

@@ -0,0 +1,29 @@
+module Defgen
+  class Property
+    class UnsupportedOwnershipError < ArgumentError; end
+    class Attributes
+      VALID_OWNERSHIPS = [:strong, :weak, :assign, :unsafe_unretained, :retain, :copy]
+      attr_accessor :ownership
+      
+      def initialize
+        @ownership = :strong
+      end
+      
+      def ownership= ownership
+        raise UnsupportedOwnershipError unless ownership.nil? || VALID_OWNERSHIPS.include?(ownership)
+        @ownership = ownership
+      end
+      
+      VALID_OWNERSHIPS.each do |ownership|        
+        # Turn valid ownerships into predicate methods. e.g. strong?
+        define_method "#{ownership}?" do
+          instance_variable_get("@ownership") == ownership
+        end
+      end
+      
+      def to_s
+        "(#{['nonatomic', ownership].compact.join(', ')})"
+      end
+    end
+  end
+end

data/lib/defgen/property.rb

@@ -0,0 +1,30 @@
+module Defgen
+  class Property
+    VALID_TYPES = ['NSData *', 'NSArray *', 'BOOL ', 'NSDictionary *', 'float ', 'NSInteger ', 'id ', 'NSString *', 'double ', 'NSURL *']
+    attr_accessor :name, :objc_type, :message_prefix, :prefix, :attributes, :object_setter
+        
+    def initialize
+      self.attributes = Attributes.new
+      yield self, attributes if block_given?
+    end
+        
+    def objc_type= objc_type
+      raise ArgumentError unless VALID_TYPES.include? objc_type
+      @objc_type = objc_type
+    end
+    
+    def key
+      "#{prefix.upcase}#{name.upcase_first}"
+    end
+    
+    def parameter
+      name
+    end
+    
+    def get_binding
+      binding
+    end
+  end
+end
+
+require 'defgen/property/attributes'

data/lib/defgen/string_ext.rb

@@ -0,0 +1,5 @@
+class String
+  def upcase_first
+    self.dup.tap { |string| string[0] = string[0].upcase }
+  end
+end

data/lib/defgen/version.rb

@@ -0,0 +1,3 @@
+module Defgen
+  VERSION = "0.0.1"
+end

data/lib/defgen/xcodeproj_adapter.rb

@@ -0,0 +1,48 @@
+require 'xcodeproj'
+
+module Defgen
+  class XcodeprojAdapter
+    def initialize proj, path
+      @proj, @path = proj, path
+    end
+    
+    def name
+      @proj.targets.first.name
+    end
+    
+    def prefix
+      prefix = root_object.attributes['CLASSPREFIX']
+      if prefix.nil? || prefix.empty?
+        'PS'
+      else
+        prefix.upcase
+      end
+    end
+    
+    def objects
+      @proj.objects
+    end
+    
+    def organization
+      root_object.attributes['ORGANIZATIONNAME']
+    end
+    
+    def main_group
+      root_object.main_group.groups.first
+    end
+    
+    def main_target
+      root_object.targets.first
+    end
+    
+    def save
+      @proj.save_as @path
+    end
+    
+    private
+    
+    def root_object
+      @proj.root_object
+    end
+  end
+end

data/lib/defgen.rb

@@ -0,0 +1,14 @@
+module Defgen
+end
+
+require 'defgen/string_ext'
+require 'defgen/cli'
+require 'defgen/decorators'
+require 'defgen/defaultfile'
+require 'defgen/defaultfile_builder'
+require 'defgen/defaultfile_parser'
+require 'defgen/installer'
+require 'defgen/generators'
+require 'defgen/property'
+require 'defgen/version'
+require 'defgen/xcodeproj_adapter'

data/spec/integration/defaultfile_parse_spec.rb

@@ -0,0 +1,28 @@
+require 'support/spec_helper'
+require 'defgen/defaultfile'
+
+module Defgen
+  describe 'Defaultfile.parse' do
+    
+    # [
+    #   { prefix: 'bool',       name: 'valid',       objc_type: 'BOOL',          ownership: :assign },
+    #   { prefix: 'array',      name: 'collection',  objc_type: 'NSArray *',      ownership: :strong },
+    #   { prefix: 'data',       name: 'someData',    objc_type: 'NSData *',       ownership: :strong },
+    #   { prefix: 'dictionary', name: 'options',     objc_type: 'NSDictionary *', ownership: :strong },
+    #   { prefix: 'float',      name: 'ratio',       objc_type: 'float',         ownership: :assign },
+    #   { prefix: 'integer',    name: 'count',       objc_type: 'NSInteger',     ownership: :assign },
+    #   { prefix: 'object',     name: 'someObject',  objc_type: 'id',            ownership: :strong },
+    #   { prefix: 'string',     name: 'user_name',   objc_type: 'NSString *',     ownership: :copy   },
+    #   { prefix: 'double',     name: 'ratio',       objc_type: 'double',        ownership: :assign },
+    #   { prefix: 'url',        name: 'someWebsite', objc_type: 'NSURL *',        ownership: :strong },
+    # ].each do |options|
+    #   it "creates a valid #{options[:prefix]}" do
+    #     result = Defaultfile.parse "#{options[:prefix]} '#{options[:name]}'"
+    #     result.name.should eq(options[:name])
+    #     result.message_prefix.should eq(options[:prefix])
+    #     result.objc_type.should eq(options[:objc_type])
+    #     result.attributes.ownership.should eq(options[:ownership])
+    #   end
+    # end
+  end
+end

data/spec/support/property_accessor_examples.rb

@@ -0,0 +1,12 @@
+require 'support/spec_helper'
+
+module Defgen
+  shared_examples "property accessors" do
+    it { should respond_to :name }
+    it { should respond_to :objc_type }
+    it { should respond_to :message_prefix }
+    it { should respond_to :attributes }
+    it { should respond_to :object_setter }
+    it { should respond_to :parameter }
+  end
+end

data/spec/support/property_examples.rb

@@ -0,0 +1,58 @@
+require 'support/spec_helper'
+require 'defgen/property'
+
+module Defgen
+  shared_examples "a property" do
+    let(:property) { described_class.new }
+  
+    it { should respond_to :name }
+    it { should respond_to :objc_type }
+    it { should respond_to :message_prefix }
+    it { should respond_to :attributes }
+    it { should respond_to :object_setter }
+    it { should respond_to :parameter }
+  
+    specify { expect { |b| described_class.new(&b) }.to yield_control }
+  
+    it "should be able to yield on new" do
+      expect {
+        described_class.new do |property, attributes|
+          property.objc_type = 'NSData *'
+        end
+      }.to_not raise_error
+      
+      described_class.new do |property, attributes|
+        property.should respond_to :name
+      end
+    end
+
+    describe "objc_type=" do
+      good_types = Property::VALID_TYPES
+      bad_types  = ['Test *', 'NSURLConnection *']
+      
+      good_types.each do |type|
+        it "should allow the objc_type #{type}" do
+          expect { property.objc_type = type }.to_not raise_error
+        end
+      end
+    
+      bad_types.each do |type|
+        it "should not allow the objc_type #{type}" do
+          expect { property.objc_type = type }.to raise_error ArgumentError
+        end
+      end
+    end
+    
+    [
+      [ 'test',        'PSTest'],
+      [ 'isValid',     'PSIsValid'],
+      [ 'under_score', 'PSUnder_score']
+    ].each do |name, expected|
+      it "returns an appropriate key for #{name}" do
+        property.name   = name
+        property.prefix = 'ps'
+        property.key.should eq(expected)
+      end
+    end
+  end
+end

data/spec/support/spec_helper.rb

@@ -0,0 +1,2 @@
+require 'bundler/setup'
+require 'defgen'

data/spec/unit/decorators/getter_decorator_spec.rb

@@ -0,0 +1,31 @@
+require 'support/spec_helper'
+require 'support/property_accessor_examples'
+require 'defgen/property'
+require 'defgen/decorators/getter_decorator'
+
+module Defgen
+  describe GetterDecorator do
+    include_examples "property accessors"
+    
+    before do
+      @property = Property.new
+    end
+    
+    subject(:decorator) { GetterDecorator.new(@property) }
+    
+    [
+      ['NSData *', 'NSData *'],
+      ['BOOL ',    'BOOL']
+    ].each do |input, output|
+      it "strips white space from the objc_type" do
+        @property.objc_type = input
+        decorator.objc_type.should eq(output)
+      end
+    end
+    
+    it "downcases the prefix" do
+      @property.prefix = 'PS'
+      decorator.prefix.should eq('ps')
+    end
+  end
+end

data/spec/unit/decorators/setter_decorator_spec.rb

@@ -0,0 +1,42 @@
+require 'support/spec_helper'
+require 'support/property_accessor_examples'
+require 'defgen/property'
+require 'defgen/decorators/setter_decorator'
+
+module Defgen
+  describe SetterDecorator do
+    include_examples "property accessors"
+    
+    before do
+      @property = Property.new
+    end
+    
+    subject(:decorator) { SetterDecorator.new(@property) }
+    
+    [
+      ['ps', 'Ps'],
+      ['PS', 'Ps']
+    ].each do |input, expected|
+      it "camelizes prefix" do
+        @property.prefix = input
+        decorator.prefix.should eq(expected)
+      end
+    end
+    
+    [
+      ['data',  'Data'],
+      ['bool',  'Bool']
+    ].each do |message_prefix, expected|
+      it "generates a camalized message_prefix '#{expected}" do
+        @property.message_prefix = message_prefix
+        decorator.message_prefix.should eq(expected)
+      end
+    end
+    
+    it "uses an Object setter" do
+      @property.object_setter  = true
+      @property.message_prefix = 'Bool'
+      decorator.message_prefix.should eq('Object')
+    end
+  end
+end

data/spec/unit/defaultfile_builder_spec.rb

@@ -0,0 +1,12 @@
+require 'support/spec_helper'
+require 'defgen/defaultfile_builder'
+
+module Defgen
+  describe DefaultfileBuilder do
+    subject(:builder) { DefaultfileBuilder.new }
+    
+    it { should respond_to :parser }
+    # it { should respond_to :project_settings }
+    it { should respond_to :build }
+  end
+end

data/spec/unit/defaultfile_parser_spec.rb

@@ -0,0 +1,42 @@
+require 'support/spec_helper'
+require 'defgen/defaultfile_parser'
+require 'defgen/defaultfile'
+
+module Defgen
+  describe DefaultfileParser do
+    subject(:defaultfile_parser) { DefaultfileParser.new }
+    
+    it { DefaultfileParser.should respond_to :parse }
+    
+    %w(array bool data dictionary float integer object string double url).each do |method|
+      it { should respond_to method }
+    end
+    
+    it "returns a Enumerable" do
+      DefaultfileParser.parse('').should be_a_kind_of Enumerable
+    end
+    
+    [
+      [ 'array',      'array',      'NSArray *',      :strong, true  ],
+      [ 'bool',       'bool',       'BOOL ',          :assign, false ],
+      [ 'data',       'data',       'NSData *',       :strong, true  ],
+      [ 'dictionary', 'dictionary', 'NSDictionary *', :strong, true  ],
+      [ 'float',      'float',      'float ',         :assign, false ],
+      [ 'integer',    'integer',    'NSInteger ',     :assign, false ],
+      [ 'object',     'object',     'id ',            :strong, true  ],
+      [ 'string',     'string',     'NSString *',     :copy,   true  ],
+      [ 'double',     'double',     'double ',        :assign, false ],
+      [ 'url',        'URL',        'NSURL *',        :strong, false ]
+    ].each do |method_name, prefix, objc_type, ownership, object_setter|
+      it "parses the string #{method_name} 'iVar'" do
+        property = defaultfile_parser.parse("#{method_name} 'iVar'").first
+      
+        property.name.should eq('iVar')
+        property.object_setter.should eq(object_setter)
+        property.message_prefix.should eq(prefix)
+        property.objc_type.should eq(objc_type)
+        property.attributes.ownership.should eq(ownership)
+      end
+    end
+  end
+end

data/spec/unit/defautfile_spec.rb

@@ -0,0 +1,11 @@
+require 'support/spec_helper'
+require 'defgen/defaultfile'
+
+module Defgen
+  describe Defaultfile do
+    subject(:defaultfile) { Defaultfile.new [], nil }
+    
+    it { should respond_to :to_iface }
+    it { should respond_to :to_imp }
+  end
+end

data/spec/unit/property/attributes_spec.rb

@@ -0,0 +1,48 @@
+require 'support/spec_helper'
+require 'defgen/property/attributes'
+
+module Defgen
+  class Property
+    describe Attributes do
+      subject(:attributes) { Attributes.new }
+      
+      it { should respond_to :ownership }
+                        
+      Attributes::VALID_OWNERSHIPS.each do |semantic|
+        it "creates the predicate method #{semantic}?" do
+          should respond_to "#{semantic}?"
+        end
+      end
+      
+      it "uses strong as the default ownership" do
+        attributes.ownership.should == :strong
+      end
+      
+      describe "ownerships=" do
+        specify { expect { attributes.ownership = :a }.to raise_error UnsupportedOwnershipError }
+        
+        Attributes::VALID_OWNERSHIPS.each do |semantic|
+          it "allows an ownership type of #{semantic}" do
+            expect { attributes.ownership = semantic }.to_not raise_error
+          end
+        end
+      end
+      
+      describe "to_s" do
+        it "should default to (nonatomic, strong)" do
+          attributes.to_s.should eq('(nonatomic, strong)')
+        end
+        
+        it "should include correct ownership" do
+          attributes.ownership = :weak
+          attributes.to_s.should eq('(nonatomic, weak)')
+        end
+        
+        it "should allow nil setter semantic" do
+          attributes.ownership = nil
+          attributes.to_s.should eq('(nonatomic)')
+        end
+      end
+    end
+  end
+end

data/spec/unit/property/property_spec.rb

@@ -0,0 +1,10 @@
+require 'support/spec_helper'
+require 'support/property_examples'
+require 'defgen/property'
+
+module Defgen
+  describe Property do
+    it_behaves_like "a property"
+    subject(:property) { Property.new }
+  end
+end

data/spec/unit/string_ext_spec.rb

@@ -0,0 +1,17 @@
+require 'support/spec_helper'
+require 'defgen/string_ext'
+
+module Defgen
+  describe String do
+    [
+      [ 'HEY', 'HEY' ],
+      [ 'Hey', 'Hey' ],
+      [ 'hey', 'Hey' ],
+      [ 'hEy', 'HEy' ]
+    ].each do |input, expected|
+      it "upcases the first letter of #{input}" do
+        input.upcase_first.should eq(expected)
+      end
+    end
+  end
+end

data/spec/unit/xcodeproj_adapter_spec.rb

@@ -0,0 +1,10 @@
+require 'support/spec_helper'
+require 'defgen/xcodeproj_adapter'
+
+module Defgen
+  describe XcodeprojAdapter do
+    it "takes a name, or" do
+      
+    end
+  end
+end