dstruct 0.0.1

data/lib/rex/registry/valuekey.rb

@@ -0,0 +1,67 @@
+# -*- coding: binary -*-
+module Rex
+module Registry
+
+class ValueKey
+
+  attr_accessor :name_length, :length_of_data, :data_offset, :full_path
+  attr_accessor :value_type, :readable_value_type, :name, :value
+
+  def initialize(hive, offset)
+    offset = offset + 4
+
+    vk_header = hive[offset, 2]
+
+    if vk_header !~ /vk/
+      puts "no vk at offset #{offset}"
+      return
+    end
+
+    @name_length = hive[offset+0x02, 2].unpack('C').first
+    @length_of_data = hive[offset+0x04, 4].unpack('V').first
+    @data_offset = hive[offset+ 0x08, 4].unpack('V').first
+    @value_type = hive[offset+0x0C, 4].unpack('C').first
+
+    if @value_type == 1
+      @readable_value_type = "Unicode character string"
+    elsif @value_type == 2
+      @readable_value_type = "Unicode string with %VAR% expanding"
+    elsif @value_type == 3
+      @readable_value_type = "Raw binary value"
+    elsif @value_type == 4
+      @readable_value_type = "Dword"
+    elsif @value_type == 7
+      @readable_value_type = "Multiple unicode strings separated with '\\x00'"
+    end
+
+    flag = hive[offset+0x10, 2].unpack('C').first
+
+    if flag == 0
+      @name = "Default"
+    else
+      @name = hive[offset+0x14, @name_length].to_s
+    end
+
+    @value = ValueKeyData.new(hive, @data_offset, @length_of_data, @value_type, offset)
+  end
+end
+
+class ValueKeyData
+
+  attr_accessor :data
+
+  def initialize(hive, offset, length, datatype, parent_offset)
+    offset = offset + 4
+
+    #If the data-size is lower than 5, the data-offset value is used to store
+    #the data itself!
+    if length < 5
+      @data = hive[parent_offset + 0x08, 4]
+    else
+      @data = hive[offset + 0x1000, length]
+    end
+  end
+end
+
+end
+end

data/lib/rex/registry/valuelist.rb

@@ -0,0 +1,29 @@
+# -*- coding: binary -*-
+require_relative "valuekey"
+
+module Rex
+module Registry
+
+class ValueList
+
+  attr_accessor :values
+
+  def initialize(hive, offset, number_of_values)
+    offset = offset + 4
+    inner_offset = 0
+
+    @values = []
+
+    1.upto(number_of_values) do |v|
+      valuekey_offset = hive[offset + inner_offset, 4]
+      next if !valuekey_offset
+
+      valuekey_offset = valuekey_offset.unpack('V').first
+      @values << ValueKey.new(hive, valuekey_offset + 0x1000)
+      inner_offset = inner_offset + 4
+    end
+  end
+end
+
+end
+end

data/lib/rex/ropbuilder.rb

@@ -0,0 +1,8 @@
+# -*- coding: binary -*-
+module Rex
+module RopBuilder
+
+require 'rex/ropbuilder/rop'
+require 'metasm/metasm'
+end
+end

data/lib/rex/ropbuilder/rop.rb

@@ -0,0 +1,271 @@
+# -*- coding: binary -*-
+require 'metasm'
+require 'rex/compat'
+require 'rex/ui/text/table'
+require 'rex/ui/text/output/stdio'
+require 'rex/ui/text/color'
+
+module Rex
+module RopBuilder
+
+class RopBase
+  def initialize()
+    @stdio = Rex::Ui::Text::Output::Stdio.new
+    @gadgets = []
+  end
+
+  def to_csv(gadgets = [])
+    if gadgets.empty? and @gadgets.nil? or @gadgets.empty?
+      @stdio.print_error("No gadgets collected to convert to CSV format.")
+      return
+    end
+
+    # allow the users to import gadget collections from multiple files
+    if @gadgets.empty? or @gadgets.nil?
+      @gadgets = gadgets
+    end
+
+    table = Rex::Ui::Text::Table.new(
+    'Header'    => "#{@file} ROP Gadgets",
+    'Indent'    => 1,
+    'Columns'   =>
+    [
+      "Address",
+      "Raw",
+      "Disassembly",
+    ])
+
+    @gadgets.each do |gadget|
+      table << [gadget[:address], gadget[:raw].unpack('H*')[0], gadget[:disasm].gsub(/\n/, ' | ')]
+    end
+
+    return table.to_csv
+  end
+
+  def import(file)
+    begin
+      data = File.new(file, 'r').read
+    rescue
+      @stdio.print_error("Error reading #{file}")
+      return []
+    end
+
+    if data.empty? or data.nil?
+      return []
+    end
+
+    data.gsub!(/\"/, '')
+    data.gsub!("Address,Raw,Disassembly\n", '')
+
+    @gadgets = []
+
+    data.each_line do |line|
+      addr, raw, disasm = line.split(',', 3)
+      if addr.nil? or raw.nil? or disasm.nil?
+        @stdio.print_error("Import file format corrupted")
+        return []
+      end
+      disasm.gsub!(/: /, ":\t")
+      disasm.gsub!(' | ', "\n")
+      raw = [raw].pack('H*')
+      @gadgets << {:file => file, :address => addr, :raw => raw, :disasm => disasm.chomp!}
+    end
+      @gadgets
+  end
+
+  def print_msg(msg, color=true)
+    if not @stdio
+      @stdio = Rex::Ui::Text::Output::Stdio.new
+    end
+
+    if color == true
+      @stdio.auto_color
+    else
+        @stdio.disable_color
+    end
+    @stdio.print_raw(@stdio.substitute_colors(msg))
+  end
+end
+
+class RopCollect < RopBase
+  def initialize(file="")
+    @stdio = Rex::Ui::Text::Output::Stdio.new
+    @file = file if not file.empty?
+    @bin = Metasm::AutoExe.decode_file(file) if not file.empty?
+    @disassembler = @bin.disassembler if not @bin.nil?
+    if @disassembler
+      @disassembler.cpu = Metasm::Ia32.new('386_common')
+    end
+    super()
+  end
+
+  def collect(depth, pattern)
+    matches = []
+    gadgets = []
+
+    # find matches by scanning for the pattern
+    matches = @disassembler.pattern_scan(pattern)
+    if @bin.kind_of?(Metasm::PE)
+      @bin.sections.each do |section|
+        next if section.characteristics.include? 'MEM_EXECUTE'
+        # delete matches if the address is outside the virtual address space
+        matches.delete_if do |ea|
+          va = section.virtaddr + @bin.optheader.image_base
+          ea >= va and ea < va + section.virtsize
+        end
+      end
+    elsif @bin.kind_of?(Metasm::ELF)
+      @bin.segments.each do |seg|
+        next if seg.flags.include? 'X'
+        matches.delete_if do |ea|
+          ea >= seg.vaddr and ea < seg.vaddr + seg.memsz
+        end
+      end
+    elsif @bin.kind_of?(Metasm::MachO)
+      @bin.segments.each do |seg|
+        next if seg.initprot.include? 'EXECUTE'
+        matches.delete_if do |ea|
+          ea >= seg.virtaddr and ea < seg.virtaddr + seg.filesize
+        end
+      end
+    end
+
+    gadgets = process_gadgets(matches, depth)
+    gadgets.each do |gadget|
+      @gadgets << gadget
+    end
+    gadgets
+  end
+
+  def pattern_search(pattern)
+    p = Regexp.new("(" + pattern + ")")
+    matches = []
+
+    @gadgets.each do |gadget|
+      disasm = ""
+      addrs = []
+
+      gadget[:disasm].each_line do |line|
+        addr, asm = line.split("\t", 2)
+        addrs << addr
+        disasm << asm
+      end
+
+      if gadget[:raw] =~ p or gadget[:disasm] =~ p or disasm =~ p
+        matches << {:gadget => gadget, :disasm => disasm, :addrs => addrs}
+      end
+    end
+    matches.each do |match|
+      @stdio.print_status("gadget with address: %bld%cya#{match[:gadget][:address]}%clr matched")
+      color_pattern(match[:gadget], match[:disasm], match[:addrs], p)
+    end
+    matches
+  end
+
+  def color_pattern(gadget, disasm, addrs, p)
+    idx = disasm.index(p)
+    if idx.nil?
+      print_msg(gadget[:disasm])
+      return
+    end
+
+    disasm = disasm.insert(idx, "%bld%grn")
+
+    asm = ""
+    cnt = 0
+    colors = false
+    disasm.each_line do |line|
+      # if we find this then we are in the matching area
+      if line.index(/\%bld\%grn/)
+        colors = true
+      end
+      asm << "%clr" + addrs[cnt] + "\t"
+
+      # color the remaining parts of the gadget
+      if colors and line.index("%bld%grn").nil?
+        asm << "%bld%grn" + line
+      else
+        asm << line
+      end
+
+      cnt += 1
+    end
+    asm << "%clr\n"
+    print_msg(asm)
+  end
+
+  def process_gadgets(rets, num)
+    ret     = {}
+    gadgets = []
+    tmp     = []
+    rets.each do |ea|
+      insn = @disassembler.disassemble_instruction(ea)
+      next if not insn
+
+      xtra = insn.bin_length
+
+      num.downto(0) do |x|
+        addr = ea - x
+
+        # get the disassembled instruction at this address
+        di = @disassembler.disassemble_instruction(addr)
+
+        # skip invalid instructions
+        next if not di
+        next if di.opcode.props[:setip]
+        next if di.opcode.props[:stopexec]
+
+        # get raw bytes
+        buf = @disassembler.read_raw_data(addr, x + xtra)
+
+
+        # make sure disassembling forward leads to our instruction
+        next if not ends_with_addr(buf, addr, ea)
+
+        dasm = ""
+        while addr <= ea
+          di = @disassembler.disassemble_instruction(addr)
+          dasm << ("0x%08x:\t" % addr) + di.instruction.to_s + "\n"
+          addr = addr + di.bin_length
+        end
+
+        if not tmp.include?(ea)
+          tmp << ea
+        else
+          next
+        end
+
+        # otherwise, we create a new tailchunk and add it to the list
+        ret = {:file => @file, :address => ("0x%08x" % (ea - x)), :raw => buf, :disasm => dasm}
+        gadgets << ret
+      end
+    end
+    gadgets
+  end
+
+  private
+  def ends_with_addr(raw, base, addr)
+    dasm2 = Metasm::Shellcode.decode(raw, @disassembler.cpu).disassembler
+    offset = 0
+    while ((di = dasm2.disassemble_instruction(offset)))
+      return true if (base + offset) == addr
+      return false if di.opcode.props[:setip]
+      return false if di.opcode.props[:stopexec]
+      offset = di.next_addr
+    end
+    false
+  end
+
+  def raw_instructions(raw)
+    insns = []
+    d2 = Metasm::Shellcode.decode(raw, @disassembler.cpu).disassembler
+    addr = 0
+    while ((di = d2.disassemble_instruction(addr)))
+      insns << di.instruction
+      addr = di.next_addr
+    end
+    insns
+  end
+end
+end
+end

data/lib/rex/script.rb

@@ -0,0 +1,42 @@
+# -*- coding: binary -*-
+
+module Rex
+
+###
+#
+# This class provides an easy interface for loading and executing ruby
+# scripts.
+#
+###
+module Script
+
+  class Completed < ::RuntimeError
+  end
+
+  #
+  # Reads the contents of the supplied file and exeutes them.
+  #
+  def self.execute_file(file, in_binding = nil)
+    str = ''
+    buf = ::File.read(file, ::File.size(file))
+    execute(buf, in_binding)
+  end
+
+  #
+  # Executes arbitrary ruby from the supplied string.
+  #
+  def self.execute(str, in_binding = nil)
+    begin
+      eval(str, in_binding)
+    rescue Completed
+    end
+  end
+
+end
+
+end
+
+require 'rex/script/base'
+require 'rex/script/shell'
+require 'rex/script/meterpreter'
+

data/lib/rex/script/base.rb

@@ -0,0 +1,61 @@
+# -*- coding: binary -*-
+module Rex
+module Script
+class Base
+
+  class OutputSink
+    def print(msg); end
+    def print_line(msg); end
+    def print_status(msg); end
+    def print_good(msg); end
+    def print_error(msg); end
+    def print_warning(msg); end
+  end
+
+  attr_accessor :client, :framework, :path, :error, :args
+  attr_accessor :session, :sink, :workspace
+
+  def initialize(client, path)
+    self.client    = client
+    self.framework = client.framework
+    self.path      = path
+    self.sink      = OutputSink.new
+
+    if(client.framework.db and client.framework.db.active)
+      self.workspace = client.framework.db.find_workspace( client.workspace.to_s ) || client.framework.db.workspace
+    end
+
+    # Convenience aliases
+    self.session   = self.client
+  end
+
+  def output
+    client.user_output || self.sink
+  end
+
+  def completed
+    raise Rex::Script::Completed
+  end
+
+  def run(args=[])
+    self.args = args = args.flatten
+    begin
+      eval(::File.read(self.path, ::File.size(self.path)), binding )
+    rescue ::Interrupt
+    rescue ::Rex::Script::Completed
+    rescue ::Exception => e
+      self.error = e
+      raise e
+    end
+  end
+
+  def print(*args);         output.print(*args);          end
+  def print_status(*args);  output.print_status(*args);   end
+  def print_error(*args);   output.print_error(*args);    end
+  def print_good(*args);    output.print_good(*args);     end
+  def print_line(*args);    output.print_line(*args);     end
+
+end
+end
+end
+