mirror of
https://github.com/percona/percona-toolkit.git
synced 2025-09-01 18:25:59 +00:00
33 lines
695 B
Awk
Executable File
33 lines
695 B
Awk
Executable File
#!/usr/bin/env awk -f
|
|
/^File/ {
|
|
line_fmt="%-30s %5s %5s %5s %5s %5s\n";
|
|
|
|
while ( getline && $0 !~ /^Total/ ) {
|
|
if ( $1 ~ /\.pm/ ) {
|
|
n=split($1, path, "/")
|
|
|
|
printf("Test coverage for Percona Toolkit %s on ", path[n]);
|
|
system("date -u +'%F %T UTC'");
|
|
print ""
|
|
|
|
printf(line_fmt, "File", "stmt", "bran", "cond", "sub", "total");
|
|
printf(line_fmt, "------------------------------", "-----", "-----", "-----", "-----", "-----");
|
|
printf(line_fmt, path[n], $2, $3, $4, $5, $7)
|
|
|
|
break;
|
|
}
|
|
}
|
|
print ""
|
|
|
|
while ( $0 !~ /^line/ ) {
|
|
getline
|
|
}
|
|
print
|
|
|
|
while ( getline ) {
|
|
print
|
|
}
|
|
|
|
exit
|
|
}
|