https://bitbucket.org/hudson/magic-lantern
Revision 708c6c805f40a7933f1c53ab30be6ad44e0ebb6e authored by hudson@kremvax on 04 June 2009, 06:55:55 UTC, committed by hudson@kremvax on 04 June 2009, 06:55:55 UTC
1 parent 0632a1b
Raw File
Tip revision: 708c6c805f40a7933f1c53ab30be6ad44e0ebb6e authored by hudson@kremvax on 04 June 2009, 06:55:55 UTC
Confirmed mostly functional on 1.1.0; meters are not active during recording?
Tip revision: 708c6c8
map2idc
#!/usr/bin/perl
use warnings;
use strict;

my $base = 0xFFF00000;

print <<"";
static main() {


#
# Parse the symbol dump from IDA Pro and output
# code into the .S file to define stubs for each of the
# entities.
#
while( <> )
{
	my ($addr,$name) = /^\s*0001:([0-9A-Fa-f]+)\s+([^\s]+)\s*$/
                       	or next;
	$addr = hex($addr);
	$addr += $base;

	printf "MakeNameEx( 0x%08x, \"%s\", 0x2 );\n",
		$addr,
		$name,
	;
}


print <<"";
}

__END__
back to top