yggdrasil 0.0.0 → 0.0.1

data/LICENSE

@@ -1,4 +1,4 @@
-Copyright (c) 2012 tkusukawa
+Copyright (c) 2012-2013 Tomohisa Kusukawa
 
 MIT License
 

data/README.md

@@ -1,6 +1,6 @@
 # Yggdrasil
 
-TODO: Write a gem description
+Yggdrasil is a subversion wrapper to manage configuration files.
 
 ## Installation
 
@@ -18,12 +18,53 @@ Or install it yourself as:
 
 ## Usage
 
-TODO: Write usage instructions here
+* Install subversion
+    $ sudo yum install subversion
 
-## Contributing
+* Prepare subversion repository and init Yggdrasil.
+    $ svnadmin create ~/svn-repo
+    $ yggdrasil init --repo file://$HOME/svn-repo
+  You should use svn-server if you have.
+  In that case, the configuration files of
+  all the servers can be managed on the unification.
 
-1. Fork it
-2. Create your feature branch (`git checkout -b my-new-feature`)
-3. Commit your changes (`git commit -am 'Added some feature'`)
-4. Push to the branch (`git push origin my-new-feature`)
-5. Create new Pull Request
+* Add configuration files
+    $ yggdrasil add ~/.bashrc  ..etc
+
+* Check modify and/or delete
+    $ yggdrasil status /
+
+* Refer Help
+    $ yggdrasil help
+
+## Environment
+
+* Linux
+* Subversion command-line client
+* Ruby
+* Gem
+
+## License
+
+Copyright (c) 2012-2013 Tomohisa Kusukawa
+
+MIT License
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/Rakefile

@@ -1,2 +1,10 @@
 #!/usr/bin/env rake
 require "bundler/gem_tasks"
+
+Bundler.setup
+require 'rspec/core/rake_task'
+
+desc "run spec"
+RSpec::Core::RakeTask.new(:spec) do |t|
+  t.rspec_opts = %w{-c -fs}
+end

data/bin/yggdrasil

@@ -1,3 +1,5 @@
 #!/usr/bin/env ruby
 
-puts 'Hello World!'
+require 'yggdrasil'
+
+Yggdrasil::command(ARGV)

data/lib/yggdrasil/add.rb

@@ -0,0 +1,25 @@
+class Yggdrasil
+
+  # @param [Array] args
+  def add(args)
+    add_relatives = Array.new
+    while (arg = args.shift)
+      file_path = `readlink -f #{arg}`.chomp
+      exit $?.exitstatus unless $?.success?
+      unless File.exist?(file_path)
+        puts "no such file: #{file_path}"
+        next
+      end
+      mirror_path = @mirror_dir + file_path
+      mirror_dir = File.dirname(mirror_path)
+      FileUtils.mkdir_p(mirror_dir) unless File.exist?(mirror_dir)
+      FileUtils.copy file_path, mirror_path
+      add_relatives << file_path.sub(%r{^/}, '')
+    end
+    if add_relatives.size != 0
+      FileUtils.cd @mirror_dir do
+        puts system3("#@svn add --no-auth-cache --non-interactive --parents #{add_relatives.join(' ')}")
+      end
+    end
+  end
+end

data/lib/yggdrasil/cleanup.rb

@@ -0,0 +1,19 @@
+class Yggdrasil
+
+  # @param [Array] args
+  def cleanup(args)
+    args, options = parse_options(args, {'--username'=>:username, '--password'=>:password})
+    if args.size != 0
+      error "invalid arguments: #{args.join(',')}"
+    end
+
+    options = input_user_pass(options)
+
+    system3 "rm -rf #@mirror_dir"
+
+    system3 "#@svn checkout"\
+                 " --no-auth-cache --non-interactive"\
+                 " --username '#{options[:username]}' --password '#{options[:password]}'"\
+                 " #@repo #@mirror_dir"
+  end
+end

data/lib/yggdrasil/commit.rb

@@ -0,0 +1,34 @@
+class Yggdrasil
+
+  # @param [Array] args
+  def commit(args)
+    target_paths, options = parse_options(args,
+        {'--username'=>:username, '--password'=>:password,
+         '-m'=>:message, '--message'=>:message, '--non-interactive'=>:non_interactive?})
+    options = input_user_pass(options)
+
+    updates = sync_mirror(options)
+    matched_updates = select_updates(updates, target_paths)
+
+    confirmed_updates = confirm_updates(matched_updates,options) do |relative_path|
+      FileUtils.cd @mirror_dir do
+        puts system3("#@svn diff --no-auth-cache --non-interactive #{relative_path}")
+      end
+    end
+    return unless confirmed_updates
+    return if confirmed_updates.size == 0
+
+    until options.has_key?(:message) do
+      print "Input log message: "
+      input = $stdin.gets
+      options[:message] = input.chomp
+    end
+
+    FileUtils.cd @mirror_dir do
+      puts system3 "#@svn commit -m '#{options[:message]}'"\
+                   " --no-auth-cache --non-interactive"\
+                   " --username '#{options[:username]}' --password '#{options[:password]}'"\
+                   " #{confirmed_updates.join(' ')}"
+    end
+  end
+end

data/lib/yggdrasil/diff.rb

@@ -0,0 +1,29 @@
+class Yggdrasil
+
+  # @param [Array] args
+  def diff(args)
+    args, options = parse_options(args,
+        {'--username'=>:username, '--password'=>:password, '-r'=>:revision, '--revision'=>:revision})
+    options = input_user_pass(options)
+
+    sync_mirror options
+
+    paths = Array.new
+    if args.size == 0
+      paths << @current_dir.sub(%r{^/}, '')
+    else
+      args.each do |path|
+        path = "#@current_dir/#{path}" unless %r{^/} =~ path
+        paths << path.sub(%r{^/}, '')
+      end
+    end
+
+    cmd_arg = "#@svn diff --no-auth-cache --non-interactive"
+    cmd_arg += " --username #{options[:username]} --password #{options[:password]}"
+    cmd_arg += " -r #{options[:revision]}" if options.has_key?(:revision)
+    cmd_arg += ' '+paths.join(' ')
+    FileUtils.cd @mirror_dir do
+      puts system3(cmd_arg)
+    end
+  end
+end

data/lib/yggdrasil/help.rb

@@ -0,0 +1,190 @@
+class Yggdrasil
+
+  HELP_SUBCOMMANDS = <<EOS
+usage: #{CMD} <subcommand> [options] [args]
+Yggdrasil version #{VERSION}
+Type '#{CMD} help <subcommand>' for help on a specific subcommand.
+
+Available subcommands:
+   add
+   cleanup
+   commit (ci)
+   diff (di)
+   help (?, h)
+   init
+   list (ls)
+   log
+   status (stat, st)
+   revert
+   update
+   version
+
+Yggdrasil is a configuration management tool by Subversion.
+You should type 'yggdrasil init' at first.
+
+EOS
+
+  # @param [Array] args
+  def Yggdrasil.help(args)
+    if args.size == 0 then
+      puts HELP_SUBCOMMANDS
+    elsif args.size != 1 then
+      error "too many arguments."
+    else
+      case args[0]
+        when 'add'
+          puts <<"EOS"
+add: Add files to management list (add to subversion)
+usage #{CMD} add [FILES...]
+
+EOS
+        when 'cleanup'
+          puts <<"EOS"
+cleanup: clean up the working copy
+usage: #{CMD} cleanup [OPTIONS...]
+
+Valid options:
+  --username ARG           : specify a username ARG
+  --password ARG           : specify a password ARG
+
+EOS
+        when 'commit', 'ci'
+          puts <<"EOS"
+commit (ci): Send changes from your local file to the repository.
+usage: #{CMD} commit [OPTIONS...] [FILES...]
+
+Valid options:
+  --username ARG           : specify a username ARG
+  --password ARG           : specify a password ARG
+  -m [--message] ARG       : specify log message ARG
+  --non-interactive        : do no interactive prompting
+
+EOS
+        when 'diff', 'di'
+          puts <<"EOS"
+diff (di): Display the differences between two revisions or paths.
+usage: #{CMD} diff [OPTIONS...] [PATH...]
+
+Valid options:
+  --username ARG           : specify a username ARG
+  --password ARG           : specify a password ARG
+  -r [--revision] ARG      : ARG (some commands also take ARG1:ARG2 range)
+                             A revision argument can be one of:
+                                NUMBER       revision number
+                                '{' DATE '}' revision at start of the date
+                                'HEAD'       latest in repository
+                                'BASE'       base rev of item's working copy
+                                'COMMITTED'  last commit at or before BASE
+                                'PREV'       revision just before COMMITTED
+
+EOS
+        when 'help', '?', 'h'
+          puts <<"EOS"
+help (?,h): Describe the usage of this program or its subcommands.
+usage: #{CMD} help [SUBCOMMAND]
+
+EOS
+        when 'init'
+          puts <<"EOS"
+init: Check environment and initialize configuration.
+usage: #{CMD} init [OPTIONS...]
+
+Valid options:
+  --repo ARG               : specify svn repository
+  --username ARG           : specify a username ARG
+  --password ARG           : specify a password ARG
+
+EOS
+        when 'list', 'ls'
+          puts <<"EOS"
+list (ls): List directory entries in the repository.
+usage: #{CMD} list [OPTIONS...] [PATH...]
+
+Valid options:
+  --username ARG           : specify a username ARG
+  --password ARG           : specify a password ARG
+  -r [--revision] ARG      : ARG (some commands also take ARG1:ARG2 range)
+                             A revision argument can be one of:
+                                NUMBER       revision number
+                                '{' DATE '}' revision at start of the date
+                                'HEAD'       latest in repository
+                                'BASE'       base rev of item's working copy
+                                'COMMITTED'  last commit at or before BASE
+                                'PREV'       revision just before COMMITTED
+  -R [--recursive]         : descend recursively, same as --depth=infinity
+  --depth ARG              : limit operation by depth ARG ('empty', 'files',
+                            'immediates', or 'infinity')
+
+EOS
+        when 'log'
+          puts <<"EOS"
+log: Show the log messages for a set of revision(s) and/or file(s).
+usage: #{CMD} log [OPTIONS...] [PATH]
+
+Valid options:
+  --username ARG           : specify a username ARG
+  --password ARG           : specify a password ARG
+  -r [--revision] ARG      : ARG (some commands also take ARG1:ARG2 range)
+                             A revision argument can be one of:
+                                NUMBER       revision number
+                                '{' DATE '}' revision at start of the date
+                                'HEAD'       latest in repository
+                                'BASE'       base rev of item's working copy
+                                'COMMITTED'  last commit at or before BASE
+                                'PREV'       revision just before COMMITTED
+
+EOS
+        when 'status', 'stat', 'st'
+          puts <<"EOS"
+status (stat, st): Print the status of managed files and directories.
+usage: #{CMD} status [OPTIONS...] [PATH...]
+
+Valid options:
+  --username ARG           : specify a username ARG
+  --password ARG           : specify a password ARG
+  --depth ARG              : limit operation by depth ARG ('empty', 'files',
+                            'immediates', or 'infinity')
+
+EOS
+        when 'revert'
+          puts <<"EOS"
+revert: Restore pristine working copy file (undo most local edits).
+usage: #{CMD} revert [PATH...]
+
+Valid options:
+  --username ARG           : specify a username ARG
+  --password ARG           : specify a password ARG
+  --non-interactive        : do no interactive prompting
+
+EOS
+        when 'update'
+          puts <<"EOS"
+update (up): Bring changes from the repository into the local files.
+usage: #{CMD} update [PATH...]
+
+Valid options:
+  --username ARG           : specify a username ARG
+  --password ARG           : specify a password ARG
+  -r [--revision] ARG      : ARG (some commands also take ARG1:ARG2 range)
+                             A revision argument can be one of:
+                                NUMBER       revision number
+                                '{' DATE '}' revision at start of the date
+                                'HEAD'       latest in repository
+                                'BASE'       base rev of item's working copy
+                                'COMMITTED'  last commit at or before BASE
+                                'PREV'       revision just before COMMITTED
+  --non-interactive        : do no interactive prompting
+
+EOS
+        when 'version', '--version'
+          puts <<"EOS"
+version: See the program version
+usage: #{CMD} version
+
+EOS
+        else
+          error "Unknown subcommand: '#{subcommand}'"
+      end
+    end
+  end
+end

data/lib/yggdrasil/init.rb

@@ -0,0 +1,83 @@
+class Yggdrasil
+
+  # @param [Array] args
+  def Yggdrasil.init(args)
+    ENV['LANG'] = 'en_US.UTF-8'
+
+    args, options = parse_options(args,
+        {'--repo'=>:repo, '--username'=>:username, '--password'=>:password})
+    if args.size != 0
+      error "invalid arguments: #{args.join(',')}"
+    end
+
+    out = system3 'which svn'
+    svn = out.chomp
+
+    out = system3 'svn --version'
+    unless /version (\d+\.\d+\.\d+) / =~ out
+      puts "#{CMD} error: can not find version string: svn --version"
+      exit 1
+    end
+    svn_version=$1
+
+    config_dir =  ENV["HOME"] + '/.yggdrasil'
+    if File.exist?(config_dir)
+      puts "#{CMD} error: already exist .yggdrasil directory: #{config_dir}"
+      exit 1
+    end
+
+    until options.has_key?(:repo) do
+      print "Input svn repo URL: "
+      input = $stdin.gets
+
+      unless /^(http:|file:|svn:)/ =~ input
+        puts "ERROR: Invalid URL."
+        redo
+      end
+      options[:repo] = input
+    end
+    options[:repo].chomp!
+    options[:repo].chomp!('/')
+
+    options = input_user_pass(options)
+
+    puts "SVN access test..."
+    loop do
+      ret = system3 "#{svn} ls --no-auth-cache --non-interactive"\
+                         " --username '#{options[:username]}' --password '#{options[:password]}'"\
+                         " #{options[:repo]}", false
+      unless ret.nil?
+        puts "SVN access: OK."
+        break
+      end
+
+      ret = system3 "#{svn} mkdir --parents -m 'yggdrasil init'"\
+                         " --no-auth-cache --non-interactive"\
+                         " --username '#{options[:username]}' --password '#{options[:password]}'"\
+                         " #{options[:repo]}", false
+      unless ret.nil?
+        puts "SVN mkdir: OK."
+        break
+      end
+
+      puts "SVN error: can not access to '#{options[:repo]}'."
+      exit 1
+    end
+
+    Dir.mkdir config_dir, 0755
+    File.write config_dir+'/config',
+               "path=#{ENV['PATH']}\n"\
+               "svn=#{svn}\n"\
+               "svn_version=#{svn_version}\n"\
+               "repo=#{options[:repo]}\n"
+
+    ret = system3 "#{svn} checkout"\
+                       " --no-auth-cache --non-interactive"\
+                       " --username '#{options[:username]}' --password '#{options[:password]}'"\
+                       " #{options[:repo]} #{config_dir+'/mirror'}", false
+    if ret.nil?
+      puts "SVN checkout: error."
+      exit 1
+    end
+  end
+end

data/lib/yggdrasil/list.rb

@@ -0,0 +1,34 @@
+class Yggdrasil
+
+  # @param [Array] args
+  def list(args)
+    args, options = parse_options(args,
+        {'--username'=>:username, '--password'=>:password,
+         '-r'=>:revision, '--revision'=>:revision,
+         '-R'=>:recursive?, '--recursive'=>:recursive?,
+         '--depth'=>:depth})
+    options = input_user_pass(options)
+
+    sync_mirror options
+
+    repos = Array.new
+    if args.size == 0
+      repos << @repo+@current_dir
+    else
+      args.each do |path|
+        path = "#@current_dir/#{path}" unless %r{^/} =~ path
+        repos << @repo+path
+      end
+    end
+
+    cmd_arg = "#@svn list --no-auth-cache --non-interactive"
+    cmd_arg += " --username #{options[:username]} --password #{options[:password]}"
+    cmd_arg += " -r #{options[:revision]}" if options.has_key?(:revision)
+    cmd_arg += " -R" if options.has_key?(:recursive?)
+    cmd_arg += " --depth #{options[:depth]}" if options.has_key?(:depth)
+    cmd_arg += ' ' + repos.join(' ')
+    FileUtils.cd @mirror_dir do
+      puts system3(cmd_arg)
+    end
+  end
+end

data/lib/yggdrasil/log.rb

@@ -0,0 +1,34 @@
+class Yggdrasil
+
+  # @param [Array] args
+  def log(args)
+    args, options = parse_options(args,
+                                  {'--username'=>:username, '--password'=>:password,
+                                   '-r'=>:revision, '--revision'=>:revision})
+    options = input_user_pass(options)
+
+    if args.size == 0
+      dir = @mirror_dir+@current_dir
+      error "current directory is not managed." unless File.exist?(dir)
+      args << dir
+    else
+      args.collect! do |arg|
+        if %r{^/} =~ arg
+          @mirror_dir+arg
+        else
+          @mirror_dir+@current_dir+'/'+arg
+        end
+      end
+    end
+
+    cmd_arg = "#@svn log --verbose --no-auth-cache --non-interactive"
+    cmd_arg += " --username #{options[:username]} --password #{options[:password]}"
+    if options.has_key?(:revision)
+      cmd_arg += " -r #{options[:revision]}"
+    else
+      cmd_arg += " -r HEAD:1"
+    end
+    cmd_arg += ' ' + args.join(' ')
+    puts system3(cmd_arg)
+  end
+end

data/lib/yggdrasil/revert.rb

@@ -0,0 +1,47 @@
+class Yggdrasil
+
+  # @param [Array] args
+  def revert(args)
+    target_paths, options = parse_options(args,
+                                  {'--username'=>:username, '--password'=>:password,
+                                   '--non-interactive'=>:non_interactive?})
+    options = input_user_pass(options)
+
+    updates = sync_mirror(options)
+    matched_updates = select_updates(updates, target_paths)
+
+    confirmed_updates = confirm_updates(matched_updates,options) do |relative_path|
+      FileUtils.cd @mirror_dir do
+        puts system3("#@svn diff --no-auth-cache --non-interactive #{relative_path}")
+      end
+    end
+
+    return unless confirmed_updates
+    return if confirmed_updates.size == 0
+
+    FileUtils.cd @mirror_dir do
+      system3 "#@svn revert"\
+                   " --no-auth-cache --non-interactive"\
+                   " --username '#{options[:username]}' --password '#{options[:password]}'"\
+                   " #{confirmed_updates.reverse.join(' ')}"
+
+      # make ls hash
+      out = system3("#@svn ls --no-auth-cache --non-interactive"\
+                           " --username '#{options[:username]}' --password '#{options[:password]}'"\
+                           " --depth infinity #@repo")
+      ls_hash = Hash.new
+      out.split(/\n/).each {|relative| ls_hash[relative]=true}
+
+      # reflect mirror to real file
+      confirmed_updates.each do |file|
+        if ls_hash.has_key?(file)
+          if File.file?(@mirror_dir+'/'+file)
+            FileUtils.copy_file @mirror_dir+'/'+file, '/'+file
+          end
+        else
+          system3 "rm -rf #{@mirror_dir+'/'+file}"
+        end
+      end
+    end
+  end
+end

data/lib/yggdrasil/status.rb

@@ -0,0 +1,30 @@
+class Yggdrasil
+
+  # @param [Array] args
+  def status(args)
+    args, options = parse_options(args,
+        {'--username'=>:username, '--password'=>:password,
+        '--depth'=>:depth})
+    options = input_user_pass(options)
+
+    sync_mirror options
+
+    paths = String.new
+    if args.size == 0
+      paths += ' '+@current_dir.sub(%r{^/}, '')
+    else
+      args.each do |path|
+        path = "#@current_dir/#{path}" unless %r{^/} =~ path
+        paths += ' ' + path.sub(%r{^/}, '')
+      end
+    end
+
+    cmd_arg = "#@svn status#{paths} -qu --no-auth-cache --non-interactive"
+    cmd_arg += " --username #{options[:username]} --password #{options[:password]}"
+    cmd_arg += " --depth #{options[:depth]}" if options.has_key?(:depth)
+    FileUtils.cd @mirror_dir do
+      out = system3(cmd_arg)
+      print out.gsub(/^Status against revision:.*\n/, '')
+    end
+  end
+end