]>
Commit | Line | Data |
---|---|---|
37fceb07 | 1 | #!/usr/bin/gawk -f |
bf0a58ea | 2 | # |
18f95017 | 3 | # Adapter adapts .spec files for PLD Linux. |
236b87ac | 4 | # |
fccce8b5 | 5 | # Copyright (C) 1999-2007 PLD-Team <feedback@pld-linux.org> |
236b87ac | 6 | # Authors: |
b4e337d9 | 7 | # Michał Kuratczyk <kura@pld.org.pl> |
dda3eaa5 | 8 | # Sebastian Zagrodzki <s.zagrodzki@mimuw.edu.pl> |
b4e337d9 | 9 | # Tomasz Kłoczko <kloczek@rudy.mif.pg.gda.pl> |
d8313167 | 10 | # Artur Frysiak <wiget@pld-linux.org> |
f37c1259 | 11 | # Michal Kochanowicz <mkochano@pld.org.pl> |
fccce8b5 | 12 | # Jakub Bogusz <qboosh@pld-linux.org> |
b4e337d9 | 13 | # Elan Ruusamäe <glen@pld-linux.org> |
115a3045 ER |
14 | # |
15 | # See cvs log adapter{,.awk} for list of contributors | |
16 | # | |
236b87ac | 17 | # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # |
3a14bf9d | 18 | |
8ebb1c08 | 19 | # TODO |
03180d14 | 20 | # - really long sourceX make preamble sorting totally fcked up (try snake.spec r1.1) |
8ebb1c08 ER |
21 | # - parse ../PLD-doc/BuildRequires.txt and setup proper BR epoches? |
22 | # - add "-nc" option to skip CVS interaction | |
6c67f9b1 ER |
23 | # - sort Summary(XX) |
24 | # - sort Requires, BuildRequires | |
fd5553c9 | 25 | # - check if %description (lang=C) contains 8bit |
6e985933 | 26 | # - desc wrapping is totally fucked up on global.spec,1.25, dosemu.spec,1.115- |
8ebb1c08 | 27 | |
bf0a58ea | 28 | BEGIN { |
0ae11f54 | 29 | RPM_SECTIONS = "package|build|changelog|clean|description|install|post|posttrans|postun|pre|prep|pretrans|preun|triggerin|triggerpostun|triggerun|verifyscript|check" |
2b47df45 | 30 | SECTIONS = "^%(" RPM_SECTIONS ")" |
93e2a87a | 31 | |
18f95017 ER |
32 | RCSID = "$Id$" |
33 | rev = RCSID # TODO: parse from RCSID | |
34 | VERSION = "0.31/" rev | |
35 | ||
43f8581a | 36 | PREAMBLE_TAGS = "(R|BR|Summary|Name|Version|Release|Epoch|License|Group|URL|BuildArch|BuildRoot|Obsoletes|Conflicts|Provides|ExclusiveArch|ExcludeArch|Pre[Rr]eq|(Build)?Requires|Suggests)" |
c58d1357 | 37 | |
50037ea2 PZ |
38 | usedigest = 0 # Enable to switch to rpm 4.4.6+ md5 digests |
39 | ||
1c955424 | 40 | preamble = 1 # Is it part of preamble? Default - yes |
6e985933 ER |
41 | boc = 4 # Beginning of %changelog |
42 | bod = 0 # Beginning of %description | |
7a72f436 | 43 | tw = 70 # Descriptions width |
f171fd40 | 44 | |
89c604c7 | 45 | b_idx = 0 # index of BR/R arrays |
b6875e34 | 46 | BR_count = 0 # number of additional BuildRequires |
89c604c7 | 47 | |
85e708f2 | 48 | # If variable removed, then 1 (for removing it from export) |
49 | removed["LDFLAGS"] = 0 | |
50 | removed["CFLAGS"] = 0 | |
51 | removed["CXXFLAGS"] = 0 | |
5c18171e | 52 | |
f6f0c932 ER |
53 | # get cvsaddress for changelog section |
54 | # using rpm macros as too lazy to add ~/.adapterrc parsing support. | |
55 | "rpm --eval '%{?_cvsmaildomain}%{!?_cvsmaildomain:@pld-linux.org}'" | getline _cvsmaildomain | |
3fc5a496 | 56 | "rpm --eval '%{?_cvsmailfeedback}%{!?_cvsmailfeedback:PLD Team <feedback@pld-linux.org>}'" | getline _cvsmailfeedback |
f6f0c932 | 57 | |
246ad57e | 58 | # If 1, we are inside of comment block (started with /^#%/) |
59 | comment_block = 0 | |
f171fd40 | 60 | |
ed86212f | 61 | # File with rpm groups |
312c5d87 SZ |
62 | "rpm --eval %_sourcedir" | getline groups_file |
63 | groups_file = groups_file "/rpm.groups" | |
826b40ea | 64 | system("cd `rpm --eval %_sourcedir`; [ -f rpm.groups ] || cvs up rpm.groups >/dev/null") |
c2814373 | 65 | system("[ -d ../PLD-doc ] && cd ../PLD-doc && ([ -f BuildRequires.txt ] || cvs up BuildRequires.txt >/dev/null)"); |
f1991554 | 66 | |
5c18171e | 67 | # Temporary file for changelog section |
68 | changelog_file = ENVIRON["HOME"] "/tmp/adapter.changelog" | |
69 | ||
f1991554 | 70 | # Load rpm macros |
43c05c3c | 71 | "rpm --eval %_prefix" | getline prefix |
72 | "rpm --eval %_bindir" | getline bindir | |
73 | "rpm --eval %_sbindir" | getline sbindir | |
74 | "rpm --eval %_libdir" | getline libdir | |
75 | "rpm --eval %_sysconfdir" | getline sysconfdir | |
76 | "rpm --eval %_datadir" | getline datadir | |
77 | "rpm --eval %_includedir" | getline includedir | |
78 | "rpm --eval %_mandir" | getline mandir | |
79 | "rpm --eval %_infodir" | getline infodir | |
2a638fcb | 80 | "rpm --eval %_examplesdir" | getline examplesdir |
c2b069de | 81 | "rpm --eval %_defaultdocdir" | getline docdir |
1077f405 | 82 | "rpm --eval %_kdedocdir" | getline kdedocdir |
7cb79e98 | 83 | "rpm --eval %_gtkdocdir" | getline gtkdocdir |
4a62fb54 ER |
84 | "rpm --eval %_desktopdir" | getline desktopdir |
85 | "rpm --eval %_pixmapsdir" | getline pixmapsdir | |
ee9487af | 86 | "rpm --eval %_javadir" | getline javadir |
336c1a4f ER |
87 | |
88 | "rpm --eval %perl_sitearch" | getline perl_sitearch | |
89 | "rpm --eval %perl_archlib" | getline perl_archlib | |
90 | "rpm --eval %perl_privlib" | getline perl_privlib | |
336c1a4f ER |
91 | "rpm --eval %perl_vendorlib" | getline perl_vendorlib |
92 | "rpm --eval %perl_vendorarch" | getline perl_vendorarch | |
93 | "rpm --eval %perl_sitelib" | getline perl_sitelib | |
9732cb3d | 94 | |
b7839d5b ER |
95 | "rpm --eval %py_sitescriptdir 2>/dev/null" | getline py_sitescriptdir |
96 | "rpm --eval %py_sitedir 2>/dev/null" | getline py_sitedir | |
97 | "rpm --eval %py_scriptdir 2>/dev/null" | getline py_scriptdir | |
23e0529e | 98 | "rpm --eval %py_ver 2>/dev/null" | getline py_ver |
6f2c1099 ER |
99 | |
100 | "rpm --eval %ruby_archdir" | getline ruby_archdir | |
101 | "rpm --eval %ruby_ridir" | getline ruby_ridir | |
102 | "rpm --eval %ruby_rubylibdir" | getline ruby_rubylibdir | |
103 | "rpm --eval %ruby_sitearchdir" | getline ruby_sitearchdir | |
104 | "rpm --eval %ruby_sitelibdir" | getline ruby_sitelibdir | |
105 | ||
57caba32 | 106 | "rpm --eval %php_pear_dir" | getline php_pear_dir |
4b1d6e6d | 107 | "rpm --eval %php_data_dir" | getline php_data_dir |
3d8be7c3 | 108 | "rpm --eval %tmpdir" | getline tmpdir |
bf0a58ea | 109 | } |
110 | ||
111 | # There should be a comment with CVS keywords on the first line of file. | |
8b1938ea | 112 | FNR == 1 { |
f1991554 | 113 | if (!/# \$Revision:/) # If this line is already OK? |
114 | print "# $" "Revision:$, " "$" "Date:$" # No | |
04dde927 | 115 | else { |
f1991554 | 116 | print $0 # Yes |
117 | next # It is enough for first line | |
04dde927 | 118 | } |
bf0a58ea | 119 | } |
120 | ||
43c05c3c | 121 | # If the latest line matched /%files/ |
122 | defattr == 1 { | |
13b24a87 ER |
123 | if (ENVIRON["SKIP_DEFATTR"] != 1) { |
124 | if ($0 !~ /defattr/) { # If no %defattr | |
125 | print "%defattr(644,root,root,755)" # Add it | |
126 | } else { | |
127 | $0 = "%defattr(644,root,root,755)" # Correct mistakes (if any) | |
128 | } | |
129 | } | |
aec1bddb | 130 | defattr = 0 |
43c05c3c | 131 | } |
132 | ||
89c604c7 ER |
133 | function b_makekey(a, b, s) { |
134 | s = a "" b; | |
135 | # kill bcond | |
b6875e34 | 136 | gsub(/[#%]+{[!?]+[_a-zA-Z0-9]+:/, "", s); |
3b0074cc | 137 | |
8409a9b2 | 138 | # kill commented out items |
b6875e34 | 139 | gsub(/^#[ \t]*/, "", s); |
3b0074cc | 140 | |
c58d1357 | 141 | # force order |
985d9bc7 ER |
142 | gsub(/^Summary\(/, "11Summary(", s); |
143 | gsub(/^Summary/, "10Summary", s); | |
144 | gsub(/^Name/, "2Name", s); | |
145 | gsub(/^Version/, "3Version", s); | |
146 | gsub(/^Release/, "4Release", s); | |
147 | gsub(/^Epoch/, "5Epoch", s); | |
148 | gsub(/^License/, "5License", s); | |
149 | gsub(/^Group/, "6Group", s); | |
150 | gsub(/^URL/, "7URL", s); | |
151 | ||
152 | gsub(/^BuildRequires/, "B1BuildRequires", s); | |
153 | gsub(/^BuildConflicts/, "B2BuildConflicts", s); | |
43f8581a | 154 | |
43f8581a | 155 | gsub(/^Suggests/, "X1Suggests", s); |
2eef43e9 JB |
156 | gsub(/^Provides/, "X2Provides", s); |
157 | gsub(/^Obsoletes/, "X3Obsoletes", s); | |
158 | gsub(/^Conflicts/, "X4Conflicts", s); | |
159 | gsub(/^BuildArch/, "X5BuildArch", s); | |
985d9bc7 ER |
160 | gsub(/^ExclusiveArch/, "X6ExclusiveArch", s); |
161 | gsub(/^ExcludeArch/, "X7ExcludeArch", s); | |
162 | gsub(/^BuildRoot/, "X9BuildRoot", s); | |
d9e2bd9b ER |
163 | |
164 | # printf("%s -> %s\n", a""b, s); | |
89c604c7 ER |
165 | return s; |
166 | } | |
167 | ||
eee34ffb | 168 | # Comments |
22622171 | 169 | /^#/ && (description == 0) { |
eee34ffb | 170 | if (/This file does not like to be adapterized!/) { |
171 | print # print this message | |
172 | while (getline) # print the rest of spec as it is | |
173 | ||
174 | do_not_touch_anything = 1 # do not touch anything in END() | |
175 | exit 0 | |
176 | } | |
246ad57e | 177 | |
eee34ffb | 178 | # Generally, comments are printed without touching |
70a1dc9e | 179 | sub(/[ \t]+$/, "") |
4414eb86 | 180 | |
50037ea2 PZ |
181 | if (/#[ \t]*Source.*md5/) { |
182 | if (usedigest == 1) { | |
183 | sub(/^#[ \t]*Source/, "BuildRequires:\tdigest(%SOURCE", $0) | |
184 | sub(/-md5[ \t]*:[ \t]*/, ") = ", $0) | |
185 | } | |
4414eb86 ER |
186 | print $0 |
187 | next | |
188 | } | |
246ad57e | 189 | } |
190 | ||
1da27823 | 191 | /^%define/ { |
93e2a87a | 192 | # Remove defining _applnkdir (this macro has been included in rpm-3.0.4) |
71a4728c | 193 | if ($2 == "_applnkdir") { |
ba4b52a7 | 194 | next |
71a4728c ER |
195 | } |
196 | if ($2 == "date") { | |
ba4b52a7 | 197 | date = 1 |
4ab1678b ER |
198 | if (did_files == 0) { |
199 | print "%files" | |
200 | print "" | |
201 | did_files = 1 | |
202 | } | |
71a4728c ER |
203 | } |
204 | ||
205 | # Do not add %define of _prefix if it already is. | |
206 | if ($2 ~ /^_prefix/) { | |
207 | sub("^"prefix, $3, bindir) | |
208 | sub("^"prefix, $3, sbindir) | |
209 | sub("^"prefix, $3, libdir) | |
210 | sub("^"prefix, $3, datadir) | |
211 | sub("^"prefix, $3, includedir) | |
212 | prefix = $3 | |
213 | } | |
214 | ||
215 | if ($2 ~ /_bindir/ && !/_sbindir/) | |
216 | bindir = $3 | |
217 | if ($2 ~ /_sbindir/) | |
218 | sbindir = $3 | |
a27fac4d ER |
219 | if ($2 ~ /_libdir/) { |
220 | if ($3 ~ /^%\(/) { | |
221 | # TODO: should escape for latter checks like: ($c ~ sysconfdir "/{?cron.") | |
222 | libdir = "%%%%%%%%%%%%%%" | |
223 | } else { | |
224 | libdir = $3 | |
225 | } | |
226 | } | |
93e2a87a ER |
227 | if ($2 ~ /_sysconfdir/) { |
228 | if ($3 ~ /^%\(/) { | |
229 | # TODO: should escape for latter checks like: ($c ~ sysconfdir "/{?cron.") | |
230 | sysconfdir = "%%%%%%%%%%%%%%" | |
231 | } else { | |
232 | sysconfdir = $3 | |
233 | } | |
234 | } | |
a27fac4d ER |
235 | if ($2 ~ /_datadir/) { |
236 | if ($3 ~ /^%\(/) { | |
237 | # TODO: should escape for latter checks like: ($c ~ sysconfdir "/{?cron.") | |
238 | datadir = "%%%%%%%%%%%%%%" | |
239 | } else { | |
240 | datadir = $3 | |
241 | } | |
242 | } | |
71a4728c ER |
243 | if ($2 ~ /_includedir/) |
244 | includedir = $3 | |
245 | if ($2 ~ /_mandir/) | |
246 | mandir = $3 | |
247 | if ($2 ~ /_infodir/) | |
248 | infodir = $3 | |
c2b069de ER |
249 | if ($2 ~ /_docdir/) |
250 | docdir = $3 | |
71a4728c ER |
251 | |
252 | # version related macros | |
253 | if ($2 ~ /^_beta$/) | |
254 | _beta = $3 | |
255 | if ($2 ~ /^_rc$/) | |
256 | _rc = $3 | |
59de1799 ER |
257 | if ($2 ~ /^_pre$/) |
258 | _pre = $3 | |
71a4728c ER |
259 | if ($2 ~ /^_snap$/) |
260 | _snap = $3 | |
3c5e6e5f ER |
261 | if ($2 ~ /^subver$/) |
262 | subver = $3 | |
71a4728c ER |
263 | |
264 | # these are used usually when adapterizing external spec | |
265 | if ($2 ~ /^name$/) | |
266 | name = $3 | |
267 | if ($2 ~ /^version$/) | |
268 | version = $3 | |
269 | if ($2 ~ /^release$/) | |
270 | release = $3 | |
a39ddef5 | 271 | |
0ea7c3cd ER |
272 | if ($2 ~ /^mod_name$/) |
273 | mod_name = $3 | |
274 | ||
78d96561 | 275 | sub(/[ \t]+$/, ""); |
a39ddef5 ER |
276 | # do nothing further, otherwise adapter thinks we're at preamble |
277 | ||
278 | next | |
1da27823 SZ |
279 | } |
280 | ||
6c67f9b1 ER |
281 | # Obsolete |
282 | /^%include.*\/usr\/lib\/rpm\/macros\.python$/ { | |
283 | next | |
284 | } | |
285 | ||
246ad57e | 286 | ################ |
287 | # %description # | |
288 | ################ | |
93e2a87a | 289 | /^%description/, (!/^%description/ && $0 ~ SECTIONS) { |
aec1bddb | 290 | preamble = 0 |
efe53381 | 291 | |
3a14bf9d | 292 | if (/^%description/) { |
aec1bddb | 293 | bod++ |
236b87ac | 294 | format_line = "" |
295 | format_indent = -1 | |
3a14bf9d SZ |
296 | } |
297 | ||
236b87ac | 298 | # Format description |
7b868d98 | 299 | if (ENVIRON["SKIP_DESC"] != 1 && description == 1 && !/^%[a-z]+/ && !/^%description/) { |
3a14bf9d | 300 | if (/^[ \t]*$/) { |
236b87ac | 301 | format_flush(format_line, format_indent) |
3a14bf9d | 302 | print "" |
236b87ac | 303 | format_line = "" |
304 | format_indent = -1 | |
3a14bf9d | 305 | } else if (/^[ \t]*[-\*][ \t]*/) { |
236b87ac | 306 | format_flush(format_line, format_indent) |
f171fd40 | 307 | match($0, /^[ \t]*/) |
236b87ac | 308 | format_indent = RLENGTH |
309 | match($0, /^[ \t]*[-\*][ \t]/) | |
310 | format_line = substr($0, RLENGTH) | |
f171fd40 | 311 | } else |
236b87ac | 312 | format_line = format_line " " $0 |
aec1bddb | 313 | next |
efe53381 | 314 | } |
f171fd40 | 315 | |
1da27823 | 316 | if (/^%[a-z]+/ && (!/^%description/ || bod == 2)) { |
ddb18dd4 | 317 | if (NF > 3 && $2 == "-l") { |
318 | ll = $1 | |
319 | for (i = 4; i <= NF; i++) | |
320 | ll = ll " " $i | |
321 | $0 = ll " -l " $3 | |
322 | } | |
236b87ac | 323 | format_flush(format_line, format_indent) |
efe53381 | 324 | if (bod == 2) { |
aec1bddb SZ |
325 | bod = 1 |
326 | description = 1 | |
efe53381 | 327 | } else { |
aec1bddb SZ |
328 | bod = 0 |
329 | description = 0 | |
efe53381 | 330 | } |
331 | } else | |
aec1bddb | 332 | description = 1 |
bf0a58ea | 333 | } |
334 | ||
246ad57e | 335 | ######### |
336 | # %prep # | |
337 | ######### | |
93e2a87a | 338 | /^%prep/, (!/^%prep/ && $0 ~ SECTIONS) { |
aec1bddb | 339 | preamble = 0 |
4ab1678b | 340 | did_prep = 1 |
f171fd40 | 341 | |
ac779c71 ER |
342 | use_macros() |
343 | ||
43c05c3c | 344 | # Add '-q' to %setup |
e780ff0a | 345 | if (/^%setup/ && !/-q/) { |
1da27823 | 346 | sub(/^%setup/, "%setup -q") |
e780ff0a ER |
347 | } |
348 | ||
af38fe16 | 349 | if (/^%setup/ && name != "setup") { |
e9097b46 ER |
350 | $0 = fixedsub(name, "%{name}", $0); |
351 | $0 = fixedsub(version, "%{version}", $0); | |
4a8d9a70 | 352 | if (_beta) { |
e9097b46 | 353 | $0 = fixedsub(_beta, "%{_beta}", $0); |
4a8d9a70 ER |
354 | } |
355 | if (_rc) { | |
e9097b46 | 356 | $0 = fixedsub(_rc, "%{_rc}", $0); |
4a8d9a70 | 357 | } |
59de1799 ER |
358 | if (_pre) { |
359 | $0 = fixedsub(_pre, "%{_pre}", $0); | |
360 | } | |
4a8d9a70 | 361 | if (_snap) { |
e9097b46 | 362 | $0 = fixedsub(_snap, "%{_snap}", $0); |
4a8d9a70 | 363 | } |
3c5e6e5f ER |
364 | if (subver) { |
365 | $0 = fixedsub(subver, "%{subver}", $0); | |
366 | } | |
4f822e22 ER |
367 | } |
368 | ||
10690436 | 369 | if (/^%setup/ && /-n %{name}-%{version}( |$)/) { |
e9097b46 | 370 | $0 = fixedsub(" -n %{name}-%{version}", "", $0) |
e780ff0a | 371 | } |
b6875e34 | 372 | sub("^%patch ", "%patch0 "); |
ac779c71 ER |
373 | |
374 | # invalid in %prep | |
375 | sub("^rm -rf \$RPM_BUILD_ROOT.*", ""); | |
bf0a58ea | 376 | } |
377 | ||
246ad57e | 378 | ########## |
379 | # %build # | |
380 | ########## | |
93e2a87a | 381 | /^%build/, (!/^%build/ && $0 ~ SECTIONS) { |
aec1bddb | 382 | preamble = 0 |
bf0a58ea | 383 | |
4ab1678b ER |
384 | if (did_prep == 0) { |
385 | print "%prep" | |
386 | print "" | |
387 | did_prep = 1 | |
388 | } | |
389 | ||
aec1bddb | 390 | use_macros() |
6ebff802 | 391 | use_tabs() |
f171fd40 | 392 | |
9cb72c72 | 393 | if (/^automake$/) |
394 | sub(/$/, " -a -c") | |
395 | ||
eb4bf70e | 396 | if (/LDFLAGS/) { |
85e708f2 | 397 | if (/LDFLAGS="-s"/) { |
398 | removed["LDFLAGS"] = 1 | |
399 | next | |
400 | } else { | |
401 | split($0, tmp, "LDFLAGS=") | |
eb4bf70e | 402 | count = split(tmp[2], flags, "\"") |
85e708f2 | 403 | if (flags[1] != "" && flags[1] !~ "!?debug") { |
fde8f52a | 404 | sub(/-s[" ]?/, "%{rpmldflags} ", flags[1]) |
85e708f2 | 405 | $0 = tmp[1] line[1] "LDFLAGS=" flags[1] "\"" |
406 | for (i = 2; i < count; i++) | |
407 | $0 = $0 flags[i] "\"" | |
408 | } | |
eb4bf70e | 409 | } |
410 | } | |
411 | ||
412 | if (/CFLAGS=/) | |
413 | if (cflags("CFLAGS") == 0) | |
414 | next | |
415 | ||
416 | if (/CXXFLAGS=/) | |
417 | if (cflags("CXXFLAGS") == 0) | |
418 | next | |
f171fd40 | 419 | |
85e708f2 | 420 | if (/^export /) { |
421 | if (removed["LDFLAGS"]) | |
422 | sub(" LDFLAGS", "") | |
423 | if (removed["CFLAGS"]) | |
424 | sub(" CFLAGS", "") | |
425 | if (removed["CXXFLAGS"]) | |
426 | sub(" CXXFLAGS", "") | |
427 | # Is there still something? | |
428 | if (/^export[ ]*$/) | |
429 | next | |
430 | } | |
2d74be7e | 431 | |
db9b1bf2 | 432 | # quote CC |
2d74be7e ER |
433 | if (/CC=%{__cc} /) { |
434 | sub("CC=%{__cc}", "CC=\"%{__cc}\"") | |
435 | } | |
b34b8660 | 436 | |
e6f1551d | 437 | # use PLD Linux macros |
b34b8660 ER |
438 | $0 = fixedsub("glib-gettextize --copy --force","%{__glib_gettextize}", $0); |
439 | $0 = fixedsub("intltoolize --copy --force", "%{__intltoolize}", $0); | |
db9b1bf2 | 440 | $0 = fixedsub("automake --add-missing --copy", "%{__automake}", $0); |
56699a32 | 441 | $0 = fixedsub("automake -a --foreign --copy", "%{__automake}", $0); |
4e26c5f2 | 442 | $0 = fixedsub("automake -a -c --foreign", "%{__automake}", $0); |
ebeed758 | 443 | $0 = fixedsub("automake -a -c", "%{__automake}", $0); |
56699a32 ER |
444 | $0 = fixedsub("libtoolize --force --automake --copy", "%{__libtoolize}", $0); |
445 | $0 = fixedsub("libtoolize -c -f --automake", "%{__libtoolize}", $0); | |
db9b1bf2 ER |
446 | |
447 | sub(/^aclocal$/, "%{__aclocal}"); | |
448 | sub(/^autoheader$/, "%{__autoheader}"); | |
449 | sub(/^autoconf$/, "%{__autoconf}"); | |
450 | sub(/^automake$/, "%{__automake}"); | |
ebeed758 | 451 | sub(/^libtoolize$/, "%{__libtoolize}"); |
f171fd40 | 452 | |
5e15e952 ER |
453 | # atrpms |
454 | $0 = fixedsub("%perl_configure", "%{__perl} Makefile.PL \\\n\tINSTALLDIRS=vendor", $0); | |
455 | $0 = fixedsub("%perl_makecheck", "%{?with_tests:%{__make} test}", $0); | |
bf0a58ea | 456 | } |
457 | ||
246ad57e | 458 | ########## |
459 | # %clean # | |
460 | ########## | |
93e2a87a | 461 | /^%clean/, (!/^%clean/ && $0 ~ SECTIONS) { |
1c52b18e | 462 | did_clean = 1 |
e6f1551d | 463 | |
b6875e34 | 464 | use_macros() |
1c52b18e SZ |
465 | } |
466 | ||
246ad57e | 467 | ############ |
468 | # %install # | |
469 | ############ | |
93e2a87a | 470 | /^%install/, (!/^%install/ && $0 ~ SECTIONS) { |
f171fd40 | 471 | |
aec1bddb | 472 | preamble = 0 |
f171fd40 | 473 | |
ec0082cc | 474 | # foreign rpms |
624df313 | 475 | sub("^%{__rm} -rf %{buildroot}", "rm -rf $RPM_BUILD_ROOT") |
b6875e34 ER |
476 | sub("%buildroot", "$RPM_BUILD_ROOT"); |
477 | sub("%{buildroot}", "$RPM_BUILD_ROOT"); | |
ec0082cc | 478 | |
624df313 | 479 | if (/^[ \t]*rm([ \t]+-[rf]+)*[ \t]+(\${?RPM_BUILD_ROOT}?|%{?buildroot}?)/ && did_rmroot==0) { |
1c52b18e | 480 | did_rmroot=1 |
dda3eaa5 SZ |
481 | print "rm -rf $RPM_BUILD_ROOT" |
482 | next | |
483 | } | |
43c05c3c | 484 | |
1c52b18e | 485 | if (!/^(#?[ \t]*)$/ && !/^%install/ && did_rmroot==0) { |
dda3eaa5 | 486 | print "rm -rf $RPM_BUILD_ROOT" |
1c52b18e | 487 | did_rmroot=1 |
dda3eaa5 | 488 | } |
f171fd40 | 489 | |
b6875e34 ER |
490 | if (tmpdir) { |
491 | buildroot = tmpdir "/" name "-" version "-root-" ENVIRON["USER"] | |
3d8be7c3 | 492 | gsub(buildroot, "$RPM_BUILD_ROOT") |
b6875e34 | 493 | } |
3d8be7c3 | 494 | |
b6875e34 ER |
495 | if (!/%{_lib}/) { |
496 | sub("\$RPM_BUILD_ROOT/%", "$RPM_BUILD_ROOT%") | |
497 | } | |
259883bf | 498 | |
dda3eaa5 | 499 | use_macros() |
f171fd40 | 500 | |
bf0a58ea | 501 | # 'install -d' instead 'mkdir -p' |
502 | if (/mkdir -p/) | |
aec1bddb | 503 | sub(/mkdir -p/, "install -d") |
fde90d94 | 504 | |
48409aee | 505 | # cp -a already implies cp -r |
b6875e34 | 506 | sub(/^cp -ar/, "cp -a") |
f171fd40 | 507 | |
43c05c3c | 508 | # No '-u root' or '-g root' for 'install' |
681a4871 | 509 | if (/^install/ && /-[ug][ \t]*root/) |
aec1bddb | 510 | gsub(/-[ug][ \t]*root /, "") |
f171fd40 | 511 | |
2016aa83 ER |
512 | if (/^install/ && /-m[ \t]*[0-9]+/) |
513 | gsub(/-m[ \t]*[0-9]+ /, "") | |
f171fd40 | 514 | |
f1991554 | 515 | # No lines contain 'chown' or 'chgrp' if owner/group is 'root' |
43c05c3c | 516 | if (($1 ~ /chown/ && $2 ~ /root\.root/) || ($1 ~ /chgrp/ && $2 ~ /root/)) |
aec1bddb | 517 | next |
f171fd40 | 518 | |
43c05c3c | 519 | # No lines contain 'chmod' if it sets the modes to '644' |
681a4871 | 520 | if ($1 ~ /chmod/ && $2 ~ /644/) |
aec1bddb | 521 | next |
5e15e952 | 522 | |
5e15e952 ER |
523 | # atrpms |
524 | $0 = fixedsub("%perl_makeinstall", "%{__make} pure_install \\\n\tDESTDIR=$RPM_BUILD_ROOT", $0); | |
bf0a58ea | 525 | } |
526 | ||
246ad57e | 527 | ########## |
528 | # %files # | |
529 | ########## | |
93e2a87a | 530 | /^%files/, (!/^%files/ && $0 ~ SECTIONS) { |
aec1bddb | 531 | preamble = 0 |
4ab1678b | 532 | did_files = 1 |
f171fd40 | 533 | |
1da27823 | 534 | if ($0 ~ /^%files/) |
aec1bddb | 535 | defattr = 1 |
f171fd40 | 536 | |
eee34ffb | 537 | use_files_macros() |
bf0a58ea | 538 | } |
539 | ||
246ad57e | 540 | ############## |
541 | # %changelog # | |
542 | ############## | |
93e2a87a | 543 | /^%changelog/, (!/^%changelog/ && $0 ~ SECTIONS) { |
aec1bddb | 544 | preamble = 0 |
dda3eaa5 | 545 | has_changelog = 1 |
97e21521 | 546 | skip = 0 |
bf0a58ea | 547 | # There should be some CVS keywords on the first line of %changelog. |
97e21521 | 548 | if (boc == 3) { |
4b7a9b6b | 549 | if ($0 !~ _cvsmailfeedback) { |
f6f0c932 | 550 | print "* %{date} " _cvsmailfeedback > changelog_file |
4b7a9b6b | 551 | } else { |
97e21521 | 552 | skip = 1 |
4b7a9b6b | 553 | } |
97e21521 | 554 | boc = 2 |
d31b8a48 | 555 | } |
97e21521 | 556 | if (boc == 2 && !skip) { |
d31b8a48 | 557 | if (!/All persons listed below/) { |
fd5e70be | 558 | printf "All persons listed below can be reached at " > changelog_file |
f6f0c932 | 559 | print "<cvs_login>" _cvsmaildomain "\n" > changelog_file |
4b7a9b6b | 560 | } else { |
97e21521 | 561 | skip = 1 |
4b7a9b6b | 562 | } |
44379e57 | 563 | boc = 1 |
bf0a58ea | 564 | } |
97e21521 JB |
565 | if (boc == 1 && !skip) { |
566 | if (!/^$/) { | |
4b7a9b6b | 567 | if (!/\$.*Log:.*\$/) { |
97e21521 | 568 | print "$" "Log:$" > changelog_file |
4b7a9b6b | 569 | } |
97e21521 JB |
570 | boc = 0 |
571 | } | |
d31b8a48 | 572 | } |
3fdddc43 | 573 | # Define date macro. |
d31b8a48 | 574 | if (boc == 4) { |
a1aa4976 | 575 | if (date == 0) { |
5c18171e | 576 | printf "%%define date\t%%(echo `LC_ALL=\"C\"" > changelog_file |
577 | print " date +\"%a %b %d %Y\"`)" > changelog_file | |
1395ea1c | 578 | date = 1 |
a1aa4976 | 579 | } |
d31b8a48 | 580 | boc = 3 |
3fdddc43 | 581 | } |
5c18171e | 582 | |
4b7a9b6b ER |
583 | sub(/[ \t]+$/, ""); |
584 | if (!/^%[a-z]+$/ || /changelog/) { | |
585 | # stop changelog if "real" changelog starts | |
586 | if (boc == 0 && /^\* /) { | |
587 | boc = -1 | |
588 | } | |
589 | if (boc == -1) { | |
590 | next; | |
591 | } | |
5c18171e | 592 | print > changelog_file |
4b7a9b6b | 593 | } else { |
5c18171e | 594 | |
4b7a9b6b | 595 | } |
5c18171e | 596 | next |
bf0a58ea | 597 | } |
598 | ||
246ad57e | 599 | ########### |
600 | # SCRIPTS # | |
601 | ########### | |
93e2a87a | 602 | /^%pre/, (!/^%pre/ && $0 ~ SECTIONS) { |
246ad57e | 603 | preamble = 0 |
e9176470 | 604 | |
723ce732 ER |
605 | if (gsub("/usr/sbin/useradd", "%useradd")) { |
606 | sub(" 2> /dev/null \|\| :", ""); | |
607 | sub(" >/dev/null 2>&1 \|\|:", ""); | |
608 | } | |
609 | ||
e9176470 ER |
610 | # %useradd and %groupadd may not be wrapped |
611 | if (/%(useradd|groupadd).*\\$/) { | |
612 | a = $0; getline; | |
613 | sub(/^[\s\t]*/, ""); | |
614 | $0 = substr(a, 1, length(a) - 1) $0; | |
615 | } | |
723ce732 | 616 | use_script_macros() |
246ad57e | 617 | } |
e9176470 | 618 | |
93e2a87a | 619 | /^%post/, (!/^%post/ && $0 ~ SECTIONS) { |
246ad57e | 620 | preamble = 0 |
c2b069de | 621 | use_macros() |
246ad57e | 622 | } |
93e2a87a | 623 | /^%preun/, (!/^%preun/ && $0 ~ SECTIONS) { |
246ad57e | 624 | preamble = 0 |
d11acde9 | 625 | use_macros() |
246ad57e | 626 | } |
93e2a87a | 627 | /^%postun/, (!/^%postun/ && $0 ~ SECTIONS) { |
246ad57e | 628 | preamble = 0 |
723ce732 | 629 | use_script_macros() |
246ad57e | 630 | } |
93e2a87a | 631 | /^%triggerin/, (!/^%triggerin/ && $0 ~ SECTIONS) { |
bdba3986 | 632 | preamble = 0 |
723ce732 | 633 | use_script_macros() |
bdba3986 | 634 | } |
93e2a87a | 635 | /^%triggerun/, (!/^%triggerun/ && $0 ~ SECTIONS) { |
bdba3986 | 636 | preamble = 0 |
723ce732 | 637 | use_script_macros() |
bdba3986 | 638 | } |
93e2a87a | 639 | /^%triggerpostun/, (!/^%triggerpostun/ && $0 ~ SECTIONS) { |
bdba3986 | 640 | preamble = 0 |
723ce732 | 641 | use_script_macros() |
bdba3986 | 642 | } |
93e2a87a | 643 | /^%pretrans/, (!/^%pretrans/ && $0 ~ SECTIONS) { |
bdba3986 | 644 | preamble = 0 |
723ce732 | 645 | use_script_macros() |
bdba3986 | 646 | } |
93e2a87a | 647 | /^%posttrans/, (!/^%posttrans/ && $0 ~ SECTIONS) { |
bdba3986 | 648 | preamble = 0 |
723ce732 | 649 | use_script_macros() |
bdba3986 | 650 | } |
0ae11f54 ER |
651 | /^%verifyscript/, (!/^%verifyscript/ && $0 ~ SECTIONS) { |
652 | preamble = 0 | |
723ce732 | 653 | use_script_macros() |
0ae11f54 ER |
654 | } |
655 | /^%check/, (!/^%check/ && $0 ~ SECTIONS) { | |
656 | preamble = 0 | |
723ce732 | 657 | use_script_macros() |
0ae11f54 | 658 | } |
246ad57e | 659 | |
660 | ############# | |
661 | # PREAMBLES # | |
662 | ############# | |
bf0a58ea | 663 | preamble == 1 { |
681a4871 | 664 | # There should not be a space after the name of field |
665 | # and before the colon. | |
aec1bddb | 666 | sub(/[ \t]*:/, ":") |
f171fd40 | 667 | |
1462d6a3 ER |
668 | if (/^%perl_module_wo_prefix/) { |
669 | name = $2 | |
670 | version = $3 | |
671 | release = "0." fixedsub(".%{disttag}.at", "", $4) | |
672 | } | |
673 | ||
aec1bddb | 674 | field = tolower($1) |
db170a71 | 675 | fieldnlower = $1 |
38cb34ef | 676 | if (field ~ /summary:/ && !/etc\.$/ && !/Inc\.$/) { |
024709c6 ER |
677 | sub(/\.$/, "", $0); |
678 | } | |
f37c1259 | 679 | if (field ~ /group(\([^)]+\)):/) |
1a5b27d5 | 680 | next |
f37c1259 | 681 | if (field ~ /group:/) { |
682 | format_preamble() | |
d9e2bd9b ER |
683 | group = $0; |
684 | sub(/^[^ \t]*[ \t]*/, "", group); | |
ad9ea417 | 685 | group = replace_groupnames(group); |
d9e2bd9b ER |
686 | $0 = "Group:\t\t" group |
687 | ||
688 | if (group ~ /^X11/ && x11 == 0) # Is it X11 application? | |
7a72f436 | 689 | x11 = 1 |
8e5358f8 | 690 | |
d9e2bd9b | 691 | byl_plik_z_groupmi = 0 |
8e5358f8 SZ |
692 | byl_opis_grupy = 0 |
693 | while ((getline linia_grup < groups_file) > 0) { | |
d9e2bd9b ER |
694 | byl_plik_z_groupmi = 1 |
695 | if (linia_grup == group) { | |
8e5358f8 SZ |
696 | byl_opis_grupy = 1 |
697 | break | |
698 | } | |
699 | } | |
69501a12 | 700 | |
d9e2bd9b | 701 | if (!byl_plik_z_groupmi) |
8e5358f8 SZ |
702 | print "######\t\t" groups_file ": no such file" |
703 | else if (!byl_opis_grupy) | |
704 | print "######\t\t" "Unknown group!" | |
f171fd40 | 705 | |
8e5358f8 | 706 | close(groups_file) |
4ab1678b | 707 | did_groups = 1 |
8e5358f8 | 708 | } |
f171fd40 | 709 | |
307f5229 | 710 | if (field ~ /prereq:/) { |
a68f7b3b | 711 | sub(/Pre[Rr]eq:/, "Requires:", $1); |
307f5229 ER |
712 | } |
713 | ||
4aa6db15 | 714 | # split (build)requires, obsoletes on commas |
44ff0c79 | 715 | if (field ~ /(obsoletes|requires|provides|conflicts):/ && NF > 2) { |
ba377afe ER |
716 | value = substr($0, index($0, $2)); |
717 | $0 = format_requires($1, value); | |
f12ab15d | 718 | } |
b6875e34 | 719 | |
8e734165 ER |
720 | # BR: tar (and others) is to common (rpm-build requires it) |
721 | if (field ~ /^buildrequires:/) { | |
eb028bca ER |
722 | l = substr($0, index($0, $2)); |
723 | if (l == "awk" || | |
724 | l == "binutils" || | |
725 | l == "bzip2" || | |
726 | l == "cpio" || | |
727 | l == "diffutils" || | |
728 | l == "elfutils" || | |
729 | l == "fileutils" || | |
730 | l == "findutils" || | |
731 | l == "glibc-devel" || | |
732 | l == "grep" || | |
733 | l == "gzip" || | |
734 | l == "make" || | |
735 | l == "patch" || | |
736 | l == "sed" || | |
737 | l == "sh-utils" || | |
738 | l == "tar" || | |
739 | l == "textutils") { | |
8e734165 ER |
740 | next |
741 | } | |
d0297fb3 | 742 | |
92fa789e | 743 | replace_requires(); |
8e734165 ER |
744 | } |
745 | ||
30cd4686 | 746 | if (field ~ /^requires:/) { |
92fa789e | 747 | replace_requires(); |
b6875e34 | 748 | } |
30cd4686 ER |
749 | |
750 | ||
ff21ed9e | 751 | # obsolete/unwanted tags |
32908bc5 | 752 | if (field ~ /vendor:|packager:|distribution:|docdir:|prefix:|icon:|author:|author-email:|metadata-version:/) { |
aec1bddb | 753 | next |
ba377afe | 754 | } |
f171fd40 | 755 | |
4ab1678b | 756 | if (field ~ /buildroot:/) { |
376e6bc4 | 757 | $0 = $1 "%{tmpdir}/%{name}-%{version}-root-%(id -u -n)" |
4ab1678b ER |
758 | did_build_root = 1 |
759 | } | |
681a4871 | 760 | |
681a4871 | 761 | # Use "License" instead of "Copyright" if it is (L)GPL or BSD |
4932d2c6 | 762 | if (field ~ /copyright:/ && $2 ~ /GPL|BSD/) { |
aec1bddb | 763 | $1 = "License:" |
4932d2c6 | 764 | } |
f171fd40 | 765 | |
3b07e07f ER |
766 | if (field ~ /license:/) { |
767 | l = substr($0, index($0, $2)); | |
768 | if (l == "Python Software Foundation License") { | |
769 | l = "PSF" | |
770 | } | |
6112ae02 ER |
771 | if (l == "Apache License 2.0" || l == "Apache 2.0" || l == "Apache License Version 2.0" || l == "Apache License, Version 2.0" || l == "Apache Software License v2") { |
772 | l = "Apache v2.0" | |
773 | } | |
774 | if (l == "Apache Group License" || l == "Apache Software License" || l == "Apache License") { | |
775 | l = "Apache" | |
776 | } | |
777 | if (l == "Apache-style License" || l == "Apache-style Software License") { | |
778 | l = "Apache-like" | |
779 | } | |
780 | if (l == "Apache Software License 1.1" || l == "Apache 1.1") { | |
781 | l = "Apache v1.1" | |
782 | } | |
ee9487af ER |
783 | if (l == "GPLv2") { |
784 | l = "GPL v2" | |
785 | } | |
786 | if (l == "GPLv2+") { | |
787 | l = "GPL v2+" | |
788 | } | |
3b07e07f ER |
789 | $0 = "License:\t" l; |
790 | } | |
791 | ||
792 | ||
1462d6a3 | 793 | if (field ~ /name:/) { |
6426afb8 | 794 | if ($2 == "%{name}" && name) { |
63d47bae ER |
795 | $2 = name |
796 | } | |
aec1bddb | 797 | name = $2 |
1462d6a3 ER |
798 | name_seen = 1; |
799 | } | |
681a4871 | 800 | |
1462d6a3 | 801 | if (field ~ /version:/) { |
63d47bae ER |
802 | if ($2 == "%{version}" && version) { |
803 | $2 = version | |
804 | } | |
aec1bddb | 805 | version = $2 |
1462d6a3 ER |
806 | version_seen = 1; |
807 | } | |
808 | ||
809 | if (field ~ /release:/) { | |
63d47bae ER |
810 | if ($2 == "%{release}" && release) { |
811 | $2 = release | |
812 | } | |
4ab1678b | 813 | sub(/%atrelease /, "0.", $0) |
1462d6a3 ER |
814 | release = $2 |
815 | release_seen = 1; | |
816 | } | |
681a4871 | 817 | |
32908bc5 | 818 | |
c4dde22b SZ |
819 | if (field ~ /serial:/) |
820 | $1 = "Epoch:" | |
b6853342 | 821 | |
32908bc5 ER |
822 | if (field ~ /home-page:/) |
823 | $1 = "URL:" | |
824 | ||
89b1cd55 | 825 | # proper caps |
cf038723 | 826 | if (field ~ /^url:$/) |
89b1cd55 ER |
827 | $1 = "URL:" |
828 | ||
32908bc5 ER |
829 | if (field ~ /^description:$/) |
830 | $1 = "\n%description\n" | |
831 | ||
681a4871 | 832 | # Use %{name} and %{version} in the filenames in "Source:" |
f4cb1924 | 833 | if (field ~ /^source/ || field ~ /patch/) { |
aec1bddb | 834 | n = split($2, url, /\//) |
fd8718a5 SZ |
835 | if (url[n] ~ /\.gz$/) { |
836 | url[n+1] = ".gz" url[n+1] | |
837 | sub(/\.gz$/,"",url[n]) | |
838 | } | |
839 | if (url[n] ~ /\.zip$/) { | |
840 | url[n+1] = ".zip" url[n+1] | |
841 | sub(/\.zip$/,"",url[n]) | |
842 | } | |
843 | if (url[n] ~ /\.tar$/) { | |
844 | url[n+1] = ".tar" url[n+1] | |
845 | sub(/\.tar$/,"",url[n]) | |
846 | } | |
847 | if (url[n] ~ /\.patch$/) { | |
848 | url[n+1] = ".patch" url[n+1] | |
849 | sub(/\.patch$/,"",url[n]) | |
850 | } | |
851 | if (url[n] ~ /\.bz2$/) { | |
852 | url[n+1] = ".bz2" url[n+1] | |
853 | sub(/\.bz2$/,"",url[n]) | |
854 | } | |
dac4e142 SZ |
855 | if (url[n] ~ /\.logrotate$/) { |
856 | url[n+1] = ".logrotate" url[n+1] | |
857 | sub(/\.logrotate$/,"",url[n]) | |
858 | } | |
859 | if (url[n] ~ /\.pamd$/) { | |
860 | url[n+1] = ".pamd" url[n+1] | |
861 | sub(/\.pamd$/,"",url[n]) | |
862 | } | |
863 | ||
a3fcc309 | 864 | # allow %{name} only in last url component |
ced0372e ER |
865 | s = "" |
866 | for (i = 1; i <= n; i++) { | |
867 | url[i] = fixedsub("%{name}", name, url[i]) | |
868 | if (s) { | |
869 | s = s "/" url[i] | |
870 | } else { | |
871 | s = url[i] | |
872 | } | |
873 | } | |
874 | $2 = s url[n+1] | |
875 | ||
aec1bddb | 876 | filename = url[n] |
5e028343 ER |
877 | if (name) { |
878 | url[n] = fixedsub(name, "%{name}", url[n]) | |
879 | } | |
755ab9c0 | 880 | if (field ~ /source/) { |
5e028343 ER |
881 | if (version) { |
882 | url[n] = fixedsub(version, "%{version}", url[n]) | |
883 | } | |
755ab9c0 ER |
884 | if (_beta) { |
885 | url[n] = fixedsub(_beta, "%{_beta}", url[n]) | |
886 | } | |
887 | if (_rc) { | |
888 | url[n] = fixedsub(_rc, "%{_rc}", url[n]) | |
889 | } | |
59de1799 ER |
890 | if (_pre) { |
891 | url[n] = fixedsub(_pre, "%{_pre}", url[n]) | |
892 | } | |
755ab9c0 ER |
893 | if (_snap) { |
894 | url[n] = fixedsub(_snap, "%{_snap}", url[n]) | |
895 | } | |
3c5e6e5f ER |
896 | if (subver) { |
897 | url[n] = fixedsub(subver, "%{subver}", url[n]) | |
898 | } | |
755ab9c0 | 899 | } |
57caba32 | 900 | # assigning to $2 kills preamble formatting |
fd8718a5 | 901 | $2 = fixedsub(filename, url[n], $2) |
f171fd40 | 902 | |
8ea8f0ae | 903 | $2 = unify_url($2) |
681a4871 | 904 | } |
8b1938ea | 905 | |
f171fd40 | 906 | |
f4cb1924 | 907 | if (field ~ /^source:/) |
f171fd40 | 908 | $1 = "Source0:" |
aec1bddb | 909 | |
13b24a87 | 910 | if (field ~ /^patch:/) |
aec1bddb | 911 | $1 = "Patch0:" |
f171fd40 | 912 | |
0ea7c3cd | 913 | kill_preamble_macros(); |
aec1bddb | 914 | format_preamble() |
f171fd40 | 915 | |
c26ee7ef ER |
916 | if (field ~ /requires/) { |
917 | # atrpms | |
918 | $0 = fixedsub("%{eversion}", "%{epoch}:%{version}-%{release}", $0); | |
919 | } | |
bf0a58ea | 920 | } |
921 | ||
4c1b7426 ER |
922 | /^%bcond_/ { |
923 | # do nothing | |
924 | ||
925 | next | |
926 | } | |
c58d1357 ER |
927 | |
928 | # sort BR/R! | |
929 | # | |
930 | # NOTES: | |
931 | # - mixing BR/R and anything else confuses this (all will be sorted together) | |
b6875e34 | 932 | # so don't do that. |
c58d1357 | 933 | # - comments leading the BR/R can not be associated, |
b6875e34 | 934 | # so don't adapterize when the BR/R are mixed with comments |
c58d1357 | 935 | ENVIRON["SKIP_SORTBR"] != 1 && preamble == 1 && $0 ~ PREAMBLE_TAGS, $0 ~ PREAMBLE_TAGS { |
57caba32 | 936 | if ($1 ~ /Pre[Rr]eq:/) { |
a68f7b3b | 937 | sub(/Pre[Rr]eq:/, "Requires:", $1); |
c58d1357 | 938 | } |
23ddcab1 ER |
939 | if ($1 == "BR:" ) { |
940 | $1 = "BuildRequires:" | |
941 | } | |
942 | if ($1 == "R:" ) { | |
943 | $1 = "Requires:" | |
944 | } | |
c58d1357 | 945 | format_preamble() |
8f7c516b | 946 | # kill_preamble_macros(); # breaks tabbing |
c58d1357 ER |
947 | |
948 | b_idx++; | |
949 | l = substr($0, index($0, $2)); | |
950 | b_ktmp = b_makekey($1, l); | |
951 | b_key[b_idx] = b_ktmp; | |
952 | b_val[b_ktmp] = $0; | |
953 | ||
954 | next; | |
955 | } | |
956 | ||
c58d1357 ER |
957 | preamble == 1 { |
958 | if (b_idx > 0) { | |
959 | isort(b_key, b_idx); | |
960 | for (i = 1; i <= b_idx; i++) { | |
4932d2c6 ER |
961 | v = b_val[b_key[i]]; |
962 | sub(/[ \t]+$/, "", v); | |
963 | print "" v; | |
c58d1357 ER |
964 | } |
965 | b_idx = 0 | |
966 | } | |
967 | } | |
968 | ||
7a72f436 | 969 | # main() ;-) |
bf0a58ea | 970 | { |
aec1bddb | 971 | preamble = 1 |
f171fd40 | 972 | |
70a1dc9e | 973 | sub(/[ \t]+$/, "") |
aec1bddb | 974 | |
1462d6a3 ER |
975 | |
976 | if (name_seen == 0 && name) { | |
31702e1e | 977 | print "Name:\t\t" name |
1462d6a3 ER |
978 | name_seen = 1 |
979 | } | |
980 | ||
981 | if (version_seen == 0 && version) { | |
982 | print "Version:\t" version | |
983 | version_seen = 1 | |
984 | } | |
985 | ||
986 | if (release_seen == 0 && release) { | |
987 | print "Release:\t" release | |
988 | release_seen = 1 | |
989 | } | |
32908bc5 ER |
990 | |
991 | if (did_build_root == 0) { | |
4ab1678b | 992 | # print "BuildRoot:\t%{tmpdir}/%{name}-%{version}-root-%(id -u -n)" |
32908bc5 ER |
993 | did_build_root = 1 |
994 | } | |
4ab1678b ER |
995 | if (did_groups == 0) { |
996 | # print "Group:\t\tunknown" | |
997 | did_groups = 1 | |
998 | } | |
a1aa4976 | 999 | } |
1000 | ||
f1991554 | 1001 | |
a1aa4976 | 1002 | END { |
eee34ffb | 1003 | if (do_not_touch_anything) |
1004 | exit 0 | |
f171fd40 | 1005 | |
b6875e34 ER |
1006 | # TODO: need to output these in proper place |
1007 | if (BR_count > 0) { | |
1008 | for (i = 0; i <= BR_count; i++) { | |
1009 | print BR[i]; | |
1010 | } | |
1011 | } | |
1c955424 | 1012 | |
f1991554 | 1013 | close(changelog_file) |
1014 | while ((getline < changelog_file) > 0) | |
1015 | ||
1016 | system("rm -f " changelog_file) | |
48c6019c | 1017 | |
1c52b18e SZ |
1018 | if (did_clean == 0) { |
1019 | print "" | |
1020 | print "%clean" | |
1021 | print "rm -rf $RPM_BUILD_ROOT" | |
1022 | } | |
1023 | ||
dda3eaa5 SZ |
1024 | if (date == 0) { |
1025 | print "" | |
1026 | print "%define date\t%(echo `LC_ALL=\"C\" date +\"%a %b %d %Y\"`)" | |
1027 | } | |
f171fd40 | 1028 | |
1c955424 | 1029 | if (has_changelog == 0) { |
1395ea1c | 1030 | print "%changelog" |
b6875e34 | 1031 | } |
dda3eaa5 | 1032 | |
1c955424 | 1033 | if (boc > 2) { |
5bdbef27 | 1034 | print "* %{date} PLD Team <feedback@pld-linux.org>" |
b6875e34 | 1035 | } |
d31b8a48 | 1036 | if (boc > 1) { |
f818cd64 | 1037 | printf "All persons listed below can be reached at " |
5bdbef27 | 1038 | print "<cvs_login>@pld-linux.org\n" |
a1aa4976 | 1039 | } |
1c955424 | 1040 | if (boc > 0) { |
d31b8a48 | 1041 | print "$" "Log:$" |
b6875e34 | 1042 | } |
bf0a58ea | 1043 | } |
1044 | ||
7a72f436 | 1045 | function fixedsub(s1,s2,t, ind) { |
fd8718a5 | 1046 | # substitutes fixed strings (not regexps) |
7a72f436 | 1047 | if (ind = index(t,s1)) |
1048 | t = substr(t, 1, ind-1) s2 substr(t, ind+length(s1)) | |
1049 | return t | |
fd8718a5 SZ |
1050 | } |
1051 | ||
8b1938ea | 1052 | # There should be one or two tabs after the colon. |
1053 | function format_preamble() | |
1054 | { | |
57caba32 | 1055 | if (/^#/ || /^%bcond_with/) { |
08f60a73 ER |
1056 | return; |
1057 | } | |
aec1bddb | 1058 | sub(/:[ \t]*/, ":") |
2b94cfb4 ER |
1059 | if (match($0, /[A-Za-z0-9(),#_ \t.-]+[ \t]*:[ \t]*/) == 1) { |
1060 | if (RLENGTH < 8) { | |
aec1bddb | 1061 | sub(/:/, ":\t\t") |
b6875e34 | 1062 | } else { |
aec1bddb | 1063 | sub(/:/, ":\t") |
b6875e34 | 1064 | } |
8b1938ea | 1065 | } |
1066 | } | |
1067 | ||
43c05c3c | 1068 | # Replace directly specified directories with macros |
1069 | function use_macros() | |
1070 | { | |
13b24a87 ER |
1071 | # -m, --skip-macros, --no-macros -- skip macros subst |
1072 | if (ENVIRON["SKIP_MACROS"]) { | |
1073 | return | |
1074 | } | |
1075 | ||
b05d5275 ER |
1076 | # leave inline sed lines alone |
1077 | if (/(%{__sed}|sed) -i -e/) { | |
1078 | return; | |
1079 | } | |
1080 | ||
b6875e34 ER |
1081 | sub("%{_defaultdocdir}", "%{_docdir}"); |
1082 | sub("%{_bindir}/perl", "%{__perl}"); | |
1083 | sub("%{_bindir}/python", "%{__python}"); | |
36d9a33d | 1084 | |
a372a159 ER |
1085 | gsub(infodir, "%{_infodir}") |
1086 | ||
336c1a4f ER |
1087 | gsub(perl_sitearch, "%{perl_sitearch}") |
1088 | gsub(perl_archlib, "%{perl_archlib}") | |
1089 | gsub(perl_privlib, "%{perl_privlib}") | |
336c1a4f ER |
1090 | gsub(perl_vendorlib, "%{perl_vendorlib}") |
1091 | gsub(perl_vendorarch, "%{perl_vendorarch}") | |
1092 | gsub(perl_sitelib, "%{perl_sitelib}") | |
9732cb3d ER |
1093 | |
1094 | gsub(py_sitescriptdir, "%{py_sitescriptdir}") | |
4ab1678b | 1095 | gsub(py_sitedir, "%{py_sitedir}") |
1bdf7824 | 1096 | gsub(py_scriptdir, "%{py_scriptdir}") |
4a62fb54 | 1097 | gsub("%{_libdir}/python2.4/site-packages", "%{py_sitedir}") |
22ee0568 | 1098 | gsub("%{python_sitelib}", "%{py_sitedir}") |
6f2c1099 ER |
1099 | |
1100 | gsub(ruby_archdir, "%{ruby_archdir}") | |
1101 | gsub(ruby_ridir, "%{ruby_ridir}") | |
1102 | gsub(ruby_rubylibdir, "%{ruby_rubylibdir}") | |
1103 | gsub(ruby_sitearchdir, "%{ruby_sitearchdir}") | |
1104 | gsub(ruby_sitelibdir, "%{ruby_sitelibdir}") | |
1105 | ||
4a62fb54 ER |
1106 | gsub("%{_datadir}/applications", "%{_desktopdir}") |
1107 | gsub("%{_datadir}/pixmaps", "%{_pixmapsdir}") | |
ee9487af | 1108 | gsub("%{_datadir}/java", "%{_javadir}") |
336c1a4f | 1109 | |
e00f41b5 | 1110 | gsub(libdir, "%{_libdir}") |
ee9487af | 1111 | gsub(javadir, "%{_javadir}") |
e00f41b5 | 1112 | |
aec1bddb | 1113 | gsub(bindir, "%{_bindir}") |
74edc57e | 1114 | gsub("%{prefix}/bin", "%{_bindir}") |
b05d5275 | 1115 | if (prefix"/bin" == bindir) |
0080f34c | 1116 | gsub("%{_prefix}/bin", "%{_bindir}") |
74edc57e | 1117 | |
de69503c | 1118 | for (c = 1; c <= NF; c++) { |
1119 | if ($c ~ sbindir "/fix-info-dir") | |
1120 | continue; | |
3457b4f7 ER |
1121 | if ($c ~ sbindir "/webapp") |
1122 | continue; | |
a372a159 ER |
1123 | if ($c ~ sbindir "/ldconfig") |
1124 | continue; | |
4837c1e3 ER |
1125 | if ($c ~ sbindir "/chsh") |
1126 | continue; | |
1127 | if ($c ~ sbindir "/usermod") | |
1128 | continue; | |
f06959ff ER |
1129 | if ($c ~ sbindir "/chkconfig") |
1130 | continue; | |
836e411f ER |
1131 | if ($c ~ sbindir "/installzope(product|3package)") |
1132 | continue; | |
de69503c | 1133 | gsub(sbindir, "%{_sbindir}", $c) |
1134 | } | |
1135 | ||
74edc57e | 1136 | gsub("%{prefix}/sbin", "%{_sbindir}") |
836e411f | 1137 | if (prefix"/sbin" == sbindir) { |
5e1d0492 | 1138 | gsub("%{_prefix}/sbin", "%{_sbindir}") |
836e411f | 1139 | } |
74edc57e | 1140 | |
353f5eea | 1141 | for (c = 1; c <= NF; c++) { |
0965a1a0 | 1142 | if ($c ~ sysconfdir "/{?cron.") |
de69503c | 1143 | continue; |
0080f34c | 1144 | if ($c ~ sysconfdir "/{?crontab.d") |
807a0f6b | 1145 | continue; |
6c178315 ER |
1146 | if ($c ~ sysconfdir "/{?env.d") |
1147 | continue; | |
90a421f5 | 1148 | if ($c ~ sysconfdir "/{?modprobe.(d|conf)") |
554d6b98 | 1149 | continue; |
5d7c48a4 ER |
1150 | if ($c ~ sysconfdir "/{?udev") |
1151 | continue; | |
1152 | if ($c ~ sysconfdir "/{?hotplug") | |
e61b5989 | 1153 | continue; |
0080f34c | 1154 | if ($c ~ sysconfdir "/{?logrotate.d") |
353f5eea | 1155 | continue; |
0080f34c | 1156 | if ($c ~ sysconfdir "/{?pam.d") |
a9b2c8c7 | 1157 | continue; |
0080f34c | 1158 | if ($c ~ sysconfdir "/{?profile.d") |
66ef7810 | 1159 | continue; |
0080f34c | 1160 | if ($c ~ sysconfdir "/{?rc.d") |
9ad7f20b | 1161 | continue; |
0080f34c | 1162 | if ($c ~ sysconfdir "/{?security") |
a9b2c8c7 | 1163 | continue; |
0080f34c | 1164 | if ($c ~ sysconfdir "/{?skel") |
c21d1979 | 1165 | continue; |
0080f34c | 1166 | if ($c ~ sysconfdir "/{?sysconfig") |
66ef7810 | 1167 | continue; |
6e985933 ER |
1168 | if ($c ~ sysconfdir "/{?shrc.d") |
1169 | continue; | |
7c73bc0f ER |
1170 | if ($c ~ sysconfdir "/{?certs") |
1171 | continue; | |
de5d18d8 ER |
1172 | if ($c ~ sysconfdir "/{?X11") |
1173 | continue; | |
5debd9f6 ER |
1174 | if ($c ~ sysconfdir "/{?ld.so.conf.d") |
1175 | continue; | |
ff21ed9e ER |
1176 | if ($c ~ sysconfdir "/{?rpm") |
1177 | continue; | |
57caba32 | 1178 | if ($c ~ sysconfdir "/{?bash_completion.d") |
6e985933 | 1179 | continue; |
57caba32 | 1180 | if ($c ~ sysconfdir "/{?samba") |
9292b547 | 1181 | continue; |
52a943cf ER |
1182 | if ($c ~ sysconfdir "/shells") |
1183 | continue; | |
5dc7f5e4 ER |
1184 | if ($c ~ sysconfdir "/ppp") |
1185 | continue; | |
9395915a ER |
1186 | if ($c ~ sysconfdir "/dbus-1") |
1187 | continue; | |
be827f42 ER |
1188 | if ($c ~ sysconfdir "/tmpwatch") |
1189 | continue; | |
353f5eea | 1190 | gsub(sysconfdir, "%{_sysconfdir}", $c) |
1191 | } | |
74edc57e | 1192 | |
c2b069de | 1193 | gsub(docdir, "%{_docdir}") |
7cb79e98 ER |
1194 | |
1195 | gsub(kdedocdir, "%{_kdedocdir}") | |
1196 | ||
1197 | gsub(gtkdocdir, "%{_gtkdocdir}") | |
1198 | gsub("%{_docdir}/gtk-doc/html", "%{_gtkdocdir}") | |
1199 | ||
57caba32 | 1200 | gsub(php_pear_dir, "%{php_pear_dir}") |
4b1d6e6d | 1201 | gsub(php_data_dir, "%{php_data_dir}") |
c2b069de | 1202 | |
c4adc376 ER |
1203 | for (c = 1; c <= NF; c++) { |
1204 | if ($c ~ datadir "/automake") | |
1205 | continue; | |
13670287 ER |
1206 | if ($c ~ datadir "/unsermake") |
1207 | continue; | |
a9fb2db8 ER |
1208 | if ($c ~ datadir "/file/magic.mime") |
1209 | continue; | |
c4adc376 ER |
1210 | gsub(datadir, "%{_datadir}", $c) |
1211 | } | |
1212 | ||
74edc57e | 1213 | gsub("%{prefix}/share", "%{_datadir}") |
c4adc376 | 1214 | if (prefix"/share" == datadir) |
0080f34c | 1215 | gsub("%{_prefix}/share", "%{_datadir}") |
74edc57e | 1216 | |
826b40ea ER |
1217 | # CFLAGS="-I/usr/include/ncurses is usually correct. |
1218 | if (!/-I\/usr\/include/) { | |
1219 | gsub(includedir, "%{_includedir}") | |
1220 | } | |
1221 | ||
74edc57e | 1222 | gsub("%{prefix}/include", "%{_includedir}") |
826b40ea | 1223 | if (prefix"/include" == includedir) { |
0080f34c | 1224 | gsub("%{_prefix}/include", "%{_includedir}") |
826b40ea | 1225 | } |
74edc57e | 1226 | |
aec1bddb | 1227 | gsub(mandir, "%{_mandir}") |
826b40ea | 1228 | if ($0 !~ "%{_datadir}/manual") { |
5e1d0492 | 1229 | gsub("%{_datadir}/man", "%{_mandir}") |
826b40ea | 1230 | } |
9ce0df66 | 1231 | gsub("%{_prefix}/share/man", "%{_mandir}") |
1232 | gsub("%{prefix}/share/man", "%{_mandir}") | |
74edc57e | 1233 | gsub("%{prefix}/man", "%{_mandir}") |
1234 | gsub("%{_prefix}/man", "%{_mandir}") | |
1235 | ||
aec1bddb | 1236 | gsub(infodir, "%{_infodir}") |
74edc57e | 1237 | gsub("%{prefix}/info", "%{_infodir}") |
1238 | gsub("%{_prefix}/info", "%{_infodir}") | |
1239 | ||
0965a1a0 | 1240 | if (prefix !~ "/X11R6") { |
1241 | gsub("%{_datadir}/aclocal", "%{_aclocaldir}") | |
1242 | } | |
cfbf94ec | 1243 | |
2a638fcb | 1244 | gsub(examplesdir, "%{_examplesdir}") |
7c6b85c4 | 1245 | |
efd2d668 | 1246 | if (prefix != "/") { |
a9fb2db8 ER |
1247 | # leave --with-foo=/usr alone |
1248 | if ($0 !~ "--with.*=.*" prefix) { | |
1249 | for (c = 1; c <= NF; c++) { | |
1250 | if ($c ~ prefix "/sbin/fix-info-dir") | |
1251 | continue; | |
3457b4f7 ER |
1252 | if ($c ~ prefix "/sbin/webapp") |
1253 | continue; | |
4837c1e3 ER |
1254 | if ($c ~ prefix "/sbin/chsh") |
1255 | continue; | |
1256 | if ($c ~ prefix "/sbin/usermod") | |
1257 | continue; | |
836e411f ER |
1258 | if ($c ~ prefix "/sbin/installzope(product|3package)") |
1259 | continue; | |
a9fb2db8 ER |
1260 | if ($c ~ prefix "/share/automake") |
1261 | continue; | |
1262 | if ($c ~ prefix "/share/unsermake") | |
1263 | continue; | |
1264 | if ($c ~ prefix "/lib/sendmail") | |
1265 | continue; | |
97dae8dc ER |
1266 | if ($c ~ prefix "/lib/pkgconfig") |
1267 | continue; | |
826b40ea | 1268 | |
b5fc4b79 ER |
1269 | # CFLAGS="-I/usr..." is usually correct. |
1270 | if (/-I\/usr/) | |
826b40ea | 1271 | continue; |
474f0944 ER |
1272 | # same for LDFLAGS="-L/usr..." |
1273 | if (/-L\/usr/) | |
1274 | continue; | |
826b40ea | 1275 | |
a9fb2db8 ER |
1276 | gsub(prefix, "%{_prefix}", $c) |
1277 | } | |
de69503c | 1278 | } |
efd2d668 | 1279 | gsub("%{prefix}", "%{_prefix}") |
1280 | } | |
3bcd1fab | 1281 | |
53d16b95 ER |
1282 | # replace back |
1283 | gsub("%{_includedir}/ncurses", "/usr/include/ncurses") | |
1284 | gsub("%{_includedir}/freetype", "/usr/include/freetype") | |
1285 | ||
3bcd1fab | 1286 | gsub("%{PACKAGE_VERSION}", "%{version}") |
1287 | gsub("%{PACKAGE_NAME}", "%{name}") | |
b35c10f1 | 1288 | |
59e208d5 | 1289 | gsub("^make$", "%{__make}") |
1290 | gsub("^make ", "%{__make} ") | |
61b753c5 | 1291 | gsub("^gcc ", "%{__cc} ") |
67fe737e | 1292 | gsub("^rm --interactive=never ", "%{__rm} ") |
9aece8c8 | 1293 | |
cab706de ER |
1294 | # mandrake specs |
1295 | gsub("^%make$", "%{__make}") | |
1296 | gsub("^%make ", "%{__make} ") | |
1297 | gsub("^%makeinstall_std", "%{__make} install \\\n\tDESTDIR=$RPM_BUILD_ROOT") | |
b7ca53a5 | 1298 | gsub("^%{makeinstall}", "%{__make} install \\\n\tDESTDIR=$RPM_BUILD_ROOT") |
63d47bae | 1299 | gsub("^%makeinstall", "%{__make} install \\\n\tDESTDIR=$RPM_BUILD_ROOT") |
cab706de | 1300 | gsub("^%{__rm} -rf %{buildroot}", "rm -rf $RPM_BUILD_ROOT") |
b7ca53a5 | 1301 | gsub("^%{__install}", "install") |
cab706de ER |
1302 | gsub("%optflags", "%{rpmcflags}") |
1303 | gsub("%{compat_perl_vendorarch}", "%{perl_vendorarch}") | |
1304 | ||
a6ed8b03 | 1305 | gsub("^%{__make} install DESTDIR=\$RPM_BUILD_ROOT", "%{__make} install \\\n\tDESTDIR=$RPM_BUILD_ROOT") |
d11acde9 | 1306 | gsub("^fix-info-dir$", "[ ! -x /usr/sbin/fix-info-dir ] || /usr/sbin/fix-info-dir -c %{_infodir} >/dev/null 2>\\&1") |
5e15e952 ER |
1307 | $0 = fixedsub("%buildroot", "$RPM_BUILD_ROOT", $0) |
1308 | $0 = fixedsub("%{buildroot}", "$RPM_BUILD_ROOT", $0) | |
63d47bae | 1309 | $0 = fixedsub("CXXFLAGS=%{rpmcflags} %configure", "CXXFLAGS=%{rpmcflags}\n%configure", $0); |
43f8581a | 1310 | $0 = fixedsub("%__install", "install", $0); |
63d47bae | 1311 | |
740e3cd8 ER |
1312 | # split configure line to multiple lines |
1313 | if (/%configure / && !/\\$/) { | |
1314 | $0 = format_configure($0); | |
1315 | } | |
1316 | ||
ac779c71 ER |
1317 | gsub("%_bindir", "%{_bindir}") |
1318 | gsub("%_datadir", "%{_datadir}") | |
1319 | gsub("%_iconsdir", "%{_iconsdir}") | |
c2b069de ER |
1320 | gsub("%_sbindir", "%{_sbindir}") |
1321 | gsub("%_mandir", "%{_mandir}") | |
1322 | gsub("%name", "%{name}") | |
b6875e34 ER |
1323 | gsub(/%__rm/, "rm"); |
1324 | gsub(/%__mkdir_p/, "install -d"); | |
1325 | gsub(/%__cp/, "cp"); | |
1326 | gsub(/%__ln_s/, "ln -s"); | |
1327 | gsub(/%__sed/, "%{__sed}"); | |
1328 | gsub(/%__cat/, "cat"); | |
1329 | gsub(/%__chmod/, "chmod"); | |
a6ed8b03 | 1330 | |
9aece8c8 | 1331 | gsub("/usr/src/linux", "%{_kernelsrcdir}") |
1332 | gsub("%{_prefix}/src/linux", "%{_kernelsrcdir}") | |
1c955424 | 1333 | |
ecaaa784 | 1334 | if (/^ant / || /^%{ant}/) { |
1c955424 | 1335 | sub(/^ant/, "%ant") |
ecaaa784 | 1336 | sub(/^%{ant}/, "%ant") |
b6875e34 ER |
1337 | add_br("BuildRequires: jpackage-utils"); |
1338 | add_br("BuildRequires: rpmbuild(macros) >= 1.300"); | |
1339 | } | |
1c955424 | 1340 | |
2dc1a8cd ER |
1341 | $0 = fixedsub("%(%{__cc} -dumpversion)", "%{cc_version}", $0); |
1342 | $0 = fixedsub("%(%{__cxx} -dumpversion)", "%{cxx_version}", $0); | |
9ae21f47 | 1343 | } |
f171fd40 | 1344 | |
740e3cd8 ER |
1345 | function format_configure(line, n, a, s) { |
1346 | n = split(line, a, / /); | |
1347 | s = a[1] " \\\n"; | |
1348 | for (i = 2; i <= n; i++) { | |
1349 | s = s "\t" a[i] " \\\n" | |
1350 | } | |
1351 | return s | |
1352 | } | |
1353 | ||
7c23055b ER |
1354 | |
1355 | # insertion sort of A[1..n] | |
1356 | # copied from mawk manual | |
1357 | function isort(A,n, i,j,hold) { | |
1358 | for (i = 2; i <= n; i++) { | |
1359 | hold = A[j = i] | |
1360 | while (A[j-1] > hold) { | |
54caef3d | 1361 | j-- ; A[j+1] = A[j] |
1362 | } | |
7c23055b ER |
1363 | A[j] = hold |
1364 | } | |
1365 | # sentinel A[0] = "" will be created if needed | |
1366 | } | |
1367 | ||
1368 | ||
23e0529e | 1369 | function use_files_macros( i, n, t, a, l) |
eee34ffb | 1370 | { |
e6f1551d ER |
1371 | use_macros() |
1372 | ||
da6457aa ER |
1373 | # skip comments |
1374 | if (/^#/) { | |
1375 | return; | |
1376 | } | |
1377 | ||
f158eddc ER |
1378 | sub("^%doc %{_mandir}", "%{_mandir}") |
1379 | ||
eee34ffb | 1380 | gsub("^%{_sbindir}", "%attr(755,root,root) %{_sbindir}") |
1381 | gsub("^%{_bindir}", "%attr(755,root,root) %{_bindir}") | |
7c23055b | 1382 | |
61cb9711 ER |
1383 | # uid/gid nobody is not valid in %files |
1384 | if (/%attr([^)]*nobody[^)]*)/ && !/FIXME/) { | |
1385 | $0 = $0 " # FIXME nobody user/group can't own files! -adapter.awk" | |
1386 | } | |
1387 | ||
16bb0647 JB |
1388 | # s[gu]id programs with globs are evil |
1389 | if (/%attr\([246]...,.*\*/ && !/FIXME/) { | |
1390 | $0 = $0 " # FIXME no globs for suid/sgid files" | |
85bed066 ER |
1391 | } |
1392 | ||
5dc673eb | 1393 | # replace back |
8f6ddcd9 | 1394 | gsub("%{_sysconfdir}/cron\.d", "/etc/cron.d") |
3feaeac8 | 1395 | gsub("%{_sysconfdir}/crontab\.d", "/etc/crontab.d") |
8f6ddcd9 ER |
1396 | gsub("%{_sysconfdir}/logrotate\.d", "/etc/logrotate.d") |
1397 | gsub("%{_sysconfdir}/pam\.d", "/etc/pam.d") | |
1398 | gsub("%{_sysconfdir}/profile\.d", "/etc/profile.d") | |
1399 | gsub("%{_sysconfdir}/rc\.d", "/etc/rc.d") | |
1400 | gsub("%{_sysconfdir}/security", "/etc/security") | |
1401 | gsub("%{_sysconfdir}/skel", "/etc/skel") | |
1402 | gsub("%{_sysconfdir}/sysconfig", "/etc/sysconfig") | |
1403 | gsub("%{_sysconfdir}/certs", "/etc/certs") | |
5dc673eb | 1404 | gsub("%{_sysconfdir}/init.d", "/etc/init.d") |
9395915a | 1405 | gsub("%{_sysconfdir}/dbus-1", "/etc/dbus-1") |
be827f42 ER |
1406 | gsub("%{_sysconfdir}/pki", "/etc/pki") |
1407 | gsub("%{_sysconfdir}/tmpwatch", "/etc/tmpwatch") | |
2fc0e274 | 1408 | |
5dc673eb ER |
1409 | # /etc/init.d -> /etc/rc.d/init.d |
1410 | if (!/^\/etc\/init\.d$/) { | |
1411 | gsub("/etc/init.d", "/etc/rc.d/init.d") | |
1412 | } | |
1413 | ||
1414 | if (/\/etc\/rc\.d\/init\.d\// && !/functions/) { | |
2fc0e274 ER |
1415 | if (!/%attr.*\/etc\/rc\.d\/init\.d/) { |
1416 | $0 = "%attr(754,root,root) " $0 | |
1417 | } | |
1418 | if (/^%attr.*\/etc\/rc\.d\/init\.d/ && !/^%attr\(754 *,/) { | |
89c604c7 | 1419 | gsub("^%attr\\(... *,", "%attr(754,"); |
2fc0e274 | 1420 | } |
9a7a5776 ER |
1421 | } |
1422 | ||
71a4728c | 1423 | if (/lib.+\.so/ && !/\.so$/ && !/^%attr.*/ && !/%exclude/) { |
55356feb ER |
1424 | $0 = "%attr(755,root,root) " $0 |
1425 | } | |
1426 | ||
ab9b09e2 ER |
1427 | if (/%{perl_vendorarch}.*\.so$/ && !/^%attr.*/) { |
1428 | $0 = "%attr(755,root,root) " $0 | |
1429 | } | |
1430 | ||
f56d5519 ER |
1431 | # /etc/sysconfig files |
1432 | # %attr(640,root,root) %config(noreplace) %verify(not size mtime md5) /etc/sysconfig/* | |
a825b76b | 1433 | # attr not required, allow default 644 attr |
6ea64b8d | 1434 | if (!/network-scripts/ && !/%dir/ && !/\.d$/ && !/functions/ && !/\/etc\/sysconfig\/wmstyle/) { |
6ea0907e | 1435 | if (/\/etc\/sysconfig\// && /%config/ && !/%config\(noreplace/) { |
5dc673eb ER |
1436 | gsub("%config", "%config(noreplace)") |
1437 | } | |
f56d5519 | 1438 | |
6ea0907e | 1439 | if (/\/etc\/sysconfig\// && !/%config\(noreplace/) { |
5dc673eb ER |
1440 | $NF = "%config(noreplace) " $NF |
1441 | } | |
f56d5519 | 1442 | |
5dc673eb | 1443 | if (/\/etc\/sysconfig\// && /%attr\(755/) { |
89c604c7 | 1444 | gsub("^%attr\\(... *,", "%attr(640,"); |
5dc673eb | 1445 | } |
f56d5519 | 1446 | |
5dc673eb ER |
1447 | if (/\/etc\/sysconfig\// && !/%verify/) { |
1448 | gsub("/etc/sysconfig", "%verify(not size mtime md5) /etc/sysconfig"); | |
1449 | } | |
a825b76b ER |
1450 | } |
1451 | ||
f56d5519 | 1452 | # kill leading zeros |
7dfb4dea ER |
1453 | if (/%attr\(0[1-9]/) { |
1454 | gsub("%attr\\(0", "%attr(") | |
1455 | } | |
f9d5d512 | 1456 | |
95ae7268 | 1457 | # kill leading whitespace |
b8085249 | 1458 | gsub(/^ +/, ""); |
95ae7268 | 1459 | |
b6875e34 ER |
1460 | # kill default attrs |
1461 | gsub(/%dir %attr\(755,root,root\)/, "%dir"); | |
1462 | gsub(/%attr\(755,root,root\) %dir/, "%dir"); | |
1463 | if (!/%dir/) { | |
1464 | gsub(/%attr\(644,root,root\) /, ""); | |
1465 | } | |
46292535 | 1466 | |
7c23055b | 1467 | # sort %verify attrs |
12bfc5c8 | 1468 | if (match($0, /%verify\(not([^)]+)\)/)) { |
7c23055b | 1469 | t = substr($0, RSTART, RLENGTH) |
8409a9b2 ER |
1470 | # kill commas: %verify(not,md5,size,mtime) |
1471 | gsub(/,/, " ", t); | |
1472 | ||
7c23055b ER |
1473 | gsub(/^%verify\(not |\)$/, "", t) |
1474 | n = split(t, a, / /) | |
1475 | isort(a, n) | |
1476 | ||
1477 | s = "%verify(not" | |
1478 | for (i = 1 ; i <= n; i++) { | |
1479 | s = s " " a[i] | |
1480 | } | |
1481 | s = s ")" | |
1482 | ||
12bfc5c8 | 1483 | gsub(/%verify\(not[^)]+\)/, s) |
7c23055b | 1484 | } |
13defa79 ER |
1485 | |
1486 | if (/%{_mandir}/) { | |
d64e2ec0 | 1487 | gsub("\.gz$", "*") |
13defa79 | 1488 | } |
5e15e952 | 1489 | |
ef6d2b7a | 1490 | # locale dir and no %lang -> bad |
b9080a1b | 1491 | if (/%{_datadir}\/locale\/.*\// && !/%(dir|lang)/) { |
ef6d2b7a ER |
1492 | $(NF + 1) = "# FIXME consider using %find_lang" |
1493 | } | |
1494 | ||
23e0529e | 1495 | # python egg-infos |
860a6f52 ER |
1496 | if (match($0, "^%{py_site(script)?dir}/.+-py"py_ver".egg-info$")) { |
1497 | l = index($0, "/"); | |
1498 | t = substr($0, 0, l - 1); | |
23e0529e | 1499 | s = substr($0, l + 1, RLENGTH - l - length("-py"py_ver".egg-info")); |
860a6f52 | 1500 | if (match(s, "[^-]+$")) { |
5384172a ER |
1501 | if (RLENGTH > 1) { |
1502 | s = substr(s, 0, RSTART - 2); | |
1503 | } | |
23e0529e | 1504 | print "%if \"%{py_ver}\" > \"2.4\"" |
860a6f52 | 1505 | gsub(t "/.+.egg-info", t "/" s "-*.egg-info"); |
23e0529e ER |
1506 | |
1507 | print "%endif" | |
23e0529e ER |
1508 | next |
1509 | } | |
1510 | } | |
1511 | ||
5e15e952 ER |
1512 | # atrpms |
1513 | $0 = fixedsub("%{perl_man1dir}", "%{_mandir}/man1", $0); | |
1514 | $0 = fixedsub("%{perl_man3dir}", "%{_mandir}/man3", $0); | |
1515 | $0 = fixedsub("%{perl_bin}", "%{_bindir}", $0); | |
97dae8dc ER |
1516 | |
1517 | gsub(libdir "/pkgconfig", "%{_pkgconfigdir}"); | |
1518 | gsub("%{_libdir}/pkgconfig", "%{_pkgconfigdir}"); | |
1519 | gsub("%{_prefix}/lib/pkgconfig", "%{_pkgconfigdir}"); | |
eee20d8d ER |
1520 | |
1521 | gsub("%{_datadir}/applications", "%{_desktopdir}"); | |
9730a549 | 1522 | gsub("%{_datadir}/icons", "%{_iconsdir}"); |
0904210e | 1523 | gsub("%{_datadir}/pixmaps", "%{_pixmapsdir}"); |
4b1d6e6d ER |
1524 | gsub("%{_datadir}/pear", "%{php_pear_dir}"); |
1525 | gsub("%{_datadir}/php", "%{php_data_dir}"); | |
eee34ffb | 1526 | } |
236b87ac | 1527 | |
723ce732 ER |
1528 | function use_script_macros() |
1529 | { | |
1530 | if (gsub("/sbin/service", "%service")) { | |
1531 | sub(" >/dev/null 2>&1 \|\|:", ""); | |
1532 | sub(" 2> /dev/null \|\| :", ""); | |
1533 | } | |
1534 | } | |
1535 | ||
236b87ac | 1536 | function fill(ch, n, i) { |
1537 | for (i = 0; i < n; i++) | |
1538 | printf("%c", ch) | |
1539 | } | |
1540 | ||
1541 | function format_flush(line, indent, newline, word, first_word) { | |
1542 | first_word = 1 | |
f171fd40 | 1543 | if (format_indent == -1) |
236b87ac | 1544 | newline = "" |
1545 | else | |
1546 | newline = fill(" ", format_indent) "- " | |
1547 | ||
1548 | while (match(line, /[^\t ]+/)) { | |
1549 | word = substr(line, RSTART, RLENGTH) | |
1550 | if (length(newline) + length(word) + 1 > tw) { | |
1551 | print newline | |
f171fd40 | 1552 | |
236b87ac | 1553 | if (format_indent == -1) |
1554 | newline = "" | |
1555 | else | |
1556 | newline = fill(" ", format_indent + 2) | |
1557 | first_word = 1 | |
1558 | } | |
1559 | ||
1560 | if (first_word) { | |
1561 | newline = newline word | |
1562 | first_word = 0 | |
1563 | } else | |
1564 | newline = newline " " word | |
f171fd40 | 1565 | |
236b87ac | 1566 | line = substr(line, RSTART + RLENGTH) |
1567 | } | |
1568 | if (newline ~ /[^\t ]/) { | |
1569 | print newline | |
1570 | } | |
1571 | } | |
1572 | ||
eb4bf70e | 1573 | function cflags(var) |
1574 | { | |
85e708f2 | 1575 | if ($0 == var "=\"$RPM_OPT_FLAGS\"") { |
1576 | removed[var] = 1 | |
eb4bf70e | 1577 | return 0 |
85e708f2 | 1578 | } |
f171fd40 | 1579 | |
246ad57e | 1580 | if (!/!\?debug/) |
fde8f52a | 1581 | sub("\$RPM_OPT_FLAGS", "%{rpmcflags}") |
eb4bf70e | 1582 | return 1 |
1583 | } | |
0ea7c3cd | 1584 | |
8ea8f0ae ER |
1585 | function unify_url(url) |
1586 | { | |
1587 | ||
1588 | # sourceforge urls | |
1589 | sub("[?&]big_mirror=.*$", "", url); | |
1590 | sub("[?&]modtime=.*$", "", url); | |
1591 | sub("[?]use_mirror=.*$", "", url); | |
1592 | sub("[?]download$", "", url); | |
1593 | ||
1594 | sub("^http://prdownloads\.sourceforge\.net/", "http://dl.sourceforge.net/", url) | |
1595 | sub("^http://download\.sf\.net/", "http://dl.sourceforge.net/", url) | |
1596 | sub("^http://download\.sourceforge\.net/", "http://dl.sourceforge.net/", url) | |
1597 | sub("^http://downloads\.sourceforge\.net/", "http://dl.sourceforge.net/", url) | |
1598 | ||
1599 | sub("^http://.*\.dl\.sourceforge\.net/", "http://dl.sourceforge.net/", url) | |
1600 | sub("^http://dl\.sourceforge\.net/sourceforge/", "http://dl.sourceforge.net/", url) | |
1601 | sub("^http://dl\.sf\.net/", "http://dl.sourceforge.net/", url) | |
1602 | ||
1603 | sub("^ftp://ftp\.gnome\.org/", "http://ftp.gnome.org/", url) | |
1604 | sub("^http://ftp\.gnome\.org/pub/gnome/", "http://ftp.gnome.org/pub/GNOME/", url) | |
1605 | ||
1606 | # apache urls | |
1607 | sub("^http://apache.zone-h.org/", "http://www.apache.org/dist/", url) | |
1608 | ||
11401cd0 | 1609 | # gnu.org |
22753e56 | 1610 | sub("^ftp://ftp.gnu.org/", "http://ftp.gnu.org/", url) |
29c65f09 | 1611 | sub("^http://ftp.gnu.org/pub/gnu/", "http://ftp.gnu.org/gnu/", url) |
11401cd0 | 1612 | |
8ea8f0ae ER |
1613 | return url |
1614 | } | |
1615 | ||
4e26c5f2 ER |
1616 | function demacroize(str) |
1617 | { | |
8f7c516b ER |
1618 | if (mod_name) { |
1619 | sub("%{mod_name}", mod_name, str); | |
1620 | } | |
1621 | if (name) { | |
1622 | sub("%{name}", name, str); | |
1623 | } | |
4e26c5f2 ER |
1624 | if (version) { |
1625 | sub("%{version}", version, str); | |
1626 | } | |
1627 | if (_beta) { | |
1628 | sub("%{_beta}", _beta, str); | |
1629 | } | |
1630 | if (_rc) { | |
1631 | sub("%{_rc}", _rc, str); | |
1632 | } | |
59de1799 ER |
1633 | if (_pre) { |
1634 | sub("%{_pre}", _pre, str); | |
1635 | } | |
4e26c5f2 ER |
1636 | if (_snap) { |
1637 | sub("%{_snap}", _snap, str); | |
1638 | } | |
3c5e6e5f ER |
1639 | if (subver) { |
1640 | sub("%{subver}", subver, str); | |
1641 | } | |
4e26c5f2 ER |
1642 | return str; |
1643 | } | |
1644 | ||
0ea7c3cd ER |
1645 | function kill_preamble_macros() |
1646 | { | |
a64d362e ER |
1647 | if ($1 ~ /^Obsoletes:/) { |
1648 | # NB! assigning $2 a value breaks tabbing | |
1649 | $2 = demacroize($2); | |
1650 | } | |
1651 | if ($1 ~ /^URL:/) { | |
8f7c516b | 1652 | # NB! assigning $2 a value breaks tabbing |
4e26c5f2 | 1653 | $2 = demacroize($2); |
ec30d23e | 1654 | $2 = unify_url($2) |
0ea7c3cd ER |
1655 | } |
1656 | } | |
ba377afe | 1657 | |
9815f9b2 ER |
1658 | function get_epoch(pkg, ver, epoch) |
1659 | { | |
cccfa553 ER |
1660 | return |
1661 | # should parse the BR lines more adequately: | |
1662 | # freetype = 2.0.0 -> correct | |
1663 | # freetype = 2.1.9 -> with epoch 1, as epoch 1 was added in 2.1.7 | |
1664 | ||
9815f9b2 ER |
1665 | shell = "grep -o '^" pkg ":[^:]\+' ../PLD-doc/BuildRequires.txt | awk '{print $NF}'"; |
1666 | shell | getline epoch; | |
1667 | return epoch; | |
1668 | } | |
1669 | ||
ba377afe | 1670 | function format_requires(tag, value, n, p, i, deps, ndeps) { |
87b130e2 ER |
1671 | # skip any formatting for commented out items or some weird macros |
1672 | if (/^#/ || /%\(/) { | |
3f81d059 ER |
1673 | return tag "\t" value |
1674 | } | |
ba377afe ER |
1675 | n = split(value, p, / *,? */); |
1676 | for (i = 1; i <= n; i++) { | |
1677 | if (p[i+1] ~ /[<=>]/) { | |
9815f9b2 ER |
1678 | # add epoch if the version doesn't have it but BuildRequires.txt has |
1679 | if (p[i] ~ /^[a-z]/ && p[i+2] !~ /^[0-9]+:/) { | |
1680 | epoch = get_epoch(p[i], p[i+2]) | |
1681 | if (epoch) { | |
1682 | p[i+2] = epoch ":" p[i+2]; | |
1683 | } | |
1684 | } | |
ba377afe ER |
1685 | deps[ndeps++] = p[i] " " p[i+1] " " p[i+2]; |
1686 | i += 2; | |
1687 | } else { | |
1688 | deps[ndeps++] = p[i]; | |
1689 | } | |
1690 | } | |
1691 | s = "" | |
1692 | for (i in deps) { | |
1693 | s = s sprintf("%s\t%s\n", tag, deps[i]); | |
1694 | } | |
1695 | return substr(s, 1, length(s)-1); | |
1696 | } | |
6ebff802 ER |
1697 | |
1698 | function use_tabs() | |
1699 | { | |
1700 | # reverse vim: ts=4 sw=4 et | |
1701 | gsub(/ /, "\t"); | |
1702 | } | |
1c955424 ER |
1703 | |
1704 | function add_br(br) | |
1705 | { | |
b6875e34 | 1706 | BR[BR_count++] = br |
1c955424 ER |
1707 | } |
1708 | ||
92fa789e ER |
1709 | function replace_requires() |
1710 | { | |
1711 | ||
1712 | # jpackages | |
1713 | sub(/^java-devel$/, "jdk", $2); | |
1714 | sub(/^log4j$/, "logging-log4j", $2); | |
1715 | sub(/^jakarta-log4j$/, "logging-log4j", $2); | |
1716 | sub(/^oro$/, "jakarta-oro", $2); | |
1717 | sub(/^jakarta-ant$/, "ant", $2); | |
1718 | sub(/^xerces-j2$/, "xerces-j", $2); | |
1719 | sub(/^ldapjdk$/, "ldapsdk", $2); | |
1720 | sub(/^saxon-scripts$/, "saxon", $2); | |
1721 | sub(/^xalan-j2$/, "xalan-j", $2); | |
1722 | sub(/^xerces-j2$/, "xerces-j", $2); | |
1723 | sub(/^gnu-regexp$/, "gnu.regexp", $2); | |
1724 | ||
1725 | # redhat virtual | |
1726 | sub(/^tftp-server$/, "tftpdaemon", $2); | |
1727 | ||
76c234fd | 1728 | sub(/^gcc-c\+\+$/, "libstdc++-devel", $2); |
03180d14 | 1729 | sub(/^chkconfig$/, "/sbin/chkconfig", $2); |
76c234fd | 1730 | |
06509408 ER |
1731 | # fedora |
1732 | sub(/^iscsi-initiator-utils$/, "open-iscsi", $2); | |
1733 | ||
92fa789e ER |
1734 | replace_php_virtual_deps() |
1735 | } | |
1736 | ||
30cd4686 ER |
1737 | # php virtual deps as discussed in devel-en |
1738 | function replace_php_virtual_deps() | |
1739 | { | |
b6875e34 ER |
1740 | pkg = $2 |
1741 | # if (pkg == "php-program") { | |
1742 | # $0 = $1 "\t/usr/bin/php" | |
1743 | # return | |
1744 | # } | |
1745 | ||
f72c52cf ER |
1746 | # if (pkg ~ /^php-[a-z]/ && pkg !~ /^php-(pear|common|cli|devel|fcgi|cgi|dirs|program|pecl-)/) { |
1747 | # sub(/^php-/, "php(", pkg); | |
1748 | # sub(/$/, ") # verify this correctness -- it may be wanted to use specific not virtual dep", pkg); | |
1749 | # $2 = pkg | |
1750 | # } | |
b6875e34 ER |
1751 | |
1752 | if (pkg ~/^php$/) { | |
1753 | $2 = "webserver(php)"; | |
1754 | if ($4 ~ /^[0-9]:/) { | |
1755 | $4 = substr($4, 3); | |
1756 | } | |
1757 | } | |
1758 | ||
1759 | if (pkg ~/^php4$/) { | |
1760 | $2 = "webserver(php)"; | |
1761 | if ($4 ~ /^[0-9]:/) { | |
1762 | $4 = substr($4, 3); | |
1763 | } | |
1764 | } | |
30cd4686 ER |
1765 | } |
1766 | ||
ad9ea417 ER |
1767 | function replace_groupnames(group) |
1768 | { | |
1769 | sub(/^Amusements\/Games\/Strategy\/Real Time/, "X11/Applications/Games/Strategy", group) | |
1770 | sub(/^Application\/Multimedia$/, "Applications/Multimedia", group) | |
1771 | sub(/^Applications\/Compilers$/, "Development/Languages", group) | |
1772 | sub(/^Applications\/Daemons$/, "Daemons", group) | |
1773 | sub(/^Applications\/Internet$/, "Applications/Networking", group) | |
1774 | sub(/^Applications\/Internet\/Peer to Peer/, "Applications/Networking", group) | |
1775 | sub(/^Applications\/Productivity$/, "X11/Applications", group) | |
1776 | sub(/^Database$/, "Applications/Databases", group) | |
1777 | sub(/^Development\/Code Generators$/, "Development", group) | |
1778 | sub(/^Development\/Docs$/, "Documentation", group) | |
1779 | sub(/^Development\/Documentation$/, "Documentation", group) | |
1780 | sub(/^Development\/Java/, "Development/Languages/Java", group) | |
1781 | sub(/^Development\/Libraries\/C and C\+\+$/, "Development/Libraries", group) | |
1782 | sub(/^Development\/Libraries\/Java$/, "Development/Languages/Java", group) | |
1783 | sub(/^Development\/Other/,"Development", group) | |
1784 | sub(/^Development\/Testing$/, "Development", group) | |
1785 | sub(/^Emulators$/, "Applications/Emulators", group) | |
1786 | sub(/^Games/,"Applications/Games", group) | |
1787 | sub(/^Library\/Development$/, "Development/Libraries", group) | |
1788 | sub(/^Networking\/Deamons$/, "Networking/Daemons", group) | |
1789 | sub(/^Shells/,"Applications/Shells", group) | |
1790 | sub(/^System Environment\/Base$/, "Base", group) | |
1791 | sub(/^System Environment\/Daemons$/, "Daemons", group) | |
1792 | sub(/^System Environment\/Kernel$/, "Base/Kernel", group) | |
1793 | sub(/^System Environment\/Libraries$/, "Libraries", group) | |
1794 | sub(/^System$/, "Base", group) | |
1795 | sub(/^System\/Base$/, "Base", group) | |
1796 | sub(/^System\/Libraries$/, "Libraries", group) | |
1797 | sub(/^System\/Servers$/, "Daemons", group) | |
1798 | sub(/^Text Processing\/Markup\/HTML$/, "Applications/Text", group) | |
1799 | sub(/^Text Processing\/Markup\/XML$/, "Applications/Text", group) | |
1800 | sub(/^Utilities\//,"Applications/", group) | |
1801 | sub(/^Web\/Database$/, "Applications/WWW", group) | |
1802 | sub(/^X11\/GNOME/,"X11/Applications", group) | |
1803 | sub(/^X11\/GNOME\/Applications/,"X11/Applications", group) | |
1804 | sub(/^X11\/GNOME\/Development\/Libraries/,"X11/Development/Libraries", group) | |
1805 | sub(/^X11\/Games/,"X11/Applications/Games", group) | |
1806 | sub(/^X11\/Games\/Strategy/,"X11/Applications/Games/Strategy", group) | |
1807 | sub(/^X11\/Library/,"X11/Libraries", group) | |
1808 | sub(/^X11\/Utilities/,"X11/Applications", group) | |
1809 | sub(/^X11\/XFree86/, "X11", group) | |
1810 | sub(/^X11\/Xserver$/, "X11/Servers", group) | |
1811 | sub(/^Development\/C$/, "Development/Libraries", group) | |
1812 | sub(/^Development\/Python$/, "Development/Languages/Python", group) | |
1813 | sub(/^System\/Kernel and hardware$/, "Base/Kernel", group) | |
1814 | sub(/^Application\/System$/, "Applications/System", group) | |
1815 | ||
1816 | return group; | |
1817 | } | |
1818 | ||
2b94cfb4 | 1819 | # vim:ts=4:sw=4 |