From 37ac7a666fbb28f50cdd64e1df1428c266f60629 Mon Sep 17 00:00:00 2001 From: Daniel Wyatt Date: Wed, 15 Aug 2012 12:50:01 +0100 Subject: [util] Allow for CALL NEAR in the option ROM initialisation entry point Option::ROM currently understands only JMP NEAR and JMP SHORT instructions in the initialisation entry point. At least one Broadcom option ROM has been observed to use a CALL NEAR instruction. Signed-off-by: Michael Brown --- src/util/Option/ROM.pm | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'src/util') diff --git a/src/util/Option/ROM.pm b/src/util/Option/ROM.pm index 82d65426..bf704cad 100644 --- a/src/util/Option/ROM.pm +++ b/src/util/Option/ROM.pm @@ -180,6 +180,7 @@ our %EXPORT_TAGS = ( all => [ @EXPORT_OK ] ); use constant JMP_SHORT => 0xeb; use constant JMP_NEAR => 0xe9; +use constant CALL_NEAR => 0xe8; sub pack_init { my $dest = shift; @@ -203,6 +204,9 @@ sub unpack_init { } elsif ( $jump == JMP_NEAR ) { my $offset = unpack ( "xS", $instr ); return ( $offset + 6 ); + } elsif ( $jump == CALL_NEAR ) { + my $offset = unpack ( "xS", $instr ); + return ( $offset + 6 ); } elsif ( $jump == 0 ) { return 0; } else { -- cgit v1.2.3-55-g7522