r7z 1.0.2

data/History.txt

@@ -0,0 +1,4 @@
+== 1.0.0 / 2009-05-25
+
+* 1 major enhancement
+  * Birthday!

data/README.txt

@@ -0,0 +1,48 @@
+r7z
+    by FIXME (your name)
+    FIXME (url)
+
+== DESCRIPTION:
+
+FIXME (describe your package)
+
+== FEATURES/PROBLEMS:
+
+* FIXME (list of features or problems)
+
+== SYNOPSIS:
+
+  FIXME (code sample of usage)
+
+== REQUIREMENTS:
+
+* FIXME (list of requirements)
+
+== INSTALL:
+
+* FIXME (sudo gem install, anything else)
+
+== LICENSE:
+
+(The MIT License)
+
+Copyright (c) 2008 FIXME (different license?)
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+'Software'), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
+CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
+TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
+SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/Rakefile

@@ -0,0 +1,29 @@
+# Look in the tasks/setup.rb file for the various options that can be
+# configured in this Rakefile. The .rake files in the tasks directory
+# are where the options are used.
+
+begin
+  require 'bones'
+  Bones.setup
+rescue LoadError
+  begin
+    load 'tasks/setup.rb'
+  rescue LoadError
+    raise RuntimeError, '### please install the "bones" gem ###'
+  end
+end
+
+ensure_in_path 'lib'
+require 'r7z'
+
+task :default => 'spec:run'
+
+PROJ.name = 'r7z'
+PROJ.authors = 'Yohan BARUKH'
+PROJ.email = 'yohan_barukh@systalians.com'
+PROJ.version = R7z::VERSION
+PROJ.rubyforge.name = 'r7z'
+
+PROJ.spec.opts << '--color'
+
+# EOF

data/bin/r7z

@@ -0,0 +1,8 @@
+#!/usr/bin/env ruby
+
+require File.expand_path(
+    File.join(File.dirname(__FILE__), %w[.. lib r7z]))
+
+# Put your code here
+
+# EOF

data/lib/r7z.rb

@@ -0,0 +1,49 @@
+
+module R7z
+
+  # :stopdoc:
+  VERSION = '1.0.2'
+  LIBPATH = ::File.expand_path(::File.dirname(__FILE__)) + ::File::SEPARATOR
+  PATH = ::File.dirname(LIBPATH) + ::File::SEPARATOR
+  # :startdoc:
+
+  # Returns the version string for the library.
+  #
+  def self.version
+    VERSION
+  end
+
+  # Returns the library path for the module. If any arguments are given,
+  # they will be joined to the end of the libray path using
+  # <tt>File.join</tt>.
+  #
+  def self.libpath( *args )
+    args.empty? ? LIBPATH : ::File.join(LIBPATH, args.flatten)
+  end
+
+  # Returns the lpath for the module. If any arguments are given,
+  # they will be joined to the end of the path using
+  # <tt>File.join</tt>.
+  #
+  def self.path( *args )
+    args.empty? ? PATH : ::File.join(PATH, args.flatten)
+  end
+
+  # Utility method used to require all files ending in .rb that lie in the
+  # directory below this file that has the same name as the filename passed
+  # in. Optionally, a specific _directory_ name can be passed in such that
+  # the _filename_ does not have to be equivalent to the directory.
+  #
+  def self.require_all_libs_relative_to( fname, dir = nil )
+    dir ||= ::File.basename(fname, '.*')
+    search_me = ::File.expand_path(
+        ::File.join(::File.dirname(fname), dir, '**', '*.rb'))
+
+    Dir.glob(search_me).sort.each {|rb| require rb}
+  end
+
+end  # module R7z
+
+R7z.require_all_libs_relative_to(__FILE__)
+
+# EOF

data/lib/r7z/compress.rb

@@ -0,0 +1,111 @@
+module R7z
+
+  PATH_TO_7Z = File.expand_path("7za.exe", File.join(File.dirname(__FILE__), "..", "..", "7z"))
+  BUFFER_LENGTH = 1024 * 1024 * 8
+
+  class Compress
+
+    attr_accessor :archive_file, :inner_file, :inner_directory, :source_file
+
+    def initialize(hash = {})
+      hash.each { |k, v|
+        self.send("#{k}=".to_sym, v)
+      }
+    end
+
+    #
+    # -Extraire un repertoire
+    # <pre>
+    # cpx = R7z::Compress.new(:archive_file => 'C:/temporaire/20090520.7z', :inner_directory => '20090520/SAG1')<br>
+    # cpx.extract_to('c:/temporaire/SAG1')
+    # </pre>
+    #
+    # -Extraire un fichier (l'archive contient une arborescence)
+    # <pre>
+    # cpx = R7z::Compress.new(:archive_file => 'C:/temporaire/20090520.7z', :inner_file => '20090520/SAG1/SAG.log')<br>
+    # cpx.extract_to('c:/temporaire/SAG1.log')
+    # </pre>
+    #
+    # -Extraire un fichier (l'archive contient un seul fichier)
+    # <pre>
+    # cpx = R7z::Compress.new(:archive_file => 'C:/temporaire/RE_PROD_PRCGestionCorbeille_20090520_1113-20090520.zip', :inner_file => <b>'*.log'</b>)<br>
+    # cpx.extract_to('c:/temporaire/PRC-20090520.log')
+    # </pre>
+    #
+    def extract_to(destination, mode = 'rb', options = {})
+      if self.inner_file
+        open(destination, "w") do |w|
+          w.binmode
+          IO.popen(self.cmd_extract_string(destination, options), mode) { |io|
+            s = String.new
+            while (s = io.read(BUFFER_LENGTH, s))
+              w << s
+            end
+          }
+        end
+      else
+        %x{#{self.cmd_extract_string(destination, options)}}
+      end
+    end
+
+    #
+    # -Compresser un fichier
+    # <pre>
+    # cpx = R7z::Compress.new(:source_file => 'C:/AAG/R_AnalyseLogs/workdir/logs/PRCGestionCorbeille_20091102_1113.LOG', :archive_file => 'C:/temporaire/PRC_Affectation/Resultat/LOGS/PRCGestionCorbeille_20091102.zip')
+    # cpx.compress
+    # </pre>
+    #
+    def compress(format = 'zip', options = {})
+      cmd = "\"#{PATH_TO_7Z}\" a -t#{format} \"#{self.archive_file}\" \"#{self.source_file}\" "
+      cmd = "cmd /c \"#{cmd}\""
+      $stderr.puts "cmd_compress=#{cmd}" if options[:verbose]
+      %x{#{cmd}}
+    end
+
+    def execute_7z_command(*attrs)
+      options = attrs.extract_options! || {}
+      cmd = [PATH_TO_7Z] + attrs
+      cmd = cmd.collect{|p| p.include?(' ') ? "\"#{p}\"" : p}.join(' ')
+      cmd = "cmd /c \"#{cmd}\""
+
+      $stderr.puts "cmd=#{cmd}" if options[:verbose]
+      %x{#{cmd}}
+    end
+
+
+    def cmd_extract_string(destination, options = {})
+      cmd = nil
+      if all_inner_file?
+        cmd = "\"#{PATH_TO_7Z}\" e \"#{self.archive_file}\" -o\"#{destination}\" -y"
+      elsif self.inner_directory
+        cmd = "\"#{PATH_TO_7Z}\" x \"#{self.archive_file}\" -o\"#{destination}\" #{self.inner_directory} -y"
+      elsif self.inner_file
+        cmd = "\"#{PATH_TO_7Z}\" e \"#{self.archive_file}\" -so \"#{self.inner_file}\""
+      end
+      cmd = "cmd /c \"#{cmd}\""
+      $stderr.puts "cmd_extract=#{cmd}" if options[:verbose]
+      cmd
+    end
+
+    def all_inner_file?
+      self.inner_file.nil? && self.inner_directory.nil?
+    end
+
+  end
+end
+
+
+class Array
+  # Extracts options from a set of arguments. Removes and returns the last
+  # element in the array if it's a hash, otherwise returns a blank hash.
+  #
+  #   def options(*args)
+  #     args.extract_options!
+  #   end
+  #
+  #   options(1, 2)           # => {}
+  #   options(1, 2, :a => :b) # => {:a=>:b}
+  def extract_options!
+    last.is_a?(::Hash) ? pop : {}
+  end
+end

data/nbproject/private/private.properties

@@ -0,0 +1,3 @@
+file.reference.r7z-lib=C:\\AAG\\workspaces\\ruby\\Workspace\\r7z\\lib
+file.reference.r7z-test=C:\\AAG\\workspaces\\ruby\\Workspace\\r7z\\test
+platform.active=Ruby

data/nbproject/private/rake-d.txt

@@ -0,0 +1,34 @@
+ann=Alias to ann:announcement
+ann\:announcement=Create an announcement file
+ann\:email=Send an email announcement
+ann\:prereqs=
+announcement.txt=
+clean=Remove any temporary products.
+clobber=Remove any generated file. / Remove all build products
+default=
+doc=Alias to doc:rdoc
+doc/index.html=
+doc\:clobber=
+doc\:clobber_rdoc=Remove rdoc products
+doc\:clobber_ri=
+doc\:rdoc=Build the rdoc HTML Files
+doc\:rerdoc=Force a rebuild of the RDOC files
+doc\:ri=Generate ri locally for testing
+gem=Alias to gem:package
+gem\:cleanup=Cleanup the gem
+gem\:clobber=
+gem\:clobber_package=Remove package products
+gem\:debug=Show information about the gem
+gem\:install=Install the gem
+gem\:package=Build all the packages
+gem\:prereqs=
+gem\:reinstall=Reinstall the gem
+gem\:repackage=Force a rebuild of the package files
+gem\:spec=Write the gemspec
+gem\:uninstall=Uninstall the gem
+pkg=
+pkg/r7z-1.0.2=
+pkg/r7z-1.0.2.tgz=
+pkg/r7z-1.0.2/r7z-1.0.2.gem=
+test=Alias to test:run
+test\:run=Run tests for run

data/nbproject/project.properties

@@ -0,0 +1,8 @@
+file.reference.r7z-lib=lib
+file.reference.r7z-test=test
+javac.classpath=
+main.file=
+platform.active=Ruby
+source.encoding=UTF-8
+src.dir=${file.reference.r7z-lib}
+test.src.dir=${file.reference.r7z-test}

data/nbproject/project.xml

@@ -0,0 +1,15 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<project xmlns="http://www.netbeans.org/ns/project/1">
+    <type>org.netbeans.modules.ruby.rubyproject</type>
+    <configuration>
+        <data xmlns="http://www.netbeans.org/ns/ruby-project/1">
+            <name>R7z</name>
+            <source-roots>
+                <root id="src.dir"/>
+            </source-roots>
+            <test-roots>
+                <root id="test.src.dir" name="test"/>
+            </test-roots>
+        </data>
+    </configuration>
+</project>

data/spec/r7z_spec.rb

@@ -0,0 +1,7 @@
+
+require File.join(File.dirname(__FILE__), %w[spec_helper])
+
+describe R7z do
+end
+
+# EOF

data/spec/spec_helper.rb

@@ -0,0 +1,16 @@
+
+require File.expand_path(
+    File.join(File.dirname(__FILE__), %w[.. lib r7z]))
+
+Spec::Runner.configure do |config|
+  # == Mock Framework
+  #
+  # RSpec uses it's own mocking framework by default. If you prefer to
+  # use mocha, flexmock or RR, uncomment the appropriate line:
+  #
+  # config.mock_with :mocha
+  # config.mock_with :flexmock
+  # config.mock_with :rr
+end
+
+# EOF

data/tasks/ann.rake

@@ -0,0 +1,80 @@
+
+begin
+  require 'bones/smtp_tls'
+rescue LoadError
+  require 'net/smtp'
+end
+require 'time'
+
+namespace :ann do
+
+  # A prerequisites task that all other tasks depend upon
+  task :prereqs
+
+  file PROJ.ann.file do
+    ann = PROJ.ann
+    puts "Generating #{ann.file}"
+    File.open(ann.file,'w') do |fd|
+      fd.puts("#{PROJ.name} version #{PROJ.version}")
+      fd.puts("    by #{Array(PROJ.authors).first}") if PROJ.authors
+      fd.puts("    #{PROJ.url}") if PROJ.url.valid?
+      fd.puts("    (the \"#{PROJ.release_name}\" release)") if PROJ.release_name
+      fd.puts
+      fd.puts("== DESCRIPTION")
+      fd.puts
+      fd.puts(PROJ.description)
+      fd.puts
+      fd.puts(PROJ.changes.sub(%r/^.*$/, '== CHANGES'))
+      fd.puts
+      ann.paragraphs.each do |p|
+        fd.puts "== #{p.upcase}"
+        fd.puts
+        fd.puts paragraphs_of(PROJ.readme_file, p).join("\n\n")
+        fd.puts
+      end
+      fd.puts ann.text if ann.text
+    end
+  end
+
+  desc "Create an announcement file"
+  task :announcement => ['ann:prereqs', PROJ.ann.file]
+
+  desc "Send an email announcement"
+  task :email => ['ann:prereqs', PROJ.ann.file] do
+    ann = PROJ.ann
+    from = ann.email[:from] || Array(PROJ.authors).first || PROJ.email
+    to   = Array(ann.email[:to])
+
+    ### build a mail header for RFC 822
+    rfc822msg =  "From: #{from}\n"
+    rfc822msg << "To: #{to.join(',')}\n"
+    rfc822msg << "Subject: [ANN] #{PROJ.name} #{PROJ.version}"
+    rfc822msg << " (#{PROJ.release_name})" if PROJ.release_name
+    rfc822msg << "\n"
+    rfc822msg << "Date: #{Time.new.rfc822}\n"
+    rfc822msg << "Message-Id: "
+    rfc822msg << "<#{"%.8f" % Time.now.to_f}@#{ann.email[:domain]}>\n\n"
+    rfc822msg << File.read(ann.file)
+
+    params = [:server, :port, :domain, :acct, :passwd, :authtype].map do |key|
+      ann.email[key]
+    end
+
+    params[3] = PROJ.email if params[3].nil?
+
+    if params[4].nil?
+      STDOUT.write "Please enter your e-mail password (#{params[3]}): "
+      params[4] = STDIN.gets.chomp
+    end
+
+    ### send email
+    Net::SMTP.start(*params) {|smtp| smtp.sendmail(rfc822msg, from, to)}
+  end
+end  # namespace :ann
+
+desc 'Alias to ann:announcement'
+task :ann => 'ann:announcement'
+
+CLOBBER << PROJ.ann.file
+
+# EOF

data/tasks/bones.rake

@@ -0,0 +1,20 @@
+
+if HAVE_BONES
+
+namespace :bones do
+
+  desc 'Show the PROJ open struct'
+  task :debug do |t|
+    atr = if t.application.top_level_tasks.length == 2
+      t.application.top_level_tasks.pop
+    end
+
+    if atr then Bones::Debug.show_attr(PROJ, atr)
+    else Bones::Debug.show PROJ end
+  end
+
+end  # namespace :bones
+
+end  # HAVE_BONES
+
+# EOF