exerb 6.0.1

data/lib/exerb/win32/pe_file.rb

@@ -0,0 +1,59 @@
+
+#==============================================================================#
+# $Id: pe_file.rb,v 1.5 2005/04/17 15:56:25 yuya Exp $
+#==============================================================================#
+
+require 'stringio'
+require 'exerb/win32/struct/image_dos_header'
+require 'exerb/win32/struct/image_nt_headers32'
+require 'exerb/win32/struct/image_section_header'
+
+#==============================================================================#
+
+module Exerb
+  module Win32
+  end # Win32
+end # Exerb
+
+#==============================================================================#
+
+class Exerb::Win32::PeFile
+
+  def initialize
+    @dos_header = nil
+    @nt_headers = nil
+    @sections   = nil
+  end
+
+  attr_accessor :dos_header, :nt_headers, :sections
+
+  def self.read(io)
+    return self.new.read(io)
+  end
+
+  def self.new_from_binary(bin)
+    return self.read(StringIO.new(bin))
+  end
+
+  def self.new_from_file(filepath)
+    return File.open(filepath, 'rb') { |file| self.read(file) }
+  end
+
+  def read(io)
+    @dos_header = Exerb::Win32::Struct::ImageDosHeader.read(io)
+    io.seek(-@dos_header.size, IO::SEEK_CUR)
+    io.seek(@dos_header.offset_to_new_header, IO::SEEK_CUR)
+    @nt_headers = Exerb::Win32::Struct::ImageNtHeaders32.read(io)
+    @sections   = (1..@nt_headers.file_header.number_of_sections).collect { Exerb::Win32::Struct::ImageSectionHeader.read(io) }
+
+    return self
+  end
+
+  def find_section(name)
+    return @sections.find { |section| section.name == name }
+  end
+
+end # Exerb::Win32::PeFile
+
+#==============================================================================#
+#==============================================================================#

data/lib/exerb/win32/resource_directory.rb

@@ -0,0 +1,105 @@
+
+#==============================================================================#
+# $Id: resource_directory.rb,v 1.7 2005/04/17 15:56:25 yuya Exp $
+#==============================================================================#
+
+require 'exerb/win32/struct/image_resource_directory'
+require 'exerb/win32/struct/image_resource_directory_entry'
+
+#==============================================================================#
+
+module Exerb
+  module Win32
+  end # Win32
+end # Exerb
+
+#==============================================================================#
+
+class Exerb::Win32::ResourceDirectory
+
+  def initialize(name)
+    @name    = name
+    @entries = []
+
+    yield(self) if block_given?
+  end
+
+  attr_accessor :name, :entries
+
+  def self.read(io, base, name = nil)
+    return self.new(nil).read(io, base, name)
+  end
+
+  def <<(entry)
+    @entries << entry
+  end
+
+  def serialize(elements, level)
+    elements[0][level] = [] if elements[0][level].nil?
+    elements[0][level] << self
+    @entries.each { |entry| elements[0][level] << Exerb::Win32::ResourceDirectory::Entry.new(entry) }
+    @entries.each { |entry| entry.serialize(elements, level + 1) }
+    return elements
+  end
+
+  def pack(table, reloc, base)
+    dir = Exerb::Win32::Struct::ImageResourceDirectory.new
+    dir.characteristics        = 0
+    dir.time_date_stamp        = 0
+    dir.major_version          = 0
+    dir.minor_version          = 0
+    dir.number_of_name_entries = 0
+    dir.number_of_id_entries   = @entries.size
+
+    return dir.pack
+  end
+
+  def read(io, base, name)
+    dir = Exerb::Win32::Struct::ImageResourceDirectory.read(io)
+
+    @name    = name
+    @entries = (1..(dir.number_of_name_entries + dir.number_of_id_entries)).collect {
+      Exerb::Win32::Struct::ImageResourceDirectoryEntry.read(io)
+    }.collect { |entry|
+      if entry.data_is_directory?
+        io.seek(entry.offset_to_directory)
+        Exerb::Win32::ResourceDirectory.read(io, base, entry.name)
+      else
+        io.seek(entry.offset_to_data)
+        Exerb::Win32::ResourceEntry.read(io, base, entry.name)
+      end
+    }
+
+    return self
+  end
+
+end # Exerb::Win32::ResourceDirectory
+
+#==============================================================================#
+
+class Exerb::Win32::ResourceDirectory::Entry
+
+  def initialize(entry)
+    @entry = entry
+  end
+
+  attr_accessor :entry
+
+  def pack(table, reloc, base)
+    entry = Exerb::Win32::Struct::ImageResourceDirectoryEntry.new
+
+    if @entry.kind_of?(Exerb::Win32::ResourceDirectory)
+      entry.name                = @entry.name
+      entry.offset_to_directory = table[@entry]
+    else
+      entry.name                = @entry.lang
+      entry.offset_to_data      = table[@entry]
+    end
+
+    return entry.pack
+  end
+
+end # Exerb::Win32::ResourceDirectory::Entry
+
+#==============================================================================#
+#==============================================================================#

data/lib/exerb/win32/resource_directory_root.rb

@@ -0,0 +1,67 @@
+
+#==============================================================================#
+# $Id: resource_directory_root.rb,v 1.6 2005/04/17 15:56:25 yuya Exp $
+#==============================================================================#
+
+require 'exerb/utility'
+require 'exerb/win32/resource_directory'
+
+#==============================================================================#
+
+module Exerb
+  module Win32
+  end # Win32
+end # Exerb
+
+#==============================================================================#
+
+class Exerb::Win32::ResourceDirectoryRoot < Exerb::Win32::ResourceDirectory
+
+  def initialize
+    super(0)
+  end
+
+  def self.read(io, base)
+    return self.new.read(io, base, 0)
+  end
+
+  def serial
+    return self.serialize([[], [], []], 0)
+  end
+
+  def pack_all(base, reloc_table = [])
+    table   = Hash.new(0)
+    reloc   = {}
+    address = 0
+    buffer  = ''
+
+    self.serial.each { |entries|
+      entries.flatten!
+      entries.compact!
+    }.each { |entries|
+      entries.each { |entry|
+        table[entry] = address
+        address += entry.pack(table, {}, base).size
+      }
+      address += (address % 16 == 0 ? 0 : 16 - address % 16)
+    }.each { |entries|
+      entries.each { |entry|
+        buffer << entry.pack(table, reloc, base)
+      }
+      buffer = Exerb::Utility.alignment16(buffer)
+    }
+
+    reloc.keys.each { |obj|
+      reloc[obj].each { |delta|
+        reloc_table << table[obj] + delta
+      }
+    }
+    reloc_table.sort!
+
+    return buffer
+  end
+
+end # Exerb::Win32::ResourceDirectoryRoot
+
+#==============================================================================#
+#==============================================================================#

data/lib/exerb/win32/resource_entry.rb

@@ -0,0 +1,98 @@
+
+#==============================================================================#
+# $Id: resource_entry.rb,v 1.8 2005/04/17 15:56:25 yuya Exp $
+#==============================================================================#
+
+require 'exerb/win32/struct/image_resource_data_entry'
+
+#==============================================================================#
+
+module Exerb
+  module Win32
+  end # Win32
+end # Exerb
+
+#==============================================================================#
+
+class Exerb::Win32::ResourceEntry
+
+  def initialize(entry_data, lang = nil)
+    @entry_data = Exerb::Win32::ResourceEntry::Data.new(entry_data)
+    @lang       = lang
+  end
+
+  attr_accessor :entry_data, :lang
+
+  def self.read(io, base, lang)
+    return self.new(nil).read(io, base, lang)
+  end
+
+  def serialize(elements, level)
+    elements[1][level] = [] if elements[1][level].nil?
+    elements[1][level] << self
+    @entry_data.serialize(elements, level + 1)
+    return elements
+  end
+
+  def pack(table, reloc, base)
+    data = Exerb::Win32::Struct::ImageResourceDataEntry.new
+    data.offset_to_data = table[@entry_data] + base
+    data.size_of_data   = @entry_data.size
+    data.code_page      = 0x0000
+    data.reserved       = 0x0000
+
+    reloc[self] ||= []
+    reloc[self] << 0
+
+    return data.pack
+  end
+
+  def read(io, base, lang)
+    data = Exerb::Win32::Struct::ImageResourceDataEntry.read(io)
+    io.seek(data.offset_to_data - base)
+
+    @entry_data = Exerb::Win32::ResourceEntry::Data.read(io, base, data.size_of_data)
+    @lang       = lang
+
+    return self
+  end
+
+end # Exerb::Win32::ResourceEntry
+
+#==============================================================================#
+
+class Exerb::Win32::ResourceEntry::Data
+
+  def initialize(data)
+    @data = data
+  end
+
+  attr_accessor :data
+
+  def self.read(io, base, size)
+    return self.new(nil).read(io, base, size)
+  end
+
+  def serialize(elements, level)
+    elements[2][level] = [] if elements[2][level].nil?
+    elements[2][level] << self
+    return elements
+  end
+
+  def pack(table, reloc, base)
+    return Exerb::Utility.alignment16(@data)
+  end
+
+  def size
+    return @data.size
+  end
+
+  def read(io, base, size)
+    @data = io.read(size)
+    return self
+  end
+
+end # Exerb::Win32::ResourceEntry::Data
+
+#==============================================================================#
+#==============================================================================#

data/lib/exerb/win32/struct/base.rb

@@ -0,0 +1,43 @@
+
+#==============================================================================#
+# $Id: base.rb,v 1.4 2005/04/17 15:56:25 yuya Exp $
+#==============================================================================#
+
+module Exerb
+  module Win32
+    module Struct
+    end # Struct
+  end # Win32
+end # Exerb
+
+#==============================================================================#
+
+class Exerb::Win32::Struct::Base
+
+  def initialize
+    @position = nil
+  end
+
+  attr_reader :position
+
+  def self.read(io)
+    return self.new.read(io)
+  end
+
+  def size
+    return self.pack.size
+  end
+
+  def read(io)
+    @position = io.pos
+    return self.unpack(io.read(self.size))
+  end
+
+  def update(str)
+    str[@position, self.size] = self.pack
+  end
+
+end # Exerb::Win32::Struct::Base
+
+#==============================================================================#
+#==============================================================================#

data/lib/exerb/win32/struct/icon_dir_entry.rb

@@ -0,0 +1,83 @@
+
+#==============================================================================#
+# $Id: icon_dir_entry.rb,v 1.5 2010/06/26 03:13:36 arton Exp $
+#==============================================================================#
+
+require 'exerb/win32/struct/base'
+
+#==============================================================================#
+
+module Exerb
+  module Win32
+    module Struct
+    end # Struct
+  end # Win32
+end # Exerb
+
+#==============================================================================#
+
+class Exerb::Win32::Struct::IconDirEntry < Exerb::Win32::Struct::Base
+
+  FORMAT = 'CCCCSSLL'
+
+  def initialize
+    @width        = 0
+    @height       = 0
+    @color_count  = 0
+    @reserved     = 0
+    @planes       = 0
+    @bit_count    = 0
+    @bytes_in_res = 0
+    @image_offset = 0
+  end
+
+  attr_accessor :width, :height, :color_count, :reserved, :planes, :bit_count, :bytes_in_res, :image_offset
+
+  def pack
+    return [@width, @height, @color_count, @reserved, @planes, @bit_count, @bytes_in_res, @image_offset].pack(FORMAT)
+  end
+
+  def unpack(bin)
+    @width, @height, @color_count, @reserved, @planes, @bit_count, @bytes_in_res, @image_offset = bin.unpack(FORMAT)
+    return self
+  end
+
+end # Exerb::Win32::Struct::IconDirEntry
+
+#==============================================================================#
+
+class Exerb::Win32::Struct::IconImageHeader < Exerb::Win32::Struct::Base
+
+  FORMAT = 'LllSSLLllLL'
+
+  def initialize
+    # This struct is identical to BITMAPINFOHEADER.
+    
+    @_size           = 0
+    @width           = 0
+    @height          = 0
+    @planes          = 0
+    @bit_count       = 0
+    @compression     = 0
+    @size_image      = 0
+    @xpels_per_meter = 0
+    @ypels_per_meter = 0
+    @clr_used        = 0
+    @clr_important   = 0
+  end
+
+  attr_accessor :_size, :width, :height, :planes, :bit_count, :compression, :size_image, :xpels_per_meter, :ypels_per_meter, :clr_used, :clr_important
+
+  def pack
+    return [@_size, @width, @height, @planes, @bit_count, @compression, @size_image, @xpels_per_meter, @ypels_per_meter, @clr_used, @clr_important].pack(FORMAT)
+  end
+
+  def unpack(bin)
+    @_size, @width, @height, @planes, @bit_count, @compression, @size_image, @xpels_per_meter, @ypels_per_meter, @clr_used, @clr_important = bin.unpack(FORMAT)
+    return self
+  end
+
+end # Exerb::Win32::Struct::IconImageHeader
+
+#==============================================================================#
+#==============================================================================#