aboutsummaryrefslogtreecommitdiffstats
path: root/target/linux/rdc/image/mkimg_sitecom.pl
diff options
context:
space:
mode:
Diffstat (limited to 'target/linux/rdc/image/mkimg_sitecom.pl')
-rw-r--r--target/linux/rdc/image/mkimg_sitecom.pl17
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;