ruby-msg 1.2.17.3 → 1.3.1

data/lib/ole/types.rb

@@ -1,36 +0,0 @@
-require 'iconv'
-require 'date'
-
-require 'ole/base'
-
-module Ole # :nodoc:
-	# FIXME
-	module Types
-		FROM_UTF16 = Iconv.new 'utf-8', 'utf-16le'
-		TO_UTF16   = Iconv.new 'utf-16le', 'utf-8'
-		EPOCH = DateTime.parse '1601-01-01'
-		# Create a +DateTime+ object from a struct +FILETIME+
-		# (http://msdn2.microsoft.com/en-us/library/ms724284.aspx).
-		#
-		# Converts +str+ to two 32 bit time values, comprising the high and low 32 bits of
-		# the 100's of nanoseconds since 1st january 1601 (Epoch).
-		def self.load_time str
-			low, high = str.unpack 'L2'
-			# we ignore these, without even warning about it
-			return nil if low == 0 and high == 0
-			time = EPOCH + (high * (1 << 32) + low) * 1e-7 / 86400 rescue return
-			# extra sanity check...
-			unless (1800...2100) === time.year
-				Log.warn "ignoring unlikely time value #{time.to_s}"
-				return nil
-			end
-			time
-		end
-
-		# Convert a binary guid into a plain string (will move to proper class later).
-		def self.load_guid str
-			"{%08x-%04x-%04x-%02x%02x-#{'%02x' * 6}}" % str.unpack('L S S CC C6')
-		end
-	end
-end
-

data/lib/support.rb

@@ -1,51 +0,0 @@
-
-# 
-# A file with general support functions used by most files in the project.
-# 
-
-require 'logger'
-
-class File # :nodoc:
-	# for consistency with StringIO and others. makes more sense than forcing
-	# them to provide a #stat
-	def size
-		stat.size
-	end
-end
-
-class Symbol # :nodoc:
-	def to_proc
-		proc { |a| a.send self }
-	end
-end
-
-module Enumerable # :nodoc:
-	# 1.9 backport
-	def group_by
-		hash = Hash.new { |hash, key| hash[key] = [] }
-		each { |item| hash[yield(item)] << item }
-		hash
-	end
-
-	def sum initial=0
-		inject(initial) { |a, b| a + b }
-	end
-end
-
-class Logger # :nodoc:
-	# A helper method for creating <tt>Logger</tt>s which produce call stack
-	# in their output
-	def self.new_with_callstack logdev=STDERR
-		log = Logger.new logdev
-		log.level = WARN
-		log.formatter = proc do |severity, time, progname, msg|
-			# find where we were called from, in our code
-			callstack = caller.dup
-			callstack.shift while callstack.first =~ /\/logger\.rb:\d+:in/
-			from = callstack.first.sub(/:in `(.*?)'/, ":\\1")
-			"[%s %s]\n%-7s%s\n" % [time.strftime('%H:%M:%S'), from, severity, msg.to_s]
-		end
-		log
-	end
-end
-

data/test/test_storage.rb

@@ -1,139 +0,0 @@
-#! /usr/bin/ruby -w
-
-TEST_DIR = File.dirname __FILE__
-$: << "#{TEST_DIR}/../lib"
-
-require 'test/unit'
-require 'ole/storage'
-require 'digest/sha1'
-require 'stringio'
-
-#
-# = TODO
-#
-# These tests could be a lot more complete.
-#
-
-class TestRangesIO < Test::Unit::TestCase
-	def setup
-		# why not :) ?
-		# repeats too
-		ranges = [100..200, 0..10, 100..150]
-		@io = RangesIO.new open("#{TEST_DIR}/test_storage.rb"), ranges, :close_parent => true
-	end
-
-	def teardown
-		@io.close
-	end
-
-	def test_basic
-		assert_equal 160, @io.size
-		# this will map to the start of the file:
-		@io.pos = 100
-		assert_equal '#! /usr/bi', @io.read(10)
-	end
-
-	# should test range_and_offset specifically
-
-	def test_reading
-		# test selection of initial range, offset within that range
-		pos = 100
-		@io.seek pos
-		# test advancing of pos properly, by...
-		chunked = (0...10).map { @io.read 10 }.join
-		# given the file is 160 long:
-		assert_equal 60, chunked.length
-		@io.seek pos
-		# comparing with a flat read
-		assert_equal chunked, @io.read(60)
-	end
-end
-
-# should test resizeable and migrateable IO.
-
-class TestStorageRead < Test::Unit::TestCase
-	def setup
-		@ole = Ole::Storage.open "#{TEST_DIR}/test_word_6.doc", 'rb'
-	end
-
-	def teardown
-		@ole.close
-	end
-
-	def test_header
-		# should have further header tests, testing the validation etc.
-		assert_equal 17,  @ole.header.to_a.length
-		assert_equal 117, @ole.header.dirent_start
-		assert_equal 1,   @ole.header.num_bat
-		assert_equal 1,   @ole.header.num_sbat
-		assert_equal 0,   @ole.header.num_mbat
-	end
-
-	def test_fat
-		# the fat block has all the numbers from 5..118 bar 117
-		bbat_table = [112] + ((5..118).to_a - [112, 117])
-		assert_equal bbat_table, @ole.bbat.table.reject { |i| i >= (1 << 32) - 3 }, 'bbat'
-		sbat_table = (1..43).to_a - [2, 3]
-		assert_equal sbat_table, @ole.sbat.table.reject { |i| i >= (1 << 32) - 3 }, 'sbat'
-	end
-
-	def test_directories
-		assert_equal 5, @ole.dirents.length, 'have all directories'
-		# a more complicated one would be good for this
-		assert_equal 4, @ole.root.children.length, 'properly nested directories'
-	end
-
-	def test_utf16_conversion
-		assert_equal 'Root Entry', @ole.root.name
-		assert_equal 'WordDocument', @ole.root.children[2].name
-	end
-
-	def test_data
-		# test the ole storage type
-		type = 'Microsoft Word 6.0-Dokument'
-		assert_equal type, @ole.root["\001CompObj"].read[/^.{32}([^\x00]+)/m, 1]
-		# i was actually not loading data correctly before, so carefully check everything here
-		hashes = [-482597081, 285782478, 134862598, -863988921]
-		assert_equal hashes, @ole.root.children.map { |child| child.read.hash }
-	end
-end
-
-class TestStorageWrite < Test::Unit::TestCase
-	def sha1 str
-		Digest::SHA1.hexdigest str
-	end
-	
-	# FIXME
-	# don't really want to lock down the actual internal api's yet. this will just
-	# ensure for the time being that #flush continues to work properly. need a host
-	# of checks involving writes that resize their file bigger/smaller, that resize
-	# the bats to more blocks, that resizes the sb_blocks, that has migration etc.
-	def test_write_hash
-		io = StringIO.open File.read("#{TEST_DIR}/test_word_6.doc")
-		assert_equal '9974e354def8471225f548f82b8d81c701221af7', sha1(io.string)
-		Ole::Storage.open(io) { }
-		assert_equal 'efa8cfaf833b30b1d1d9381771ddaafdfc95305c', sha1(io.string)
-		# add a repack test here
-		Ole::Storage.open io, &:repack
-		assert_equal 'c8bb9ccacf0aaad33677e1b2a661ee6e66a48b5a', sha1(io.string)
-	end
-
-	def test_plain_repack
-		io = StringIO.open File.read("#{TEST_DIR}/test_word_6.doc")
-		assert_equal '9974e354def8471225f548f82b8d81c701221af7', sha1(io.string)
-		Ole::Storage.open io, &:repack
-		# note equivalence to the above flush, repack, flush
-		assert_equal 'c8bb9ccacf0aaad33677e1b2a661ee6e66a48b5a', sha1(io.string)
-	end
-
-	def test_create_from_scratch_hash
-		io = StringIO.new
-		Ole::Storage.new(io) { }
-		assert_equal '6bb9d6c1cdf1656375e30991948d70c5fff63d57', sha1(io.string)
-		# more repack test, note invariance
-		Ole::Storage.open io, &:repack
-		assert_equal '6bb9d6c1cdf1656375e30991948d70c5fff63d57', sha1(io.string)
-	end
-end
-
-