--- a/commsfwtools/commstools/svg/parselog.pl Thu Dec 17 09:22:25 2009 +0200
+++ b/commsfwtools/commstools/svg/parselog.pl Thu Jan 07 13:34:53 2010 +0200
@@ -428,17 +428,12 @@
ClearActivity($actAddr);
}
elsif ($action eq "Abort") {
- print "t ", objectName($activityNode{$actAddr}), " (Abort ", $activityName{$actAddr}, ")\n";
+ print "t ", objectName($activityNode{$actAddr}), " ($activityName{$actAddr}) Abort()\n";
}
- elsif ($action eq "Next->cancel") {
- my $tuple = "";
- if (m/\[Triple=([^]]+)\]/) {
- $tuple = $1;
- print "t ", objectName($activityNode{$actAddr}), " (Cancel $activityName{$actAddr}, $tuple)\n";
- }
- else {
- print "t ", objectName($activityNode{$actAddr}), " (Cancel ", $activityName{$actAddr}, ")\n";
- }
+ elsif ($action =~ m/Cancel\(\)/) {
+ m/iPostedToId ([0-9a-f]{8})/;
+ my $postedToId = $1;
+ print "t ", objectName($activityNode{$actAddr}), " ($activityName{$actAddr}) Cancel(). Posted to ", objectName($postedToId), "\n";
}
}
elsif (($opt_X & 4) == 0 && /UnparkState->unparked\s+\[MNode=0x([0-9a-fA-F]{8})\].*\[Activity=(\w+)\].*\[Triple=(.*?)\]/)