winci-updater 0.0.1

data/lib/winci-updater/git_ext/git.rb

@@ -0,0 +1,15 @@
+module Git
+
+  def self.setup_ssh_key(ssh_key_path)
+    Base.setup_ssh_key(ssh_key_path)
+  end
+
+  def self.kill_ssh_agent
+    Base.kill_ssh_agent
+  end
+
+  def self.show_head_names
+    Base.show_head_names
+  end
+
+end

data/lib/winci-updater/git_ext/lib.rb

@@ -0,0 +1,120 @@
+require 'tempfile'
+
+module Git
+
+  class GitExecuteError < StandardError
+  end
+
+  class Lib
+
+    # open ssh-agent and add ssh_key
+    def setup_ssh_key(ssh_key_path)
+      envStr = os_command('ssh-agent', [], false)
+      envVars = envStr.split(';')
+      envVars.each do |var|
+        pair = var.split('=')
+        if pair and pair.length == 2
+          ENV[pair[0].strip] = pair[1].strip if pair[0] and pair[1]
+        end
+      end
+      arr_opts = []
+      arr_opts << ssh_key_path
+      os_command('ssh-add', arr_opts, false)
+    end
+
+    def kill_ssh_agent
+      os_command('ssh-agent -k', [], false)
+    end
+
+    def show_head_names
+      command('show', ['--name-only'])
+    end
+
+    # tries to clean the given repo
+    def clean(opts = {})
+      @path = opts[:path] || '.'
+
+      arr_opts = []
+      arr_opts << "-o" << opts[:remote] if opts[:remote]
+      arr_opts << "-f" << opts[:filter] if opts[:filter]
+
+      command('clean', arr_opts)
+    end
+
+    def stash(opts = {})
+      @path = opts[:path] || '.'
+
+      arr_opts = []
+      arr_opts << "-o" << opts[:remote] if opts[:remote]
+      arr_opts << 'save' if opts[:save]
+
+      arr_opts << '--'
+      arr_opts << opts[:message] if opts[:message]
+
+      command('stash', arr_opts)
+    end
+
+    def os_command(cmd, opts = [], chdir = true, redirect = '', &block)
+      ENV['GIT_DIR'] = @git_dir
+      ENV['GIT_INDEX_FILE'] = @git_index_file
+      ENV['GIT_WORK_TREE'] = @git_work_dir
+      path = @git_work_dir || @git_dir || @path
+
+      opts = [opts].flatten.map { |s| escape(s) }.join(' ')
+      git_cmd = "#{cmd} #{opts} #{redirect} 2>&1"
+
+      out = nil
+      if chdir && (Dir.getwd != path)
+        Dir.chdir(path) { out = run_command(git_cmd, &block) }
+      else
+        out = run_command(git_cmd, &block)
+      end
+
+      @logger = $log if not @logger
+      if @logger
+        @logger.info(git_cmd)
+        @logger.debug(out)
+      end
+
+      if $?.exitstatus > 0
+        if $?.exitstatus == 1 && out == ''
+          return ''
+        end
+        raise Git::GitExecuteError.new(git_cmd + ':' + out.to_s)
+      end
+      out
+    end
+
+    def command(cmd, opts = [], chdir = true, redirect = '', &block)
+      ENV['GIT_DIR'] = @git_dir
+      ENV['GIT_INDEX_FILE'] = @git_index_file
+      ENV['GIT_WORK_TREE'] = @git_work_dir
+      path = @git_work_dir || @git_dir || @path
+
+      opts = [opts].flatten.map { |s| escape(s) }.join(' ')
+      git_cmd = "git #{cmd} #{opts} #{redirect} 2>&1"
+
+      out = nil
+      if chdir && (Dir.getwd != path)
+        Dir.chdir(path) { out = run_command(git_cmd, &block) }
+      else
+        out = run_command(git_cmd, &block)
+      end
+
+      @logger = $log if not @logger
+      if @logger
+        @logger.info(git_cmd)
+        @logger.debug(out)
+      end
+
+      if $?.exitstatus > 0
+        if $?.exitstatus == 1 && out == ''
+          return ''
+        end
+        raise Git::GitExecuteError.new(git_cmd + ':' + out.to_s)
+      end
+      out
+    end
+
+  end
+end

data/lib/winci-updater/gui.rb

@@ -0,0 +1,47 @@
+module WinCI
+  module Updater
+
+    def message_box(txt, title='Ruby', buttons=MB_OK | MB_SETFOREGROUND)
+      user32 = DL.dlopen('user32')
+      msgbox = user32['MessageBoxA', 'ILSSI']
+      r, rs = msgbox.call(0, txt, title, buttons)
+      return r
+    end
+
+    def inputbox(message, title="Message from #{__FILE__}")
+      # returns nil if 'cancel' is clicked
+      # returns a (possibly empty) string otherwise
+      require 'win32ole'
+      # hammer the arguments to vb-script style
+      vb_msg = %Q| "#{message.gsub("\n", '"& vbcrlf &"')}"|
+      vb_msg.gsub!("\t", '"& vbtab &"')
+      vb_msg.gsub!('&""&', '&')
+      vb_title = %Q|"#{title}"|
+      # go!
+      sc = WIN32OLE.new("ScriptControl")
+      sc.language = "VBScript"
+      sc.eval(%Q|Inputbox(#{vb_msg}, #{vb_title})|)
+    end
+
+    def popup(message)
+      require 'win32ole'
+      wsh = WIN32OLE.new('WScript.Shell')
+      wsh.popup(message, 0, __FILE__)
+    end
+
+    def prompt_user(msgRequest, msgWrong)
+      answer = ''
+      # prompt user to select destination installation disk
+      i = 0
+      begin
+        puts msgWrong if i > 0
+        answer = inputbox msgRequest
+        exit if not answer
+        answer = answer.upcase[0].chr if answer.length > 0
+        i = i + 1
+      end while !answer or (answer !~ /\A[A-Z]\Z/)
+      answer
+    end
+
+  end
+end

data/lib/winci-updater/logger.rb

@@ -0,0 +1,54 @@
+require 'logger'
+
+module WinCI
+  module Updater
+
+    class TLogger < Logger
+      attr_reader :logger
+
+      def initialize(file, shift_age, stdout, verbose=false)
+        @logger = Logger.new(file, shift_age)
+        @logger.level = Logger::INFO
+        @verbose = verbose
+        @stdout = stdout
+      end
+
+      def log(str, lvl=:info)
+        @logger.send(lvl, str)
+        if lvl == :fatal
+          raise str
+        elsif (@verbose or !(lvl == :info))
+          @stdout.puts(str) if (@verbose or !(lvl == :info))
+        end
+      end
+
+      def info(str, lvl=:info)
+        @logger.send(lvl, str)
+        if lvl == :fatal
+          raise str
+        elsif (@verbose or !(lvl == :info))
+          @stdout.puts(str) if (@verbose or !(lvl == :info))
+        end
+      end
+
+      def debug(str, lvl=:debug)
+        @logger.send(lvl, str)
+        if lvl == :fatal
+          raise str
+        elsif (@verbose or !(lvl == :info))
+          @stdout.puts(str) if (@verbose or !(lvl == :info))
+        end
+      end
+
+      def fatal(str, lvl=:fatal)
+        @logger.send(lvl, str)
+        if lvl == :fatal
+          raise str
+        elsif (@verbose or !(lvl == :info))
+          @stdout.puts(str) if (@verbose or !(lvl == :info))
+        end
+      end
+    end # of Class TLogger
+
+  end
+end

data/lib/winci-updater/version.rb

@@ -0,0 +1,5 @@
+module WinCI
+  module Updater
+    VERSION = "0.0.1"
+  end
+end

data/spec/fixtures/files.git/HEAD

@@ -0,0 +1 @@
+ref: refs/heads/master

data/spec/fixtures/files.git/config

@@ -0,0 +1,10 @@
+[core]
+	repositoryformatversion = 0
+	filemode = false
+	bare = true
+	symlinks = false
+	ignorecase = true
+	hideDotFiles = dotGitOnly
+	sharedrepository = 2
+[receive]
+	denyNonFastforwards = true

data/spec/fixtures/files.git/description

@@ -0,0 +1 @@
+Unnamed repository; edit this file 'description' to name the repository.

data/spec/fixtures/files.git/hooks/applypatch-msg.sample

@@ -0,0 +1,15 @@
+#!/bin/sh
+#
+# An example hook script to check the commit log message taken by
+# applypatch from an e-mail message.
+#
+# The hook should exit with non-zero status after issuing an
+# appropriate message if it wants to stop the commit.  The hook is
+# allowed to edit the commit message file.
+#
+# To enable this hook, rename this file to "applypatch-msg".
+
+. git-sh-setup
+test -x "$GIT_DIR/hooks/commit-msg" &&
+	exec "$GIT_DIR/hooks/commit-msg" ${1+"$@"}
+:

data/spec/fixtures/files.git/hooks/commit-msg.sample

@@ -0,0 +1,24 @@
+#!/bin/sh
+#
+# An example hook script to check the commit log message.
+# Called by git-commit with one argument, the name of the file
+# that has the commit message.  The hook should exit with non-zero
+# status after issuing an appropriate message if it wants to stop the
+# commit.  The hook is allowed to edit the commit message file.
+#
+# To enable this hook, rename this file to "commit-msg".
+
+# Uncomment the below to add a Signed-off-by line to the message.
+# Doing this in a hook is a bad idea in general, but the prepare-commit-msg
+# hook is more suited to it.
+#
+# SOB=$(git var GIT_AUTHOR_IDENT | sed -n 's/^\(.*>\).*$/Signed-off-by: \1/p')
+# grep -qs "^$SOB" "$1" || echo "$SOB" >> "$1"
+
+# This example catches duplicate Signed-off-by lines.
+
+test "" = "$(grep '^Signed-off-by: ' "$1" |
+	 sort | uniq -c | sed -e '/^[ 	]*1[ 	]/d')" || {
+	echo >&2 Duplicate Signed-off-by lines.
+	exit 1
+}

data/spec/fixtures/files.git/hooks/post-commit.sample

@@ -0,0 +1,8 @@
+#!/bin/sh
+#
+# An example hook script that is called after a successful
+# commit is made.
+#
+# To enable this hook, rename this file to "post-commit".
+
+: Nothing

data/spec/fixtures/files.git/hooks/post-receive.sample

@@ -0,0 +1,15 @@
+#!/bin/sh
+#
+# An example hook script for the "post-receive" event.
+#
+# The "post-receive" script is run after receive-pack has accepted a pack
+# and the repository has been updated.  It is passed arguments in through
+# stdin in the form
+#  <oldrev> <newrev> <refname>
+# For example:
+#  aa453216d1b3e49e7f6f98441fa56946ddcd6a20 68f7abf4e6f922807889f52bc043ecd31b79f814 refs/heads/master
+#
+# see contrib/hooks/ for a sample, or uncomment the next line and
+# rename the file to "post-receive".
+
+#. /usr/share/doc/git-core/contrib/hooks/post-receive-email

data/spec/fixtures/files.git/hooks/post-update.sample

@@ -0,0 +1,8 @@
+#!/bin/sh
+#
+# An example hook script to prepare a packed repository for use over
+# dumb transports.
+#
+# To enable this hook, rename this file to "post-update".
+
+exec git-update-server-info

data/spec/fixtures/files.git/hooks/pre-applypatch.sample

@@ -0,0 +1,14 @@
+#!/bin/sh
+#
+# An example hook script to verify what is about to be committed
+# by applypatch from an e-mail message.
+#
+# The hook should exit with non-zero status after issuing an
+# appropriate message if it wants to stop the commit.
+#
+# To enable this hook, rename this file to "pre-applypatch".
+
+. git-sh-setup
+test -x "$GIT_DIR/hooks/pre-commit" &&
+	exec "$GIT_DIR/hooks/pre-commit" ${1+"$@"}
+:

data/spec/fixtures/files.git/hooks/pre-commit.sample

@@ -0,0 +1,46 @@
+#!/bin/sh
+#
+# An example hook script to verify what is about to be committed.
+# Called by git-commit with no arguments.  The hook should
+# exit with non-zero status after issuing an appropriate message if
+# it wants to stop the commit.
+#
+# To enable this hook, rename this file to "pre-commit".
+
+if git-rev-parse --verify HEAD >/dev/null 2>&1
+then
+	against=HEAD
+else
+	# Initial commit: diff against an empty tree object
+	against=4b825dc642cb6eb9a060e54bf8d69288fbee4904
+fi
+
+# If you want to allow non-ascii filenames set this variable to true.
+allownonascii=$(git config hooks.allownonascii)
+
+# Cross platform projects tend to avoid non-ascii filenames; prevent
+# them from being added to the repository. We exploit the fact that the
+# printable range starts at the space character and ends with tilde.
+if [ "$allownonascii" != "true" ] &&
+	# Note that the use of brackets around a tr range is ok here, (it's
+	# even required, for portability to Solaris 10's /usr/bin/tr), since
+	# the square bracket bytes happen to fall in the designated range.
+	test "$(git diff --cached --name-only --diff-filter=A -z $against |
+	  LC_ALL=C tr -d '[ -~]\0')"
+then
+	echo "Error: Attempt to add a non-ascii file name."
+	echo
+	echo "This can cause problems if you want to work"
+	echo "with people on other platforms."
+	echo
+	echo "To be portable it is advisable to rename the file ..."
+	echo
+	echo "If you know what you are doing you can disable this"
+	echo "check using:"
+	echo
+	echo "  git config hooks.allownonascii true"
+	echo
+	exit 1
+fi
+
+exec git diff-index --check --cached $against --

data/spec/fixtures/files.git/hooks/pre-rebase.sample

@@ -0,0 +1,169 @@
+#!/bin/sh
+#
+# Copyright (c) 2006, 2008 Junio C Hamano
+#
+# The "pre-rebase" hook is run just before "git-rebase" starts doing
+# its job, and can prevent the command from running by exiting with
+# non-zero status.
+#
+# The hook is called with the following parameters:
+#
+# $1 -- the upstream the series was forked from.
+# $2 -- the branch being rebased (or empty when rebasing the current branch).
+#
+# This sample shows how to prevent topic branches that are already
+# merged to 'next' branch from getting rebased, because allowing it
+# would result in rebasing already published history.
+
+publish=next
+basebranch="$1"
+if test "$#" = 2
+then
+	topic="refs/heads/$2"
+else
+	topic=`git symbolic-ref HEAD` ||
+	exit 0 ;# we do not interrupt rebasing detached HEAD
+fi
+
+case "$topic" in
+refs/heads/??/*)
+	;;
+*)
+	exit 0 ;# we do not interrupt others.
+	;;
+esac
+
+# Now we are dealing with a topic branch being rebased
+# on top of master.  Is it OK to rebase it?
+
+# Does the topic really exist?
+git show-ref -q "$topic" || {
+	echo >&2 "No such branch $topic"
+	exit 1
+}
+
+# Is topic fully merged to master?
+not_in_master=`git-rev-list --pretty=oneline ^master "$topic"`
+if test -z "$not_in_master"
+then
+	echo >&2 "$topic is fully merged to master; better remove it."
+	exit 1 ;# we could allow it, but there is no point.
+fi
+
+# Is topic ever merged to next?  If so you should not be rebasing it.
+only_next_1=`git-rev-list ^master "^$topic" ${publish} | sort`
+only_next_2=`git-rev-list ^master           ${publish} | sort`
+if test "$only_next_1" = "$only_next_2"
+then
+	not_in_topic=`git-rev-list "^$topic" master`
+	if test -z "$not_in_topic"
+	then
+		echo >&2 "$topic is already up-to-date with master"
+		exit 1 ;# we could allow it, but there is no point.
+	else
+		exit 0
+	fi
+else
+	not_in_next=`git-rev-list --pretty=oneline ^${publish} "$topic"`
+	perl -e '
+		my $topic = $ARGV[0];
+		my $msg = "* $topic has commits already merged to public branch:\n";
+		my (%not_in_next) = map {
+			/^([0-9a-f]+) /;
+			($1 => 1);
+		} split(/\n/, $ARGV[1]);
+		for my $elem (map {
+				/^([0-9a-f]+) (.*)$/;
+				[$1 => $2];
+			} split(/\n/, $ARGV[2])) {
+			if (!exists $not_in_next{$elem->[0]}) {
+				if ($msg) {
+					print STDERR $msg;
+					undef $msg;
+				}
+				print STDERR " $elem->[1]\n";
+			}
+		}
+	' "$topic" "$not_in_next" "$not_in_master"
+	exit 1
+fi
+
+exit 0
+
+################################################################
+
+This sample hook safeguards topic branches that have been
+published from being rewound.
+
+The workflow assumed here is:
+
+ * Once a topic branch forks from "master", "master" is never
+   merged into it again (either directly or indirectly).
+
+ * Once a topic branch is fully cooked and merged into "master",
+   it is deleted.  If you need to build on top of it to correct
+   earlier mistakes, a new topic branch is created by forking at
+   the tip of the "master".  This is not strictly necessary, but
+   it makes it easier to keep your history simple.
+
+ * Whenever you need to test or publish your changes to topic
+   branches, merge them into "next" branch.
+
+The script, being an example, hardcodes the publish branch name
+to be "next", but it is trivial to make it configurable via
+$GIT_DIR/config mechanism.
+
+With this workflow, you would want to know:
+
+(1) ... if a topic branch has ever been merged to "next".  Young
+    topic branches can have stupid mistakes you would rather
+    clean up before publishing, and things that have not been
+    merged into other branches can be easily rebased without
+    affecting other people.  But once it is published, you would
+    not want to rewind it.
+
+(2) ... if a topic branch has been fully merged to "master".
+    Then you can delete it.  More importantly, you should not
+    build on top of it -- other people may already want to
+    change things related to the topic as patches against your
+    "master", so if you need further changes, it is better to
+    fork the topic (perhaps with the same name) afresh from the
+    tip of "master".
+
+Let's look at this example:
+
+		   o---o---o---o---o---o---o---o---o---o "next"
+		  /       /           /           /
+		 /   a---a---b A     /           /
+		/   /               /           /
+	       /   /   c---c---c---c B         /
+	      /   /   /             \         /
+	     /   /   /   b---b C     \       /
+	    /   /   /   /             \     /
+    ---o---o---o---o---o---o---o---o---o---o---o "master"
+
+
+A, B and C are topic branches.
+
+ * A has one fix since it was merged up to "next".
+
+ * B has finished.  It has been fully merged up to "master" and "next",
+   and is ready to be deleted.
+
+ * C has not merged to "next" at all.
+
+We would want to allow C to be rebased, refuse A, and encourage
+B to be deleted.
+
+To compute (1):
+
+	git-rev-list ^master ^topic next
+	git-rev-list ^master        next
+
+	if these match, topic has not merged in next at all.
+
+To compute (2):
+
+	git-rev-list master..topic
+
+	if this is empty, it is fully merged to "master".