Skip to main content

Browse the archive

https://bitbucket.org/hudson/magic-lantern
03 October 2021, 11:27:36 UTC
Revision ac6e2143730d536d30adae13cf39807158e04f26 authored by a1ex on 06 June 2011, 20:09:25 UTC, committed by a1ex on 06 June 2011, 20:09:25 UTC 
Kelvin WB starts from the last preset (sunny, cloudy etc)
1 parent 907e870
Raw File
Tip revision: ac6e2143730d536d30adae13cf39807158e04f26 authored by a1ex on 06 June 2011, 20:09:25 UTC
Kelvin WB starts from the last preset (sunny, cloudy etc)
Tip revision: ac6e214
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