mirror of
				https://github.com/ruby/ruby.git
				synced 2022-11-09 12:17:21 -05:00 
			
		
		
		
	git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@47371 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
		
			
				
	
	
		
			360 lines
		
	
	
	
		
			10 KiB
		
	
	
	
		
			Ruby
		
	
	
		
			Executable file
		
	
	
	
	
			
		
		
	
	
			360 lines
		
	
	
	
		
			10 KiB
		
	
	
	
		
			Ruby
		
	
	
		
			Executable file
		
	
	
	
	
#!/usr/bin/ruby -s
 | 
						|
# -*- coding: us-ascii -*-
 | 
						|
require 'uri'
 | 
						|
require 'digest/md5'
 | 
						|
require 'digest/sha2'
 | 
						|
require 'fileutils'
 | 
						|
require 'tmpdir'
 | 
						|
STDOUT.sync = true
 | 
						|
 | 
						|
$exported = nil if $exported == ""
 | 
						|
$archname = nil if $archname == ""
 | 
						|
$keep_temp ||= nil
 | 
						|
$patch_file ||= nil
 | 
						|
$tooldir = File.expand_path("..", __FILE__)
 | 
						|
 | 
						|
def usage
 | 
						|
  <<USAGE
 | 
						|
usage: #{File.basename $0} [option...] new-directory-to-save [version ...]
 | 
						|
options:
 | 
						|
  -exported=PATH        make snapshot from already exported working directory
 | 
						|
  -archname=NAME        make the basename of snapshots NAME
 | 
						|
  -keep_temp            keep temporary working directory
 | 
						|
  -patch_file=PATCH     apply PATCH file after export
 | 
						|
  -packages=PKG[,...]   make PKG packages (#{PACKAGES.keys.join(", ")})
 | 
						|
  -digests=ALG[,...]    show ALG digests (#{DIGESTS.join(", ")})
 | 
						|
version:
 | 
						|
  trunk, stable, branches/*, tags/*, X.Y, X.Y.Z, X.Y.Z-pL
 | 
						|
each versions may be followed by optional @revision.
 | 
						|
USAGE
 | 
						|
end
 | 
						|
 | 
						|
DIGESTS = %w[MD5 SHA256 SHA512]
 | 
						|
PACKAGES = {
 | 
						|
  "bzip" => %w".tar.bz2 bzip2 -c",
 | 
						|
  "gzip" => %w".tar.gz  gzip -c",
 | 
						|
  "xz"   => %w".tar.xz  xz -c",
 | 
						|
  "zip"  => %w".zip     zip -qr",
 | 
						|
}
 | 
						|
 | 
						|
ENV["LC_ALL"] = ENV["LANG"] = "C"
 | 
						|
SVNURL = URI.parse("http://svn.ruby-lang.org/repos/ruby/")
 | 
						|
RUBY_VERSION_PATTERN = /^\#define\s+RUBY_VERSION\s+"([\d.]+)"/
 | 
						|
 | 
						|
ENV["VPATH"] ||= "include/ruby"
 | 
						|
YACC = ENV["YACC"] ||= "bison"
 | 
						|
ENV["BASERUBY"] ||= "ruby"
 | 
						|
ENV["RUBY"] ||= "ruby"
 | 
						|
ENV["MV"] ||= "mv"
 | 
						|
ENV["RM"] ||= "rm -f"
 | 
						|
ENV["MINIRUBY"] ||= "ruby"
 | 
						|
ENV["PROGRAM"] ||= "ruby"
 | 
						|
ENV["AUTOCONF"] ||= "autoconf"
 | 
						|
 | 
						|
class String
 | 
						|
  # for older ruby
 | 
						|
  alias bytesize size unless method_defined?(:bytesize)
 | 
						|
end
 | 
						|
 | 
						|
class Dir
 | 
						|
  def self.mktmpdir(path)
 | 
						|
    path = File.join(tmpdir, path+"-#{$$}-#{rand(100000)}")
 | 
						|
    begin
 | 
						|
      mkdir(path)
 | 
						|
    rescue Errno::EEXIST
 | 
						|
      path.succ!
 | 
						|
      retry
 | 
						|
    end
 | 
						|
    path
 | 
						|
  end unless respond_to?(:mktmpdir)
 | 
						|
end
 | 
						|
 | 
						|
$packages &&= $packages.split(/[, ]+/).tap {|pkg|
 | 
						|
  pkg -= PACKAGES.keys
 | 
						|
  pkg.empty? or abort "#{File.basename $0}: unknown packages - #{pkg.join(", ")}"
 | 
						|
}
 | 
						|
$packages ||= PACKAGES.keys
 | 
						|
 | 
						|
$digests &&= $digests.split(/[, ]+/).tap {|dig|
 | 
						|
  dig -= DIGESTS
 | 
						|
  dig.empty? or abort "#{File.basename $0}: unknown digests - #{dig.join(", ")}"
 | 
						|
}
 | 
						|
$digests ||= DIGESTS
 | 
						|
 | 
						|
$patch_file &&= File.expand_path($patch_file)
 | 
						|
path = ENV["PATH"].split(File::PATH_SEPARATOR)
 | 
						|
%w[YACC BASERUBY RUBY MV MINIRUBY].each do |var|
 | 
						|
  cmd = ENV[var]
 | 
						|
  unless path.any? {|dir|
 | 
						|
      file = File.expand_path(cmd, dir)
 | 
						|
      File.file?(file) and File.executable?(file)
 | 
						|
    }
 | 
						|
    abort "#{File.basename $0}: #{var} command not found - #{cmd}"
 | 
						|
  end
 | 
						|
end
 | 
						|
 | 
						|
%w[BASERUBY RUBY MINIRUBY].each do |var|
 | 
						|
  `#{ENV[var]} --disable-gem -e1 2>&1`
 | 
						|
  if $?.success?
 | 
						|
    ENV[var] += ' --disable-gem'
 | 
						|
  end
 | 
						|
end
 | 
						|
 | 
						|
if $help or $_help
 | 
						|
  puts usage
 | 
						|
  exit
 | 
						|
end
 | 
						|
unless destdir = ARGV.shift
 | 
						|
  abort usage
 | 
						|
end
 | 
						|
revisions = ARGV.empty? ? ["trunk"] : ARGV
 | 
						|
unless tmp = $exported
 | 
						|
  FileUtils.mkpath(destdir)
 | 
						|
  destdir = File.expand_path(destdir)
 | 
						|
  tmp = Dir.mktmpdir("ruby-snapshot")
 | 
						|
  FileUtils.mkpath(tmp)
 | 
						|
  at_exit {
 | 
						|
    Dir.chdir "/"
 | 
						|
    FileUtils.rm_rf(tmp)
 | 
						|
  } unless $keep_temp
 | 
						|
end
 | 
						|
Dir.chdir tmp
 | 
						|
 | 
						|
def package(rev, destdir)
 | 
						|
  patchlevel = false
 | 
						|
  prerelease = false
 | 
						|
  if revision = rev[/@(\d+)\z/, 1]
 | 
						|
    rev = $`
 | 
						|
  end
 | 
						|
  case rev
 | 
						|
  when /\Atrunk\z/, /\Abranches\//, /\Atags\//
 | 
						|
    url = SVNURL + rev
 | 
						|
  when /\Astable\z/
 | 
						|
    url = SVNURL + "branches/"
 | 
						|
    url = url + `svn ls #{url}`[/.*^(ruby_\d+_\d+)\//m, 1]
 | 
						|
  when /\A(.*)\.(.*)\.(.*)-(preview|rc)(\d+)/
 | 
						|
    prerelease = true
 | 
						|
    tag = "#{$4}#{$5}"
 | 
						|
    url = SVNURL + "tags/v#{$1}_#{$2}_#{$3}_#{$4}#{$5}"
 | 
						|
  when /\A(.*)\.(.*)\.(.*)-p(\d+)/
 | 
						|
    patchlevel = true
 | 
						|
    tag = "p#{$4}"
 | 
						|
    url = SVNURL + "tags/v#{$1}_#{$2}_#{$3}_#{$4}"
 | 
						|
  when /\A(\d+)\.(\d+)(?:\.(\d+))?\z/
 | 
						|
    if $3 && ($1 > "2" || $1 == "2" && $2 >= "1")
 | 
						|
      patchlevel = true
 | 
						|
      tag = ""
 | 
						|
      url = SVNURL + "tags/v#{$1}_#{$2}_#{$3}"
 | 
						|
    else
 | 
						|
      url = SVNURL + "branches/ruby_#{rev.tr('.', '_')}"
 | 
						|
    end
 | 
						|
  else
 | 
						|
    warn "#{$0}: unknown version - #{rev}"
 | 
						|
    return
 | 
						|
  end
 | 
						|
  revision ||= `svn info #{url} 2>&1`[/Last Changed Rev: (\d+)/, 1]
 | 
						|
  version = nil
 | 
						|
  unless revision
 | 
						|
    url = SVNURL + "trunk"
 | 
						|
    version = `svn cat #{url + "version.h"}`[RUBY_VERSION_PATTERN, 1]
 | 
						|
    unless rev == version
 | 
						|
      warn "#{$0}: #{rev} not found"
 | 
						|
      return
 | 
						|
    end
 | 
						|
    revision = `svn info #{url}`[/Last Changed Rev: (\d+)/, 1]
 | 
						|
  end
 | 
						|
  v = nil
 | 
						|
  if $exported
 | 
						|
    if String === $exported
 | 
						|
      v = $exported
 | 
						|
    end
 | 
						|
  else
 | 
						|
    v = "ruby"
 | 
						|
    puts "Exporting #{rev}@#{revision}"
 | 
						|
    IO.popen("svn export -r #{revision} #{url} #{v}") do |pipe|
 | 
						|
      pipe.each {|line| /^A/ =~ line or print line}
 | 
						|
    end
 | 
						|
    unless $?.success?
 | 
						|
      warn("Export failed")
 | 
						|
      return
 | 
						|
    end
 | 
						|
  end
 | 
						|
 | 
						|
  if !File.directory?(v)
 | 
						|
    v = Dir.glob("ruby-*").select(&File.method(:directory?))
 | 
						|
    v.size == 1 or abort "not exported"
 | 
						|
    v = v[0]
 | 
						|
  end
 | 
						|
  open("#{v}/revision.h", "wb") {|f| f.puts "#define RUBY_REVISION #{revision}"}
 | 
						|
  open("#{v}/.revision.time", "wb") {}
 | 
						|
  version ||= (versionhdr = IO.read("#{v}/version.h"))[RUBY_VERSION_PATTERN, 1]
 | 
						|
  version or return
 | 
						|
  if patchlevel
 | 
						|
    unless tag.empty?
 | 
						|
      versionhdr ||= IO.read("#{v}/version.h")
 | 
						|
      patchlevel = versionhdr[/^\#define\s+RUBY_PATCHLEVEL\s+(\d+)/, 1]
 | 
						|
      tag = (patchlevel ? "p#{patchlevel}" : "r#{revision}")
 | 
						|
    end
 | 
						|
  elsif prerelease
 | 
						|
    versionhdr ||= IO.read("#{v}/version.h")
 | 
						|
    versionhdr.sub!(/^\#define\s+RUBY_PATCHLEVEL_STR\s+"\K.+?(?=")/, tag)
 | 
						|
    IO.write("#{v}/version.h", versionhdr)
 | 
						|
  else
 | 
						|
    tag ||= "r#{revision}"
 | 
						|
  end
 | 
						|
  unless v == $exported
 | 
						|
    if $archname
 | 
						|
      n = $archname
 | 
						|
    elsif tag.empty?
 | 
						|
      n = "ruby-#{version}"
 | 
						|
    else
 | 
						|
      n = "ruby-#{version}-#{tag}"
 | 
						|
    end
 | 
						|
    File.directory?(n) or File.rename v, n
 | 
						|
    v = n
 | 
						|
  end
 | 
						|
  system("patch -d #{v} -p0 -i #{$patch_file}") if $patch_file
 | 
						|
  "take a breath, and go ahead".scan(/./) {|c|print c; sleep(c == "," ? 0.7 : 0.05)}; puts
 | 
						|
  def (clean = []).add(n) push(n); n end
 | 
						|
  Dir.chdir(v) do
 | 
						|
    %w[config.guess config.sub].each do |conf|
 | 
						|
      next if File.exist?("tool/#{conf}")
 | 
						|
      begin
 | 
						|
        require File.expand_path("downloader", $tooldir)
 | 
						|
      rescue LoadError
 | 
						|
        abort "Error!!! Copy 'downloader.rb' from 'tool' directory of the recent ruby repository!"
 | 
						|
      end
 | 
						|
      url = "http://git.savannah.gnu.org/gitweb/?p=config.git;a=blob_plain;f=%s;hb=HEAD" % conf
 | 
						|
      Downloader.download(url, conf, "tool")
 | 
						|
    end
 | 
						|
    File.open(clean.add("cross.rb"), "w") do |f|
 | 
						|
      f.puts "Object.__send__(:remove_const, :CROSS_COMPILING) if defined?(CROSS_COMPILING)"
 | 
						|
      f.puts "CROSS_COMPILING=true"
 | 
						|
    end
 | 
						|
    unless File.exist?("configure")
 | 
						|
      print "creating configure..."
 | 
						|
      unless system(ENV["AUTOCONF"])
 | 
						|
        puts " failed"
 | 
						|
        return
 | 
						|
      end
 | 
						|
      puts " done"
 | 
						|
    end
 | 
						|
    clean.add("autom4te.cache")
 | 
						|
    print "creating prerequisites..."
 | 
						|
    if File.file?("common.mk") && /^prereq/ =~ commonmk = IO.read("common.mk")
 | 
						|
      puts
 | 
						|
      extout = clean.add('tmp')
 | 
						|
      File.open(clean.add("config.status"), "w") {|f|
 | 
						|
        f.puts "s,@configure_args@,|#_!!_#|,g"
 | 
						|
        f.puts "s,@EXTOUT@,|#_!!_#|#{extout},g"
 | 
						|
        f.puts "s,@bindir@,|#_!!_#|,g"
 | 
						|
        f.puts "s,@ruby_install_name@,|#_!!_#|,g"
 | 
						|
        f.puts "s,@ARCH_FLAG@,|#_!!_#|,g"
 | 
						|
        f.puts "s,@CFLAGS@,|#_!!_#|,g"
 | 
						|
        f.puts "s,@CPPFLAGS@,|#_!!_#|,g"
 | 
						|
        f.puts "s,@CXXFLAGS@,|#_!!_#|,g"
 | 
						|
        f.puts "s,@LDFLAGS@,|#_!!_#|,g"
 | 
						|
        f.puts "s,@DLDFLAGS@,|#_!!_#|,g"
 | 
						|
        f.puts "s,@LIBEXT@,|#_!!_#|a,g"
 | 
						|
        f.puts "s,@OBJEXT@,|#_!!_#|o,g"
 | 
						|
        f.puts "s,@EXEEXT@,|#_!!_#|,g"
 | 
						|
        f.puts "s,@LIBRUBY@,|#_!!_#|libruby.a,g"
 | 
						|
        f.puts "s,@LIBRUBY_A@,|#_!!_#|libruby.a,g"
 | 
						|
        f.puts "s,@RM@,|#_!!_#|rm -f,g"
 | 
						|
        f.puts "s,@CP@,|#_!!_#|cp,g"
 | 
						|
        f.puts "s,@rubyarchdir@,|#_!!_#|,g"
 | 
						|
      }
 | 
						|
      FileUtils.mkpath(hdrdir = "#{extout}/include/ruby")
 | 
						|
      File.open("#{hdrdir}/config.h", "w") {}
 | 
						|
      miniruby = ENV['MINIRUBY'] + " -r./cross"
 | 
						|
      IO.popen("make -f - prereq"\
 | 
						|
               " srcdir=. CHDIR=cd PATH_SEPARATOR='#{File::PATH_SEPARATOR}'"\
 | 
						|
               " IFCHANGE=tool/ifchange MAKEDIRS='mkdir -p'"\
 | 
						|
               " 'MINIRUBY=#{miniruby}' 'RUBY=#{ENV["RUBY"]}'", "w") do |f|
 | 
						|
        f.puts(IO.read("Makefile.in").gsub(/^@.*\n/, '').gsub(/@([A-Za-z_]\w*)@/) {ENV[$1]})
 | 
						|
        f.puts(commonmk.gsub(/\{[^{}]*\}/, ""))
 | 
						|
      end
 | 
						|
      clean.push("rbconfig.rb", ".rbconfig.time", "enc.mk")
 | 
						|
      print "prerequisites"
 | 
						|
    else
 | 
						|
      system("#{YACC} -o parse.c parse.y")
 | 
						|
    end
 | 
						|
    if File.file?('gems/bundled_gems') && bundled_gems = File.read('gems/bundled_gems')
 | 
						|
      bundled_gems.split("\n").map(&:split).each do |gem, ver|
 | 
						|
        gem_name = "#{gem}-#{ver}.gem"
 | 
						|
        unless File.file?("gems/#{gem_name}")
 | 
						|
          Downloader.download("https://rubygems.org/downloads/#{gem_name}", gem_name, "gems")
 | 
						|
        end
 | 
						|
      end
 | 
						|
    end
 | 
						|
    FileUtils.rm_rf(clean)
 | 
						|
    unless $?.success?
 | 
						|
      puts " failed"
 | 
						|
      return
 | 
						|
    end
 | 
						|
    puts " done"
 | 
						|
  end
 | 
						|
 | 
						|
  if v == "."
 | 
						|
    v = File.basename(Dir.pwd)
 | 
						|
    Dir.chdir ".."
 | 
						|
  else
 | 
						|
    Dir.chdir(File.dirname(v))
 | 
						|
    v = File.basename(v)
 | 
						|
  end
 | 
						|
 | 
						|
  tarball = nil
 | 
						|
  return $packages.collect do |mesg|
 | 
						|
    (ext, *cmd) = PACKAGES[mesg]
 | 
						|
    File.directory?(destdir) or FileUtils.mkpath(destdir)
 | 
						|
    file = File.join(destdir, "#{$archname||v}#{ext}")
 | 
						|
    case ext
 | 
						|
    when /\.tar/
 | 
						|
      if tarball
 | 
						|
        next if tarball.empty?
 | 
						|
      else
 | 
						|
        tarball = "#{$archname||v}.tar"
 | 
						|
        print "creating tarball... #{tarball}"
 | 
						|
        if system("tar", "cf", tarball, v)
 | 
						|
          puts " done"
 | 
						|
        else
 | 
						|
          puts " failed"
 | 
						|
          tarball = ""
 | 
						|
          next
 | 
						|
        end
 | 
						|
      end
 | 
						|
      print "creating #{mesg} tarball... #{file}"
 | 
						|
      done = system(*(cmd + [tarball]), out: file)
 | 
						|
    else
 | 
						|
      print "creating #{mesg} archive... #{file}"
 | 
						|
      done = system(*(cmd + [file, v]))
 | 
						|
    end
 | 
						|
    if done
 | 
						|
      puts " done"
 | 
						|
      file
 | 
						|
    else
 | 
						|
      puts " failed"
 | 
						|
      nil
 | 
						|
    end
 | 
						|
  end.compact
 | 
						|
ensure
 | 
						|
  FileUtils.rm_rf(v) if v and !$exported and !$keep_temp
 | 
						|
end
 | 
						|
 | 
						|
success = true
 | 
						|
revisions.collect {|rev| package(rev, destdir)}.flatten.each do |name|
 | 
						|
  if !name
 | 
						|
    success = false
 | 
						|
    next
 | 
						|
  end
 | 
						|
  str = open(name, "rb") {|f| f.read}
 | 
						|
  puts "* #{name}"
 | 
						|
  puts "  SIZE:   #{str.bytesize} bytes"
 | 
						|
  $digests.each do |alg|
 | 
						|
    printf "  %-8s%s\n", "#{alg}:", Digest.const_get(alg).hexdigest(str)
 | 
						|
  end
 | 
						|
end
 | 
						|
 | 
						|
exit false if !success
 | 
						|
 | 
						|
# vim:fileencoding=US-ASCII sw=2 ts=4 noexpandtab ff=unix
 |