| | 1 | # merge the code that initially executes out of flash with the RAM image\r |
| | 2 | \r |
| | 3 | ($flashFile, $ramFile) = @ARGV;\r |
| | 4 | \r |
| | 5 | open(FLASH, $flashFile) or die "$flashFile: $!\n";\r |
| | 6 | \r |
| | 7 | while(<FLASH>) {\r |
| | 8 | print if /^S3/;\r |
| | 9 | $EOF_record = $_ if /^S[789]/;\r |
| | 10 | }\r |
| | 11 | \r |
| | 12 | open(RAM, $ramFile) or die "$ramFile: $!\n";\r |
| | 13 | \r |
| | 14 | while(<RAM>) {\r |
| | 15 | if(/^S3(..)(........)(.*)([0-9a-fA-F]{2})/) {\r |
| | 16 | $addr = sprintf('%08X', hex($2) - 0x00200000 + 0x200);\r |
| | 17 | $line = "$1$addr$3";\r |
| | 18 | $checksum = 0;\r |
| | 19 | $checksum += $_ foreach map(hex, unpack("a2"x40, $line));\r |
| | 20 | print "S3$line", sprintf("%02X", ($checksum%256)^0xff ), "\n";\r |
| | 21 | }\r |
| | 22 | }\r |
| | 23 | print $EOF_record;\r |
projects / proxmark3-svn / blame_incremental