kgrader/lib/kgrader/backend/svn.rb

require 'io/console'
require 'nokogiri'
require 'open3'

module KGrader::Backend
  class SVN

    def initialize(filesystem, course, config)
      @fs = filesystem
      @course = course
      @config = config
      @password = nil
    end

    def prepare(semester, assignment)
      return unless @config['verify']
      url = @config['verify'] % {
        :semester => semester,
        :assignment => assignment
      }

      unless test_okay url
        print "svn: password: "
        @password = STDIN.noecho(&:gets).chomp
        puts
        puts "svn: bad password or other network issues" unless test_okay url
      end
    end

    def revision(repo)
      xml = Nokogiri::XML run('log', '--xml', '-l', '1', repo).first
      xml.css('logentry').attr('revision').value.to_i
    end

    def clone(repo, semester, assignment, student)
      url = get_url semester, assignment, student
      run 'checkout', '--ignore-externals', url, repo
    end

    def update(repo, revision = nil)
      args = 'update', '--ignore-externals', '--accept', 'tf'
      args.push "-r#{revision}" unless revision.nil?
      run *args, repo
    end

    def log(repo)
      xml = Nokogiri::XML run('log', '--xml', repo).first
      xml.css('logentry').map do |elem|
        { :rev  => elem.attr('revision').to_i,
          :date => Time.parse(elem.css('date').text) }
      end
    end

    def commit(repo, message, *paths)
      fullpaths = *paths.map { |fn| File.join repo, fn }
      run 'add' fullpaths
      run 'commit', '-m', message, fullpaths
    end

    def commit_date(repo)
      xml = Nokogiri::XML run('log', '--xml', '-l', '1', repo).first
      Time.parse xml.css('logentry date').text
    end

    private
    def run(*cmd)
      if @password
        cmd.unshift @password
        cmd.unshift '--password'
      end
      Open3.capture2e('svn', *cmd)
    end

    def get_url(semester, assignment, student)
      @config['url'] % {
        :semester   => semester,
        :assignment => assignment,
        :student    => student
      }
    end

    def test_okay(url)
      status = run('list', '--non-interactive', url)[1]
      status.exited? && status.exitstatus == 0
    end
  end
end