core_ex 0.1.0 → 0.1.1

data/SPEC.dyn.yml

@@ -1,8 +1,9 @@
 --- !ruby/object:OpenStruct 
 table: 
-  :date: "Tue, 31 May 2005"
+  :date: "Wed, 01 Jun 2005"
   :version: !ruby/object:Version 
-    build: 0
+    build: 1
     major: 0
     minor: 1
-    revision: 250
+    revision: 264
+  :version_id: ''

data/SPEC.yml

@@ -29,7 +29,7 @@ rdoc_files: !filelist
   - lib/core_ex/**/*.rb
 
 pkg_files: !filelist
-  - lib/**/*.rb
+  - lib/**/*.r[bf]
   - test/**/*
   - '[A-Z]*'
 

data/lib/core_ex/rakefile_base.rf

@@ -0,0 +1,500 @@
+# Copyright:: Copyright (c) 2005  Nicolas Pouillard. All rights reserved.
+# Author::    Nicolas Pouillard  <ertai@lrde.epita.fr>.
+# License::   Gnu General Public License.
+# Revision::  $Id: rakefile_base.rf 262 2005-06-01 02:58:29Z ertai $
+
+require 'core_ex'
+require 'ostruct'
+require 'date'
+require 'rbconfig'
+require 'rake/testtask'
+require 'rake/packagetask'
+require 'rake/rdoctask'
+require 'rake/gempackagetask'
+require 'rake/contrib/rubyforgepublisher'
+require 'rubygems'
+require_gem 'highline'
+require 'highline/import'
+
+
+AUTHORS      = Pathname.new('AUTHORS')
+SPEC_YML     = Pathname.new('SPEC.yml')
+SPEC_DYN_YML = Pathname.new('SPEC.dyn.yml')
+GEM_SPEC     = Pathname.new("SPEC.gem.yml")
+RakefileBase = __FILE__
+EDITOR       = ENV['EDITOR'] || 'vi'
+
+#
+# Some little extensions.
+#
+
+def edit ( aPathname )
+  sh EDITOR, aPathname.to_s
+end
+
+class MiniSvn
+  def method_missing ( meth, *args )
+    sh 'svn', meth.to_s, *args
+  end
+end
+svn = MiniSvn.new
+
+
+def clean_task ( arg, &block )
+  if arg.is_a? Hash
+    name = :"clobber_#{arg.keys.first}"
+    task(name => arg.values.first, &block)
+  else
+    name = :"clobber_#{arg}"
+    task(name, &block)
+  end
+  task :clobber => name
+end
+
+
+class Task
+  alias enhance_old enhance
+  def enhance(deps=nil, &block)
+    deps.each { |dep| @prerequisites << dep } if deps
+    @actions << block if block_given?
+    self
+  end
+end
+
+
+#
+# Rake tasks
+#
+
+
+desc 'Default Task (check)'
+task :default => [ :check ]
+
+
+
+# desc 'Setup the ttk command'
+task :ttk do
+  # FIXME search a valid ttk
+  def ttk ( *a )
+    sh 'ttk', *a
+  end
+end
+
+
+
+desc 'Launch all test suites'
+task :check => [ :ttk, :spec, :dyn_spec ] do
+  ttk '-l', 'check-log.yml', '-S', 'url: file://<<pwd>>', '-C',
+      SPEC.root_test_suite
+end
+clean_task :check do
+  'check-log.yml'.to_path.rm_f
+end
+
+
+
+desc 'Check generated packages'
+task :distcheck => [ :ttk, :package ] do
+  urls = []
+  Pathname.glob('pkg/*') do |path|
+    next unless path.file?
+    next if path.to_s =~ /\.gem$/ # FIXME
+    urls << "file://#{path.expand_path}"
+  end
+  inp = { # FIXME use a Each strategy
+    'Check generated packages' => {
+      'strategy' => 'Suite',
+      'attributes' => {
+        'strategy' => 'Import',
+        'import'   => SPEC.root_test_suite
+      },
+      'contents' => urls.map { |url| { url => { 'symbols' => {'url'=>url} } } }
+    }
+  }
+  TempPath.new do |tmp|
+    tmp.open('w') { |f| f.write inp.to_yaml }
+    ttk '-l', 'distcheck-log.yml', tmp
+  end
+end
+clean_task :distcheck do
+  'distcheck-log.yml'.to_path.rm_f
+end
+
+
+
+# desc "Load the #{SPEC_YML} file"
+task :spec => [ SPEC_YML.to_s ] do
+  Kernel.const_set(:SPEC, OpenStruct.new(YAML.load(SPEC_YML.read)))
+end
+
+
+
+def update_dyn_spec
+  svn_info = YAML::load(`svn info`)
+  revision = svn_info['Revision']
+  if SPEC_DYN_YML.exist?
+    SPEC.dyn = YAML::load(SPEC_DYN_YML.read)
+    SPEC.dyn.version.revision = revision
+  else
+    SPEC.dyn = OpenStruct.new('version' => Version.new(0, 0, 0, revision))
+  end
+  SPEC.dyn.date = /\((.*)\)/.match(svn_info['Last Changed Date'])[1]
+  SPEC_DYN_YML.open('w') do |out|
+    out.puts(SPEC.dyn.to_yaml)
+  end
+end
+
+
+
+# desc "Update the #{SPEC_DYN_YML} file"
+file SPEC_DYN_YML.to_s => [ :spec ] do
+  update_dyn_spec
+end
+
+
+
+task :update_dyn_spec => [ SPEC_DYN_YML.to_s ] do
+  update_dyn_spec
+end
+
+
+
+task :dyn_spec => [ SPEC_DYN_YML.to_s ] do
+  SPEC.dyn = YAML::load(SPEC_DYN_YML.read)
+end
+
+
+
+desc 'Generate the full documentation'
+task :doc => [ :rdoc_spec, :rdoc_real ]
+clean_task :doc => [ :rdoc_spec, :clobber_rdoc_real ]
+task :redoc => [ :clobber_doc, :doc ]
+
+
+
+desc 'Generate all packages'
+task :package       => [ :gem_spec, :gem ]
+clean_task :package => [ :gem_spec ]
+
+
+
+desc 'Re-generate all packages'
+task :repackage     => [ :gem_spec ]
+
+
+
+desc 'Generate a GEM package'
+task :gem           => [ :gem_spec ]
+
+
+
+desc 'Re-generate a GEM package'
+task :regem         => [ :clobber_gem, :gem ]
+
+
+
+task :rdoc_spec => [ :spec ] do
+  SPEC.rdoc = Rake::RDocTask.new(:rdoc_real) do |rdoc|
+    rdoc.title = SPEC.title
+    rdoc.template = "#{ENV['template']}.rb" if ENV['template']
+    rdoc.rdoc_dir = SPEC.rdoc_dir
+    rdoc.options << '--inline-source'
+    rdoc.main = SPEC.rdoc_files.first
+    tail = SPEC.rdoc_tail_files || []
+    fl = SPEC.rdoc_files - tail + tail
+    rdoc.rdoc_files.include(fl)
+  end
+end
+
+
+
+# desc 'Update the Gem specification'
+file GEM_SPEC.to_s => [ :spec, :dyn_spec, :rdoc_spec ] do
+  spec = Gem::Specification.new do |s|
+    s.platform = Gem::Platform::RUBY
+    s.name = SPEC.name
+    s.version = SPEC.dyn.version.to_s
+    s.summary = SPEC.summary
+    s.description = SPEC.description
+    bin = 'bin'.to_path
+    s.bindir = bin.to_s
+    s.executables = Pathname.glob(bin + '*').select do |path|
+      path.executable? and not path.directory?
+    end.map { |path| path.basename.to_s }
+    s.files = SPEC.pkg_files.to_a
+    s.require_path = 'lib'
+
+    if SPEC.dependencies
+      SPEC.dependencies.each do |name, version|
+        s.add_dependency(name, version)
+      end
+    end
+
+    s.has_rdoc = true
+    s.extra_rdoc_files = SPEC.rdoc.rdoc_files
+    s.rdoc_options = SPEC.rdoc.option_list.map { |x| x.sub(/^'?(.*?)'?$/, '\1') }
+
+    authors_file = YAML::load(AUTHORS.read).values.first
+    list = authors_file.map { |x| /^(.*?)\s*<(.*)>/.match(x.keys.first)[1..2] }
+    s.authors = list.map { |x| x.first }
+    s.email = list.map { |x| x.last }
+    s.homepage = SPEC.homepage
+    s.rubyforge_project = s.name
+  end
+  GEM_SPEC.open('w') { |out| out.puts spec.to_yaml }
+end
+
+
+
+# desc "Remove the #{GEM_SPEC} file"
+clean_task :gem_spec do
+  GEM_SPEC.rm_f
+end
+
+
+
+# desc 'Load the GEM spec and create tasks for packages'
+task :gem_spec => [ GEM_SPEC.to_s ] do
+  spec = YAML::load(GEM_SPEC.read)
+
+  gtask = Rake::GemPackageTask.new(spec) do |p|
+    p.gem_spec = spec
+    p.need_tar_gz = true
+    p.need_tar_bz2 = true
+    p.package_files = SPEC.pkg_files.to_a
+  end
+  gtask.instance_eval { $gem = 'pkg'.to_path + gem_file }
+end
+
+
+
+# desc 'Remove the GEM package file'
+clean_task :gem => [ :gem_spec ] do
+  $gem.rm_f
+end
+
+
+
+# desc 'Make an Svn tag'
+task :tag => [ :spec, :dyn_spec ] do
+  tag_name = (SPEC.release)? SPEC.release : "#{SPEC.name}-#{SPEC.dyn.version}"
+  tags = (SPEC.tags_dir || '../tags').to_path.expand_path.cleanpath
+  if agree "Make the SVN tag (#{tags/tag_name}) (y/n)", true
+    svn.copy(Pathname.pwd, tags/tag_name)
+    svn.commit(Pathname.pwd, tags, '-m', "'Releasing #{tag_name}'")
+  end
+end
+
+
+
+desc 'Publish to RubyForge'
+task :publish_doc => [ :spec ] do
+  user = SPEC.user || ENV['USER']
+  Rake::SshDirPublisher.new(
+    # "#{user}@rubyforge.org",
+    # "/var/www/gforge-projects/#{SPEC.name}/test",
+    "#{user}@ssh.feydakins.org",
+    "/var/www/api.feydakins.org/public/#{SPEC.name}/",
+    SPEC.rdoc_dir
+  ).upload
+end
+
+
+
+# desc 'Common tasks for a release'
+task :common_release =>
+  [
+    :release_confirm,
+    :check,
+    :doc,
+    :package,
+    :distcheck,
+    :tag,
+    :publish_doc,
+    :publish_package
+  ]
+
+
+
+task :release_confirm => [ :spec, :dyn_spec ] do
+  SPEC.release = SPEC.name + '-' + SPEC.dyn.version.to_s
+  SPEC.release += '-' + SPEC.dyn.version_id unless SPEC.dyn.version_id.empty?
+  say "Release that: #{SPEC.release}."
+  exit unless agree 'Are you sure? (y/n)', true
+end
+
+
+
+[:major, :minor, :build].each do |release_mode|
+  name = :"#{release_mode}_release"
+  desc "Make a new #{release_mode} release"
+  task name => [ :update_dyn_spec ] do
+    SPEC.dyn.version.send(name)
+    q = 'Specify an identifier for this version (or press return): '
+    SPEC.dyn.version_id = ask(q)
+    SPEC_DYN_YML.open('w') do |out|
+      out.puts(SPEC.dyn.to_yaml)
+    end
+    begin
+      sh 'rake', 'clobber'
+      sh 'rake', 'common_release'
+    rescue
+      SPEC_DYN_YML.unlink
+    end
+  end
+end
+
+
+
+desc "Publish the release files to RubyForge."
+task :publish_package => [ :spec, :package ] do
+  type_map = {
+    '.deb'    => 1000,
+    '.rpm'    => 2000,
+    '.zip'    => 3000,
+    '.bz2'    => 3100,
+    '.tbz2'   => 3100,
+    '.gz'     => 3110,
+    '.tgz'    => 3110,
+    '.jpg'    => 8000,
+    '.text'   => 8100,
+    '.html'   => 8200,
+    '.pdf'    => 8300,
+    '.ebuild' => 1300,
+    '.exe'    => 1100,
+    '.dmg'    => 1200,
+    '.gem'    => 1400,
+    '.sig'    => 8150,
+    # 'Source .zip' => 5000,
+    # 'Source .bz2' => 5010,
+    # 'Source .gz'  => 5020,
+    # 'Source .rpm' => 5100,
+    # 'Other Source File' => 5900,
+  }
+  type_map.default = 9999
+
+  pkg = 'pkg'.to_path
+  files = FileList[pkg/"*{#{type_map.keys.join(',')}}"]
+
+  rubyforge_user = SPEC.rubyforge_user || SPEC.user || ENV['USER']
+  rubyforge_project = SPEC.rubyforge_project || SPEC.name
+  default = (SPEC.release)? SPEC.release : "#{SPEC.name}-#{SPEC.dyn.version}"
+  release_name = ask("Release name:  ") { |q| q.default = default }
+
+  require 'net/http'
+  require 'open-uri'
+
+  project_uri = "http://rubyforge.org/projects/#{rubyforge_project}/"
+  project_data = open(project_uri) { |data| data.read }
+  group_id = project_data[/[?&]group_id=(\d+)/, 1]
+  raise "Couldn't get group id" unless group_id
+
+  if ENV['RUBY_FORGE_PASSWORD']
+    password = ENV['RUBY_FORGE_PASSWORD']
+  else
+    password = ask("#{rubyforge_user}@rubyforge.org's password: ") do |q|
+      q.echo = false
+    end
+  end
+
+  login_response = Net::HTTP.start('rubyforge.org', 80) do |http|
+    data = [
+      'login=1',
+      "form_loginname=#{rubyforge_user}",
+      "form_pw=#{password}"
+    ].join('&')
+    http.post('/account/login.php', data)
+  end
+
+  cookie = login_response['set-cookie']
+  raise 'Login failed' unless cookie
+  headers = { 'Cookie' => cookie }
+
+  release_uri = "http://rubyforge.org/frs/admin/?group_id=#{group_id}"
+  release_data = open(release_uri, headers) { |data| data.read }
+  package_id = release_data[/[?&]package_id=(\d+)/, 1]
+  raise "Couldn't get package id" unless package_id
+
+  first_file = true
+  release_id = ''
+
+  files.each do |path|
+    path = path.to_path # FIXME
+    basename  = path.basename
+    file_ext  = path.extname
+    file_data = path.read
+
+    say "Releasing #{basename}..."
+    next unless agree 'Agree?  (y/n)', true
+
+    release_response = Net::HTTP.start('rubyforge.org', 80) do |http|
+      release_date = Time.now.strftime('%Y-%m-%d %H:%M')
+      type = type_map[file_ext].to_s
+      boundary = "rubyqMY6QN9bp6e4kS21H4y0zxcvoor"
+
+      if first_file then
+        release = {
+          :notes   => ',release_notes'.to_path,
+          :changes => ',release_changes'.to_path
+        }
+        [:notes, :changes].each do |x|
+          while not release[x].exist?
+            say "No release #{x} (editing...)"
+            edit release[x]
+            say "Publish these release #{x}:"
+            say release[x].read
+            exit unless agree 'Agree? (y/n)  ', true
+          end
+        end
+        query_hash = {
+          'group_id' => group_id,
+          'package_id' => package_id,
+          'release_name' => release_name,
+          'release_date' => release_date,
+          'type_id' => type,
+          'processor_id' => '8000', # Any
+          'release_notes' => release[:notes].read,
+          'release_changes' => release[:changes].read,
+          'preformatted' => '1',
+          'submit' => '1'
+        }
+      else
+        query_hash = {
+          'group_id' => group_id,
+          'release_id' => release_id,
+          'package_id' => package_id,
+          'step2' => '1',
+          'type_id' => type,
+          'processor_id' => '8000', # Any
+          'submit' => 'Add This File'
+        }
+      end
+
+      query = "?" + query_hash.map do |name, value|
+        [name, URI.encode(value)].join("=")
+      end.join("&")
+
+      data = [
+        '--' + boundary,
+        "Content-Disposition: form-data; name=\"userfile\"; filename=\"#{basename}\"",
+        'Content-Type: application/octet-stream',
+        'Content-Transfer-Encoding: binary',
+        '', file_data, ''
+        ].join("\x0D\x0A")
+
+      release_headers = headers.merge(
+        'Content-Type' => "multipart/form-data; boundary=#{boundary}"
+      )
+
+      target = first_file ? '/frs/admin/qrs.php' : '/frs/admin/editrelease.php'
+      http.post(target + query, data, release_headers)
+    end
+
+    if first_file then
+      release_id = release_response.body[/release_id=(\d+)/, 1]
+      raise("Couldn't get release id") unless release_id
+    end
+
+    first_file = false
+  end
+end

metadata

@@ -3,7 +3,7 @@ rubygems_version: 0.8.10
 specification_version: 1
 name: core_ex
 version: !ruby/object:Gem::Version 
-  version: 0.1.0
+  version: 0.1.1
 date: 2005-06-01
 summary: CoreEx is a proposal for a standard library extension.
 require_paths: 
@@ -44,6 +44,7 @@ files:
   - lib/core_ex/filelist.rb
   - lib/core_ex/fileutils.rb
   - lib/core_ex/pathname.rb
+  - lib/core_ex/rakefile_base.rf
   - lib/core_ex/require.rb
   - lib/core_ex/string.rb
   - lib/core_ex/temp_path.rb