tm_bundle_support 0.0.1

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: 18b7a29af1e0c9e5131802a604c3d59e665effab
+  data.tar.gz: 61c2739bce6ad29a9d58ff1dbe131d6baa3be8a4
+SHA512:
+  metadata.gz: 59788c4fd619fe1fb0579a6190b2d7dd0ce08ed343113e23c52fb5adf741c219454b61a4e60644c1e927839cbfe590632a7e9c3b75d0fcc7563ba799f2d2e3be
+  data.tar.gz: 8fca42f07ef672b1f062f974bdbf37efaeb093330d9fae339605fc4b2eed63c3bad3170db390dfaf5ab008255d3ecc8d031f7faa8344951ced349bd798d38476

data/bin/tm_bundle

@@ -0,0 +1,7 @@
+#!/usr/bin/env ruby -roptparse -rpathname -ryaml
+
+lib = File.expand_path('../../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+
+require "tm_bundle_support"
+require "tm_bundle/command"

data/lib/tm_bundle.rb

@@ -0,0 +1,107 @@
+require "active_support"
+require "active_support/core_ext"
+require "active_support/dependencies/autoload"
+require "tm_bundle/plutil"
+
+class TMBundle
+  extend ActiveSupport::Autoload
+  
+  eager_autoload do
+    autoload :Menu, "tm_bundle/menu"
+  end
+  
+  class Action
+    attr_accessor :path, :data
+    def initialize(path)
+      @path = path
+      @data = Plutil.load_json(path)
+    end
+    
+    def inspect
+      "#{self.class.name}:> #{data['name']} > `#{path.basename}`"
+    end
+    
+    def expected_path
+      @expected_path ||= data['name'].gsub(/[.:\/]+/, '.' => '_', ':' => '', '/' => '') + path.extname
+    end
+    
+    def unmatching_path?
+      expected_path != path.basename.to_s
+    end
+    
+    def method_missing(meth, *args, &blk)
+      meth_name = meth.to_s
+      if @data.key?(meth_name) 
+        @data[meth_name]
+      else 
+        super
+      end
+    end
+  end
+  class Command < Action; end
+  class Snippet < Action; end
+  class Macro < Action; end
+  
+  attr_accessor :path, :actions, :data, :menu
+  
+  def initialize(path = nil)
+    self.path    = path ? Pathname.new(path) : Pathname.pwd
+    self.data    = Plutil.load_json(@path/'info.plist')
+    self.menu    = Menu.new(data['mainMenu'], @path)
+    self.actions = []
+    locate_actions
+    fill_missing_menu_names!
+    # menu.write_yaml_hierarchy!
+  end
+  
+  def locate_actions
+    Pathname.glob("#{path}/{Commands,Snippets,Macros}/*.{plist,tm{Command,Snippet}}")
+      .group_by {|p| p.dirname.basename.to_s }
+      .each do |group, files|
+        # p group.downcase.to_sym, actions
+        files.each do |pathname|
+          actions << TMBundle.const_get(group.singularize.to_sym).new(pathname)
+        end
+      end
+  end
+  
+  def fix_names!
+    actions.select(&:unmatching_path?).each do |action|
+      action.path.rename(action.path.dirname/action.expected_path)
+    end
+  end
+  
+  def fill_missing_menu_names!
+    actions.each do |action|
+      if item = menu.uuids[action.uuid]
+        item.name ||= action.name
+      else
+        Menu.find_or_create_new_item(action.uuid, 0, name: action.name)
+      end
+    end
+  end
+  
+  def menu_export!(prefix)
+    fill_missing_menu_names!
+    menu.write_yaml_hierarchy!(prefix && "-#{prefix}")
+  end
+  
+  def save_plist!(type = :default)
+    fill_missing_menu_names!
+    
+    file = case type
+           when :last  then Pathname.glob((path/"menu-*.yml").to_s).last
+           when String then path/"menu-#{type}.yml"
+                       else path/"menu.yml" end
+    
+    hash = menu.read_yaml_hieararchy! file
+    xml  = process_xml_output Plutil::JSON.dump(hash)
+    puts Plutil.replace(@path/'info.plist', 'mainMenu', xml, &:read)
+  end
+  
+  def process_xml_output(xml)
+    xml.lines[3...-1]
+      .join
+      .gsub(/(?<=$\n|\t)\t/, "\n\t" => "\n", "\t" => "  ")
+  end
+end

data/lib/tm_bundle/command.rb

@@ -0,0 +1,36 @@
+# params[:a] = true   # -a
+# params[:b] = "1"    # -b1
+# params[:foo] = "1"  # --foo
+# params[:bar] = "x"  # --bar x
+# params[:zot] = "z"  # --zot Z
+
+def start
+  TMBundle.eager_load!
+  @tmb = TMBundle.new
+  yield
+end
+
+case ARGV.shift
+when "fix-names"
+  start {@tmb.fix_names!}
+when "menu" 
+  case ARGV.shift
+  when "export"
+    params = ARGV.getopts("fp:")
+    prefix = params['p'] || Time.now.to_formatted_s(:number) unless params['f']
+    start{
+      p params            
+      @tmb.menu_export!(prefix)
+    }
+  when "apply"
+    start {
+      params = ARGV.getopts("v:", "last")
+      type = params['last'] || params['v']
+      @tmb.save_plist! type
+    }
+  else
+    puts " (export,apply)"
+  end
+else
+  puts " (fix-names,menu)"
+end

data/lib/tm_bundle/item.rb

@@ -0,0 +1,68 @@
+class TMBundle
+  class Menu
+    class Item
+      attr_accessor :uuid, :name, :items, :exclude, :parent, :order
+      def initialize(uuid, order, name: nil, items: [], parent: nil)
+        @exclude = false
+        self.uuid   = uuid
+        self.name   = name
+        self.items  = items
+        self.parent = parent
+        self.order  = order
+      end
+    
+      def checkout(options = {})
+        self.name ||= options[:name]
+        self.parent ||= options[:parent]
+        self.order ||= options[:order]
+        self.items = Array.wrap(options[:items])
+        self
+      end  
+    
+      def items=(uuids)
+        @items = process_items(uuids)
+      end
+    
+      def process_items(uuids)
+        uuids.map.with_index{|id, index| Menu.find_or_create_new_item(id, index, parent: uuid) }
+      end
+  
+      def eql?(other)
+        uuid == other.uuid
+      end
+      
+      def inspect
+        "#{order||:nil}> * #{name || uuid}"
+      end
+      
+      def name?
+        name.present?
+      end
+    
+      def items; @items ||= []; end
+      def to_s; name; end
+      def root?; !@parent; end
+      def separator?; false; end
+    end
+  
+    class Separator < Item
+      def inspect
+        "#{order}> — #{name}"
+      end
+      
+      def initialize(uuid, order, options = {})
+        @exclude = false
+        self.uuid = uuid
+        self.name = uuid
+        self.order = order
+        self.parent = options[:parent]
+      end
+    
+      def eql?
+        order == order && parent == parent
+      end
+      
+      def separator?; true end
+    end    
+  end
+end

data/lib/tm_bundle/menu.rb

@@ -0,0 +1,90 @@
+class TMBundle
+  class Menu
+    extend ActiveSupport::Autoload
+    
+    eager_autoload do
+      autoload :Item,      "tm_bundle/item"
+      autoload :Separator, "tm_bundle/item"
+    end
+    
+    cattr_accessor(:uuids){ Hash[] }
+    cattr_accessor(:items){ Set.new }
+    
+    def self.find_or_create_new_item(uuid, order, attributes = {})
+      item = if uuid.squeeze == '-'
+        Separator.new(uuid, order, attributes) 
+      elsif exists?(uuid)
+        uuids[uuid].checkout(attributes.to_h)
+      else 
+        Item.new(uuid, order, attributes.to_h)
+      end
+      
+      items.add item if item.is_a?(Item) && item.root?
+      unless item.is_a? Separator
+        uuids[uuid] ||= item
+      end
+      item
+    end
+    
+    def self.exists?(uuid)
+      uuids.key? uuid
+    end
+    
+    def initialize(tree, path)
+      @path = path
+      submenus, items, @excludedItems = *tree.values_at("submenus", "items", "excludedItems")
+      process_subtree(submenus)
+    end
+    
+    def process_subtree(submenus)
+      submenus.each do |uuid, hash|
+        self.class.find_or_create_new_item(uuid, submenus.keys.index(uuid), hash.symbolize_keys)
+      end
+    end
+    
+    def write_yaml_hierarchy!(prefix = nil)
+      p prefix
+      tree = make_hash_tree! uuids.values.select(&:root?)
+      yaml = tree.to_yaml.gsub(/^(.*)\s*$\n\s*:uuid:(.*)$/){|s,n| "%-60s # %s" % [$1, $2] }
+      (Pathname.new(@path)/"menu#{prefix}.yml").write(yaml)
+    end
+    
+    def read_yaml_hieararchy!(file)
+      yaml = file.read
+      yaml.gsub!(/^(\s*)(.*)\s*#\s*(.*)$/){|s,n| "#{$1}%s \n#{$1}  :uuid: %s" % [$2, $3] }
+      prepare_items_to_plist YAML.load(yaml)
+    end
+    
+    def make_hash_tree!(items)
+      items.reduce(Hash[]) do |m, item| 
+        hash = { uuid: item.uuid }
+        hash[:items] = make_hash_tree!(item.items) if item.items.any?
+        
+        m.merge! item.name => hash
+      end
+    end
+    
+    def prepare_items_to_plist(hash)
+      @menu = { submenus: {}, items: [], excludedItems: Array.wrap(@excludedItems) }
+      @menu[:items] = Array.wrap(iterate_to_plist(hash))
+      @menu
+    end
+    
+    def iterate_to_plist(hash, parent = nil)
+      ary = []
+      hash.each do |name, tree|
+        uuid = tree[:uuid]
+        if tree[:items]
+          ary << uuid
+          @menu[:submenus][uuid] = {
+            :items => iterate_to_plist(tree[:items]),
+            :name  => name
+          }
+        else
+          ary << uuid
+        end
+      end
+      ary
+    end
+  end
+end

data/lib/tm_bundle/plutil.rb

@@ -0,0 +1,112 @@
+require 'json'
+
+class Plutil  
+  module JSON
+    def self.load(plist)
+      Plutil.convert plist, to: :json do |converted_io|
+        ::JSON.load(converted_io)
+      end
+    end
+    
+    def self.call(*args)
+      load(*args)
+    end
+  
+    def self.dump(object, options = {})
+      Plutil.convert :stdin, options.reverse_merge(to: :xml) do |io|
+        io.write ::JSON.dump(object.to_h)
+        io.close_write
+        io.read
+      end
+    end
+  end
+  
+  # Also aliased as `Plutil.plutil`
+  # Usage:
+  # 
+  #   Plutil.(:remove, "keypath", file: plist, &:read)
+  #   Plutil.(:extract, "keypath", :json, file: plist, &:read)
+  # 
+  def self.call(*args, &block)
+    new(*args).execute(&block)
+  end
+  
+  # Usage:
+  # 
+  #   Plutil.insert('keypath', "-bool", "YES", file: plist, &:read)
+  # 
+  class << self
+    alias_method :plutil, :call
+    
+    [:remove, :extract, :insert].each do |command|
+      define_method(command) {|*args, &block| plutil(command, *args, &block) }
+    end
+  end
+  
+  # Usage:
+  # 
+  #   Plutil.convert plist, to: 'json' do |converted_io|
+  #     JSON.load(converted_io)
+  #   end
+  # 
+  def self.convert(path, to: :json, &block)
+    to = "xml1" if to.to_s == 'xml'
+    plutil(:convert, to, out: :stdin, file: path.to_s, &block)
+  end
+  
+  # Usage:
+  # 
+  #   Plutil.replace(plist, 'name', data, as: 'xml', &:read)
+  #   
+  def self.replace(path, keypath, data, as: :xml, &block)
+    plutil(:replace, keypath, "-#{as}", data, file: path.to_s, &block)
+  end
+  
+  # Shorthand to `Plutil::JSON.load(plist)`
+  def self.load_json(*args)
+    Plutil::JSON.load(*args)
+  end
+  
+  def self.dump_json(*args)
+    Plutil::JSON.dump(*args)
+  end
+  
+  def initialize(*args)
+    options = args.extract_options!
+    @command, *@args = *args
+    @in, @out, @mode = *options.values_at(:in, :out, :mode)
+    @in   ||= options[:file]
+    @mode ||= auto_mode
+  end
+  
+  def execute(&block)
+    io = IO.popen(cmd, @mode)
+    block.call(io)
+  ensure
+    io.close if io && !io.closed?
+  end
+    
+  def output_args; @out && ['-o', normalize_io_arg(@out)]; end
+  def input_args; @in && ['--', normalize_io_arg(@in)]; end
+  def stdin?; @in.to_s == 'stdin'; end
+  
+  private
+  def cmd
+    ['plutil', "-#@command"] + Array(@args.map(&:to_s)) + Array(output_args) + Array(input_args)
+  end
+  
+  def normalize_io_arg(io)
+    case io.to_s
+    when 'stdin', 'stdout' then '-'
+    else io
+    end
+  end
+  
+  def auto_mode
+    case @command
+    when :convert then stdin? ? 'w+' : 'r'
+    when :replace then 'w+'
+    else 'r'
+    end
+  end
+end

data/lib/tm_bundle_support.rb

@@ -0,0 +1 @@
+require "tm_bundle"

metadata

@@ -0,0 +1,101 @@
+--- !ruby/object:Gem::Specification
+name: tm_bundle_support
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+platform: ruby
+authors:
+- Tōnis Simo
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2015-01-29 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: activesupport
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '4.1'
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '4.2'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '4.1'
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '4.2'
+- !ruby/object:Gem::Dependency
+  name: bundler
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.7'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.7'
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '10.0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '10.0'
+description: Helpful ruby scripts for textmate bundle developers.
+email:
+- anton.estum@gmail.com
+executables:
+- tm_bundle
+extensions: []
+extra_rdoc_files: []
+files:
+- bin/tm_bundle
+- lib/tm_bundle.rb
+- lib/tm_bundle/command.rb
+- lib/tm_bundle/item.rb
+- lib/tm_bundle/menu.rb
+- lib/tm_bundle/plutil.rb
+- lib/tm_bundle_support.rb
+homepage: http://github.com/estum/tm_bundle_support
+licenses:
+- MIT
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '2.1'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.4.5
+signing_key: 
+specification_version: 4
+summary: Textmate Bundle Support Tools
+test_files: []
+has_rdoc: