diff options
| -rwxr-xr-x | examples/depmod.pl | 29 |
1 files changed, 16 insertions, 13 deletions
diff --git a/examples/depmod.pl b/examples/depmod.pl index b2bf547..ca2e8f7 100755 --- a/examples/depmod.pl +++ b/examples/depmod.pl @@ -22,6 +22,7 @@ my $kdir=""; my $basedir=""; my $kernel=""; my $kernelsyms=""; +my $symprefix=""; my $stdout=0; my $verbose=0; my $help=0; @@ -36,22 +37,24 @@ my $mod = {}; my $usage = <<TXT; $0 -b basedir { -k <vmlinux> | -F <System.map> } [options]... Where: - -h --help : Show this help screen - -b --basedir : Modules base directory (e.g /lib/modules/<2.x.y>) - -k --kernel : Kernel binary for the target (e.g. vmlinux) - -F --kernelsyms : Kernel symbol file (e.g. System.map) - -n --stdout : Write to stdout instead of <basedir>/modules.dep - -v --verbose : Print out lots of debugging stuff + -h --help : Show this help screen + -b --basedir : Modules base directory (e.g /lib/modules/<2.x.y>) + -k --kernel : Kernel binary for the target (e.g. vmlinux) + -F --kernelsyms : Kernel symbol file (e.g. System.map) + -n --stdout : Write to stdout instead of <basedir>/modules.dep + -v --verbose : Print out lots of debugging stuff + -P --symbol-prefix : Symbol prefix TXT # get command-line options GetOptions( - "help|h" => \$help, - "basedir|b=s" => \$basedir, - "kernel|k=s" => \$kernel, - "kernelsyms|F=s" => \$kernelsyms, - "stdout|n" => \$stdout, - "verbose|v" => \$verbose, + "help|h" => \$help, + "basedir|b=s" => \$basedir, + "kernel|k=s" => \$kernel, + "kernelsyms|F=s" => \$kernelsyms, + "stdout|n" => \$stdout, + "verbose|v" => \$verbose, + "symbol-prefix|P=s" => \$symprefix, ); die $usage if $help; @@ -182,7 +185,7 @@ sub build_ref_tables } # this takes makes sure modules with no dependencies get listed - push @{$dep->{$name}}, 'printk' unless $name eq 'vmlinux'; + push @{$dep->{$name}}, $symprefix . 'printk' unless $name eq 'vmlinux'; # gather the unresolved symbols foreach ( @$sym_ar ) { |