summaryrefslogtreecommitdiff
path: root/gpxe/src/util/mergerom.pl
diff options
context:
space:
mode:
authorH. Peter Anvin <hpa@zytor.com>2016-02-09 18:08:47 -0800
committerH. Peter Anvin <hpa@zytor.com>2016-02-09 18:08:47 -0800
commitf2f897a1762fab84d2905f32b1c15dd7b42abb56 (patch)
treea38f51d3f1fcbf44afddb4736d549c12eaf491be /gpxe/src/util/mergerom.pl
parent72d2959272b4616f17a97667e6dfa9d06bf109a3 (diff)
downloadsyslinux-f2f897a1762fab84d2905f32b1c15dd7b42abb56.tar.gz
gpxe: delete long since obsolete snapshot of gPXE
gPXE has been deprecated in favor of iPXE for many, many years now. It is much better than users get it directly from the iPXE project, since we should no longer need any special modifications for Syslinux use. Signed-off-by: H. Peter Anvin <hpa@zytor.com>
Diffstat (limited to 'gpxe/src/util/mergerom.pl')
-rwxr-xr-xgpxe/src/util/mergerom.pl98
1 files changed, 0 insertions, 98 deletions
diff --git a/gpxe/src/util/mergerom.pl b/gpxe/src/util/mergerom.pl
deleted file mode 100755
index f9c52502..00000000
--- a/gpxe/src/util/mergerom.pl
+++ /dev/null
@@ -1,98 +0,0 @@
-#!/usr/bin/perl -w
-#
-# Copyright (C) 2008 Michael Brown <mbrown@fensystems.co.uk>.
-#
-# 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 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.
-
-use strict;
-use warnings;
-
-use FindBin;
-use lib "$FindBin::Bin";
-use Option::ROM qw ( :all );
-
-sub merge_entry_points {
- my $baserom_entry = \shift;
- my $rom_entry = \shift;
- my $offset = shift;
-
- if ( $$rom_entry ) {
- my $old_entry = $$baserom_entry;
- $$baserom_entry = ( $offset + $$rom_entry );
- $$rom_entry = $old_entry;
- }
-}
-
-my @romfiles = @ARGV;
-my @roms = map { my $rom = new Option::ROM; $rom->load($_); $rom } @romfiles;
-
-my $baserom = shift @roms;
-my $offset = $baserom->length;
-
-foreach my $rom ( @roms ) {
-
- # Update base length
- $baserom->{length} += $rom->{length};
-
- # Merge initialisation entry point
- merge_entry_points ( $baserom->{init}, $rom->{init}, $offset );
-
- # Merge BOFM header
- merge_entry_points ( $baserom->{bofm_header}, $rom->{bofm_header}, $offset );
-
- # Update PCI header, if present in both
- my $baserom_pci = $baserom->pci_header;
- my $rom_pci = $rom->pci_header;
- if ( $baserom_pci && $rom_pci ) {
-
- # Update PCI lengths
- $baserom_pci->{image_length} += $rom_pci->{image_length};
- if ( exists $baserom_pci->{runtime_length} ) {
- if ( exists $rom_pci->{runtime_length} ) {
- $baserom_pci->{runtime_length} += $rom_pci->{runtime_length};
- } else {
- $baserom_pci->{runtime_length} += $rom_pci->{image_length};
- }
- }
-
- # Merge CLP entry point
- if ( exists ( $baserom_pci->{clp_entry} ) &&
- exists ( $rom_pci->{clp_entry} ) ) {
- merge_entry_points ( $baserom_pci->{clp_entry}, $rom_pci->{clp_entry},
- $offset );
- }
- }
-
- # Update PnP header, if present in both
- my $baserom_pnp = $baserom->pnp_header;
- my $rom_pnp = $rom->pnp_header;
- if ( $baserom_pnp && $rom_pnp ) {
- merge_entry_points ( $baserom_pnp->{bcv}, $rom_pnp->{bcv}, $offset );
- merge_entry_points ( $baserom_pnp->{bdv}, $rom_pnp->{bdv}, $offset );
- merge_entry_points ( $baserom_pnp->{bev}, $rom_pnp->{bev}, $offset );
- }
-
- # Fix checksum for this ROM segment
- $rom->fix_checksum();
-
- $offset += $rom->length;
-}
-
-$baserom->pnp_header->fix_checksum() if $baserom->pnp_header;
-$baserom->fix_checksum();
-$baserom->save ( "-" );
-foreach my $rom ( @roms ) {
- $rom->save ( "-" );
-}