dev 2.0.46 → 2.0.47

data/lib/command.rb

@@ -1,208 +0,0 @@
-require 'open3'
-require_relative('./array.rb')
-require_relative('./hash.rb')
-require_relative('./timer.rb')
-
-BUFFER_SIZE=1024 if(!defined?(BUFFER_SIZE))
-            
-# = Command
-#
-# execution of system commands
-#
-# = Keys
-#
-# - :input The input of the commands.
-# - :timeout The timeout in seconds.
-#          a value of zero is to infinite timeout.
-#          defaults to zero
-# - :directory The working directory for the command.
-#             defaults to the current directory
-# - :exit_code The exit code of the command
-# - :output The output contains the stdout output of the command
-# - :error The error contains stderr output of the command
-# - :machine The name of the machine the command executed on
-# - :user The user name
-# - :start_time
-# - :end_time
-#
-class Command < Hash
-	def initialize command
-
-    self[:input] = ''
-		self[:timeout] = 0
-		self[:directory] = ''
-		self[:exit_code] = 0
-		self[:output] = ''
-		self[:error] = ''
-		self[:machine] = ''
-		self[:user] = ''
-		self[:start_time] = nil
-		self[:end_time] = nil
-
-		if(command.kind_of?(String))
-		  self[:input] = command
-        end
-
-        if(command.kind_of?(Hash))
-        	command.each{|k,v|
-        		self[k.to_sym]=v
-        	}
-        end
-	end
-
-  def quiet?
-    (self.has_key?(:quiet) && self[:quiet])
-  end
-
-	def execute value=nil
-
-    if(!value.nil? && value.is_a?(Hash))
-      value.each{|k,v|self[k]=v}
-    end
-
-		pwd=Dir.pwd
-		self[:directory] = pwd if(!self.has_key?(:directory) || self[:directory].length==0)
-
-    if(self[:timeout] > 0)
-      puts "#{self[:input]} (#{self[:directory]}) timeout #{self[:timeout].to_s}" if(!quiet?)
-    else
-		  puts "#{self[:input]} (#{self[:directory]})" if(!quiet?)
-    end
-
-		self[:machine] = Command.machine
-		self[:user] = Command.user
-
-		self[:start_time]=Time.now
-		timer=Timer.new
-
-    Dir.chdir(self[:directory]) do
-  		if self[:input].include?('<%') && self[:input].include?('%>')
-  		  ruby = self[:input].gsub("<%","").gsub("%>","")
-
-  		  begin
-  		    self[:output]=eval(ruby)
-  		  rescue 
-  		  	self[:exit_code]=1
-  		  	self[:error]="unable to eval(#{ruby})"
-  		  end
-
-  		  self[:elapsed] = timer.elapsed_str
-  		  self[:end_time] = Time.now
-  		else
-  			begin
-          if(self[:timeout] <= 0)
-            self[:output],self[:error],status= Open3.capture3(self[:input])
-            self[:exit_code]=status.to_i
-    			  self[:elapsed] = timer.elapsed_str
-    			  self[:end_time] = Time.now
-          else
-            require_relative 'timeout.rb'
-            #puts run_with_timeout(self[:input], self[:timeout], 1).to_s
-            #self[:output] = run_with_timeout(self[:input], self[:timeout], 1)
-            result=run_with_timeout(self[:directory],self[:input], self[:timeout], 2)
-            self[:output]=result[0]
-            self[:exit_code]=result[1]
-
-            self[:elapsed] = timer.elapsed_str
-            self[:end_time] = Time.now
-            
-            if(timer.elapsed >= self[:timeout])
-              self[:exit_code]=1 
-              self[:error] = self[:error] + "timed out"
-            end
-          end
-  			rescue Exception => e
-  			  self[:elapsed] = timer.elapsed_str
-  			  self[:end_time] = Time.now
-  			  self[:error] = "Exception: " + e.to_s
-  			  self[:exit_code]=1
-  		  end
-  		end
-    end
-       
-
-    if(self[:exit_code] != 0)
-      if(!quiet?)
-    	  puts "exit_code=#{self[:exit_code]}"
-    	  puts self[:output]
-    	  puts self[:error]
-      end
-    	if(!self.has_key?(:ignore_failure) || !self[:ignore_failure])
-    		raise "#{self[:input]} failed" 
-    	end #unless (self.has_key?(:ignore_failure) && self[:ignore_failure]==true)
-    end
-      
-	end
-
-    def self.machine
-      if !ENV['COMPUTERNAME'].nil? 
-	   return ENV['COMPUTERNAME']
-	  end
-
-      machine = `hostname`
-      machine = machine.split('.')[0] if machine.include?('.')
-	  return machine.strip
-    end
-
-    def self.user
-      ENV['USER'].nil? ? ENV['USERNAME'] : ENV['USER']
-    end 
-
-    def self.home 
-      ["USERPROFILE","HOME"].each {|v|
-        return ENV[v].gsub('\\','/') unless ENV[v].nil?
-      }
-      dir="~"
-      dir=ENV["HOME"] unless ENV["HOME"].nil?
-      dir=ENV["USERPROFILE"].gsub('\\','/') unless ENV["USERPROFILE"].nil?
-      return dir
-    end
-
-    def self.dev_root
-      ["DEV_HOME","DEV_ROOT"].each {|v|
-        return ENV[v].gsub('\\','/') unless ENV[v].nil?
-      }
-      dir=home
-      #dir=ENV["DEV_ROOT"].gsub('\\','/') unless ENV["DEV_ROOT"].nil?
-     return dir
-    end
-
-    def self.exit_code command
-    	cmd = Command.new(command)
-    	cmd[:ignore_failure]=true
-      cmd[:quiet]=true
-    	cmd.execute
-    	cmd[:exit_code]
-    end
-
-    def self.output command
-    	cmd = Command.new(command)
-    	cmd[:ignore_failure]=true
-      cmd[:quiet]=true
-    	cmd.execute
-    	cmd[:output]
-    end
-
-    def summary
-      "#{self[:exit_code].to_s} #{self[:input]} (#{self[:directory]})"
-    end
-
-    def to_html
-      if self[:exit_code] == 0
-      [
-      	'<div><table><tr><td width="20"></td><td><pre>',
-      	self[:input],
-      	'</pre></td></tr></table></div>'
-      ].join
-      else
-      [
-      	'<div><table><tr><td width="20"></td><td><pre>',
-      	self[:input],
-        '</pre><table><tr><td width="20"></td><td><table>',
-        map { |k, v| ["<tr><td><strong>#{k}</strong></td>", v.respond_to?(:to_html) ? v.to_html : "<td><span><pre>#{v}</pre></span></td></tr>"] },
-        '</table>',
-        '</td></tr></table></td></tr></table></div>'
-      ].join
-      end
-    end
-end

data/lib/commands.rb

@@ -1,36 +0,0 @@
-require_relative('hash.rb')
-require_relative('pull.rb')
-require_relative('update.rb')
-require_relative('setup.rb')
-require_relative('build.rb')
-require_relative('test.rb')
-require_relative('analyze.rb')
-require_relative('publish.rb')
-require_relative('doc.rb')
-require_relative('clean.rb')
-require_relative('clobber.rb')
-require_relative('add.rb')
-require_relative('commit.rb')
-require_relative('push.rb')
-
-class Commands < Hash
-
-	def initialize directory=Dir.pwd
-		Dir.chdir(directory) do
-		  self[:pull]=Pull.new
-		  self[:update]=Update.new
-		  self[:setup]=Setup.new
-		  self[:build]=Build.new
-		  self[:test]=Test.new
-		  self[:analyze]=Analyze.new
-		  self[:doc]=Doc.new
-		  self[:clean]=Clean.new
-		  self[:publish]=Publish.new
-		  self[:clobber]=Clobber.new
-		  self[:add]=Add.new
-		  self[:commit]=Commit.new
-		  self[:push]=Push.new
-	    end
-	end
-
-end

data/lib/commit.rb

@@ -1,20 +0,0 @@
-require_relative('internet.rb')
-
-class Commit < Array
-	def update
-		if(File.exists?('.git') && `git config --list`.include?('user.name='))
-			if(!`git status`.include?('nothing to commit') &&
-			   !`git status`.include?('untracked files present'))
-			  if(File.exists?('commit.message') && File.read('commit.message').gsub(/\s+/,"").length >0)
-			  	add "git commit -a -v -m \"#{File.read('commit.message')}\""
-			  else
-			    add "git commit -m'all'"
-			  end
-			  add "<%FileUtils.rm('commit.message')%>" if File.exists?('commit.message')
-		    end 		
-		end
-		if(File.exists?('.svn') && Internet.available?)
-			add 'svn commit -m"commit all"'
-		end
-	end
-end

data/lib/doc.rb

@@ -1,9 +0,0 @@
-class Doc < Array
-	def update
-		#cmd=Command.new ({ :input => 'yard --version', :ignore_failure => true})
-		#cmd.execute
-		if(Command.exit_code('yard --version'))
-		  add 'yard doc - LICENSE' if File.exists?('README.md') && File.exists?('LICENSE')
-		end
-	end
-end

data/lib/environment.rb

@@ -1,49 +0,0 @@
-class Environment < Hash
-
-  def initialize
-    self[:home]=Environment.home
-    self[:machine]=Environment.machine
-    self[:user]=Environment.user
-  end
-
-  def self.home 
-    ["USERPROFILE","HOME"].each {|v|
-      return ENV[v].gsub('\\','/') unless ENV[v].nil?
-    }
-    dir="~"
-    dir=ENV["HOME"] unless ENV["HOME"].nil?
-    dir=ENV["USERPROFILE"].gsub('\\','/') unless ENV["USERPROFILE"].nil?
-    return dir
-  end
-
-  def self.machine
-     if !ENV['COMPUTERNAME'].nil? 
-	   return ENV['COMPUTERNAME']
-	 end
-
-     machine = `hostname`
-     machine = machine.split('.')[0] if machine.include?('.')
-	 return machine.strip
-  end
-
-  def self.user
-  	return ENV['USER'] if !ENV['USER'].nil?  #on Unix
-    ENV['USERNAME']
-  end
-
-  def self.dev_root
-    ["DEV_HOME","DEV_ROOT"].each {|v|
-      if !ENV[v].nil?
-        if(ENV[v].include?(';'))
-          ENV[v].split(';').each{|d|
-            return d if File.exists?(d)
-          }
-        else
-          return ENV[v].gsub('\\','/')
-        end
-      end
-    }
-    dir=home
-   return dir
-  end
-end

data/lib/gemspec.rb

@@ -1,40 +0,0 @@
-class Gemspec
-	def self.update gemspec_file
-		Text.replace_in_file gemspec_file,
-                              /('\d{4}-\d{2}-\d{2}')/,
-                              "'#{Time.now.strftime('%Y-%m-%d')}'"
-	end
-
-	def self.gemfile gemspec_file
-		spec=Gem::Specification.load(gemspec_file)
-		return "#{spec.name}-#{spec.version}.gem" if !spec.nil?
-		return ""
-	end
-
-    def self.version gemspec_file
-    	spec=Gem::Specification.load(gemspec_file)
-		return spec.version.to_s
-    end
-
-    def self.published_version gemspec_file
-  		published_version=''
-    	spec=Gem::Specification.load(gemspec_file)
-		begin
-		  published_version = `gem list -r #{spec.name}`.scan(/\((\d+.\d+.\d+)\)/)[0][0]
-		rescue
-		  published_version=''
-		end
-		published_version
-    end
-	def self.published? gemspec_file
-		published_version(gemspec_file)==version(gemspec_file) ? true : false
-	end
-
-	def self.normalize gemspec_file
-		spec=Gem::Specification.load(gemspec_file)
-		File.open(gemspec_file,'w'){|f|f.write(spec.to_ruby)}
-	end
-
-	def self.upgrade gemspec_file
-	end
-end

data/lib/git.rb

@@ -1,51 +0,0 @@
-class Git
-	def self.branch directory=''
-        directory=Dir.pwd if directory.length == 0
-        Dir.chdir(directory) do
-    		begin
-    		  `git branch`.scan(/\* ([.\w-]+)/)[0][0] if(File.exists?('.git'))
-    	    rescue
-    	    	''
-    	    end
-        end
-    end
-
-    def self.remote_origin directory=''
-    	url=''
-    	directory=Dir.pwd if directory.length == 0
-    	Dir.chdir(directory) do
-    		begin
-    			url=`git remote show origin`.scan(/Fetch URL: ([\.\-:\/\w\d]+)/)[0][0] if(File.exists?('.git'))
-    		rescue
-    			url=''
-    		end
-    	end
-    	url
-    end
-
-    def self.has_changes? directory=''
-        directory=Dir.pwd if directory.length==0
-        Dir.chdir(directory) do
-            if(File.exists?('.git'))
-                return true if `git status`.include?('modified:')
-            end
-        end
-        false
-    end
-
-    def self.init directory=''
-        directory=Dir.pwd if directory.length==0
-        FileUtils.mkpath directory if !File.exists?(directory)
-        if(!File.exists?("#{directory}/.git"))
-            Dir.chdir(directory) do
-               `git init`
-               File.open('.gitignore','w'){|f|
-                   f.puts '### Mac ###'
-                   f.puts '*.DS_Store'
-               }
-               `git add .gitignore`
-               `git commit -m'added .gitignore'`
-            end
-        end
-    end
-end

data/lib/hash.rb

@@ -1,21 +0,0 @@
-class Hash
-	def execute value=nil
-	  self.each{|k,v|
-      v.update if v.respond_to?(:update)
-      if(v.is_a?(Array) && v.length==0)
-        self.delete k 
-      else
-        #puts "executing #{k}"
-
-	  	  v.execute(value) if v.respond_to?(:execute)
-      end
-	  }
-    end
-	def to_html
-      [
-      	'<div>',
-        map { |k, v| ["<br/><div><strong>#{k}</strong>", v.respond_to?(:to_html) ? v.to_html : "<span>#{v}</span></div><br/>"] },
-        '</div>'
-      ].join
-    end
-end

data/lib/info.rb

@@ -1,3 +0,0 @@
-require_relative 'array.rb'
-INFO=Array.new
-

data/lib/internet.rb

@@ -1,24 +0,0 @@
-require 'open-uri'
-#require 'net/http'
-require 'timeout'
-class Internet
-
-	@@available=true
-
-	def self.available?
-		return @@available if !@@available.nil?
-
-		begin
-			index=open('http://www.google.com').read 
-			if index.include?('<Title>Google')
-				@@available = true
-			else
-				puts "open('http://www.google.com') returned false"
-			end
-		rescue Exception => e
-			puts "open('http://www.google.com') raised an exception: #{e.to_s}"
-			@@available = false
-		end
-		@@available
-	end
-end

data/lib/msbuild.rb

@@ -1,70 +0,0 @@
-# Visual Studio 2008 version 9.0,  solution format version 10.00
-# Visual Studio 2010 version 10.0, solution format version 11.00
-# Visual Studio 2012 version 11.0, solution format version 12.00
-# Visual Studio 2013 version 12.0, solution format version 12.00
-class MSBuild < Hash
-
-  def initialize
-    self[:vs9]="C:\\Windows\\Microsoft.NET\\Framework\\v3.5\\msbuild.exe"  if(File.exists?("C:\\Windows\\Microsoft.NET\\Framework\\v3.5\\msbuild.exe"))
-    self[:vs12]="C:\\Program Files (x86)\\MSBuild\\12.0\\bin\\msbuild.exe" if(File.exists?("C:\\Program Files (x86)\\MSBuild\\12.0\\bin\\msbuild.exe"))
-  end
-  
-  def self.has_version? version
-    if(defined?(MSBUILD))
-      MSBUILD.has_key?(version)
-    else
-      msb=MSBuild.new
-      return msb.has_key? version
-    end
-  end
-
-  def self.get_version version
-    if(defined?(MSBUILD))
-      MSBUILD[version]
-    else
-      msb=MSBuild.new
-      return msb[version]
-    end
-  end
-
-	def self.get_vs_version(sln_filename)
-   		sln_text=File.read(sln_filename,:encoding=>'UTF-8')
-    	return :vs9 if sln_text.include?('Format Version 10.00')
-    	return :vs12
-  	end
-
-  	def self.get_configurations(sln_filename)
-    	configs=Array.new
-	  	sln_text=File.read(sln_filename,:encoding=>'UTF-8')
-    	sln_text.scan( /= ([\w]+)\|/ ).each{|m|
-	  	c=m.first.to_s
-	  	configs << c if !configs.include?(c)
-		}
-		return configs
-  	end
-
-  	def self.get_platforms(sln_filename)
-    	platforms=Array.new
-	  	sln_text=File.read(sln_filename,:encoding=>"UTF-8")
-    	sln_text.scan( /= [\w]+\|([\w ]+)/ ).each{|m|
-	    	p=m.first.to_s
-	    	platforms << p if !platforms.include?(p)
-	  	}
-		  return platforms
-  	end
-
-    def self.get_build_commands sln_filename
-      build_commands=nil
-      vs_version=MSBuild.get_vs_version(sln_filename)
-      if(MSBuild.has_version?(vs_version))
-        MSBuild.get_configurations(sln_filename).each{ |configuration|
-          MSBuild.get_platforms(sln_filename).each{|platform|
-            build_commands=Array.new if build_commands.nil?
-            build_commands << "\"#{MSBuild.get_version(vs_version)}\" \"#{sln_filename}\" /nologo /p:Configuration=#{configuration} /p:Platform=\"#{platform}\""
-          }
-        }
-      end
-      build_commands
-    end
-end
-

data/lib/project.rb

@@ -1,64 +0,0 @@
-require 'json'
-require 'dev_commands'
-
-class Project < Hash
-attr_accessor :filename
-	def initialize value=''
-		@filename=''
-		self[:url]=''
-		self[:url] = value if value.is_a?(String)
-		if(value.is_a?(Hash))
-			value.each{|k,v|self[k]=v}
-		end
-	end
-
-    def name
-    	self[:name]
-    end
-    
-	def get_latest_unique_id 
-		'51ed9c9d45ba3979c808740d75ba1831c85aff5d'
-	end
-
-	def wrk_dir
-		"#{Environment.dev_root}/wrk/#{self.name}"
-	end
-
-	def pull
-		if(File.exists?(wrk_dir) && File.exists?("#{wrk_dir}/.git"))
-			Dir.chdir(wrk_dir) do
-				puts "git pull (#{wrk_dir})"
-				puts `git pull`
-			end
-		end
-	end
-
-	def clone
-		if(!File.exists?(wrk_dir) && self[:url].include?('.git'))
-			puts "cloning #{self[:url]} to #{self.wrk_dir}"
-			puts `git clone #{self[:url]} #{self.wrk_dir}`
-		end
-	end
-
-	def checkout
-		if(!File.exists?(wrk_dir) && self[:url].include?('svn'))
-			puts "checkout #{self.url} to #{self.wrk_dir}"
-			puts `svn checkout #{self.url} #{self.wrk_dir}`
-		end
-	end
-
-	def rake
-		if(!File.exists?(self.wrk_dir))
-			clone
-			checkout
-		end
-		if(File.exists?(self.wrk_dir))
-			Dir.chdir(self.wrk_dir) do
-				rake = Command.new({ :input => 'rake', :timeout => 300, :ignore_failure => true })
-				rake.execute
-				puts rake.summary
-			end
-		end
-	end
-end
-

data/lib/projects.rb

@@ -1,66 +0,0 @@
-require 'json'
-require 'rake'
-require 'dev_git'
-require 'dev_svn'
-require 'dev_msbuild'
-require 'dev_environment'
-
-class Projects < Hash
-	attr_accessor :filename
-
-	def initialize
-		@filename=''
-	end
-
-    def update
-    	self.each{|k,v|
-    		self[k]=Project.new(v) if(v.is_a?(String))
-    		self[k]=Project.new(v) if(!v.is_a?(Project) && v.is_a?(Hash))
-    		self[k][:name]=k
-    		#self[k].update if self[k].respond_to?("update".to_sym)
-    	}
-    end
-
-	def save filename=''
-		@filename=filename if !filename.nil? && filename.length > 0
-		File.open(@filename,'w'){|f|f.write(JSON.pretty_generate(self))} if @filename.length > 0
-	end
-
-	def open filename=''
-		@filename=filename if filename.length > 0
-		JSON.parse(IO.read(@filename)).each{|k,v| self[k]=v}
-		update
-	end
-
-	def self.user_projects_filename
-		FileUtils.mkdir("#{Environment.dev_root}/data") if(!File.exists?("#{Environment.dev_root}/data"))
-		"#{Environment.dev_root}/data/PROJECTS.json"
-	end
-
-	def self.current
-		project=nil
-		url=Git.remote_origin
-		url=Svn.url if url.length==0
-		if(Rake.application.original_dir.include?('/wrk/') &&
-			   url.length > 0)
-			project=Project.new(url)
-			name=Rake.application.original_dir.gsub("#{Environment.dev_root}/wrk/",'')
-			project[:name] = name if(name.length>0 && !name.include?(Environment.dev_root))
-			if(defined?(PROJECTS))
-				PROJECTS[name]=project if(!PROJECTS.has_key?(name))
-				project.each{|k,v|PROJECTS[name][k]=v}
-				PROJECTS.save
-			else
-				project[:name]=name
-			end
-		end			
-		project
-	end
-
-	def pull
-		self.each{|k,v| v.pull if v.respond_to?("pull".to_sym)}
-	end
-	def rake
-		self.each{|k,v| v.rake if v.respond_to?("rake".to_sym)}
-	end
-end

data/lib/publish.rb

@@ -1,21 +0,0 @@
-require_relative('internet.rb')
-class Publish < Array
-	def update
-		if(Internet.available?)
-			if(File.exists?('.git'))
-				if(`git branch`.include?('* master'))
-					Dir.glob('*.gemspec').each{|gemspec_file|
-						add "gem push #{Gemspec.gemfile(gemspec_file)}" if !Gemspec.published? gemspec_file
-					}
-				end
-			end
-			if(File.exists?('.svn'))
-				if(`svn info`.include?('/trunk'))
-					Dir.glob('*.gemspec').each{|gemspec_file|
-						add "gem push #{Gemspec.gemfile(gemspec_file)}" if !Gemspec.published? gemspec_file
-					}
-				end
-			end
-		end
-	end
-end