From: Andrzej Surdej <a.surdej@samsung.com>
Date: Thu, 28 Feb 2013 15:37:44 +0000 (+0100)
Subject: Profiling fix
X-Git-Tag: 2.1b_release~22^2~36
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=df675d5a99a2e6eaa2edf94c6968f72661308362;p=platform%2Fframework%2Fweb%2Fwrt.git

Profiling fix

[Issue#]  Bug 	LINUXWRT-41
[Problem] Profiling scripts did not produce data.
[Cause] Not adjusted to latest changes.
[Solution] Some fixes done.
[Verification] To verify build wrt with profiling and run scripts.

Change-Id: Id650d7bd786df4ba7c4f213e8203b0b6e50d14bf
---

diff --git a/src/profiling/script/profiling-target-part.pl b/src/profiling/script/profiling-target-part.pl
index 84c5fb9..e20ece2 100755
--- a/src/profiling/script/profiling-target-part.pl
+++ b/src/profiling/script/profiling-target-part.pl
@@ -81,7 +81,7 @@ sub runWidget {
     chomp $line;
     if (my ($p) = $line =~ /^TEST-WIDGET-PID (\d+)/) {
         $pid = 0+$p;
-    } elsif ($line =~ /^launched$/) {
+    } elsif ($line =~ /launched$/) {
         print "launched detected $pid\n";
         kill 10, $pid;
         my $again = 1;
@@ -218,7 +218,7 @@ sub dropAndInstallAll {
         }
         my @out = `$WRT_CLIENT_QUERY`;
         for my $line (@out) {
-            if (my ($name, $trash, $tizenId) = $line =~ /^\s*\d+\s+(([^ ]| [^ ])+)\s+.*\s+([A-Za-z0-9]{10})$/) {
+            if (my ($name, $trash, $tizenId) = $line =~ /^\s*\d+\s+(([^ ]| [^ ])+)\s+.*\s+([A-Za-z0-9]{10}\.[^\s]+)\s*$/) {
                 print "    found $name (tizenId $tizenId)\n";
                 $widgetMap{$name} = $tizenId;
             }