/[gentoo-src]/rc-scripts/src/awk/cachedepends.awk
Gentoo

Diff of /rc-scripts/src/awk/cachedepends.awk

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

Revision 1.13 Revision 1.19
1# Copyright 1999-2003 Gentoo Technologies, Inc. 1# Copyright 1999-2004 Gentoo Foundation
2# Distributed under the terms of the GNU General Public License v2 2# Distributed under the terms of the GNU General Public License v2
3# Author: Martin Schlemmer <azarah@gentoo.org>
4# $Header: /var/cvsroot/gentoo-src/rc-scripts/src/awk/cachedepends.awk,v 1.13 2003/11/15 15:42:10 azarah Exp $ 3# $Header: /var/cvsroot/gentoo-src/rc-scripts/src/awk/cachedepends.awk,v 1.19 2004/11/15 16:23:41 vapier Exp $
5 4
6function print_start() { 5function print_start() {
7 print "source /sbin/functions.sh" >> (SVCDIR "/depcache") 6 print "source /sbin/functions.sh" >> TMPCACHE
8 print "" >> (SVCDIR "/depcache") 7 print "" >> TMPCACHE
9 print "need() {" >> (SVCDIR "/depcache") 8 print "need() {" >> TMPCACHE
10 print " echo \"NEED $*\"; return 0" >> (SVCDIR "/depcache") 9 print " echo \"NEED $*\"; return 0" >> TMPCACHE
11 print "}" >> (SVCDIR "/depcache") 10 print "}" >> TMPCACHE
12 print "" >> (SVCDIR "/depcache") 11 print "" >> TMPCACHE
13 print "use() {" >> (SVCDIR "/depcache") 12 print "use() {" >> TMPCACHE
14 print " echo \"USE $*\"; return 0" >> (SVCDIR "/depcache") 13 print " echo \"USE $*\"; return 0" >> TMPCACHE
15 print "}" >> (SVCDIR "/depcache") 14 print "}" >> TMPCACHE
16 print "" >> (SVCDIR "/depcache") 15 print "" >> TMPCACHE
17 print "before() {" >> (SVCDIR "/depcache") 16 print "before() {" >> TMPCACHE
18 print " echo \"BEFORE $*\"; return 0" >> (SVCDIR "/depcache") 17 print " echo \"BEFORE $*\"; return 0" >> TMPCACHE
19 print "}" >> (SVCDIR "/depcache") 18 print "}" >> TMPCACHE
20 print "" >> (SVCDIR "/depcache") 19 print "" >> TMPCACHE
21 print "after() {" >> (SVCDIR "/depcache") 20 print "after() {" >> TMPCACHE
22 print " echo \"AFTER $*\"; return 0" >> (SVCDIR "/depcache") 21 print " echo \"AFTER $*\"; return 0" >> TMPCACHE
23 print "}" >> (SVCDIR "/depcache") 22 print "}" >> TMPCACHE
24 print "" >> (SVCDIR "/depcache") 23 print "" >> TMPCACHE
25 print "provide() {" >> (SVCDIR "/depcache") 24 print "provide() {" >> TMPCACHE
26 print " echo \"PROVIDE $*\"; return 0" >> (SVCDIR "/depcache") 25 print " echo \"PROVIDE $*\"; return 0" >> TMPCACHE
27 print "}" >> (SVCDIR "/depcache") 26 print "}" >> TMPCACHE
28 print "" >> (SVCDIR "/depcache") 27 print "" >> TMPCACHE
29 print "parallel() {" >> (SVCDIR "/depcache") 28 print "parallel() {" >> TMPCACHE
30 print " echo \"PARALLEL $*\"; return 0" >> (SVCDIR "/depcache") 29 print " echo \"PARALLEL $*\"; return 0" >> TMPCACHE
31 print "}" >> (SVCDIR "/depcache") 30 print "}" >> TMPCACHE
32 print "" >> (SVCDIR "/depcache") 31 print "" >> TMPCACHE
33} 32}
34 33
35function print_header1() { 34function print_header1(mtime) {
36 print "#*** " MYFILENAME " ***" >> (SVCDIR "/depcache") 35 print "#*** " MYFILENAME " ***" >> TMPCACHE
37 print "" >> (SVCDIR "/depcache") 36 print "" >> TMPCACHE
38 print "myservice=\"" MYFILENAME "\"" >> (SVCDIR "/depcache") 37 print "myservice=\"" MYFILENAME "\"" >> TMPCACHE
39 print "myservice=\"${myservice##*/}\"" >> (SVCDIR "/depcache") 38 print "myservice=\"${myservice##*/}\"" >> TMPCACHE
40 print "echo \"RCSCRIPT ${myservice}\"" >> (SVCDIR "/depcache") 39 print "echo \"RCSCRIPT ${myservice}\"" >> TMPCACHE
41 print "" >> (SVCDIR "/depcache") 40 print "" >> TMPCACHE
41 print "echo \"MTIME " mtime "\"" >> TMPCACHE
42 print "" >> TMPCACHE
42} 43}
43 44
44function print_header2() { 45function print_header2(mtime) {
45 print "(" >> (SVCDIR "/depcache") 46 print "(" >> TMPCACHE
46 print " # Get settings for rc-script ..." >> (SVCDIR "/depcache") 47 print " # Get settings for rc-script ..." >> TMPCACHE
47 print " [ -e /etc/conf.d/basic ] && source /etc/conf.d/basic" >> (SVCDIR "/depcache") 48 print "" >> TMPCACHE
48 print "" >> (SVCDIR "/depcache")
49 print " [ -e \"/etc/conf.d/${myservice}\" ] && source \"/etc/conf.d/${myservice}\"" >> (SVCDIR "/depcache") 49 print " [ -e \"/etc/conf.d/${myservice}\" ] && source \"/etc/conf.d/${myservice}\"" >> TMPCACHE
50 print "" >> (SVCDIR "/depcache") 50 print "" >> TMPCACHE
51 print " [ -e /etc/conf.d/net ] && \\" >> (SVCDIR "/depcache") 51 print " [ -e /etc/conf.d/net ] && \\" >> TMPCACHE
52 print " [ \"${myservice%%.*}\" = \"net\" ] && \\" >> (SVCDIR "/depcache") 52 print " [ \"${myservice%%.*}\" = \"net\" ] && \\" >> TMPCACHE
53 print " [ \"${myservice##*.}\" != \"${myservice}\" ] && source /etc/conf.d/net" >> (SVCDIR "/depcache") 53 print " [ \"${myservice##*.}\" != \"${myservice}\" ] && source /etc/conf.d/net" >> TMPCACHE
54 print "" >> (SVCDIR "/depcache") 54 print "" >> TMPCACHE
55 print " [ -e /etc/rc.conf ] && source /etc/rc.conf" >> (SVCDIR "/depcache") 55 print " [ -e /etc/rc.conf ] && source /etc/rc.conf" >> TMPCACHE
56 print "" >> (SVCDIR "/depcache") 56 print "" >> TMPCACHE
57 print " depend() {" >> (SVCDIR "/depcache") 57 print " depend() {" >> TMPCACHE
58 print " return 0" >> (SVCDIR "/depcache") 58 print " return 0" >> TMPCACHE
59 print " }" >> (SVCDIR "/depcache") 59 print " }" >> TMPCACHE
60 print "" >> (SVCDIR "/depcache") 60 print "" >> TMPCACHE
61} 61}
62 62
63function print_end() { 63function print_end() {
64 print "" >> (SVCDIR "/depcache") 64 print "" >> TMPCACHE
65 print " depend" >> (SVCDIR "/depcache") 65 print " depend" >> TMPCACHE
66 print ")" >> (SVCDIR "/depcache") 66 print ")" >> TMPCACHE
67 print "" >> (SVCDIR "/depcache") 67 print "" >> TMPCACHE
68} 68}
69 69
70BEGIN { 70BEGIN {
71 71
72 extension("/lib/rcscripts/filefuncs.so", "dlload") 72 extension("/lib/rcscripts/filefuncs.so", "dlload")
73
74 # Get our environment variables
75 SVCDIR = ENVIRON["SVCDIR"]
76 if (SVCDIR == "") {
77 eerror("Could not get SVCDIR!")
78 exit 1
79 }
80
81 # Since this could be called more than once simultaneously, use a
82 # temporary cache and rename when finished. See bug 47111
83 ("/bin/mktemp "SVCDIR"/depcache.XXXXXXX") | getline TMPCACHE
84 if (TMPCACHE == "") {
85 eerror("Failed to create temporary cache!")
86 exit 1
87 }
73 88
74 pipe = "ls /etc/init.d/*" 89 pipe = "ls /etc/init.d/*"
75 while ((pipe | getline tmpstring) > 0) 90 while ((pipe | getline tmpstring) > 0)
76 scripts = scripts " " tmpstring 91 scripts = scripts " " tmpstring
77 close(pipe) 92 close(pipe)
89 RCSCRIPTS[RCCOUNT] = TMPRCSCRIPTS[x] 104 RCSCRIPTS[RCCOUNT] = TMPRCSCRIPTS[x]
90 } 105 }
91 106
92 if (RCCOUNT == 0) { 107 if (RCCOUNT == 0) {
93 eerror("No scripts to process!") 108 eerror("No scripts to process!")
109 system("rm -f "TMPCACHE)
94 exit 1 110 exit 1
95 } 111 }
96 112
97 print_start() 113 print_start()
98 114
99 for (count = 1;count <= RCCOUNT;count++) { 115 for (count = 1;count <= RCCOUNT;count++) {
100 116
101 MYFNR = 1 117 MYFNR = 1
102 MYFILENAME = RCSCRIPTS[count] 118 MYFILENAME = RCSCRIPTS[count]
119 STAT_DATA[1] = 1
103 120
104 while (((getline < (RCSCRIPTS[count])) > 0) && (!NEXTFILE)) { 121 while (((getline < (RCSCRIPTS[count])) > 0) && (!NEXTFILE)) {
105 122
106 # If line start with a '#' and is the first line 123 # If line start with a '#' and is the first line
107 if (($0 ~ /^[[:space:]]*#/) && (MYFNR == 1)) { 124 if (($0 ~ /^[[:space:]]*#/) && (MYFNR == 1)) {
115 132
116 ewarn(RCSCRIPTS[count] " is invalid (should not end with '.sh')") 133 ewarn(RCSCRIPTS[count] " is invalid (should not end with '.sh')")
117 NEXTFILE = 1 134 NEXTFILE = 1
118 continue 135 continue
119 } 136 }
137
138 if (stat(MYFILENAME, STAT_DATA) != 0)
139 ewarn("Could not stat \"" MYFILENAME "\"")
120 140
121 ISRCSCRIPT = 1 141 ISRCSCRIPT = 1
122 print_header1() 142 print_header1(STAT_DATA["mtime"])
123 } else { 143 } else {
124 144
125 NEXTFILE = 1 145 NEXTFILE = 1
126 continue 146 continue
127 } 147 }
134 if ($0 ~ /depend[[:space:]]*\(\)/) { 154 if ($0 ~ /depend[[:space:]]*\(\)/) {
135 155
136 GOTDEPEND = 1 156 GOTDEPEND = 1
137 157
138 print_header2() 158 print_header2()
139 print " # Actual depend() function ..." >> (SVCDIR "/depcache") 159 print " # Actual depend() function ..." >> TMPCACHE
140 } 160 }
141 161
142 # We have the depend function... 162 # We have the depend function...
143 if (GOTDEPEND) { 163 if (GOTDEPEND) {
144 164
152 SBCOUNT += gsub(/{/, "{") 172 SBCOUNT += gsub(/{/, "{")
153 173
154 # Make sure depend() contain something, else bash 174 # Make sure depend() contain something, else bash
155 # errors out (empty function). 175 # errors out (empty function).
156 if ((SBCOUNT > 0) && (COUNT == 0)) 176 if ((SBCOUNT > 0) && (COUNT == 0))
157 print " \treturn 0" >> (SVCDIR "/depcache") 177 print " \treturn 0" >> TMPCACHE
158 178
159 # Print the depend() function 179 # Print the depend() function
160 print " " $0 >> (SVCDIR "/depcache") 180 print " " $0 >> TMPCACHE
161 181
162 # If COUNT=0, and SBCOUNT>0, it means we have read 182 # If COUNT=0, and SBCOUNT>0, it means we have read
163 # all matching '{' and '}' for depend(), so stop. 183 # all matching '{' and '}' for depend(), so stop.
164 if ((SBCOUNT > 0) && (COUNT == 0)) { 184 if ((SBCOUNT > 0) && (COUNT == 0)) {
165 185
182 close(RCSCRIPTS[count]) 202 close(RCSCRIPTS[count])
183 203
184 NEXTFILE = 0 204 NEXTFILE = 0
185 205
186 } 206 }
207
208 system("mv "TMPCACHE" "SVCDIR"/depcache")
187} 209}
188 210
189 211
190# vim:ts=4 212# vim:ts=4

Legend:
Removed from v.1.13  
changed lines
  Added in v.1.19

  ViewVC Help
Powered by ViewVC 1.1.20