linkparser 1.0.4 → 1.1.0

data/rake/packaging.rb

@@ -1,14 +1,27 @@
-# 
-# Packaging Rake Tasks
-# $Id: packaging.rb 102 2009-05-23 21:40:00Z deveiant $
-# 
+#####################################################################
+###	P A C K A G I N G   T A S K S
+#####################################################################
 
 require 'rbconfig'
-require 'rake/packagetask'
-require 'rake/gempackagetask'
+require 'pathname'
+require 'rubygems/package_task'
+
 
 include Config
 
+### Task: prerelease
+desc "Append the package build number to package versions"
+task :prerelease do
+	GEMSPEC.version.version << "pre#{PKG_BUILD}"
+	Rake::Task[:gem].clear
+
+	Gem::PackageTask.new( GEMSPEC ) do |pkg|
+		pkg.need_zip = true
+		pkg.need_tar = true
+	end
+end
+
+
 ### Task: gem
 ### Task: package
 Rake::PackageTask.new( PKG_NAME, PKG_VERSION ) do |task|
@@ -21,35 +34,9 @@ end
 task :package => [:gem]
 
 
-### Task: gem
-gempath = PKGDIR + GEM_FILE_NAME
-
-desc "Build a RubyGem package (#{GEM_FILE_NAME})"
-task :gem => gempath.to_s
-file gempath.to_s => [PKGDIR.to_s] + GEMSPEC.files do
-	when_writing( "Creating GEM" ) do
-		Gem::Builder.new( GEMSPEC ).build
-		verbose( true ) do
-			mv GEM_FILE_NAME, gempath
-		end
-	end
-end
-
-svnrev = get_svn_rev()
-prerelease_gem_file_name = "#{PKG_FILE_NAME}.#{svnrev}.gem"
-prerelease_gempath = PKGDIR + prerelease_gem_file_name
-
-desc "Build a pre-release RubyGem package"
-task :prerelease_gem => prerelease_gempath.to_s
-file prerelease_gempath.to_s => [PKGDIR.to_s] + GEMSPEC.files do
-	when_writing( "Creating prerelease GEM" ) do
-		gemspec = GEMSPEC.clone
-		gemspec.version = Gem::Version.create( "%s.%d" % [GEMSPEC.version, svnrev] )
-		Gem::Builder.new( gemspec ).build
-		verbose( true ) do
-			mv prerelease_gem_file_name, prerelease_gempath
-		end
-	end
+Gem::PackageTask.new( GEMSPEC ) do |pkg|
+	pkg.need_zip = true
+	pkg.need_tar = true
 end
 
 
@@ -60,7 +47,7 @@ task :install => "spec:quiet" do
 	sitelib = Pathname.new( CONFIG['sitelibdir'] )
 	sitearch = Pathname.new( CONFIG['sitearchdir'] )
 	Dir.chdir( LIBDIR ) do
-		LIB_FILES.each do |libfile|
+		LIB_FILES.collect {|path| Pathname(path) }.each do |libfile|
 			relpath = libfile.relative_path_from( LIBDIR )
 			target = sitelib + relpath
 			FileUtils.mkpath target.dirname,
@@ -101,7 +88,7 @@ task :uninstall do
 	sitearch = Pathname.new( CONFIG['sitearchdir'] )
 
 	Dir.chdir( LIBDIR ) do
-		LIB_FILES.each do |libfile|
+		LIB_FILES.collect {|path| Pathname(path) }.each do |libfile|
 			relpath = libfile.relative_path_from( LIBDIR )
 			target = sitelib + relpath
 			FileUtils.rm_f target, :verbose => true, :noop => $dryrun
@@ -131,3 +118,12 @@ end
 
 
 
+desc "Add development depdendencies to the gemspec -- this is meant to be chained " +
+     "together with :gem"
+task :include_dev_dependencies do
+	DEVELOPMENT_DEPENDENCIES.each do |name, version|
+		version = '>= 0' if version.length.zero?
+		GEMSPEC.add_development_dependency( name, version )
+	end
+end
+

data/rake/publishing.rb

@@ -5,6 +5,8 @@
 RELEASE_NOTES_FILE    = 'release.notes'
 RELEASE_ANNOUNCE_FILE = 'release.ann'
 
+GEM_PUBHOST = '' unless defined?( GEM_PUBHOST )
+
 require 'net/smtp'
 require 'net/protocol'
 require 'openssl'
@@ -13,6 +15,7 @@ $publish_privately = false
 
 ### Add SSL to Net::SMTP
 class Net::SMTP
+
 	def ssl_start( helo='localhost.localdomain', user=nil, secret=nil, authtype=nil )
 		if block_given?
 			begin
@@ -34,7 +37,13 @@ class Net::SMTP
 
 	def do_ssl_start( helodomain, user, secret, authtype )
 		raise IOError, 'SMTP session already started' if @started
-		check_auth_args user, secret, authtype if user or secret
+		if user or secret
+			if self.method( :check_auth_args ).arity == 3
+				check_auth_args( user, secret, authtype )
+			else
+				check_auth_args( user, secret )
+			end
+		end
 
 		# Open the connection
       	@debug_output << "opening connection to #{@address}...\n" if @debug_output
@@ -85,9 +94,11 @@ begin
 	require 'tmail'
 	require 'net/smtp'
 	require 'etc'
-	require 'rubyforge'
 	require 'socket'
 	require 'text/format'
+	require 'rubygems/gemcutter_utilities'
+
+	include Gem::GemcutterUtilities
 
 	### Generate a valid RFC822 message-id
 	def gen_message_id
@@ -99,8 +110,50 @@ begin
 	end
 
 
+	### Fetch the rubygems API token if it hasn't been already.
+	def sign_in_to_rubygems
+		return if Gem.configuration.rubygems_api_key
+
+		log "Enter your RubyGems.org credentials."
+
+		email    = prompt "   Email: "
+		password = prompt_for_password( "Password: " )
+
+		response = rubygems_api_request( :get, "api/v1/api_key" ) do |request|
+			request.basic_auth( email, password )
+		end
+
+		with_response( response ) do |resp|
+			log "Signed in."
+			Gem.configuration.rubygems_api_key = resp.body
+		end
+	end
+
+
+	### Push the gem at the specified +path+ to the rubygems server at +gemhost+.
+	def push_gem( path, gemhost )
+		ENV['RUBYGEMS_HOST'] = "http://#{gemhost}"
+
+		sign_in_to_rubygems()
+
+		response = rubygems_api_request( :post, "api/v1/gems" ) do |request|
+			request.body = Gem.read_binary( path )
+			request.add_field "Content-Length", request.body.size
+			request.add_field "Content-Type",   "application/octet-stream"
+			request.add_field "Authorization",  Gem.configuration.rubygems_api_key
+		end
+
+		case response
+		when Net::HTTPSuccess
+			log( response.body )
+		else
+			fail( response.body )
+		end
+	end
+
+
 	namespace :release do
-		task :default => [ 'svn:release', :upload, :publish, :announce ]
+		task :default => [ :prep_release, :upload, :publish, :announce ]
 
 		desc "Re-publish the release with the current version number"
 		task :rerelease => [  :upload, :publish, :announce ]
@@ -116,183 +169,149 @@ begin
 		desc "Generate the release notes"
 		task :notes => [RELEASE_NOTES_FILE]
 		file RELEASE_NOTES_FILE do |task|
-			last_rel_tag = get_latest_release_tag() or
-				fail ">>> No releases tagged! Try running 'rake svn:release' first"
-			trace "Last release tag is: %p" % [ last_rel_tag ]
-			start = get_last_changed_rev( last_rel_tag ) || 1
-			trace "Starting rev is: %p" % [ start ]
-			log_output = make_svn_log( '.', start, 'HEAD' )
+			last_tag = MercurialHelpers.get_tags.grep( /\d+\.\d+\.\d+/ ).
+				collect {|ver| vvec(ver) }.sort.last.unpack( 'N*' ).join('.')
 
 			File.open( task.name, File::WRONLY|File::TRUNC|File::CREAT ) do |fh|
-				fh.print( log_output )
+				fh.puts "Release Notes for #{PKG_VERSION}",
+				        "--------------------------------", '', ''
 			end
 
 			edit task.name
 		end
 		CLOBBER.include( RELEASE_NOTES_FILE )
 
+		# Only define upload tasks if there's an upload host
+		if PROJECT_HOST.empty?
+			task :no_upload_host do
+				log "Skipping upload: no upload host."
+			end
+			task :upload => :no_upload_host
+			task :upload_docs => :no_upload_host
+			task :upload_packages => :no_upload_host
+		else
+			desc "Upload project documentation and packages to #{PROJECT_HOST}"
+			task :upload => [ :upload_docs, :upload_packages ]
+			task :project => :upload # the old name
+
+			desc "Publish the project docs to #{PROJECT_HOST}"
+			task :upload_docs => [ :apidocs ] do
+				when_writing( "Publishing docs to #{PROJECT_SCPDOCURL}" ) do
+					log "Uploading API documentation to %s:%s" % [ PROJECT_HOST, PROJECT_DOCDIR ]
+					run 'ssh', PROJECT_HOST, "rm -rf #{PROJECT_DOCDIR}"
+					run 'scp', '-qCr', API_DOCSDIR, PROJECT_SCPDOCURL
+				end
+			end
 
-		desc "Upload project documentation and packages to #{PROJECT_HOST}"
-		task :upload => [ :upload_docs, :upload_packages ]
-		task :project => :upload # the old name
-
-		desc "Publish the project docs to #{PROJECT_HOST}"
-		task :upload_docs => [ :rdoc ] do
-			when_writing( "Publishing docs to #{PROJECT_SCPDOCURL}" ) do
-				log "Uploading API documentation to %s:%s" % [ PROJECT_HOST, PROJECT_DOCDIR ]
-				run 'ssh', PROJECT_HOST, "rm -rf #{PROJECT_DOCDIR}"
-				run 'scp', '-qCr', RDOCDIR, PROJECT_SCPDOCURL
+			desc "Publish the project packages to #{PROJECT_HOST}"
+			task :upload_packages => [ :package ] do
+				when_writing( "Uploading packages") do
+					pkgs = Pathname.glob( PKGDIR + "#{PKG_FILE_NAME}.{gem,tar.gz,tar.bz2,zip}" )
+					log "Uploading %d packages to #{PROJECT_SCPPUBURL}" % [ pkgs.length ]
+					pkgs.each do |pkgfile|
+						run 'scp', '-qC', pkgfile, PROJECT_SCPPUBURL
+	                end
+	            end
 			end
 		end
 
-		desc "Publish the project packages to #{PROJECT_HOST}"
-		task :upload_packages => [ :package ] do
-			when_writing( "Uploading packages") do
-				pkgs = Pathname.glob( PKGDIR + "#{PKG_FILE_NAME}.{gem,tar.gz,tar.bz2,zip}" )
-				log "Uploading %d packages to #{PROJECT_SCPPUBURL}" % [ pkgs.length ]
-				pkgs.each do |pkgfile|
-					run 'scp', '-qC', pkgfile, PROJECT_SCPPUBURL
-                end
-            end
-		end
+		# Only define the announcement tasks if there are addresses to announce to
+		if RELEASE_ANNOUNCE_ADDRESSES.empty?
+			task :no_announce_addresses do
+				log "Skipping announcement: no announce addresses"
+			end
+			task :announce => :no_announce_addresses
 
+		else
+			file RELEASE_ANNOUNCE_FILE => [RELEASE_NOTES_FILE] do |task|
+				relnotes = File.read( RELEASE_NOTES_FILE )
+				announce_body = %{
 
-		file RELEASE_ANNOUNCE_FILE => [RELEASE_NOTES_FILE] do |task|
-			relnotes = File.read( RELEASE_NOTES_FILE )
-			announce_body = %{
+					Version #{PKG_VERSION} of #{PKG_NAME} has been released.
 
-				Version #{PKG_VERSION} of #{PKG_NAME} has been released.
+					#{Text::Format.new(:first_indent => 0).format_one_paragraph(GEMSPEC.description)}
 
-				#{Text::Format.new(:first_indent => 0).format_one_paragraph(GEMSPEC.description)}
+					== Project Page
 
-				== Project Page
+					  #{GEMSPEC.homepage}
 
-				  #{GEMSPEC.homepage}
+					== Installation
 
-				== Installation
+					  $ sudo gem install #{GEMSPEC.name}
 
-				Via gems:
+					== Changes
+					#{relnotes}
+				}.gsub( /^\t+/, '' )
 
-				  $ sudo gem install #{GEMSPEC.name}
+				File.open( task.name, File::WRONLY|File::TRUNC|File::CREAT ) do |fh|
+					fh.print( announce_body )
+				end
 
-				or from source:
+				edit task.name
+			end
+			CLOBBER.include( RELEASE_ANNOUNCE_FILE )
 
-				  $ wget http://deveiate.org/code/#{PKG_FILE_NAME}.tar.gz
-				  $ tar -xzvf #{PKG_FILE_NAME}.tar.gz
-				  $ cd #{PKG_FILE_NAME}
-				  $ sudo rake install
 
-				== Changes
-				#{relnotes}
-			}.gsub( /^\t+/, '' )
+			desc 'Send out a release announcement'
+			task :announce => [RELEASE_ANNOUNCE_FILE] do
+				email         = TMail::Mail.new
 
-			File.open( task.name, File::WRONLY|File::TRUNC|File::CREAT ) do |fh|
-				fh.print( announce_body )
-			end
+				if $publish_privately || RELEASE_ANNOUNCE_ADDRESSES.empty?
+					trace "Sending private announce mail"
+					email.to = 'rubymage@gmail.com'
+				else
+					trace "Sending public announce mail"
+					email.to  = RELEASE_ANNOUNCE_ADDRESSES
+					email.bcc = 'rubymage@gmail.com'
+				end
 
-			edit task.name
-		end
-		CLOBBER.include( RELEASE_ANNOUNCE_FILE )
+				from = prompt_with_default( "Send announcement as:",
+					'Michael Granger <ged@FaerieMUD.org>' ) or fail
 
+				email.from    = from
+				email.subject = "[ANN] #{PKG_NAME} #{PKG_VERSION}"
+				email.body    = File.read( RELEASE_ANNOUNCE_FILE )
+				email.date    = Time.new
 
-		desc 'Send out a release announcement'
-		task :announce => [RELEASE_ANNOUNCE_FILE] do
-			email         = TMail::Mail.new
-			if $publish_privately
-				trace "Sending private announce mail"
-				email.to = 'rubymage@gmail.com'
-			else
-				trace "Sending public announce mail"
-				email.to  = 'Ruby-Talk List <ruby-talk@ruby-lang.org>'
-				email.bcc = 'rubymage@gmail.com'
-			end
-			email.from    = GEMSPEC.email
-			email.subject = "[ANN] #{PKG_NAME} #{PKG_VERSION}"
-			email.body    = File.read( RELEASE_ANNOUNCE_FILE )
-			email.date    = Time.new
-
-			email.message_id = gen_message_id()
-
-			log "About to send the following email:"
-			puts '---',
-			     email.to_s,
-			     '---'
-
-				ask_for_confirmation( "Will send via #{SMTP_HOST}." ) do
-				pwent = Etc.getpwuid( Process.euid )
-				curuser = pwent ? pwent.name : 'unknown'
-				username = prompt_with_default( "SMTP user", curuser )
-				password = prompt_for_password()
-
-				trace "Creating SMTP connection to #{SMTP_HOST}:#{SMTP_PORT}"
-				smtp = Net::SMTP.new( SMTP_HOST, SMTP_PORT )
-				smtp.set_debug_output( $stdout )
-				smtp.esmtp = true
-
-				trace "connecting..."
-				smtp.ssl_start( Socket.gethostname, username, password, :plain ) do |smtp|
-					trace "sending message..."
-					smtp.send_message( email.to_s, email.from, email.to )
-				end
-				trace "done."
-			end
-		end
+				email.message_id = gen_message_id()
 
+				log "About to send the following email:"
+				puts '---',
+				     email.to_s,
+				     '---'
 
-		desc 'Publish the new release to RubyForge'
-		task :publish => [:clean, :package, :notes] do |task|
-			project = GEMSPEC.rubyforge_project
+					ask_for_confirmation( "Will send via #{SMTP_HOST}." ) do
+					pwent = Etc.getpwuid( Process.euid )
+					curuser = pwent ? pwent.name : 'unknown'
+					username = prompt_with_default( "SMTP user", curuser )
+					password = prompt_for_password()
 
-			if $publish_privately
-				log "Skipping push of release files to RubyForge"
-			else
-				rf = RubyForge.new
-				log "Loading RubyForge config"
-				rf.configure
-
-				group_id = rf.autoconfig['group_ids'][RUBYFORGE_GROUP] or
-					fail "Your configuration doesn't have a group id for '#{RUBYFORGE_GROUP}'"
-
-				# If this project doesn't yet exist, create it
-				unless rf.autoconfig['package_ids'].key?( project )
-					ask_for_confirmation( "Package '#{project}' doesn't exist on RubyForge. Create it?" ) do
-						log "Creating new package '#{project}'"
-						rf.create_package( group_id, project )
+					trace "Creating SMTP connection to #{SMTP_HOST}:#{SMTP_PORT}"
+					smtp = Net::SMTP.new( SMTP_HOST, SMTP_PORT )
+					smtp.set_debug_output( $stdout )
+					smtp.esmtp = true
+
+					trace "connecting..."
+					smtp.ssl_start( Socket.gethostname, username, password, :plain ) do |smtp|
+						trace "sending message..."
+						smtp.send_message( email.to_s, email.from, email.to )
 					end
+					trace "done."
 				end
+			end
+		end
 
-				package_id = rf.autoconfig['package_ids'][ project ]
-
-				# Make sure this release doesn't already exist
-				releases = rf.autoconfig['release_ids']
-				if releases.key?( GEMSPEC.name ) && releases[ GEMSPEC.name ].key?( PKG_VERSION )
-					log "Rubyforge seems to already have #{ PKG_FILE_NAME }"
-				else
-					config = rf.userconfig or
-						fail "You apparently haven't set up your RubyForge credentials on this machine."
-					config['release_notes'] = GEMSPEC.description
-					config['release_changes'] = File.read( RELEASE_NOTES_FILE )
-
-					files = FileList[ PKGDIR + GEM_FILE_NAME ]
-					files.include PKGDIR + "#{PKG_FILE_NAME}.tar.gz"
-					files.include PKGDIR + "#{PKG_FILE_NAME}.tar.bz2"
-					files.include PKGDIR + "#{PKG_FILE_NAME}.zip"
-
-					log "Releasing #{PKG_FILE_NAME}"
-					when_writing do
-						log "Publishing to RubyForge: \n",
-							"\tproject: #{RUBYFORGE_GROUP}\n",
-							"\tpackage: #{PKG_NAME.downcase}\n",
-							"\tpackage version: #{PKG_VERSION}\n",
-							"\tfiles: " + files.collect {|f| f.to_s }.join(', ') + "\n"
-
-						ask_for_confirmation( "Publish to RubyForge?" ) do
-							log 'Logging in...'
-							rf.login
-							log "Adding the new release to the '#{project}' project"
-							rf.add_release( group_id, package_id, PKG_VERSION, *files )
-						end
-					end
+		if GEM_PUBHOST.empty?
+			task :no_gem_host do
+				log "Skipping gem push: no gem publication host."
+			end
+			task :publish => :no_gem_host
+		else
+			desc 'Publish the new gem to #{GEM_PUBHOST}'
+			task :publish => [:clean, :gem, :notes] do |task|
+				ask_for_confirmation( "Publish #{GEM_FILE_NAME} to #{GEM_PUBHOST}?", false ) do
+					gempath = PKGDIR + GEM_FILE_NAME
+					push_gem( gempath, GEM_PUBHOST )
 				end
 			end
 		end
@@ -309,6 +328,7 @@ rescue LoadError => err
 	end
 
 	task :release => :no_release_tasks
+	task "release:rerelease" => :no_release_tasks
 	task "release:announce" => :no_release_tasks
 	task "release:publish" => :no_release_tasks
 	task "release:notes" => :no_release_tasks