pbxproject 0.1.0

data/lib/pbxproject.rb

@@ -0,0 +1,2 @@
+require 'pbxproject/pbxtypes'
+require 'pbxproject/pbxproject'

data/lib/pbxproject/cli.rb

@@ -0,0 +1,22 @@
+require 'pbxproject'
+require 'yaml'
+begin
+  require 'thor'
+rescue LoadError
+  $stderr.puts "To use CLI, please install Thor"
+  exit
+end
+
+module PBXProject
+  class CLI < Thor
+    desc "parse", "Parses pbxproject file and outputs its"
+    method_option :input
+    method_option :output
+    def parse
+      pbx = PBXProject.new :file => options[:input]
+      pbx.parse
+      
+      puts pbx.to_pbx
+    end
+  end
+end

data/lib/pbxproject/pbxproject.rb

@@ -0,0 +1,258 @@
+module PBXProject
+  class PBXProject
+    attr_reader :filename, :state
+    attr_accessor :archiveVersion, :objectVersion, :sections
+  
+    def initialize(args = {})
+      return unless args[:file]
+      raise "Project file cannot be read" unless File.file?(args[:file])
+
+      @filename = args[:file]
+    
+      # initialize our class
+      @sections = {}
+    
+      # and set that we're ready for parsing
+      @state = :ready
+      
+    end
+  
+    # This is one big parser
+    def parse
+      raise "Not ready for parsing" unless @state == :ready
+      pbx = File.open(@filename, 'r')
+    
+      line_num = 0
+      group_name = []
+      # group = []
+      section_type = nil
+      section = nil
+      item = nil
+      list_name = nil
+      list = nil
+      grouplist_name = nil
+      grouplist = nil
+    
+      # Read our file
+      pbx.each_line do |line|
+        if (line_num == 0 && !line.match(Regexp.new(Regexp.escape('// !$*UTF8*$!'))))
+          raise "Unkown file format"
+        end
+      
+        # Main level Attributes
+        if (group_name.count == 0 && !section_type && m = line.match(/\s+(.*?) = (.*?)( \/\* (.*) \*\/)?;/))
+          # d = { :value => m[2], :comment => m[4] }
+          self.instance_variable_set("@#{m[1]}", PBXTypes::BasicValue.new(:value => m[2], :comment => m[4]))
+        
+          next
+        end
+      
+        # Begin object group
+        if (m = line.match(/\s+(.*) = \{/))
+          group_name.push m[1]
+          # group.push {}
+        end
+      
+        # End our object group
+        if (line.match(/\s+\};/))
+          group_name.pop
+          # group.pop
+        
+          if (item && group_name.count < 2)
+            @sections[section_type].push item
+            item = nil
+          end
+        end
+      
+        # Begin section
+        if (m = line.match(/\/\* Begin (.*) section \*\//))
+          section_type = m[1]
+          @sections[section_type] = []
+
+          next
+        end
+      
+        # One line section data, simple. huh?
+        if (section_type && group_name.count < 3 && m = line.match(/\s+(.*?) (\/\* (.*?) \*\/ )?= \{(.*?)\};/))
+          begin
+            # cls = PBXProject::PBXProject::const_get(section_type)
+            # item = cls.new
+            item = eval("PBXTypes::#{section_type}").new
+        
+            item.guid = m[1]
+            item.comment = m[3]
+            m[4].scan(/(.*?) = (.*?)( \/\* (.*) \*\/)?; ?/).each do |v|
+              if (v[3])
+                # d = { :value => v[1], :comment => v[3]}
+                item.instance_variable_set("@#{v[0]}", PBXTypes::BasicValue.new(:value => v[1], :comment => v[3]))
+              else
+                item.instance_variable_set("@#{v[0]}", v[1])
+              end
+            end
+        
+            @sections[section_type].push item
+            item = nil
+          rescue NameError => e
+            puts e.inspect
+          end
+        
+          next
+        end
+      
+        # Multiline with lists
+        if (section_type && group_name.count < 3 && m = line.match(/\s+(.*?) (\/\* (.*?) \*\/ )?= \{/))
+          begin
+            # cls = PBXProject::PBXProject::const_get(section_type)
+            # item = cls.new
+            item = eval("PBXTypes::#{section_type}").new
+          
+            item.guid = m[1]
+            item.comment = m[3]
+          
+            # puts item.inspect
+          rescue NameError => e
+            puts e.inspect
+          end
+        
+          next
+        end
+      
+        # Next line in multiline
+        if (item && m = line.match(/\s+(.*?) = (.*)( \/\* (.*) \*\/)?;/))
+          if (group_name.count < 3)
+            # i = { :value => m[2], :comment => m[4] }
+            item.instance_variable_set("@#{m[1]}", PBXTypes::BasicValue.new(:value => m[2], :comment => m[4]))
+          else
+            grp = item.instance_variable_get("@#{group_name.last}")
+            if (!grp.kind_of?(Hash))
+              grp = {}
+            end
+            # grp[m[1]] = { :value => m[2], :comment => m[4] }
+            grp[m[1]] = PBXTypes::BasicValue.new :value => m[2], :comment => m[4]
+            item.instance_variable_set("@#{group_name.last}", grp)
+          end
+        
+          next
+        end
+      
+        # And the multiline list begin
+        if (item && m = line.match(/\s+(.*?) = \(/))
+          if (group_name.count < 3)
+            list_name = m[1]
+            list = []
+          else
+            grouplist_name = m[1]
+            grouplist = []
+          end
+        
+          next
+        end
+      
+        # And list items
+        if (item && m = line.match(/\s+(.*?)( \/\* (.*?) \*\/)?,/))
+          if (group_name.count < 3)
+            # i = { :item => m[1], :comment => m[3] }
+            list.push PBXTypes::BasicValue.new :value => m[1], :comment => m[3]
+          else
+            # i = { :item => m[1], :comment => m[3] }
+            grouplist.push PBXTypes::BasicValue.new :value => m[1], :comment => m[3]
+          end
+        
+          next
+        end
+      
+        if (item && line.match(/\s+\);/))
+          if (group_name.count < 3)
+            item.instance_variable_set("@#{list_name}", list)
+            list = nil
+            list_name = nil
+          else
+            grp = item.instance_variable_get("@#{group_name.last}")
+            if (!grp.kind_of?(Hash))
+              grp = {}
+            end
+            grp[grouplist_name] = grouplist
+            item.instance_variable_set("@#{group_name.last}", grp)
+            grouplist_name = nil
+            grouplist = nil
+          end
+        
+          next
+        end
+      
+        # End section
+        if (m = line.match(/\/\* End (.*) section \*\//))
+          section_type = nil
+          section = nil
+        end
+      
+        # Increse our line counter
+        line_num += 1
+      end
+    
+      @state = :parsed
+    
+      true
+    end
+  
+    def find_item args = {}
+      type = args[:type]
+      type_name = type.name.split('::').last || ''
+      args.delete(:type)
+      @sections.each do |t, arr|
+        next unless t == type_name
+
+        arr.each do |item|
+          args.each do |k,v|
+            key = item.instance_variable_get("@#{k}")
+            if (key && (key == v || (key.kind_of?(PBXTypes::BasicValue) && key.value == v)))
+              return item
+            end
+          end
+        end
+      end
+    
+      nil
+    end
+  
+    def add_item item, position = -1
+      type = item.class.name.split('::').last || ''
+    
+      # Ensure that we have array
+      if (@sections[type].nil?)
+        @sections[type] = []
+      end
+    
+      @sections[type].insert(position, item)
+    
+      item.guid
+    end
+  
+    def to_pbx ind = 0
+      ind = 2
+      pbx = ''
+    
+      pbx += "// !$*UTF8*$!\n{\n"
+      pbx += "\tarchiveVersion = %s;\n" % @archiveVersion.to_pbx
+      pbx += "\tclasses = {\n\t};\n"
+      pbx += "\tobjectVersion = %s;\n" % @objectVersion.to_pbx
+      pbx += "\tobjects = {\n"
+    
+      @sections.each do |type, val|
+        pbx += "\n/* Begin %s section */\n" % type
+
+        val.each do |item|
+          pbx += item.to_pbx ind
+        end
+      
+        pbx += "/* End %s section */\n" % type
+      end
+    
+      pbx += "\t};\n"
+      pbx += "\trootObject = %s;\n" % @rootObject.to_pbx
+      pbx += "}"
+    
+      pbx
+    end
+  end
+end

data/lib/pbxproject/pbxtypes.rb

@@ -0,0 +1,326 @@
+require 'digest/sha1'
+
+module PBXProject
+  module PBXTypes
+    
+    class BasicValue
+      attr_accessor :value, :comment
+    
+      def initialize(args = {})
+        @value = args[:value]
+        @comment = args[:comment]
+      end
+    
+      def to_pbx ind = 0
+        pbx = ''
+        pbx += "#{@value}"
+        pbx += " /* #{@comment} */" if @comment
+      
+        pbx
+      end
+    end
+  
+    class ISAType
+      attr_accessor :guid, :isa, :comment
+
+      def initialize args = {}
+        @isa = basic_value(self.class.name)
+        @guid = hashify(self)
+      
+        args.each do |k,v|
+          instance_variable_set("@#{k}", basic_value(v)) unless v.nil?
+        end
+      end
+
+      def basic_value(value = nil, comment = nil)
+        # { :value => value, :comment => comment }
+        BasicValue.new :value => value, :comment => comment
+      end
+
+      def hashify to_hash
+        # example
+        ex = 'C01713D713462F35007665FA'
+        "OEF" + (Digest::SHA1.hexdigest to_hash.to_s).upcase[4..ex.length]    
+      end
+
+      def self.has_fields(*fields)
+        _fields = []
+        fields.each do |f|
+          _fields.push f.id2name
+        
+          define_method(f) do
+            instance_variable_get("@#{f}")
+          end
+        end
+
+        define_method("pbxfields") do
+          _fields
+        end
+      end
+
+      def self.has_format(format)
+        _format = format
+      
+        define_method("format") do
+          _format
+        end
+      end
+    
+      def _pbx_indent(ind = 0)
+        "\t" * ind
+      end
+    
+      def _pbx_format
+        return nil unless defined? format
+        format
+      end
+    
+      def _pbx_newline
+        case _pbx_format
+        when :oneline
+          nil
+        else
+          "\n"
+        end
+      end
+    
+      def to_pbx(ind = 0)
+        pbx = ''
+        pbx += _pbx_indent(ind) + "#{@guid}"
+        pbx += " /* #{@comment} */" if @comment
+        pbx += " = {%s" % _pbx_newline
+      
+        ind += 1
+
+        # PBX fields
+        pbxfields.each do |fld|
+          field = self.instance_variable_get("@#{fld}")
+          case field.class.name
+          when "String"
+            pbx += (_pbx_format == :multiline ? _pbx_indent(ind) : "") + "%s = %s;%s%s" % [fld, field, (_pbx_newline == nil ? " " : ""),_pbx_newline]
+          when 'PBXProject::PBXTypes::BasicValue'
+            pbx += (_pbx_format == :multiline ? _pbx_indent(ind) : "") + "%s = %s;%s%s" % [fld, field.to_pbx, (_pbx_newline == nil ? " " : ""), _pbx_newline]
+          when "Array"
+            pbx += _pbx_indent(ind) + "%s = (%s" % [fld, _pbx_newline]
+
+            ind += 1
+            field.each do |item|
+              pbx += _pbx_indent(ind) + "%s,%s" % [item.to_pbx, _pbx_newline]
+            end
+            ind -= 1
+            pbx += _pbx_indent(ind) + ");%s" % _pbx_newline
+          when "NilClass"
+          when "Hash"
+            pbx += _pbx_indent(ind) + "%s = {%s" % [fld, _pbx_newline]
+          
+            ind += 1
+            field.each do |name, d|
+              case d.class.name
+              when "PBXProject::PBXTypes::BasicValue"
+                pbx += _pbx_indent(ind) + "%s = %s;%s%s" % [name, d.to_pbx, (_pbx_newline == nil ? " " : ""), _pbx_newline]
+              when "Array"
+                pbx += _pbx_indent(ind) + "%s = (%s" % [name, _pbx_newline]
+              
+                ind += 1
+                d.each do |item|
+                  pbx += _pbx_indent(ind) + "%s,%s" % [item.to_pbx, _pbx_newline]
+                end
+                ind -= 1
+              
+                pbx += _pbx_indent(ind) + ");%s" % _pbx_newline
+              end
+            end
+            ind -= 1
+          
+            pbx += _pbx_indent(ind) + "};%s" % _pbx_newline
+          else
+            puts "WHAT? #{field.class}"
+            puts "#{field}"
+          end
+        
+          # case self.instance_variable_get("@#{field}").class.name
+          # when "Hash"
+          #   h = self.instance_variable_get("@#{field}")
+          #   if (h.value)
+          #     # We have value-comment hash
+          #     h.comment = " /* #{h.comment} */" if h.comment != nil
+          # 
+          #     ind.times{print"\t"};
+          #     pbx += sprintf "%s = %s%s;", field, h[:value], h[:comment]
+          #     pbx += "\n" unless @format == :oneline
+          #   else
+          #     # We have dictionary
+          #     ind.times{print"\t"};
+          #     pbx += sprintf "%s = {", field
+          #     pbx += "\n" unless @format == :oneline
+          #     
+          #     ind += 1
+          #     h.each do |name, d|
+          #       case d.class.name
+          #       when "Hash"
+          #         ind.times{print"\t"}
+          #         d[:comment] = " /* #{d[:comment]} */" if d[:comment] != nil
+          #         pbx += sprintf "%s = %s%s;", name, d[:value], d[:comment]
+          #         pbx += "\n" unless @format == :oneline
+          #         
+          #       when "Array"
+          #         ind.times{print"\t"}
+          #         pbx += "#{name} = ("
+          #         pbx += "\n" unless @format == :oneline
+          #         
+          #         ind += 1
+          #         d.each do |r|
+          #           ind.times{print"\t"}
+          #           r[:comment] = " /* #{r[:comment]} */" if r[:comment] != nil
+          #           pbx += sprintf "%s%s,", r[:name], r[:item], r[:comment]
+          #           pbx += "\n" unless @format == :oneline
+          #           
+          #         end
+          #         ind -= 1
+          #         ind.times{print"\t"}
+          #         pbx += ");"
+          #         pbx += "\n" unless @format == :oneline
+          #         
+          #       end
+          #     end
+          #     ind -= 1
+          #     ind.times{print"\t"}; puts "};"
+          #   end
+          # when "Array"
+          #   a = self.instance_variable_get("@#{field}")
+          #   ind.times{print"\t"};
+          #   pbx += sprintf "%s = (%s", field, pbxformat
+          #   ind += 1
+          #   a.each do |r|
+          #     ind.times{print"\t"}
+          #     r[:comment] = " /* #{r[:comment]} */" if r[:comment] != nil
+          # 
+          #     printf "%s%s,\n", r[:item], r[:comment]
+          #   end
+          #   ind -= 1
+          #   ind.times{print"\t"}; print ");\n"
+          # end
+        end
+        ind -= 1
+
+        # ind.times{print"\t"}; pbx += "};%s" % _pbx_newline
+        if (_pbx_newline)
+          pbx += "\t" * ind + "};\n"
+        else
+          pbx += "};\n"
+        end
+      
+        pbx
+      end
+    end
+  
+    class PBXBuildFile < ISAType
+      has_fields :isa, :fileRef
+      has_format :oneline
+    
+      # def to_pbx(ind)
+      #   print "#{@guid}"
+      #   print " /* #{@comment} */" if @comment
+      #   print " = {isa = #{@isa}; "
+      #   if (@fileRef.kind_of?(Hash))
+      #     print "fileRef = #{@fileRef[:value]} /* #{@fileRef[:comment]} */"
+      #   else
+      #     print "fileRef = #{@fileRef}"
+      #   end
+      #   puts "; };"
+      # end
+    end
+
+    class PBXFileReference < ISAType
+      has_fields :isa, :fileEncoding, :explicitFileType, :lastKnownFileType, :includeInIndex, :name, :path, :sourceTree
+      has_format :oneline
+    
+      # def to_pbx(ind)
+      #   print "#{@guid}"
+      #   print " /* #{@comment} */" if @comment
+      #   print " = {"
+      #   ["isa", "fileEncoding", "explicitFileType", "lastKnownFileType", "includeInIndex", "name", "path", "sourceTree"].each do |var|
+      #     printf "%s = %s; ", var, self.instance_variable_get("@#{var}") if self.instance_variable_get("@#{var}") != nil
+      #   end
+      #   puts "};"
+      # end
+    end
+
+    class PBXFrameworksBuildPhase < ISAType
+      has_fields :isa, :buildActionMask, :files, :runOnlyForDeploymentPostprocessing
+      has_format :multiline
+    end
+
+    class PBXGroup < ISAType
+      has_fields :isa, :children, :name, :path, :sourceTree
+      has_format :multiline
+    
+      def add_children(fileref)
+        @children.push BasicValue.new(:value => fileref.guid, :comment => fileref.comment)
+      
+        fileref.guid
+      end
+    end
+
+    class PBXNativeTarget < ISAType
+      has_fields :isa, :buildConfigurationList, :buildPhases, :buildRules, :dependencies, :name,
+        :productName, :productReference, :productType
+      has_format :multiline
+
+      def add_build_phase build_phase, position = -1
+        @buildPhases.insert(position, BasicValue.new(:value => build_phase.guid, :comment => build_phase.comment))
+      end
+    end
+
+    class PBXProject < ISAType
+      has_fields :isa, :attributes, :buildConfigurationList, :compatibilityVersion, :developmentRegion, 
+        :hasScannedForEncodings, :knownRegions, :mainGroup, :productRefGroup, :projectDirPath, :projectRoot,
+        :targets
+      has_format :multiline
+    end
+
+    class PBXResourcesBuildPhase < ISAType
+      has_fields :isa, :buildActionMask, :files, :runOnlyForDeploymentPostprocessing
+      has_format :multiline
+    end
+
+    class PBXShellScriptBuildPhase < ISAType
+      has_fields :isa, :buildActionMask, :files, :inputPaths, :outputPaths, :runOnlyForDeploymentPostprocessing,
+        :shellPath, :shellScript, :showEnvVarsInLog
+      has_format :multiline
+
+      def initialize args = {}
+        super
+
+        # Defaults
+        @comment = "ShellScript"
+        @buildActionMask = basic_value(2147483647)
+        @files = []
+        @inputPaths = []
+        @outputPaths = []
+        @runOnlyForDeploymentPostprocessing = basic_value(0)
+      end
+    end
+
+    class PBXSourcesBuildPhase < ISAType
+      has_fields :isa, :buildActionMask, :files, :runOnlyForDeploymentPostprocessing
+      has_format :multiline
+    end
+
+    class PBXVariantGroup < ISAType
+      has_fields :isa, :children, :name, :sourceTree
+      has_format :multiline
+    end
+
+    class XCBuildConfiguration < ISAType
+      has_fields :isa, :buildSettings, :name
+      has_format :multiline
+    end
+
+    class XCConfigurationList < ISAType
+      has_fields :isa, :buildConfigurations, :defaultConfigurationIsVisible, :defaultConfigurationName
+      has_format :multiline
+    end
+  
+  end
+end