mirror of
https://github.com/brain-hackers/u-boot-brain
synced 2024-09-19 19:23:21 +09:00
13 lines
486 B
Perl
13 lines
486 B
Perl
|
#! /usr/bin/perl -w
|
||
|
|
use strict;
|
||
|
|
open(my $out, '>:raw', 'ivt.bin') or die "Unable to open: $!";
|
||
|
|
print $out pack("V", 0x412000D1); # Signature
|
||
|
|
print $out pack("V", 0x80800000); # Load Address (*load_address)
|
||
|
|
print $out pack("V", 0x0); # Reserved
|
||
|
|
print $out pack("V", 0x0); # DCD pointer
|
||
|
|
print $out pack("V", 0x0); # Boot Data
|
||
|
|
print $out pack("V", 0x80EEA000); # Self Pointer (*ivt)
|
||
|
|
print $out pack("V", 0x80EEA020); # CSF Pointer (*csf)
|
||
|
|
print $out pack("V", 0x0); # Reserved
|
||
|
|
close($out);
|