File: group-stats

package info (click to toggle)
pcp 7.1.0-1
  • links: PTS
  • area: main
  • in suites: forky, sid
  • size: 252,748 kB
  • sloc: ansic: 1,483,656; sh: 182,366; xml: 160,462; cpp: 83,813; python: 24,980; perl: 18,327; yacc: 6,877; lex: 2,864; makefile: 2,738; awk: 165; fortran: 60; java: 52
file content (41 lines) | stat: -rwxr-xr-x 832 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
 
#!/bin/sh
#
# Report test frequency by group
#
# Sample lines ...
# # log rewriting app
# pmlogrewrite
#
# 015 pdu local ostest sanity pmstore
#

awk <group '
/^\#/		{ next }
NF == 0		{ next }
/^[0-9]/	{ for (i = 2; i <= NF; i++) {
		    if (f[$i] == "") {
			if ($i == "remote" || $i == "local" || $i == "sanity" ||
			    $i == "ostest" ||
			    $i ~ /^\#/ || $i ~ /patch/ || $i ~ /^@/) {
			    # control "groups" or sgi bug numbers or BAD group
			    # annotation
			    continue
			}
			printf "Warning[%d]: test %s: group \"%s\" not declared\n",NR,$1,$i
		    }
		    else
			f[$i]++
		  }
		  next
		}
		{ if ($i == "remote" || $i == "local" || $i == "sanity" ||
		      $i == "ostest")
		    next
		  f[$1] = 0
		}
END		{ for (g in f) {
		    if (f[g] != "")
			printf "%3d %s\n",f[g],g
		  }
		}' \
| sort -k 1,1nr -k2,2