rapt 0.1.0 → 0.2.0

data/CHANGELOG

@@ -1,3 +1,8 @@
+= 0.2.0
+
+* Added search
+* Added --force-http option to force http download method [LR]
+* Added --svn option to add installed files to subversion with svn add [LR]
 
 = 0.1.0
 

data/Rakefile

@@ -10,7 +10,7 @@ $:.unshift(File.dirname(__FILE__) + "/lib/commands")
 require 'plugin'
 
 PKG_NAME      = 'rapt'
-PKG_VERSION   = '0.1.0'
+PKG_VERSION   = '0.2.0'
 PKG_FILE_NAME = "#{PKG_NAME}-#{PKG_VERSION}"
 
 RELEASE_NAME  = "REL #{PKG_VERSION}"
@@ -30,7 +30,7 @@ end
 # Genereate the RDoc documentation
 Rake::RDocTask.new { |rdoc|
   rdoc.rdoc_dir = 'doc'
-  rdoc.title    = "Rapt -- Rails plugin manager"
+  rdoc.title    = "RaPT -- Rails Plugin Tool"
   rdoc.template = "#{ENV['template']}.rb" if ENV['template']
   rdoc.rdoc_files.include('README', 'CHANGELOG')
   rdoc.rdoc_files.include('lib/plugin.rb')
@@ -41,14 +41,14 @@ Rake::RDocTask.new { |rdoc|
 spec = Gem::Specification.new do |s|
   s.platform = Gem::Platform::RUBY
   s.name = PKG_NAME
-  s.summary = "Rails plugin manager."
+  s.summary = "Rails Plugin Tool."
   s.description = %q{Install, remove, and discover new plugins for your Ruby on Rails app.}
   s.version = PKG_VERSION
 
   s.authors = ["Ryan Tomayko", "Geoffrey Grosenbach"]
   s.email = "boss@topfunky.com"
   s.rubyforge_project = RUBY_FORGE_PROJECT
-  s.homepage = "http://nubyonrails.com/pages/rapt"
+  s.homepage = "http://rapt.rubyforge.org"
 
   s.has_rdoc = false
   s.requirements << 'none'

data/bin/rapt

@@ -1,4 +1,4 @@
-#!/usr/local/bin/ruby
+#!/usr/bin/env ruby
 
 require "commands/plugin"
 

data/lib/commands/plugin.rb

@@ -60,6 +60,7 @@ require File.dirname(__FILE__) + '/plugin/repositories'
 require File.dirname(__FILE__) + '/plugin/repository' 
 require File.dirname(__FILE__) + '/plugin/commands' 
 require File.dirname(__FILE__) + '/plugin/recursive_http_fetcher' 
+require File.dirname(__FILE__) + '/plugin/plugin_pack' 
 
 
 

data/lib/commands/plugin/commands.rb

@@ -38,15 +38,19 @@ module Commands
         o.separator ""
         o.separator "COMMANDS"
         
-        o.separator "  discover   Discover plugin repositories."
-        o.separator "  list       List available plugins."
-        o.separator "  about      Show basic info about a plugin."
-        o.separator "  install    Install plugin(s) from known repositories or URLs."
-        o.separator "  update     Update installed plugins."
-        o.separator "  remove     Uninstall plugins."
-        o.separator "  source     Add a plugin source repository."
-        o.separator "  unsource   Remove a plugin repository."
-        o.separator "  sources    List currently configured plugin repositories."
+        o.separator "  discover       Discover plugin repositories."
+        o.separator "  list           List available plugins."
+        o.separator "  search         Search for available plugins."
+        o.separator "  about          Show basic info about a plugin."
+        o.separator "  install        Install plugin(s) from known repositories or URLs."
+        o.separator "  update         Update installed plugins."
+        o.separator "  remove         Uninstall plugins."
+        o.separator "  source         Add a plugin source repository."
+        o.separator "  unsource       Remove a plugin repository."
+        o.separator "  sources        List currently configured plugin repositories."
+        o.separator "  pack:install   Install plugins from plugin pack file or URL"
+        o.separator "  pack:uninstall Uninstall plugins from plugin pack file or URL"
+        o.separator "  pack:about     Display plugin pack information"
         
         o.separator ""
         o.separator "EXAMPLES"
@@ -62,6 +66,8 @@ module Commands
         o.separator "    #{@script_name} list\n"
         o.separator "  List plugins in the specified repository:"
         o.separator "    #{@script_name} list --source=http://dev.rubyonrails.com/svn/rails/plugins/\n"
+        o.separator "  Search available plugins:"
+        o.separator "    #{@script_name} search \"authentication\"\n"
         o.separator "  Discover and prompt to add new repositories:"
         o.separator "    #{@script_name} discover\n"
         o.separator "  Discover new repositories but just list them, don't add anything:"
@@ -74,6 +80,10 @@ module Commands
         o.separator "    #{@script_name} sources\n"        
         o.separator "  Show the options for the list command:"
         o.separator "    #{@script_name} list -h\n"
+        o.separator "  Install a plugin pack:"
+        o.separator "    #{@script_name} pack:install http://opensource.agileevolved.com/pluginpacks/standard.pluginpack\n"
+        o.separator "  View plugin pack meta data:"
+        o.separator "    #{@script_name} pack:about http://opensource.agileevolved.com/pluginpacks/standard.pluginpack\n"
       end
     end
     
@@ -82,9 +92,13 @@ module Commands
       options.parse!(general)
       
       command = general.shift
-      if command =~ /^(list|discover|install|source|unsource|sources|remove|update|about)$/
+      if command =~ /^(list|discover|install|source|unsource|sources|remove|update|about|search)$/
         command = Commands.const_get(command.capitalize).new(self)
         command.parse!(sub)
+      elsif command =~ /^(pack:install|pack:uninstall|pack:about)$/
+        command_name = command.split(':')[1]
+        command = Commands::Pack.const_get(command_name.capitalize).new(self)
+        command.parse!(sub)
       else
         puts "Unknown command: #{command}"
         puts options
@@ -332,10 +346,12 @@ module Commands
   end
   
   class Install
+    @@default_method = :http
+    
     def initialize(base_command)
       @base_command = base_command
-      @method = :http
-      @options = { :quiet => false, :revision => nil, :force => false }
+      @method = @@default_method
+      @options = { :quiet => false, :revision => nil, :force => false, :force_http => false }
     end
     
     def options
@@ -359,6 +375,12 @@ module Commands
                       "Ignored if subversion is not used.") { |v| @options[:revision] = v }
         o.on(         "-f", "--force",
                       "Reinstalls a plugin if it's already installed.") { |v| @options[:force] = true }
+        o.on(         "-c", "--svn",
+                      "Modify files with subversion. (Note: svn must be in path)") { |v| @options[:svn] = true }
+        o.on(         "-h", "--force-http",
+                      "Forces download in HTTP mode") { |v| @options[:force_http] = true }
+        o.on(         "--version",
+                      "Install a specific version of a plugin") { |v| @options[:version] = v }
         o.separator   ""
         o.separator   "You can specify plugin names as given in 'plugin list' output or absolute URLs to "
         o.separator   "a plugin repository."
@@ -366,8 +388,9 @@ module Commands
     end
     
     def determine_install_method
+      return :http if @options[:force_http]
       best = @base_command.environment.best_install_method?
-      @method = :http if best == :http and @method == :export
+      @method = @@default_method if best == :http and @method == :export
       case
       when (best == :http and @method != :http)
         msg = "Cannot install using subversion because `svn' cannot be found in your PATH"
@@ -389,11 +412,48 @@ module Commands
       install_method = determine_install_method
       puts "Plugins will be installed using #{install_method}" if $verbose
       args.each do |name|
-        ::Plugin.find(name).install(install_method, @options)
+        plugin = ::Plugin.find(name)
+        if @options[:version]
+          if plugin.versions[@options[:version]].nil?
+            puts "Invalid plugin version."
+            exit 1
+          end
+        else
+          set_chosen_version(plugin)
+        end
+        plugin.install(install_method, @options)
+        environment.add_plugin_to_svn(plugin.name) if @options[:svn]
+      end
+    #rescue
+    #  puts "Plugin not found: #{args.inspect}"
+    #  exit 1
+    end
+    
+    def get_version(versions)
+      prompt = "Multiple versions found, which version would you like to install?\n"
+      index = 1
+      versions.keys.sort.reverse.each{ |version| prompt << "#{index.to_s}. #{version}\n"; index = index.next }
+      selected_version = nil
+      while selected_version.nil?
+        puts prompt
+        print "> "
+        selected_version = prompt_for_version
+        selected_version = nil unless (1..versions.size).include?(selected_version.to_i)
+      end
+      return versions.keys.sort.reverse[selected_version-1]
+    end
+    
+    def prompt_for_version
+      ARGV.pop
+      gets.strip.to_i
+    end
+    
+    def set_chosen_version(plugin)
+      if plugin.versions.size > 1
+        @options[:version] = get_version(plugin.versions)
+      else
+        @options[:version] = plugin.versions.keys.first
       end
-    rescue
-      puts "Plugin not found: #{args.inspect}"
-      exit 1
     end
   end
 
@@ -482,5 +542,126 @@ module Commands
       end
     end
   end
+
+  class Search
+    require 'net/http'
+    require 'rexml/document' 
+    
+    def initialize(base_command)
+      @base_command = base_command
+      @directory = "http://www.agilewebdevelopment.com/plugins/search?search=%s"
+    end
+
+    def options
+      OptionParser.new do |o|
+        o.set_summary_indent('  ')
+        o.banner =    "Usage: #{@base_command.script_name} search \"search string\""
+        o.on(         "-d DIRECTORY", "--directory DIRECTORY",
+                      "Queries the URL specified by DIRECTORY.") { |v| @directory = v }
+        o.define_head "Search plugins."
+      end
+    end
+
+    def parse!(args)
+      options.parse!(args)
+      uri = URI.parse(@directory % URI.escape(args.first))
+      request = Net::HTTP.new(uri.host, uri.port)
+      root = REXML::Document.new(request.send_request('GET', uri.request_uri, nil, 'Accept' => 'application/xml').body).root 
+      root.elements.each('plugin') do |p|
+        puts p.elements['name'].text
+        puts "  Info: #{p.elements['link'].text}"
+        puts "  Install: #{p.elements['repository'].text}"
+      end
+    rescue
+      nil
+    end
+  end
+  
+  module Pack
+    class Install
+      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} pack:install pack_file_or_url"
+          o.define_head "Installs plugin pack at pack_file_or_url"
+        end
+      end
+      
+      def parse!(args)
+        uri = args.first
+        plugin_pack = PluginPackParser.parse_spec_file(uri)
+        plugin_pack.plugins.each do |plugin|
+          puts "+ [Adding] #{plugin.name}"
+          plugin.install
+        end
+      end
+    end
+    
+    class Uninstall
+      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} pack:uninstall pack_file_or_url"
+          o.define_head "Uninstalls plugin pack at pack_file_or_url"
+        end
+      end
+      
+      def parse!(args)
+        uri = args.first
+        plugin_pack = PluginPackParser.parse_spec_file(uri)
+        plugin_pack.plugins.each do |plugin|
+          puts "+ [Removing] #{plugin.name}"
+          plugin.uninstall
+        end
+      end
+    end
+    
+    class About
+      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} pack:about pack_file_or_url"
+          o.define_head "Shows meta-data and plugin list for plugin pack at pack_file_or_url"
+        end
+      end
+      
+      def parse!(args)
+        uri = args.first
+        plugin_pack = PluginPackParser.parse_spec_file(uri)
+        display_meta(plugin_pack)
+        display_plugins(plugin_pack)
+      end
+      
+      protected
+        def display_meta(plugin_pack)
+          puts "Retrieving information for plugin pack #{plugin_pack.name}"
+          [:description, :author, :email, :website].each do |info_attr|
+            info = plugin_pack.send(info_attr)
+            unless info.nil? or info.empty?
+              puts "* #{info_attr.to_s.capitalize}: #{info}"
+            end
+          end
+        end
+        
+        def display_plugins(plugin_pack)
+          puts "Pack contents:"
+          plugin_pack.plugins.each do |plugin|
+            puts "* #{plugin.name}"
+          end
+        end
+    end
+  end
 end
  

data/lib/commands/plugin/plugin.rb

@@ -1,12 +1,12 @@
 require 'open-uri'
 
 class Plugin
-    
-  attr_reader :name, :uri
+  attr_reader :name, :uri, :versions
   
   def initialize(uri, name=nil)
-    @uri = uri
-    guess_name(uri)
+    @uri = normalise_uri(uri)
+    name.nil? ? guess_name(uri) : @name = name
+    check_for_versions
   end
   
   def self.find(name)
@@ -27,6 +27,8 @@ class Plugin
   end
   
   def install(method=nil, options = {})
+    options = {:version => "bleeding_edge"}.merge(options)
+
     method ||= rails_env.best_install_method?
     method   = :export if method == :http and svn_url?
 
@@ -110,7 +112,7 @@ class Plugin
     
     def install_using_externals(options = {})
       externals = rails_env.externals
-      externals.push([@name, uri])
+      externals.push([@name, version_uri(options[:version])])
       rails_env.externals = externals
       install_using_checkout(options)
     end
@@ -119,18 +121,18 @@ class Plugin
       root = rails_env.root
       mkdir_p "#{root}/vendor/plugins"
       Dir.chdir "#{root}/vendor/plugins"
-      puts "fetching from '#{uri}'" if $verbose
-      fetcher = RecursiveHTTPFetcher.new(uri)
-      fetcher.quiet = true if options[:quiet]
-      fetcher.fetch
+      puts "fetching from '#{version_uri(options[:version])}'" if $verbose
+      fetcher = get_http_fetcher(version_uri(options[:version]), options[:quiet])
+      fetcher.fetch(version_uri(options[:version]))
+      rename_version_to_name(options[:version], options[:quiet])
     end
 
     def svn_command(cmd, options = {})
       root = rails_env.root
       mkdir_p "#{root}/vendor/plugins"
-      base_cmd = "svn #{cmd} #{uri} \"#{root}/vendor/plugins/#{name}\""
+      base_cmd = "svn #{cmd} #{version_uri(options[:version])} \"#{root}/vendor/plugins/#{name}\""
       base_cmd += ' -q' if options[:quiet] and not $verbose
-      base_cmd += " -r #{options[:revision]}" if options[:revision]
+      base_cmd += " -r #{options[:revision]}" if options[:revision] and (options[:version] == "bleeding_edge")
       puts base_cmd if $verbose
       system(base_cmd)
     end
@@ -145,4 +147,63 @@ class Plugin
     def rails_env
       @rails_env || RailsEnvironment.default
     end
+    
+    def get_http_fetcher(uri, quiet=true)
+      fetcher = RecursiveHTTPFetcher.new(uri)
+      fetcher.quiet = quiet
+      return fetcher
+    end
+    
+    def check_for_versions
+      if svn_url?
+        check_svn_versions
+      else
+        check_http_versions
+      end      
+    end
+    
+    # TODO
+    def check_svn_versions
+      @versions = {"bleeding_edge" => ""}
+    end
+    
+    def check_http_versions
+      fetcher = get_http_fetcher(@uri)
+      folders = fetcher.ls
+      if has_trunk?(folders)
+        @versions = {"bleeding_edge" => "trunk/"}
+        if has_tags?(folders)
+          tag_fetcher = get_http_fetcher("#{@uri}tags/")
+          available_tags = tag_fetcher.ls.collect { |tag| tag.gsub("/", "") }
+          available_tags.each { |tag| @versions[tag] = "tags/#{tag}/" }
+        end
+      else
+        @versions = {"bleeding_edge" => ""}
+      end
+    end
+    
+    def version_uri(version)
+      @uri + @versions[version]
+    end
+    
+    def has_trunk?(plugin_root_list)
+      plugin_root_list.grep(/trunk/).size == 1
+    end
+    
+    def has_tags?(plugin_root_list)
+      plugin_root_list.grep(/tags/).size == 1
+    end
+    
+    # make sure uris always have a trailing slash
+    def normalise_uri(uri)
+      return (uri[-1, 1] == "/" ? uri : uri + '/')
+    end
+    
+    def rename_version_to_name(version, quiet=false)
+      return if @versions[version].empty?
+      installed_folder = (version == "bleeding_edge") ? "trunk" : version
+      puts "+ Renaming #{installed_folder} to #{name}" unless quiet and not $verbose
+      FileUtils.mv("#{rails_env.root}/vendor/plugins/#{installed_folder}",
+                   "#{rails_env.root}/vendor/plugins/#{name}")
+    end
 end

data/lib/commands/plugin/plugin_pack.rb

@@ -0,0 +1,73 @@
+require 'open-uri'
+require 'yaml'
+
+class PluginPack
+  attr_reader :plugins, :name
+  attr_accessor :description, :author, :email, :website
+  
+  def initialize(name)
+    @name = name
+    @plugins = []
+    @description = ''
+    @author = ''
+    @email = ''
+    @website = ''
+  end
+  
+  def add_plugin(name, source)
+    @plugins << Plugin.new(source, name)
+  end
+end
+
+class PluginPackPlugin
+  attr_reader :name, :source
+  
+  def initialize(name, source)
+    @name, @source = name, source
+  end
+  
+  def to_svn_external
+    "#{@name} #{@source}"
+  end
+end
+
+class PluginPackParser
+  def self.parse_spec(spec)
+    pack_spec = YAML.parse(spec)
+    pack_meta = self.parse_pack_meta(pack_spec)
+    pack_plugins = self.parse_pack_plugins(pack_spec)
+    return nil if pack_plugins.empty?
+    pack_name = pack_meta.delete('name') || 'Untitled Pack'
+    pack = PluginPack.new(pack_name)
+    pack_meta.each_pair { |key, value| pack.send("#{key}=", value) if pack.respond_to?(key) }
+    pack_plugins.each_pair { |name, source| pack.add_plugin(name, source) }
+    pack
+  end
+  
+  def self.parse_spec_file(spec_file_or_url)
+    self.parse_spec(open(spec_file_or_url))
+  end
+  
+  def self.parse_pack_meta(pack_spec)
+    pack_meta = {}
+    return pack_meta if pack_spec['about'].nil?
+    pack_spec['about'].children_with_index.each do |meta|
+      key = meta[1].value
+      value = pack_spec['about'][key].value
+      pack_meta[key] = value
+    end
+    pack_meta
+  end
+  
+  def self.parse_pack_plugins(pack_spec)
+    plugins = {}
+    return plugins if pack_spec['plugins'].nil? or pack_spec['plugins'].children.nil?
+    pack_spec['plugins'].children_with_index.each do |p|
+      name = p[1].value
+      next if pack_spec['plugins'][name].nil?
+      source = pack_spec['plugins'][name].value
+      plugins[name] = source
+    end
+    plugins
+  end
+end

data/lib/commands/plugin/rails_environment.rb

@@ -84,4 +84,7 @@ class RailsEnvironment
     end
   end
   
+  def add_plugin_to_svn(plugin_name)
+    system("svn add #{root}/vendor/plugins/#{plugin_name}")
+  end
 end

data/lib/commands/plugin/recursive_http_fetcher.rb

@@ -1,4 +1,5 @@
 require 'open-uri'
+require 'fileutils'
 
 class RecursiveHTTPFetcher
   attr_accessor :quiet

data/lib/commands/plugin/repository.rb

@@ -1,4 +1,3 @@
-
 class Repository
   include Enumerable
   attr_reader :uri, :plugins
@@ -16,7 +15,7 @@ class Repository
       end
 
       @plugins = index.reject{ |line| line !~ /\/$/ }
-      @plugins.map! { |name| Plugin.new(File.join(@uri, name), name) }
+      @plugins.map! { |name| name.gsub!("/", ""); Plugin.new(File.join(@uri, name), name) }
     end
 
     @plugins

data/test/commands/plugin/plugin_test.rb

@@ -18,8 +18,13 @@ class Commands::Plugin::PluginTest < Test::Unit::TestCase
     assert_equal @uri, @plugin.uri
   end
   
+  def test_versions
+    assert_equal 1, @plugin.versions.size
+    assert_equal "bleeding_edge", @plugin.versions.keys.first
+  end
+  
   def test_to_s
-    assert_equal 'exception_notification        http://dev.rubyonrails.org/svn/rails/plugins/exception_notification', @plugin.to_s
+    assert_equal 'exception_notification        http://dev.rubyonrails.org/svn/rails/plugins/exception_notification/', @plugin.to_s
   end
 
   def test_find
@@ -56,3 +61,39 @@ class Commands::Plugin::PluginTest < Test::Unit::TestCase
   end
   
 end
+
+class Commands::Plugin::PluginWithSubversionRepoStructureTest < Test::Unit::TestCase
+  def setup
+    @uri = "http://opensource.agileevolved.com/svn/root/rails_plugins/unobtrusive_javascript/"
+    @name = "unobtrusive_javascript"
+    @plugin = Plugin.new @uri, @name
+  end
+  
+  def test_url_should_have_subversion_repo_structure
+    fetcher = RecursiveHTTPFetcher.new(@uri)
+    links = fetcher.ls
+    assert !links.grep(/trunk/).empty?
+    assert !links.grep(/tags/).empty?
+    assert !links.grep(/branches/).empty?
+  end
+  
+  def test_plugin_should_have_at_least_an_bleeding_edge_version
+    # bleeding edge version == trunk
+    assert @plugin.versions.keys.include?("bleeding_edge")
+    assert_equal "trunk/", @plugin.versions["bleeding_edge"]
+  end
+  
+  def test_should_have_tagged_versions
+    assert @plugin.versions.keys.include?("rel-0.1")
+    assert_equal "tags/rel-0.1/", @plugin.versions["rel-0.1"]
+  end
+  
+  def test_installing_tagged_version
+    $verbose = true
+    @plugin.install :http, :version => "rel-0.1"
+    assert @plugin.installed?
+    
+    @plugin.uninstall
+    assert !@plugin.installed?
+  end
+end

data/test/commands/plugin/repository_test.rb

@@ -5,6 +5,14 @@ require File.dirname(__FILE__) + "/../../../lib/commands/plugin"
 require File.dirname(__FILE__) + "/../../mocks/rails_environment"
 
 # TODO Mock the remote repository so we don't have to hit an actual server for the plugins.
+# LR: heres one way of sorting this out with a stub for the http fetcher
+class RecursiveHTTPFetcher
+  def ls
+    ['/meta_tags/']
+  end
+end
+
+
 class Commands::Plugin::RepositoryTest < Test::Unit::TestCase
 
   def setup

data/test/commands/plugin_test.rb

@@ -1,16 +1,36 @@
 require 'test/unit'
 require 'rubygems'
 require 'fileutils'
+require 'stringio'
 $testing = true
 require File.dirname(__FILE__) + "/../../lib/commands/plugin"
 require File.dirname(__FILE__) + "/../mocks/rails_environment"
 
+class Commands::Install
+  def self.default_method=(method)
+    @@default_method = method
+  end
+  
+  # dont want to use gets in test
+  def prompt_for_version
+    $selected_version
+  end
+end
+
 # TODO Mock the remote repository so we don't have to hit an actual server for the plugins.
 class Commands::PluginTest < Test::Unit::TestCase
   
   def setup
     @plugin_name = 'meta_tags'
     @remote_source = 'http://topfunky.net/svn/plugins'
+    @captured_output = StringIO.new("")
+  end
+  
+  def teardown
+    $stdout = STDOUT
+    Commands::Install.default_method = :http
+    `svn revert #{plugin_directory} `
+    `svn cleanup`
   end
 
   def test_list
@@ -34,7 +54,7 @@ class Commands::PluginTest < Test::Unit::TestCase
     }    
   end
 
-  def test_install
+  def xtest_install
     run_command('install', File.join(@remote_source, @plugin_name))
     assert File.exists?(path_to_plugin(@plugin_name) + "/lib"),
             "Plugin should have been installed at #{path_to_plugin(@plugin_name)}"
@@ -48,6 +68,54 @@ class Commands::PluginTest < Test::Unit::TestCase
   ensure
     FileUtils.rm_rf path_to_plugin(@plugin_name)
   end
+  
+  def test_install_with_svn_add
+    run_command('install', "--svn", File.join(@remote_source, @plugin_name))
+    assert File.exists?(path_to_plugin(@plugin_name) + "/lib"),
+            "Plugin should have been installed at #{path_to_plugin(@plugin_name)}"
+    output = `svn stat`.strip.split("\n")
+    scan_directory(path_to_plugin(@plugin_name)) do |plugin_file|
+      plugin_file.slice!(plugin_directory)
+      assert_equal 1, output.grep(/^A[ ]+#{plugin_file}/).size
+    end
+    ensure
+      FileUtils.rm_rf path_to_plugin(@plugin_name)
+      `svn rm #{path_to_plugin(@plugin_name)}`
+  end
+  
+  def test_install_with_forced_http
+    $stdout = @captured_output
+    $verbose = true
+    Commands::Install.default_method = :externals # anything but http
+    output = run_command('install', "--force-http", File.join(@remote_source, @plugin_name))
+    assert File.exists?(path_to_plugin(@plugin_name) + "/lib"),
+            "Plugin should have been installed at #{path_to_plugin(@plugin_name)}"
+    assert @captured_output.string.include?("Plugins will be installed using http")
+    $stdout = STDOUT
+    ensure
+      FileUtils.rm_rf path_to_plugin(@plugin_name)
+  end
+  
+  def test_install_with_multiple_versions
+    $selected_version = 1
+    $verbose = true
+    output = run_command("install", "http://opensource.agileevolved.com/svn/root/rails_plugins/unobtrusive_javascript")  
+    assert File.exists?(path_to_plugin("unobtrusive_javascript") + "/lib")
+    ensure
+      FileUtils.rm_rf path_to_plugin("unobtrusive_javascript")
+  end
+  
+  def test_install_with_specifc_version
+    $stdout = @captured_output
+    $selected_version = 1
+    $verbose = true
+    output = run_command("install", "--version=rel-0.1", "http://opensource.agileevolved.com/svn/root/rails_plugins/unobtrusive_javascript")  
+    assert File.exists?(path_to_plugin("unobtrusive_javascript") + "/lib")
+    assert @captured_output.string.include?("Renaming rel-0.1 to unobtrusive_javascript")
+    $stdout = STDOUT
+    ensure
+      FileUtils.rm_rf path_to_plugin("unobtrusive_javascript")
+  end
 
   # TODO Takes too long...find a way to speed it up
   # def test_sources
@@ -57,6 +125,18 @@ class Commands::PluginTest < Test::Unit::TestCase
   # end
 
 protected
+  def scan_directory(dirname, &block)
+    Dir.new(dirname).each do |entry|
+      full_path = File.join(dirname, entry)
+      if File.directory?(full_path)
+        unless %w(.svn . ..).include?(entry)
+          scan_directory(full_path, &block) 
+        end
+      else
+        yield full_path
+      end
+    end
+  end
 
   def deny(condition, message=nil)
     assert !condition, message
@@ -68,8 +148,11 @@ protected
 
   # Returns the full path to a locally installed plugin
   def path_to_plugin(name)
-    RailsEnvironment.default.root + "/vendor/plugins/#{name}"
+    "#{plugin_directory}#{name}"
   end
   
+  def plugin_directory
+    RailsEnvironment.default.root + "/vendor/plugins/"
+  end
 end
 

metadata

@@ -3,13 +3,13 @@ rubygems_version: 0.8.11
 specification_version: 1
 name: rapt
 version: !ruby/object:Gem::Version 
-  version: 0.1.0
-date: 2006-07-06 00:00:00 -07:00
-summary: Rails plugin manager.
+  version: 0.2.0
+date: 2006-10-26 00:00:00 -07:00
+summary: Rails Plugin Tool.
 require_paths: 
 - lib
 email: boss@topfunky.com
-homepage: http://nubyonrails.com/pages/rapt
+homepage: http://rapt.rubyforge.org
 rubyforge_project: rapt
 description: Install, remove, and discover new plugins for your Ruby on Rails app.
 autorequire: 
@@ -39,6 +39,7 @@ files:
 - lib/commands/plugin.rb
 - lib/commands/plugin/commands.rb
 - lib/commands/plugin/plugin.rb
+- lib/commands/plugin/plugin_pack.rb
 - lib/commands/plugin/rails_environment.rb
 - lib/commands/plugin/recursive_http_fetcher.rb
 - lib/commands/plugin/repositories.rb