generate images for old CFE based boards like the Davolink DV201
SVN-Revision: 14264
This commit is contained in:
parent
d7cb033a04
commit
c2c0d74f67
2 changed files with 172 additions and 0 deletions
162
scripts/brcmImage.pl
Normal file
162
scripts/brcmImage.pl
Normal file
|
@ -0,0 +1,162 @@
|
|||
#!/usr/bin/perl
|
||||
#
|
||||
# Copyright (C) 2009 Henk Vergonet <Henk.Vergonet@gmail.com>
|
||||
#
|
||||
# This program is free software; you can redistribute it and/or modify
|
||||
# it under the terms of the GNU General Public License as published by
|
||||
# the Free Software Foundation; either version 2 of the License, or
|
||||
# (at your option) any later version.
|
||||
#
|
||||
# This program is distributed in the hope that it will be useful,
|
||||
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
# GNU General Public License for more details.
|
||||
#
|
||||
# You should have received a copy of the GNU General Public License
|
||||
# along with this program; if not, write to the Free Software
|
||||
# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
|
||||
#
|
||||
|
||||
# Description:
|
||||
# Replacement for brcmImagebuilder
|
||||
#
|
||||
# Disclaimer:
|
||||
# Use this software at your own risk.
|
||||
#
|
||||
# Changelog:
|
||||
# 2009-01-01 Henk.Vergonet at gmail.com
|
||||
#
|
||||
use strict;
|
||||
use Getopt::Std;
|
||||
use Compress::Zlib;
|
||||
|
||||
my $version = "0.1";
|
||||
my %arg = (
|
||||
o => 'bcm963xx_fs_kernel',
|
||||
b => 'OpenWrt',
|
||||
c => '6348',
|
||||
s => 64,
|
||||
f => 0xbfc00000,
|
||||
x => 0x00010000,
|
||||
a => 0x80010000,
|
||||
e => 0x80010000,
|
||||
i => 2,
|
||||
);
|
||||
my $prog = $0;
|
||||
$prog =~ s/^.*\///;
|
||||
getopts("r:k:o:lc:b:s:f:i:a:e:tpvh", \%arg);
|
||||
|
||||
die "usage: $prog ~opts~
|
||||
|
||||
-r <file> : input rootfs file
|
||||
-k <file> : input kernel file
|
||||
-o <file> : output image file, default $arg{o}
|
||||
-l : littleendian system, default ".($arg{l} ? 'yes' : 'no')."
|
||||
-c <chipid> : default $arg{c}
|
||||
-b <boardid> : default $arg{b}
|
||||
-s <size_kb> : erase sise flash, default $arg{s}
|
||||
-f <baseaddr> : flash base, default ".sprintf('0x%x', $arg{f})."
|
||||
-x <cfelen> : length of cfe, default ".sprintf('0x%x', $arg{x})."
|
||||
-i : 2=dual image, default $arg{i}
|
||||
|
||||
-a <loadaddr> : Kernel load address, default ".sprintf('0x%x', $arg{a})."
|
||||
-e <entryaddr>: Kernel entry address, default ".sprintf('0x%x', $arg{e})."
|
||||
-t : Prefix kernel with load,entry,size
|
||||
|
||||
-p : Add a 'gOtO' partition
|
||||
|
||||
-v : be more verbose
|
||||
-h : help, version $version
|
||||
|
||||
EXAMPLES:
|
||||
$prog -k kern -r rootfs
|
||||
" if $arg{h} || !$arg{k} || !$arg{r};
|
||||
|
||||
sub Read_Image
|
||||
{
|
||||
open my $fh, $_[0] or die "open $_[0]: $!";
|
||||
local $/; # Set input to "slurp" mode.
|
||||
my $buf = <$fh>;
|
||||
close $fh;
|
||||
return $buf;
|
||||
}
|
||||
|
||||
sub Padlen
|
||||
{
|
||||
my $p = $_[0] % $_[1];
|
||||
return ($p ? $_[1] - $p : 0);
|
||||
}
|
||||
|
||||
sub Pad
|
||||
{
|
||||
my ($buf, $off, $bs) = @_[0..2];
|
||||
$buf .= chr(255) x Padlen(length($buf) + $off, $bs);
|
||||
return $buf;
|
||||
}
|
||||
|
||||
sub bcmImage
|
||||
{
|
||||
my ($k, $f) = @_[0..1];
|
||||
my $tmp = $arg{x} + 0x100 + $arg{f};
|
||||
|
||||
# regular: rootfs+kernel
|
||||
my ($img, $fa, $ka) = ( $f.$k, $tmp, $tmp + length($f) );
|
||||
|
||||
# test: kernel+rootfs
|
||||
# my ($img, $fa, $ka) = ( $k.$f, $tmp + length($k), $tmp );
|
||||
|
||||
$fa = 0 unless length($f);
|
||||
|
||||
my $hdr = pack("a4a20a14a6a16a2a10a12a10a12a10a12a10a2a2a74Na16",
|
||||
'6',
|
||||
'LinuxInside',
|
||||
'ver. 2.0',
|
||||
$arg{c},
|
||||
$arg{b},
|
||||
($arg{l} ? '0' : '1'),
|
||||
length($img),
|
||||
'0',
|
||||
'0',
|
||||
$fa,
|
||||
length($f),
|
||||
$ka,
|
||||
length($k),
|
||||
($arg{i}==2 ? '1' : '0'),
|
||||
'', # if 1, the image is INACTIVE; if 0, active
|
||||
'',
|
||||
~crc32($k, crc32($f)),
|
||||
'');
|
||||
$hdr .= pack('Na16', ~crc32($hdr), '');
|
||||
|
||||
printf "kernel at 0x%x length 0x%x(%u)\n", $ka, length($k), length($k)
|
||||
if $arg{v};
|
||||
printf "rootfs at 0x%x length 0x%x(%u)\n", $fa, length($f), length($f)
|
||||
if $arg{v};
|
||||
|
||||
open(FO, ">$arg{o}");
|
||||
print FO $hdr;
|
||||
print FO $img;
|
||||
close FO;
|
||||
}
|
||||
|
||||
# MAIN
|
||||
|
||||
my $kern = Read_Image $arg{k};
|
||||
my $root = Read_Image $arg{r};
|
||||
|
||||
$kern = pack('NNN', $arg{a}, $arg{e}, length($kern)).$kern if $arg{t};
|
||||
|
||||
# specific fixup for the CFE that expects rootfs-kernel order
|
||||
if ($arg{p}) {
|
||||
$kern = Pad($kern, 0x10c, $arg{s} * 1024);
|
||||
my $dummy_root = pack('a4NN',
|
||||
'gOtO',
|
||||
length($kern)+12,
|
||||
length($root)+Padlen(length($root), $arg{s} * 1024)
|
||||
);
|
||||
$kern .= $root;
|
||||
$root = $dummy_root;
|
||||
}
|
||||
|
||||
bcmImage($kern, $root);
|
||||
|
|
@ -45,6 +45,14 @@ define Image/Build/RedBoot
|
|||
dd if=$(KDIR)/vmlinux.bin.gz of=$(BIN_DIR)/openwrt-$(1)-vmlinux.gz bs=65536 conv=sync
|
||||
endef
|
||||
|
||||
define Image/Build/CFEOLD
|
||||
$(TOPDIR)/scripts/brcmImage.pl -t -p \
|
||||
-b $(2) -c $(3) \
|
||||
-k $(KDIR)/vmlinux.lzma.cfe \
|
||||
-r $(KDIR)/root.$(1) \
|
||||
-o $(BIN_DIR)/openwrt-$(2)-$(1)-cfe.bin
|
||||
endef
|
||||
|
||||
define Build/Clean
|
||||
$(MAKE) -C lzma-loader clean
|
||||
endef
|
||||
|
@ -86,6 +94,8 @@ define Image/Build
|
|||
$(call Image/Build/CFE,$(1),96358VW,6358)
|
||||
# Comtrend 536
|
||||
$(call Image/Build/CFE,$(1),96348GW-11,6348)
|
||||
# Davolink DV201AMR
|
||||
$(call Image/Build/CFEOLD,$(1),DV201AMR,6348)
|
||||
# DG834GT
|
||||
$(call Image/Build/CFE,$(1),96348GW-10,6348)
|
||||
# Sagem F@ST2404
|
||||
|
|
Loading…
Reference in a new issue