summaryrefslogtreecommitdiffstats
path: root/useful
diff options
context:
space:
mode:
authorsr2013-04-23 17:18:40 +0200
committersr2013-04-23 17:18:40 +0200
commitbc4ca83f83b67cbcc546d0b974b9282cb06f8c13 (patch)
tree1210b878bd36f8841527c8a834fd751179e8e759 /useful
parentUpdate for openSUSE 12.3 (diff)
downloadtm-scripts-bc4ca83f83b67cbcc546d0b974b9282cb06f8c13.tar.gz
tm-scripts-bc4ca83f83b67cbcc546d0b974b9282cb06f8c13.tar.xz
tm-scripts-bc4ca83f83b67cbcc546d0b974b9282cb06f8c13.zip
update strace parsing util
Diffstat (limited to 'useful')
-rwxr-xr-xuseful/ultrastrace.php8
1 files changed, 4 insertions, 4 deletions
diff --git a/useful/ultrastrace.php b/useful/ultrastrace.php
index 46df34a5..7ec755e9 100755
--- a/useful/ultrastrace.php
+++ b/useful/ultrastrace.php
@@ -35,22 +35,22 @@ foreach ($argv as $fname) {
$lastLine = $line;
$lastTime = $time;
}
- if (preg_match('#^(\d+:\d+:\d+\.\d+\s+)?open\("(?<lib>[^"]*[^"]*[^/])".*\)\s+=\s+(?<ret>\S+)(\s+(?<err>\S+)\s+|$)#', $line, $out) < 1) continue;
+ if (preg_match('#^(\d+:\d+:\d+\.\d+\s+)?(?<action>open|execve)\("(?<lib>[^"]*[^"]*[^/])".*\)\s+=\s+(?<ret>\S+)(\s+(?<err>\S+)\s+|$)#', $line, $out) < 1) continue;
//echo "Match: {$out['lib']} -> {$out['ret']} ({$out['err']})\n";
$file = basename($out['lib']);
$file = preg_replace('/\.so(\.\d+)*$/', '', $file);
if ($out['ret'] < 0) {
if (isset($found[$file])) {
- $found[$file][] = ':-( ' . $out['lib'] . ' *** (' . (isset($out['err']) ? $out['err'] : 'Unknown Error') . ')';
+ $found[$file][] = ':-( ' . $out['lib'] . ' *** (' . (isset($out['err']) ? $out['err'] : 'Unknown Error') . ') (' . $out['action'] . ')';
} else {
- $failed[$file][] = ':-( ' . $out['lib'] . ' *** (' . (isset($out['err']) ? $out['err'] : 'Unknown Error') . ')';
+ $failed[$file][] = ':-( ' . $out['lib'] . ' *** (' . (isset($out['err']) ? $out['err'] : 'Unknown Error') . ') (' . $out['action'] . ')';
}
} else {
if (isset($failed[$file])) {
$found[$file] = $failed[$file];
unset($failed[$file]);
}
- $found[$file][] = ':-) ' . $out['lib'];
+ $found[$file][] = ':-) ' . $out['lib'] . ' (' . $out['action'] . ')';
}
}
fclose($fh);