Root/target/linux/x86/image/mkimg_sitecom.pl

1#!/usr/bin/perl
2
3open (bzimg, @ARGV[0]);
4while (<bzimg>) { $i .= $_; }
5$i .= pack "v", -(unpack "%v*", $i);
6print "CSYS";
7print pack("V", length($i));
8print pack("V", 0);
9print "WRRM";
10print pack("V", length($i));
11print $i;
12

Archive Download this file



interactive