modernize backfire 10.03 so it can be operational again
[openwrt-10.03/.git] / target / linux / rdc / image / mkimg_sitecom.pl
old mode 100644 (file)
new mode 100755 (executable)
index 4dd4a39..cfd5e65
@@ -1,17 +1,11 @@
 #!/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;