]> bbs.cooldavid.org Git - net-next-2.6.git/commitdiff
fastboot: Fix bootgraph.pl initcall name regexp
authorArnaud Patard <apatard@mandriva.com>
Sat, 20 Sep 2008 03:16:25 +0000 (20:16 -0700)
committerArjan van de Ven <arjan@linux.intel.com>
Sun, 12 Oct 2008 15:07:44 +0000 (08:07 -0700)
The regexp used to match the start and the end of an initcall
are matching only on [a-zA-Z\_]. This rules out initcalls with
a number in them. This patch is fixing that.

Signed-off-by: Arnaud Patard <apatard@mandriva.com>
scripts/bootgraph.pl

index 4e5f4ab2ed7fcb34db8b85f3dbc9fd3bb6315b37..2243353fe55dc00058cc9b96613a7a092e26226b 100644 (file)
@@ -46,7 +46,7 @@ my $firsttime = 100;
 my $count = 0;
 while (<>) {
        my $line = $_;
-       if ($line =~ /([0-9\.]+)\] calling  ([a-zA-Z\_]+)\+/) {
+       if ($line =~ /([0-9\.]+)\] calling  ([a-zA-Z0-9\_]+)\+/) {
                my $func = $2;
                if ($done == 0) {
                        $start{$func} = $1;
@@ -66,7 +66,7 @@ while (<>) {
                $count = $count + 1;
        }
 
-       if ($line =~ /([0-9\.]+)\] initcall ([a-zA-Z\_]+)\+.*returned/) {
+       if ($line =~ /([0-9\.]+)\] initcall ([a-zA-Z0-9\_]+)\+.*returned/) {
                if ($done == 0) {
                        $end{$2} = $1;
                        $maxtime = $1;
@@ -81,8 +81,8 @@ while (<>) {
 }
 
 if ($count == 0) {
-       print "No data found in the dmesg. Make sure CONFIG_PRINTK_TIME is enabled and\n";
-       print "that initcall_debug is passed on the kernel command line.\n\n";
+       print "No data found in the dmesg. Make sure that 'printk.time=1' and\n";
+       print "'initcall_debug' are passed on the kernel command line.\n\n";
        print "Usage: \n";
        print "      dmesg | perl scripts/bootgraph.pl > output.svg\n\n";
        exit;