Blame


1 dc794ede 2005-11-26 devnull # Summarize the installation log, printing errors along with
2 dc794ede 2005-11-26 devnull # enough context to make sense of them.
3 dc794ede 2005-11-26 devnull
4 dc794ede 2005-11-26 devnull BEGIN {
5 dc794ede 2005-11-26 devnull # print verbose
6 dc794ede 2005-11-26 devnull cd = ""
7 5348a601 2005-12-15 devnull out = "/dev/stdout"
8 32a580f4 2006-07-23 devnull statuslen = 0
9 5348a601 2005-12-15 devnull debug = 0
10 32a580f4 2006-07-23 devnull updates = "/dev/stderr"
11 dc794ede 2005-11-26 devnull }
12 dc794ede 2005-11-26 devnull
13 7c8e7ef4 2008-12-06 rsc function myflush(f)
14 32a580f4 2006-07-23 devnull {
15 7c8e7ef4 2008-12-06 rsc # fflush is not available on sun, but system("") appears to work everywhere
16 4a8429a2 2008-12-01 trisk system("")
17 4a8429a2 2008-12-01 trisk }
18 4a8429a2 2008-12-01 trisk
19 4a8429a2 2008-12-01 trisk function clearstatus(noflush, i)
20 4a8429a2 2008-12-01 trisk {
21 32a580f4 2006-07-23 devnull if(!updates)
22 32a580f4 2006-07-23 devnull return
23 32a580f4 2006-07-23 devnull for(i=0; i<statuslen; i++)
24 32a580f4 2006-07-23 devnull printf("\b \b") >updates
25 32a580f4 2006-07-23 devnull statuslen = 0
26 5fa03291 2006-07-23 devnull if(!noflush)
27 7c8e7ef4 2008-12-06 rsc myflush(updates)
28 32a580f4 2006-07-23 devnull }
29 32a580f4 2006-07-23 devnull
30 32a580f4 2006-07-23 devnull function status(s)
31 32a580f4 2006-07-23 devnull {
32 32a580f4 2006-07-23 devnull if(!updates)
33 32a580f4 2006-07-23 devnull return
34 5fa03291 2006-07-23 devnull clearstatus(1)
35 32a580f4 2006-07-23 devnull printf(" %s ", s) >updates
36 32a580f4 2006-07-23 devnull statuslen = length(s)+5
37 7c8e7ef4 2008-12-06 rsc myflush(updates)
38 32a580f4 2006-07-23 devnull }
39 32a580f4 2006-07-23 devnull
40 5348a601 2005-12-15 devnull debug!=0 { print "# " $0 }
41 dc794ede 2005-11-26 devnull
42 dc794ede 2005-11-26 devnull /^$/ { next }
43 dc794ede 2005-11-26 devnull
44 6637b803 2005-11-28 devnull /^echo cd / { next }
45 6637b803 2005-11-28 devnull /^\+\+ pwd/ { next }
46 6637b803 2005-11-28 devnull
47 dc794ede 2005-11-26 devnull /^\* /{
48 32a580f4 2006-07-23 devnull clearstatus()
49 dc794ede 2005-11-26 devnull if(debug) print "% mark"
50 dc794ede 2005-11-26 devnull print >out
51 7c8e7ef4 2008-12-06 rsc myflush(out)
52 32a580f4 2006-07-23 devnull if(copy){
53 32a580f4 2006-07-23 devnull print >copy
54 7c8e7ef4 2008-12-06 rsc myflush(copy)
55 32a580f4 2006-07-23 devnull }
56 dc794ede 2005-11-26 devnull cmd = ""
57 dc794ede 2005-11-26 devnull printtabs = 1 # print indented lines immediately following
58 dc794ede 2005-11-26 devnull errors = 0
59 dc794ede 2005-11-26 devnull next
60 dc794ede 2005-11-26 devnull }
61 dc794ede 2005-11-26 devnull
62 5348a601 2005-12-15 devnull /^ / && printtabs!=0 {
63 32a580f4 2006-07-23 devnull clearstatus()
64 dc794ede 2005-11-26 devnull print >out
65 7c8e7ef4 2008-12-06 rsc myflush(out)
66 32a580f4 2006-07-23 devnull if(copy){
67 32a580f4 2006-07-23 devnull print >copy
68 7c8e7ef4 2008-12-06 rsc myflush(copy)
69 32a580f4 2006-07-23 devnull }
70 dc794ede 2005-11-26 devnull next
71 dc794ede 2005-11-26 devnull }
72 dc794ede 2005-11-26 devnull
73 dc794ede 2005-11-26 devnull { printtabs = 0 }
74 dc794ede 2005-11-26 devnull
75 77809fb0 2008-05-10 rsc /^(9a|9c|9l|9ar|9?install|cat pdf|cp|rm|mv|mk|9 yacc|9 lex|9 rc|do|for i|if|mk|gcc|cpp|cp|sh|cmp|rc|\.\/o)($|[^:])/ {
76 dc794ede 2005-11-26 devnull if(debug) print "% start"
77 dc794ede 2005-11-26 devnull errors = 0
78 dc794ede 2005-11-26 devnull cmd = ""
79 dc794ede 2005-11-26 devnull if(!verbose)
80 dc794ede 2005-11-26 devnull cmd = cmd cd
81 dc794ede 2005-11-26 devnull cmd = cmd $0 "\n"
82 dc794ede 2005-11-26 devnull next
83 dc794ede 2005-11-26 devnull }
84 dc794ede 2005-11-26 devnull
85 5fa03291 2006-07-23 devnull /^cd .+; mk .+/ && !verbose {
86 5fa03291 2006-07-23 devnull dir = $2
87 5fa03291 2006-07-23 devnull sub(/;$/, "", dir)
88 5fa03291 2006-07-23 devnull status(dir " mk " $4)
89 5fa03291 2006-07-23 devnull }
90 5fa03291 2006-07-23 devnull
91 dc794ede 2005-11-26 devnull /^cd / {
92 dc794ede 2005-11-26 devnull if(debug) print "% cd"
93 dc794ede 2005-11-26 devnull errors = 0
94 dc794ede 2005-11-26 devnull if(verbose){
95 dc794ede 2005-11-26 devnull print >out
96 7c8e7ef4 2008-12-06 rsc myflush(out)
97 32a580f4 2006-07-23 devnull if(copy){
98 32a580f4 2006-07-23 devnull print >copy
99 7c8e7ef4 2008-12-06 rsc myflush(copy)
100 32a580f4 2006-07-23 devnull }
101 dc794ede 2005-11-26 devnull }
102 dc794ede 2005-11-26 devnull cd = $0 "\n"
103 dc794ede 2005-11-26 devnull cmd = ""
104 dc794ede 2005-11-26 devnull next
105 dc794ede 2005-11-26 devnull }
106 dc794ede 2005-11-26 devnull
107 dc794ede 2005-11-26 devnull {
108 dc794ede 2005-11-26 devnull cmd = cmd $0 "\n"
109 dc794ede 2005-11-26 devnull }
110 dc794ede 2005-11-26 devnull
111 5348a601 2005-12-15 devnull errors != 0 {
112 32a580f4 2006-07-23 devnull clearstatus()
113 dc794ede 2005-11-26 devnull if(debug) print "% errors"
114 dc794ede 2005-11-26 devnull printf "%s", cmd >out
115 7c8e7ef4 2008-12-06 rsc myflush(out)
116 32a580f4 2006-07-23 devnull if(copy){
117 32a580f4 2006-07-23 devnull printf "%s", cmd >copy
118 7c8e7ef4 2008-12-06 rsc myflush(copy)
119 32a580f4 2006-07-23 devnull }
120 dc794ede 2005-11-26 devnull cmd = ""
121 dc794ede 2005-11-26 devnull next
122 dc794ede 2005-11-26 devnull }
123 dc794ede 2005-11-26 devnull
124 dc794ede 2005-11-26 devnull /^( |then|else|fi|done|[ar] - [^ ]*\.o$)/ {
125 dc794ede 2005-11-26 devnull next
126 dc794ede 2005-11-26 devnull }
127 dc794ede 2005-11-26 devnull
128 5348a601 2005-12-15 devnull /^(conflicts:)/ {
129 dc794ede 2005-11-26 devnull if(debug) print "% skip1"
130 dc794ede 2005-11-26 devnull next
131 dc794ede 2005-11-26 devnull }
132 dc794ede 2005-11-26 devnull
133 5348a601 2005-12-15 devnull /(up to date|nothing to see|assuming it will be|loop not entered)/ {
134 dc794ede 2005-11-26 devnull next
135 dc794ede 2005-11-26 devnull }
136 dc794ede 2005-11-26 devnull
137 dc794ede 2005-11-26 devnull /(nodes\(%e\)|packed transitions)/ {
138 dc794ede 2005-11-26 devnull if(debug) print "% skip2"
139 dc794ede 2005-11-26 devnull next
140 dc794ede 2005-11-26 devnull }
141 dc794ede 2005-11-26 devnull
142 dc794ede 2005-11-26 devnull {
143 dc794ede 2005-11-26 devnull # unexpected line
144 32a580f4 2006-07-23 devnull clearstatus()
145 dc794ede 2005-11-26 devnull if(debug) print "% errors1"
146 dc794ede 2005-11-26 devnull errors = 1
147 dc794ede 2005-11-26 devnull printf ">>> %s", cmd >out
148 7c8e7ef4 2008-12-06 rsc myflush(out)
149 32a580f4 2006-07-23 devnull if(copy){
150 32a580f4 2006-07-23 devnull printf ">>> %s", cmd >copy
151 7c8e7ef4 2008-12-06 rsc myflush(copy)
152 32a580f4 2006-07-23 devnull }
153 dc794ede 2005-11-26 devnull cmd = ""
154 dc794ede 2005-11-26 devnull }
155 dc794ede 2005-11-26 devnull