2014-02-19 19:13:08 +00:00
|
|
|
# This file is part of Metasm, the Ruby assembly manipulation suite
|
|
|
|
# Copyright (C) 2006-2009 Yoann GUILLOT
|
|
|
|
#
|
|
|
|
# Licence is LGPL, see LICENCE in the top-level directory
|
|
|
|
|
|
|
|
|
|
|
|
# metasm dasm plugin
|
|
|
|
# walks all disassembled instructions referencing an address
|
|
|
|
# if this address points a C string, show that in the instruction comments
|
|
|
|
# esp. useful after a disassemble_fast
|
|
|
|
|
|
|
|
def stringsxrefs(maxsz = 32)
|
2014-02-19 20:01:20 +00:00
|
|
|
@decoded.each_value { |di|
|
|
|
|
next if not di.kind_of?(DecodedInstruction)
|
|
|
|
di.instruction.args.grep(Expression).each { |e|
|
|
|
|
if str = decode_strz(e) and str.length >= 4 and str =~ /^[\x20-\x7e]*$/
|
|
|
|
di.add_comment str[0, maxsz].inspect
|
|
|
|
add_xref(normalize(e), Xref.new(:r, di.address, 1))
|
|
|
|
end
|
|
|
|
}
|
|
|
|
}
|
|
|
|
nil
|
2014-02-19 19:13:08 +00:00
|
|
|
end
|
|
|
|
|
|
|
|
if gui
|
2014-02-19 20:01:20 +00:00
|
|
|
stringsxrefs
|
|
|
|
gui.gui_update
|
2014-02-19 19:13:08 +00:00
|
|
|
end
|