diff options
Diffstat (limited to 'target/linux/rdc/image/mkimg_sitecom.pl')
-rw-r--r-- | target/linux/rdc/image/mkimg_sitecom.pl | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/target/linux/rdc/image/mkimg_sitecom.pl b/target/linux/rdc/image/mkimg_sitecom.pl new file mode 100644 index 0000000000..4dd4a398cd --- /dev/null +++ b/target/linux/rdc/image/mkimg_sitecom.pl @@ -0,0 +1,17 @@ +#!/usr/bin/perl + +$bzimgsize = -s @ARGV[0]; +$padding = 4 - ($bzimgsize + 2) % 4; +if ($padding == 4) { + $padding = 0; } +open (bzimg, @ARGV[0]); +while (<bzimg>) { $i .= $_; } +$i .= "\0"x$padding; +$i .= pack "v", -(unpack "%v*", $i); +print "CSYS"; +print pack("V", length($i)); +print pack("V", 0); +#-s @ARGV[1] +print "WRRM"; +print pack("V", length($i)); +print $i; |