ia64/linux-2.6.18-xen.hg

view scripts/profile2linkerlist.pl @ 562:66faefe721eb

pvSCSI backend driver

Signed-off-by: Tomonari Horikoshi <t.horikoshi@jp.fujitsu.com>
Signed-off-by: Jun Kamada <kama@jp.fujitsu.com>
author Keir Fraser <keir.fraser@citrix.com>
date Mon Jun 02 09:58:27 2008 +0100 (2008-06-02)
parents 831230e53067
children
line source
1 #!/usr/bin/perl
3 #
4 # Takes a (sorted) output of readprofile and turns it into a list suitable for
5 # linker scripts
6 #
7 # usage:
8 # readprofile | sort -rn | perl profile2linkerlist.pl > functionlist
9 #
11 while (<>) {
12 my $line = $_;
14 $_ =~ /\W*[0-9]+\W*([a-zA-Z\_0-9]+)\W*[0-9]+/;
16 if ( ($line =~ /unknown/) || ($line =~ /total/)) {
18 } else {
19 print "*(.text.$1)\n";
20 }
21 }