coherent 0.3.0 → 0.4.0

data/lib/plugin/commands/remove.rb

@@ -0,0 +1,29 @@
+module Coherent
+  module Commands
+    
+    
+    class Remove
+      def initialize(base_command)
+        @base_command = base_command
+      end
+    
+      def options
+        OptionParser.new do |o|
+          o.set_summary_indent('  ')
+          o.banner =    "Usage: #{@base_command.script_name} remove name [name]..."
+          o.define_head "Remove plugins."
+        end
+      end
+    
+      def parse!(args)
+        options.parse!(args)
+        root = @base_command.environment.root
+        args.each do |name|
+          Coherent::Plugin.new(name).uninstall
+        end
+      end
+    end
+
+
+  end
+end

data/lib/plugin/commands/source.rb

@@ -0,0 +1,34 @@
+module Coherent
+  module Commands
+    
+    class Source
+      def initialize(base_command)
+        @base_command = base_command
+      end
+    
+      def options
+        OptionParser.new do |o|
+          o.set_summary_indent('  ')
+          o.banner =    "Usage: #{@base_command.script_name} source REPOSITORY [REPOSITORY [REPOSITORY]...]"
+          o.define_head "Add new repositories to the default search list."
+        end
+      end
+    
+      def parse!(args)
+        options.parse!(args)
+        count = 0
+        args.each do |uri|
+          if Repositories.instance.add(uri)
+            puts "added: #{uri.ljust(50)}" if $verbose
+            count += 1
+          else
+            puts "failed: #{uri.ljust(50)}"
+          end
+        end
+        Repositories.instance.save
+        puts "Added #{count} repositories."
+      end
+    end
+
+  end
+end

data/lib/plugin/commands/sources.rb

@@ -0,0 +1,33 @@
+module Coherent
+  module Commands
+
+
+    class Sources
+      def initialize(base_command)
+        @base_command = base_command
+      end
+    
+      def options
+        OptionParser.new do |o|
+          o.set_summary_indent('  ')
+          o.banner =    "Usage: #{@base_command.script_name} sources [OPTIONS] [PATTERN]"
+          o.define_head "List configured plugin repositories."
+          o.separator   ""        
+          o.separator   "Options:"
+          o.separator   ""
+          o.on(         "-c", "--check", 
+                        "Report status of repository.") { |sources| @sources = sources}
+        end
+      end
+    
+      def parse!(args)
+        options.parse!(args)
+        Repositories.each do |repo|
+          puts repo.uri
+        end
+      end
+    end
+
+
+  end
+end

data/lib/plugin/commands/unsource.rb

@@ -0,0 +1,36 @@
+module Coherent
+  module Commands
+    
+    class Unsource
+      def initialize(base_command)
+        @base_command = base_command
+      end
+    
+      def options
+        OptionParser.new do |o|
+          o.set_summary_indent('  ')
+          o.banner =    "Usage: #{@base_command.script_name} unsource URI [URI [URI]...]"
+          o.define_head "Remove repositories from the default search list."
+          o.separator ""
+          o.on_tail("-h", "--help", "Show this help message.") { puts o; exit }
+        end
+      end
+    
+      def parse!(args)
+        options.parse!(args)
+        count = 0
+        args.each do |uri|
+          if Repositories.instance.remove(uri)
+            count += 1
+            puts "removed: #{uri.ljust(50)}"
+          else
+            puts "failed: #{uri.ljust(50)}"
+          end
+        end
+        Repositories.instance.save
+        puts "Removed #{count} repositories."
+      end
+    end
+
+  end
+end

data/lib/plugin/commands/update.rb

@@ -0,0 +1,42 @@
+module Coherent
+  module Commands
+    
+    
+    class Update
+      def initialize(base_command)
+        @base_command = base_command
+      end
+   
+      def options
+        OptionParser.new do |o|
+          o.set_summary_indent('  ')
+          o.banner =    "Usage: #{@base_command.script_name} update [name [name]...]"
+          o.on(         "-r REVISION", "--revision REVISION",
+                        "Checks out the given revision from subversion.",
+                        "Ignored if subversion is not used.") { |v| @revision = v }
+          o.define_head "Update plugins."
+        end
+      end
+   
+      def parse!(args)
+        options.parse!(args)
+        root = @base_command.environment.root
+        cd root
+        args = Dir["vendor/plugins/*"].map do |f|
+          File.directory?("#{f}/.svn") ? File.basename(f) : nil
+        end.compact if args.empty?
+        cd "vendor/plugins"
+        args.each do |name|
+          if File.directory?(name)
+            puts "Updating plugin: #{name}"
+            system("svn #{$verbose ? '' : '-q'} up \"#{name}\" #{@revision ? "-r #{@revision}" : ''}")
+          else
+            puts "Plugin doesn't exist: #{name}"
+          end
+        end
+      end
+    end
+
+
+  end
+end

data/lib/plugin/environment.rb

@@ -0,0 +1,97 @@
+module Coherent
+  
+  class Environment
+    attr_reader :root
+
+    def initialize(dir)
+      @root = dir
+    end
+
+    def self.find(dir=nil)
+      dir ||= pwd
+      while dir.length > 1
+        return new(dir) if File.exist?(File.join(dir, 'distil.yml'))
+        dir = File.dirname(dir)
+      end
+      
+      puts "Unable to find environment"
+      exit 1
+    end
+  
+    def self.default
+      @default ||= find
+    end
+  
+    def self.default=(env)
+      @default = env
+    end
+  
+    def install(name_uri_or_plugin)
+      if name_uri_or_plugin.is_a? String
+        if name_uri_or_plugin =~ /:\/\// 
+          plugin = Plugin.new(name_uri_or_plugin)
+        else
+          plugin = Plugins[name_uri_or_plugin]
+        end
+      else
+        plugin = name_uri_or_plugin
+      end
+      unless plugin.nil?
+        plugin.install
+      else
+        puts "Plugin not found: #{name_uri_or_plugin}"
+      end
+    end
+ 
+    def use_svn?
+      require 'active_support/core_ext/kernel'
+      silence_stderr {`svn --version` rescue nil}
+      !$?.nil? && $?.success?
+    end
+
+    def use_externals?
+      use_svn? && File.directory?("#{root}/vendor/plugins/.svn")
+    end
+
+    def use_checkout?
+      # this is a bit of a guess. we assume that if the rails environment
+      # is under subversion then they probably want the plugin checked out
+      # instead of exported. This can be overridden on the command line
+      File.directory?("#{root}/.svn")
+    end
+
+    def best_install_method
+      return :http unless use_svn?
+      case
+        when use_externals? then :externals
+        when use_checkout? then :checkout
+        else :export
+      end
+    end
+
+    def externals
+      return [] unless use_externals?
+      ext = `svn propget svn:externals "#{root}/vendor/plugins"`
+      lines = ext.respond_to?(:lines) ? ext.lines : ext
+      lines.reject{ |line| line.strip == '' }.map do |line|
+        line.strip.split(/\s+/, 2) 
+      end
+    end
+
+    def externals=(items)
+
+      return unless use_externals?
+
+      unless items.is_a? String
+        items = items.map{|name,uri| "#{name.ljust(29)} #{uri.chomp('/')}"}.join("\n")
+      end
+      Tempfile.open("svn-set-prop") do |file|
+        file.write(items)
+        file.flush
+        system("svn propset -q svn:externals -F \"#{file.path}\" \"#{root}/vendor/plugins\"")
+      end
+    end
+  
+  end
+
+end

data/lib/plugin/plugin.rb

@@ -0,0 +1,160 @@
+module Coherent
+  
+  class Plugin
+    attr_reader :name, :uri
+  
+    def initialize(uri, name=nil)
+      @uri = uri
+      guess_name(uri)
+    end
+  
+    def self.find(name)
+      name =~ /\// ? new(name) : Repositories.instance.find_plugin(name)
+    end
+  
+    def to_s
+      "#{@name.ljust(30)}#{@uri}"
+    end
+  
+    def svn_url?
+      @uri =~ /svn(?:\+ssh)?:\/\/*/
+    end
+  
+    def git_url?
+      @uri =~ /^git:\/\// || @uri =~ /\.git$/
+    end
+  
+    def installed?
+      File.directory?("#{project_env.root}/vendor/plugins/#{name}") \
+        or project_env.externals.detect{ |name, repo| self.uri == repo }
+    end
+  
+    def install(method=nil, options = {})
+      method ||= project_env.best_install_method?
+      if :http == method
+        method = :export if svn_url?
+        method = :git    if git_url?
+      end
+
+      uninstall if installed? and options[:force]
+
+      unless installed?
+        send("install_using_#{method}", options)
+        run_install_hook
+      else
+        puts "already installed: #{name} (#{uri}).  pass --force to reinstall"
+      end
+    end
+
+    def uninstall
+      path = "#{project_env.root}/vendor/plugins/#{name}"
+      if File.directory?(path)
+        puts "Removing 'vendor/plugins/#{name}'" if $verbose
+        run_uninstall_hook
+        rm_r path
+      else
+        puts "Plugin doesn't exist: #{path}"
+      end
+      # clean up svn:externals
+      externals = project_env.externals
+      externals.reject!{|n,u| name == n or name == u}
+      project_env.externals = externals
+    end
+
+    def info
+      tmp = "#{project_env.root}/_tmp_about.yml"
+      if svn_url?
+        cmd = "svn export #{@uri} \"#{project_env.root}/#{tmp}\""
+        puts cmd if $verbose
+        system(cmd)
+      end
+      open(svn_url? ? tmp : File.join(@uri, 'about.yml')) do |stream|
+        stream.read
+      end rescue "No about.yml found in #{uri}"
+    ensure
+      FileUtils.rm_rf tmp if svn_url?
+    end
+
+    private 
+
+      def run_install_hook
+        install_hook_file = "#{project_env.root}/vendor/plugins/#{name}/install.rb"
+        load install_hook_file if File.exist? install_hook_file
+      end
+
+      def run_uninstall_hook
+        uninstall_hook_file = "#{project_env.root}/vendor/plugins/#{name}/uninstall.rb"
+        load uninstall_hook_file if File.exist? uninstall_hook_file
+      end
+
+      def install_using_export(options = {})
+        svn_command :export, options
+      end
+    
+      def install_using_checkout(options = {})
+        svn_command :checkout, options
+      end
+    
+      def install_using_externals(options = {})
+        externals = project_env.externals
+        externals.push([@name, uri])
+        project_env.externals = externals
+        install_using_checkout(options)
+      end
+
+      def install_using_http(options = {})
+        root = project_env.root
+        mkdir_p "#{root}/vendor/plugins/#{@name}"
+        Dir.chdir "#{root}/vendor/plugins/#{@name}" do
+          puts "fetching from '#{uri}'" if $verbose
+          fetcher = RecursiveHTTPFetcher.new(uri, -1)
+          fetcher.quiet = true if options[:quiet]
+          fetcher.fetch
+        end
+      end
+    
+      def install_using_git(options = {})
+        root = project_env.root
+        mkdir_p(install_path = "#{root}/vendor/plugins/#{name}")
+        Dir.chdir install_path do
+          init_cmd = "git init"
+          init_cmd += " -q" if options[:quiet] and not $verbose
+          puts init_cmd if $verbose
+          system(init_cmd)
+          base_cmd = "git pull --depth 1 #{uri}"
+          base_cmd += " -q" if options[:quiet] and not $verbose
+          base_cmd += " #{options[:revision]}" if options[:revision]
+          puts base_cmd if $verbose
+          if system(base_cmd)
+            puts "removing: .git .gitignore" if $verbose
+            rm_rf %w(.git .gitignore)
+          else
+            rm_rf install_path
+          end
+        end
+      end
+
+      def svn_command(cmd, options = {})
+        root = project_env.root
+        mkdir_p "#{root}/vendor/plugins"
+        base_cmd = "svn #{cmd} #{uri} \"#{root}/vendor/plugins/#{name}\""
+        base_cmd += ' -q' if options[:quiet] and not $verbose
+        base_cmd += " -r #{options[:revision]}" if options[:revision]
+        puts base_cmd if $verbose
+        system(base_cmd)
+      end
+
+      def guess_name(url)
+        @name = File.basename(url)
+        if @name == 'trunk' || @name.empty?
+          @name = File.basename(File.dirname(url))
+        end
+        @name.gsub!(/\.git$/, '') if @name =~ /\.git$/
+      end
+    
+      def project_env
+        @project_env || Coherent::Environment.default
+      end
+  end
+
+end

data/lib/plugin/recursive-http-fetcher.rb

@@ -0,0 +1,71 @@
+module Coherent
+   
+  class RecursiveHTTPFetcher
+    attr_accessor :quiet
+    def initialize(urls_to_fetch, level = 1, cwd = ".")
+      @level = level
+      @cwd = cwd
+      @urls_to_fetch = RUBY_VERSION >= '1.9' ? urls_to_fetch.lines : urls_to_fetch.to_a
+      @quiet = false
+    end
+
+    def ls
+      @urls_to_fetch.collect do |url|
+        if url =~ /^svn(\+ssh)?:\/\/.*/ || url =~ /\/svn\//
+          `svn ls #{url}`.split("\n").map {|entry| "/#{entry}"} rescue nil
+        else
+          open(url) do |stream|
+            links("", stream.read)
+          end rescue nil
+        end
+      end.flatten
+    end
+
+    def push_d(dir)
+      @cwd = File.join(@cwd, dir)
+      FileUtils.mkdir_p(@cwd)
+    end
+
+    def pop_d
+      @cwd = File.dirname(@cwd)
+    end
+
+    def links(base_url, contents)
+      links = []
+      contents.scan(/href\s*=\s*\"*[^\">]*/i) do |link|
+        link = link.sub(/href="/i, "")
+        next if link =~ /svnindex.xsl$/
+        next if link =~ /^(\w*:|)\/\// || link =~ /^\./
+        links << File.join(base_url, link)
+      end
+      links
+    end
+  
+    def download(link)
+      puts "+ #{File.join(@cwd, File.basename(link))}" unless @quiet
+      open(link) do |stream|
+        File.open(File.join(@cwd, File.basename(link)), "wb") do |file|
+          file.write(stream.read)
+        end
+      end
+    end
+  
+    def fetch(links = @urls_to_fetch)
+      links.each do |l|
+        (l =~ /\/$/ || links == @urls_to_fetch) ? fetch_dir(l) : download(l)
+      end
+    end
+  
+    def fetch_dir(url)
+      @level += 1
+      push_d(File.basename(url)) if @level > 0
+      open(url) do |stream|
+        contents =  stream.read
+        fetch(links(url, contents))
+      end
+      pop_d if @level > 0
+      @level -= 1
+    end
+  end
+
+end