chronos 0.1.0

data/rake/lib/assesscode.rb

@@ -0,0 +1,59 @@
+#--
+# Copyright 2007-2008 by Stefan Rusterholz.
+# All rights reserved.
+# See LICENSE.txt for permissions.
+#++
+
+
+
+class AssessCode
+	def initialize(base, *paths)
+		@base          = base
+		@paths         = paths
+		reset
+	end
+	
+	def reset
+		@loc_code      = 0
+		@loc_comment   = 0
+		@bytes_code    = 0
+		@bytes_comment = 0
+		@bytes_data    = 0
+		@files         = 0
+	end
+	
+	def assess
+		reset
+		@paths.each { |path|
+			assess_dir("#{@base}/#{path}")
+		}
+	end
+	
+	def assess_dir(dir)
+		Dir.glob(dir, &method(:assess_file))
+	end
+	
+	def assess_file(file)
+		comment      = false
+		@bytes_data += File.size(file)
+		@files      += 1
+		File.readlines(file).each do |line|
+			comment = true if line =~ /^=begin/
+			comment = false if line =~ /^=end/
+			if comment or line =~ /^\s*(?:#|$)/
+				@loc_comment   += 1
+				@bytes_comment += line.strip.size
+			else
+				@loc_code   += 1
+				@bytes_code += line.strip.size
+			end
+		end
+	end
+		
+	def put_assessment
+		assess
+		puts "#{@bytes_data.div(1024)} KB total data in #{@files} files"
+		puts "#{@loc_code} Lines of Code (#{@bytes_code.div(1024)} KB)"
+		puts "#{@loc_comment} Lines of Comment (#{@bytes_comment.div(1024)} KB)"
+	end
+end # class AssessCode

data/rake/lib/bonesplitter.rb

@@ -0,0 +1,245 @@
+#--
+# Copyright 2007-2008 by Stefan Rusterholz.
+# All rights reserved.
+# See LICENSE.txt for permissions.
+#++
+
+
+
+require 'stringio'
+require 'ostruct'
+
+
+
+# fix pre-rubygems 1.3 nuisance
+begin
+	require 'rubygems'
+	module Kernel
+		private :gem
+		private :require
+		private :open
+	end
+rescue LoadError; end
+
+# needed for has_version?
+class Array
+	include Comparable
+end
+
+# The module BoneSplitter offers various helpful methods for rake tasks.
+#
+module BoneSplitter
+	def self.find_executable(*names)
+		path = ENV["PATH"].split(File::PATH_SEPARATOR)
+		names.each { |name|
+			found = path.map { |path| File.join(path, name) }.find { |e| File.executable?(e) }
+			return found if found
+		}
+		nil
+	end
+		
+	@libs = {}
+	@bin = OpenStruct.new(
+		:diff => find_executable('diff', 'gdiff', 'diff.exe'),
+		:sudo => find_executable('sudo'),
+		:rcov => find_executable('rcov', 'rcov.bat'),
+		:rdoc => find_executable('rdoc', 'rdoc.bat'),
+		:gem  => find_executable('gem', 'gem.bat', 'gem1.8'),
+		:git  => find_executable('git')
+	)
+
+	class <<BoneSplitter
+		attr_accessor :libs, :bin
+	end
+	
+	private
+	def optional_task(name, depends_on_constant)
+		# puts "#{name} requires #{depends_on_constant}: #{!!deep_const(depends_on_constant)}"
+		if deep_const(depends_on_constant) then
+			yield
+		else
+			task name do
+				"You're missing a dependency to run this thread (#{depends_on_constant})"
+			end
+		end
+	end
+	
+	def deep_const(name)
+		name.split(/::/).inject(Object) { |nesting, name|
+			return nil unless nesting.const_defined?(name)
+			nesting.const_get(name)
+		}
+	end
+
+	def version_proc(constant)
+		proc {
+			file    = constant.gsub(/::/, '/').downcase
+			require(file)
+			version = deep_const(constant)
+			version && version.to_s
+		}
+	end
+	
+	def quietly
+		verbose, $VERBOSE = $VERBOSE, nil
+		yield
+	ensure
+		$VERBOSE = verbose
+	end
+	
+	def silenced
+		a,b     = $stderr, $stdout
+		$stderr = StringIO.new
+		$stdout = StringIO.new
+		yield
+	ensure
+		$stderr, $stdout = a,b
+	end
+	
+	# same as lib? but aborts if a dependency isn't met
+	def dependency(names, warn_message=nil)
+		abort unless lib?(names, warn_message)
+	end
+	alias dependencies dependency
+	
+	def lib?(names, warn_message=nil)
+		Array(names).map { |name|
+			next true if BoneSplitter.libs[name] # already been required earlier
+			begin
+				silenced do
+					require name
+				end
+				BoneSplitter.libs[name] = true
+				true
+			rescue LoadError
+				warn(warn_message % name) if warn_message
+				false
+			end
+		}.all? # map first so we get all messages at once
+	end
+	
+	# Add a lib as present. Use this to fake existence of a lib if you have
+	# an in-place substitute for it, like e.g. RDiscount for Markdown.
+	def has_lib!(*names)
+		names.each { |name|
+			BoneSplitter.libs[name] = true
+		}
+	end
+	
+	def manifest(mani=Project.meta.manifest)
+		if File.exist?(mani) then
+			File.read(mani).split(/\n/)
+		else
+			[]
+		end
+	end
+	
+	def bin
+		BoneSplitter.bin
+	end
+	
+	def manifest_candidates
+		cands = Array(Project.manifest.include || '**/*').inject([]) { |a,e| a+Dir[e] }
+
+		# remove all that are to exclude
+		if Project.manifest.exclude then
+			Project.manifest.exclude.map { |glob| cands -= Dir[glob] }
+		end
+		# remove all directories
+		cands - Dir['**/*/'].map { |e| e.chop }
+	end
+
+	def has_version?(having_version, minimal_version, maximal_version=nil)
+		a = having_version.split(/\./).map { |e| e.to_i }
+		b = minimal_version.split(/\./).map { |e| e.to_i }
+		c = maximal_version && maximal_version.split(/\./).map { |e| e.to_i }
+		c ? a.between?(b,c) : a >= b
+	end
+
+	# requires that 'readme' is a file in markdown format and that Markdown exists
+	def extract_summary(file=Project.meta.readme)
+		return nil unless File.readable?(file)
+		case File.extname(file)
+			when '.rdoc'
+				File.read('README.rdoc')[/^(\s*=+)\s+SUMMARY\b.*?\n(.*?)\n\1/m, 2]
+			when '.markdown'
+				return nil unless lib?(%w'hpricot markdown', "Requires %s to extract the summary")
+				html = Markdown.new(File.read(file)).to_html
+				(Hpricot(html)/"h2[text()=Summary]").first.next_sibling.inner_text.strip
+		end
+	rescue => e
+		warn "Failed extracting the summary: #{e}"
+		nil
+	end
+	
+	# requires that 'readme' is a file in markdown format and that Markdown exists
+	def extract_description(file=Project.meta.readme)
+		return nil unless File.readable?(file)
+		case File.extname(file)
+			when '.rdoc'
+				File.read('README.rdoc')[/^(\s*=+)\s+DESCRIPTION\b.*?\n(.*?)\n\1/m, 2]
+			when '.markdown'
+				return nil unless lib?('hpricot markdown', "Requires %s to extract the summary")
+				html = Markdown.new(File.read(file)).to_html
+				(Hpricot(html)/"h2[text()=Description]").first.next_sibling.inner_text.strip
+		end
+	rescue => e
+		warn "Failed extracting the description: #{e}"
+		nil
+	end
+	
+	# Create a Gem::Specification from Project.gem data.
+	def gem_spec(from)
+		Gem::Specification.new do |s|
+			s.name                  = from.name
+			s.version               = from.version
+			s.summary               = from.summary
+			s.authors               = from.authors
+			s.email                 = from.email
+			s.homepage              = from.homepage
+			s.rubyforge_project     = from.rubyforge_project
+			s.description           = from.description
+			s.required_ruby_version = from.required_ruby_version if from.required_ruby_version
+	
+			from.dependencies.each do |dep|
+				s.add_dependency(*dep)
+			end if from.dependencies
+	
+			s.files            = from.files
+			s.executables      = from.executables.map {|fn| File.basename(fn)}
+			s.extensions       = from.extensions
+	
+			s.bindir           = from.bin_dir
+			s.require_paths    = from.require_paths if from.require_paths
+	
+			s.rdoc_options     = from.rdoc_options
+			s.extra_rdoc_files = from.extra_rdoc_files
+			s.has_rdoc         = from.has_rdoc
+	
+			if from.test_file then
+				s.test_file  = from.test_file
+			elsif from.test_files
+				s.test_files = from.test_files
+			end
+			
+			# Do any extra stuff the user wants
+			from.extras.each do |msg, val|
+				case val
+					when Proc
+						val.call(s.send(msg))
+					else
+						s.send "#{msg}=", val
+				end
+			end
+		end # Gem::Specification.new
+	end
+
+	# Returns a good name for the gem-file using the spec and the package-name.	
+	def gem_file(spec, package_name)
+		if spec.platform == Gem::Platform::RUBY then
+			"#{package_name}.gem"
+		else
+			"#{package_name}-#{spec.platform}.gem"
+		end
+	end
+end # BoneSplitter

data/rake/lib/projectclass.rb

@@ -0,0 +1,69 @@
+#--
+# Copyright 2007-2008 by Stefan Rusterholz.
+# All rights reserved.
+# See LICENSE.txt for permissions.
+#++
+
+
+
+# fix pre-rubygems 1.3 nuisance
+begin
+	require 'rubygems'
+	module Kernel
+		private :gem
+		private :require
+		private :open
+	end
+rescue LoadError; end
+
+# FIXME: add a method_added hook to Object and Kernel to keep ProjectClass clean.
+
+# This class is not written for long running scripts as it leaks symbols.
+# It is openstructlike, but a bit more lightweight and blankslate so any method will work
+# You can set values to procs and call __finalize__ to get them replaced by the value
+# returned by the proc.
+class ProjectClass
+	names = public_instance_methods - %w[initialize inspect __id__ __send__]
+	names.each { |m| undef_method m }
+
+	attr_reader :__hash__
+	
+	def initialize(values=nil)
+		@__hash__ = values || {}
+	end
+	
+	def [](key)
+		@__hash__[key.to_sym]
+	end
+	
+	def []=(key,value)
+		@__hash__[key.to_sym] = value
+	end
+	
+	# All values that respond to .call are replaced by the value
+	# returned when calling.
+	def __finalize__
+		@__hash__.each { |k,v|
+			@__hash__[k] = v.call if v.respond_to?(:call)
+		}
+	end
+	
+	def method_missing(name, *args)
+		case args.length
+			when 0
+				if key = name.to_s[/^(.*)\?$/, 1] then
+					!!@__hash__[key.to_sym]
+				else
+					@__hash__[name]
+				end
+			when 1
+				if key = name.to_s[/^(.*)=$/, 1] then
+					@__hash__[key.to_sym] = args.first
+				else
+					super
+				end
+			else
+				super
+		end
+	end
+end

data/rake/tasks/copyright.rake

@@ -0,0 +1,24 @@
+#--
+# Copyright 2007 by Stefan Rusterholz.
+# All rights reserved.
+# See LICENSE.txt for permissions.
+#++
+
+
+
+namespace :copyright do
+	task :update do
+		manifest().each { |file|
+			data = File.read(file).gsub(/(copyright \d+)(?:(\s*-\s*)\d+)?( by)/i) {
+				copyright = "#{$1}#{$2 || '-'}#{Time.now.year}#{$3}"
+				puts "#{file}: replacing #{$&.inspect} with #{copyright.inspect}"
+				copyright
+			}
+			File.open(file, "wb") { |fh| fh.write(data) }
+		}
+	end
+end  # namespace :copyright
+
+desc 'Alias to copyright:update'
+task :copyright => 'copyright:update'
+

data/rake/tasks/gem.rake

@@ -0,0 +1,119 @@
+#--
+# Copyright 2007-2008 by Stefan Rusterholz.
+# All rights reserved.
+# See LICENSE.txt for permissions.
+#++
+
+
+
+namespace :gem do
+
+	# No data in Project
+	if Project.gem.nil? then
+		task :missing_project do
+			abort("No instructions in Project to run the gem tasks")
+		end
+		
+		task :package   => :missing_project
+		task :info      => :missing_project
+		task :install   => :missing_project
+		task :uninstall => :missing_project
+		task :cleanup   => :missing_project
+		task :clobber
+
+	# Rubygems is not installed
+	elsif !lib?('rubygems') then
+		task :missing_rubygems do
+			abort("Requires rubygems to run")
+		end
+		
+		task :package   => :missing_rubygems
+		task :info      => :missing_rubygems
+		task :install   => :missing_rubygems
+		task :uninstall => :missing_rubygems
+		task :cleanup   => :missing_rubygems
+		task :clobber
+
+	# Prerequisites met
+	else
+		Project.gem.name                  ||= Project.meta.name
+		Project.gem.version               ||= Project.meta.version
+		Project.gem.summary               ||= Project.meta.summary
+		Project.gem.description           ||= Project.meta.description
+		Project.gem.authors               ||= Project.meta.authors || Array(Project.meta.author)
+		Project.gem.email                 ||= Project.meta.email
+		Project.gem.homepage              ||= Project.meta.website
+		Project.gem.rubyforge_project     ||= (Project.rubyforge && Project.rubyforge.name) || Project.meta.name
+		Project.gem.files                 ||= manifest()
+		Project.gem.executables           ||= Array(Project.gem.executable)
+		Project.gem.extensions            ||= Project.gem.files.grep %r/extconf\.rb$/
+		Project.gem.bin_dir               ||= "bin"
+	
+		Project.gem.rdoc_options          ||= Project.rdoc && Project.rdoc.options
+		Project.gem.extra_rdoc_files      ||= Project.rdoc && Project.rdoc.extra_files
+		Project.gem.rdoc_options          ||= Project.rdoc && Project.rdoc.options
+		Project.gem.__finalize__
+		Project.gem.spec = gem_spec(Project.gem)
+
+		# task gem:package
+		dependency 'rake/gempackagetask', 'Requires rake/gempackagetask'
+		pkg = Rake::GemPackageTask.new(Project.gem.spec) do |pkg|
+			pkg.need_tar      = Project.gem.need_tar
+			pkg.need_zip      = Project.gem.need_zip
+			pkg.package_files = Project.gem.files if Project.gem.files
+		end
+		# Rake::Task['gem:package'].instance_variable_set(:@full_comment, nil)
+	
+		Project.gem.gem_file ||= gem_file(Project.gem.spec, pkg.package_name)
+	
+		desc 'Show information about the gem'
+		task :info do
+			puts "package_files:"
+			puts Project.gem.files
+			puts Project.gem.spec.to_ruby
+		end
+	
+		desc "Build the gem file #{Project.gem.gem_file}"
+		task :package => %W[#{pkg.package_dir}/#{Project.gem.gem_file}]
+	
+		file "#{pkg.package_dir}/#{Project.gem.gem_file}" => [pkg.package_dir, *Project.gem.files] do
+			when_writing("Creating GEM") {
+				Gem::Builder.new(Project.gem.spec).build
+				verbose(true) {
+					mv Project.gem.gem_file, "#{pkg.package_dir}/#{Project.gem.gem_file}"
+				}
+			}
+		end
+	
+		desc 'Install the gem'
+		task :install => [:clobber, 'gem:package'] do
+			sh "#{bin.sudo unless File.writable?(Gem.dir)} #{bin.gem} install --no-update-sources pkg/#{Project.gem.spec.full_name}"
+		end
+	
+		desc 'Reinstall the gem'
+		task :reinstall => [:uninstall, :install]
+	
+		desc 'Uninstall the gem'
+		task :uninstall do
+			if installed_list = Gem.source_index.find_name(Project.gem.name) then
+				installed_versions = installed_list.map { |s| s.version.to_s }
+				if installed_versions.include?(Project.gem.version) then
+					sh "#{bin.sudo unless File.writable?(Gem.dir)} #{bin.gem} uninstall --version '#{Project.gem.version}' --ignore-dependencies --executables #{Project.gem.name}"
+				end
+			end
+		end
+	
+		desc 'Cleanup the gem'
+		task :cleanup do
+			abort("Gem name not set in Project.gem") unless Project.gem.name
+			sh "#{bin.sudo unless File.writable?(Gem.dir)} #{bin.gem} cleanup #{Project.gem.name}"
+		end
+
+		task :clobber => :clobber_package
+	end
+end  # namespace :gem
+
+desc 'Alias to gem:package'
+task :gem     => 'gem:package'
+task :clobber => 'gem:clobber'
+