1# $Id: fileid.awk,v 12.0 2004/11/17 03:43:25 bostic Exp $
2#
3# Take a comma-separated list of file numbers and spit out all the
4# log records that affect those file numbers.
5
6NR == 1 {
7	nfiles = 0
8	while ((ndx = index(FILEID, ",")) != 0) {
9		files[nfiles] = substr(FILEID, 1, ndx - 1);
10		FILEID = substr(FILEID, ndx + 1, length(FILEID) - ndx);
11		nfiles++
12	}
13	files[nfiles] = FILEID;
14}
15
16/^\[/{
17	if (printme == 1) {
18		printf("%s\n", rec);
19		printme = 0
20	}
21	rec = "";
22
23	rec = $0
24}
25/^	/{
26	rec = sprintf("%s\n%s", rec, $0);
27}
28/fileid/{
29	for (i = 0; i <= nfiles; i++)
30		if ($2 == files[i])
31			printme = 1
32}
33
34END {
35	if (printme == 1)
36		printf("%s\n", rec);
37}
38