irpack 0.1.0 → 0.2.1

data/test/test_irpack.rb

@@ -0,0 +1,75 @@
+# coding: utf-8
+=begin
+Copyright (c) 2011 Ryuichi Sakamoto.
+
+This software is provided 'as-is', without any express or implied
+warranty. In no event will the authors be held liable for any damages
+arising from the use of this software.
+
+Permission is granted to anyone to use this software for any purpose,
+including commercial applications, and to alter it and redistribute it
+freely, subject to the following restrictions:
+
+    1. The origin of this software must not be misrepresented; you must not
+    claim that you wrote the original software. If you use this software
+    in a product, an acknowledgment in the product documentation would be
+    appreciated but is not required.
+
+    2. Altered source versions must be plainly marked as such, and must not be
+    misrepresented as being the original software.
+
+    3. This notice may not be removed or altered from any source
+    distribution.
+=end
+
+require 'test/unit'
+require 'irpack'
+require 'utils'
+
+class TC_IRPack < Test::Unit::TestCase
+  include Utils
+  def test_path_to_module_name
+    assert_equal('IR',         IRPack.path_to_module_name('c:/Program Files/IronRuby1.1/bin/ir.exe'))
+    assert_equal('IR',         IRPack.path_to_module_name('c:\\Program Files\\IronRuby1.1\\bin\\ir.exe'))
+    assert_equal('M1234',      IRPack.path_to_module_name('1234'))
+    assert_equal('M__FOO_BAR', IRPack.path_to_module_name('__foo_bar'))
+    assert_equal('FOOBAR',     IRPack.path_to_module_name('FooBar'))
+    assert_equal('FOO_BAR',    IRPack.path_to_module_name('Foo$Bar'))
+    assert_equal('M_____',     IRPack.path_to_module_name('モジュール'))
+  end
+
+  def test_ironruby_assemblies
+    locations = IRPack.ironruby_assemblies
+    locations.each do |loc|
+      assert(File.exist?(loc))
+      assert(IRPack::IronRubyAssemblies.include?(File.basename(loc, '.dll')))
+    end
+  end
+
+  def test_pack
+    entry = Tempfile.open(File.basename(__FILE__)) do |f|
+      f.write <<-RB
+      $: << File.dirname(__FILE__)
+      require 'hello'
+      hello
+      RB
+      f.path
+    end
+    hello = Tempfile.open(File.basename(__FILE__)) do |f|
+      f.write <<-RB
+      def hello
+        puts 'Hello World!'
+      end
+      RB
+      f.path
+    end
+    files = {
+      entry => 'entry.rb',
+      hello => 'hello.rb',
+    }
+    outfile = tempfilename('.exe')
+    assert_equal(outfile, IRPack.pack(outfile, files, 'entry.rb'))
+    assert_equal('Hello World!', `#{outfile}`.chomp)
+  end
+end
+

data/test/test_missing.rb

@@ -0,0 +1,37 @@
+=begin
+Copyright (c) 2011 Ryuichi Sakamoto.
+
+This software is provided 'as-is', without any express or implied
+warranty. In no event will the authors be held liable for any damages
+arising from the use of this software.
+
+Permission is granted to anyone to use this software for any purpose,
+including commercial applications, and to alter it and redistribute it
+freely, subject to the following restrictions:
+
+    1. The origin of this software must not be misrepresented; you must not
+    claim that you wrote the original software. If you use this software
+    in a product, an acknowledgment in the product documentation would be
+    appreciated but is not required.
+
+    2. Altered source versions must be plainly marked as such, and must not be
+    misrepresented as being the original software.
+
+    3. This notice may not be removed or altered from any source
+    distribution.
+=end
+
+require 'test/unit'
+require 'irpack/missing'
+require 'tmpdir'
+
+class TC_Missing < Test::Unit::TestCase
+  def test_mktmpdir
+    assert_nothing_raised do
+      Dir.mktmpdir('prefix') do |path|
+        assert_match(/prefix/, path)
+      end
+    end
+  end
+end
+

data/test/test_packager.rb

@@ -1,29 +1,45 @@
+=begin
+Copyright (c) 2011 Ryuichi Sakamoto.
 
-$:.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
-require 'test/unit'
-require 'tempfile'
-require 'tmpdir'
-require 'fileutils'
-require 'irpack'
+This software is provided 'as-is', without any express or implied
+warranty. In no event will the authors be held liable for any damages
+arising from the use of this software.
+
+Permission is granted to anyone to use this software for any purpose,
+including commercial applications, and to alter it and redistribute it
+freely, subject to the following restrictions:
+
+    1. The origin of this software must not be misrepresented; you must not
+    claim that you wrote the original software. If you use this software
+    in a product, an acknowledgment in the product documentation would be
+    appreciated but is not required.
+
+    2. Altered source versions must be plainly marked as such, and must not be
+    misrepresented as being the original software.
+
+    3. This notice may not be removed or altered from any source
+    distribution.
+=end
 
+require 'test/unit'
+require 'irpack/packager'
 require 'WindowsBase'
-include System
-include System::IO
-include System::IO::Packaging
+require 'utils'
 
 class TC_Packager < Test::Unit::TestCase
+  include Utils
+
   SrcFiles = {
     File.join(File.dirname(__FILE__), 'test_packager.rb') => 'foo.rb',
     File.join(File.dirname(__FILE__), 'test_cscompiler.rb') => 'bar.rb',
   }
 
   def test_pack
-    target = Tempfile.new(File.basename(__FILE__))
-    target.close
-    IRPack::Packager.pack(SrcFiles, target.path)
-    package = Package.open(target.path, FileMode.open)
+    package_file = tempfilename
+    IRPack::Packager.pack(SrcFiles, package_file)
+    package = System::IO::Packaging::Package.open(package_file, System::IO::FileMode.open)
     SrcFiles.each do |src, dest|
-      uri = Uri.new(File.join('/', dest), UriKind.relative)
+      uri = System::Uri.new(File.join('/', dest), System::UriKind.relative)
       assert(package.part_exists(uri))
       stream = package.get_part(uri).get_stream
       bytes = System::Array[System::Byte].new(stream.length)
@@ -31,26 +47,5 @@ class TC_Packager < Test::Unit::TestCase
       assert_equal(File.open(src, 'rb'){|f|f.read}, bytes.to_a.pack('C*'))
     end
   end
-
-  def test_pack_dir
-    Dir.mktmpdir do |src_path|
-      SrcFiles.each do |src, dest|
-        FileUtils.mkdir_p(File.join(src_path, File.dirname(dest)))
-        FileUtils.copy(src, File.join(src_path, dest))
-      end
-      target = Tempfile.new(File.basename(__FILE__))
-      target.close
-      IRPack::Packager.pack_dir(src_path, target.path)
-      package = Package.open(target.path, FileMode.open)
-      SrcFiles.each do |src, dest|
-        uri = Uri.new(File.join('/', dest), UriKind.relative)
-        assert(package.part_exists(uri))
-        stream = package.get_part(uri).get_stream
-        bytes = System::Array[System::Byte].new(stream.length)
-        stream.read(bytes, 0, stream.length)
-        assert_equal(File.open(src, 'rb'){|f|f.read}, bytes.to_a.pack('C*'))
-      end
-    end
-  end
 end
 

data/test/utils.rb

@@ -0,0 +1,79 @@
+=begin
+Copyright (c) 2011 Ryuichi Sakamoto.
+
+This software is provided 'as-is', without any express or implied
+warranty. In no event will the authors be held liable for any damages
+arising from the use of this software.
+
+Permission is granted to anyone to use this software for any purpose,
+including commercial applications, and to alter it and redistribute it
+freely, subject to the following restrictions:
+
+    1. The origin of this software must not be misrepresented; you must not
+    claim that you wrote the original software. If you use this software
+    in a product, an acknowledgment in the product documentation would be
+    appreciated but is not required.
+
+    2. Altered source versions must be plainly marked as such, and must not be
+    misrepresented as being the original software.
+
+    3. This notice may not be removed or altered from any source
+    distribution.
+=end
+
+require 'WindowsBase'
+require 'tempfile'
+
+module Utils
+  module_function
+  def create_package(filename_or_contents, contents=nil, &block)
+    if contents then
+      package = System::IO::Packaging::Package.open(
+        filename_or_contents,
+        System::IO::FileMode.create)
+    else
+      package = System::IO::Packaging::Package.open(
+        System::IO::MemoryStream.new,
+        System::IO::FileMode.create)
+      contents = filename_or_contents
+    end
+    contents.each do |path, content|
+      uri = System::IO::Packaging::PackUriHelper.create_part_uri(System::Uri.new(path, System::UriKind.relative))
+      part = package.create_part(
+        uri,
+        'application/octet-stream',
+        System::IO::Packaging::CompressionOption.not_compressed)
+      stream = part.get_stream
+      stream.write(content, 0, content.bytesize)
+      stream.close
+      package.create_relationship(
+        uri,
+        System::IO::Packaging::TargetMode.internal,
+        'http://schemas.openxmlformats.org/package/2006/relationships/meta data/core-properties')
+    end
+    block.call(package) if block
+    package.close
+    package
+  end
+
+  def tempfilename(suffix='')
+    tmp = Tempfile.open([File.basename($0), suffix])
+    tmp.close
+    $tempfiles ||= []
+    $tempfiles << tmp
+    tmp.path
+  end
+
+  IronRubyAssemblies = %w[
+    Microsoft.Dynamic
+    Microsoft.Scripting
+    Microsoft.Scripting.Core
+    IronRuby
+    IronRuby.Libraries
+    IronRuby.Libraries.Yaml
+  ]
+  def ironruby_assemblies
+    System::AppDomain.current_domain.get_assemblies.select {|asm| IronRubyAssemblies.include?(asm.get_name.name) }.collect {|asm| asm.location }
+  end
+end
+

metadata

@@ -1,12 +1,8 @@
 --- !ruby/object:Gem::Specification 
 name: irpack
 version: !ruby/object:Gem::Version 
-  prerelease: false
-  segments: 
-  - 0
-  - 1
-  - 0
-  version: 0.1.0
+  prerelease: 
+  version: 0.2.1
 platform: ruby
 authors: 
 - kumaryu
@@ -14,8 +10,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2010-09-11 00:00:00 +09:00
-default_executable: 
+date: 2011-07-15 00:00:00 Z
 dependencies: []
 
 description: |
@@ -31,10 +26,21 @@ extra_rdoc_files: []
 
 files: 
 - bin/irpack
+- lib/irpack/application.rb
+- lib/irpack/bootloader.rb
+- lib/irpack/cscompiler.rb
+- lib/irpack/entrypoint.rb
+- lib/irpack/missing.rb
+- lib/irpack/packager.rb
 - lib/irpack.rb
+- test/test_application.rb
+- test/test_bootloader.rb
 - test/test_cscompiler.rb
+- test/test_entrypoint.rb
+- test/test_irpack.rb
+- test/test_missing.rb
 - test/test_packager.rb
-has_rdoc: true
+- test/utils.rb
 homepage: http://github.com/kumaryu/irpack
 licenses: []
 
@@ -48,21 +54,17 @@ required_ruby_version: !ruby/object:Gem::Requirement
   requirements: 
   - - ">="
     - !ruby/object:Gem::Version 
-      segments: 
-      - 0
       version: "0"
 required_rubygems_version: !ruby/object:Gem::Requirement 
   none: false
   requirements: 
   - - ">="
     - !ruby/object:Gem::Version 
-      segments: 
-      - 0
       version: "0"
 requirements: 
 - none
 rubyforge_project: 
-rubygems_version: 1.3.7
+rubygems_version: 1.8.5
 signing_key: 
 specification_version: 3
 summary: Generate a standalone executable file from IronRuby scripts.