vcs 0.2.148 → 0.3.0

data/lib/vcs/vcs.rb

@@ -0,0 +1,279 @@
+# Author:: Nicolas Pouillard  <ertai@lrde.epita.fr>.
+# Copyright:: Copyright (c) 2004 LRDE. All rights reserved.
+# License:: GNU General Public License (GPL).
+
+# $LastChangedBy: ertai $
+# $Id: header 98 2004-09-29 12:07:43Z ertai $
+
+require 'rubygems'
+require_gem 'ruby_ex'
+require 'ruby_ex'
+Commands.import!
+Yaml::ChopHeader.import!
+
+# The abstract class for a Vcs wrapper.
+# Conventions:
+#   example:
+#     svn checkout http://foo.bar/proj            # alias
+#     vcs-svn checkout http://foo.bar/proj        # wrapper
+#     vcs --vcs Svn checkout http://foo.bar/proj  # manual
+# 
+# checkout
+# checkout_
+# checkout!
+# checkout_!
+# 
+class Vcs
+
+  class Failure < Exception
+  end
+
+  class VcsCmdData < Commands::Datas::Data
+
+    attr_reader :out_io
+
+    def puts ( *a, &b )
+      @out_io.puts(*a, &b)
+    end
+
+    def output= ( anObject )
+      super
+      @out_io = @output.to_io_for_commands
+    end
+
+  end # class VcsCmdData
+  
+  class VcsCmdDataFactory < Commands::Datas::Factory
+
+    alias :real_new_command_data :new_command_data
+
+    def initialize ( values )
+      super
+      @command_data_class = VcsCmdData
+      @__instance = real_new_command_data
+    end
+
+    def new_command_data
+      @__instance.status = nil
+      @__instance
+    end
+
+  end # class VcsCmdDataFactory
+  
+  def initialize ( aCmd )
+    @cmd = aCmd.to_cmd
+    @handlers = Set.new
+    @runner = Commands::Runners::System.new
+    @h = HighLine.new
+    self.cmd_data_factory = VcsCmdDataFactory.new(:output => STDOUT, :error => STDERR)
+
+    @runner.subscribe_hook(:failure) do |data|
+      if data.output == STDOUT
+        LOG.debug { raise data.to_yaml }
+        exit((data.status)? data.status.exitstatus : 1)
+      else
+        raise data.to_yaml
+      end
+    end
+    @runner.subscribe_hook(:display_command) do |cmd|
+      LOG.debug { "running: #{cmd.to_sh}" }
+    end
+  end
+
+  def self.add_basic_method ( meth )
+    class_eval <<-end_eval
+      def #{meth}! ( *args )
+	run!("#{meth}", *args)
+      end
+      def #{meth}_! ( *args )
+	run!("#{meth}", *args)
+      end
+    end_eval
+  end
+
+  @@all_commands = {}
+  @@all_aliases = Set.new
+
+  def self.alias_command ( m1, m2 )
+    m2 = m2.to_s
+    @@all_commands[m2] ||= Set.new
+    @@all_commands[m2] << m1.to_s
+    @@all_aliases << m1
+    class_eval <<-end_eval
+      def #{m1} ( *args )
+        #{m2}(*args)
+      end
+      def #{m1}_ ( *args )
+        #{m2}_(*args)
+      end
+      def #{m1}! ( *args )
+        #{m2}!(*args)
+      end
+      def #{m1}_! ( *args )
+        #{m2}_!(*args)
+      end
+    end_eval
+  end
+
+  def cmd_data_factory
+    @runner.command_data_factory
+  end
+
+  def cmd_data_factory= ( aFactory )
+    @runner.command_data_factory = aFactory
+    @cmd_data = aFactory.new_command_data
+  end
+
+  attr_reader :cmd_data
+
+  @@checkers = Set.new
+
+  def run! ( *args )
+    (@cmd + args).run(@runner)
+  end
+
+  def sub_vcs ( out, err )
+    copy = self.class.new(@cmd)
+    copy.cmd_data_factory = VcsCmdDataFactory.new(:output => out, :error => err)
+    copy
+  end
+
+  def sub_vcs_with_name ( name )
+    sub_vcs(TempPath.new("#{name}-out"), TempPath.new("#{name}-err"))
+  end
+
+  def with ( io )
+    io.flush if io.respond_to? :flush
+    sub_vcs(io, io)
+  end
+
+  def puts ( *a, &b )
+    @cmd_data.puts(*a, &b)
+  end
+
+  def run ( *args )
+    sub_vcs.run!(*args)
+  end
+
+  def run_missing! ( name, orig, *args )
+    return help!(*args) if name == '--help'
+    if name =~ /^(.*)_$/
+      run!($1, *args)
+    else
+      LOG.warn { "unknown method #{orig}" }
+      run!(name, *args)
+    end
+  end
+
+  %w[ checkout help delete diff status log add update commit ].each do |m|
+    add_basic_method(m)
+  end
+
+  def method_missing ( meth, *args )
+    meth = meth.to_s
+    if meth =~ /^(.*)!$/
+      no_bang = $1
+      super if respond_to? no_bang
+      run_missing!(no_bang, meth, *args)
+    else
+      with_bang = meth + '!'
+      return run_missing!(meth, meth, *args) unless respond_to? with_bang
+      copy = sub_vcs_with_name(meth)
+      res = copy.send(with_bang, *args)
+      return res unless res.nil?
+      out = copy.cmd_data
+      out.out_io.flush
+      out
+    end
+  end
+
+  def help! ( *args )
+    return help_!(*args) unless args.empty?
+    puts "usage: #{@cmd.command} <subcommand> [options] [args]
+    |Type '#{@cmd.command} help <subcommand>' for help on a specific subcommand.
+    |
+    |Most subcommands take file and/or directory arguments, recursing
+    |on the directories.  If no arguments are supplied to such a
+    |command, it recurses on the current directory (inclusive) by default.
+    |
+    |Available subcommands:".head_cut!
+    cmds = []
+    methods.each do |meth|
+      next if meth =~ /_!?$/
+      next unless meth =~ /^(.+)!$/
+      cmd = $1
+      next if cmd == 'run'
+      next if @@all_aliases.include? cmd.to_sym
+      cmds << cmd
+    end
+    cmds.sort!
+    cmds.each do |cmd|
+      if @@all_commands.has_key? cmd
+        aliases = @@all_commands[cmd].sort.join(', ')
+        puts "  - #{cmd} (alias #{aliases})"
+      else
+        puts "  - #{cmd}"
+      end
+    end
+  end
+
+  alias_command :ann, :blame
+  alias_command :annotate, :blame
+  alias_command :praise, :blame
+  alias_command :co, :checkout
+  alias_command :ci, :commit
+  alias_command :cp, :copy
+  alias_command :del, :delete
+  alias_command :remove, :delete
+  alias_command :rm, :delete
+  alias_command :di, :diff
+  alias_command :h, :help
+  alias_command :ls, :list
+  alias_command :mv, :move
+  alias_command :rename, :move
+  alias_command :ren, :move
+  alias_command :pdel, :propdel
+  alias_command :pd, :propdel
+  alias_command :pedit, :propedit
+  alias_command :pe, :propedit
+  alias_command :pget, :propget
+  alias_command :pg, :propget
+  alias_command :plist, :proplist
+  alias_command :pl, :proplist
+  alias_command :pset, :propset
+  alias_command :ps, :propset
+  alias_command :st, :status
+  alias_command :stat, :status
+  alias_command :sw, :switch
+  alias_command :up, :update
+
+  # Cvs Alias
+  alias_command :new, :add
+  alias_command :rcs, :admin
+  alias_command :get, :checkout
+  alias_command :rlog, :log
+  alias_command :patch, :rdiff
+  alias_command :rfreeze, :rtag
+  alias_command :freeze, :tag
+
+  # Prcs Alias
+  alias_command :checkin, :commit
+  alias_command :populate, :add
+
+  def error_handling ( meth )
+    @handlers << meth
+  end
+
+  def call_handlers
+    @handlers.each { |meth| send(meth) }
+  end
+
+  def self.add_conf_checker ( meth )
+    @@checkers << meth
+  end
+
+  def call_conf_checkers
+    @@checkers.each { |meth| send(meth) }
+  end
+
+end # class Vcs

metadata

@@ -1,24 +1,25 @@
 --- !ruby/object:Gem::Specification 
-rubygems_version: 0.8.10
+rubygems_version: 0.8.11
 specification_version: 1
 name: vcs
 version: !ruby/object:Gem::Version 
-  version: 0.2.148
-date: 2005-05-09
+  version: 0.3.0
+date: 2005-09-16 00:00:00 +02:00
 summary: A wrapper over any version control system
 require_paths: 
-  - src
-email: ertai@lrde.epita.fr
-homepage: https://svn.lrde.epita.fr/svn/lrdetools/trunk/vcs/
+  - lib
+email: 
+  - ertai@lrde.epita.fr
+homepage: http://rubyforge.org/projects/vcs
 rubyforge_project: vcs
-description: "Version control systems (Subversion, CVS, PRCS...), however useful, are not very
-  extensible: adding new features can be cumbersome, especially if you want them
-  for different such systems at once. Vcs provide a simple dynamic hierarchy for
-  Version Control Systems."
-autorequire: vcs
-default_executable: vcs
+description: "Version  control  systems (Subversion, CVS, PRCS...), however useful, are not
+  very  extensible:  adding  new  features can be cumbersome, especially if you
+  want  them  for  different such systems at once. Vcs provide a simple dynamic
+  hierarchy for Version Control Systems."
+autorequire: 
+default_executable: 
 bindir: bin
-has_rdoc: true
+has_rdoc: false
 required_ruby_version: !ruby/object:Gem::Version::Requirement 
   requirements: 
     - 
@@ -27,158 +28,59 @@ required_ruby_version: !ruby/object:Gem::Version::Requirement
         version: 0.0.0
   version: 
 platform: ruby
+signing_key: 
+cert_chain: 
 authors: 
   - Nicolas Pouillard
 files: 
-  - src/ask.rb
-  - src/changelog.rb
-  - src/conflict.rb
-  - src/cvs.rb
-  - src/diff.rb
-  - src/diffstat.rb
-  - src/last_changed_date.rb
-  - src/mail.rb
-  - src/message.rb
-  - src/mycommit.rb
-  - src/news.rb
-  - src/prcs.rb
-  - src/reply-mail.rb
-  - src/revision.rb
-  - src/status.rb
-  - src/svn.rb
-  - src/tools.rb
-  - src/vcs.rb
-  - ruby_ex/abstract.rb
-  - ruby_ex/abstract_node.rb
-  - ruby_ex/array_each_pair.rb
-  - ruby_ex/ask.rb
-  - ruby_ex/attributed_class.rb
-  - ruby_ex/cache.rb
-  - ruby_ex/checkout.rb
-  - ruby_ex/choose.rb
-  - ruby_ex/commands.rb
-  - ruby_ex/config_file.rb
-  - ruby_ex/const_regexp.rb
-  - ruby_ex/daemon.rb
-  - ruby_ex/diff.rb
-  - ruby_ex/dlogger.rb
-  - ruby_ex/dtime.rb
-  - ruby_ex/dumpable_proc.rb
-  - ruby_ex/exception.rb
-  - ruby_ex/filetype.rb
-  - ruby_ex/fileutils_ex.rb
-  - ruby_ex/fold.rb
-  - ruby_ex/generate_id.rb
-  - ruby_ex/hookable.rb
-  - ruby_ex/hooker.rb
-  - ruby_ex/inactive_timeout.rb
-  - ruby_ex/indexed_node.rb
-  - ruby_ex/io_marshal.rb
-  - ruby_ex/ioo.rb
-  - ruby_ex/labeled_node.rb
-  - ruby_ex/logger_observer.rb
-  - ruby_ex/md5sum.rb
-  - ruby_ex/mktemp.rb
-  - ruby_ex/module_ex.rb
-  - ruby_ex/node.rb
-  - ruby_ex/object_monitor.rb
-  - ruby_ex/object_monitor_activity.rb
-  - ruby_ex/observable.rb
-  - ruby_ex/observable_pool.rb
-  - ruby_ex/orderedhash.rb
-  - ruby_ex/pathname_ex.rb
-  - ruby_ex/pp_hierarchy.rb
-  - ruby_ex/pseudo_cache.rb
-  - ruby_ex/queue.rb
-  - ruby_ex/random_generators.rb
-  - ruby_ex/safe_eval.rb
-  - ruby_ex/sendmail.rb
-  - ruby_ex/service_manager.rb
-  - ruby_ex/shuffle.rb
-  - ruby_ex/spring.rb
-  - ruby_ex/spring_set.rb
-  - ruby_ex/string_ex.rb
-  - ruby_ex/symtbl.rb
-  - ruby_ex/synflow.rb
-  - ruby_ex/thread_mutex.rb
-  - ruby_ex/timeout_ex.rb
-  - ruby_ex/top_down.rb
-  - ruby_ex/trace.rb
-  - ruby_ex/uri_ex.rb
-  - ruby_ex/verbose_object.rb
-  - ruby_ex/version.rb
-  - ruby_ex/algorithms/simulated_annealing.rb
-  - ruby_ex/commands/command.rb
-  - ruby_ex/commands/datas.rb
-  - ruby_ex/commands/factory.rb
-  - ruby_ex/commands/helpers.rb
-  - ruby_ex/commands/pipe.rb
-  - ruby_ex/commands/runners.rb
-  - ruby_ex/commands/seq.rb
-  - ruby_ex/commands/datas/data.rb
-  - ruby_ex/commands/datas/factory.rb
-  - ruby_ex/commands/runners/exec.rb
-  - ruby_ex/commands/runners/fork.rb
-  - ruby_ex/commands/runners/runner.rb
-  - ruby_ex/drb/dispatcher.rb
-  - ruby_ex/drb/dispatcher_server_test.rb
-  - ruby_ex/drb/drb_observable.rb
-  - ruby_ex/drb/drb_observable_pool.rb
-  - ruby_ex/drb/drb_service.rb
-  - ruby_ex/drb/drb_undumped_attributes.rb
-  - ruby_ex/drb/drb_undumped_indexed_object.rb
-  - ruby_ex/drb/insecure_protected_methods.rb
-  - ruby_ex/drb/session_client_test.rb
-  - ruby_ex/drb/session_manager.rb
-  - ruby_ex/drb/session_server.rb
-  - ruby_ex/module/attr_once.rb
-  - ruby_ex/module/autoload_tree.rb
-  - ruby_ex/module/hierarchy.rb
-  - ruby_ex/module/instance_method_visibility.rb
-  - ruby_ex/random_generators/random_generator.rb
-  - ruby_ex/random_generators/ruby.rb
-  - ruby_ex/session/administrable.rb
-  - ruby_ex/session/client.rb
-  - ruby_ex/session/const.rb
-  - ruby_ex/session/dispatcher.rb
-  - ruby_ex/session/error.rb
-  - ruby_ex/session/fetchable.rb
-  - ruby_ex/session/fetcher.rb
-  - ruby_ex/session/hookable.rb
-  - ruby_ex/session/profile.rb
-  - ruby_ex/session/server.rb
-  - ruby_ex/session/test/administrable_test.rb
-  - ruby_ex/session/test/basic_test.rb
-  - ruby_ex/session/test/dispatcher_test.rb
-  - ruby_ex/session/test/fetchable_test.rb
-  - ruby_ex/session/test/sub_server_test.rb
-  - ruby_ex/test/unit/ui/yaml/testrunner.rb
-  - ruby_ex/uri/druby.rb
-  - ruby_ex/uri/file.rb
-  - ruby_ex/uri/ftp_ex.rb
-  - ruby_ex/uri/http_ex.rb
-  - ruby_ex/uri/ssh.rb
-  - ruby_ex/uri/svn.rb
-  - ruby_ex/yaml/basenode_ext.rb
-  - ruby_ex/yaml/chop_header.rb
-  - ruby_ex/yaml/transform.rb
-  - ruby_ex/yaml/yregexpath.rb
+  - lib/vcs/changelog.rb
+  - lib/vcs/conflict.rb
+  - lib/vcs/cvs.rb
+  - lib/vcs/diff.rb
+  - lib/vcs/diffstat.rb
+  - lib/vcs/edit.rb
+  - lib/vcs/last_changed_date.rb
+  - lib/vcs/mail.rb
+  - lib/vcs/message.rb
+  - lib/vcs/mycommit.rb
+  - lib/vcs/news.rb
+  - lib/vcs/prcs.rb
+  - lib/vcs/revision.rb
+  - lib/vcs/script.rb
+  - lib/vcs/status.rb
+  - lib/vcs/svn.rb
+  - lib/vcs/url.rb
+  - lib/vcs/vcs.rb
   - bin/vcs
   - bin/vcs-cvs
   - bin/vcs-prcs
   - bin/vcs-svn
-  - doc/jamis.rb
+  - AUTHORS
   - HOWTO
+  - NEWS
   - Rakefile
-  - TODO
+  - README
+  - SPEC.dyn.yml
+  - SPEC.gemspec
+  - SPEC.yml
 test_files: []
 rdoc_options: []
 extra_rdoc_files: []
 executables: 
   - vcs
-  - vcs-svn
   - vcs-cvs
   - vcs-prcs
+  - vcs-svn
 extensions: []
 requirements: []
-dependencies: []
+dependencies: 
+  - !ruby/object:Gem::Dependency 
+    name: ruby_ex
+    version_requirement: 
+    version_requirements: !ruby/object:Gem::Version::Requirement 
+      requirements: 
+        - 
+          - "~>"
+          - !ruby/object:Gem::Version 
+            version: 0.2.0
+      version: