HEX
Server: Apache
System: Linux 66-116-199-115.webhostbox.net 5.14.0-427.31.1.el9_4.x86_64 #1 SMP PREEMPT_DYNAMIC Thu Aug 15 14:47:52 EDT 2024 x86_64
User: blushinc (1003)
PHP: 8.2.29
Disabled: exec,passthru,shell_exec,system
Upload Files
File: //lib/grub/i386-pc/gmodule.pl
###
### Generate GDB commands, that load symbols for specified module,
### with proper section relocations. See .gdbinit
###
### $Id: gmodule.pl,v 1.2 2006/05/14 11:38:42 lkundrak Exp lkundrak $
### Lubomir Kundrak <[email protected]>
###

use strict;

while (<>) {
	my ($name, %sections) = split;

	print "add-symbol-file $name.module";

	open (READELF, "readelf -S $name.mod |") or die;
	while (<READELF>) {
		/\[\s*(\d+)\]\s+(\.\S+)/ or next;

		if ($2 eq '.text') {
			print " $sections{$1}";
			next;
		}

		print " -s $2 $sections{$1}"
			if ($sections{$1} ne '0x0' and $sections{$1} ne '');
	};
	close (READELF);
	print "\n";
}